Changeset 2204

Timestamp:

Jul 4, 2005, 3:17:39 AM (20 years ago)

Author:

bird

Message:

panic enh.

Location:

trunk/src/emx

Files:

• ChangeLog.LIBC (modified) (1 diff, 1 prop)
• include/InnoTekLIBC/backend.h (modified) (2 diffs, 1 prop)
• include/emx/umalloc.h (modified) (1 diff, 1 prop)
• src/lib/libc.def (modified) (1 diff, 1 prop)
• src/lib/malloc/_hinitheap.c (modified) (2 diffs, 1 prop)
• src/lib/malloc/_linitheap.c (modified) (2 diffs, 1 prop)
• src/lib/malloc/ifree.c (modified) (3 diffs, 1 prop)
• src/lib/malloc/imisc.c (modified) (3 diffs, 1 prop)
• src/lib/malloc/irealloc.c (modified) (2 diffs, 1 prop)
• src/lib/malloc/uheapmin.c (modified) (1 diff, 1 prop)
• src/lib/process/fmutex.c (modified) (2 diffs, 1 prop)
• src/lib/sys/b_panic.c (added)
• src/lib/sys/libcfork.c (modified) (9 diffs, 1 prop)
• src/lib/sys/sharedpm.c (modified) (2 diffs, 1 prop)
• src/lib/sys/signals.c (modified) (4 diffs, 1 prop)

trunk/src/emx/ChangeLog.LIBC

@@ -1 +1 @@
 /* $Id$ */
+
+2005-07-03: knut st. osmundsen <bird-gccos2-spam@anduin.net>
+    - libc:
+        o Collected the different panic routines into one single routine
+          in the backend, __libc_Back_panic[V](). The routine supports
+          very simple printf like message formatting. By default it wil
+          dump any available registers and attempt dumping the process
+          before killing it. This behaviour can be configured with the
+          env var.: LIBC_PANIC=[nodump][terse][quiet][breakpoint]
 
 2005-07-02: knut st. osmundsen <bird-gccos2-spam@anduin.net>

trunk/src/emx/include/InnoTekLIBC/backend.h

@@ -38 +38 @@
 #include <signal.h>
 #include <emx/io.h>
+#include <stdarg.h>
 
 
@@ -1040 +1041 @@
 /** @} */
 
+
+/** @defgroup grp_Back_panic    LIBC Backend - Panic Routines
+ * @{ */
+
+/** The panic was caused by a signal. Drop the LIBC PANIC line. */
+#define __LIBC_PANIC_SIGNAL         1
+/** Don't set the SPM termination code / status. When set the caller is
+ * responsible for doing this. */
+#define __LIBC_PANIC_NO_SPM_TERM    2
+
+/**
+ * Print a panic message and dump/kill the process.
+ *
+ * @param   fFlags      A combination of the __LIBC_PANIC_* defines.
+ * @param   pvCtx       Pointer to a context record if available. This is a PCONTEXTRECORD.
+ * @param   pszFormat   User message which may contain %s and %x.
+ * @param   ...         String pointers and unsigned intergers as specified by the %s and %x in pszFormat.
+ */
+void __libc_Back_panic(unsigned fFlags, void *pvCtx, const char *pszFormat, ...) __attribute__((__noreturn__));
+
+/**
+ * Print a panic message and dump/kill the process.
+ *
+ * @param   fFlags      A combination of the __LIBC_PANIC_* defines.
+ * @param   pvCtx       Pointer to a context record if available. This is a PCONTEXTRECORD.
+ * @param   pszFormat   User message which may contain %s and %x.
+ * @param   args        String pointers and unsigned intergers as specified by the %s and %x in pszFormat.
+ */
+void __libc_Back_panicV(unsigned fFlags, void *pvCtx, const char *pszFormat, va_list args) __attribute__((__noreturn__));
+
+/* @} */
+
 __END_DECLS
 

trunk/src/emx/include/emx/umalloc.h

@@ -807 +807 @@
 
 
-static __inline__ void _um_abort (const char *pszmsg)
-{
-  /* Use the 'syscall' write for safest possible path. */
-  extern int __write (int handle, const void *buf, size_t nbytes);
-  __write (2, "\r\n!_um_abort!", 13);
-  if (pszmsg)
-    {
-      const char *psz = pszmsg;
-      while (*psz)
-        psz++;
-      __write (2, " ", 1);
-      __write (2, pszmsg, psz - pszmsg);
-    }
-  __write (2, "\r\n", 2);
-  __asm__ __volatile__ ("int $3");
-}
-
+void _um_abort (const char *, ...)  __attribute__((__noreturn__));
 
 #if defined (__cplusplus)

trunk/src/emx/src/lib/libc.def

@@ -1917 +1917 @@
     "__ufc_output_conversion_r" @1916
     "__ufc_setup_salt_r" @1917
+    "___libc_Back_panic" @1918
+    "___libc_Back_panicV" @1919
+    "__um_abort" @1920

trunk/src/emx/src/lib/malloc/_hinitheap.c

@@ -90 +90 @@
     if (!pvInitial)
     {
-        abort();
+        _um_abort("_hinitheap: __libc_HimemDefaultAlloc failed!\n");
         return NULL;
     }
@@ -103 +103 @@
     if (Heap == NULL)
     {
-        abort();
+        _um_abort("_hinitheap: _ucreate2 failed!\n");
         return NULL;
     }
     if (_uopen(Heap) != 0)
     {
-        abort();
+        _um_abort("_hinitheap: _uopen(%p) failed!\n", Heap);
         return NULL;
     }

trunk/src/emx/src/lib/malloc/_linitheap.c

@@ -75 +75 @@
     if (pvInitial == (void *)-1)
     {
-        abort();
+        _um_abort("_linitheap: sbrk failed!\n");
         return NULL;
     }
@@ -88 +88 @@
     if (Heap == NULL)
     {
-        abort();
+        _um_abort("_linitheap: _ucreate2 failed!\n");
         return NULL;
     }
     if (_uopen(Heap) != 0)
     {
-        abort();
+        _um_abort("_linitheap: _uopen(%p) failed!\n", Heap);
         return NULL;
     }

trunk/src/emx/src/lib/malloc/ifree.c

@@ -40 +40 @@
   if (*patch == NULL)
     {
-      _um_abort ("Corrupt heap? (Patch not found.)");
+      _um_abort ("_um_crate_free: patch not found! patch=%p crate=%p crateset=%p\n",
+                 patch, crate, crateset);
       return;
     }
@@ -126 +127 @@
   if (_UM_HDR_STATUS (hdr) == _UMS_FREE)
     {
-      _um_abort ("Tried to free block twice! (free)");
+      _um_abort ("_um_free_maybe_lock: Tried to free block twice - block=%p lock=%d\n",
+                 block, lock);
       return;
     }
@@ -141 +143 @@
       break;
     default:
-      _um_abort ("Corrupt heap or passing wrong pointer to free! (bad parent magic)");
+      _um_abort ("_um_free_maybe_lock: bad parent magic %x, parent=%p block=%p lock=%d\n",
+                 *parent, parent, block, lock);
       return;
 

trunk/src/emx/src/lib/malloc/imisc.c

@@ -9 +9 @@
 #include <sys/fmutex.h>
 #include <emx/umalloc.h>
+#include <InnoTekLIBC/backend.h>
 
 /* Leave FLS undefined if __fls() is not available.  __fls() is
@@ -33 +34 @@
     if (_UM_BUCKET_SIZE (bucket) <= rsize)
       return bucket;
-  abort ();                     /* RSIZE is probably not rounded! */
+  _um_abort ("_um_find_bucked: rsize=%x\n", rsize); /* RSIZE is probably not rounded! */
 #endif
 }
@@ -162 +163 @@
   _um_lump_link_heap (h, lump);
 }
+
+
+void _um_abort (const char *pszMsg, ...)
+{
+  va_list args;
+  va_start(args, pszMsg);
+  __libc_Back_panicV(0, NULL, pszMsg, args);
+  va_end(args);
+}
+

trunk/src/emx/src/lib/malloc/irealloc.c

@@ -316 +316 @@
   if (_UM_HDR_STATUS (hdr) == _UMS_FREE)
     {
-      _um_abort ("Tried to free block twice! (realloc)");
+      _um_abort ("_um_free_maybe_lock: Tried to reallocate freed block - block=%p new_size=%x align=%x flags=%x\n",
+                 block, new_size, align, flags);
       errno = EINVAL;
       return NULL;
@@ -337 +338 @@
     default:
       {
-        _um_abort ("Corrupt heap or passing wrong pointer to realloc! (bad parent magic)");
+        _um_abort ("_um_realloc: bad parent magic %x, parent=%p block=%p new_size=%x align=%x flags=%x\n",
+                   *parent, parent, block, new_size, align, flags);
         errno = EINVAL;
         return NULL;

trunk/src/emx/src/lib/malloc/uheapmin.c

@@ -64 +64 @@
                 }
               else
-                abort ();
+                 _um_abort ("_uheapmin: shrink_size=%x seg->size=%x\n", shrink_size, seg->size);
             }
           else

trunk/src/emx/src/lib/process/fmutex.c

@@ -17 +17 @@
 #define __LIBC_LOG_GROUP __LIBC_LOG_GRP_MUTEX
 #include <InnoTekLIBC/logstrict.h>
+#include <InnoTekLIBC/backend.h>
 
 /*******************************************************************************
@@ -308 +309 @@
 }
 
-static void __fmutex_deadlock_hex(unsigned u, unsigned cDigits)
-{
-    static const char szHex[17] = "0123456789abcdef";
-    ULONG cb;
-    char sz[32];
-    if (u <= 0xf && cDigits <= 1)
-    {
-        sz[0] = szHex[u & 0xf];
-        sz[1] = '\0';
-        cb = 1;
-    }
-    if (u <= 0xff && cDigits <= 2)
-    {
-        sz[0] = szHex[u >> 4];
-        sz[1] = szHex[u & 0xf];
-        sz[2] = '\0';
-        cb = 2;
-    }
-    else if (u <= 0xffff && cDigits <= 4)
-    {
-        sz[0] = szHex[u >> 12];
-        sz[1] = szHex[(u >> 8) & 0xf];
-        sz[2] = szHex[(u >> 4) & 0xf];
-        sz[3] = szHex[u & 0xf];
-        sz[4] = '\0';
-        cb = 4;
-    }
-    else
-    {
-        sz[0] = szHex[u >> 28];
-        sz[1] = szHex[(u >> 24) & 0xf];
-        sz[2] = szHex[(u >> 20) & 0xf];
-        sz[3] = szHex[(u >> 16) & 0xf];
-        sz[4] = szHex[(u >> 12) & 0xf];
-        sz[5] = szHex[(u >>  8) & 0xf];
-        sz[6] = szHex[(u >>  4) & 0xf];
-        sz[7] = szHex[u & 0xf];
-        sz[8] = '\0';
-        cb = 8;
-    }
-    DosWrite(2, sz, cb, &cb);
-}
-
 static void __fmutex_deadlock(_fmutex *pSem, const char *pszMsg)
 {
-    ULONG ul;
-    static const char szMsg[] = "\r\n!!!deadlock!!! fmutex ";
-    DosWrite(2, szMsg, sizeof(szMsg) - 1, &ul);
-    if (pSem->pszDesc)
-        DosWrite(2, pSem->pszDesc, strlen(pSem->pszDesc), &ul);
-    if (pszMsg)
-    {
-        DosWrite(2, ": ", 2, &ul);
-        DosWrite(2, pszMsg, strlen(pszMsg), &ul);
-    }
-    static const char szMsg2[] = "\r\nOwner=0x";
-    DosWrite(2, szMsg2, sizeof(szMsg2) - 1, &ul);
-    __fmutex_deadlock_hex(pSem->Owner, 8);
-    static const char szMsg3[] = " Self=0x";
-    DosWrite(2, szMsg3, sizeof(szMsg3) - 1, &ul);
-    __fmutex_deadlock_hex(fibGetTidPid(), 8);
-    static const char szMsg4[] = " fs=0x";
-    DosWrite(2, szMsg4, sizeof(szMsg4) - 1, &ul);
-    __fmutex_deadlock_hex(pSem->fs, 2);
-    static const char szMsg5[] = "\r\n";
-    DosWrite(2, szMsg5, sizeof(szMsg5) - 1, &ul);
-
-    __asm__ __volatile__("movl $0xdead10cc, %%eax; movl $0xdead10cc, %%edx; movl %0, %%ecx; int $3" : : "m" (pSem) : "%eax", "%edx", "%ecx");
+    __libc_Back_panic(0, NULL,
+                      "fmutex deadlock: %s\n"
+                      "%x: Owner=%x Self=%x fs=%x flags=%x hev=%x\n"
+                      "            Desc=\"%s\"\n",
+                      pszMsg,
+                      pSem, pSem->Owner, fibGetTidPid(), pSem->fs, pSem->flags, pSem->hev,
+                      pSem->pszDesc);
 }
 

trunk/src/emx/src/lib/sys/libcfork.c

@@ -155 +155 @@
 static int                  forkBthCallbacksCall(__LIBC_PFORKCALLBACK *papCallbacks, __LIBC_PFORKHANDLE pForkHandle, __LIBC_FORKOP enmOperation);
 static void                 forkBthDumpMemFlags(void *pv);
-static void                 forkChlFatalError(__LIBC_PFORKHANDLE pForkHandle, int rc) __attribute__((__noreturn__));
+static void                 forkChlFatalError(__LIBC_PFORKHANDLE pForkHandle, int rc, void *pvCtx) __attribute__((__noreturn__));
 static ULONG _System        forkChlExceptionHandler(PEXCEPTIONREPORTRECORD       pXcptRepRec,
                                                     PEXCEPTIONREGISTRATIONRECORD pXcptRegRec,
@@ -1061 +1061 @@
                            PAG_READ | PAG_WRITE | PAG_COMMIT);
         if (rc)
-            forkChlFatalError(pForkHandle, -__libc_native2errno(rc));
+            forkChlFatalError(pForkHandle, -__libc_native2errno(rc), NULL);
     }
     else
@@ -1118 +1118 @@
     rc = forkBthBufferGiveWaitNext(pForkHandle, __LIBC_FORK_CTX_CHILD);
     if (rc < 0)
-        forkChlFatalError(pForkHandle, rc);
+        forkChlFatalError(pForkHandle, rc, NULL);
 
     /*
@@ -1130 +1130 @@
     LIBC_ASSERTM(pModules, "No fork modules in child process!!!!\n");
     if (!pModules)
-        forkChlFatalError(pForkHandle, -EDOOFUS);
+        forkChlFatalError(pForkHandle, -EDOOFUS, NULL);
 
     /*
@@ -1137 +1137 @@
     rc = forkChlRunForkChild(pForkHandle, pModules);
     if (rc < 0)
-        forkChlFatalError(pForkHandle, rc);
+        forkChlFatalError(pForkHandle, rc, NULL);
 
 
@@ -2019 +2019 @@
                 rc = pHdr->u.Abort.err;
                 if (enmCtx == __LIBC_FORK_CTX_CHILD)
-                    forkChlFatalError(pForkHandle, rc);
+                    forkChlFatalError(pForkHandle, rc, NULL);
                 break;
 
@@ -2510 +2510 @@
  * @param   pForkHandle     Pointer to fork handle.
  * @param   rc              The return code (negative) which caused the failure.
- */
-void                 forkChlFatalError(__LIBC_PFORKHANDLE pForkHandle, int rc)
-{
-    LIBCLOG_ENTER("pForkHandle=%p rc=%d\n", (void *)pForkHandle, rc);
-    static const char   szMsg[] = "LIBC Error: Child aborting fork()!\r\n";
-    ULONG               cbWritten;
+ * @param   pvCtx           Context if available.
+ */
+void                 forkChlFatalError(__LIBC_PFORKHANDLE pForkHandle, int rc, void *pvCtx)
+{
+    LIBCLOG_ENTER("pForkHandle=%p rc=%d pvCtx=%p\n", (void *)pForkHandle, rc, pvCtx);
     PID                 pid;
     TID                 tid;
@@ -2569 +2568 @@
      * Exit process.
      */
-    DosWrite(2, szMsg, sizeof(szMsg) - 1, &cbWritten);
-    for (;;)
-    {
-        LIBCLOG_MSG("Calling DosExit(EXIT_PROCESS, 0xffff)...\n");
-        DosExit(EXIT_PROCESS, /*fixme*/0xffff);
-    }
+    __libc_Back_panic(__LIBC_PANIC_NO_SPM_TERM, pvCtx, "LIBC fork: Child aborting fork()! rc=%x\n", rc);
 }
 
@@ -2755 +2749 @@
             {
                 DosPostEventSem(pForkHandle->hevParent);
-                forkChlFatalError(pForkHandle, -EINTR);
+                forkChlFatalError(pForkHandle, -EINTR, pCtx);
             }
             break;

trunk/src/emx/src/lib/sys/sharedpm.c

@@ -3805 +3805 @@
     {
         /*
-         * This isn't wrong just unlikely and must be ignored!
+         * This isn't wrong, just unlikely and must be ignored!
          */
         case XCPT_ASYNC_PROCESS_TERMINATE:
@@ -3891 +3891 @@
     spmCheck(1, 1);
 #endif
+    __libc_Back_panic(__LIBC_PANIC_NO_SPM_TERM, pCtx,
+                      "SPM Exception %x (%x,%x,%x,%x)%s\n",
+                      pRepRec->ExceptionNum,
+                      pRepRec->ExceptionInfo[0],
+                      pRepRec->ExceptionInfo[1],
+                      pRepRec->ExceptionInfo[2],
+                      pRepRec->ExceptionInfo[3],
+                      !rc && pPib->pib_ulpid == pid && pTib->tib_ptib2->tib2_ultid == tid ? " - Owner of the mutex" : "");
     return XCPT_CONTINUE_SEARCH;
 }

trunk/src/emx/src/lib/sys/signals.c

@@ -1893 +1893 @@
 
                 /*
-                 * Kill process / dump core (no cores for LIBC!).
+                 * Kill process / dump core.
                  */
                 case SPA_NEXT_KILL:
@@ -2078 +2078 @@
 
 /**
- * Calculates the length of a string.
- * @returns String length in bytes.
- * @param   psz     Pointer to the string.
- */
-static size_t signalTerminateStrLen(const char *psz)
-{
-    const char *pszEnd = psz;
-    while (*pszEnd)
-        pszEnd++;
-    return pszEnd - psz;
-}
-
-
-/**
- * Termination time hex formatter.
- *
- * @returns number of bytes formatted.
- * @param   pszBuf  Where to store the formatted number.
- * @param   u       Number to format.
- * @param   cDigits Minimum number of digits in the output. Use 0 for whatever fits.
- */
-static int signalTerminateHex(char *pszBuf, unsigned u, unsigned cDigits)
-{
-    static const char szHex[17] = "0123456789abcdef";
-    if (u <= 0xf && cDigits <= 1)
-    {
-        pszBuf[0] = szHex[u & 0xf];
-        pszBuf[1] = '\0';
-        return 1;
-    }
-    if (u <= 0xff && cDigits <= 2)
-    {
-        pszBuf[0] = szHex[u >> 4];
-        pszBuf[1] = szHex[u & 0xf];
-        pszBuf[2] = '\0';
-        return 2;
-    }
-    else if (u <= 0xffff && cDigits <= 4)
-    {
-        pszBuf[0] = szHex[u >> 12];
-        pszBuf[1] = szHex[(u >> 8) & 0xf];
-        pszBuf[2] = szHex[(u >> 4) & 0xf];
-        pszBuf[3] = szHex[u & 0xf];
-        pszBuf[4] = '\0';
-        return 4;
-    }
-    else
-    {
-        pszBuf[0] = szHex[u >> 28];
-        pszBuf[1] = szHex[(u >> 24) & 0xf];
-        pszBuf[2] = szHex[(u >> 20) & 0xf];
-        pszBuf[3] = szHex[(u >> 16) & 0xf];
-        pszBuf[4] = szHex[(u >> 12) & 0xf];
-        pszBuf[5] = szHex[(u >>  8) & 0xf];
-        pszBuf[6] = szHex[(u >>  4) & 0xf];
-        pszBuf[7] = szHex[u & 0xf];
-        pszBuf[8] = '\0';
-        return 8;
-    }
-}
-
-
-/**
  * Cause immediate process termination because of the given signal.
  *
@@ -2150 +2087 @@
 {
     LIBCLOG_ENTER("iSignalNo=%d\n", iSignalNo);
+
     /*
      * Set the exit reason in SPM.
@@ -2156 +2094 @@
 
     /*
-     * Before we go crazy here, let's release the semaphore.
-     *
-     * If possible we'll stay in the must complete section to
-     * be sure we get to the exit. If not we'll have to mess with
-     * exception handlers and such now.
-     */
-    //if (__libc_back_signalSemIsOwner())
-    //    DosReleaseMutexSem(ghmtxSignals);
-
-    /*
-     * Terminate the exception handler chain to avoid recursive trouble.
-     */
-    FS_VAR();
-    FS_SAVE_LOAD();
-    PTIB pTib;
-    PPIB pPib;
-    DosGetInfoBlocks(&pTib, &pPib);
-    pTib->tib_pexchain = END_OF_CHAIN;
-
-    /*
-     * Write message to stderr.
-     */
-    ULONG   cb;
-    char szHexNum[12];
-#define SIG_PRINT_C(msg)  DosWrite(HFILE_STDERR, msg, sizeof(msg) - 1, &cb)
-#define SIG_PRINT_P(msg)  DosWrite(HFILE_STDERR, msg, signalTerminateStrLen(msg), &cb)
-#define SIG_PRINT_H(hex)  DosWrite(HFILE_STDERR, szHexNum, signalTerminateHex(szHexNum, hex, 0), &cb)
-#define SIG_PRINT_H16(hex)  DosWrite(HFILE_STDERR, szHexNum, signalTerminateHex(szHexNum, hex, 4), &cb)
-#define SIG_PRINT_H32(hex)  DosWrite(HFILE_STDERR, szHexNum, signalTerminateHex(szHexNum, hex, 8), &cb)
-    if (iSignalNo == SIGABRT)
-        SIG_PRINT_C("\n\rAbnormal program termination");
+     * Panic
+     */
+    PCONTEXTRECORD pCtx = pvXcptParams ? pCtx = ((PEXCPTPARAMS)pvXcptParams)->pCtx : NULL;
+    if (iSignalNo < sizeof(gaszSignalNames) / sizeof(gaszSignalNames[0]))
+        __libc_Back_panic(__LIBC_PANIC_SIGNAL | __LIBC_PANIC_NO_SPM_TERM, pCtx, "Killed by %s\n", gaszSignalNames[iSignalNo]);
     else
-    {
-        SIG_PRINT_C("\n\rProcess terminated by ");
-
-        if (iSignalNo < sizeof(gaszSignalNames) / sizeof(gaszSignalNames[0]))
-            SIG_PRINT_P(gaszSignalNames[iSignalNo]);
-        else
-        {
-            SIG_PRINT_C("unknown signal ");
-            SIG_PRINT_H(iSignalNo);
-        }
-    }
-
-    /* pid */
-    SIG_PRINT_C(" - pid=0x"); SIG_PRINT_H16(pPib->pib_ulpid);
-
-    /* tid */
-    SIG_PRINT_C(" - tid=0x"); SIG_PRINT_H16(pTib->tib_ptib2->tib2_ultid);
-
-    /* executable name. */
-    static char szExeName[CCHMAXPATH];
-    if (!DosQueryModuleName(pPib->pib_hmte, sizeof(szExeName), &szExeName[0]))
-    {
-        static const char szHypen[] = " - ";
-        DosWrite(HFILE_STDERR, szHypen, sizeof(szHypen) - 1, &cb);
-
-        for (cb = 0; szExeName[cb];)
-            cb++;
-        DosWrite(HFILE_STDERR, szExeName, cb, &cb);
-    }
-
-    /* eip */
-    PCONTEXTRECORD pCtx;
-    if (    pvXcptParams
-        &&  (pCtx = ((PEXCPTPARAMS)pvXcptParams)->pCtx))
-    {
-        SIG_PRINT_C("\r\ncs:eip=");
-        SIG_PRINT_H16(pCtx->ctx_SegCs);
-        SIG_PRINT_C(":");
-        SIG_PRINT_H32(pCtx->ctx_RegEip);
-        if (pCtx->ctx_RegEip >= 0x10000)
-        {
-            HMODULE hmod;
-            ULONG iObj = 0;
-            ULONG offObj = 0;
-            if (!DosQueryModFromEIP(&hmod, &iObj, sizeof(szExeName), szExeName, &offObj, pCtx->ctx_RegEip))
-            {
-                SIG_PRINT_C(" - ");
-                SIG_PRINT_H(iObj);
-                SIG_PRINT_C(":");
-                SIG_PRINT_H32(offObj);
-                SIG_PRINT_C(" ");
-                SIG_PRINT_P(szExeName);
-            }
-        }
-    }
-
-    /* final newline */
-    SIG_PRINT_C("\r\n");
-
-    /*
-     * Terminate the process.
-     */
-    LIBCLOG_MSG("Calling DosKillProcess()\n");
-    for (;;)
-    {
-        DosKillProcess(DKP_PROCESS, fibGetPid());
-        DosExit(EXIT_PROCESS, 127);
-    }
+        __libc_Back_panic(__LIBC_PANIC_SIGNAL | __LIBC_PANIC_NO_SPM_TERM, pCtx, "Killed by unknown signal %d\n", iSignalNo);
+    LIBCLOG_MSG("panic failed\n"); /* shuts up gcc */
+    asm("int3");
 }