tcp-simple.cc
上传用户:rrhhcc
上传日期:2015-12-11
资源大小:54129k
文件大小:4k
源码类别:

通讯编程

开发平台:

Visual C++

  1. /*
  2.  * Copyright (c) Xerox Corporation 1998. All rights reserved.
  3.  *
  4.  * This program is free software; you can redistribute it and/or modify it
  5.  * under the terms of the GNU General Public License as published by the
  6.  * Free Software Foundation; either version 2 of the License, or (at your
  7.  * option) any later version.
  8.  *
  9.  * This program is distributed in the hope that it will be useful, but
  10.  * WITHOUT ANY WARRANTY; without even the implied warranty of
  11.  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
  12.  * General Public License for more details.
  13.  *
  14.  * You should have received a copy of the GNU General Public License along
  15.  * with this program; if not, write to the Free Software Foundation, Inc.,
  16.  * 51 Franklin St, Fifth Floor, Boston, MA  02110-1301  USA
  17.  *
  18.  * Linking this file statically or dynamically with other modules is making
  19.  * a combined work based on this file.  Thus, the terms and conditions of
  20.  * the GNU General Public License cover the whole combination.
  21.  *
  22.  * In addition, as a special exception, the copyright holders of this file
  23.  * give you permission to combine this file with free software programs or
  24.  * libraries that are released under the GNU LGPL and with code included in
  25.  * the standard release of ns-2 under the Apache 2.0 license or under
  26.  * otherwise-compatible licenses with advertising requirements (or modified
  27.  * versions of such code, with unchanged license).  You may copy and
  28.  * distribute such a system following the terms of the GNU GPL for this
  29.  * file and the licenses of the other code concerned, provided that you
  30.  * include the source code of that other code when and as the GNU GPL
  31.  * requires distribution of source code.
  32.  *
  33.  * Note that people who make modified versions of this file are not
  34.  * obligated to grant this special exception for their modified versions;
  35.  * it is their choice whether to do so.  The GNU General Public License
  36.  * gives permission to release a modified version without this exception;
  37.  * this exception also makes it possible to release a modified version
  38.  * which carries forward this exception.
  39.  *
  40.  * $Header: /cvsroot/nsnam/ns-2/webcache/tcp-simple.cc,v 1.10 2005/08/26 05:05:31 tomh Exp $
  41.  *
  42.  */
  43. //
  44. // SimpleTcp: Only share the same interface as FullTcp.
  45. // It's inherited from FullTcp solely for interface reason... :(
  46. //
  47. // If we have interface declaration independent from class type definition,
  48. // we'll be better off.
  49. //
  50. #include <stdlib.h>
  51. #include "tclcl.h"
  52. #include "packet.h"
  53. #include "ip.h"
  54. #include "app.h"
  55. #include "tcp-simple.h"
  56. static class SimpleTcpClass : public TclClass {
  57. public:
  58. SimpleTcpClass() : TclClass("Agent/TCP/SimpleTcp") {}
  59. TclObject* create(int, const char*const*) {
  60. return (new SimpleTcpAgent());
  61. }
  62. } class_simple_tcp_agent;
  63. SimpleTcpAgent::SimpleTcpAgent() : TcpAgent(), seqno_(0)
  64. {
  65. }
  66. // XXX Do *NOT* support infinite send of TCP (bytes == -1).
  67. void SimpleTcpAgent::sendmsg(int bytes, const char* /*flags*/)
  68. {
  69. if (bytes == -1) {
  70. fprintf(stderr, 
  71. "SimpleTcp doesn't support infinite send. Do not use FTP::start(), etc.n");
  72. return;
  73. }
  74. // Simply sending out bytes out to target_
  75. curseq_ += bytes;
  76. seqno_ ++;
  77. Packet *p = allocpkt();
  78. hdr_tcp *tcph = HDR_TCP(p);
  79. tcph->seqno() = seqno_;
  80. tcph->ts() = Scheduler::instance().clock();
  81. tcph->ts_echo() = ts_peer_;
  82.         hdr_cmn *th = HDR_CMN(p);
  83. th->size() = bytes + tcpip_base_hdr_size_;
  84. send(p, 0);
  85. }
  86. void SimpleTcpAgent::recv(Packet *pkt, Handler *)
  87. {
  88.         hdr_cmn *th = HDR_CMN(pkt);
  89. int datalen = th->size() - tcpip_base_hdr_size_;
  90. if (app_)
  91. app_->recv(datalen);
  92. // No lastbyte_ callback, because no packet fragmentation.
  93. Packet::free(pkt);
  94. }
  95. int SimpleTcpAgent::command(int argc, const char*const* argv)
  96. {
  97. // Copy FullTcp's tcl interface
  98. if (argc == 2) {
  99. if (strcmp(argv[1], "listen") == 0) {
  100. // Do nothing
  101. return (TCL_OK);
  102. }
  103. if (strcmp(argv[1], "close") == 0) {
  104. // Call done{} to match tcp-full's syntax
  105. Tcl::instance().evalf("%s done", name());
  106. return (TCL_OK);
  107. }
  108. }
  109. return (TcpAgent::command(argc, argv));
  110. }