-XBT_ATTRIB_NORETURN static void inthandler(int)
-{
- if (simgrid::simix::cfg_verbose_exit) {
- XBT_INFO("CTRL-C pressed. The current status will be displayed before exit (disable that behavior with option "
- "'debug/verbose-exit').");
- simix_global->display_all_actor_status();
- } else {
- XBT_INFO("CTRL-C pressed, exiting. Hiding the current process status since 'debug/verbose-exit' is set to false.");
- }
- exit(1);
-}
-
-#ifndef _WIN32
-static void segvhandler(int signum, siginfo_t* siginfo, void* /*context*/)
-{
- if ((siginfo->si_signo == SIGSEGV && siginfo->si_code == SEGV_ACCERR) || siginfo->si_signo == SIGBUS) {
- fprintf(stderr,
- "Access violation or Bus error detected.\n"
- "This probably comes from a programming error in your code, or from a stack\n"
- "overflow. If you are certain of your code, try increasing the stack size\n"
- " --cfg=contexts/stack-size=XXX (current size is %u KiB).\n"
- "\n"
- "If it does not help, this may have one of the following causes:\n"
- "a bug in SimGrid, a bug in the OS or a bug in a third-party libraries.\n"
- "Failing hardware can sometimes generate such errors too.\n"
- "\n"
- "If you think you've found a bug in SimGrid, please report it along with a\n"
- "Minimal Working Example (MWE) reproducing your problem and a full backtrace\n"
- "of the fault captured with gdb or valgrind.\n",
- smx_context_stack_size / 1024);
- } else if (siginfo->si_signo == SIGSEGV) {
- fprintf(stderr, "Segmentation fault.\n");
-#if HAVE_SMPI
- if (smpi_enabled() && smpi_cfg_privatization() == SmpiPrivStrategies::NONE) {
-#if HAVE_PRIVATIZATION
- fprintf(stderr, "Try to enable SMPI variable privatization with --cfg=smpi/privatization:yes.\n");
-#else
- fprintf(stderr, "Sadly, your system does not support --cfg=smpi/privatization:yes (yet).\n");
-#endif /* HAVE_PRIVATIZATION */
- }
-#endif /* HAVE_SMPI */
- }
- std::raise(signum);
-}
-
-/**
- * Install signal handler for SIGSEGV. Check that nobody has already installed
- * its own handler. For example, the Java VM does this.
- */
-static void install_segvhandler()
-{
- stack_t old_stack;
-
- if (simgrid::kernel::context::Context::install_sigsegv_stack(&old_stack, true) == -1) {
- XBT_WARN("Failed to register alternate signal stack: %s", strerror(errno));
- return;
- }
- if (not(old_stack.ss_flags & SS_DISABLE)) {
- XBT_DEBUG("An alternate stack was already installed (sp=%p, size=%zu, flags=%x). Restore it.", old_stack.ss_sp,
- old_stack.ss_size, (unsigned)old_stack.ss_flags);
- sigaltstack(&old_stack, nullptr);
- }
-
- struct sigaction action;
- struct sigaction old_action;
- action.sa_sigaction = &segvhandler;
- action.sa_flags = SA_ONSTACK | SA_RESETHAND | SA_SIGINFO;
- sigemptyset(&action.sa_mask);
-
- /* Linux tend to raise only SIGSEGV where other systems also raise SIGBUS on severe error */
- for (int sig : {SIGSEGV, SIGBUS}) {
- if (sigaction(sig, &action, &old_action) == -1) {
- XBT_WARN("Failed to register signal handler for signal %d: %s", sig, strerror(errno));
- continue;
- }
- if ((old_action.sa_flags & SA_SIGINFO) || old_action.sa_handler != SIG_DFL) {
- XBT_DEBUG("A signal handler was already installed for signal %d (%p). Restore it.", sig,
- (old_action.sa_flags & SA_SIGINFO) ? (void*)old_action.sa_sigaction : (void*)old_action.sa_handler);
- sigaction(sig, &old_action, nullptr);
- }
- }
-}
-
-#endif /* _WIN32 */
-
-/********************************* SIMIX **************************************/
-namespace simgrid {
-namespace simix {
-
-void Global::empty_trash()
-{
- while (not actors_to_destroy.empty()) {
- kernel::actor::ActorImpl* actor = &actors_to_destroy.front();
- actors_to_destroy.pop_front();
- XBT_DEBUG("Getting rid of %s (refcount: %d)", actor->get_cname(), actor->get_refcount());
- intrusive_ptr_release(actor);
- }
-#if SIMGRID_HAVE_MC
- xbt_dynar_reset(dead_actors_vector);
-#endif
-}
-
-void Global::display_all_actor_status() const
-{
- XBT_INFO("%zu actors are still running, waiting for something.", process_list.size());
- /* List the actors and their state */
- XBT_INFO("Legend of the following listing: \"Actor <pid> (<name>@<host>): <status>\"");
- for (auto const& kv : process_list) {
- kernel::actor::ActorImpl* actor = kv.second;
-
- if (actor->waiting_synchro_) {
- const char* synchro_description = "unknown";
-
- if (boost::dynamic_pointer_cast<kernel::activity::ExecImpl>(actor->waiting_synchro_) != nullptr)
- synchro_description = "execution";
-
- if (boost::dynamic_pointer_cast<kernel::activity::CommImpl>(actor->waiting_synchro_) != nullptr)
- synchro_description = "communication";
-
- if (boost::dynamic_pointer_cast<kernel::activity::SleepImpl>(actor->waiting_synchro_) != nullptr)
- synchro_description = "sleeping";
-
- if (boost::dynamic_pointer_cast<kernel::activity::RawImpl>(actor->waiting_synchro_) != nullptr)
- synchro_description = "synchronization";
-
- if (boost::dynamic_pointer_cast<kernel::activity::IoImpl>(actor->waiting_synchro_) != nullptr)
- synchro_description = "I/O";
-
- XBT_INFO("Actor %ld (%s@%s): waiting for %s activity %#zx (%s) in state %d to finish", actor->get_pid(),
- actor->get_cname(), actor->get_host()->get_cname(), synchro_description,
- (xbt_log_no_loc ? (size_t)0xDEADBEEF : (size_t)actor->waiting_synchro_.get()),
- actor->waiting_synchro_->get_cname(), (int)actor->waiting_synchro_->state_);
- } else {
- XBT_INFO("Actor %ld (%s@%s) simcall %s", actor->get_pid(), actor->get_cname(), actor->get_host()->get_cname(),
- SIMIX_simcall_name(actor->simcall_));
- }
- }
-}
-
-} // namespace simix
-} // namespace simgrid