src/simulator/watchdog.cc
author Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
Tue, 06 Nov 2007 16:16:18 +0100
changeset 2084 24cfc21bda99
parent 1946 2c9d055f4692
child 5292 2036a35923bd
permissions -rw-r--r--
use the holland set of modes.
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
1944
7044c1ad1d79 a Watchdog class
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents:
diff changeset
     1
/* -*- Mode:C++; c-file-style:"gnu"; indent-tabs-mode:nil; -*- */
7044c1ad1d79 a Watchdog class
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents:
diff changeset
     2
/*
7044c1ad1d79 a Watchdog class
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents:
diff changeset
     3
 * Copyright (c) 2007 INRIA
7044c1ad1d79 a Watchdog class
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents:
diff changeset
     4
 *
7044c1ad1d79 a Watchdog class
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents:
diff changeset
     5
 * This program is free software; you can redistribute it and/or modify
7044c1ad1d79 a Watchdog class
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents:
diff changeset
     6
 * it under the terms of the GNU General Public License version 2 as
7044c1ad1d79 a Watchdog class
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents:
diff changeset
     7
 * published by the Free Software Foundation;
7044c1ad1d79 a Watchdog class
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents:
diff changeset
     8
 *
7044c1ad1d79 a Watchdog class
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents:
diff changeset
     9
 * This program is distributed in the hope that it will be useful,
7044c1ad1d79 a Watchdog class
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents:
diff changeset
    10
 * but WITHOUT ANY WARRANTY; without even the implied warranty of
7044c1ad1d79 a Watchdog class
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents:
diff changeset
    11
 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
7044c1ad1d79 a Watchdog class
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents:
diff changeset
    12
 * GNU General Public License for more details.
7044c1ad1d79 a Watchdog class
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents:
diff changeset
    13
 *
7044c1ad1d79 a Watchdog class
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents:
diff changeset
    14
 * You should have received a copy of the GNU General Public License
7044c1ad1d79 a Watchdog class
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents:
diff changeset
    15
 * along with this program; if not, write to the Free Software
7044c1ad1d79 a Watchdog class
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents:
diff changeset
    16
 * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
7044c1ad1d79 a Watchdog class
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents:
diff changeset
    17
 *
7044c1ad1d79 a Watchdog class
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents:
diff changeset
    18
 * Author: Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
7044c1ad1d79 a Watchdog class
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents:
diff changeset
    19
 */
7044c1ad1d79 a Watchdog class
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents:
diff changeset
    20
#include "watchdog.h"
7044c1ad1d79 a Watchdog class
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents:
diff changeset
    21
7044c1ad1d79 a Watchdog class
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents:
diff changeset
    22
namespace ns3 {
7044c1ad1d79 a Watchdog class
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents:
diff changeset
    23
7044c1ad1d79 a Watchdog class
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents:
diff changeset
    24
Watchdog::Watchdog ()
7044c1ad1d79 a Watchdog class
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents:
diff changeset
    25
  : m_impl (0),
7044c1ad1d79 a Watchdog class
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents:
diff changeset
    26
    m_event (),
7044c1ad1d79 a Watchdog class
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents:
diff changeset
    27
    m_end (MicroSeconds (0))
7044c1ad1d79 a Watchdog class
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents:
diff changeset
    28
{}
7044c1ad1d79 a Watchdog class
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents:
diff changeset
    29
7044c1ad1d79 a Watchdog class
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents:
diff changeset
    30
Watchdog::~Watchdog ()
7044c1ad1d79 a Watchdog class
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents:
diff changeset
    31
{
7044c1ad1d79 a Watchdog class
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents:
diff changeset
    32
  delete m_impl;
7044c1ad1d79 a Watchdog class
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents:
diff changeset
    33
}
7044c1ad1d79 a Watchdog class
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents:
diff changeset
    34
7044c1ad1d79 a Watchdog class
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents:
diff changeset
    35
void 
7044c1ad1d79 a Watchdog class
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents:
diff changeset
    36
Watchdog::Ping (Time delay)
7044c1ad1d79 a Watchdog class
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents:
diff changeset
    37
{
7044c1ad1d79 a Watchdog class
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents:
diff changeset
    38
  Time end = Simulator::Now () + delay;
7044c1ad1d79 a Watchdog class
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents:
diff changeset
    39
  m_end = std::max (m_end, end);
7044c1ad1d79 a Watchdog class
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents:
diff changeset
    40
  if (m_event.IsRunning ())
7044c1ad1d79 a Watchdog class
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents:
diff changeset
    41
    {
7044c1ad1d79 a Watchdog class
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents:
diff changeset
    42
      return;
7044c1ad1d79 a Watchdog class
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents:
diff changeset
    43
    }
7044c1ad1d79 a Watchdog class
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents:
diff changeset
    44
  m_event = Simulator::Schedule (m_end - Now (), &Watchdog::Expire, this);
7044c1ad1d79 a Watchdog class
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents:
diff changeset
    45
}
7044c1ad1d79 a Watchdog class
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents:
diff changeset
    46
7044c1ad1d79 a Watchdog class
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents:
diff changeset
    47
void
7044c1ad1d79 a Watchdog class
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents:
diff changeset
    48
Watchdog::Expire (void)
7044c1ad1d79 a Watchdog class
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents:
diff changeset
    49
{
7044c1ad1d79 a Watchdog class
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents:
diff changeset
    50
  if (m_end == Simulator::Now ())
7044c1ad1d79 a Watchdog class
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents:
diff changeset
    51
    {
7044c1ad1d79 a Watchdog class
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents:
diff changeset
    52
      m_impl->Invoke ();
7044c1ad1d79 a Watchdog class
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents:
diff changeset
    53
    }
7044c1ad1d79 a Watchdog class
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents:
diff changeset
    54
  else
7044c1ad1d79 a Watchdog class
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents:
diff changeset
    55
    {
7044c1ad1d79 a Watchdog class
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents:
diff changeset
    56
      m_event = Simulator::Schedule (m_end - Now (), &Watchdog::Expire, this);
7044c1ad1d79 a Watchdog class
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents:
diff changeset
    57
    }
7044c1ad1d79 a Watchdog class
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents:
diff changeset
    58
}
7044c1ad1d79 a Watchdog class
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents:
diff changeset
    59
7044c1ad1d79 a Watchdog class
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents:
diff changeset
    60
} // namespace ns3
1946
2c9d055f4692 test the watchdog
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents: 1944
diff changeset
    61
2c9d055f4692 test the watchdog
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents: 1944
diff changeset
    62
#ifdef RUN_SELF_TESTS
2c9d055f4692 test the watchdog
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents: 1944
diff changeset
    63
2c9d055f4692 test the watchdog
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents: 1944
diff changeset
    64
#include "ns3/test.h"
2c9d055f4692 test the watchdog
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents: 1944
diff changeset
    65
2c9d055f4692 test the watchdog
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents: 1944
diff changeset
    66
namespace ns3 {
2c9d055f4692 test the watchdog
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents: 1944
diff changeset
    67
2c9d055f4692 test the watchdog
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents: 1944
diff changeset
    68
class WatchdogTests : public Test
2c9d055f4692 test the watchdog
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents: 1944
diff changeset
    69
{
2c9d055f4692 test the watchdog
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents: 1944
diff changeset
    70
public:
2c9d055f4692 test the watchdog
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents: 1944
diff changeset
    71
  WatchdogTests ();
2c9d055f4692 test the watchdog
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents: 1944
diff changeset
    72
  virtual bool RunTests (void);
2c9d055f4692 test the watchdog
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents: 1944
diff changeset
    73
private:
2c9d055f4692 test the watchdog
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents: 1944
diff changeset
    74
  void Expire (Time expected);
2c9d055f4692 test the watchdog
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents: 1944
diff changeset
    75
  bool m_error;
2c9d055f4692 test the watchdog
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents: 1944
diff changeset
    76
};
2c9d055f4692 test the watchdog
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents: 1944
diff changeset
    77
2c9d055f4692 test the watchdog
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents: 1944
diff changeset
    78
WatchdogTests::WatchdogTests ()
2c9d055f4692 test the watchdog
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents: 1944
diff changeset
    79
  : Test ("Watchdog")
2c9d055f4692 test the watchdog
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents: 1944
diff changeset
    80
{}
2c9d055f4692 test the watchdog
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents: 1944
diff changeset
    81
2c9d055f4692 test the watchdog
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents: 1944
diff changeset
    82
void
2c9d055f4692 test the watchdog
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents: 1944
diff changeset
    83
WatchdogTests::Expire (Time expected)
2c9d055f4692 test the watchdog
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents: 1944
diff changeset
    84
{
2c9d055f4692 test the watchdog
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents: 1944
diff changeset
    85
  bool result = true;
2c9d055f4692 test the watchdog
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents: 1944
diff changeset
    86
  NS_TEST_ASSERT_EQUAL (Simulator::Now (), expected);
2c9d055f4692 test the watchdog
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents: 1944
diff changeset
    87
  m_error = !result;
2c9d055f4692 test the watchdog
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents: 1944
diff changeset
    88
}
2c9d055f4692 test the watchdog
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents: 1944
diff changeset
    89
2c9d055f4692 test the watchdog
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents: 1944
diff changeset
    90
bool
2c9d055f4692 test the watchdog
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents: 1944
diff changeset
    91
WatchdogTests::RunTests (void)
2c9d055f4692 test the watchdog
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents: 1944
diff changeset
    92
{
2c9d055f4692 test the watchdog
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents: 1944
diff changeset
    93
  bool result = true;
2c9d055f4692 test the watchdog
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents: 1944
diff changeset
    94
2c9d055f4692 test the watchdog
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents: 1944
diff changeset
    95
  m_error = false;
2c9d055f4692 test the watchdog
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents: 1944
diff changeset
    96
  Watchdog watchdog;
2c9d055f4692 test the watchdog
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents: 1944
diff changeset
    97
  watchdog.SetFunction (&WatchdogTests::Expire, this);
2c9d055f4692 test the watchdog
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents: 1944
diff changeset
    98
  watchdog.SetArguments (MicroSeconds (40));
2c9d055f4692 test the watchdog
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents: 1944
diff changeset
    99
  watchdog.Ping (MicroSeconds (10));
2c9d055f4692 test the watchdog
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents: 1944
diff changeset
   100
  Simulator::Schedule (MicroSeconds (5), &Watchdog::Ping, &watchdog, MicroSeconds (20));
2c9d055f4692 test the watchdog
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents: 1944
diff changeset
   101
  Simulator::Schedule (MicroSeconds (20), &Watchdog::Ping, &watchdog, MicroSeconds (2));
2c9d055f4692 test the watchdog
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents: 1944
diff changeset
   102
  Simulator::Schedule (MicroSeconds (23), &Watchdog::Ping, &watchdog, MicroSeconds (17));
2c9d055f4692 test the watchdog
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents: 1944
diff changeset
   103
  Simulator::Run ();
2c9d055f4692 test the watchdog
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents: 1944
diff changeset
   104
  NS_TEST_ASSERT (!m_error);
2c9d055f4692 test the watchdog
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents: 1944
diff changeset
   105
  Simulator::Destroy ();
2c9d055f4692 test the watchdog
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents: 1944
diff changeset
   106
2c9d055f4692 test the watchdog
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents: 1944
diff changeset
   107
  return result;
2c9d055f4692 test the watchdog
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents: 1944
diff changeset
   108
}
2c9d055f4692 test the watchdog
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents: 1944
diff changeset
   109
2c9d055f4692 test the watchdog
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents: 1944
diff changeset
   110
static WatchdogTests g_watchdogTests;
2c9d055f4692 test the watchdog
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents: 1944
diff changeset
   111
2c9d055f4692 test the watchdog
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents: 1944
diff changeset
   112
} // namespace ns3
2c9d055f4692 test the watchdog
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents: 1944
diff changeset
   113
2c9d055f4692 test the watchdog
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents: 1944
diff changeset
   114
#endif /* RUN_SELF_TESTS */