Mercurial > hg > octave-kai > gnulib-hg
annotate lib/c-stack.c @ 11505:a051fb724013
vc-list-files: fix another quoting bug
* build-aux/vc-list-files: Avoid sed backslash expansion
of pathological directory names.
author | Jim Meyering <meyering@redhat.com> |
---|---|
date | Sat, 25 Apr 2009 15:32:33 +0200 |
parents | ddb65537c2d0 |
children | 909daff94315 |
rev | line source |
---|---|
3902
f26afed46772
New file, from diffutils-2.8.2.
Jim Meyering <jim@meyering.net>
parents:
diff
changeset
|
1 /* Stack overflow handling. |
f26afed46772
New file, from diffutils-2.8.2.
Jim Meyering <jim@meyering.net>
parents:
diff
changeset
|
2 |
11049
8398d9f607b4
unistd: guarantee STDIN_FILENO here, for OS/2 EMX
Eric Blake <ebb9@byu.net>
parents:
10960
diff
changeset
|
3 Copyright (C) 2002, 2004, 2006, 2008, 2009 Free Software |
8398d9f607b4
unistd: guarantee STDIN_FILENO here, for OS/2 EMX
Eric Blake <ebb9@byu.net>
parents:
10960
diff
changeset
|
4 Foundation, Inc. |
3902
f26afed46772
New file, from diffutils-2.8.2.
Jim Meyering <jim@meyering.net>
parents:
diff
changeset
|
5 |
9309
bbbbbf4cd1c5
Change copyright notice from GPLv2+ to GPLv3+.
Bruno Haible <bruno@clisp.org>
parents:
7302
diff
changeset
|
6 This program is free software: you can redistribute it and/or modify |
3902
f26afed46772
New file, from diffutils-2.8.2.
Jim Meyering <jim@meyering.net>
parents:
diff
changeset
|
7 it under the terms of the GNU General Public License as published by |
9309
bbbbbf4cd1c5
Change copyright notice from GPLv2+ to GPLv3+.
Bruno Haible <bruno@clisp.org>
parents:
7302
diff
changeset
|
8 the Free Software Foundation; either version 3 of the License, or |
bbbbbf4cd1c5
Change copyright notice from GPLv2+ to GPLv3+.
Bruno Haible <bruno@clisp.org>
parents:
7302
diff
changeset
|
9 (at your option) any later version. |
3902
f26afed46772
New file, from diffutils-2.8.2.
Jim Meyering <jim@meyering.net>
parents:
diff
changeset
|
10 |
f26afed46772
New file, from diffutils-2.8.2.
Jim Meyering <jim@meyering.net>
parents:
diff
changeset
|
11 This program is distributed in the hope that it will be useful, |
f26afed46772
New file, from diffutils-2.8.2.
Jim Meyering <jim@meyering.net>
parents:
diff
changeset
|
12 but WITHOUT ANY WARRANTY; without even the implied warranty of |
f26afed46772
New file, from diffutils-2.8.2.
Jim Meyering <jim@meyering.net>
parents:
diff
changeset
|
13 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the |
f26afed46772
New file, from diffutils-2.8.2.
Jim Meyering <jim@meyering.net>
parents:
diff
changeset
|
14 GNU General Public License for more details. |
f26afed46772
New file, from diffutils-2.8.2.
Jim Meyering <jim@meyering.net>
parents:
diff
changeset
|
15 |
f26afed46772
New file, from diffutils-2.8.2.
Jim Meyering <jim@meyering.net>
parents:
diff
changeset
|
16 You should have received a copy of the GNU General Public License |
9309
bbbbbf4cd1c5
Change copyright notice from GPLv2+ to GPLv3+.
Bruno Haible <bruno@clisp.org>
parents:
7302
diff
changeset
|
17 along with this program. If not, see <http://www.gnu.org/licenses/>. */ |
3902
f26afed46772
New file, from diffutils-2.8.2.
Jim Meyering <jim@meyering.net>
parents:
diff
changeset
|
18 |
f26afed46772
New file, from diffutils-2.8.2.
Jim Meyering <jim@meyering.net>
parents:
diff
changeset
|
19 /* Written by Paul Eggert. */ |
f26afed46772
New file, from diffutils-2.8.2.
Jim Meyering <jim@meyering.net>
parents:
diff
changeset
|
20 |
f26afed46772
New file, from diffutils-2.8.2.
Jim Meyering <jim@meyering.net>
parents:
diff
changeset
|
21 /* NOTES: |
f26afed46772
New file, from diffutils-2.8.2.
Jim Meyering <jim@meyering.net>
parents:
diff
changeset
|
22 |
f26afed46772
New file, from diffutils-2.8.2.
Jim Meyering <jim@meyering.net>
parents:
diff
changeset
|
23 A program that uses alloca, dynamic arrays, or large local |
f26afed46772
New file, from diffutils-2.8.2.
Jim Meyering <jim@meyering.net>
parents:
diff
changeset
|
24 variables may extend the stack by more than a page at a time. If |
f26afed46772
New file, from diffutils-2.8.2.
Jim Meyering <jim@meyering.net>
parents:
diff
changeset
|
25 so, when the stack overflows the operating system may not detect |
f26afed46772
New file, from diffutils-2.8.2.
Jim Meyering <jim@meyering.net>
parents:
diff
changeset
|
26 the overflow until the program uses the array, and this module may |
f26afed46772
New file, from diffutils-2.8.2.
Jim Meyering <jim@meyering.net>
parents:
diff
changeset
|
27 incorrectly report a program error instead of a stack overflow. |
f26afed46772
New file, from diffutils-2.8.2.
Jim Meyering <jim@meyering.net>
parents:
diff
changeset
|
28 |
f26afed46772
New file, from diffutils-2.8.2.
Jim Meyering <jim@meyering.net>
parents:
diff
changeset
|
29 To avoid this problem, allocate only small objects on the stack; a |
f26afed46772
New file, from diffutils-2.8.2.
Jim Meyering <jim@meyering.net>
parents:
diff
changeset
|
30 program should be OK if it limits single allocations to a page or |
f26afed46772
New file, from diffutils-2.8.2.
Jim Meyering <jim@meyering.net>
parents:
diff
changeset
|
31 less. Allocate larger arrays in static storage, or on the heap |
f26afed46772
New file, from diffutils-2.8.2.
Jim Meyering <jim@meyering.net>
parents:
diff
changeset
|
32 (e.g., with malloc). Yes, this is a pain, but we don't know of any |
f26afed46772
New file, from diffutils-2.8.2.
Jim Meyering <jim@meyering.net>
parents:
diff
changeset
|
33 better solution that is portable. |
f26afed46772
New file, from diffutils-2.8.2.
Jim Meyering <jim@meyering.net>
parents:
diff
changeset
|
34 |
4915 | 35 No attempt has been made to deal with multithreaded applications. */ |
3902
f26afed46772
New file, from diffutils-2.8.2.
Jim Meyering <jim@meyering.net>
parents:
diff
changeset
|
36 |
7302
8a1a9361108c
* _fpending.c: Include <config.h> unconditionally, since we no
Paul Eggert <eggert@cs.ucla.edu>
parents:
6689
diff
changeset
|
37 #include <config.h> |
3902
f26afed46772
New file, from diffutils-2.8.2.
Jim Meyering <jim@meyering.net>
parents:
diff
changeset
|
38 |
f26afed46772
New file, from diffutils-2.8.2.
Jim Meyering <jim@meyering.net>
parents:
diff
changeset
|
39 #ifndef __attribute__ |
9613
c4fa39bf5223
Don't redefine __attribute__ without a need.
Bruno Haible <bruno@clisp.org>
parents:
9309
diff
changeset
|
40 # if __GNUC__ < 3 |
3902
f26afed46772
New file, from diffutils-2.8.2.
Jim Meyering <jim@meyering.net>
parents:
diff
changeset
|
41 # define __attribute__(x) |
f26afed46772
New file, from diffutils-2.8.2.
Jim Meyering <jim@meyering.net>
parents:
diff
changeset
|
42 # endif |
f26afed46772
New file, from diffutils-2.8.2.
Jim Meyering <jim@meyering.net>
parents:
diff
changeset
|
43 #endif |
f26afed46772
New file, from diffutils-2.8.2.
Jim Meyering <jim@meyering.net>
parents:
diff
changeset
|
44 |
f26afed46772
New file, from diffutils-2.8.2.
Jim Meyering <jim@meyering.net>
parents:
diff
changeset
|
45 #include "gettext.h" |
f26afed46772
New file, from diffutils-2.8.2.
Jim Meyering <jim@meyering.net>
parents:
diff
changeset
|
46 #define _(msgid) gettext (msgid) |
f26afed46772
New file, from diffutils-2.8.2.
Jim Meyering <jim@meyering.net>
parents:
diff
changeset
|
47 |
f26afed46772
New file, from diffutils-2.8.2.
Jim Meyering <jim@meyering.net>
parents:
diff
changeset
|
48 #include <errno.h> |
f26afed46772
New file, from diffutils-2.8.2.
Jim Meyering <jim@meyering.net>
parents:
diff
changeset
|
49 #ifndef ENOTSUP |
f26afed46772
New file, from diffutils-2.8.2.
Jim Meyering <jim@meyering.net>
parents:
diff
changeset
|
50 # define ENOTSUP EINVAL |
f26afed46772
New file, from diffutils-2.8.2.
Jim Meyering <jim@meyering.net>
parents:
diff
changeset
|
51 #endif |
f26afed46772
New file, from diffutils-2.8.2.
Jim Meyering <jim@meyering.net>
parents:
diff
changeset
|
52 |
f26afed46772
New file, from diffutils-2.8.2.
Jim Meyering <jim@meyering.net>
parents:
diff
changeset
|
53 #include <signal.h> |
f26afed46772
New file, from diffutils-2.8.2.
Jim Meyering <jim@meyering.net>
parents:
diff
changeset
|
54 #if ! HAVE_STACK_T && ! defined stack_t |
f26afed46772
New file, from diffutils-2.8.2.
Jim Meyering <jim@meyering.net>
parents:
diff
changeset
|
55 typedef struct sigaltstack stack_t; |
f26afed46772
New file, from diffutils-2.8.2.
Jim Meyering <jim@meyering.net>
parents:
diff
changeset
|
56 #endif |
10276
adfc5a204195
Make c-stack use libsigsegv, when available.
Eric Blake <ebb9@byu.net>
parents:
10230
diff
changeset
|
57 #ifndef SIGSTKSZ |
adfc5a204195
Make c-stack use libsigsegv, when available.
Eric Blake <ebb9@byu.net>
parents:
10230
diff
changeset
|
58 # define SIGSTKSZ 16384 |
adfc5a204195
Make c-stack use libsigsegv, when available.
Eric Blake <ebb9@byu.net>
parents:
10230
diff
changeset
|
59 #endif |
3902
f26afed46772
New file, from diffutils-2.8.2.
Jim Meyering <jim@meyering.net>
parents:
diff
changeset
|
60 |
f26afed46772
New file, from diffutils-2.8.2.
Jim Meyering <jim@meyering.net>
parents:
diff
changeset
|
61 #include <stdlib.h> |
f26afed46772
New file, from diffutils-2.8.2.
Jim Meyering <jim@meyering.net>
parents:
diff
changeset
|
62 #include <string.h> |
f26afed46772
New file, from diffutils-2.8.2.
Jim Meyering <jim@meyering.net>
parents:
diff
changeset
|
63 |
10214
6fcac230dda4
Simplify c-stack prerequisites.
Eric Blake <ebb9@byu.net>
parents:
10213
diff
changeset
|
64 /* Posix 2001 declares ucontext_t in <ucontext.h>, Posix 200x in |
6fcac230dda4
Simplify c-stack prerequisites.
Eric Blake <ebb9@byu.net>
parents:
10213
diff
changeset
|
65 <signal.h>. */ |
3902
f26afed46772
New file, from diffutils-2.8.2.
Jim Meyering <jim@meyering.net>
parents:
diff
changeset
|
66 #if HAVE_UCONTEXT_H |
f26afed46772
New file, from diffutils-2.8.2.
Jim Meyering <jim@meyering.net>
parents:
diff
changeset
|
67 # include <ucontext.h> |
f26afed46772
New file, from diffutils-2.8.2.
Jim Meyering <jim@meyering.net>
parents:
diff
changeset
|
68 #endif |
f26afed46772
New file, from diffutils-2.8.2.
Jim Meyering <jim@meyering.net>
parents:
diff
changeset
|
69 |
6689
93d578c7aa44
* lib/c-stack.c: Include unistd.h unconditionally, since we now assume
Paul Eggert <eggert@cs.ucla.edu>
parents:
6259
diff
changeset
|
70 #include <unistd.h> |
3902
f26afed46772
New file, from diffutils-2.8.2.
Jim Meyering <jim@meyering.net>
parents:
diff
changeset
|
71 |
10276
adfc5a204195
Make c-stack use libsigsegv, when available.
Eric Blake <ebb9@byu.net>
parents:
10230
diff
changeset
|
72 #if HAVE_LIBSIGSEGV |
adfc5a204195
Make c-stack use libsigsegv, when available.
Eric Blake <ebb9@byu.net>
parents:
10230
diff
changeset
|
73 # include <sigsegv.h> |
adfc5a204195
Make c-stack use libsigsegv, when available.
Eric Blake <ebb9@byu.net>
parents:
10230
diff
changeset
|
74 #endif |
adfc5a204195
Make c-stack use libsigsegv, when available.
Eric Blake <ebb9@byu.net>
parents:
10230
diff
changeset
|
75 |
3902
f26afed46772
New file, from diffutils-2.8.2.
Jim Meyering <jim@meyering.net>
parents:
diff
changeset
|
76 #include "c-stack.h" |
f26afed46772
New file, from diffutils-2.8.2.
Jim Meyering <jim@meyering.net>
parents:
diff
changeset
|
77 #include "exitfail.h" |
f26afed46772
New file, from diffutils-2.8.2.
Jim Meyering <jim@meyering.net>
parents:
diff
changeset
|
78 |
10230
54813304edd2
Use sigaction module rather than signal().
Eric Blake <ebb9@byu.net>
parents:
10214
diff
changeset
|
79 #if defined SA_ONSTACK && defined SA_SIGINFO |
4969
0db24850c598
Fix c-stack.c portability bug on IRIX 5.3.
Paul Eggert <eggert@cs.ucla.edu>
parents:
4915
diff
changeset
|
80 # define SIGACTION_WORKS 1 |
0db24850c598
Fix c-stack.c portability bug on IRIX 5.3.
Paul Eggert <eggert@cs.ucla.edu>
parents:
4915
diff
changeset
|
81 #else |
0db24850c598
Fix c-stack.c portability bug on IRIX 5.3.
Paul Eggert <eggert@cs.ucla.edu>
parents:
4915
diff
changeset
|
82 # define SIGACTION_WORKS 0 |
10960
a412de948252
Make c-stack work on Haiku.
Ingo Weinhold <ingo_weinhold@gmx.de>
parents:
10851
diff
changeset
|
83 # ifndef SA_ONSTACK |
a412de948252
Make c-stack work on Haiku.
Ingo Weinhold <ingo_weinhold@gmx.de>
parents:
10851
diff
changeset
|
84 # define SA_ONSTACK 0 |
a412de948252
Make c-stack work on Haiku.
Ingo Weinhold <ingo_weinhold@gmx.de>
parents:
10851
diff
changeset
|
85 # endif |
4969
0db24850c598
Fix c-stack.c portability bug on IRIX 5.3.
Paul Eggert <eggert@cs.ucla.edu>
parents:
4915
diff
changeset
|
86 #endif |
0db24850c598
Fix c-stack.c portability bug on IRIX 5.3.
Paul Eggert <eggert@cs.ucla.edu>
parents:
4915
diff
changeset
|
87 |
3902
f26afed46772
New file, from diffutils-2.8.2.
Jim Meyering <jim@meyering.net>
parents:
diff
changeset
|
88 extern char *program_name; |
f26afed46772
New file, from diffutils-2.8.2.
Jim Meyering <jim@meyering.net>
parents:
diff
changeset
|
89 |
f26afed46772
New file, from diffutils-2.8.2.
Jim Meyering <jim@meyering.net>
parents:
diff
changeset
|
90 /* The user-specified action to take when a SEGV-related program error |
f26afed46772
New file, from diffutils-2.8.2.
Jim Meyering <jim@meyering.net>
parents:
diff
changeset
|
91 or stack overflow occurs. */ |
f26afed46772
New file, from diffutils-2.8.2.
Jim Meyering <jim@meyering.net>
parents:
diff
changeset
|
92 static void (* volatile segv_action) (int); |
f26afed46772
New file, from diffutils-2.8.2.
Jim Meyering <jim@meyering.net>
parents:
diff
changeset
|
93 |
f26afed46772
New file, from diffutils-2.8.2.
Jim Meyering <jim@meyering.net>
parents:
diff
changeset
|
94 /* Translated messages for program errors and stack overflow. Do not |
f26afed46772
New file, from diffutils-2.8.2.
Jim Meyering <jim@meyering.net>
parents:
diff
changeset
|
95 translate them in the signal handler, since gettext is not |
f26afed46772
New file, from diffutils-2.8.2.
Jim Meyering <jim@meyering.net>
parents:
diff
changeset
|
96 async-signal-safe. */ |
f26afed46772
New file, from diffutils-2.8.2.
Jim Meyering <jim@meyering.net>
parents:
diff
changeset
|
97 static char const * volatile program_error_message; |
f26afed46772
New file, from diffutils-2.8.2.
Jim Meyering <jim@meyering.net>
parents:
diff
changeset
|
98 static char const * volatile stack_overflow_message; |
f26afed46772
New file, from diffutils-2.8.2.
Jim Meyering <jim@meyering.net>
parents:
diff
changeset
|
99 |
f26afed46772
New file, from diffutils-2.8.2.
Jim Meyering <jim@meyering.net>
parents:
diff
changeset
|
100 /* Output an error message, then exit with status EXIT_FAILURE if it |
f26afed46772
New file, from diffutils-2.8.2.
Jim Meyering <jim@meyering.net>
parents:
diff
changeset
|
101 appears to have been a stack overflow, or with a core dump |
f26afed46772
New file, from diffutils-2.8.2.
Jim Meyering <jim@meyering.net>
parents:
diff
changeset
|
102 otherwise. This function is async-signal-safe. */ |
f26afed46772
New file, from diffutils-2.8.2.
Jim Meyering <jim@meyering.net>
parents:
diff
changeset
|
103 |
f26afed46772
New file, from diffutils-2.8.2.
Jim Meyering <jim@meyering.net>
parents:
diff
changeset
|
104 static void die (int) __attribute__ ((noreturn)); |
f26afed46772
New file, from diffutils-2.8.2.
Jim Meyering <jim@meyering.net>
parents:
diff
changeset
|
105 static void |
f26afed46772
New file, from diffutils-2.8.2.
Jim Meyering <jim@meyering.net>
parents:
diff
changeset
|
106 die (int signo) |
f26afed46772
New file, from diffutils-2.8.2.
Jim Meyering <jim@meyering.net>
parents:
diff
changeset
|
107 { |
4915 | 108 char const *message; |
3902
f26afed46772
New file, from diffutils-2.8.2.
Jim Meyering <jim@meyering.net>
parents:
diff
changeset
|
109 segv_action (signo); |
4915 | 110 message = signo ? program_error_message : stack_overflow_message; |
3902
f26afed46772
New file, from diffutils-2.8.2.
Jim Meyering <jim@meyering.net>
parents:
diff
changeset
|
111 write (STDERR_FILENO, program_name, strlen (program_name)); |
f26afed46772
New file, from diffutils-2.8.2.
Jim Meyering <jim@meyering.net>
parents:
diff
changeset
|
112 write (STDERR_FILENO, ": ", 2); |
f26afed46772
New file, from diffutils-2.8.2.
Jim Meyering <jim@meyering.net>
parents:
diff
changeset
|
113 write (STDERR_FILENO, message, strlen (message)); |
f26afed46772
New file, from diffutils-2.8.2.
Jim Meyering <jim@meyering.net>
parents:
diff
changeset
|
114 write (STDERR_FILENO, "\n", 1); |
f26afed46772
New file, from diffutils-2.8.2.
Jim Meyering <jim@meyering.net>
parents:
diff
changeset
|
115 if (! signo) |
f26afed46772
New file, from diffutils-2.8.2.
Jim Meyering <jim@meyering.net>
parents:
diff
changeset
|
116 _exit (exit_failure); |
10003 | 117 raise (signo); |
3902
f26afed46772
New file, from diffutils-2.8.2.
Jim Meyering <jim@meyering.net>
parents:
diff
changeset
|
118 abort (); |
f26afed46772
New file, from diffutils-2.8.2.
Jim Meyering <jim@meyering.net>
parents:
diff
changeset
|
119 } |
f26afed46772
New file, from diffutils-2.8.2.
Jim Meyering <jim@meyering.net>
parents:
diff
changeset
|
120 |
10358
37fd490ee38d
c-stack: test that stack overflow can be caught
Eric Blake <ebb9@byu.net>
parents:
10279
diff
changeset
|
121 #if (HAVE_SIGALTSTACK && HAVE_DECL_SIGALTSTACK \ |
37fd490ee38d
c-stack: test that stack overflow can be caught
Eric Blake <ebb9@byu.net>
parents:
10279
diff
changeset
|
122 && HAVE_STACK_OVERFLOW_HANDLING) || HAVE_LIBSIGSEGV |
10276
adfc5a204195
Make c-stack use libsigsegv, when available.
Eric Blake <ebb9@byu.net>
parents:
10230
diff
changeset
|
123 |
adfc5a204195
Make c-stack use libsigsegv, when available.
Eric Blake <ebb9@byu.net>
parents:
10230
diff
changeset
|
124 /* Storage for the alternate signal stack. */ |
adfc5a204195
Make c-stack use libsigsegv, when available.
Eric Blake <ebb9@byu.net>
parents:
10230
diff
changeset
|
125 static union |
adfc5a204195
Make c-stack use libsigsegv, when available.
Eric Blake <ebb9@byu.net>
parents:
10230
diff
changeset
|
126 { |
adfc5a204195
Make c-stack use libsigsegv, when available.
Eric Blake <ebb9@byu.net>
parents:
10230
diff
changeset
|
127 char buffer[SIGSTKSZ]; |
adfc5a204195
Make c-stack use libsigsegv, when available.
Eric Blake <ebb9@byu.net>
parents:
10230
diff
changeset
|
128 |
adfc5a204195
Make c-stack use libsigsegv, when available.
Eric Blake <ebb9@byu.net>
parents:
10230
diff
changeset
|
129 /* These other members are for proper alignment. There's no |
adfc5a204195
Make c-stack use libsigsegv, when available.
Eric Blake <ebb9@byu.net>
parents:
10230
diff
changeset
|
130 standard way to guarantee stack alignment, but this seems enough |
adfc5a204195
Make c-stack use libsigsegv, when available.
Eric Blake <ebb9@byu.net>
parents:
10230
diff
changeset
|
131 in practice. */ |
adfc5a204195
Make c-stack use libsigsegv, when available.
Eric Blake <ebb9@byu.net>
parents:
10230
diff
changeset
|
132 long double ld; |
adfc5a204195
Make c-stack use libsigsegv, when available.
Eric Blake <ebb9@byu.net>
parents:
10230
diff
changeset
|
133 long l; |
adfc5a204195
Make c-stack use libsigsegv, when available.
Eric Blake <ebb9@byu.net>
parents:
10230
diff
changeset
|
134 void *p; |
adfc5a204195
Make c-stack use libsigsegv, when available.
Eric Blake <ebb9@byu.net>
parents:
10230
diff
changeset
|
135 } alternate_signal_stack; |
adfc5a204195
Make c-stack use libsigsegv, when available.
Eric Blake <ebb9@byu.net>
parents:
10230
diff
changeset
|
136 |
adfc5a204195
Make c-stack use libsigsegv, when available.
Eric Blake <ebb9@byu.net>
parents:
10230
diff
changeset
|
137 static void |
adfc5a204195
Make c-stack use libsigsegv, when available.
Eric Blake <ebb9@byu.net>
parents:
10230
diff
changeset
|
138 null_action (int signo __attribute__ ((unused))) |
adfc5a204195
Make c-stack use libsigsegv, when available.
Eric Blake <ebb9@byu.net>
parents:
10230
diff
changeset
|
139 { |
adfc5a204195
Make c-stack use libsigsegv, when available.
Eric Blake <ebb9@byu.net>
parents:
10230
diff
changeset
|
140 } |
adfc5a204195
Make c-stack use libsigsegv, when available.
Eric Blake <ebb9@byu.net>
parents:
10230
diff
changeset
|
141 |
adfc5a204195
Make c-stack use libsigsegv, when available.
Eric Blake <ebb9@byu.net>
parents:
10230
diff
changeset
|
142 #endif /* SIGALTSTACK || LIBSIGSEGV */ |
adfc5a204195
Make c-stack use libsigsegv, when available.
Eric Blake <ebb9@byu.net>
parents:
10230
diff
changeset
|
143 |
adfc5a204195
Make c-stack use libsigsegv, when available.
Eric Blake <ebb9@byu.net>
parents:
10230
diff
changeset
|
144 /* Only use libsigsegv if we need it; platforms like Solaris can |
adfc5a204195
Make c-stack use libsigsegv, when available.
Eric Blake <ebb9@byu.net>
parents:
10230
diff
changeset
|
145 detect stack overflow without the overhead of an external |
adfc5a204195
Make c-stack use libsigsegv, when available.
Eric Blake <ebb9@byu.net>
parents:
10230
diff
changeset
|
146 library. */ |
adfc5a204195
Make c-stack use libsigsegv, when available.
Eric Blake <ebb9@byu.net>
parents:
10230
diff
changeset
|
147 #if HAVE_LIBSIGSEGV && ! HAVE_XSI_STACK_OVERFLOW_HEURISTIC |
adfc5a204195
Make c-stack use libsigsegv, when available.
Eric Blake <ebb9@byu.net>
parents:
10230
diff
changeset
|
148 |
adfc5a204195
Make c-stack use libsigsegv, when available.
Eric Blake <ebb9@byu.net>
parents:
10230
diff
changeset
|
149 /* Nonzero if general segv handler could not be installed. */ |
adfc5a204195
Make c-stack use libsigsegv, when available.
Eric Blake <ebb9@byu.net>
parents:
10230
diff
changeset
|
150 static volatile int segv_handler_missing; |
adfc5a204195
Make c-stack use libsigsegv, when available.
Eric Blake <ebb9@byu.net>
parents:
10230
diff
changeset
|
151 |
adfc5a204195
Make c-stack use libsigsegv, when available.
Eric Blake <ebb9@byu.net>
parents:
10230
diff
changeset
|
152 /* Handle a segmentation violation and exit if it cannot be stack |
adfc5a204195
Make c-stack use libsigsegv, when available.
Eric Blake <ebb9@byu.net>
parents:
10230
diff
changeset
|
153 overflow. This function is async-signal-safe. */ |
adfc5a204195
Make c-stack use libsigsegv, when available.
Eric Blake <ebb9@byu.net>
parents:
10230
diff
changeset
|
154 |
adfc5a204195
Make c-stack use libsigsegv, when available.
Eric Blake <ebb9@byu.net>
parents:
10230
diff
changeset
|
155 static int segv_handler (void *address __attribute__ ((unused)), |
adfc5a204195
Make c-stack use libsigsegv, when available.
Eric Blake <ebb9@byu.net>
parents:
10230
diff
changeset
|
156 int serious) |
adfc5a204195
Make c-stack use libsigsegv, when available.
Eric Blake <ebb9@byu.net>
parents:
10230
diff
changeset
|
157 { |
adfc5a204195
Make c-stack use libsigsegv, when available.
Eric Blake <ebb9@byu.net>
parents:
10230
diff
changeset
|
158 # if DEBUG |
adfc5a204195
Make c-stack use libsigsegv, when available.
Eric Blake <ebb9@byu.net>
parents:
10230
diff
changeset
|
159 { |
adfc5a204195
Make c-stack use libsigsegv, when available.
Eric Blake <ebb9@byu.net>
parents:
10230
diff
changeset
|
160 char buf[1024]; |
adfc5a204195
Make c-stack use libsigsegv, when available.
Eric Blake <ebb9@byu.net>
parents:
10230
diff
changeset
|
161 sprintf (buf, "segv_handler serious=%d\n", serious); |
adfc5a204195
Make c-stack use libsigsegv, when available.
Eric Blake <ebb9@byu.net>
parents:
10230
diff
changeset
|
162 write (STDERR_FILENO, buf, strlen (buf)); |
adfc5a204195
Make c-stack use libsigsegv, when available.
Eric Blake <ebb9@byu.net>
parents:
10230
diff
changeset
|
163 } |
adfc5a204195
Make c-stack use libsigsegv, when available.
Eric Blake <ebb9@byu.net>
parents:
10230
diff
changeset
|
164 # endif |
adfc5a204195
Make c-stack use libsigsegv, when available.
Eric Blake <ebb9@byu.net>
parents:
10230
diff
changeset
|
165 |
adfc5a204195
Make c-stack use libsigsegv, when available.
Eric Blake <ebb9@byu.net>
parents:
10230
diff
changeset
|
166 /* If this fault is not serious, return 0 to let the stack overflow |
adfc5a204195
Make c-stack use libsigsegv, when available.
Eric Blake <ebb9@byu.net>
parents:
10230
diff
changeset
|
167 handler take a shot at it. */ |
adfc5a204195
Make c-stack use libsigsegv, when available.
Eric Blake <ebb9@byu.net>
parents:
10230
diff
changeset
|
168 if (!serious) |
adfc5a204195
Make c-stack use libsigsegv, when available.
Eric Blake <ebb9@byu.net>
parents:
10230
diff
changeset
|
169 return 0; |
adfc5a204195
Make c-stack use libsigsegv, when available.
Eric Blake <ebb9@byu.net>
parents:
10230
diff
changeset
|
170 die (SIGSEGV); |
adfc5a204195
Make c-stack use libsigsegv, when available.
Eric Blake <ebb9@byu.net>
parents:
10230
diff
changeset
|
171 } |
adfc5a204195
Make c-stack use libsigsegv, when available.
Eric Blake <ebb9@byu.net>
parents:
10230
diff
changeset
|
172 |
adfc5a204195
Make c-stack use libsigsegv, when available.
Eric Blake <ebb9@byu.net>
parents:
10230
diff
changeset
|
173 /* Handle a segmentation violation that is likely to be a stack |
adfc5a204195
Make c-stack use libsigsegv, when available.
Eric Blake <ebb9@byu.net>
parents:
10230
diff
changeset
|
174 overflow and exit. This function is async-signal-safe. */ |
adfc5a204195
Make c-stack use libsigsegv, when available.
Eric Blake <ebb9@byu.net>
parents:
10230
diff
changeset
|
175 |
adfc5a204195
Make c-stack use libsigsegv, when available.
Eric Blake <ebb9@byu.net>
parents:
10230
diff
changeset
|
176 static void overflow_handler (int, stackoverflow_context_t) |
adfc5a204195
Make c-stack use libsigsegv, when available.
Eric Blake <ebb9@byu.net>
parents:
10230
diff
changeset
|
177 __attribute__ ((noreturn)); |
adfc5a204195
Make c-stack use libsigsegv, when available.
Eric Blake <ebb9@byu.net>
parents:
10230
diff
changeset
|
178 static void |
adfc5a204195
Make c-stack use libsigsegv, when available.
Eric Blake <ebb9@byu.net>
parents:
10230
diff
changeset
|
179 overflow_handler (int emergency, |
adfc5a204195
Make c-stack use libsigsegv, when available.
Eric Blake <ebb9@byu.net>
parents:
10230
diff
changeset
|
180 stackoverflow_context_t context __attribute__ ((unused))) |
adfc5a204195
Make c-stack use libsigsegv, when available.
Eric Blake <ebb9@byu.net>
parents:
10230
diff
changeset
|
181 { |
adfc5a204195
Make c-stack use libsigsegv, when available.
Eric Blake <ebb9@byu.net>
parents:
10230
diff
changeset
|
182 # if DEBUG |
adfc5a204195
Make c-stack use libsigsegv, when available.
Eric Blake <ebb9@byu.net>
parents:
10230
diff
changeset
|
183 { |
adfc5a204195
Make c-stack use libsigsegv, when available.
Eric Blake <ebb9@byu.net>
parents:
10230
diff
changeset
|
184 char buf[1024]; |
adfc5a204195
Make c-stack use libsigsegv, when available.
Eric Blake <ebb9@byu.net>
parents:
10230
diff
changeset
|
185 sprintf (buf, "overflow_handler emergency=%d segv_handler_missing=%d\n", |
adfc5a204195
Make c-stack use libsigsegv, when available.
Eric Blake <ebb9@byu.net>
parents:
10230
diff
changeset
|
186 emergency, segv_handler_missing); |
adfc5a204195
Make c-stack use libsigsegv, when available.
Eric Blake <ebb9@byu.net>
parents:
10230
diff
changeset
|
187 write (STDERR_FILENO, buf, strlen (buf)); |
adfc5a204195
Make c-stack use libsigsegv, when available.
Eric Blake <ebb9@byu.net>
parents:
10230
diff
changeset
|
188 } |
adfc5a204195
Make c-stack use libsigsegv, when available.
Eric Blake <ebb9@byu.net>
parents:
10230
diff
changeset
|
189 # endif |
adfc5a204195
Make c-stack use libsigsegv, when available.
Eric Blake <ebb9@byu.net>
parents:
10230
diff
changeset
|
190 |
adfc5a204195
Make c-stack use libsigsegv, when available.
Eric Blake <ebb9@byu.net>
parents:
10230
diff
changeset
|
191 die ((!emergency || segv_handler_missing) ? 0 : SIGSEGV); |
adfc5a204195
Make c-stack use libsigsegv, when available.
Eric Blake <ebb9@byu.net>
parents:
10230
diff
changeset
|
192 } |
adfc5a204195
Make c-stack use libsigsegv, when available.
Eric Blake <ebb9@byu.net>
parents:
10230
diff
changeset
|
193 |
adfc5a204195
Make c-stack use libsigsegv, when available.
Eric Blake <ebb9@byu.net>
parents:
10230
diff
changeset
|
194 int |
adfc5a204195
Make c-stack use libsigsegv, when available.
Eric Blake <ebb9@byu.net>
parents:
10230
diff
changeset
|
195 c_stack_action (void (*action) (int)) |
adfc5a204195
Make c-stack use libsigsegv, when available.
Eric Blake <ebb9@byu.net>
parents:
10230
diff
changeset
|
196 { |
adfc5a204195
Make c-stack use libsigsegv, when available.
Eric Blake <ebb9@byu.net>
parents:
10230
diff
changeset
|
197 segv_action = action ? action : null_action; |
adfc5a204195
Make c-stack use libsigsegv, when available.
Eric Blake <ebb9@byu.net>
parents:
10230
diff
changeset
|
198 program_error_message = _("program error"); |
adfc5a204195
Make c-stack use libsigsegv, when available.
Eric Blake <ebb9@byu.net>
parents:
10230
diff
changeset
|
199 stack_overflow_message = _("stack overflow"); |
adfc5a204195
Make c-stack use libsigsegv, when available.
Eric Blake <ebb9@byu.net>
parents:
10230
diff
changeset
|
200 |
adfc5a204195
Make c-stack use libsigsegv, when available.
Eric Blake <ebb9@byu.net>
parents:
10230
diff
changeset
|
201 /* Always install the overflow handler. */ |
adfc5a204195
Make c-stack use libsigsegv, when available.
Eric Blake <ebb9@byu.net>
parents:
10230
diff
changeset
|
202 if (stackoverflow_install_handler (overflow_handler, |
adfc5a204195
Make c-stack use libsigsegv, when available.
Eric Blake <ebb9@byu.net>
parents:
10230
diff
changeset
|
203 alternate_signal_stack.buffer, |
adfc5a204195
Make c-stack use libsigsegv, when available.
Eric Blake <ebb9@byu.net>
parents:
10230
diff
changeset
|
204 sizeof alternate_signal_stack.buffer)) |
adfc5a204195
Make c-stack use libsigsegv, when available.
Eric Blake <ebb9@byu.net>
parents:
10230
diff
changeset
|
205 { |
adfc5a204195
Make c-stack use libsigsegv, when available.
Eric Blake <ebb9@byu.net>
parents:
10230
diff
changeset
|
206 errno = ENOTSUP; |
adfc5a204195
Make c-stack use libsigsegv, when available.
Eric Blake <ebb9@byu.net>
parents:
10230
diff
changeset
|
207 return -1; |
adfc5a204195
Make c-stack use libsigsegv, when available.
Eric Blake <ebb9@byu.net>
parents:
10230
diff
changeset
|
208 } |
adfc5a204195
Make c-stack use libsigsegv, when available.
Eric Blake <ebb9@byu.net>
parents:
10230
diff
changeset
|
209 /* Try installing a general handler; if it fails, then treat all |
adfc5a204195
Make c-stack use libsigsegv, when available.
Eric Blake <ebb9@byu.net>
parents:
10230
diff
changeset
|
210 segv as stack overflow. */ |
adfc5a204195
Make c-stack use libsigsegv, when available.
Eric Blake <ebb9@byu.net>
parents:
10230
diff
changeset
|
211 segv_handler_missing = sigsegv_install_handler (segv_handler); |
adfc5a204195
Make c-stack use libsigsegv, when available.
Eric Blake <ebb9@byu.net>
parents:
10230
diff
changeset
|
212 return 0; |
adfc5a204195
Make c-stack use libsigsegv, when available.
Eric Blake <ebb9@byu.net>
parents:
10230
diff
changeset
|
213 } |
adfc5a204195
Make c-stack use libsigsegv, when available.
Eric Blake <ebb9@byu.net>
parents:
10230
diff
changeset
|
214 |
10358
37fd490ee38d
c-stack: test that stack overflow can be caught
Eric Blake <ebb9@byu.net>
parents:
10279
diff
changeset
|
215 #elif HAVE_SIGALTSTACK && HAVE_DECL_SIGALTSTACK && HAVE_STACK_OVERFLOW_HANDLING |
3902
f26afed46772
New file, from diffutils-2.8.2.
Jim Meyering <jim@meyering.net>
parents:
diff
changeset
|
216 |
f26afed46772
New file, from diffutils-2.8.2.
Jim Meyering <jim@meyering.net>
parents:
diff
changeset
|
217 /* Direction of the C runtime stack. This function is |
f26afed46772
New file, from diffutils-2.8.2.
Jim Meyering <jim@meyering.net>
parents:
diff
changeset
|
218 async-signal-safe. */ |
f26afed46772
New file, from diffutils-2.8.2.
Jim Meyering <jim@meyering.net>
parents:
diff
changeset
|
219 |
f26afed46772
New file, from diffutils-2.8.2.
Jim Meyering <jim@meyering.net>
parents:
diff
changeset
|
220 # if STACK_DIRECTION |
f26afed46772
New file, from diffutils-2.8.2.
Jim Meyering <jim@meyering.net>
parents:
diff
changeset
|
221 # define find_stack_direction(ptr) STACK_DIRECTION |
f26afed46772
New file, from diffutils-2.8.2.
Jim Meyering <jim@meyering.net>
parents:
diff
changeset
|
222 # else |
f26afed46772
New file, from diffutils-2.8.2.
Jim Meyering <jim@meyering.net>
parents:
diff
changeset
|
223 static int |
f26afed46772
New file, from diffutils-2.8.2.
Jim Meyering <jim@meyering.net>
parents:
diff
changeset
|
224 find_stack_direction (char const *addr) |
f26afed46772
New file, from diffutils-2.8.2.
Jim Meyering <jim@meyering.net>
parents:
diff
changeset
|
225 { |
f26afed46772
New file, from diffutils-2.8.2.
Jim Meyering <jim@meyering.net>
parents:
diff
changeset
|
226 char dummy; |
f26afed46772
New file, from diffutils-2.8.2.
Jim Meyering <jim@meyering.net>
parents:
diff
changeset
|
227 return ! addr ? find_stack_direction (&dummy) : addr < &dummy ? 1 : -1; |
f26afed46772
New file, from diffutils-2.8.2.
Jim Meyering <jim@meyering.net>
parents:
diff
changeset
|
228 } |
f26afed46772
New file, from diffutils-2.8.2.
Jim Meyering <jim@meyering.net>
parents:
diff
changeset
|
229 # endif |
f26afed46772
New file, from diffutils-2.8.2.
Jim Meyering <jim@meyering.net>
parents:
diff
changeset
|
230 |
4969
0db24850c598
Fix c-stack.c portability bug on IRIX 5.3.
Paul Eggert <eggert@cs.ucla.edu>
parents:
4915
diff
changeset
|
231 # if SIGACTION_WORKS |
3902
f26afed46772
New file, from diffutils-2.8.2.
Jim Meyering <jim@meyering.net>
parents:
diff
changeset
|
232 |
f26afed46772
New file, from diffutils-2.8.2.
Jim Meyering <jim@meyering.net>
parents:
diff
changeset
|
233 /* Handle a segmentation violation and exit. This function is |
f26afed46772
New file, from diffutils-2.8.2.
Jim Meyering <jim@meyering.net>
parents:
diff
changeset
|
234 async-signal-safe. */ |
f26afed46772
New file, from diffutils-2.8.2.
Jim Meyering <jim@meyering.net>
parents:
diff
changeset
|
235 |
f26afed46772
New file, from diffutils-2.8.2.
Jim Meyering <jim@meyering.net>
parents:
diff
changeset
|
236 static void segv_handler (int, siginfo_t *, void *) __attribute__((noreturn)); |
f26afed46772
New file, from diffutils-2.8.2.
Jim Meyering <jim@meyering.net>
parents:
diff
changeset
|
237 static void |
f26afed46772
New file, from diffutils-2.8.2.
Jim Meyering <jim@meyering.net>
parents:
diff
changeset
|
238 segv_handler (int signo, siginfo_t *info, |
f26afed46772
New file, from diffutils-2.8.2.
Jim Meyering <jim@meyering.net>
parents:
diff
changeset
|
239 void *context __attribute__ ((unused))) |
f26afed46772
New file, from diffutils-2.8.2.
Jim Meyering <jim@meyering.net>
parents:
diff
changeset
|
240 { |
f26afed46772
New file, from diffutils-2.8.2.
Jim Meyering <jim@meyering.net>
parents:
diff
changeset
|
241 /* Clear SIGNO if it seems to have been a stack overflow. */ |
11077
ddb65537c2d0
On HP-UX, don't pretend it was a SIGSEGV when it was a stack overflow.
Bruno Haible <bruno@clisp.org>
parents:
11049
diff
changeset
|
242 # if ! HAVE_XSI_STACK_OVERFLOW_HEURISTIC |
ddb65537c2d0
On HP-UX, don't pretend it was a SIGSEGV when it was a stack overflow.
Bruno Haible <bruno@clisp.org>
parents:
11049
diff
changeset
|
243 /* We can't easily determine whether it is a stack overflow; so |
ddb65537c2d0
On HP-UX, don't pretend it was a SIGSEGV when it was a stack overflow.
Bruno Haible <bruno@clisp.org>
parents:
11049
diff
changeset
|
244 assume that the rest of our program is perfect (!) and that |
ddb65537c2d0
On HP-UX, don't pretend it was a SIGSEGV when it was a stack overflow.
Bruno Haible <bruno@clisp.org>
parents:
11049
diff
changeset
|
245 this segmentation violation is a stack overflow. |
ddb65537c2d0
On HP-UX, don't pretend it was a SIGSEGV when it was a stack overflow.
Bruno Haible <bruno@clisp.org>
parents:
11049
diff
changeset
|
246 |
ddb65537c2d0
On HP-UX, don't pretend it was a SIGSEGV when it was a stack overflow.
Bruno Haible <bruno@clisp.org>
parents:
11049
diff
changeset
|
247 Note that although both Linux and Solaris provide |
ddb65537c2d0
On HP-UX, don't pretend it was a SIGSEGV when it was a stack overflow.
Bruno Haible <bruno@clisp.org>
parents:
11049
diff
changeset
|
248 sigaltstack, SA_ONSTACK, and SA_SIGINFO, currently only |
ddb65537c2d0
On HP-UX, don't pretend it was a SIGSEGV when it was a stack overflow.
Bruno Haible <bruno@clisp.org>
parents:
11049
diff
changeset
|
249 Solaris satisfies the XSI heueristic. This is because |
ddb65537c2d0
On HP-UX, don't pretend it was a SIGSEGV when it was a stack overflow.
Bruno Haible <bruno@clisp.org>
parents:
11049
diff
changeset
|
250 Solaris populates uc_stack with the details of the |
ddb65537c2d0
On HP-UX, don't pretend it was a SIGSEGV when it was a stack overflow.
Bruno Haible <bruno@clisp.org>
parents:
11049
diff
changeset
|
251 interrupted stack, while Linux populates it with the details |
ddb65537c2d0
On HP-UX, don't pretend it was a SIGSEGV when it was a stack overflow.
Bruno Haible <bruno@clisp.org>
parents:
11049
diff
changeset
|
252 of the current stack. */ |
ddb65537c2d0
On HP-UX, don't pretend it was a SIGSEGV when it was a stack overflow.
Bruno Haible <bruno@clisp.org>
parents:
11049
diff
changeset
|
253 signo = 0; |
ddb65537c2d0
On HP-UX, don't pretend it was a SIGSEGV when it was a stack overflow.
Bruno Haible <bruno@clisp.org>
parents:
11049
diff
changeset
|
254 # else |
3902
f26afed46772
New file, from diffutils-2.8.2.
Jim Meyering <jim@meyering.net>
parents:
diff
changeset
|
255 if (0 < info->si_code) |
f26afed46772
New file, from diffutils-2.8.2.
Jim Meyering <jim@meyering.net>
parents:
diff
changeset
|
256 { |
f26afed46772
New file, from diffutils-2.8.2.
Jim Meyering <jim@meyering.net>
parents:
diff
changeset
|
257 /* If the faulting address is within the stack, or within one |
f26afed46772
New file, from diffutils-2.8.2.
Jim Meyering <jim@meyering.net>
parents:
diff
changeset
|
258 page of the stack end, assume that it is a stack |
f26afed46772
New file, from diffutils-2.8.2.
Jim Meyering <jim@meyering.net>
parents:
diff
changeset
|
259 overflow. */ |
f26afed46772
New file, from diffutils-2.8.2.
Jim Meyering <jim@meyering.net>
parents:
diff
changeset
|
260 ucontext_t const *user_context = context; |
f26afed46772
New file, from diffutils-2.8.2.
Jim Meyering <jim@meyering.net>
parents:
diff
changeset
|
261 char const *stack_base = user_context->uc_stack.ss_sp; |
f26afed46772
New file, from diffutils-2.8.2.
Jim Meyering <jim@meyering.net>
parents:
diff
changeset
|
262 size_t stack_size = user_context->uc_stack.ss_size; |
f26afed46772
New file, from diffutils-2.8.2.
Jim Meyering <jim@meyering.net>
parents:
diff
changeset
|
263 char const *faulting_address = info->si_addr; |
f26afed46772
New file, from diffutils-2.8.2.
Jim Meyering <jim@meyering.net>
parents:
diff
changeset
|
264 size_t s = faulting_address - stack_base; |
f26afed46772
New file, from diffutils-2.8.2.
Jim Meyering <jim@meyering.net>
parents:
diff
changeset
|
265 size_t page_size = sysconf (_SC_PAGESIZE); |
10230
54813304edd2
Use sigaction module rather than signal().
Eric Blake <ebb9@byu.net>
parents:
10214
diff
changeset
|
266 if (find_stack_direction (NULL) < 0) |
3902
f26afed46772
New file, from diffutils-2.8.2.
Jim Meyering <jim@meyering.net>
parents:
diff
changeset
|
267 s += page_size; |
f26afed46772
New file, from diffutils-2.8.2.
Jim Meyering <jim@meyering.net>
parents:
diff
changeset
|
268 if (s < stack_size + page_size) |
f26afed46772
New file, from diffutils-2.8.2.
Jim Meyering <jim@meyering.net>
parents:
diff
changeset
|
269 signo = 0; |
f26afed46772
New file, from diffutils-2.8.2.
Jim Meyering <jim@meyering.net>
parents:
diff
changeset
|
270 |
4915 | 271 # if DEBUG |
3902
f26afed46772
New file, from diffutils-2.8.2.
Jim Meyering <jim@meyering.net>
parents:
diff
changeset
|
272 { |
f26afed46772
New file, from diffutils-2.8.2.
Jim Meyering <jim@meyering.net>
parents:
diff
changeset
|
273 char buf[1024]; |
f26afed46772
New file, from diffutils-2.8.2.
Jim Meyering <jim@meyering.net>
parents:
diff
changeset
|
274 sprintf (buf, |
f26afed46772
New file, from diffutils-2.8.2.
Jim Meyering <jim@meyering.net>
parents:
diff
changeset
|
275 "segv_handler fault=%p base=%p size=%lx page=%lx signo=%d\n", |
f26afed46772
New file, from diffutils-2.8.2.
Jim Meyering <jim@meyering.net>
parents:
diff
changeset
|
276 faulting_address, stack_base, (unsigned long) stack_size, |
f26afed46772
New file, from diffutils-2.8.2.
Jim Meyering <jim@meyering.net>
parents:
diff
changeset
|
277 (unsigned long) page_size, signo); |
f26afed46772
New file, from diffutils-2.8.2.
Jim Meyering <jim@meyering.net>
parents:
diff
changeset
|
278 write (STDERR_FILENO, buf, strlen (buf)); |
f26afed46772
New file, from diffutils-2.8.2.
Jim Meyering <jim@meyering.net>
parents:
diff
changeset
|
279 } |
4915 | 280 # endif |
11077
ddb65537c2d0
On HP-UX, don't pretend it was a SIGSEGV when it was a stack overflow.
Bruno Haible <bruno@clisp.org>
parents:
11049
diff
changeset
|
281 } |
3902
f26afed46772
New file, from diffutils-2.8.2.
Jim Meyering <jim@meyering.net>
parents:
diff
changeset
|
282 # endif |
f26afed46772
New file, from diffutils-2.8.2.
Jim Meyering <jim@meyering.net>
parents:
diff
changeset
|
283 |
f26afed46772
New file, from diffutils-2.8.2.
Jim Meyering <jim@meyering.net>
parents:
diff
changeset
|
284 die (signo); |
f26afed46772
New file, from diffutils-2.8.2.
Jim Meyering <jim@meyering.net>
parents:
diff
changeset
|
285 } |
f26afed46772
New file, from diffutils-2.8.2.
Jim Meyering <jim@meyering.net>
parents:
diff
changeset
|
286 # endif |
f26afed46772
New file, from diffutils-2.8.2.
Jim Meyering <jim@meyering.net>
parents:
diff
changeset
|
287 |
f26afed46772
New file, from diffutils-2.8.2.
Jim Meyering <jim@meyering.net>
parents:
diff
changeset
|
288 int |
4915 | 289 c_stack_action (void (*action) (int)) |
3902
f26afed46772
New file, from diffutils-2.8.2.
Jim Meyering <jim@meyering.net>
parents:
diff
changeset
|
290 { |
4915 | 291 int r; |
292 stack_t st; | |
10230
54813304edd2
Use sigaction module rather than signal().
Eric Blake <ebb9@byu.net>
parents:
10214
diff
changeset
|
293 struct sigaction act; |
4915 | 294 st.ss_flags = 0; |
10470
9867f4fee019
c-stack: work around Irix sigaltstack bug
Eric Blake <ebb9@byu.net>
parents:
10358
diff
changeset
|
295 # if SIGALTSTACK_SS_REVERSED |
9867f4fee019
c-stack: work around Irix sigaltstack bug
Eric Blake <ebb9@byu.net>
parents:
10358
diff
changeset
|
296 /* Irix mistakenly treats ss_sp as the upper bound, rather than |
9867f4fee019
c-stack: work around Irix sigaltstack bug
Eric Blake <ebb9@byu.net>
parents:
10358
diff
changeset
|
297 lower bound, of the alternate stack. */ |
9867f4fee019
c-stack: work around Irix sigaltstack bug
Eric Blake <ebb9@byu.net>
parents:
10358
diff
changeset
|
298 st.ss_sp = alternate_signal_stack.buffer + SIGSTKSZ - sizeof (void *); |
9867f4fee019
c-stack: work around Irix sigaltstack bug
Eric Blake <ebb9@byu.net>
parents:
10358
diff
changeset
|
299 st.ss_size = sizeof alternate_signal_stack.buffer - sizeof (void *); |
9867f4fee019
c-stack: work around Irix sigaltstack bug
Eric Blake <ebb9@byu.net>
parents:
10358
diff
changeset
|
300 # else |
4915 | 301 st.ss_sp = alternate_signal_stack.buffer; |
302 st.ss_size = sizeof alternate_signal_stack.buffer; | |
10470
9867f4fee019
c-stack: work around Irix sigaltstack bug
Eric Blake <ebb9@byu.net>
parents:
10358
diff
changeset
|
303 # endif |
10230
54813304edd2
Use sigaction module rather than signal().
Eric Blake <ebb9@byu.net>
parents:
10214
diff
changeset
|
304 r = sigaltstack (&st, NULL); |
3902
f26afed46772
New file, from diffutils-2.8.2.
Jim Meyering <jim@meyering.net>
parents:
diff
changeset
|
305 if (r != 0) |
f26afed46772
New file, from diffutils-2.8.2.
Jim Meyering <jim@meyering.net>
parents:
diff
changeset
|
306 return r; |
f26afed46772
New file, from diffutils-2.8.2.
Jim Meyering <jim@meyering.net>
parents:
diff
changeset
|
307 |
f26afed46772
New file, from diffutils-2.8.2.
Jim Meyering <jim@meyering.net>
parents:
diff
changeset
|
308 segv_action = action ? action : null_action; |
f26afed46772
New file, from diffutils-2.8.2.
Jim Meyering <jim@meyering.net>
parents:
diff
changeset
|
309 program_error_message = _("program error"); |
f26afed46772
New file, from diffutils-2.8.2.
Jim Meyering <jim@meyering.net>
parents:
diff
changeset
|
310 stack_overflow_message = _("stack overflow"); |
f26afed46772
New file, from diffutils-2.8.2.
Jim Meyering <jim@meyering.net>
parents:
diff
changeset
|
311 |
10230
54813304edd2
Use sigaction module rather than signal().
Eric Blake <ebb9@byu.net>
parents:
10214
diff
changeset
|
312 sigemptyset (&act.sa_mask); |
3902
f26afed46772
New file, from diffutils-2.8.2.
Jim Meyering <jim@meyering.net>
parents:
diff
changeset
|
313 |
10230
54813304edd2
Use sigaction module rather than signal().
Eric Blake <ebb9@byu.net>
parents:
10214
diff
changeset
|
314 # if SIGACTION_WORKS |
54813304edd2
Use sigaction module rather than signal().
Eric Blake <ebb9@byu.net>
parents:
10214
diff
changeset
|
315 /* POSIX 1003.1-2001 says SA_RESETHAND implies SA_NODEFER, but |
54813304edd2
Use sigaction module rather than signal().
Eric Blake <ebb9@byu.net>
parents:
10214
diff
changeset
|
316 this is not true on Solaris 8 at least. It doesn't hurt to use |
54813304edd2
Use sigaction module rather than signal().
Eric Blake <ebb9@byu.net>
parents:
10214
diff
changeset
|
317 SA_NODEFER here, so leave it in. */ |
54813304edd2
Use sigaction module rather than signal().
Eric Blake <ebb9@byu.net>
parents:
10214
diff
changeset
|
318 act.sa_flags = SA_NODEFER | SA_ONSTACK | SA_RESETHAND | SA_SIGINFO; |
54813304edd2
Use sigaction module rather than signal().
Eric Blake <ebb9@byu.net>
parents:
10214
diff
changeset
|
319 act.sa_sigaction = segv_handler; |
54813304edd2
Use sigaction module rather than signal().
Eric Blake <ebb9@byu.net>
parents:
10214
diff
changeset
|
320 # else |
10960
a412de948252
Make c-stack work on Haiku.
Ingo Weinhold <ingo_weinhold@gmx.de>
parents:
10851
diff
changeset
|
321 act.sa_flags = SA_NODEFER | SA_ONSTACK | SA_RESETHAND; |
10230
54813304edd2
Use sigaction module rather than signal().
Eric Blake <ebb9@byu.net>
parents:
10214
diff
changeset
|
322 act.sa_handler = die; |
54813304edd2
Use sigaction module rather than signal().
Eric Blake <ebb9@byu.net>
parents:
10214
diff
changeset
|
323 # endif |
3902
f26afed46772
New file, from diffutils-2.8.2.
Jim Meyering <jim@meyering.net>
parents:
diff
changeset
|
324 |
10851
d31da80e6c50
Treat SIGBUS like SIFSEGV on platforms that need it.
Bruno Haible <bruno@clisp.org>
parents:
10470
diff
changeset
|
325 # if FAULT_YIELDS_SIGBUS |
d31da80e6c50
Treat SIGBUS like SIFSEGV on platforms that need it.
Bruno Haible <bruno@clisp.org>
parents:
10470
diff
changeset
|
326 if (sigaction (SIGBUS, &act, NULL) < 0) |
d31da80e6c50
Treat SIGBUS like SIFSEGV on platforms that need it.
Bruno Haible <bruno@clisp.org>
parents:
10470
diff
changeset
|
327 return -1; |
d31da80e6c50
Treat SIGBUS like SIFSEGV on platforms that need it.
Bruno Haible <bruno@clisp.org>
parents:
10470
diff
changeset
|
328 # endif |
10230
54813304edd2
Use sigaction module rather than signal().
Eric Blake <ebb9@byu.net>
parents:
10214
diff
changeset
|
329 return sigaction (SIGSEGV, &act, NULL); |
3902
f26afed46772
New file, from diffutils-2.8.2.
Jim Meyering <jim@meyering.net>
parents:
diff
changeset
|
330 } |
f26afed46772
New file, from diffutils-2.8.2.
Jim Meyering <jim@meyering.net>
parents:
diff
changeset
|
331 |
10358
37fd490ee38d
c-stack: test that stack overflow can be caught
Eric Blake <ebb9@byu.net>
parents:
10279
diff
changeset
|
332 #else /* ! ((HAVE_SIGALTSTACK && HAVE_DECL_SIGALTSTACK |
37fd490ee38d
c-stack: test that stack overflow can be caught
Eric Blake <ebb9@byu.net>
parents:
10279
diff
changeset
|
333 && HAVE_STACK_OVERFLOW_HANDLING) || HAVE_LIBSIGSEGV) */ |
3902
f26afed46772
New file, from diffutils-2.8.2.
Jim Meyering <jim@meyering.net>
parents:
diff
changeset
|
334 |
f26afed46772
New file, from diffutils-2.8.2.
Jim Meyering <jim@meyering.net>
parents:
diff
changeset
|
335 int |
4915 | 336 c_stack_action (void (*action) (int) __attribute__ ((unused))) |
3902
f26afed46772
New file, from diffutils-2.8.2.
Jim Meyering <jim@meyering.net>
parents:
diff
changeset
|
337 { |
f26afed46772
New file, from diffutils-2.8.2.
Jim Meyering <jim@meyering.net>
parents:
diff
changeset
|
338 errno = ENOTSUP; |
f26afed46772
New file, from diffutils-2.8.2.
Jim Meyering <jim@meyering.net>
parents:
diff
changeset
|
339 return -1; |
f26afed46772
New file, from diffutils-2.8.2.
Jim Meyering <jim@meyering.net>
parents:
diff
changeset
|
340 } |
f26afed46772
New file, from diffutils-2.8.2.
Jim Meyering <jim@meyering.net>
parents:
diff
changeset
|
341 |
f26afed46772
New file, from diffutils-2.8.2.
Jim Meyering <jim@meyering.net>
parents:
diff
changeset
|
342 #endif |