static void illegal_upcall (PAL_PTR event, PAL_NUM arg, PAL_CONTEXT * context)
{
if (IS_INTERNAL_TID(get_cur_tid()) || is_internal(context)) {
internal:
internal_fault("Internal memory fault", arg, context);
pause();
goto ret_exception;
}
struct shim_vma * vma = NULL;
if (!(lookup_supervma((void *) arg, 0, &vma)) &&
!(vma->flags & VMA_INTERNAL)) {
if (context)
debug("illegal instruction at %p\n", context->IP);
if (vma)
put_vma(vma);
deliver_signal(ALLOC_SIGINFO(SIGILL, si_addr, (void *) arg), context);
} else {
if (vma)
put_vma(vma);
goto internal;
}
ret_exception:
DkExceptionReturn(event);
}
void FailureHandler (PAL_PTR event, PAL_NUM arg, PAL_CONTEXT * context)
{
pal_printf("Failure notified: %s\n",
pal_errstring[(unsigned long) arg]);
handled = 1;
DkExceptionReturn(event);
}
void handler (PAL_PTR event, PAL_NUM arg, PAL_CONTEXT * context)
{
count++;
pal_printf("Memory Fault %d\n", count);
while (*(unsigned char *) context->rip != 0x90)
context->rip++;
DkExceptionReturn(event);
}
static void quit_upcall (PAL_PTR event, PAL_NUM arg, PAL_CONTEXT * context)
{
if (IS_INTERNAL_TID(get_cur_tid()))
goto ret_exception;
deliver_signal(ALLOC_SIGINFO(SIGTERM, si_pid, 0), NULL);
ret_exception:
DkExceptionReturn(event);
}
void handler (PAL_PTR event, PAL_NUM arg, PAL_CONTEXT * context)
{
if (message)
pal_printf("%s", message);
while (*(unsigned char *) context->rip != 0x90)
context->rip++;
DkExceptionReturn(event);
}
static void divzero_upcall (PAL_PTR event, PAL_NUM arg, PAL_CONTEXT * context)
{
if (IS_INTERNAL_TID(get_cur_tid()) || is_internal(context)) {
internal_fault("Internal arithmetic fault", arg, context);
pause();
goto ret_exception;
}
if (context)
debug("arithmetic fault at %p\n", context->IP);
deliver_signal(ALLOC_SIGINFO(SIGFPE, si_addr, (void *) arg), context);
ret_exception:
DkExceptionReturn(event);
}
static void suspend_upcall (PAL_PTR event, PAL_NUM arg, PAL_CONTEXT * context)
{
if (IS_INTERNAL_TID(get_cur_tid()))
goto ret_exception;
if (ask_for_checkpoint) {
int ans = message_confirm("checkpoint execution "
"(\'k\' to kill the process)",
"yk");
if (ans == 'K' || ans == 'k')
goto kill;
if (ans != 'Y' && ans != 'y')
goto ret_exception;
shim_tcb_t * tcb = SHIM_GET_TLS();
assert(tcb && tcb->tp);
struct shim_signal signal;
__store_context(tcb, context, &signal);
IDTYPE session = 0;
char cpdir[20];
if (create_dir("checkpoint-", cpdir, 20, NULL) < 0)
goto ret_exception;
sys_printf("creating checkpoint \"%s\"...\n", cpdir);
if (create_checkpoint(cpdir, &session) < 0)
goto ret_exception;
ipc_checkpoint_send(cpdir, session);
kill_all_threads(tcb->tp, CHECKPOINT_REQUESTED, SIGINT);
join_checkpoint(tcb->tp, &signal.context);
goto ret_exception;
}
kill:
deliver_signal(ALLOC_SIGINFO(SIGINT, si_pid, 0), NULL);
ret_exception:
DkExceptionReturn(event);
}
static void resume_upcall (PAL_PTR event, PAL_NUM arg, PAL_CONTEXT * context)
{
if (IS_INTERNAL_TID(get_cur_tid()))
goto ret_exception;
shim_tcb_t * tcb = SHIM_GET_TLS();
assert(tcb && tcb->tp);
__disable_preempt(tcb);
if ((tcb->context.preempt & ~SIGNAL_DELAYED) > 1) {
tcb->context.preempt |= SIGNAL_DELAYED;
__enable_preempt(tcb);
goto ret_exception;
}
__handle_signal(tcb, 0, NULL);
__enable_preempt(tcb);
ret_exception:
DkExceptionReturn(event);
}
