int handleSendmsg( void* firsthandlerarg, uint64_t time, uint32_t sender,
uint32_t receiver, uint32_t communicator, uint32_t msgtype,
uint32_t msglength, uint32_t scltoken ) {
nodeT *nodesender = treehash_searchnode(
((fcbT*) firsthandlerarg)->p_hashtab, sender );
nodeT *nodereceiver = treehash_searchnode(
((fcbT*) firsthandlerarg)->p_hashtab, receiver);
if ( 0 == nodesender || 0 == nodereceiver ) {
fprintf( stderr, "otf2vtf WARNING: undefined process %u or %u, record ignored\n",
sender, receiver );
return OTF_RETURN_OK;
}
FileIOEndQueue_check( &(((fcbT*) firsthandlerarg)->FileIOQueue), time, firsthandlerarg );
return ( 0 == VTF3_WriteSendmsg( ((fcbT*) firsthandlerarg)->fcb, time,
nodesender->processi, nodereceiver->processi, communicator, msgtype,
msglength, scltoken ) )
? OTF_RETURN_ABORT : OTF_RETURN_OK;
}
void elg_readcb_GET_1TS(elg_ui4 lid, elg_d8 time, elg_ui4 dlid, elg_ui4 rmaid,
elg_ui4 nbytes, void* userdata) {
lid = locmap[lid];
dlid = locmap[dlid];
wbytes += VTF3_WriteSendmsg(fcb, time*1.0e+10, (unsigned int) lid,
(unsigned int) dlid, -1,
(int) (rmatag+2), (int) nbytes, VTF3_SCLNONE);
lasttime = time;
}
void elg_readcb_MPI_SEND(elg_ui4 lid, elg_d8 time, elg_ui4 dlid, elg_ui4 cid,
elg_ui4 tag, elg_ui4 sent, void* userdata) {
lid = locmap[lid];
dlid = locmap[dlid];
wbytes += VTF3_WriteSendmsg(fcb, time*1.0e+10, (unsigned int) lid,
(unsigned int) dlid, (int) cid,
(int) tag, (int) sent, VTF3_SCLNONE);
lasttime = time;
}
