compiler/stdc/__signal.c

   1 /*
   2     Copyright © 2012-2018, The AROS Development Team. All rights reserved.
   3     $Id$
   4 */
   5
   6 #include <proto/exec.h>
   7
   8 #define __NOBLIBBASE__
   9
  10 #include <libraries/stdc.h>
  11
  12 /* We include the signal.h of posixc.library for getting min/max signal number
  13    TODO: Implement more elegant way to get maximum and minimum signal number
  14 */
  15 #include <aros/posixc/signal.h>
  16 #include <errno.h>
  17 #include <stdio.h>
  18 #include <stdlib.h>
  19 #include <assert.h>
  20
  21 #include "__stdc_intbase.h"
  22 #include "__signal.h"
  23 #include "__optionallibs.h"
  24
  25 #define DEBUG 0
  26 #include <aros/debug.h>
  27
  28 struct signal_func_data *__sig_getfuncdata(int signum)
  29 {
  30     struct StdCIntBase *StdCBase =
  31         (struct StdCIntBase *)__aros_getbase_StdCBase();
  32     int i;
  33
  34     if (signum < SIGHUP || signum > _SIGMAX)
  35     {
  36         errno = EINVAL;
  37         return NULL;
  38     }
  39
  40     if (StdCBase->sigfunc_array == NULL)
  41     {
  42         StdCBase->sigfunc_array = malloc(_SIGMAX*sizeof(struct signal_func_data));
  43
  44         if (!StdCBase->sigfunc_array)
  45         {
  46             errno = ENOMEM;
  47             return NULL;
  48         }
  49
  50         for (i = 0; i < _SIGMAX; i++)
  51         {
  52             StdCBase->sigfunc_array[i].sigfunc = SIG_DFL;
  53             StdCBase->sigfunc_array[i].flags = 0;
  54         }
  55     }
  56
  57     return &StdCBase->sigfunc_array[signum-1];
  58 }
  59
  60 /* Handler for SIG_DFL */
  61 /* TODO: Maybe a mechanism has to be implemented so that default signal handler
  62    can be overloaded by libraries. For example by stdcio.library or posixc.library
  63    so they can use stdio for presenting the caught signal
  64 */
  65 void __sig_default(int signum)
  66 {
  67     struct StdCIntBase *StdCBase =
  68         (struct StdCIntBase *)__aros_getbase_StdCBase();
  69     char *taskname = FindTask(NULL)->tc_Node.ln_Name;
  70     char s[50];
  71
  72     switch (signum)
  73     {
  74     case SIGABRT:
  75         sprintf(s, "Program '%s' aborted.", taskname);
  76         break;
  77
  78     case SIGTERM:
  79         sprintf(s, "Program '%s' terminated.", taskname);
  80         break;
  81
  82     default:
  83         sprintf(s, "Program '%s' caught signal %d\naborting...",
  84                 taskname, signum
  85         );
  86         break;
  87     }
  88
  89     /* Open requester if IntuitionBase is available otherwise use kprintf() */
  90     if (__intuition_available(StdCBase))
  91     {
  92         struct EasyStruct es =
  93             {
  94                 sizeof(struct EasyStruct),
  95                 0,
  96                 "Caught Signal",
  97                 "%s",
  98                 "OK"
  99             };
 100         stdcEasyRequest(StdCBase->StdCIntuitionBase, NULL, &es, NULL, s);
 101     }
 102     else
 103         kprintf("%s\n", s);
 104
 105     __stdc_jmp2exit(0, 20);
 106
 107     assert(0); /* Should not be reached */
 108 }