telnet.cc

Go to the documentation of this file.
00001 /* -*-  Mode:C++; c-basic-offset:8; tab-width:8; indent-tabs-mode:t -*- */
00002 /*
00003  * Copyright (c) 1997 Regents of the University of California.
00004  * All rights reserved.
00005  *
00006  * Redistribution and use in source and binary forms, with or without
00007  * modification, are permitted provided that the following conditions
00008  * are met:
00009  * 1. Redistributions of source code must retain the above copyright
00010  *    notice, this list of conditions and the following disclaimer.
00011  * 2. Redistributions in binary form must reproduce the above copyright
00012  *    notice, this list of conditions and the following disclaimer in the
00013  *    documentation and/or other materials provided with the distribution.
00014  * 3. All advertising materials mentioning features or use of this software
00015  *    must display the following acknowledgement:
00016  *  This product includes software developed by the Daedalus Research
00017  *  Group at the University of California Berkeley.
00018  * 4. Neither the name of the University nor of the Laboratory may be used
00019  *    to endorse or promote products derived from this software without
00020  *    specific prior written permission.
00021  *
00022  * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
00023  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
00024  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
00025  * ARE DISCLAIMED.  IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
00026  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
00027  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
00028  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
00029  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
00030  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
00031  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
00032  * SUCH DAMAGE.
00033  *
00034  * @(#) $Header: /nfs/jade/vint/CVSROOT/ns-2/apps/telnet.cc,v 1.5 1998/08/14 20:09:33 tomh Exp $
00035  */
00036 
00037 #include "random.h"
00038 #include "tcp.h"
00039 #include "telnet.h"
00040 
00041 extern double tcplib_telnet_interarrival();
00042 
00043 static class TelnetAppClass : public TclClass {
00044  public:
00045     TelnetAppClass() : TclClass("Application/Telnet") {}
00046     TclObject* create(int, const char*const*) {
00047         return (new TelnetApp);
00048     }
00049 } class_app_telnet;
00050 
00051 
00052 TelnetApp::TelnetApp() : running_(0), timer_(this)
00053 {
00054     bind("interval_", &interval_);
00055 }
00056 
00057 
00058 void TelnetAppTimer::expire(Event*)
00059 {
00060         t_->timeout();
00061 }
00062 
00063 
00064 void TelnetApp::start()
00065 {
00066         running_ = 1;
00067     double t = next();
00068     timer_.sched(t);
00069 }
00070 
00071 void TelnetApp::stop()
00072 {
00073         running_ = 0;
00074 }
00075 
00076 void TelnetApp::timeout()
00077 {
00078         if (running_) {
00079             /* call the TCP advance method */
00080         agent_->sendmsg(agent_->size());
00081         /* reschedule the timer */
00082         double t = next();
00083         timer_.resched(t);
00084     }
00085 }
00086 
00087 double TelnetApp::next()
00088 {
00089         if (interval_ == 0)
00090             /* use tcplib */
00091             return tcplib_telnet_interarrival();
00092     else
00093             return Random::exponential() * interval_;
00094 }

Generated on Tue Mar 6 16:47:52 2007 for ns2 Network Simulator 2.29 by  doxygen 1.4.6