test/dce-manager-test.cc
author Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
Mon, 18 Apr 2011 12:13:02 +0200
changeset 63 e89dca438df6
parent 36 model/dce-manager-test.cc@eb850eb4a527
permissions -rw-r--r--
more fixes
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
0
0a55bed4c895 process -> dce
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents:
diff changeset
     1
#include "ns3/test.h"
0a55bed4c895 process -> dce
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents:
diff changeset
     2
#include "ns3/node.h"
0a55bed4c895 process -> dce
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents:
diff changeset
     3
#include "ns3/simulator.h"
0a55bed4c895 process -> dce
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents:
diff changeset
     4
#include "ns3/uinteger.h"
63
e89dca438df6 more fixes
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents: 36
diff changeset
     5
#include "ns3/dce-manager.h"
e89dca438df6 more fixes
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents: 36
diff changeset
     6
#include "ns3/task-manager.h"
e89dca438df6 more fixes
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents: 36
diff changeset
     7
#include "ns3/loader-factory.h"
0
0a55bed4c895 process -> dce
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents:
diff changeset
     8
0a55bed4c895 process -> dce
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents:
diff changeset
     9
static std::string g_testError;
0a55bed4c895 process -> dce
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents:
diff changeset
    10
0a55bed4c895 process -> dce
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents:
diff changeset
    11
extern "C" void dce_manager_test_store_test_error (const char *s)
0a55bed4c895 process -> dce
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents:
diff changeset
    12
{
0a55bed4c895 process -> dce
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents:
diff changeset
    13
  g_testError = s;
0a55bed4c895 process -> dce
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents:
diff changeset
    14
}
0a55bed4c895 process -> dce
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents:
diff changeset
    15
0a55bed4c895 process -> dce
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents:
diff changeset
    16
0a55bed4c895 process -> dce
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents:
diff changeset
    17
namespace ns3 {
0a55bed4c895 process -> dce
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents:
diff changeset
    18
0a55bed4c895 process -> dce
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents:
diff changeset
    19
0a55bed4c895 process -> dce
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents:
diff changeset
    20
0a55bed4c895 process -> dce
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents:
diff changeset
    21
class DceManagerTestCase : public TestCase
0a55bed4c895 process -> dce
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents:
diff changeset
    22
{
0a55bed4c895 process -> dce
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents:
diff changeset
    23
public:
0a55bed4c895 process -> dce
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents:
diff changeset
    24
  DceManagerTestCase (std::string filename);
0a55bed4c895 process -> dce
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents:
diff changeset
    25
private:
63
e89dca438df6 more fixes
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents: 36
diff changeset
    26
  virtual void DoRun (void);
0
0a55bed4c895 process -> dce
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents:
diff changeset
    27
  Ptr<DceManager> CreateManager (int *pstatus);
63
e89dca438df6 more fixes
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents: 36
diff changeset
    28
  Ptr<TaskScheduler> CreateScheduler(std::string type);
e89dca438df6 more fixes
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents: 36
diff changeset
    29
  Ptr<LoaderFactory> CreateLoaderFactory (std::string type);
0
0a55bed4c895 process -> dce
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents:
diff changeset
    30
  void StartApplication (Ptr<DceManager> manager, int *pstatus);
0a55bed4c895 process -> dce
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents:
diff changeset
    31
  static void Finished (int *pstatus, uint16_t pid, int status);
0a55bed4c895 process -> dce
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents:
diff changeset
    32
0a55bed4c895 process -> dce
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents:
diff changeset
    33
  std::string m_filename;
0a55bed4c895 process -> dce
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents:
diff changeset
    34
};
0a55bed4c895 process -> dce
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents:
diff changeset
    35
0a55bed4c895 process -> dce
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents:
diff changeset
    36
DceManagerTestCase::DceManagerTestCase (std::string filename)
0a55bed4c895 process -> dce
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents:
diff changeset
    37
  : TestCase ("Check that process \"" + filename + "\" completes correctly."),
0a55bed4c895 process -> dce
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents:
diff changeset
    38
    m_filename (filename)
0a55bed4c895 process -> dce
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents:
diff changeset
    39
{}
0a55bed4c895 process -> dce
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents:
diff changeset
    40
void
0a55bed4c895 process -> dce
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents:
diff changeset
    41
DceManagerTestCase::StartApplication (Ptr<DceManager> manager, int *pstatus)
0a55bed4c895 process -> dce
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents:
diff changeset
    42
{
0a55bed4c895 process -> dce
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents:
diff changeset
    43
  std::vector<std::string> noargs;
0a55bed4c895 process -> dce
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents:
diff changeset
    44
  std::vector<std::pair<std::string,std::string> > noenv;
0a55bed4c895 process -> dce
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents:
diff changeset
    45
  
0a55bed4c895 process -> dce
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents:
diff changeset
    46
  uint16_t pid = manager->Start (m_filename, 1<<20, noargs, noenv);
0a55bed4c895 process -> dce
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents:
diff changeset
    47
  manager->SetFinishedCallback (pid, MakeBoundCallback (&DceManagerTestCase::Finished, pstatus));
0a55bed4c895 process -> dce
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents:
diff changeset
    48
}
63
e89dca438df6 more fixes
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents: 36
diff changeset
    49
Ptr<TaskScheduler>
e89dca438df6 more fixes
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents: 36
diff changeset
    50
DceManagerTestCase::CreateScheduler(std::string type)
e89dca438df6 more fixes
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents: 36
diff changeset
    51
{
e89dca438df6 more fixes
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents: 36
diff changeset
    52
  ObjectFactory factory;
e89dca438df6 more fixes
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents: 36
diff changeset
    53
  factory.SetTypeId (type);
e89dca438df6 more fixes
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents: 36
diff changeset
    54
  Ptr<TaskScheduler> scheduler = factory.Create<TaskScheduler> ();
e89dca438df6 more fixes
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents: 36
diff changeset
    55
  return scheduler;
e89dca438df6 more fixes
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents: 36
diff changeset
    56
}
e89dca438df6 more fixes
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents: 36
diff changeset
    57
Ptr<LoaderFactory>
e89dca438df6 more fixes
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents: 36
diff changeset
    58
DceManagerTestCase::CreateLoaderFactory (std::string type)
e89dca438df6 more fixes
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents: 36
diff changeset
    59
{
e89dca438df6 more fixes
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents: 36
diff changeset
    60
  ObjectFactory factory;
e89dca438df6 more fixes
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents: 36
diff changeset
    61
  factory.SetTypeId (type);
e89dca438df6 more fixes
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents: 36
diff changeset
    62
  Ptr<LoaderFactory> loaderFactory = factory.Create<LoaderFactory> ();
e89dca438df6 more fixes
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents: 36
diff changeset
    63
  return loaderFactory;
e89dca438df6 more fixes
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents: 36
diff changeset
    64
}
0
0a55bed4c895 process -> dce
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents:
diff changeset
    65
Ptr<DceManager> 
0a55bed4c895 process -> dce
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents:
diff changeset
    66
DceManagerTestCase::CreateManager (int *pstatus)
0a55bed4c895 process -> dce
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents:
diff changeset
    67
{
0a55bed4c895 process -> dce
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents:
diff changeset
    68
  Ptr<Node> a = CreateObject<Node> ();
0a55bed4c895 process -> dce
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents:
diff changeset
    69
  Ptr<TaskManager> taskManager = CreateObject<TaskManager> ();
63
e89dca438df6 more fixes
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents: 36
diff changeset
    70
  Ptr<TaskScheduler> taskScheduler = CreateScheduler ("ns3::RrTaskScheduler");
0
0a55bed4c895 process -> dce
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents:
diff changeset
    71
  Ptr<DceManager> aManager = CreateObject<DceManager> ();
63
e89dca438df6 more fixes
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents: 36
diff changeset
    72
  Ptr<LoaderFactory> loaderFactory = CreateLoaderFactory ("ns3::CoojaLoaderFactory");
0
0a55bed4c895 process -> dce
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents:
diff changeset
    73
  taskManager->SetScheduler (taskScheduler);
0a55bed4c895 process -> dce
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents:
diff changeset
    74
  a->AggregateObject (loaderFactory);
0a55bed4c895 process -> dce
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents:
diff changeset
    75
  a->AggregateObject (taskManager);
0a55bed4c895 process -> dce
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents:
diff changeset
    76
  a->AggregateObject (aManager);
0a55bed4c895 process -> dce
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents:
diff changeset
    77
  Simulator::ScheduleWithContext (a->GetId (), Seconds (0.0),
0a55bed4c895 process -> dce
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents:
diff changeset
    78
				  &DceManagerTestCase::StartApplication, this, 
0a55bed4c895 process -> dce
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents:
diff changeset
    79
				  aManager, pstatus);
0a55bed4c895 process -> dce
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents:
diff changeset
    80
  return aManager;
0a55bed4c895 process -> dce
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents:
diff changeset
    81
}
0a55bed4c895 process -> dce
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents:
diff changeset
    82
void
0a55bed4c895 process -> dce
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents:
diff changeset
    83
DceManagerTestCase::Finished (int *pstatus, uint16_t pid, int status)
0a55bed4c895 process -> dce
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents:
diff changeset
    84
{
0a55bed4c895 process -> dce
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents:
diff changeset
    85
  *pstatus = status;
0a55bed4c895 process -> dce
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents:
diff changeset
    86
}
63
e89dca438df6 more fixes
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents: 36
diff changeset
    87
void
0
0a55bed4c895 process -> dce
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents:
diff changeset
    88
DceManagerTestCase::DoRun (void)
0a55bed4c895 process -> dce
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents:
diff changeset
    89
{
0a55bed4c895 process -> dce
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents:
diff changeset
    90
  int status = - 1;
0a55bed4c895 process -> dce
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents:
diff changeset
    91
  Ptr<DceManager> a = CreateManager (&status);
0a55bed4c895 process -> dce
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents:
diff changeset
    92
  Simulator::Run ();
0a55bed4c895 process -> dce
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents:
diff changeset
    93
  Simulator::Destroy ();
0a55bed4c895 process -> dce
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents:
diff changeset
    94
  NS_TEST_ASSERT_MSG_EQ (status, 0, "Process did not return successfully: " << g_testError);
0a55bed4c895 process -> dce
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents:
diff changeset
    95
}
0a55bed4c895 process -> dce
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents:
diff changeset
    96
0a55bed4c895 process -> dce
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents:
diff changeset
    97
static class DceManagerTestSuite : public TestSuite
0a55bed4c895 process -> dce
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents:
diff changeset
    98
{
0a55bed4c895 process -> dce
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents:
diff changeset
    99
public:
0a55bed4c895 process -> dce
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents:
diff changeset
   100
  DceManagerTestSuite ();
0a55bed4c895 process -> dce
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents:
diff changeset
   101
private:
0a55bed4c895 process -> dce
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents:
diff changeset
   102
} g_processTests;
0a55bed4c895 process -> dce
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents:
diff changeset
   103
0a55bed4c895 process -> dce
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents:
diff changeset
   104
DceManagerTestSuite::DceManagerTestSuite ()
0a55bed4c895 process -> dce
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents:
diff changeset
   105
  : TestSuite ("process-manager", UNIT)
0a55bed4c895 process -> dce
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents:
diff changeset
   106
{
0a55bed4c895 process -> dce
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents:
diff changeset
   107
  const char *tests [] = {
0a55bed4c895 process -> dce
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents:
diff changeset
   108
  "test-empty",
0a55bed4c895 process -> dce
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents:
diff changeset
   109
  "test-sleep",
0a55bed4c895 process -> dce
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents:
diff changeset
   110
  "test-pthread",
0a55bed4c895 process -> dce
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents:
diff changeset
   111
  "test-mutex",
0a55bed4c895 process -> dce
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents:
diff changeset
   112
  "test-once",
0a55bed4c895 process -> dce
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents:
diff changeset
   113
  "test-pthread-key",
0a55bed4c895 process -> dce
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents:
diff changeset
   114
  "test-sem",
0a55bed4c895 process -> dce
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents:
diff changeset
   115
  "test-malloc",
0a55bed4c895 process -> dce
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents:
diff changeset
   116
  "test-malloc-2",
0a55bed4c895 process -> dce
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents:
diff changeset
   117
  "test-fd-simple",
0a55bed4c895 process -> dce
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents:
diff changeset
   118
  "test-strerror",
0a55bed4c895 process -> dce
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents:
diff changeset
   119
  "test-stdio",
0a55bed4c895 process -> dce
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents:
diff changeset
   120
  "test-string",
0a55bed4c895 process -> dce
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents:
diff changeset
   121
  "test-netdb",
0a55bed4c895 process -> dce
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents:
diff changeset
   122
  "test-env",
0a55bed4c895 process -> dce
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents:
diff changeset
   123
  "test-cond",
0a55bed4c895 process -> dce
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents:
diff changeset
   124
  "test-timer-fd",
0a55bed4c895 process -> dce
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents:
diff changeset
   125
  "test-stdlib",
0a55bed4c895 process -> dce
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents:
diff changeset
   126
  "test-select",
0a55bed4c895 process -> dce
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents:
diff changeset
   127
  "test-nanosleep",
0a55bed4c895 process -> dce
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents:
diff changeset
   128
  "test-random",
36
eb850eb4a527 fork test
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents: 12
diff changeset
   129
  "test-fork",
0
0a55bed4c895 process -> dce
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents:
diff changeset
   130
  };
0a55bed4c895 process -> dce
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents:
diff changeset
   131
  for (unsigned int i = 0; i < sizeof(tests)/sizeof(char*);i++)
0a55bed4c895 process -> dce
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents:
diff changeset
   132
    {
0a55bed4c895 process -> dce
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents:
diff changeset
   133
      AddTestCase (new DceManagerTestCase (tests[i]));
0a55bed4c895 process -> dce
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents:
diff changeset
   134
    }
0a55bed4c895 process -> dce
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents:
diff changeset
   135
}
0a55bed4c895 process -> dce
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents:
diff changeset
   136
0a55bed4c895 process -> dce
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents:
diff changeset
   137
} // namespace ns3