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

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

通讯编程

开发平台：

Visual C++

agent.cc：源码内容
  1. /*
  2.  * Copyright (c) 1997 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.  * @(#) $Header: /cvsroot/nsnam/nam-1/agent.cc,v 1.39 2001/08/10 01:45:46 mehringe Exp $ (LBL)
  34.  */
  36. #include <stdlib.h>
  38. #ifdef WIN32
  39. #include <windows.h>
  40. #endif
  42. #include "netview.h"
  43. #include "psview.h"
  44. #include "node.h"
  45. #include "feature.h"
  46. #include "agent.h"
  47. #include "edge.h"
  48. #include "paint.h"
  49. #include "monitor.h"
  50. #include "sincos.h"
  52. static int g_agent_count = 1;  // Used to give unique id's to each agent
  54. //----------------------------------------------------------------------
  55. //  Wrapper for tcl creation of Agents 
  56. //----------------------------------------------------------------------
  57. static class AgentClass : public TclClass {
  58. public:
  59.   AgentClass() : TclClass("Agent") {} 
  61.   TclObject * create(int argc, const char*const* argv) {
  62.     Agent * agent;
  63.     const char * type;
  64.     int id;
  65.     double size;
  67.     type = argv[4];
  68.     id  = strtol(argv[5], NULL, 10);
  69.     size  = strtod(argv[6], NULL);
  71.     agent = new BoxAgent(type, id, size);
  72.     return agent;
  73.   }
  74. } class_agent;
  76. //----------------------------------------------------------------------
  77. //----------------------------------------------------------------------
  78. Agent::Agent(const char * type, int id, double _size) :
  79.   Animation(0, 0) {
  81.   setDefaults();
  82.   size(_size);
  84.   label_ = new char[strlen(type) + 1];
  85.   strcpy(label_, type);
  87.   number_ = id;
  89.   // Make sure new agents will have unique ids
  90.   if (g_agent_count <= id) {
  91.     g_agent_count = id + 1;
  92.   }
  93. }
  95. //----------------------------------------------------------------------
  96. // Agent::Agent(const char* name, double size)
  97. //----------------------------------------------------------------------
  98. Agent::Agent(const char* name, double _size) :
  99.   Animation(0, 0),
  100.   next_(0),
  101.   node_(0),
  102.   x_(0.0),
  103.   y_(0.0),
  104.   features_(NULL),
  105.   edge_(NULL),
  106.   angle_(NO_ANGLE),
  107.   anchor_(0),
  108.   mark_(0),
  109.   color_(0),
  110.   window_(20),
  111.   windowInit_(1),
  112.   maxcwnd_(0),
  113.   packetSize_(210),
  114.   interval_(0.0375),
  115.   tracevar_(0),
  116.   start_(0.0),
  117.   stop_(10.0),
  118.   produce_(0)
  119. {
  120.   size(_size);
  121.   AgentPartner_ = NULL;
  122.   flowcolor_ = NULL;
  123.   flowcolor("black");
  125.   number_ = g_agent_count;
  126.   g_agent_count++;
  127.   traffic_sources_ = NULL;
  128.   label_ = new char[strlen(name) + 1];
  129.   strcpy(label_, name);
  130.   paint_ = Paint::instance()->thin();
  132.   setDefaults();
  133. }
  135. //----------------------------------------------------------------------
  136. //----------------------------------------------------------------------
  137. void
  138. Agent::setDefaults() {
  139.   next_ = NULL;
  140.   node_ = NULL;
  141.   AgentPartner_ = NULL;
  142.   x_ = 0.0;
  143.   y_ = 0.0;
  144.   features_ = NULL;
  145.   edge_ = NULL;
  146.   angle_ = NO_ANGLE;
  147.   anchor_ = 0;
  148.   mark_ = 0;
  149.   color_ = NULL;
  151.   window_ = 20;
  152.   windowInit_ = 1;
  153.   maxcwnd_ = 0;
  154.   packetSize_ = 210;
  155.   interval_ = 0.0375;
  156.   tracevar_ = NULL;
  157.   start_ = 0.0;
  158.   stop_  = 1.0;
  159.   produce_ = 0;
  161.   flowcolor_ = NULL;
  162.   flowcolor("black");
  164.   traffic_sources_ = NULL;
  165.   paint_ = Paint::instance()->thin();
  166.   showLink();
  167. }
  169. float Agent::distance(float x, float y) const {
  170. return ((x_-x)*(x_-x) + (y_-y)*(y_-y));
  171. }
  173. void Agent::color(const char* name)
  174. {
  175.      if (name[0] == 0) {
  176.           if (color_) {
  177.        delete []color_;
  178.        color_ = 0;
  179.   }
  180.   return;
  181.      }
  183.      if (color_)
  184.        delete []color_;
  185.      color_ = new char[strlen(name) + 1];
  186.      strcpy(color_, name);
  187. }
  189. void Agent::size(double s)
  190. {
  191. size_ = s;
  192.   width_ = s;
  193.   height_ = s;
  194. update_bb();
  195. }
  197. void Agent::update_bb() {
  198. double off = 0.5 * size_;
  199. /*XXX*/
  200. bb_.xmin = x_ - off;
  201. bb_.ymin = y_ - off;
  202. bb_.xmax = x_ + off;
  203. bb_.ymax = y_ + off;
  204. }
  206. //----------------------------------------------------------------------
  207. // TrafficSource * 
  208. // TrafficSource::addTrafficSource(TrafficSource * ts)
  209. //   - Add traffic source to the trafficsources_ list
  210. //   - Returns the traffic source before the one just added
  211. //----------------------------------------------------------------------
  212. TrafficSource * 
  213. Agent::addTrafficSource(TrafficSource * ts) {
  214.   TrafficSource * run, * last;
  216.   run = traffic_sources_;
  217.   last = NULL;
  219.   // Find last traffic source on list
  220.   while (run) {
  221.     last = run;
  222.     run = run->next_;
  223.   }
  225.   // if it exists then add it to the list
  226.   if (last) {
  227.     last->next_ = ts;
  228.   } else {
  229.     traffic_sources_ = ts;
  230.   }  
  231.   return last;
  232. }
  234. //----------------------------------------------------------------------
  235. // TrafficSource *
  236. // Agent::removeTrafficSource(TrafficSource * ts) {
  237. //----------------------------------------------------------------------
  238. TrafficSource *
  239. Agent::removeTrafficSource(TrafficSource * ts) {
  240.   // ts->previous_ should be NULL for the first traffic source
  241.   // attached to this agent
  242.   if (ts->previous_) {
  243.     ts->previous_->next_ = ts->next_;
  244.   } else {
  245.     // I am the first traffic source so
  246.     // make agent point to my next_
  247.     traffic_sources_ = ts->next_;
  248.   }
  250.   if (ts->next_) {
  251.     ts->next_->previous_ = ts->previous_;
  252.   }
  254.   return ts;
  255. }
  257. void Agent::add_feature(Feature* f) {
  258.        f->next_ = features_;
  259.        features_ = f;
  260. }
  262. Feature *Agent::find_feature(char *name) const
  263. {
  264.   /*given a feature, remove it from an agent's feature list*/
  265.   Feature *ft;
  266.   ft=features_;
  267.   while (ft!=NULL)
  268.     {
  269.       if (strcmp(ft->name(), name)==0)
  270. return ft;
  271.       ft=ft->next();
  272.     }
  273.   return NULL;
  274. }
  275.  
  277.  
  278. void Agent::delete_feature(Feature* r)
  279. {
  280.   /*given a feature, remove it from an agent's feature list*/
  281.   Feature *f1, *f2;
  282.   f1=features_;
  283.   f2=features_;
  284.   while ((f1!=r)&&(f1!=NULL))
  285.     {
  286.       f2=f1;
  287.       f1=f1->next();
  288.     }
  289.   if (f1==r)
  290.     {
  291.       f2->next(f1->next());
  292.       if (f1==features_)
  293. features_=f1->next();
  294.     }
  295. }
  296.  
  298.  
  299. void Agent::label(const char* name, int anchor)
  300. {
  301. delete label_;
  302. label_ = new char[strlen(name) + 1];
  303. strcpy(label_, name);
  304. anchor_ = anchor;
  305. }
  307. void Agent::drawlabel(View* nv) const
  308. {
  309. /*XXX node number */
  310. if (label_ != 0)
  311. nv->string(x_, y_, size_, label_, anchor_);
  312. }
  313. /*
  314. void Agent::drawlabel(PSView* nv) const
  315. {
  316. if (label_ != 0)
  317. nv->string(x_, y_, size_, label_, anchor_);
  318. }
  319. */
  321. //----------------------------------------------------------------------
  322. // void
  323. // Agent::flowcolor(const char* color)
  324. //----------------------------------------------------------------------
  325. void
  326. Agent::flowcolor(const char* color) {
  327.  if (color[0] == 0) {
  328.    if (flowcolor_) {
  329.      delete []flowcolor_;
  330.      flowcolor_ = 0;
  331.    }
  332.    return;
  333.  }
  334.        
  335.  if (flowcolor_)
  336.    delete []flowcolor_;
  338.  flowcolor_ = new char[strlen(color) + 1];
  339.  strcpy(flowcolor_, color);
  340. }
  342. void Agent::tracevar(const char* var)
  343. {
  344.         if (var[0] == 0) {
  345.        if (tracevar_) {
  346.               delete []tracevar_;
  347.       tracevar_ = 0;
  348.        }
  349.        return;
  350. }
  352.         if (tracevar_)    delete []tracevar_;
  353. tracevar_ = new char[strlen(var) + 1];
  354. strcpy(tracevar_, var);
  355. }
  357. void Agent::reset(double)
  358. {
  359. paint_ = Paint::instance()->thick();
  360. }
  363. void Agent::place(double x, double y) { 
  364. x_ = x;
  365. y_ = y;
  366. mark_ = 1;
  367. update_bb();
  368. }
  370. const char* Agent::info() const {
  371.   static char text[128];
  373.   if(AgentPartner_!=NULL) {
  374.     sprintf(text, "Agent %s-%dnConnected to: %s on Node %d",
  375.                    name(), number(),
  376.                    AgentPartner_->name(),
  377.                    AgentPartner_->node_->num());
  378.   } else {
  379.     sprintf(text, "Agent: %s", label_);
  380.   }
  381.   return (text);
  382. }
  384. const char* Agent::getname() const
  385. {
  386.   static char text[128];
  387.   sprintf(text, "a %s", label_);
  388.   return (text);
  389. }
  391. void Agent::monitor(Monitor *m, double now, char *result, int len)
  392. {
  393.   char buf[256];
  394.   Feature *f;
  395.   monitor_=m;
  396.   sprintf(result, "Agent: %s", label_);
  397.   for(f=features_;f!=NULL;f=f->next()) {
  398.     strcat(result, "n");
  399.     f->monitor(now, buf, 255);
  400.     if (strlen(result)+strlen(buf)<(unsigned int)len)
  401.       strcat(result, buf);
  402.     else {
  403.       fprintf(stderr, "not enough space for monitor return stringn");
  404.       return;
  405.     }
  406.   }
  407. }
  409. //----------------------------------------------------------------------
  410. // BoxAgent::BoxAgent(const char * type, int id, double size);
  411. //----------------------------------------------------------------------
  412. BoxAgent::BoxAgent(const char * type, int id, double size) :
  413.   Agent(type,id,size) {
  414.   BoxAgent::size(size);
  415. }
  417. //----------------------------------------------------------------------
  418. // BoxAgent::BoxAgent(const char* name, double size)
  419. //----------------------------------------------------------------------
  420. BoxAgent::BoxAgent(const char* name, double size) :
  421.   Agent(name, size) {
  422.   BoxAgent::size(size);
  423. }
  425. //----------------------------------------------------------------------
  426. // void
  427. // BoxAgent::size(double s)
  428. //----------------------------------------------------------------------
  429. void
  430. BoxAgent::size(double s) {
  431. //  double delta = 0.5 * s;
  432.   
  433.   // Set size_ to s
  434.   Agent::size(s);
  436.  // x0_ = x_ - delta;
  437.  // y0_ = y_ - delta;
  438.  // x1_ = x_ + delta;
  439.  // y1_ = y_ + delta;
  440.  
  441.   x0_ = x_;
  442.   y0_ = y_;
  443. //  x1_ = x_ + s;
  444. //  y1_ = y_ + s*0.5;
  445.   width_ = s;
  446.   height_ = s*0.5;
  448.  update_bb();
  449. }
  451. void BoxAgent::update_bb() {
  452. bb_.xmin = x0_;
  453. bb_.ymin = y0_;
  454. bb_.xmax = x0_ + width_;
  455. bb_.ymax = y0_ + height_;
  456. }
  458. //----------------------------------------------------------------------
  459. //----------------------------------------------------------------------
  460. void 
  461. BoxAgent::findClosestCornertoPoint(double x, double y, double &corner_x,
  462.                                    double &corner_y) const {
  463.   double distance_0, distance_1;
  464.   // Calculate the difference
  465.   distance_0 = x0_ - x;
  466.   distance_1 = x0_ + width_ - x;
  468.   //We only want the magnitude
  469.   if (distance_0 < 0) {
  470.     distance_0 = -distance_0;
  471.   }
  472.   if (distance_1 < 0) {
  473.     distance_1 = -distance_1;
  474.   }
  475.   if (distance_0 < distance_1) {
  476.     corner_x = x0_;
  477.   } else {
  478.     corner_x = x0_ + width_;
  479.   }
  481.   // Do the same for the y values
  482.   distance_0 = y0_ - y;
  483.   distance_1 = y0_ + height_ - y;
  484.   if (distance_0 < 0) {
  485.     distance_0 = -distance_0;
  486.   }
  487.   if (distance_1 < 0) {
  488.     distance_1 = -distance_1;
  489.   }
  490.   if (distance_0 < distance_1) {
  491.     corner_y = y0_;
  492.   } else {
  493.     corner_y = y0_ + height_;
  494.   }
  495. }
  497. //----------------------------------------------------------------------
  498. //----------------------------------------------------------------------
  499. int 
  500. BoxAgent::inside(double, float px, float py) const {
  501. return (px >= x0_ && px <= (x0_ + width_) &&
  502.       py >= y0_ && py <= (y0_ + height_));
  503. }
  505. //----------------------------------------------------------------------
  506. // void 
  507. // BoxAgent::draw(View* nv, double ) const
  508. //   - Draw the agent label with a rectangle around it
  509. //   - Also draw monitors associated with it
  510. //----------------------------------------------------------------------
  511. void 
  512. BoxAgent::draw(View* nv, double time) {
  513.   double corner_x, corner_y, partner_corner_x, partner_corner_y;
  514.   double label_width, label_height, label_x, label_y;
  515.   char full_label[128];
  517.   // Draw line connecting this to its partner
  518.   if (AgentPartner_) {
  519.     if (draw_link_) {
  520.       AgentPartner_->findClosestCornertoPoint(x(), y(), 
  521.                                         partner_corner_x, partner_corner_y);
  523.       findClosestCornertoPoint(partner_corner_x, partner_corner_y,
  524.                                corner_x, corner_y);
  525.       nv->line(corner_x, corner_y, 
  526.                partner_corner_x, partner_corner_y,
  527.                paint_);
  528.     }
  529.   }
  530.     
  531.         
  532.   // Draw the label if it exists
  533.   if (label_ != 0) {
  534.     // Exapnd label to show partner id if connected
  535.     if (AgentPartner_) {
  536.       if (AgentRole_ == SOURCE) {
  537.         sprintf(full_label, "%s - %d", label_, number_);
  538.       } else {
  539.         sprintf(full_label, "%s - %d", label_, AgentPartner_->number());
  540.       }
  542.     } else {
  543.       sprintf(full_label, "%s", label_);
  544.     }
  546.     // We have to keep calculting the label width and height because
  547.     // we have no way of knowing if the user has zoomed in or out 
  548.     // on the current network view.
  549.     label_height = 0.9 * height_;
  550.     label_width = nv->getStringWidth(full_label, label_height);
  552.     // Add 10% of padding to width for the box
  553.     setWidth(1.1 * label_width);
  555.     place(x_,y_);
  556.     
  557.     // Center label in box
  558.     label_x = x0_ + (width_ - label_width);
  559.     label_y = y0_ + (height_ - label_height);
  561.     nv->string(full_label, label_x , label_y, label_height, NULL);
  562.     
  563.     update_bb();
  564.   }
  565.   
  566.   // Draw the rectangle 
  567.   nv->rect(x0_, y0_, x0_ + width_, y0_ + height_, paint_);
  569.   if (monitor_ != NULL) {
  570.     monitor_->draw(nv, (x0_ + x0_ + width_)/2, y0_ - height_);
  571.   }
  572. }
  575. /*
  576. void BoxAgent::draw(PSView* nv, double ) const
  577. {
  578.   nv->rect(x0_, y1_, x1_, y0_, paint_);
  579.   if (label_ != 0)
  580.     {
  581.       nv->string((x0_+x1_)/2, (y0_+y1_)/2, size_*0.75, label_, ANCHOR_CENTER);
  582.     }
  583. }
  584. */
  586. //----------------------------------------------------------------------
  587. // void 
  588. // BoxAgent::place(double x, double y) {
  589. //----------------------------------------------------------------------
  590. void 
  591. BoxAgent::place(double x, double y) {
  592.   double nsin, ncos;
  593.   Agent::place(x, y);  // Save original x,y values
  594.   SINCOSPI(angle_, &nsin, &ncos);
  596.   /*XXX should really use the X-display width*/
  597.   //width_ = strlen(label_)/2;
  598.   //width_ = strlen(label_) * 2.0;
  599.   
  600.   // on solaris, sin(M_PI) != 0 !!!
  601.   
  602.   // angle_ equals 0 or M_PI
  603.   if ((nsin < 1.0e-8) && (nsin > -1.0e-9)) {
  604.     y0_ = y_ - 0.5 * height_;
  605.     //y_ = y0_;
  606.   
  607.   // angle is in the first 2 quadrants
  608.   // i.e. between 0 and M_PI
  609.   } else if (nsin > 0) {
  610.     y0_ = y_;
  611.    
  612.   // angle_ is greater than M_PI but less than 2M_PI
  613.   } else {
  614.     // Move down twice as far to make room for traffic source labels
  615.     y0_ = y_ - 2*height_;
  616.     //y_ = y0_;
  617.   }
  619.   // angle equals M_PI/2 or 3M_PI/2 
  620.   if ((ncos < 1.0e-8) && (ncos > -1.0e-9)) {
  621.     x0_ = x_ - width_;
  622.     //x_ = x0_;
  624.   // angle is in 1st or 4th quadrant
  625.   } else if (ncos > 0) {
  626.     x0_ = x_;
  627.   
  628.   //  angle is in 2nd or 3rd quadrant
  629.   //  i.e. between M_PI/2 and 3M_PI/2
  630.   } else {
  631.     x0_ = x_ - width_;
  632.     //x_ = x0_;
  633.   }
  635.   update_bb();
  636. }
  639. //----------------------------------------------------------------------
  640. // int
  641. // Agent::writeNsDefinitionScript(FILE *file)
  642. //----------------------------------------------------------------------
  643. int
  644. Agent::writeNsDefinitionScript(FILE *file) {
  645.   TrafficSource * ts;
  647.   // Create agent definition
  648.   fprintf(file, "set agent(%d) [new Agent/%s]n", number_, label_);
  649.   // Attach it to it's parent node
  650.   fprintf(file, "$ns attach-agent $node(%d) $agent(%d)n",
  651.                 node_->num(), number_);
  653.   if (AgentRole_ == SOURCE) {
  654.     // Set flow color for agent
  655.     fprintf(file, "n$ns color %d "%s"n", number_, flowcolor_);
  656.     // flow id
  657.     fprintf(file, "$agent(%d) set fid_ %dn", number_, number_);
  658.     // Packet Size
  659.     fprintf(file, "$agent(%d) set packetSize_ %dn", number_, packetSize_);
  661.     if (strcmp(name(), "TCP") == 0) { 
  662.       // Maximum window size
  663.       fprintf(file, "$agent(%d) set window_ %dn", number_, window_);
  664.       // Initial reset of cwnd
  665.       fprintf(file, "$agent(%d) set windowInit_ %dn", number_, windowInit_);
  666.       fprintf(file, "$agent(%d) set maxcwnd_ %dn", number_, maxcwnd_);
  667.       if (tracevar_) {
  668.         if ((strcmp(tracevar_, "cwnd_") == 0) || 
  669.             (strcmp(tracevar_, "ssthresh_") == 0)) {
  670.           fprintf(file, "$ns add-agent-trace $agent(%d) tcpn", number_);
  671.           fprintf(file, "$ns monitor-agent-trace $agent(%d)n", number_);
  672.           fprintf(file, "$agent(%d) set tracevar_ %sn", number_, tracevar_);
  673.         }
  674.       }
  675.     } else if (strcmp(name(), "TCP/Reno") == 0) { 
  676.     } else if (strcmp(name(), "TCP/NewReno") == 0) { 
  677.     } else if (strcmp(name(), "TCP/Vegas") == 0) { 
  678.     } else if (strcmp(name(), "TCP/Sack1") == 0) { 
  679.     } else if (strcmp(name(), "TCP/Fack") == 0) { 
  680.     } else if (strcmp(name(), "UDP") == 0) { 
  682.     }
  683.   } else if (AgentRole_ == DESTINATION) {
  684.     // We have a sink
  685.     if (strcmp(name(), "TCPSink") == 0) { 
  686.       fprintf(file, "$agent(%d) set packetSize_ %dn", number_, packetSize_);
  687.     } else if (strcmp(name(), "TCPSink/DelAck") == 0) { 
  688.       fprintf(file, "$agent(%d) set packetSize_ %dn", number_, packetSize_);
  689.       fprintf(file, "$agent(%d) set interval_ %fn", number_, interval_);
  690.     } else if (strcmp(name(), "TCPSink/Sack1") == 0) {
  691.      // Ask about this one look at ns doc 29.2.3 for proper 
  692.      // syntax
  693.     }
  694.     // if it is NULL or anything else do nothing
  695.   }
  697.   
  698.    /*
  699.   // CBR source agents
  700.     } else if (strcmp(name(), "CBR")==0) {
  701.       fprintf(file, "n$ns color %d "%s"n",number_, flowcolor_);
  702.       fprintf(file, "set agent%d [new Agent/%s]n", number_, label_);
  703.       fprintf(file, "$ns attach-agent $n(%d) $agent%d n", node_->num(), number_);
  704.       fprintf(file, "$agent%d set fid_ %dn", number_, number_);
  705.       fprintf(file, "$agent%d set packetSize_ %dn", number_, packetSize_);
  706.       fprintf(file, "$agent%d set interval_ %fn", number_, interval_);
  708.   } else if (AgentRole_ == DESTINATION) {
  709.     // TCP/Full destination agents 
  710.     } else if (strcmp(name(), "TCP/FullTcp") == 0){
  711.       fprintf(file, "nset agent%d [new Agent/%s]n", number_, label_);
  712.       fprintf(file, "$ns attach-agent $node(%d) $agent%d n", node_->num(), number_);
  713.       fprintf(file, "$agent%d listenn", number_);
  715.     // all destination agents (NULL)
  716.     } else {
  717.       fprintf(file, "nset agent%d [new Agent/%s]n", number_, label_);
  718.       fprintf(file, "$ns attach-agent $node(%d) $agent%dn", node_->num(), number_);
  719.     }
  720.   }
  721. */
  722.   if (traffic_sources_) {
  723.       // # Create a CBR traffic source and attach it to udp0
  724.       // set cbr0 [new Application/Traffic/CBR]
  725.       // $cbr0 set packetSize_ 500
  726.       // $cbr0 set interval_ 0.005
  727.       // $cbr0 attach-agent $udp0
  728.     fprintf(file, "n# Create traffic sources and add them to the agent.n");
  729.     for (ts = traffic_sources_; ts; ts = ts->next_) {
  730.       ts->writeNsDefinitionScript(file);
  731.     }
  732.   }
  734.   return 0;
  735. }
  737. //----------------------------------------------------------------------
  738. // int
  739. // Agent::writeNsConnectionScript(FILE * file)
  740. //----------------------------------------------------------------------
  741. int
  742. Agent::writeNsConnectionScript(FILE * file) {
  743.   TrafficSource * ts;
  745.   if (AgentRole_ == SOURCE) {
  746.     fprintf(file, "$ns connect $agent(%d) $agent(%d)nn", 
  747.                   number_, AgentPartner_->number_);
  749.     fprintf(file, "n# Traffic Source actions.n");
  750.     for (ts = traffic_sources_; ts; ts = ts->next_) {
  751.       ts->writeNsActionScript(file);
  752.     }
  753.   }
  754.   return 0;
  755. }
  757. //----------------------------------------------------------------------
  758. //
  759. //----------------------------------------------------------------------
  760. int Agent::saveAsEnam(FILE *file) {
  761.   if ((AgentRole_ == 10)&&(strcmp(name(), "CBR")!=0)) {
  762.     if (AgentPartner_ != NULL) 
  763.       fprintf(file, "##g -t * -l %s -r %d -s %d -c %s -i %d -w %d -m %d -t %s -b %f -p %d -o %f -n %d -u %dn",
  764.           label_, AgentRole_, node_->num(), flowcolor_, windowInit_, window_, 
  765.           maxcwnd_, tracevar_, start_, produce_, stop_, number_, 
  766.           AgentPartner_->number_);
  767.     else 
  768.       fprintf(file, "##g -t * -l %s -r %d -s %d -c %s -i %d -w %d -m %d -t %s -b %f -p %d -o %f -n %dn",
  769.           label_, AgentRole_, node_->num(), flowcolor_, windowInit_, window_,
  770.           maxcwnd_, tracevar_, start_, produce_, stop_, number_);
  773.   } else if (((AgentRole_ == SOURCE) || 
  774.               (AgentRole_ == 10)) &&
  775.              (strcmp(name(), "CBR")==0)) {
  776.     if (AgentPartner_ != NULL)
  777.       fprintf(file, "##g -t * -l %s -r %d -s %d -c %s -k %d -v %f -b %f -o %f -n %d -u %d n",
  778.            label_, AgentRole_, node_->num(), flowcolor_, packetSize_, 
  779.            interval_, start_, stop_, number_, AgentPartner_->number_);
  780.     else 
  781.       fprintf(file, "##g -t * -l %s -r %d -s %d -c %s -k %d -v %f -b %f -o %f -n %dn",
  782.            label_, AgentRole_, node_->num(), flowcolor_, packetSize_,
  783.            interval_, start_, stop_, number_);
  785.   } else {
  786.     if (AgentPartner_ != NULL)
  787.       fprintf(file, "##g -t * -l %s -r %d -s %d -n %d -u %d n",
  788.                     label_, AgentRole_, node_->num(), number_,
  789.                     AgentPartner_->number_);
  790.     else 
  791.       fprintf(file, "##g -t * -l %s -r %d -s %d -n %dn",
  792.                     label_, AgentRole_, node_->num(), number_);
  793.   }
  794.   return(0);
  795. }
  797. //----------------------------------------------------------------------
  798. //----------------------------------------------------------------------
  799. const char* Agent::property() {
  800.   rgb *color;
  801.   color=Paint::instance()->paint_to_rgb(paint_);
  803.   static char text[256];
  804.   char * p;
  806.   // Header
  807.   p = text;
  808.   sprintf(text, "{"Agent: %s-%d" title title "Agent %d"} ",
  809.                 name(), number_, number_);
  811.   if (AgentRole_ == SOURCE) {
  812.     p = &text[strlen(text)];
  813.     sprintf(p, "{"Flow Color" flowcolor_ color %s} ", flowcolor_);
  814.     p = &text[strlen(text)];
  815.     sprintf(p, "{"Packet Size" packetSize_ text %d} ", packetSize_);
  816.     
  817.     //TCP source agents
  818.     if (strcmp(name(), "TCP") == 0) {
  819.       p = &text[strlen(text)];
  820.       sprintf(p, "{"Initial Window Size" windowInit_ text %d} ", windowInit_);
  821.       p = &text[strlen(text)];
  822.       sprintf(p, "{"Window" window_ text %d} ", window_); 
  823.       p = &text[strlen(text)];
  824.       sprintf(p, "{"Max Cwnd" maxcwnd_ text %d} ", maxcwnd_);
  825.     } 
  827.   } else if (AgentRole_ == DESTINATION) {
  828.     p = &text[strlen(text)];
  829.     sprintf(p, "{"Partner" partner_number text %d} ", AgentPartner_->num());
  830.   } else {
  831.     p = &text[strlen(text)];
  832.     sprintf(p, "{"To edit this agent's properties connect agent to it's partner." partner_number label  }");
  833.   }
  835.   return(text);
  836. }