开通博客赚积分
发布资源赚积分
分类

源码开发语言/平台
当前位置：首页 > 源码/资料 > Windows编程 > 通讯编程 > 查看源码
parser.cc
资源名称：ns-allinone-2.33.tar.gz　[点击查看]
上传用户：rrhhcc
上传日期：2015-12-11
资源大小：54129k
文件大小：40k
源码类别：

通讯编程

开发平台：

Visual C++

parser.cc：源码内容
  1. /*
  2.  * Copyright (c) 1997-2001 University of Southern California.
  3.  * All rights reserved.
  4.  *
  5.  * Redistribution and use in source and binary forms, with or without
  6.  * modification, are permitted provided that the following conditions
  7.  * are met:
  8.  * 1. Redistributions of source code must retain the above copyright
  9.  *    notice, this list of conditions and the following disclaimer.
  10.  * 2. Redistributions in binary form must reproduce the above copyright
  11.  *    notice, this list of conditions and the following disclaimer in the
  12.  *    documentation and/or other materials provided with the distribution.
  13.  * 3. All advertising materials mentioning features or use of this software
  14.  *    must display the following acknowledgement:
  15.  *      This product includes software developed by the Information Sciences
  16.  *      Institute of the University of Southern California.
  17.  * 4. Neither the name of the University nor of the Institute may be used
  18.  *    to endorse or promote products derived from this software without
  19.  *    specific prior written permission.
  20.  *
  21.  * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
  22.  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
  23.  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
  24.  * ARE DISCLAIMED.  IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
  25.  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
  26.  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
  27.  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
  28.  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
  29.  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
  30.  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
  31.  * SUCH DAMAGE.
  32.  *
  33.  */
  35. #include <stdlib.h>
  36. #include <stdio.h>
  37. #include <ctype.h>
  38. #include "parser.h"
  39. #include "trace.h"
  41. //----------------------------------------------------------------------
  42. //
  43. //----------------------------------------------------------------------
  44. Attribute::Attribute(char _flag, void * _value_ptr, char * _value_type,
  45.                      char * _default_value, bool _required, char * _label) {
  46.   flag = _flag;
  47.   value_ptr = _value_ptr;
  48.   other_ptr = NULL;
  49.   value_type = _value_type;
  50.   default_value = _default_value;
  51.   required = _required;
  52.   seen = false;
  53.   label = _label;
  54.   next = NULL;  
  55. }
  57. //----------------------------------------------------------------------
  58. //
  59. //----------------------------------------------------------------------
  60. char * 
  61. Attribute::parseValue(char * run, char * line) {
  62.   char buffer[MAXVALUE];
  63.   double angle;
  65.   if (!strcmp(value_type, "int")) {
  66.     *((int *) value_ptr) = atoi(run);
  67.     run = advanceToSpace(run);
  69.   } else if (!strcmp(value_type, "double")) {
  70.     *((double *) value_ptr) = atof(run);
  71.     run = advanceToSpace(run);
  73.   } else if (!strcmp(value_type, "string") || 
  74.              !strcmp(value_type, "hex")) {
  75.     run = extractString(run,(char *) value_ptr);
  77.   } else if (!strcmp(value_type, "string l")) {
  78.     run = extractString(run, buffer);
  79.     // Check for use as length in link event
  80.     if (other_ptr && isdigit(buffer[0])) {
  81.       fprintf(stderr, "Nam syntax has changed: %sPlease use -h instead of -l for length.nn",line);
  82.       *((double *) other_ptr) = atof(buffer);
  83.     } else {
  84.       strcpy((char *) value_ptr, buffer);
  85.     }
  87.   } else if (!strcmp(value_type, "color")) {
  88.     // Checking for angle to be bacwards compatible
  89.     // with the -o flag standing for orientation
  90.     run = extractString(run, buffer);
  91.     angle = determineAngle(buffer);
  92.     if (angle == -1.0) {
  93.      // We must have a color
  94.      strcpy((char *) value_ptr, buffer); 
  95.     } else { 
  96.       if (other_ptr) {
  97.         fprintf(stderr, "Nam syntax has changed: %sPlease use -O instead of -o for orientation.nn",line);
  98.         *((double *) other_ptr) = angle;
  99.       }
  100.     }
  101.   } else if (!strcmp(value_type, "time")) {
  102.     if (*run == '*') {
  103.       *((double *) value_ptr) = 0.0;
  104.       run++;
  105.     } else {
  106.       *((double *) value_ptr) = atof(run);
  107.       run = advanceToSpace(run);
  108.     }
  110.   } else if (!strcmp(value_type, "comment")) {
  111.     if (*run == '{') {
  112.       run++;
  113.       // Grab first value (Source)
  114.       ((PacketAttr *)value_ptr)->esrc = atoi(run);
  116.       // Grab second value (Destination)
  117.       run = advanceToSpace(run); 
  118.       run = eatSpaces(run);
  119.       ((PacketAttr *) value_ptr)->edst = atoi(run);
  121.       // Eat the rest of the comment
  122.       while (*run != '}' && *run != 'n') {
  123.         run++;
  124.       }
  126.       // Eat last curly brace
  127.       if (*run == '}') {
  128.         run++;
  129.       }
  131.     } else {
  132.       fprintf(stderr, "Error in comment field: %sn", line);
  133.     }
  135.   } else if (!strcmp(value_type, "flag")) {
  136.     if (*run == '-' || *run == '' || isspace(*run)) {
  137.       // For cases where the flag is -x followed by another attribute  
  138.       // or on the end of the line.  If -x is followed by another attribute
  139.       // run should point to - in -n 1
  140.       // For example -x -n 1 or -x or -n 1 -xn
  141.       *((int *) value_ptr) = 1;
  142.     } else if (isdigit(*run)) {
  143.       // For intialization cases or when you get -x 2 
  144.       *((int *) value_ptr) = atoi(run);
  145.       run = advanceToSpace(run); 
  146.     } else {
  147.       // The syntax is really messed up so report an
  148.       // error and skip over the value
  149.       fprintf(stderr, "Invalid value for flag attribute type in line: %sn",line);
  150.       run = advanceToSpace(run);
  151.     }
  153.   } else if (!strcmp(value_type, "char")) {
  154.     *((char *) value_ptr) = *run;
  155.     run = advanceToSpace(run);
  157.   } else if (!strcmp(value_type, "orientation")) {
  158.     run = extractString(run, buffer);
  159.     angle = determineAngle(buffer);
  160.     if (angle == -1.0) {
  161.      angle = 0.0;
  162.     } 
  163.     *((double *) value_ptr) = angle;
  164.     
  165.   } else if (!strcmp(value_type, "packet source")) {
  166.     if (*run == '*') {
  167.       *((int *) value_ptr) = -1;
  168.       run++;
  169.     } else {
  170.       *((int *) value_ptr) = atoi(run);
  171.       run = advanceToSpace(run);
  172.     }
  173.   } else if (!strcmp(value_type, "shape")) {
  174.     run = extractString(run, buffer);
  175.     // Check for being used as y_vel_ in old nam
  176.     // syntax
  177.     if (isdigit(buffer[0]) || (buffer[0] == '-' && isdigit(buffer[1]))) {
  178.       if (other_ptr) {
  179.         fprintf(stderr, "Nam syntax has changed: %sPlease use -V instead of -v for y velocity nn",line);
  180.         *((double *) other_ptr) = atof(buffer);
  181.       }
  182.     } else {
  183.       strcpy((char *) value_ptr, buffer); 
  184.     }
  185.   } else if (!strcmp(value_type, "tcl expression")) {
  186.     //*((char **) value_ptr) = run;
  187.     *((int *) value_ptr) = run - line;
  188.     
  189.     //Advance to next flag or end of line
  190.     run = advanceToEndofLine(run);
  191.   }
  192.   return run;
  193. }
  195. //----------------------------------------------------------------------
  196. //
  197. //----------------------------------------------------------------------
  198. void
  199. Attribute::setDefaultValue() {
  200.   parseValue(default_value, default_value);
  201. }
  203. //----------------------------------------------------------------------
  204. //  double
  205. //  Attribute::determineAngle(char * buffer)
  206. //      - Determines angle based on up-right, up, down, down-left, etc
  207. //        constants.  Also will try to extract a numeric angle from buffer
  208. //        if unable to determine angle -1 is returned
  209. //----------------------------------------------------------------------
  210. double
  211. Attribute::determineAngle(char * buffer) {
  212.   double angle;
  213.   if (isalpha(*buffer) || *buffer == '"' || *buffer == '#') {
  214.     // Set angle based on constants
  215.     if (!strcmp(buffer, "right")) {
  216.       angle = 0.0;
  217.     } else if (!strcmp(buffer, "up-right") || !strcmp(buffer, "right-up")) {
  218.       angle = 0.25;
  219.     } else if (!strcmp(buffer, "up")) {
  220.       angle = 0.50;
  221.     } else if (!strcmp(buffer, "up-left") || !strcmp(buffer, "left-up")) {
  222.       angle = 0.75;
  223.     } else if (!strcmp(buffer, "left")) {
  224.       angle = 1.0;
  225.     } else if (!strcmp(buffer, "left-down") || !strcmp(buffer, "down-left")) {
  226.       angle = 1.25;
  227.     } else if (!strcmp(buffer, "down")) {
  228.       angle = 1.50;
  229.     } else if (!strcmp(buffer, "down-right") || !strcmp(buffer, "right-down")) {
  230.       angle = 1.75;
  231.     } else {
  232.      angle = -1.0;
  233.     } 
  234.   } else {
  235.     angle = atof(buffer);
  236.   }
  237.   return angle;
  238. }
  240. //----------------------------------------------------------------------
  241. //
  242. //----------------------------------------------------------------------
  243. TraceSyntax::TraceSyntax(char event_id, char * _label) {
  244.   type = event_id;
  245.   label = _label;
  246.   attributes = NULL;
  247.   last_attribute = NULL;
  248.   total_required_attributes = 0;
  249.   number_of_attributes = 0;
  250.   next = NULL;
  251. }
  254. //----------------------------------------------------------------------
  255. //
  256. //----------------------------------------------------------------------
  257. Attribute * 
  258. TraceSyntax::addAttribute(char flag, void * value_ptr, char * type,
  259.                           char * default_value, bool required,
  260.                           char * label) {
  261.   Attribute * attribute = new Attribute(flag, value_ptr, type,
  262.                                         default_value, required, label);
  264.   if (attribute) {
  265.     // Add attribute to list of attributes for this ParseTraceSyntax
  266.     if (!attributes) {
  267.       attributes = attribute;
  268.       last_attribute = attribute;
  269.     } else {
  270.       last_attribute->next = attribute;
  271.       last_attribute = attribute;
  272.     }
  274.     number_of_attributes++;
  275.     if (required) {
  276.       total_required_attributes++;
  277.     }
  278.   }
  279.   return attribute;
  280. }
  282. //----------------------------------------------------------------------
  283. //  Attribute * 
  284. //  TraceSyntax::addAttribute(char flag, void * value_ptr, char * type,
  285. //                            char * default_value, bool required,
  286. //                            char * label, void * other_ptr) 
  287. //
  288. //   - other_ptr is a pointer to an alternate location to put data.
  289. //     It is used to enable backwards compatability with the old
  290. //     nam syntax.
  291. //----------------------------------------------------------------------
  292. Attribute * 
  293. TraceSyntax::addAttribute(char flag, void * value_ptr, char * type,
  294.                           char * default_value, bool required,
  295.                           char * label, void * other_ptr) {
  296.   Attribute * attribute;
  298.   attribute = addAttribute(flag, value_ptr, type, default_value, required, label);
  299.   if (attribute) {
  300.    attribute->other_ptr = other_ptr;
  301.   }
  303.   return attribute; 
  304. }
  307. //----------------------------------------------------------------------
  308. //
  309. //----------------------------------------------------------------------
  310. void
  311. TraceSyntax::setDefaultAttributeValues() {
  312.   Attribute * attribute = attributes;
  313.   while (attribute) {
  314.     attribute->setDefaultValue();
  315.     attribute->seen = false;
  316.     attribute = attribute->next;
  317.   }
  318. }
  320. //----------------------------------------------------------------------
  321. //
  322. //----------------------------------------------------------------------
  323. //<zheng: +++>
  324. bool ParseTable::nam4wpan = false;
  325. int ParseTable::wpan_bradius = -1;
  326. //</zheng: +++>
  327. ParseTable::ParseTable(TraceEvent * _pending) {
  328.   TraceSyntax * ts;
  329.   
  330.   syntax_list = NULL;
  331.   syntax_list_tail = NULL;
  332.   pending = _pending;
  335.   // Comment
  336.   ts = addTraceSyntax('#', "comment -- this line is ignored");
  338.   // Time sync dummy event
  339.   ts = addTraceSyntax('T', "Dummy event to be used in time synchronization");
  340.   ts->addAttribute('t', &pending->time, "time", "-1.0", true, "time");
  342.   // ---- Node ----
  343.   // Wireless node stuff seems to be wierd.
  344.   // A lot of the code dealing with wireless bases decisions on number of attributes
  345.   // and not a wireless attribute flag. 
  346.   ts = addTraceSyntax('n', "node");
  347.   ts->addAttribute('t', &pending->time, "time", "-1.0", true, "time");
  348.   ts->addAttribute('s', &pending->ne.src, "int", "-1", true, "node id"); 
  349.   ts->addAttribute('u', &pending->ne.x_vel_, "double", "0.0", false, "x velocity");
  350.   ts->addAttribute('U', &pending->ne.x_vel_, "double", "0.0", false, "x velocity");
  351.   ts->addAttribute('V', &pending->ne.y_vel_, "double", "0.0", false, "y velocity");
  352.   // old nam syntax allowed for -v to also mean y velocity
  353.   ts->addAttribute('v', &pending->ne.mark.shape, "shape", "circle", false, "shape (circle, box, hexagon)", &pending->ne.y_vel_);
  354.   ts->addAttribute('c', &pending->ne.node.color, "color", "black", false, "color"); 
  355.   ts->addAttribute('z', &pending->ne.size, "double", "10.0", false, "size of node"); 
  356.   ts->addAttribute('a', &pending->ne.node.addr, "int", "0", false, "address"); 
  357.   ts->addAttribute('x', &pending->ne.x, "double", "0.0", false, "x location"); 
  358.   ts->addAttribute('y', &pending->ne.y, "double", "0.0", false, "y location"); 
  359.   ts->addAttribute('Z', &pending->ne.z, "double", "0.0", false, "z location (not supported)"); 
  360.   ts->addAttribute('i', &pending->ne.node.lcolor, "color", "black", false, "label color");
  362.   ts->addAttribute('b', &pending->ne.node.dlabel, "string", "", false, "label"); // Initialization
  363.   ts->addAttribute('l', &pending->ne.node.dlabel, "string", "", false, "label");
  365.   ts->addAttribute('o', &pending->ne.node.oldColor, "color", "gray", false, "previous color");
  366.   ts->addAttribute('S', &pending->ne.node.state, "string", "UP", false, "state (UP, DOWN, COLOR)");
  367.   ts->addAttribute('L', &pending->ne.node.odlabel, "string", "", false, "previous label");
  368.   ts->addAttribute('p', &pending->ne.node.direction, "string", "", false, "label location");
  369.   ts->addAttribute('P', &pending->ne.node.odirection, "string", "", false, "previous label location");
  370.   ts->addAttribute('i', &pending->ne.node.lcolor, "color", "black", false, "inside label color");
  371.   ts->addAttribute('I', &pending->ne.node.olcolor, "color", "black", false, "previous inside label color");
  372.   ts->addAttribute('e', &pending->ne.node.dcolor, "color", "black", false, "label color");
  373.   ts->addAttribute('E', &pending->ne.node.odcolor, "color", "black", false, "previous label color");
  374.   ts->addAttribute('T', &pending->ne.stoptime, "double", "0.0", false, "duration of movement");
  375.   ts->addAttribute('w', &pending->ne.wireless, "flag", "0", false, "wireless node");
  377.   // ---- Link ----
  378.   ts = addTraceSyntax('l', "link");
  379.   ts->addAttribute('t', &pending->time, "time", "0.0", true, "time"); 
  380.   ts->addAttribute('s', &pending->le.src, "int", "-1", true, "source id"); 
  381.   ts->addAttribute('d', &pending->le.dst, "int", "-1", true, "destination id"); 
  382.   ts->addAttribute('r', &pending->le.link.rate, "double", "1.0", false, "transmission rate"); 
  383.   ts->addAttribute('D', &pending->le.link.delay, "double", "1.0", false, "delay"); 
  384.   ts->addAttribute('h', &pending->le.link.length, "double", "1.0", false, "length"); 
  385.   ts->addAttribute('O', &pending->le.link.angle, "orientation", "1.0", false, "orientation"); 
  386.   ts->addAttribute('b', &pending->le.link.dlabel, "string", "", false, "label");
  388.   ts->addAttribute('c', &pending->le.link.color, "color", "black", false, "color");
  389.   // old nam syntax allowed for 'o' to be color or orientation
  390.   ts->addAttribute('o', &pending->le.link.oldColor, "color", "gray", false, "previous color", &pending->le.link.angle);  
  391.   ts->addAttribute('S', &pending->le.link.state, "string", "UP", true, "state (UP, DOWN)"); 
  392.   // old nam syntax allowed for 'l' to be length or label
  393.   ts->addAttribute('l', &pending->le.link.dlabel, "string l", "", false, "label", &pending->le.link.length); 
  394.   ts->addAttribute('L', &pending->le.link.odlabel, "string", "", false, "previous label"); 
  395.   ts->addAttribute('e', &pending->le.link.dcolor, "color", "", false, "label color"); 
  396.   ts->addAttribute('E', &pending->le.link.odcolor, "color", "", false, "previous label color"); 
  397.   
  398.   // ---- Enqueue Packet ----
  399.   ts = addTraceSyntax('+', "enqueue packet");
  400.   ts->addAttribute('t', &pending->time, "time", "0.0", true, "time"); 
  401.   ts->addAttribute('s', &pending->pe.src, "int", "-1", true, "source id"); 
  402.   ts->addAttribute('d', &pending->pe.dst, "int", "-1", true, "destination id"); 
  403.   ts->addAttribute('e', &pending->pe.pkt.size, "int", "1", false, "extent"); 
  404.   ts->addAttribute('a', &pending->pe.pkt.attr, "int", "0", false, "packet color attribute id"); 
  405.   ts->addAttribute('i', &pending->pe.pkt.id, "int", "0", false, "id"); 
  406.   ts->addAttribute('l', &pending->pe.pkt.energy, "int", "0", false, "energy"); 
  407.   ts->addAttribute('c', &pending->pe.pkt.convid, "string", "", false, "conversation"); 
  408.   ts->addAttribute('x', &pending->pe.pkt, "comment", "{-1 -1 }", false, "comment"); 
  409.   ts->addAttribute('p', &pending->pe.pkt.type, "string", "", false, "packet type"); 
  410.   ts->addAttribute('k', &pending->pe.pkt.wtype, "string", "", false, "packet type"); 
  411.   ts->addAttribute('y', &pending->pe.namgraph_flags, "comment", "{0 0}", false, "");
  412.   ts->addAttribute('S', &pending->pe.namgraph_flags.size, "int", "0", false, "");
  413.   ts->addAttribute('m', &pending->pe.namgraph_flags.size, "int", "0", false, "");
  414.   ts->addAttribute('f', &pending->pe.namgraph_flags.size, "int", "0", false, "");
  416.    
  417.   // ---- Dequeue Packet ----
  418.   ts = addTraceSyntax('-', "dequeue packet");
  419.   ts->addAttribute('t', &pending->time, "time", "0.0", true, "time"); 
  420.   ts->addAttribute('s', &pending->pe.src, "int", "-1", true, "source id"); 
  421.   ts->addAttribute('d', &pending->pe.dst, "int", "-1", true, "destination id"); 
  422.   ts->addAttribute('e', &pending->pe.pkt.size, "int", "1", false, "extent"); 
  423.   ts->addAttribute('a', &pending->pe.pkt.attr, "int", "0", false, "attribute"); 
  424.   ts->addAttribute('i', &pending->pe.pkt.id, "int", "0", false, "id"); 
  425.   ts->addAttribute('l', &pending->pe.pkt.energy, "int", "0", false, "energy"); 
  426.   ts->addAttribute('c', &pending->pe.pkt.convid, "string", "", false, "conversation"); 
  427.   ts->addAttribute('x', &pending->pe.pkt, "comment", "{-1 -1 }", false, "comment"); 
  428.   ts->addAttribute('p', &pending->pe.pkt.type, "string", "", false, "packet type"); 
  429.   ts->addAttribute('k', &pending->pe.pkt.wtype, "string", "", false, "packet type"); 
  430.   ts->addAttribute('y', &pending->pe.namgraph_flags, "comment", "{0 0}", false, "");
  431.   ts->addAttribute('S', &pending->pe.namgraph_flags.size, "int", "0", false, "");
  432.   ts->addAttribute('m', &pending->pe.namgraph_flags.size, "int", "0", false, "");
  433.   ts->addAttribute('f', &pending->pe.namgraph_flags.size, "int", "0", false, "");
  435.   // ---- Hop ----
  436.   ts = addTraceSyntax('h', "hop");
  437.   ts->addAttribute('t', &pending->time, "time", "0.0", true, "time"); 
  438.   ts->addAttribute('s', &pending->pe.src, "int", "-1", true, "source id"); 
  439.   ts->addAttribute('d', &pending->pe.dst, "int", "-1", true, "destination id"); 
  440.   ts->addAttribute('e', &pending->pe.pkt.size, "int", "1", false, "extent"); 
  441.   ts->addAttribute('a', &pending->pe.pkt.attr, "int", "0", false, "attribute"); 
  442.   ts->addAttribute('i', &pending->pe.pkt.id, "int", "0", false, "id"); 
  443.   ts->addAttribute('l', &pending->pe.pkt.energy, "int", "0", false, "energy"); 
  444.   ts->addAttribute('c', &pending->pe.pkt.convid, "string", "", false, "conversation"); 
  445.   ts->addAttribute('x', &pending->pe.pkt, "comment", "{-1 -1 }", false, "comment"); 
  446.   ts->addAttribute('p', &pending->pe.pkt.type, "string", "", false, "packet type"); 
  447.   ts->addAttribute('k', &pending->pe.pkt.wtype, "string", "", false, "packet type"); 
  448.   ts->addAttribute('y', &pending->pe.namgraph_flags, "comment", "{0 0}", false, "");
  449.   ts->addAttribute('S', &pending->pe.namgraph_flags.size, "int", "0", false, "");
  450.   ts->addAttribute('m', &pending->pe.namgraph_flags.size, "int", "0", false, "");
  451.   ts->addAttribute('f', &pending->pe.namgraph_flags.size, "int", "0", false, "");
  452.   ts->addAttribute('R', &pending->pe.pkt.wBcastRadius, "double", "0", false, "wireless broadcast radius");
  453.   ts->addAttribute('D', &pending->pe.pkt.wBcastDuration, "double", "0", false, "wireless broadcast duration");
  454.    
  455.   // ---- Receive ----
  456.   ts = addTraceSyntax('r', "receive");
  457.   ts->addAttribute('t', &pending->time, "time", "0.0", true, "time"); 
  458.   ts->addAttribute('s', &pending->pe.src, "int", "-1", true, "source id"); 
  459.   ts->addAttribute('d', &pending->pe.dst, "int", "-1", true, "destination id"); 
  460.   ts->addAttribute('e', &pending->pe.pkt.size, "int", "1", false, "extent"); 
  461.   ts->addAttribute('a', &pending->pe.pkt.attr, "int", "0", false, "attribute"); 
  462.   ts->addAttribute('i', &pending->pe.pkt.id, "int", "0", false, "id"); 
  463.   ts->addAttribute('l', &pending->pe.pkt.energy, "int", "0", false, "energy"); 
  464.   ts->addAttribute('c', &pending->pe.pkt.convid, "string", "", false, "conversation"); 
  465.   ts->addAttribute('x', &pending->pe.pkt, "comment", "{-1 -1 }", false, "comment"); 
  466.   ts->addAttribute('p', &pending->pe.pkt.type, "string", "", false, "packet type"); 
  467.   ts->addAttribute('k', &pending->pe.pkt.wtype, "string", "", false, "packet type"); 
  468.   ts->addAttribute('y', &pending->pe.namgraph_flags, "comment", "{0 0}", false, "");
  469.   ts->addAttribute('S', &pending->pe.namgraph_flags.size, "int", "0", false, "");
  470.   ts->addAttribute('m', &pending->pe.namgraph_flags.size, "int", "0", false, "");
  471.   ts->addAttribute('f', &pending->pe.namgraph_flags.size, "int", "0", false, "");
  472.   ts->addAttribute('R', &pending->pe.pkt.wBcastRadius, "double", "0", false, "wireless broadcast radius");
  473.   ts->addAttribute('D', &pending->pe.pkt.wBcastDuration, "double", "0", false, "wireless broadcast duration");
  474.    
  475.   // ---- Drop Line ----
  476.   ts = addTraceSyntax('d', "drop line");
  477.   ts->addAttribute('t', &pending->time, "time", "0.0", true, "time"); 
  478.   ts->addAttribute('s', &pending->pe.src, "int", "-1", true, "source id"); 
  479.   ts->addAttribute('d', &pending->pe.dst, "int", "-1", true, "destination id"); 
  480.   ts->addAttribute('e', &pending->pe.pkt.size, "int", "1", false, "extent"); 
  481.   ts->addAttribute('a', &pending->pe.pkt.attr, "int", "0", false, "attribute"); 
  482.   ts->addAttribute('i', &pending->pe.pkt.id, "int", "0", false, "id"); 
  483.   ts->addAttribute('l', &pending->pe.pkt.energy, "int", "0", false, "energy"); 
  484.   ts->addAttribute('c', &pending->pe.pkt.convid, "string", "", false, "conversation"); 
  485.   ts->addAttribute('x', &pending->pe.pkt, "comment", "{-1 -1 }", false, "comment"); 
  486.   ts->addAttribute('p', &pending->pe.pkt.type, "string", "", false, "packet type"); 
  487.   ts->addAttribute('k', &pending->pe.pkt.wtype, "string", "", false, "packet type"); 
  488.   ts->addAttribute('y', &pending->pe.namgraph_flags, "comment", "{0 0}", false, "");
  489.   ts->addAttribute('S', &pending->pe.namgraph_flags.size, "int", "0", false, "");
  490.   ts->addAttribute('m', &pending->pe.namgraph_flags.size, "int", "0", false, "");
  491.   ts->addAttribute('f', &pending->pe.namgraph_flags.size, "int", "0", false, "");
  492.    
  493.   // ---- Session Enqueue ----
  494.   ts = addTraceSyntax('E', "session enqueue");
  495.   ts->addAttribute('t', &pending->time, "time", "0.0", true, "time"); 
  496.   ts->addAttribute('s', &pending->pe.src, "int", "-1", true, "source id"); 
  497.   ts->addAttribute('d', &pending->pe.dst, "int", "-1", true, "destination id"); 
  498.   ts->addAttribute('e', &pending->pe.pkt.size, "int", "1", false, "extent"); 
  499.   ts->addAttribute('a', &pending->pe.pkt.attr, "int", "0", false, "attribute"); 
  500.   ts->addAttribute('i', &pending->pe.pkt.id, "int", "0", false, "id"); 
  501.   ts->addAttribute('l', &pending->pe.pkt.energy, "int", "0", false, "energy"); 
  502.   ts->addAttribute('c', &pending->pe.pkt.convid, "string", "", false, "conversation"); 
  503.   ts->addAttribute('x', &pending->pe.pkt, "comment", "{-1 -1 }", false, "comment"); 
  504.   ts->addAttribute('p', &pending->pe.pkt.type, "string", "", false, "packet type"); 
  505.   ts->addAttribute('k', &pending->pe.pkt.wtype, "string", "", false, "packet type"); 
  506.    
  507.   // ---- session dequeue ----
  508.   ts = addTraceSyntax('D', "session dequeue");
  509.   ts->addAttribute('t', &pending->time, "time", "0.0", true, "time"); 
  510.   ts->addAttribute('s', &pending->pe.src, "int", "-1", true, "source id"); 
  511.   ts->addAttribute('d', &pending->pe.dst, "int", "-1", true, "destination id"); 
  512.   ts->addAttribute('e', &pending->pe.pkt.size, "int", "1", false, "extent"); 
  513.   ts->addAttribute('a', &pending->pe.pkt.attr, "int", "0", false, "attribute"); 
  514.   ts->addAttribute('i', &pending->pe.pkt.id, "int", "0", false, "id"); 
  515.   ts->addAttribute('l', &pending->pe.pkt.energy, "int", "0", false, "energy"); 
  516.   ts->addAttribute('c', &pending->pe.pkt.convid, "string", "", false, "conversation"); 
  517.   ts->addAttribute('x', &pending->pe.pkt, "comment", "{-1 -1 }", false, "comment"); 
  518.   ts->addAttribute('p', &pending->pe.pkt.type, "string", "", false, "packet type"); 
  519.   ts->addAttribute('k', &pending->pe.pkt.wtype, "string", "", false, "packet type"); 
  520.    
  521.   // ---- Session Drop ----
  522.   ts = addTraceSyntax('P', "session drop");
  523.   ts->addAttribute('t', &pending->time, "time", "0.0", true, "time"); 
  524.   ts->addAttribute('s', &pending->pe.src, "int", "-1", true, "source id"); 
  525.   ts->addAttribute('d', &pending->pe.dst, "int", "-1", true, "destination id"); 
  526.   ts->addAttribute('e', &pending->pe.pkt.size, "int", "1", false, "extent"); 
  527.   ts->addAttribute('a', &pending->pe.pkt.attr, "int", "0", false, "attribute"); 
  528.   ts->addAttribute('i', &pending->pe.pkt.id, "int", "0", false, "id"); 
  529.   ts->addAttribute('l', &pending->pe.pkt.energy, "int", "0", false, "energy"); 
  530.   ts->addAttribute('c', &pending->pe.pkt.convid, "string", "", false, "conversation"); 
  531.   ts->addAttribute('x', &pending->pe.pkt, "comment", "{-1 -1 }", false, "comment"); 
  532.   ts->addAttribute('p', &pending->pe.pkt.type, "string", "", false, "packet type"); 
  533.   ts->addAttribute('k', &pending->pe.pkt.wtype, "string", "", false, "packet type"); 
  535.   // ---- Agent Event ----
  536.   ts = addTraceSyntax('a', "agent");
  537.   ts->addAttribute('t', &pending->time, "time", "0.0", true, "time"); 
  538.   ts->addAttribute('s', &pending->ae.src, "int", "-1", true, "source id"); 
  539.   ts->addAttribute('d', &pending->ae.dst, "int", "-1", false, "destination id"); 
  540.   ts->addAttribute('x', &pending->ae.agent.expired, "flag", "0", false, "remove agent"); 
  541. //  ts->addAttribute('X', &pending->ae.agent.expired, "flag", "0", false, "remove agent"); 
  542.   ts->addAttribute('n', &pending->ae.agent.name, "string", "", false, "agent name"); 
  543.    
  545.   // ---- Feature ----
  546.   ts = addTraceSyntax('f', "feature");
  547.   ts->addAttribute('t', &pending->time, "time", "0.0", true, "time"); 
  548.   ts->addAttribute('s', &pending->fe.src, "int", "-1", true, "source id"); 
  549.   ts->addAttribute('d', &pending->fe.dst, "int", "-1", false, "destination id"); 
  550.   ts->addAttribute('x', &pending->fe.feature.expired, "flag", "0", false, "remove feature"); 
  551.   ts->addAttribute('T', &pending->fe.feature.type, "char", "", true, "type"); 
  552.   ts->addAttribute('n', &pending->fe.feature.name, "string", "", true, "name"); 
  553.   ts->addAttribute('a', &pending->fe.feature.agent, "string", "", true, "agent"); 
  554.   ts->addAttribute('v', &pending->fe.feature.value, "string", "", true, "value"); 
  555.   ts->addAttribute('o', &pending->fe.feature.oldvalue, "string", "", false, "previous value"); 
  556.   
  557.   // ---- Group ----
  558.   ts = addTraceSyntax('G', "group");
  559.   ts->addAttribute('t', &pending->time, "time", "0.0", true, "time"); 
  560.   ts->addAttribute('n', &pending->ge.grp.name, "string", "", true, "name"); 
  561.   ts->addAttribute('i', &pending->ge.src, "int", "-1", true, "node id"); 
  562.   ts->addAttribute('a', &pending->ge.grp.mbr, "int", "-1", true, "group id"); 
  563.   ts->addAttribute('x', &pending->ge.grp.flag, "flag", "0", false, "remove from group");
  565.   // ---- LanLink ----
  566.   ts = addTraceSyntax('L', "lan link");
  567.   ts->addAttribute('t', &pending->time, "time", "0.0", true, "time"); 
  568.   ts->addAttribute('s', &pending->lle.src, "int", "-1", true, "source id"); 
  569.   ts->addAttribute('d', &pending->lle.dst, "int", "-1", true, "destination id"); 
  570.   ts->addAttribute('o', &pending->lle.angle, "orientation", "0.0", false, "orientation"); 
  571.   ts->addAttribute('O', &pending->lle.angle, "orientation", "0.0", false, "orientation"); 
  573.   // ---- Mark Node ----
  574.   ts = addTraceSyntax('m', "mark node");
  575.   ts->addAttribute('t', &pending->time, "time", "0.0", true, "time"); 
  576.   ts->addAttribute('n', &pending->me.mark.name, "string", "", true, "name"); 
  577.   ts->addAttribute('s', &pending->me.src, "int", "-1", true, "node id"); 
  578.   ts->addAttribute('c', &pending->me.mark.color, "string", "black", false, "color"); 
  579.   ts->addAttribute('h', &pending->me.mark.shape, "string", "circle", false, "shape (circle, square, hexagon)"); 
  580.   ts->addAttribute('X', &pending->me.mark.expired, "flag", "0", false, "remove mark"); 
  581.   
  582.   // ---- Routing Event ----
  583.   ts = addTraceSyntax('R', "routing event");
  584.   ts->addAttribute('t', &pending->time, "time", "0.0", true, "time"); 
  585.   ts->addAttribute('s', &pending->re.src, "int", "-1", true, "source id"); 
  586.   ts->addAttribute('d', &pending->re.dst, "int", "-1", true, "destination id"); 
  587.   ts->addAttribute('g', &pending->re.route.group, "int", "-1", false, "multicast group"); 
  588.   ts->addAttribute('p', &pending->re.route.pktsrc, "packet source", "-1", false, "packet source id or *"); 
  589.   ts->addAttribute('n', &pending->re.route.neg, "flag", "0", false, "negative cache"); 
  590.   ts->addAttribute('x', &pending->re.route.expired, "flag", "0", false, "this route timed out"); 
  591.   ts->addAttribute('T', &pending->re.route.timeout, "double", "0.0", false, "timeout"); 
  592.   ts->addAttribute('m', &pending->re.route.mode, "string", "iif", false, "mode (iif or oif)"); 
  594.   // ---- Execute TCL Expression ----
  595.   ts = addTraceSyntax('v', "execute tcl expression");
  596.   ts->addAttribute('t', &pending->time, "time", "0.0", true, "time"); 
  597.   ts->addAttribute('e', &pending->ve, "tcl expression", "n", true, "tcl script"); 
  598.   // ---- Trace File Version ----
  599.   ts = addTraceSyntax('V', "set trace file version");
  600.   ts->addAttribute('t', &pending->time, "time", "0.0", true, "time"); 
  601.   ts->addAttribute('v', &pending->version, "string", "", true, "time"); 
  602.   ts->addAttribute('a', &pending->dummy, "int", "0", true, "time"); 
  604.   // ---- Use Nam Graph ----
  605.   ts = addTraceSyntax('N', "use nam graph");
  606.   
  607.   // ---- Wireless Range ----
  608.   ts = addTraceSyntax('W', "wireless range");
  609.   ts->addAttribute('t', &pending->time, "time", "0.0", true, "time"); 
  610.   ts->addAttribute('x', &pending->we.x, "int", "100", true, "X"); 
  611.   ts->addAttribute('y', &pending->we.y, "int", "100", true, "Y"); 
  612.   
  613.   // ---- Energy Status (Future Use) ----
  614.   ts = addTraceSyntax('g', "energy status -- for future use");
  615.   ts->addAttribute('t', &pending->time, "time", "0.0", true, "time"); 
  617.   // ---- Hierarchical Address Space Configuration ----
  618.   // initialized in tcl
  619.   ts = addTraceSyntax('A', "hierarchical address space configuration -- initilization only");
  620.   ts->addAttribute('t', &pending->time, "time", "0.0", true, "time"); 
  621.   ts->addAttribute('n', &pending->hae.hierarchy, "int", "0", false, "hierarchy"); 
  622.   ts->addAttribute('p', &pending->hae.portshift, "int", "0", false, "port shift"); 
  623.   ts->addAttribute('o', &pending->hae.portmask, "hex", "0xffffffff", false, "port mask"); 
  624.   ts->addAttribute('c', &pending->hae.multicast_shift, "int", "0", false, "mulitcast shift"); 
  625.   ts->addAttribute('a', &pending->hae.multicast_mask, "int", "0", false, "multicast mask"); 
  626.   ts->addAttribute('h', &pending->hae.hierarchy, "int", "0", false, "hierarchy"); 
  627.   ts->addAttribute('m', &pending->hae.nodeshift, "int", "0", false, "node shift"); 
  628.   ts->addAttribute('s', &pending->hae.nodemask, "int", "0", false, "node mask"); 
  630.   // ---- Color Table Configuration ----
  631.   // initialized in tcl
  632.   ts = addTraceSyntax('c', "color table configuration -- initialization only");
  633.   ts->addAttribute('t', &pending->time, "time", "0.0", true, "time"); 
  634.   ts->addAttribute('i', &pending->ce.id, "int", "1", true, "id"); 
  635.   ts->addAttribute('n', &pending->ce.color, "string", "black", true, "color"); 
  636.   
  637.   // ---- Define Packet Queue ----
  638.   ts = addTraceSyntax('q', "create packet queue -- initialization only");
  639.   ts->addAttribute('t', &pending->time, "time", "0.0", true, "time"); 
  640.   ts->addAttribute('s', &pending->qe.src, "int", "0", true, "source id"); 
  641.   ts->addAttribute('d', &pending->qe.dst, "int", "0", true, "destination id"); 
  642.   ts->addAttribute('a', &pending->qe.angle, "orientation", "0.0", true, "orientaion"); 
  644.   // ---- layout lan ----
  645.   ts = addTraceSyntax('X', "layout lan");
  646.   ts->addAttribute('t', &pending->time, "time", "0.0", true, "time"); 
  647.   ts->addAttribute('n', &pending->layoutle.name, "string", "", true, "name"); 
  648.   ts->addAttribute('r', &pending->layoutle.rate, "double", "10.0", true, "rate"); 
  649.   ts->addAttribute('D', &pending->layoutle.delay, "double", "0.0", true, "delay"); 
  650.   ts->addAttribute('o', &pending->layoutle.angle, "orientation", "0.0", false, "orientation"); 
  651.   ts->addAttribute('O', &pending->layoutle.angle, "orientation", "0.0", false, "orientation"); 
  653. }
  655. //---------------------------------------------------------------------
  656. //
  657. //---------------------------------------------------------------------
  658. int
  659. ParseTable::print(FILE * stream) {
  660.   TraceSyntax *ts;
  661.   Attribute * attribute;
  662.   int i = 0;
  663.   
  664.   ts = syntax_list;
  665.   while (ts) {
  666.     // Output the type
  667.     i += fprintf(stream, "%c = %sn", ts->type, ts->label);
  668.     attribute = ts->attributes;
  669.     while (attribute) {
  670.       i += fprintf(stream, "     -%c <%s> %sn",attribute->flag, attribute->value_type, attribute->label); 
  671.       attribute = attribute->next;
  672.     }
  673.     ts = ts->next;
  674.   }
  676.   return i;
  677. }
  679. //---------------------------------------------------------------------
  680. //
  681. //---------------------------------------------------------------------
  682. int
  683. ParseTable::printLatex(FILE * stream) {
  684.   TraceSyntax *ts;
  685.   Attribute * attribute;
  686.   int i = 0;
  687.   
  688.   ts = syntax_list;
  689.   while (ts) {
  690.     // Output the type
  691.     i += fprintf(stream, "  \begin{tabular}{llll}n");
  692.     if (ts->type == '#') {
  693.       i += fprintf(stream, "  \%c : & %s & & \\n", ts->type, ts->label);
  694.     } else {
  695.       i += fprintf(stream, "  %c : & %s & & \\n", ts->type, ts->label);
  696.     }
  698.     // Display attribute flags in a latex table
  699.     attribute = ts->attributes;
  700.     if (attribute) {
  701.       // 3 Columns
  702.       while (attribute) {
  703.         if (attribute->flag == '#') {
  704.           i += fprintf(stream, "    &  -\%c ", attribute->flag); 
  705.         } else {
  706.           i += fprintf(stream, "    &  -%c ", attribute->flag); 
  707.         }
  708.         i += fprintf(stream, "& <%s> ", attribute->value_type); 
  709.         i += fprintf(stream, "& %s \\n", attribute->label); 
  710.         attribute = attribute->next;
  711.       }
  712.     }
  713.     i += fprintf(stream, "  \end{tabular}nn");
  714.     ts = ts->next;
  715.   }
  716.   return i;
  717. }
  719. //---------------------------------------------------------------------
  720. //
  721. //---------------------------------------------------------------------
  722. bool
  723. ParseTable::parseLine(char * line) {
  724.   bool success = true;
  725.   char * run = line; // run down the nam event line
  726.   TraceSyntax * ts = syntax_list;
  727.   Attribute * attribute = NULL;
  728.   char attribute_type;
  730.   pending->tt = *line;
  732.   // Skip over comment lines and empty lines
  733.   if (*run == '#' || *run == 'n' || *run == 'r') {
  734.     //<zheng: +++>
  735.     if (strncmp(run,"# nam4wpan #",12) == 0) {
  736.       ParseTable::nam4wpan = true;
  737.     }
  738.     //</zheng: +++>
  739.     return true;
  740.   }
  741.   
  742.   // Find Syntax Type
  743.   while (ts != NULL) {
  744.     if (ts->type == *line) {
  745.       break;
  746.     }
  747.     ts = ts->next;
  748.   }
  750.   if (ts != NULL) {
  751.     // Setup Attribute List to default values
  752.     ts->setDefaultAttributeValues();
  754.     // Skip over Syntax Type id
  755.     run++;
  756.     run = eatSpaces(run);
  757.     
  758.     while (*run != 'n') {
  759.     
  760.       //Check for Attribute Flag 
  761.       if (*run != '-' && ts->type != 'v') {
  762.         // Special Case for tcl expression flag
  763.         //   The old design has the syntax "v -t <time> <expression>"
  764.         while (*run != '-' && *run != 'n' && *run != EOF) {
  765.           run++;
  766.         }
  767.       }
  769.       if (*run == 'n' || *run == EOF) {
  770.         // Something is seriously wrong with this line in the script
  771.         // so bail out with an error
  772.         fprintf(stderr, "Unexpected end of line in: %s", line);
  773.         fprintf(stderr, "Perhaps you are missing a value following the attribute flag.n");
  774.         if (attribute) {
  775.           fprintf(stderr, "Last parsed attribute flag was -%cnn", attribute->flag);
  776.         }
  777.         break;
  778.       } else if (*run != '-' && ts->type == 'v') {
  779.         // Missing -e flag
  780.         // Report the new syntax but setup the attribute
  781.         // as if we are using it
  782.         
  783.         fprintf(stderr, "Nam syntax has changed: %s", line);
  784.         fprintf(stderr, "Please use this format in the future.n");
  785.         fprintf(stderr, "v -t <time> -e <tcl expression>nn");
  786.         attribute_type = 'e';
  787.       } else {
  788.         // Eat the dash and set the current attribute
  789.         run++;
  790.         attribute_type = *run;
  791.         run++;
  792.       }
  794.       //Match in Table
  795.       attribute = ts->attributes;
  796.       while (attribute != NULL) {
  797.         if (attribute_type == attribute->flag) {
  798.           break;
  799.         }
  800.         attribute = attribute->next;
  801.       }
  803.       //Read in Value
  804.       if (attribute) {
  805.         // Eat the flag and whitespace, to end on the value
  806.         run = eatSpaces(run);
  807.         run = attribute->parseValue(run, line);
  808.         attribute->seen = true;
  810.       } else {
  811.         fprintf(stderr, "Unknown Flag -%c in: %sn", attribute_type, line);
  812.         // Skip to next attribute
  813.         while (*run != '-' && *run != 'n') {
  814.           run++;
  815.         }
  816.       }
  817.       run = eatSpaces(run);
  818.     }
  820.     // Check for required attributes
  821.     attribute = ts->attributes;
  822.     while (attribute != NULL) {
  823.       if (attribute->required && !attribute->seen) {
  824.         success = false;
  825.         fprintf(stderr, "Missing required flag -%c in: %sn", attribute->flag, line);
  826.       }
  827.       attribute = attribute->next;  
  828.     }
  829.   } else {
  830.     fprintf(stderr, "Unknown nam event id type: %sn", line);
  831.     success = false;
  832.   }
  833.   return success;
  834. }
  836. //---------------------------------------------------------------------
  837. //
  838. //---------------------------------------------------------------------
  839. TraceSyntax * 
  840. ParseTable::addTraceSyntax(char id, char * label) {
  841.   TraceSyntax * ts;
  842.   
  843.   if (!syntax_list) {
  844.     // Create list and add this as the first member
  845.     ts = new TraceSyntax(id, label);
  846.     syntax_list =  ts;
  847.     syntax_list_tail = ts;
  848.   } else {
  849.     // Check for duplicates
  850.     ts = syntax_list;
  851.     while (ts) {
  852.       if (ts->type == id) {
  853.         break;
  854.       }
  855.       ts = ts->next;
  856.     }
  858.     if (!ts) {
  859.       // Add it to the end of the list
  860.       ts = new TraceSyntax(id, label);
  861.       syntax_list_tail->next = ts;
  862.       syntax_list_tail = ts;
  863.     }
  864.   }
  865.   
  866.   return ts;
  867. }
  870. //---------------------------------------------------------------------
  871. //
  872. //---------------------------------------------------------------------
  873. char *
  874. eatSpaces(char * marker) {
  875.   while (*marker == ' ' || *marker == 't') {
  876.     marker++; 
  877.   }
  878.   return marker;
  879. }
  880. //---------------------------------------------------------------------
  881. //
  882. //---------------------------------------------------------------------
  883. char *
  884. advanceToSpace(char * marker) {
  885.   while (!isspace(*marker)) {
  886.     marker++; 
  887.   }
  888.   return marker;
  889. }
  891. //---------------------------------------------------------------------
  892. //
  893. //---------------------------------------------------------------------
  894. char * advanceToNextFlag(char * marker) {
  895.   while (*marker != '-' && *marker != 'n' && *marker != '') {
  896.     marker++;
  897.   }
  898.   return marker;
  899. }
  901. //---------------------------------------------------------------------
  902. //
  903. //---------------------------------------------------------------------
  904. char * advanceToEndofLine(char * marker) {
  905.   while (*marker != 'n' && *marker != '') {
  906.     marker++;
  907.   }
  908.   return marker;
  909. }
  911. //---------------------------------------------------------------------
  912. // char *
  913. // ParseTable::parse_string(char *orig, char * output)
  914. //   - Extracts the string after a flag in a nam animation line.
  915. //   - Removes any double quotes, null terminates the string 
  916. //     and copies it into the output variable.
  917. //   - Returns the location after the extracted string in the original
  918. //     nam animation line.
  919. //   - Requires that the original pointer points to the start of 
  920. //     the string.
  921. //
  922. //   - Strings can be double quoted or have no quotes
  923. //
  924. //     Note: May need to add in r check for Micro$oft Windows
  925. //---------------------------------------------------------------------
  926. char *
  927. extractString(char * original, char * output) {
  928.   char * run; // run along the string
  929.   int count = 0;  // size of the copied string, should be less than MAXNAME
  931.   run = original;
  933.   // Skip over first double quote, if any
  934.   if (*run == '"') {
  935.     run++;
  937.     // Copy over to output
  938.     while (count < MAXNAME &&
  939.            *run != '"' &&
  940.            *run != 'n' &&
  941.            *run != 'r') {
  942.       output[count] = *run;
  943.       run++;
  944.       count++;
  945.     }
  946.   
  947.     // Skip over last double quote, if any
  948.     if (*run == '"') {
  949.       run++;
  950.     }
  952.   } else {
  953.     // Copy over to output
  954.     while (count < MAXNAME &&
  955.            *run != '"' &&
  956.            *run != ' ' &&
  957.            *run != 'n' &&
  958.            *run != 'r') {
  959.       output[count] = *run;
  960.       run++;
  961.       count++;
  962.     }
  963.   }
  965.   // Null Terminate the String
  966.   if (count < MAXNAME) {
  967.     output[count] = '';
  968.     count++;
  969.   } else {
  970.     count--;
  971.     output[count] = '';
  972.   }
  973.       
  974.   return run;
  975. }