abort.c 3.5 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126
  1. /* Copyright (C) 1991 Free Software Foundation, Inc.
  2. This file is part of the GNU C Library.
  3. The GNU C Library is free software; you can redistribute it and/or
  4. modify it under the terms of the GNU Library General Public License as
  5. published by the Free Software Foundation; either version 2 of the
  6. License, or (at your option) any later version.
  7. The GNU C Library is distributed in the hope that it will be useful,
  8. but WITHOUT ANY WARRANTY; without even the implied warranty of
  9. MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
  10. Library General Public License for more details.
  11. You should have received a copy of the GNU Library General Public
  12. License along with the GNU C Library; see the file COPYING.LIB. If
  13. not, write to the Free Software Foundation, Inc., 675 Mass Ave,
  14. Cambridge, MA 02139, USA. */
  15. /* Hacked up for uClibc by Erik Andersen */
  16. #define _GNU_SOURCE
  17. #include <features.h>
  18. #include <signal.h>
  19. #include <stdio.h>
  20. #include <stdlib.h>
  21. #include <string.h>
  22. #include <unistd.h>
  23. #include <signal.h>
  24. #include <errno.h>
  25. /* Our last ditch effort to commit suicide */
  26. #if defined(__i386__)
  27. #define ABORT_INSTRUCTION asm ("hlt")
  28. #elif defined(__ia64__)
  29. #define ABORT_INSTRUCTION asm ("break 0")
  30. #elif defined(__mc68000__)
  31. #define ABORT_INSTRUCTION asm (".long 0xffffffff")
  32. #elif defined(__mips__)
  33. #define ABORT_INSTRUCTION asm ("break 255")
  34. #elif defined(__s390__)
  35. #define ABORT_INSTRUCTION asm (".word 0")
  36. #elif defined(__sparc__)
  37. #define ABORT_INSTRUCTION asm ("unimp 0xf00")
  38. #elif defined(__x86_64__)
  39. #define ABORT_INSTRUCTION asm ("hlt")
  40. #elif defined(__hppa__)
  41. #define ABORT_INSTRUCTION asm ("iitlbp %r0,(%r0)")
  42. #elif defined(__powerpc__)
  43. #define ABORT_INSTRUCTION asm (".long 0")
  44. #elif defined(__SH5__)
  45. #define ABORT_INSTRUCTION asm ("movi 0x10, r9; shori 0xff, r9; trapa r9")
  46. #elif defined(__sh__)
  47. #define ABORT_INSTRUCTION asm ("trapa #0xff")
  48. #else
  49. #define ABORT_INSTRUCTION
  50. #endif
  51. extern void _exit __P((int __status)) __attribute__ ((__noreturn__));
  52. static int been_there_done_that = 0;
  53. /* Be prepared in case multiple threads try to abort(). */
  54. #ifdef __UCLIBC_HAS_THREADS__
  55. #include <pthread.h>
  56. static pthread_mutex_t mylock = PTHREAD_RECURSIVE_MUTEX_INITIALIZER_NP;
  57. # define LOCK __pthread_mutex_lock(&mylock)
  58. # define UNLOCK __pthread_mutex_unlock(&mylock);
  59. #else
  60. # define LOCK
  61. # define UNLOCK
  62. #endif
  63. /* Cause an abnormal program termination with core-dump. */
  64. void abort(void)
  65. {
  66. sigset_t sigset;
  67. /* Make sure we acquire the lock before proceeding. */
  68. LOCK;
  69. /* Unmask SIGABRT to be sure we can get it */
  70. if (__sigemptyset(&sigset) == 0 && __sigaddset(&sigset, SIGABRT) == 0) {
  71. sigprocmask(SIG_UNBLOCK, &sigset, (sigset_t *) NULL);
  72. }
  73. while (1) {
  74. /* Try to suicide with a SIGABRT. */
  75. if (been_there_done_that == 0) {
  76. been_there_done_that++;
  77. UNLOCK;
  78. raise(SIGABRT);
  79. LOCK;
  80. }
  81. /* Still here? Try to remove any signal handlers. */
  82. if (been_there_done_that == 1) {
  83. struct sigaction act;
  84. been_there_done_that++;
  85. memset (&act, '\0', sizeof (struct sigaction));
  86. act.sa_handler = SIG_DFL;
  87. __sigfillset (&act.sa_mask);
  88. act.sa_flags = 0;
  89. sigaction (SIGABRT, &act, NULL);
  90. }
  91. /* Still here? Try to suicide with an illegal instruction */
  92. if (been_there_done_that == 2) {
  93. been_there_done_that++;
  94. ABORT_INSTRUCTION;
  95. }
  96. /* Still here? Try to at least exit */
  97. if (been_there_done_that == 3) {
  98. been_there_done_that++;
  99. _exit (127);
  100. }
  101. /* Still here? We're screwed. Sleepy time. Good night */
  102. while (1)
  103. /* Try for ever and ever. */
  104. ABORT_INSTRUCTION;
  105. }
  106. }