]> AND Private Git Repository - loba.git/blob - main.cpp
Logo AND Algorithmique Numérique Distribuée

Private GIT Repository
3ba517c13ad7d87809ef638cc8cbcb2d111c02d5
[loba.git] / main.cpp
1 #include <cstring>
2 #include <iostream>
3 #include <stdexcept>
4 #include <msg/msg.h>
5 #include <xbt/log.h>
6 #include "deployment.h"
7 #include "hostdata.h"
8 #include "misc.h"
9 #include "options.h"
10 #include "process.h"
11 #include "timer.h"
12 #include "version.h"
13
14 // Creates log categories
15 XBT_LOG_NEW_CATEGORY(simu, "Simulation messages");
16 XBT_LOG_NEW_SUBCATEGORY(main, simu, "Messages from global infrastructure");
17 XBT_LOG_NEW_SUBCATEGORY(comm, simu, "Messages from asynchronous pipes");
18 XBT_LOG_NEW_SUBCATEGORY(proc, simu, "Messages from base process class");
19 XBT_LOG_NEW_SUBCATEGORY(loba, simu, "Messages from load-balancer");
20
21 XBT_LOG_EXTERNAL_DEFAULT_CATEGORY(main);
22
23 // Failure exit status
24 enum {
25     EXIT_NO_FAILURE    = 0x00,  // no error
26     EXIT_FAILURE_ARGS  = 0x01,  // bad arguments
27     EXIT_FAILURE_INIT  = 0x02,  // failed to initialize simulator
28     EXIT_FAILURE_SIMU  = 0x04,  // simulation failed
29     EXIT_FAILURE_CLEAN = 0x08,  // error at cleanup
30 };
31
32 int simulation_main(int argc, char* argv[])
33 {
34     int result;
35     process* proc;
36     try {
37         proc = opt::loba_algorithms.new_instance(opt::loba_algo, argc, argv);
38         result = proc->run();
39         delete proc;
40     }
41     catch (std::invalid_argument& e) {
42         THROW1(arg_error, 0, "%s", e.what());
43     }
44     return result;
45 }
46
47 int main(int argc, char* argv[])
48 {
49     // Note: variables used after THROW must be declared as volatile.
50     volatile int exit_status = 0;   // global exit status
51     volatile double simulated_time = -1.0;
52     timestamp simulation_time;
53     xbt_ex_t ex;
54     MSG_error_t res;
55
56     simulation_time.start();
57
58     // Set default logging parameters
59     // xbt_log_control_set("simu.thres:verbose");
60     xbt_log_control_set("simu.fmt:'[%h %r] [%c/%p] %m%n'");
61     xbt_log_control_set("main.fmt:'[%c/%p] %m%n'");
62
63     // Initialize some MSG internal data.
64     // Note: MSG_global_init() may throw an exception, but it seems
65     // impossible to catch it correctly :-(
66     MSG_global_init(&argc, argv);
67
68     // Parse global parameters
69     int parse_res = opt::parse_args(&argc, argv);
70     if (!parse_res
71         || opt::version_requested || opt::help_requested) {
72         if (opt::version_requested)
73             std::clog << version::name << " (" << opt::program_name << ")"
74                       << " version " << version::num << "\n"
75                       << version::copyright << "\n"
76                 "Compiled on " << version::date << "\n\n";
77         if (!parse_res || opt::help_requested)
78             opt::usage();
79         MSG_clean();
80         exit(parse_res ? EXIT_NO_FAILURE : EXIT_FAILURE_ARGS);
81     }
82     opt::print();
83
84     TRY {
85         exit_status = EXIT_FAILURE_INIT; // =====
86
87         // Register the default function of an agent
88         // MSG_function_register("simulation_main", simulation_main);
89         MSG_function_register_default(simulation_main);
90
91         // Create the platform and the application.
92         MSG_create_environment(opt::platform_file.c_str());
93         hostdata::create();
94         if (opt::auto_depl::enabled) {
95             if (!opt::auto_depl::nhosts)
96                 opt::auto_depl::nhosts = hostdata::size();
97             if (!opt::auto_depl::load)
98                 opt::auto_depl::load = hostdata::size();
99             MY_launch_application(); // it is already opt::* aware...
100         } else {
101             MSG_launch_application(opt::deployment_file.c_str());
102         }
103
104         exit_status = EXIT_FAILURE_SIMU; // =====
105
106         // Launch the MSG simulation.
107         INFO1("Starting simulation at %f...", MSG_get_clock());
108         res = MSG_main();
109         INFO1("Simulation ended at %f.", MSG_get_clock());
110         simulated_time = MSG_get_clock();
111         if (res != MSG_OK)
112             THROW1(0, 0, "MSG_main() failed with status %#x", res);
113
114         exit_status = EXIT_NO_FAILURE; // =====
115     }
116     CATCH (ex) {
117         int len = strlen(ex.msg);
118         if (len > 0 && ex.msg[len - 1] == '\n')
119             ex.msg[len - 1] = '\0'; // strip the ending '\n'
120         ERROR1("%s", ex.msg);
121         DEBUG3("Error from %s() in %s:%d", ex.func, ex.file, ex.line);
122         xbt_ex_free(ex);
123     }
124
125     // Clean the MSG simulation.
126     hostdata::destroy();
127     res = MSG_clean();
128     if (res != MSG_OK) {
129         ERROR1("MSG_clean() failed with status %#x", res);
130         exit_status |= EXIT_FAILURE_CLEAN;
131     }
132
133     // Report final simulation status.
134     if (simulated_time >= 0.0) {
135         simulation_time.stop();
136         INFO0(",----[ Results ]");
137         INFO1("| Total simulated time...: %g", simulated_time);
138         INFO1("| Total simulation time..: %g", simulation_time.duration());
139         INFO0("`----");
140     }
141     if (exit_status)
142         ERROR1("Simulation failed (%#x).", exit_status);
143     else
144         INFO0("Simulation succeeded.");
145
146     return exit_status;
147 }
148
149 // Local variables:
150 // mode: c++
151 // End: