/* module handling */
-/* Copyright (c) 2006-2018. The SimGrid Team. All rights reserved. */
+/* Copyright (c) 2006-2022. 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. */
#define XBT_LOG_LOCALLY_DEFINE_XBT_CHANNEL /* MSVC don't want it to be declared extern in headers and local here */
-#include "simgrid_config.h"
-#include "xbt/config.h"
+#include "simgrid/config.h"
+#include "simgrid/sg_config.hpp"
+#include "src/internal_config.h"
+#include "src/sthread/sthread.h" // sthread_inside_simgrid
+#include "xbt/config.hpp"
+#include "xbt/coverage.h"
#include "xbt/dynar.h"
#include "xbt/log.h"
#include "xbt/log.hpp"
#include "xbt/misc.h"
+#include "xbt/module.h" /* this module */
#include "xbt/sysdep.h"
-#include <cmath>
-
-#include "xbt/module.h" /* this module */
-
-#include "src/xbt_modinter.h" /* prototype of other module's init/exit in XBT */
+#include "xbt/xbt_modinter.h" /* prototype of other module's init/exit in XBT */
-#include "simgrid/sg_config.hpp"
-
-#include "src/internal_config.h"
+#include <cmath>
#include <cstdio>
#ifdef _WIN32
# include <csignal> /* To silence MSVC on abort() */
#if HAVE_UNISTD_H
# include <unistd.h>
#endif
+#include <string>
+#include <vector>
XBT_LOG_NEW_DEFAULT_SUBCATEGORY(module, xbt, "module handling");
XBT_LOG_NEW_CATEGORY(smpi, "All SMPI categories"); /* lives here even if that's a bit odd to solve linking issues: this is used in xbt_log_file_appender to detect whether SMPI is used (and thus whether we should unbench the writing to disk) */
-char *xbt_binary_name = NULL; /* Name of the system process containing us (mandatory to retrieve neat backtraces) */
-xbt_dynar_t xbt_cmdline = NULL; /* all we got in argv */
+namespace simgrid::xbt {
+std::string binary_name; /* Name of the system process containing us (mandatory to retrieve neat backtraces) */
+std::vector<std::string> cmdline; /* all we got in argv */
+} // namespace simgrid::xbt
+
int xbt_initialized = 0;
-int _sg_do_clean_atexit = 1;
+simgrid::config::Flag<bool> cfg_dbg_clean_atexit{
+ "debug/clean-atexit",
+ "Whether to cleanup SimGrid at exit. Disable it if your code segfaults after its end.",
+ true};
int xbt_pagesize;
int xbt_pagebits = 0;
*/
static void xbt_preinit() XBT_ATTRIB_CONSTRUCTOR(200);
static void xbt_postexit();
+void sthread_enable() {} // These symbols are used from ContextSwapped in any case, but they are only useful
+void sthread_disable() {} // when libsthread is LD_PRELOADED. In this case, sthread's implem gets used instead.
#ifdef _WIN32
#include <windows.h>
#ifndef __GNUC__
/* Should not be necessary but for some reason, DllMain is called twice at attachment and at detachment.*/
-static int xbt_dll_process_is_attached = 0;
-
/* see also http://msdn.microsoft.com/en-us/library/ms682583%28VS.85%29.aspx */
/* and http://www.microsoft.com/whdc/driver/kernel/DLL_bestprac.mspx */
static BOOL WINAPI DllMain(HINSTANCE hinstDLL, DWORD fdwReason, LPVOID lpvReserved)
{
- if (fdwReason == DLL_PROCESS_ATTACH
- && xbt_dll_process_is_attached == 0) {
- xbt_dll_process_is_attached = 1;
+ static bool xbt_dll_process_is_attached = false;
+ if (fdwReason == DLL_PROCESS_ATTACH && not xbt_dll_process_is_attached) {
+ xbt_dll_process_is_attached = true;
xbt_preinit();
- } else if (fdwReason == DLL_PROCESS_DETACH
- && xbt_dll_process_is_attached == 1) {
- xbt_dll_process_is_attached = 0;
+ } else if (fdwReason == DLL_PROCESS_DETACH && xbt_dll_process_is_attached) {
+ xbt_dll_process_is_attached = false;
}
return 1;
}
static void xbt_preinit()
{
- unsigned int seed = 2147483647;
#ifdef _WIN32
SYSTEM_INFO si;
GetSystemInfo(&si);
xbt_pagesize = si.dwPageSize;
#elif HAVE_SYSCONF
- xbt_pagesize = sysconf(_SC_PAGESIZE);
+ xbt_pagesize = static_cast<int>(sysconf(_SC_PAGESIZE));
#else
# error Cannot get page size.
#endif
- xbt_pagebits = log2(xbt_pagesize);
+ xbt_pagebits = static_cast<int>(log2(xbt_pagesize));
#ifdef _TWO_DIGIT_EXPONENT
/* Even printf behaves differently on Windows... */
_set_output_format(_TWO_DIGIT_EXPONENT);
#endif
xbt_log_preinit();
- xbt_os_thread_mod_preinit();
xbt_dict_preinit();
-
- srand(seed);
-#ifndef _WIN32
- srand48(seed);
-#endif
atexit(xbt_postexit);
}
static void xbt_postexit()
{
- if (not _sg_do_clean_atexit)
+ if (not cfg_dbg_clean_atexit)
return;
xbt_initialized--;
xbt_dict_postexit();
- xbt_os_thread_mod_postexit();
- xbt_dynar_free(&xbt_cmdline);
xbt_log_postexit();
#if SIMGRID_HAVE_MC
mmalloc_postexit();
/** @brief Initialize the xbt mechanisms. */
void xbt_init(int *argc, char **argv)
{
- simgrid::xbt::installExceptionHandler();
-
xbt_initialized++;
if (xbt_initialized > 1) {
XBT_DEBUG("XBT has been initialized %d times.", xbt_initialized);
return;
}
- xbt_binary_name = argv[0];
- xbt_cmdline = xbt_dynar_new(sizeof(char*), NULL);
+ simgrid::xbt::install_exception_handler();
+
+ if (*argc > 0)
+ simgrid::xbt::binary_name = argv[0];
for (int i = 0; i < *argc; i++)
- xbt_dynar_push(xbt_cmdline,&(argv[i]));
+ simgrid::xbt::cmdline.emplace_back(argv[i]);
xbt_log_init(argc, argv);
}
/* these two functions belong to xbt/sysdep.h, which have no corresponding .c file */
/** @brief like xbt_free, but you can be sure that it is a function */
-void xbt_free_f(void *p)
+void xbt_free_f(void* p) noexcept(noexcept(::free))
{
xbt_free(p);
}
/** @brief should be given a pointer to pointer, and frees the second one */
-void xbt_free_ref(void *d)
+void xbt_free_ref(void* d) noexcept(noexcept(::free))
{
xbt_free(*(void**)d);
}
/** @brief Kill the program in silence */
void xbt_abort()
{
-#ifdef COVERAGE
/* Call __gcov_flush on abort when compiling with coverage options. */
- extern void __gcov_flush();
- __gcov_flush();
-#endif
+ coverage_checkpoint();
#ifdef _WIN32
/* We said *in silence*. We don't want to see the error message printed by Microsoft's implementation of abort(). */
raise(SIGABRT);
#endif
abort();
}
+
+#ifndef HAVE_SMPI
+int SMPI_is_inited()
+{
+ return false;
+}
+#endif
\ No newline at end of file
