Commit 566d2f27 authored by Thomas Jahns's avatar Thomas Jahns 🤸
Browse files

Fix issues with multiple open files.

parent 9d6727ee
......@@ -95,9 +95,8 @@ listSetAdd(listSet *q, void *v)
q->head = newCons;
q->tail = newCons;
q->count ++;
return 0;
return q->count++;
}
int
......
......@@ -304,7 +304,7 @@ int fowMPINONB ( const char *filename )
xdebug("IOPE%d: name=%s, init and added aFiledataM, return id = %d",
rankNode, filename, id);
of->fileID = id;
return id;
}
......
......@@ -304,6 +304,7 @@ void pioWriterAIO(void)
bfd = initBFiledataPA(filename, buffersize, nProcsCollNode);
if ((id = listSetAdd(bibBFiledataPA, bfd)) < 0)
xabort("fileID=%d not unique", rtag.id);
bfd->fileID = id;
}
else
if (strcmp(filename, bfd->name) != 0)
......
......@@ -206,6 +206,7 @@ void fpgPOSIXFPGUARDSENDRECV ( void )
if ((iret = listSetAdd(bibBFiledataPF, bfd)) < 0)
xabort("fileID=%d not unique", rtag.id);
bfd->fileID = iret;
}
*( bfd->nfinished + source ) = false;
......@@ -493,7 +494,7 @@ int fowPOSIXFPGUARDSENDRECV ( const char *filename )
if ((id = listSetAdd(bibAFiledataPF, afd)) < 0)
xabort("filename %s not unique", afd->name);
afd->fileID = id;
xdebug("name=%s, init and add aFiledataPF, return id = %d",
filename, id);
return id;
......
......@@ -194,6 +194,7 @@ pioWriterStdIO(void)
if ((id = listSetAdd(bibBFiledataP, bfd)) < 0)
xabort("fileID=%d not unique", rtag.id);
bfd->fileID = id;
}
else
if (strcmp(filename, bfd->name) != 0)
......
......@@ -268,6 +268,7 @@ pioSendOpen(const char *filename)
afd = initRemoteFileBuf(filename, buffersize);
if ((id = listSetAdd(bibRemoteFileBuf, afd)) < 0)
xabort("filename %s is not unique", afd->name);
afd->fileID = id;
xdebug("filename=%s, init and added remoteFileBuf, return id = %d",
filename, id);
......
Supports Markdown
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment