rom/kernel/displayalert.c

   1 #include <aros/kernel.h>
   2 #include <aros/libcall.h>
   3
   4 #include <kernel_base.h>
   5 #include <kernel_debug.h>
   6
   7 #define ALERT_WIDTH 80
   8
   9 static inline void PrintChars(char c, ULONG n, struct KernelBase *KernelBase)
  10 {
  11     while (n--)
  12         krnPutC(c, KernelBase);
  13 }
  14
  15 /*
  16  * This function calculates length of line.
  17  * It's similar to strlen(), but stops also at LF and FF codes.
  18  */
  19 static inline int linelen(const char *str)
  20 {
  21     int l;
  22
  23     for (l = 0; str[l] && str[l] != '\n' && str[l] != 0x0F; l++);
  24     return l;
  25 }
  26
  27 static const char *PrintCentered(const char *str, struct KernelBase *KernelBase)
  28 {
  29     int len = linelen(str);
  30     int i;
  31     ULONG s;
  32
  33     if (len > (ALERT_WIDTH - 2))
  34             len = (ALERT_WIDTH - 2);
  35
  36     s = ALERT_WIDTH - 2 - len;
  37
  38     krnPutC('#', KernelBase);
  39     if (s & 1)
  40         krnPutC(' ', KernelBase);
  41     s >>= 1;
  42     PrintChars(' ', s, KernelBase);
  43
  44     for (i = 0; i < len; i++)
  45         krnPutC(*str++, KernelBase);
  46
  47     PrintChars(' ', s, KernelBase);
  48     krnPutC('#', KernelBase);
  49     krnPutC('\n', KernelBase);
  50
  51     return str;
  52 }
  53
  54 static inline void PrintFrame(struct KernelBase *KernelBase)
  55 {
  56     PrintChars('#', ALERT_WIDTH, KernelBase);
  57     krnPutC('\n', KernelBase);
  58 }
  59
  60 /*****************************************************************************
  61
  62     NAME */
  63 #include <proto/kernel.h>
  64
  65 AROS_LH2(void, KrnDisplayAlert,
  66
  67 /*  SYNOPSIS */
  68         AROS_LHA(uint32_t, code, D0),
  69         AROS_LHA(const char *, text, A0),
  70
  71 /*  LOCATION */
  72         struct KernelBase *, KernelBase, 35, Kernel)
  73
  74 /*  FUNCTION
  75         Inform the user about critical system failure.
  76
  77     INPUTS
  78         code - Corresponding alert code.
  79         text - A NULL-terminated text to print out.
  80
  81         First three lines are assumed to be a header. Some implementations
  82         may print them centered inside a frame.
  83
  84     RESULT
  85         None. This function is not guaranteed to return.
  86
  87     NOTES
  88         This function exists for system internal purposes. Please do not
  89         call it from within regular applications! In 99% of cases this function
  90         will halt or reboot the machine. Certain structures in RAM, as well as
  91         video hardware state, will be irreversibly destroyed.
  92
  93         'code' parameter is passed for convenience. Based on it, the system
  94         can make a decision to log the alert in debug output and continue,
  95         instead of displaying a message and halting.
  96
  97         This function is currently experimental. Its definition may change.
  98
  99     EXAMPLE
 100
 101     BUGS
 102
 103     SEE ALSO
 104
 105     INTERNALS
 106
 107 ******************************************************************************/
 108 {
 109     AROS_LIBFUNC_INIT
 110
 111     /*
 112      * This is a generic version that simply formats the text into debug log.
 113      * It can be replaced with machine-specific implementation which can do more.
 114      */
 115     unsigned int i;
 116
 117     /* Make sure that the output starts from a new line */
 118     krnPutC('\n', KernelBase);
 119
 120     PrintFrame(KernelBase);
 121
 122     /* Print first three lines (title, task and error) centered */
 123     for (i = 0; i < 3; i++)
 124     {
 125         text = PrintCentered(text, KernelBase);
 126         text++; /* Skip a newline */
 127     }
 128
 129     PrintFrame(KernelBase);
 130
 131     /* Print the rest of alert text */
 132     while (*text)
 133         krnPutC(*text++, KernelBase);
 134
 135     krnPutC('\n', KernelBase);
 136     PrintFrame(KernelBase);
 137
 138     AROS_LIBFUNC_EXIT
 139 }