tr.net.h

ml-rsim 多处理器模拟器 支持类bsd操作系统

              "    - That buffer has space, head free to move\n"); \
      YS__SendPrbPkt(YS__ActEvnt->name,YS__prbpkt); \
   }

#define TRACE_HEAD_buffull  \
   if (TraceLevel >= MAXDBLEVEL-2)  { \
      sprintf(YS__prbpkt,"    - That buffer full head sleeps\n"); \
      YS__SendPrbPkt(YS__ActEvnt->name,YS__prbpkt); \
   }

#define TRACE_HEAD_nextmux  \
   if (TraceLevel >= MAXDBLEVEL-2)  { \
      sprintf(YS__prbpkt,"    - Head's next module is mux %d\n",mux->id);  \
      YS__SendPrbPkt(YS__ActEvnt->name,YS__prbpkt); \
      sprintf(YS__prbpkt,\
              "    - Head arbitrates at mux for time %g\n",arbdelay); \
      YS__SendPrbPkt(YS__ActEvnt->name,YS__prbpkt); \
   }

#define TRACE_HEAD_muxfree  \
   if (TraceLevel >= MAXDBLEVEL-2)  { \
      sprintf(YS__prbpkt, \
          "    Mux %d free, head of packet %d delays mux transfer time %g\n",\
          mux->id, pkt->data.seqno, muxdelay); \
      YS__SendPrbPkt(YS__ActEvnt->name,YS__prbpkt); \
   }

#define TRACE_HEAD_muxblocked \
   if (TraceLevel >= MAXDBLEVEL-2)  { \
      sprintf(YS__prbpkt,"    Mux %d in use, head of packet %d sleeps\n",  \
              mux->id, pkt->data.seqno); \
      YS__SendPrbPkt(YS__ActEvnt->name,YS__prbpkt); \
   }

#define TRACE_HEAD_muxwakeup  \
   if (TraceLevel >= MAXDBLEVEL-2)  { \
      sprintf(YS__prbpkt,"    Head of packet %d wakes up from mux %d\n",  \
              pkt->data.seqno,mux->id); \
      YS__SendPrbPkt(YS__ActEvnt->name,YS__prbpkt); \
   }

#define TRACE_HEAD_nextoport  \
   if (TraceLevel >= MAXDBLEVEL-2)  { \
      sprintf(YS__prbpkt,\
              "    - Head's next module is output port %d\n",oport->id);  \
      YS__SendPrbPkt(YS__ActEvnt->name,YS__prbpkt); \
   }

#define TRACE_HEAD_oportrdy  \
   if (TraceLevel >= MAXDBLEVEL-2)  { \
      sprintf(YS__prbpkt,\
              "    - Port queue has space, head delays for move time\n"); \
      YS__SendPrbPkt(YS__ActEvnt->name,YS__prbpkt); \
   }

#define TRACE_HEAD_oportwait  \
   if (TraceLevel >= MAXDBLEVEL-2)  { \
      sprintf(YS__prbpkt,"    - Output port queue full, head sleeps\n");  \
      YS__SendPrbPkt(YS__ActEvnt->name,YS__prbpkt); \
   }

#define TRACE_HEAD_iportrdy  \
   if (TraceLevel >= MAXDBLEVEL-2)  { \
      sprintf(YS__prbpkt,\
              "    Head of packet %d at front of input port queue %d\n", \
              pkt->data.seqno, iport->id);  \
      YS__SendPrbPkt(YS__ActEvnt->name,YS__prbpkt); \
   }

#define TRACE_HEAD_nextdemux1  \
   if (TraceLevel >= MAXDBLEVEL-2)  { \
      sprintf(YS__prbpkt,\
              "    - Head's next module is demux %d ",demux->id);  \
      YS__SendPrbPkt(YS__ActEvnt->name,YS__prbpkt); \
   }

#define TRACE_HEAD_nextdemux2  \
   if (TraceLevel >= MAXDBLEVEL-2)  { \
      sprintf(YS__prbpkt,"routing requires time %g\n", demuxdelay); \
      YS__SendPrbPkt(YS__ActEvnt->name,YS__prbpkt); \
   }

#define TRACE_HEAD_demuxport  \
   if (TraceLevel >= MAXDBLEVEL-2)  { \
      sprintf(YS__prbpkt, \
           "    Head of packet %d will leave thru terminal %d of demux %d\n",\
           pkt->data.seqno,pkt->index,curmod->id); \
      YS__SendPrbPkt(YS__ActEvnt->name,YS__prbpkt); \
   }

#define TRACE_HEAD_fromiport  \
   if (TraceLevel >= MAXDBLEVEL-2)  { \
      sprintf(YS__prbpkt,"    Head of packet %d moves from input port %d\n", \
              pkt->data.seqno, buf->id);  \
      YS__SendPrbPkt(YS__ActEvnt->name,YS__prbpkt); \
   }

#define TRACE_HEAD_frombuf  \
   if (TraceLevel >= MAXDBLEVEL-2)  { \
      sprintf(YS__prbpkt,"    Head of packet %d moves from buffer %d \n", \
              pkt->data.seqno, buf->id);  \
      YS__SendPrbPkt(YS__ActEvnt->name,YS__prbpkt); \
   }

#define TRACE_HEAD_tobuf  \
   if (TraceLevel >= MAXDBLEVEL-2)  { \
      sprintf(YS__prbpkt,"    Head of packet %d moves to buffer %d \n", \
              pkt->data.seqno,pkt->module->id);  \
      YS__SendPrbPkt(YS__ActEvnt->name,YS__prbpkt); \
   }

#define TRACE_HEAD_tooport  \
   if (TraceLevel >= MAXDBLEVEL-2)  { \
      sprintf(YS__prbpkt,"    Head of packet %d moves to output port %d \n", \
              pkt->data.seqno, pkt->module->id);  \
      YS__SendPrbPkt(YS__ActEvnt->name,YS__prbpkt); \
   }

#define TRACE_HEAD_athead  \
   if (TraceLevel >= MAXDBLEVEL-2)  { \
      sprintf(YS__prbpkt,"    - Head at the front of the buffer\n");  \
      YS__SendPrbPkt(YS__ActEvnt->name,YS__prbpkt); \
   }

#define TRACE_HEAD_notathead  \
   if (TraceLevel >= MAXDBLEVEL-2)  { \
      sprintf(YS__prbpkt,"    - Head behind other packets in the buffer\n");  \
      YS__SendPrbPkt(YS__ActEvnt->name,YS__prbpkt); \
   }

#define TRACE_HEAD_freetomove  \
   if (TraceLevel >= MAXDBLEVEL-2)  { \
      sprintf(YS__prbpkt,"    Flit %s free to enter module %d\n", \
         buf->WaitingHead->name, buf->id);  \
      YS__SendPrbPkt(buf->WaitingHead->name,YS__prbpkt); \
   }

/*
 * TAIL EVENT tracing statements 
 */

#define TRACE_TAIL_nobubbles  \
   if (TraceLevel >= MAXDBLEVEL-2)  { \
      sprintf(YS__prbpkt,\
              "    Tail of packet %d has caught up with its head\n", \
              pkt->data.seqno);  \
      YS__SendPrbPkt(YS__ActEvnt->name,YS__prbpkt); \
   }

#define TRACE_TAIL_buftobuf  \
   if (TraceLevel >= MAXDBLEVEL-2)  { \
      sprintf(YS__prbpkt, \
              "    Tail of packet %d moves from buffer %d to buffer %d\n", \
              pkt->data.seqno, curmod->id, nxtmod->id);  \
      YS__SendPrbPkt(YS__ActEvnt->name,YS__prbpkt); \
   }

#define TRACE_TAIL_buftoport  \
   if (TraceLevel >= MAXDBLEVEL-2)  { \
      sprintf(YS__prbpkt, \
           "    Tail of packet %d moves from buffer %d to output port %d\n", \
           pkt->data.seqno, curmod->id, nxtmod->id);  \
      YS__SendPrbPkt(YS__ActEvnt->name,YS__prbpkt); \
   }

#define TRACE_TAIL_porttobuf  \
   if (TraceLevel >= MAXDBLEVEL-2)  { \
      sprintf(YS__prbpkt, \
           "    Tail of packet %d moves from input port %d to buffer %d\n", \
           pkt->data.seqno, curmod->id, nxtmod->id);  \
      YS__SendPrbPkt(YS__ActEvnt->name,YS__prbpkt); \
   }

#define TRACE_TAIL_porttoport  \
   if (TraceLevel >= MAXDBLEVEL-2)  { \
      sprintf(YS__prbpkt, \
         "    Tail of packet %d moves from input port %d to output port %d\n",\
         pkt->data.seqno, curmod->id, nxtmod->id);  \
      YS__SendPrbPkt(YS__ActEvnt->name,YS__prbpkt); \
   }

#define TRACE_TAIL_shift  \
   if (TraceLevel >= MAXDBLEVEL-2)  { \
         sprintf(YS__prbpkt,\
                 "    Tail of acket %d free to shift in module %d\n", \
                 pkt->data.seqno,pkt->tailbuf->id); \
         YS__SendPrbPkt(YS__ActEvnt->name,YS__prbpkt); \
      } 

#define TRACE_TAIL_move  \
   if (TraceLevel >= MAXDBLEVEL-2)  { \
      sprintf(YS__prbpkt,\
                 "    Tail of packet %d free to move out of module %d\n", \
              pkt->data.seqno,pkt->tailbuf->id); \
      YS__SendPrbPkt(YS__ActEvnt->name,YS__prbpkt); \
   }

#define TRACE_TAIL_nomove  \
   if (TraceLevel >= MAXDBLEVEL-2)  { \
      sprintf(YS__prbpkt,\
                 "    Tail of packet %d not free to move\n",pkt->data.seqno); \
      YS__SendPrbPkt(YS__ActEvnt->name,YS__prbpkt); \
   }

#define TRACE_TAIL_done  \
   if (TraceLevel >= MAXDBLEVEL-2)  { \
      sprintf(YS__prbpkt,"    Packet %d queued at ouput port %d\n", \
              pkt->data.seqno, oport->id); \
      YS__SendPrbPkt(YS__ActEvnt->name,YS__prbpkt); \
   }

#define TRACE_TAIL_wakes  \
   if (TraceLevel >= MAXDBLEVEL-2)  { \
      sprintf(YS__prbpkt,"    Tail of packet %d wakes up\n", \
         pkt->data.seqno); \
      YS__SendPrbPkt(YS__ActEvnt->name,YS__prbpkt); \
   }

#define TRACE_TAIL_tailarrives  \
   if (TraceLevel >= MAXDBLEVEL-2)  { \
      sprintf(YS__prbpkt,"    Tail of packet %d arrives in buffer %d ", \
         pkt->data.seqno, buf->id); \
      YS__SendPrbPkt(YS__ActEvnt->name,YS__prbpkt); \
      sprintf(YS__prbpkt,"and releases packet's head\n"); \
      YS__SendPrbPkt(YS__ActEvnt->name,YS__prbpkt); \
   }

#define TRACE_TAIL_signalmux  \
   if (TraceLevel >= MAXDBLEVEL-2)  { \
      sprintf(YS__prbpkt,"    Packet %d signals MUX semaphore %d\n", \
              ((PACKET*)(EventGetMyArg()))->data.seqno,mxptr->id);  \
      YS__SendPrbPkt(YS__ActEvnt->name,YS__prbpkt); \
   }

#else /* DEBUG_TRACE */

#define TRACE_BUFFER_new  
#define TRACE_MUX_new  
#define TRACE_DEMUX_new  
#define TRACE_IPORT_new  
#define TRACE_IPORT_send1 
#define TRACE_IPORT_send2 
#define TRACE_IPORT_send3 
#define TRACE_OPORT_new  
#define TRACE_OPORT_available  
#define TRACE_OPORT_receive1  
#define TRACE_OPORT_receive2  
#define TRACE_OPORT_receive3  
#define TRACE_NETWORK_connectbuf  
#define TRACE_NETWORK_connectmux  
#define TRACE_NETWORK_connectiport  
#define TRACE_NETWORK_connectdemux 
#define TRACE_PACKET_new  
#define TRACE_PACKET_show  
#define TRACE_HEAD_chkwft  
#define TRACE_HEAD_nextmod  
#define TRACE_HEAD_nextbuf  
#define TRACE_HEAD_spaceavail  
#define TRACE_HEAD_buffull  
#define TRACE_HEAD_nextmux  
#define TRACE_HEAD_muxfree  
#define TRACE_HEAD_muxblocked 
#define TRACE_HEAD_muxwakeup  
#define TRACE_HEAD_nextoport  
#define TRACE_HEAD_oportrdy  
#define TRACE_HEAD_oportwait  
#define TRACE_HEAD_iportrdy  
#define TRACE_HEAD_nextdemux1  
#define TRACE_HEAD_nextdemux2 
#define TRACE_HEAD_demuxport  
#define TRACE_HEAD_fromiport  
#define TRACE_HEAD_frombuf  
#define TRACE_HEAD_tobuf  
#define TRACE_HEAD_tooport  
#define TRACE_HEAD_athead  
#define TRACE_HEAD_notathead  
#define TRACE_HEAD_freetomove 
#define TRACE_TAIL_nobubbles  
#define TRACE_TAIL_buftobuf  
#define TRACE_TAIL_buftoport  
#define TRACE_TAIL_porttobuf  
#define TRACE_TAIL_porttoport  
#define TRACE_TAIL_shift  
#define TRACE_TAIL_move  
#define TRACE_TAIL_nomove  
#define TRACE_TAIL_done  
#define TRACE_TAIL_wakes  
#define TRACE_TAIL_tailarrives  
#define TRACE_TAIL_signalmux  

#endif

#endif