home *** CD-ROM | disk | FTP | other *** search
/ Liren Large Software Subsidy 13 / 13.iso / p / p070 / 4.ddi / NETFORMS.PLB / PDUMP.CF < prev    next >
Encoding:
Text File  |  1991-10-14  |  4.9 KB  |  208 lines
  1. /*
  2.  */
  3.  
  4. /*  VERSION="1.10   14-OCT-91"
  5.  *      - Added Version message
  6.  *
  7.  *  A generic part-oriented dump utility for linked, flat netlist files
  8.  *
  9.  */
  10.  
  11. int i;
  12.  
  13. /*-----------------------*/
  14.  
  15. PrintNode()
  16. {
  17.     WriteString(1, "Node Is:");
  18.     WriteCrLf(1);
  19.  
  20.     i = GetStandardSymbol(TypeCode);
  21.     if ( i == 'L' )
  22.     {
  23.        WriteString(1, "Label Node - ");
  24.        WriteSymbol(1, NetNumber);
  25.        WriteString(1, " Node Name - ");
  26.        WriteSymbol(1, SignalNameString);
  27.     }
  28.     if ( i == 'P' )
  29.     {
  30.        WriteString(1, "Port Node - ");
  31.        WriteSymbol(1, NetNumber);
  32.        WriteString(1, " Node Name - ");
  33.        WriteSymbol(1, SignalNameString);
  34.     }
  35.     if ( i == 'S' )
  36.     {
  37.        WriteString(1, "Supply Node - ");
  38.        WriteSymbol(1, NetNumber);
  39.        WriteString(1, " Node Name - ");
  40.        WriteSymbol(1, SignalNameString);
  41.     }
  42.     if ( i == 'N' )
  43.     {
  44.        WriteString(1, "Unnamed Node - ");
  45.        WriteSymbol(1, NetNumber);
  46.     }
  47.     if ( i == 'U' )
  48.     {
  49.        WriteString(1, "Unconnected Node - ");
  50.        WriteSymbol(1, NetNumber);
  51.     }
  52.     WriteCrLf(1);
  53. }
  54.  
  55. /*-----------------------*/
  56.  
  57. Initialize()
  58. {
  59.     WriteString(0, "Creating Netlist...");
  60.     WriteCrLf(0);
  61.  
  62.     AddSymbol("Formatter");
  63.     SetPinMap(0, "Input          ");
  64.     SetPinMap(1, "BiDirectional  ");
  65.     SetPinMap(2, "Output         ");
  66.     SetPinMap(3, "Open Collector ");
  67.     SetPinMap(4, "Passive        ");
  68.     SetPinMap(5, "Hi-Z           ");
  69.     SetPinMap(6, "Open Emitter   ");
  70.     SetPinMap(7, "Power          ");
  71. }
  72.  
  73. /*-----------------------*/
  74.  
  75. WriteHeader()
  76. {
  77.     CreatePartDataBase();
  78.     WriteString(1, "------------------ Node List ------------------");
  79.     WriteCrLf(1);
  80. }
  81.  
  82. /*-----------------------*/
  83.  
  84. HandleNodeName()
  85. {
  86.     AddSignalName();
  87.  
  88.     PrintNode();
  89. }
  90.  
  91. /*-----------------------*/
  92.  
  93. WriteNet()
  94. {
  95.     RecordNode();
  96. }
  97.  
  98. /*-----------------------*/
  99.  
  100. WriteNetEnding()
  101. {
  102. }
  103.  
  104. /*-----------------------*/
  105.  
  106. ProcessFieldStrings()
  107. {
  108.     WriteString(1, "----------------- End Node List -----------------");
  109.     WriteCrLf(1);
  110. }
  111.  
  112. /*-----------------------*/
  113.  
  114. WriteNetListEnd()
  115. {
  116.     SetFirst(ALL);
  117.     do
  118.     {
  119.         if (EndNode()) 
  120.         {
  121.             WriteCrLf(1);
  122.             WriteString(1, "Empty Node for : ");
  123.             WriteSymbol(1, ReferenceString);
  124.             WriteString(1, "     ");
  125.             WriteSymbol(1, PartName);
  126.             WriteString(1, "     ");
  127.             WriteSymbol(1, TimeStamp );
  128.             WriteCrLf(1);
  129.         }  
  130.         else
  131.         {
  132.             CopySymbol(ReferenceString, Formatter);
  133.             LoadFieldString(Formatter);
  134.  
  135.             WriteCrLf(1);
  136.             WriteSymbol(1, ReferenceString);
  137.             WriteString(1, "     ");
  138.             WriteSymbol(1, PartName);
  139.             WriteString(1, "     ");
  140.             WriteSymbol(1, TimeStamp );
  141.  
  142.             WriteCrLf(1);
  143.             WriteString(1, "Reference PinNumber PinName   PartName  Module    PinType");
  144.             WriteCrLf(1);
  145.             WriteString(1, "---------------------------------------------------------");
  146.             WriteCrLf(1);
  147.  
  148.             do {
  149.                 PrintNode();
  150.     
  151.                 i = GetStandardSymbol(SignalType);
  152.                 if (i == 255)
  153.                 {
  154.                     WriteString(1, "**** PIN IS NOT USED ****");
  155.                     WriteCrLf(1);
  156.                 }
  157.     
  158.                 CopySymbol(ReferenceString, Formatter);
  159.                 PadSpaces(Formatter, 10);
  160.                 WriteSymbol(1, Formatter);
  161.              
  162.                 CopySymbol(PinNumberString, Formatter);
  163.                 PadSpaces(Formatter, 10);
  164.                 WriteSymbol(1, Formatter);
  165.              
  166.                 CopySymbol(PinNameString, Formatter);
  167.                 PadSpaces(Formatter, 10);
  168.                 WriteSymbol(1, Formatter);
  169.              
  170.                 CopySymbol(PartName, Formatter);
  171.                 PadSpaces(Formatter, 10);
  172.                 WriteSymbol(1, Formatter);
  173.              
  174.                 i = SymbolLength(ModuleName);
  175.                 if (i == 0)
  176.                 {
  177.                     SetSymbol(Formatter, "EMPTY ");
  178.                     PadSpaces(Formatter, 10);
  179.                     WriteSymbol(1, Formatter);
  180.                 }
  181.                 else
  182.                 {
  183.                     CopySymbol(ModuleName, Formatter);
  184.                     PadSpaces(Formatter, 10);
  185.                     WriteSymbol(1, Formatter);
  186.                 }
  187.  
  188.                 i = GetStandardSymbol(PinType);
  189.                 WriteMap(1, i);
  190.              
  191.                 WriteCrLf(1);
  192.             }
  193.             while (SetNext(NODES));
  194.              
  195.             WriteString(1, "--------- END PART ---------");
  196.             WriteCrLf(1);
  197.         }
  198.     }
  199.     while (SetNext(ALL));
  200.     WriteCrLf(1);
  201.  
  202.     WriteString(0, "Done");
  203.     WriteCrLf(0);
  204. }
  205.  
  206.  
  207.  
  208.