#include "config.h"
#include "system.h"
#include <signal.h>
#include <sys/ucontext.h>
#include "hosthooks.h"
#include "hosthooks-def.h"
#include "toplev.h"
static void segv_crash_handler PARAMS ((int));
static void segv_handler PARAMS ((int, siginfo_t *, void *));
static void darwin_rs6000_extra_signals PARAMS ((void));
extern int sigaltstack(const stack_t *, stack_t *);
#undef HOST_HOOKS_EXTRA_SIGNALS
#define HOST_HOOKS_EXTRA_SIGNALS darwin_rs6000_extra_signals
static void
segv_crash_handler (sig)
int sig ATTRIBUTE_UNUSED;
{
internal_error ("Segmentation Fault (code)");
}
static void
segv_handler (sig, sip, scp)
int sig ATTRIBUTE_UNUSED;
siginfo_t *sip ATTRIBUTE_UNUSED;
void *scp;
{
ucontext_t *uc = (ucontext_t *)scp;
unsigned faulting_insn;
signal (SIGSEGV, segv_crash_handler);
faulting_insn = *(unsigned *)uc->uc_mcontext->ss.srr0;
if ((faulting_insn & 0xFFFF8000) == 0x94218000
|| (faulting_insn & 0xFFFF03FF) == 0x7C21016E
|| (faulting_insn & 0xFC1F8000) == 0x90018000
|| (faulting_insn & 0xFC1F8000) == 0xD8018000
|| (faulting_insn & 0xFC1F8000) == 0xBC018000 )
{
char *shell_name;
fnotice (stderr, "Out of stack space.\n");
shell_name = getenv ("SHELL");
if (shell_name != NULL)
shell_name = strrchr (shell_name, '/');
if (shell_name != NULL)
{
static const char * shell_commands[][2] = {
{ "sh", "ulimit -S -s unlimited" },
{ "bash", "ulimit -S -s unlimited" },
{ "tcsh", "limit stacksize unlimited" },
{ "csh", "limit stacksize unlimited" },
{ "zsh", "limit stacksize 32m" }
};
size_t i;
for (i = 0; i < ARRAY_SIZE (shell_commands); i++)
if (strcmp (shell_commands[i][0], shell_name + 1) == 0)
{
fnotice (stderr,
"Try running `%s' in the shell to raise its limit.\n",
shell_commands[i][1]);
}
}
exit (FATAL_EXIT_CODE);
}
fprintf (stderr, "[address=%08lx pc=%08x]\n",
uc->uc_mcontext->es.dar, uc->uc_mcontext->ss.srr0);
internal_error ("Segmentation Fault");
exit (FATAL_EXIT_CODE);
}
static void
darwin_rs6000_extra_signals ()
{
struct sigaction sact;
stack_t sigstk;
sigstk.ss_sp = xmalloc (SIGSTKSZ);
sigstk.ss_size = SIGSTKSZ;
sigstk.ss_flags = 0;
if (sigaltstack (&sigstk, NULL) < 0)
fatal_io_error ("While setting up signal stack");
sigemptyset(&sact.sa_mask);
sact.sa_flags = SA_ONSTACK | SA_SIGINFO;
sact.sa_sigaction = segv_handler;
if (sigaction (SIGSEGV, &sact, 0) < 0)
fatal_io_error ("While setting up signal handler");
}
const struct host_hooks host_hooks = HOST_HOOKS_INITIALIZER;