samples/main-channel.cc
author Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
Tue, 28 Aug 2007 13:14:43 +0200
changeset 1380 799617173a45
parent 337 42102ed8ee3c
child 1504 36ecc970ba96
permissions -rw-r--r--
api doxygen for Object base class
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
299
dd6d1a6d6eff strawman connectors and channel
owner@UPSTAIRS.Belkin
parents:
diff changeset
     1
/* -*- Mode:C++; c-file-style:"gnu"; indent-tabs-mode:nil; -*- */
dd6d1a6d6eff strawman connectors and channel
owner@UPSTAIRS.Belkin
parents:
diff changeset
     2
/*
dd6d1a6d6eff strawman connectors and channel
owner@UPSTAIRS.Belkin
parents:
diff changeset
     3
 * Copyright (c) 2007 University of Washington
dd6d1a6d6eff strawman connectors and channel
owner@UPSTAIRS.Belkin
parents:
diff changeset
     4
 * All rights reserved.
dd6d1a6d6eff strawman connectors and channel
owner@UPSTAIRS.Belkin
parents:
diff changeset
     5
 *
dd6d1a6d6eff strawman connectors and channel
owner@UPSTAIRS.Belkin
parents:
diff changeset
     6
 * This program is free software; you can redistribute it and/or modify
dd6d1a6d6eff strawman connectors and channel
owner@UPSTAIRS.Belkin
parents:
diff changeset
     7
 * it under the terms of the GNU General Public License version 2 as
dd6d1a6d6eff strawman connectors and channel
owner@UPSTAIRS.Belkin
parents:
diff changeset
     8
 * published by the Free Software Foundation;
dd6d1a6d6eff strawman connectors and channel
owner@UPSTAIRS.Belkin
parents:
diff changeset
     9
 *
dd6d1a6d6eff strawman connectors and channel
owner@UPSTAIRS.Belkin
parents:
diff changeset
    10
 * This program is distributed in the hope that it will be useful,
dd6d1a6d6eff strawman connectors and channel
owner@UPSTAIRS.Belkin
parents:
diff changeset
    11
 * but WITHOUT ANY WARRANTY; without even the implied warranty of
dd6d1a6d6eff strawman connectors and channel
owner@UPSTAIRS.Belkin
parents:
diff changeset
    12
 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
dd6d1a6d6eff strawman connectors and channel
owner@UPSTAIRS.Belkin
parents:
diff changeset
    13
 * GNU General Public License for more details.
dd6d1a6d6eff strawman connectors and channel
owner@UPSTAIRS.Belkin
parents:
diff changeset
    14
 *
dd6d1a6d6eff strawman connectors and channel
owner@UPSTAIRS.Belkin
parents:
diff changeset
    15
 * You should have received a copy of the GNU General Public License
dd6d1a6d6eff strawman connectors and channel
owner@UPSTAIRS.Belkin
parents:
diff changeset
    16
 * along with this program; if not, write to the Free Software
dd6d1a6d6eff strawman connectors and channel
owner@UPSTAIRS.Belkin
parents:
diff changeset
    17
 * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
dd6d1a6d6eff strawman connectors and channel
owner@UPSTAIRS.Belkin
parents:
diff changeset
    18
 */
dd6d1a6d6eff strawman connectors and channel
owner@UPSTAIRS.Belkin
parents:
diff changeset
    19
dd6d1a6d6eff strawman connectors and channel
owner@UPSTAIRS.Belkin
parents:
diff changeset
    20
#include <string>
dd6d1a6d6eff strawman connectors and channel
owner@UPSTAIRS.Belkin
parents:
diff changeset
    21
#include "ns3/debug.h"
304
d8c9790ff263 use new NS_ASSERT macro rather than assert. this makes the code build on my machine.
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents: 300
diff changeset
    22
#include "ns3/assert.h"
299
dd6d1a6d6eff strawman connectors and channel
owner@UPSTAIRS.Belkin
parents:
diff changeset
    23
#include "ns3/packet.h"
dd6d1a6d6eff strawman connectors and channel
owner@UPSTAIRS.Belkin
parents:
diff changeset
    24
#include "ns3/drop-tail.h"
dd6d1a6d6eff strawman connectors and channel
owner@UPSTAIRS.Belkin
parents:
diff changeset
    25
#include "ns3/layer-connector.h"
dd6d1a6d6eff strawman connectors and channel
owner@UPSTAIRS.Belkin
parents:
diff changeset
    26
#include "ns3/channel.h"
dd6d1a6d6eff strawman connectors and channel
owner@UPSTAIRS.Belkin
parents:
diff changeset
    27
dd6d1a6d6eff strawman connectors and channel
owner@UPSTAIRS.Belkin
parents:
diff changeset
    28
using namespace ns3;
dd6d1a6d6eff strawman connectors and channel
owner@UPSTAIRS.Belkin
parents:
diff changeset
    29
dd6d1a6d6eff strawman connectors and channel
owner@UPSTAIRS.Belkin
parents:
diff changeset
    30
// ===========================================================================
dd6d1a6d6eff strawman connectors and channel
owner@UPSTAIRS.Belkin
parents:
diff changeset
    31
// Cook up a simplistic Internet Node
dd6d1a6d6eff strawman connectors and channel
owner@UPSTAIRS.Belkin
parents:
diff changeset
    32
// ===========================================================================
dd6d1a6d6eff strawman connectors and channel
owner@UPSTAIRS.Belkin
parents:
diff changeset
    33
class FakeInternetNode : public LayerConnectorUpper
dd6d1a6d6eff strawman connectors and channel
owner@UPSTAIRS.Belkin
parents:
diff changeset
    34
{
dd6d1a6d6eff strawman connectors and channel
owner@UPSTAIRS.Belkin
parents:
diff changeset
    35
public:
dd6d1a6d6eff strawman connectors and channel
owner@UPSTAIRS.Belkin
parents:
diff changeset
    36
  FakeInternetNode ();
dd6d1a6d6eff strawman connectors and channel
owner@UPSTAIRS.Belkin
parents:
diff changeset
    37
 ~FakeInternetNode ();
dd6d1a6d6eff strawman connectors and channel
owner@UPSTAIRS.Belkin
parents:
diff changeset
    38
dd6d1a6d6eff strawman connectors and channel
owner@UPSTAIRS.Belkin
parents:
diff changeset
    39
  void Doit (void);
dd6d1a6d6eff strawman connectors and channel
owner@UPSTAIRS.Belkin
parents:
diff changeset
    40
dd6d1a6d6eff strawman connectors and channel
owner@UPSTAIRS.Belkin
parents:
diff changeset
    41
protected:
dd6d1a6d6eff strawman connectors and channel
owner@UPSTAIRS.Belkin
parents:
diff changeset
    42
  bool UpperDoSendUp (Packet &p);
dd6d1a6d6eff strawman connectors and channel
owner@UPSTAIRS.Belkin
parents:
diff changeset
    43
  bool UpperDoPull (Packet &p);
dd6d1a6d6eff strawman connectors and channel
owner@UPSTAIRS.Belkin
parents:
diff changeset
    44
dd6d1a6d6eff strawman connectors and channel
owner@UPSTAIRS.Belkin
parents:
diff changeset
    45
  DropTailQueue m_dtqOutbound;
dd6d1a6d6eff strawman connectors and channel
owner@UPSTAIRS.Belkin
parents:
diff changeset
    46
  DropTailQueue m_dtqInbound;
dd6d1a6d6eff strawman connectors and channel
owner@UPSTAIRS.Belkin
parents:
diff changeset
    47
};
dd6d1a6d6eff strawman connectors and channel
owner@UPSTAIRS.Belkin
parents:
diff changeset
    48
dd6d1a6d6eff strawman connectors and channel
owner@UPSTAIRS.Belkin
parents:
diff changeset
    49
FakeInternetNode::FakeInternetNode ()
dd6d1a6d6eff strawman connectors and channel
owner@UPSTAIRS.Belkin
parents:
diff changeset
    50
{
323
ae826c265100 make trailing ';' mandatory with NS_DEBUG macros. fix all invalid uses.
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents: 304
diff changeset
    51
  NS_DEBUG_UNCOND("FakeInternetNode::FakeInternetNode ()");
299
dd6d1a6d6eff strawman connectors and channel
owner@UPSTAIRS.Belkin
parents:
diff changeset
    52
}
dd6d1a6d6eff strawman connectors and channel
owner@UPSTAIRS.Belkin
parents:
diff changeset
    53
dd6d1a6d6eff strawman connectors and channel
owner@UPSTAIRS.Belkin
parents:
diff changeset
    54
FakeInternetNode::~FakeInternetNode ()
dd6d1a6d6eff strawman connectors and channel
owner@UPSTAIRS.Belkin
parents:
diff changeset
    55
{
323
ae826c265100 make trailing ';' mandatory with NS_DEBUG macros. fix all invalid uses.
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents: 304
diff changeset
    56
  NS_DEBUG_UNCOND("FakeInternetNode::~FakeInternetNode ()");
299
dd6d1a6d6eff strawman connectors and channel
owner@UPSTAIRS.Belkin
parents:
diff changeset
    57
}
dd6d1a6d6eff strawman connectors and channel
owner@UPSTAIRS.Belkin
parents:
diff changeset
    58
dd6d1a6d6eff strawman connectors and channel
owner@UPSTAIRS.Belkin
parents:
diff changeset
    59
  void
dd6d1a6d6eff strawman connectors and channel
owner@UPSTAIRS.Belkin
parents:
diff changeset
    60
FakeInternetNode::Doit (void)
dd6d1a6d6eff strawman connectors and channel
owner@UPSTAIRS.Belkin
parents:
diff changeset
    61
{
323
ae826c265100 make trailing ';' mandatory with NS_DEBUG macros. fix all invalid uses.
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents: 304
diff changeset
    62
  NS_DEBUG_UNCOND("FakeInternetNode::Doit ()");
ae826c265100 make trailing ';' mandatory with NS_DEBUG macros. fix all invalid uses.
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents: 304
diff changeset
    63
  NS_DEBUG_UNCOND("FakeInternetNode::Doit (): **** Send outbound packet");
299
dd6d1a6d6eff strawman connectors and channel
owner@UPSTAIRS.Belkin
parents:
diff changeset
    64
  Packet p;
dd6d1a6d6eff strawman connectors and channel
owner@UPSTAIRS.Belkin
parents:
diff changeset
    65
337
42102ed8ee3c Fix bug 8: Enque/Deque misspelled
Tom Henderson <tomh@tomh.org>
parents: 323
diff changeset
    66
  m_dtqOutbound.Enqueue(p);
299
dd6d1a6d6eff strawman connectors and channel
owner@UPSTAIRS.Belkin
parents:
diff changeset
    67
  UpperNotify();
dd6d1a6d6eff strawman connectors and channel
owner@UPSTAIRS.Belkin
parents:
diff changeset
    68
}
dd6d1a6d6eff strawman connectors and channel
owner@UPSTAIRS.Belkin
parents:
diff changeset
    69
dd6d1a6d6eff strawman connectors and channel
owner@UPSTAIRS.Belkin
parents:
diff changeset
    70
  bool
dd6d1a6d6eff strawman connectors and channel
owner@UPSTAIRS.Belkin
parents:
diff changeset
    71
FakeInternetNode::UpperDoSendUp (Packet &p)
dd6d1a6d6eff strawman connectors and channel
owner@UPSTAIRS.Belkin
parents:
diff changeset
    72
{
323
ae826c265100 make trailing ';' mandatory with NS_DEBUG macros. fix all invalid uses.
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents: 304
diff changeset
    73
  NS_DEBUG_UNCOND("FakeInternetNode::UpperDoSendUp (" << &p << ")");
299
dd6d1a6d6eff strawman connectors and channel
owner@UPSTAIRS.Belkin
parents:
diff changeset
    74
323
ae826c265100 make trailing ';' mandatory with NS_DEBUG macros. fix all invalid uses.
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents: 304
diff changeset
    75
  NS_DEBUG_UNCOND("FakeInternetNode::UpperDoSendUp (): **** Receive inbound packet");
337
42102ed8ee3c Fix bug 8: Enque/Deque misspelled
Tom Henderson <tomh@tomh.org>
parents: 323
diff changeset
    76
  m_dtqInbound.Enqueue(p);
42102ed8ee3c Fix bug 8: Enque/Deque misspelled
Tom Henderson <tomh@tomh.org>
parents: 323
diff changeset
    77
  return m_dtqInbound.Dequeue(p);
299
dd6d1a6d6eff strawman connectors and channel
owner@UPSTAIRS.Belkin
parents:
diff changeset
    78
}
dd6d1a6d6eff strawman connectors and channel
owner@UPSTAIRS.Belkin
parents:
diff changeset
    79
dd6d1a6d6eff strawman connectors and channel
owner@UPSTAIRS.Belkin
parents:
diff changeset
    80
  bool
dd6d1a6d6eff strawman connectors and channel
owner@UPSTAIRS.Belkin
parents:
diff changeset
    81
FakeInternetNode::UpperDoPull (Packet &p)
dd6d1a6d6eff strawman connectors and channel
owner@UPSTAIRS.Belkin
parents:
diff changeset
    82
{
323
ae826c265100 make trailing ';' mandatory with NS_DEBUG macros. fix all invalid uses.
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents: 304
diff changeset
    83
  NS_DEBUG_UNCOND("FakeInternetNode::DoPull (" << &p << ")");
299
dd6d1a6d6eff strawman connectors and channel
owner@UPSTAIRS.Belkin
parents:
diff changeset
    84
337
42102ed8ee3c Fix bug 8: Enque/Deque misspelled
Tom Henderson <tomh@tomh.org>
parents: 323
diff changeset
    85
  return m_dtqOutbound.Dequeue(p);
299
dd6d1a6d6eff strawman connectors and channel
owner@UPSTAIRS.Belkin
parents:
diff changeset
    86
}
dd6d1a6d6eff strawman connectors and channel
owner@UPSTAIRS.Belkin
parents:
diff changeset
    87
dd6d1a6d6eff strawman connectors and channel
owner@UPSTAIRS.Belkin
parents:
diff changeset
    88
// ===========================================================================
dd6d1a6d6eff strawman connectors and channel
owner@UPSTAIRS.Belkin
parents:
diff changeset
    89
// Cook up a simplistic Physical Layer
dd6d1a6d6eff strawman connectors and channel
owner@UPSTAIRS.Belkin
parents:
diff changeset
    90
// ===========================================================================
dd6d1a6d6eff strawman connectors and channel
owner@UPSTAIRS.Belkin
parents:
diff changeset
    91
class FakePhysicalLayer :
dd6d1a6d6eff strawman connectors and channel
owner@UPSTAIRS.Belkin
parents:
diff changeset
    92
  public LayerConnectorLower,
dd6d1a6d6eff strawman connectors and channel
owner@UPSTAIRS.Belkin
parents:
diff changeset
    93
  public LayerConnectorUpper
dd6d1a6d6eff strawman connectors and channel
owner@UPSTAIRS.Belkin
parents:
diff changeset
    94
{
dd6d1a6d6eff strawman connectors and channel
owner@UPSTAIRS.Belkin
parents:
diff changeset
    95
public:
dd6d1a6d6eff strawman connectors and channel
owner@UPSTAIRS.Belkin
parents:
diff changeset
    96
  FakePhysicalLayer ();
dd6d1a6d6eff strawman connectors and channel
owner@UPSTAIRS.Belkin
parents:
diff changeset
    97
 ~FakePhysicalLayer ();
dd6d1a6d6eff strawman connectors and channel
owner@UPSTAIRS.Belkin
parents:
diff changeset
    98
dd6d1a6d6eff strawman connectors and channel
owner@UPSTAIRS.Belkin
parents:
diff changeset
    99
protected:
dd6d1a6d6eff strawman connectors and channel
owner@UPSTAIRS.Belkin
parents:
diff changeset
   100
  bool LowerDoNotify (LayerConnectorUpper *upper);
dd6d1a6d6eff strawman connectors and channel
owner@UPSTAIRS.Belkin
parents:
diff changeset
   101
  bool UpperDoSendUp (Packet &p);
dd6d1a6d6eff strawman connectors and channel
owner@UPSTAIRS.Belkin
parents:
diff changeset
   102
  bool UpperDoPull (Packet &p);
dd6d1a6d6eff strawman connectors and channel
owner@UPSTAIRS.Belkin
parents:
diff changeset
   103
dd6d1a6d6eff strawman connectors and channel
owner@UPSTAIRS.Belkin
parents:
diff changeset
   104
  DropTailQueue m_dtqInbound;
dd6d1a6d6eff strawman connectors and channel
owner@UPSTAIRS.Belkin
parents:
diff changeset
   105
  DropTailQueue m_dtqOutbound;
dd6d1a6d6eff strawman connectors and channel
owner@UPSTAIRS.Belkin
parents:
diff changeset
   106
};
dd6d1a6d6eff strawman connectors and channel
owner@UPSTAIRS.Belkin
parents:
diff changeset
   107
dd6d1a6d6eff strawman connectors and channel
owner@UPSTAIRS.Belkin
parents:
diff changeset
   108
FakePhysicalLayer::FakePhysicalLayer ()
dd6d1a6d6eff strawman connectors and channel
owner@UPSTAIRS.Belkin
parents:
diff changeset
   109
{
323
ae826c265100 make trailing ';' mandatory with NS_DEBUG macros. fix all invalid uses.
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents: 304
diff changeset
   110
  NS_DEBUG_UNCOND("FakePhysicalLayer::FakePhysicalLayer ()");
299
dd6d1a6d6eff strawman connectors and channel
owner@UPSTAIRS.Belkin
parents:
diff changeset
   111
}
dd6d1a6d6eff strawman connectors and channel
owner@UPSTAIRS.Belkin
parents:
diff changeset
   112
dd6d1a6d6eff strawman connectors and channel
owner@UPSTAIRS.Belkin
parents:
diff changeset
   113
FakePhysicalLayer::~FakePhysicalLayer ()
dd6d1a6d6eff strawman connectors and channel
owner@UPSTAIRS.Belkin
parents:
diff changeset
   114
{
323
ae826c265100 make trailing ';' mandatory with NS_DEBUG macros. fix all invalid uses.
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents: 304
diff changeset
   115
  NS_DEBUG_UNCOND("FakePhysicalLayer::~FakePhysicalLayer ()");
299
dd6d1a6d6eff strawman connectors and channel
owner@UPSTAIRS.Belkin
parents:
diff changeset
   116
}
dd6d1a6d6eff strawman connectors and channel
owner@UPSTAIRS.Belkin
parents:
diff changeset
   117
dd6d1a6d6eff strawman connectors and channel
owner@UPSTAIRS.Belkin
parents:
diff changeset
   118
  bool
dd6d1a6d6eff strawman connectors and channel
owner@UPSTAIRS.Belkin
parents:
diff changeset
   119
FakePhysicalLayer::LowerDoNotify (LayerConnectorUpper *upper)
dd6d1a6d6eff strawman connectors and channel
owner@UPSTAIRS.Belkin
parents:
diff changeset
   120
{
323
ae826c265100 make trailing ';' mandatory with NS_DEBUG macros. fix all invalid uses.
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents: 304
diff changeset
   121
  NS_DEBUG_UNCOND("FakePhysicalLayer::LowerDoNotify ()");
299
dd6d1a6d6eff strawman connectors and channel
owner@UPSTAIRS.Belkin
parents:
diff changeset
   122
dd6d1a6d6eff strawman connectors and channel
owner@UPSTAIRS.Belkin
parents:
diff changeset
   123
  Packet p;
dd6d1a6d6eff strawman connectors and channel
owner@UPSTAIRS.Belkin
parents:
diff changeset
   124
323
ae826c265100 make trailing ';' mandatory with NS_DEBUG macros. fix all invalid uses.
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents: 304
diff changeset
   125
  NS_DEBUG_UNCOND("FakePhysicalLayer::LowerDoNotify (): Starting pull");
299
dd6d1a6d6eff strawman connectors and channel
owner@UPSTAIRS.Belkin
parents:
diff changeset
   126
304
d8c9790ff263 use new NS_ASSERT macro rather than assert. this makes the code build on my machine.
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents: 300
diff changeset
   127
  NS_ASSERT(m_upperPartner);
299
dd6d1a6d6eff strawman connectors and channel
owner@UPSTAIRS.Belkin
parents:
diff changeset
   128
  m_upperPartner->UpperPull(p);
dd6d1a6d6eff strawman connectors and channel
owner@UPSTAIRS.Belkin
parents:
diff changeset
   129
337
42102ed8ee3c Fix bug 8: Enque/Deque misspelled
Tom Henderson <tomh@tomh.org>
parents: 323
diff changeset
   130
  m_dtqOutbound.Enqueue(p);
299
dd6d1a6d6eff strawman connectors and channel
owner@UPSTAIRS.Belkin
parents:
diff changeset
   131
323
ae826c265100 make trailing ';' mandatory with NS_DEBUG macros. fix all invalid uses.
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents: 304
diff changeset
   132
  NS_DEBUG_UNCOND("FakePhysicalLayer::LowerDoNotify (): Got bits,  Notify lower");
299
dd6d1a6d6eff strawman connectors and channel
owner@UPSTAIRS.Belkin
parents:
diff changeset
   133
304
d8c9790ff263 use new NS_ASSERT macro rather than assert. this makes the code build on my machine.
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents: 300
diff changeset
   134
  NS_ASSERT(m_lowerPartner);
299
dd6d1a6d6eff strawman connectors and channel
owner@UPSTAIRS.Belkin
parents:
diff changeset
   135
  return m_lowerPartner->LowerNotify(this);
dd6d1a6d6eff strawman connectors and channel
owner@UPSTAIRS.Belkin
parents:
diff changeset
   136
}
dd6d1a6d6eff strawman connectors and channel
owner@UPSTAIRS.Belkin
parents:
diff changeset
   137
dd6d1a6d6eff strawman connectors and channel
owner@UPSTAIRS.Belkin
parents:
diff changeset
   138
  bool
dd6d1a6d6eff strawman connectors and channel
owner@UPSTAIRS.Belkin
parents:
diff changeset
   139
FakePhysicalLayer::UpperDoSendUp (Packet &p)
dd6d1a6d6eff strawman connectors and channel
owner@UPSTAIRS.Belkin
parents:
diff changeset
   140
{
323
ae826c265100 make trailing ';' mandatory with NS_DEBUG macros. fix all invalid uses.
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents: 304
diff changeset
   141
  NS_DEBUG_UNCOND("FakePhysicalLayer::UpperDoSendUp (" << &p << ")");
299
dd6d1a6d6eff strawman connectors and channel
owner@UPSTAIRS.Belkin
parents:
diff changeset
   142
304
d8c9790ff263 use new NS_ASSERT macro rather than assert. this makes the code build on my machine.
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents: 300
diff changeset
   143
  NS_ASSERT(m_upperPartner);
299
dd6d1a6d6eff strawman connectors and channel
owner@UPSTAIRS.Belkin
parents:
diff changeset
   144
  return m_upperPartner->UpperSendUp(p);
dd6d1a6d6eff strawman connectors and channel
owner@UPSTAIRS.Belkin
parents:
diff changeset
   145
}
dd6d1a6d6eff strawman connectors and channel
owner@UPSTAIRS.Belkin
parents:
diff changeset
   146
dd6d1a6d6eff strawman connectors and channel
owner@UPSTAIRS.Belkin
parents:
diff changeset
   147
  bool
dd6d1a6d6eff strawman connectors and channel
owner@UPSTAIRS.Belkin
parents:
diff changeset
   148
FakePhysicalLayer::UpperDoPull (Packet &p)
dd6d1a6d6eff strawman connectors and channel
owner@UPSTAIRS.Belkin
parents:
diff changeset
   149
{
323
ae826c265100 make trailing ';' mandatory with NS_DEBUG macros. fix all invalid uses.
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents: 304
diff changeset
   150
  NS_DEBUG_UNCOND("FakePhysicalLayer::DoPull (" << &p << ")");
299
dd6d1a6d6eff strawman connectors and channel
owner@UPSTAIRS.Belkin
parents:
diff changeset
   151
337
42102ed8ee3c Fix bug 8: Enque/Deque misspelled
Tom Henderson <tomh@tomh.org>
parents: 323
diff changeset
   152
  return m_dtqOutbound.Dequeue(p);
299
dd6d1a6d6eff strawman connectors and channel
owner@UPSTAIRS.Belkin
parents:
diff changeset
   153
}
dd6d1a6d6eff strawman connectors and channel
owner@UPSTAIRS.Belkin
parents:
diff changeset
   154
dd6d1a6d6eff strawman connectors and channel
owner@UPSTAIRS.Belkin
parents:
diff changeset
   155
// ===========================================================================
dd6d1a6d6eff strawman connectors and channel
owner@UPSTAIRS.Belkin
parents:
diff changeset
   156
// Cook up a simplistic Channel, just to add any moby hack we feel like
dd6d1a6d6eff strawman connectors and channel
owner@UPSTAIRS.Belkin
parents:
diff changeset
   157
// ===========================================================================
dd6d1a6d6eff strawman connectors and channel
owner@UPSTAIRS.Belkin
parents:
diff changeset
   158
class FakeChannel : public Channel
dd6d1a6d6eff strawman connectors and channel
owner@UPSTAIRS.Belkin
parents:
diff changeset
   159
{
dd6d1a6d6eff strawman connectors and channel
owner@UPSTAIRS.Belkin
parents:
diff changeset
   160
public:
dd6d1a6d6eff strawman connectors and channel
owner@UPSTAIRS.Belkin
parents:
diff changeset
   161
  FakeChannel ();
dd6d1a6d6eff strawman connectors and channel
owner@UPSTAIRS.Belkin
parents:
diff changeset
   162
 ~FakeChannel ();
dd6d1a6d6eff strawman connectors and channel
owner@UPSTAIRS.Belkin
parents:
diff changeset
   163
};
dd6d1a6d6eff strawman connectors and channel
owner@UPSTAIRS.Belkin
parents:
diff changeset
   164
dd6d1a6d6eff strawman connectors and channel
owner@UPSTAIRS.Belkin
parents:
diff changeset
   165
FakeChannel::FakeChannel ()
dd6d1a6d6eff strawman connectors and channel
owner@UPSTAIRS.Belkin
parents:
diff changeset
   166
{
323
ae826c265100 make trailing ';' mandatory with NS_DEBUG macros. fix all invalid uses.
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents: 304
diff changeset
   167
  NS_DEBUG_UNCOND("FakeChannel::FakeChannel ()");
299
dd6d1a6d6eff strawman connectors and channel
owner@UPSTAIRS.Belkin
parents:
diff changeset
   168
}
dd6d1a6d6eff strawman connectors and channel
owner@UPSTAIRS.Belkin
parents:
diff changeset
   169
dd6d1a6d6eff strawman connectors and channel
owner@UPSTAIRS.Belkin
parents:
diff changeset
   170
FakeChannel::~FakeChannel ()
dd6d1a6d6eff strawman connectors and channel
owner@UPSTAIRS.Belkin
parents:
diff changeset
   171
{
323
ae826c265100 make trailing ';' mandatory with NS_DEBUG macros. fix all invalid uses.
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents: 304
diff changeset
   172
  NS_DEBUG_UNCOND("FakeChannel::~FakeChannel ()");
299
dd6d1a6d6eff strawman connectors and channel
owner@UPSTAIRS.Belkin
parents:
diff changeset
   173
}
dd6d1a6d6eff strawman connectors and channel
owner@UPSTAIRS.Belkin
parents:
diff changeset
   174
dd6d1a6d6eff strawman connectors and channel
owner@UPSTAIRS.Belkin
parents:
diff changeset
   175
int main (int argc, char *argv[])
dd6d1a6d6eff strawman connectors and channel
owner@UPSTAIRS.Belkin
parents:
diff changeset
   176
{
323
ae826c265100 make trailing ';' mandatory with NS_DEBUG macros. fix all invalid uses.
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents: 304
diff changeset
   177
  NS_DEBUG_UNCOND("Channel Hackorama");
299
dd6d1a6d6eff strawman connectors and channel
owner@UPSTAIRS.Belkin
parents:
diff changeset
   178
300
6b63789695a5 turn off debug prints
Craig Dowell
parents: 299
diff changeset
   179
#if 0
299
dd6d1a6d6eff strawman connectors and channel
owner@UPSTAIRS.Belkin
parents:
diff changeset
   180
  DebugComponentEnable("Queue");
dd6d1a6d6eff strawman connectors and channel
owner@UPSTAIRS.Belkin
parents:
diff changeset
   181
  DebugComponentEnable("DropTailQueue");
dd6d1a6d6eff strawman connectors and channel
owner@UPSTAIRS.Belkin
parents:
diff changeset
   182
  DebugComponentEnable("LayerConnector");
dd6d1a6d6eff strawman connectors and channel
owner@UPSTAIRS.Belkin
parents:
diff changeset
   183
  DebugComponentEnable("Channel");
300
6b63789695a5 turn off debug prints
Craig Dowell
parents: 299
diff changeset
   184
#endif
299
dd6d1a6d6eff strawman connectors and channel
owner@UPSTAIRS.Belkin
parents:
diff changeset
   185
dd6d1a6d6eff strawman connectors and channel
owner@UPSTAIRS.Belkin
parents:
diff changeset
   186
  FakeInternetNode      node1, node2, node3, node4;
dd6d1a6d6eff strawman connectors and channel
owner@UPSTAIRS.Belkin
parents:
diff changeset
   187
  FakePhysicalLayer     phys1, phys2, phys3, phys4;
dd6d1a6d6eff strawman connectors and channel
owner@UPSTAIRS.Belkin
parents:
diff changeset
   188
  FakeChannel           channel;
dd6d1a6d6eff strawman connectors and channel
owner@UPSTAIRS.Belkin
parents:
diff changeset
   189
  Packet                pkt;
dd6d1a6d6eff strawman connectors and channel
owner@UPSTAIRS.Belkin
parents:
diff changeset
   190
dd6d1a6d6eff strawman connectors and channel
owner@UPSTAIRS.Belkin
parents:
diff changeset
   191
  // all the hassle above lets us do something very simple here
dd6d1a6d6eff strawman connectors and channel
owner@UPSTAIRS.Belkin
parents:
diff changeset
   192
dd6d1a6d6eff strawman connectors and channel
owner@UPSTAIRS.Belkin
parents:
diff changeset
   193
  node1.ConnectToLower(phys1);
dd6d1a6d6eff strawman connectors and channel
owner@UPSTAIRS.Belkin
parents:
diff changeset
   194
  phys1.ConnectToUpper(node1);
dd6d1a6d6eff strawman connectors and channel
owner@UPSTAIRS.Belkin
parents:
diff changeset
   195
  phys1.ConnectToLower(channel);
dd6d1a6d6eff strawman connectors and channel
owner@UPSTAIRS.Belkin
parents:
diff changeset
   196
  channel.ConnectToUpper(phys1);
dd6d1a6d6eff strawman connectors and channel
owner@UPSTAIRS.Belkin
parents:
diff changeset
   197
dd6d1a6d6eff strawman connectors and channel
owner@UPSTAIRS.Belkin
parents:
diff changeset
   198
  node2.ConnectToLower(phys2);
dd6d1a6d6eff strawman connectors and channel
owner@UPSTAIRS.Belkin
parents:
diff changeset
   199
  phys2.ConnectToUpper(node2);
dd6d1a6d6eff strawman connectors and channel
owner@UPSTAIRS.Belkin
parents:
diff changeset
   200
  phys2.ConnectToLower(channel);
dd6d1a6d6eff strawman connectors and channel
owner@UPSTAIRS.Belkin
parents:
diff changeset
   201
  channel.ConnectToUpper(phys2);
dd6d1a6d6eff strawman connectors and channel
owner@UPSTAIRS.Belkin
parents:
diff changeset
   202
dd6d1a6d6eff strawman connectors and channel
owner@UPSTAIRS.Belkin
parents:
diff changeset
   203
  node3.ConnectToLower(phys3);
dd6d1a6d6eff strawman connectors and channel
owner@UPSTAIRS.Belkin
parents:
diff changeset
   204
  phys3.ConnectToUpper(node3);
dd6d1a6d6eff strawman connectors and channel
owner@UPSTAIRS.Belkin
parents:
diff changeset
   205
  phys3.ConnectToLower(channel);
dd6d1a6d6eff strawman connectors and channel
owner@UPSTAIRS.Belkin
parents:
diff changeset
   206
  channel.ConnectToUpper(phys3);
dd6d1a6d6eff strawman connectors and channel
owner@UPSTAIRS.Belkin
parents:
diff changeset
   207
dd6d1a6d6eff strawman connectors and channel
owner@UPSTAIRS.Belkin
parents:
diff changeset
   208
  node4.ConnectToLower(phys4);
dd6d1a6d6eff strawman connectors and channel
owner@UPSTAIRS.Belkin
parents:
diff changeset
   209
  phys4.ConnectToUpper(node4);
dd6d1a6d6eff strawman connectors and channel
owner@UPSTAIRS.Belkin
parents:
diff changeset
   210
  phys4.ConnectToLower(channel);
dd6d1a6d6eff strawman connectors and channel
owner@UPSTAIRS.Belkin
parents:
diff changeset
   211
  channel.ConnectToUpper(phys4);
dd6d1a6d6eff strawman connectors and channel
owner@UPSTAIRS.Belkin
parents:
diff changeset
   212
dd6d1a6d6eff strawman connectors and channel
owner@UPSTAIRS.Belkin
parents:
diff changeset
   213
  node1.Doit();
dd6d1a6d6eff strawman connectors and channel
owner@UPSTAIRS.Belkin
parents:
diff changeset
   214
  node2.Doit();
dd6d1a6d6eff strawman connectors and channel
owner@UPSTAIRS.Belkin
parents:
diff changeset
   215
  node3.Doit();
dd6d1a6d6eff strawman connectors and channel
owner@UPSTAIRS.Belkin
parents:
diff changeset
   216
  node4.Doit();
dd6d1a6d6eff strawman connectors and channel
owner@UPSTAIRS.Belkin
parents:
diff changeset
   217
dd6d1a6d6eff strawman connectors and channel
owner@UPSTAIRS.Belkin
parents:
diff changeset
   218
  return 0;
dd6d1a6d6eff strawman connectors and channel
owner@UPSTAIRS.Belkin
parents:
diff changeset
   219
}