-/* Copyright (c) 2014. The SimGrid Team.
- * All rights reserved. */
+/* Copyright (c) 2014-2017. The SimGrid Team. All rights reserved. */
/* This program is free software; you can redistribute it and/or modify it
* under the terms of the license (GNU LGPL) which comes with this package. */
-#include <stdio.h>
-#include <stdlib.h>
+#include <cstring>
+#include <cstdio>
+#include <cstdlib>
-#include <xbt.h>
-#include <simgrid/simix.h>
+#include <stdexcept>
+#include <sstream>
+#include <string>
-#include "mc_record.h"
-#include "mc_base.h"
+#include "xbt/log.h"
+#include "xbt/sysdep.h"
-#ifdef HAVE_MC
-#include "mc_private.h"
-#include "mc_state.h"
-#include "mc_smx.h"
-#endif
+#include "simgrid/simix.h"
+
+#include "src/kernel/context/Context.hpp"
+#include "src/mc/mc_record.hpp"
+#include "src/mc/mc_replay.hpp"
+#include "src/simix/ActorImpl.hpp"
+#include "src/simix/smx_private.hpp"
-extern "C" {
+#include "src/mc/mc_base.h"
+#include "src/mc/Transition.hpp"
+
+#if SIMGRID_HAVE_MC
+#include "src/mc/checker/Checker.hpp"
+#include "src/mc/mc_private.hpp"
+#include "src/mc/mc_request.hpp"
+#include "src/mc/mc_smx.hpp"
+#include "src/mc/mc_state.hpp"
+#endif
XBT_LOG_NEW_DEFAULT_SUBCATEGORY(mc_record, mc,
" Logging specific to MC record/replay facility");
-char* MC_record_path = NULL;
+std::string MC_record_path;
-void MC_record_replay(mc_record_item_t start, size_t len)
-{
- MC_wait_for_requests();
- mc_record_item_t end = start + len;
+namespace simgrid {
+namespace mc {
- // Choose the recorded simcall and execute it:
- for (mc_record_item_t item=start;item!=end; ++item) {
+void replay(RecordTrace const& trace)
+{
+ simgrid::mc::wait_for_requests();
- XBT_DEBUG("Executing %i$%i", item->pid, item->value);
-/*
- if (xbt_dynar_is_empty(simix_global->process_to_run))
- xbt_die("Unexpected end of application.");
-*/
+ for (simgrid::mc::Transition const& transition : trace) {
+ XBT_DEBUG("Executing %i$%i", transition.pid, transition.argument);
// Choose a request:
- smx_process_t process = SIMIX_process_from_PID(item->pid);
- if (!process)
- xbt_die("Unexpected process.");
+ smx_actor_t process = SIMIX_process_from_PID(transition.pid);
+ if (not process)
+ xbt_die("Unexpected process (pid:%d).", transition.pid);
smx_simcall_t simcall = &(process->simcall);
- if(!simcall || simcall->call == SIMCALL_NONE)
- xbt_die("No simcall for this process.");
- if (!MC_request_is_visible(simcall) || !MC_request_is_enabled(simcall))
+ if (not simcall || simcall->call == SIMCALL_NONE)
+ xbt_die("No simcall for process %d.", transition.pid);
+ if (not simgrid::mc::request_is_visible(simcall) || not simgrid::mc::actor_is_enabled(process))
xbt_die("Unexpected simcall.");
// Execute the request:
- SIMIX_simcall_handle(simcall, item->value);
- MC_wait_for_requests();
+ SIMIX_simcall_handle(simcall, transition.argument);
+ simgrid::mc::wait_for_requests();
}
}
-xbt_dynar_t MC_record_from_string(const char* data)
+void replay(std::string path_string)
{
- XBT_INFO("path=%s", data);
- if (!data || !data[0])
- return NULL;
+ simgrid::mc::processes_time.resize(SIMIX_process_get_maxpid());
+ simgrid::mc::RecordTrace trace = simgrid::mc::parseRecordTrace(path_string.c_str());
+ simgrid::mc::replay(trace);
+ simgrid::mc::processes_time.clear();
+}
- xbt_dynar_t dynar = xbt_dynar_new(sizeof(s_mc_record_item_t), NULL);
+RecordTrace parseRecordTrace(const char* data)
+{
+ RecordTrace res;
+ XBT_INFO("path=%s", data);
+ if (data == nullptr || data[0] == '\0')
+ throw std::invalid_argument("Could not parse record path");
const char* current = data;
while (*current) {
- s_mc_record_item_t item = { 0, 0 };
- int count = sscanf(current, "%u/%u", &item.pid, &item.value);
+ simgrid::mc::Transition item;
+ int count = sscanf(current, "%d/%d", &item.pid, &item.argument);
if(count != 2 && count != 1)
- goto fail;
- xbt_dynar_push(dynar, &item);
+ throw std::invalid_argument("Could not parse record path");
+ res.push_back(item);
// Find next chunk:
- const char* end = strchr(current, ';');
- if(end==NULL)
+ const char* end = std::strchr(current, ';');
+ if(end == nullptr)
break;
else
current = end + 1;
}
- return dynar;
-
-fail:
- xbt_dynar_free(&dynar);
- return NULL;
+ return res;
}
-#ifdef HAVE_MC
-char* MC_record_stack_to_string(xbt_fifo_t stack)
-{
- xbt_fifo_item_t start = xbt_fifo_get_last_item(stack);
-
- if (!start) {
- char* res = (char*) malloc(1 * sizeof(char));
- res[0] = '\0';
- return res;
- }
-
- char* buffer;
- size_t size;
- FILE* file = open_memstream(&buffer, &size);
-
- xbt_fifo_item_t item;
- for (item = start; item; item = xbt_fifo_get_prev_item(item)) {
-
- // Find (pid, value):
- mc_state_t state = (mc_state_t) xbt_fifo_get_item_content(item);
- int value = 0;
- smx_simcall_t saved_req = MC_state_get_executed_request(state, &value);
- const smx_process_t issuer = MC_smx_simcall_get_issuer(saved_req);
- const int pid = issuer->pid;
+#if SIMGRID_HAVE_MC
- // Serialization the (pid, value) pair:
- const char* sep = (item!=start) ? ";" : "";
- if (value)
- fprintf(file, "%s%u/%u", sep, pid, value);
- else
- fprintf(file, "%s%u", sep, pid);
+std::string traceToString(simgrid::mc::RecordTrace const& trace)
+{
+ std::ostringstream stream;
+ for (auto i = trace.begin(); i != trace.end(); ++i) {
+ if (i != trace.begin())
+ stream << ';';
+ stream << i->pid;
+ if (i->argument)
+ stream << '/' << i->argument;
}
-
- fclose(file);
- return buffer;
+ return stream.str();
}
-void MC_record_dump_path(xbt_fifo_t stack)
+void dumpRecordPath()
{
if (MC_record_is_active()) {
- char* path = MC_record_stack_to_string(stack);
- XBT_INFO("Path = %s", path);
- free(path);
+ RecordTrace trace = mc_model_checker->getChecker()->getRecordTrace();
+ XBT_INFO("Path = %s", traceToString(trace).c_str());
}
}
-#endif
-void MC_record_replay_from_string(const char* path_string)
-{
- xbt_dynar_t path = MC_record_from_string(path_string);
- mc_record_item_t start = &xbt_dynar_get_as(path, 0, s_mc_record_item_t);
- MC_record_replay(start, xbt_dynar_length(path));
- xbt_dynar_free(&path);
-}
+#endif
-void MC_record_replay_init()
-{
- mc_time = xbt_new0(double, simix_process_maxpid);
}
-
}