2 Unix SMB/CIFS implementation.
3 Critical Fault handling
4 Copyright (C) Andrew Tridgell 1992-1998
5 Copyright (C) Tim Prouty 2009
7 This program is free software; you can redistribute it and/or modify
8 it under the terms of the GNU General Public License as published by
9 the Free Software Foundation; either version 3 of the License, or
10 (at your option) any later version.
12 This program is distributed in the hope that it will be useful,
13 but WITHOUT ANY WARRANTY; without even the implied warranty of
14 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
15 GNU General Public License for more details.
17 You should have received a copy of the GNU General Public License
18 along with this program. If not, see <http://www.gnu.org/licenses/>.
23 #ifdef HAVE_SYS_SYSCTL_H
24 #include <sys/sysctl.h>
28 #ifdef HAVE_SYS_PRCTL_H
29 #include <sys/prctl.h>
32 static void (*cont_fn
)(void *);
33 static char *corepath
;
35 /*******************************************************************
37 ********************************************************************/
38 static void fault_report(int sig
)
42 if (counter
) _exit(1);
47 DEBUG(0,("INTERNAL ERROR: Signal %d in pid %d (%s)",sig
,(int)sys_getpid(),samba_version_string()));
48 DEBUG(0,("\nPlease read the Trouble-Shooting section of the Samba3-HOWTO\n"));
49 DEBUG(0,("\nFrom: http://www.samba.org/samba/docs/Samba3-HOWTO.pdf\n"));
52 smb_panic("internal error");
57 CatchSignal(SIGSEGV
, SIG_DFL
);
60 CatchSignal(SIGBUS
, SIG_DFL
);
63 CatchSignal(SIGABRT
, SIG_DFL
);
65 return; /* this should cause a core dump */
70 /****************************************************************************
72 ****************************************************************************/
73 static void sig_fault(int sig
)
78 /*******************************************************************
79 setup our fault handlers
80 ********************************************************************/
81 void fault_setup(void (*fn
)(void *))
86 CatchSignal(SIGSEGV
, sig_fault
);
89 CatchSignal(SIGBUS
, sig_fault
);
92 CatchSignal(SIGABRT
, sig_fault
);
97 * Build up the default corepath as "<logbase>/cores/<progname>"
99 static char *get_default_corepath(const char *logbase
, const char *progname
)
103 /* Setup core dir in logbase. */
104 tmp_corepath
= talloc_asprintf(NULL
, "%s/cores", logbase
);
108 if ((mkdir(tmp_corepath
, 0700) == -1) && errno
!= EEXIST
)
111 if (chmod(tmp_corepath
, 0700) == -1)
114 talloc_free(tmp_corepath
);
116 /* Setup progname-specific core subdir */
117 tmp_corepath
= talloc_asprintf(NULL
, "%s/cores/%s", logbase
, progname
);
121 if (mkdir(tmp_corepath
, 0700) == -1 && errno
!= EEXIST
)
124 if (chown(tmp_corepath
, getuid(), getgid()) == -1)
127 if (chmod(tmp_corepath
, 0700) == -1)
133 talloc_free(tmp_corepath
);
138 * Get the FreeBSD corepath.
140 * On FreeBSD the current working directory is ignored when creating a core
141 * file. Instead the core directory is controlled via sysctl. This consults
142 * the value of "kern.corefile" so the correct corepath can be printed out
143 * before dump_core() calls abort.
145 #if (defined(FREEBSD) && defined(HAVE_SYSCTLBYNAME))
146 static char *get_freebsd_corepath(void)
148 char *tmp_corepath
= NULL
;
153 /* Loop with increasing sizes so we don't allocate too much. */
159 tmp_corepath
= (char *)talloc_realloc(NULL
, tmp_corepath
,
165 ret
= sysctlbyname("kern.corefile", tmp_corepath
, &len
, NULL
,
168 if (errno
!= ENOMEM
) {
169 DEBUG(0, ("sysctlbyname failed getting "
170 "kern.corefile %s\n",
175 /* Not a large enough array, try a bigger one. */
180 /* Strip off the common filename expansion */
181 if ((end
= strrchr_m(tmp_corepath
, '/'))) {
189 talloc_free(tmp_corepath
);
195 #if defined(HAVE_SYS_KERNEL_PROC_CORE_PATTERN)
198 * Get the Linux corepath.
200 * On Linux the contents of /proc/sys/kernel/core_pattern indicates the
201 * location of the core path.
203 static char *get_linux_corepath(void)
209 fd
= open("/proc/sys/kernel/core_pattern", O_RDONLY
, 0);
214 result
= afdgets(fd
, NULL
, 0);
217 if (result
== NULL
) {
221 if (result
[0] != '/') {
223 * No absolute path, use the default (cwd)
228 /* Strip off the common filename expansion */
230 end
= strrchr_m(result
, '/');
232 if ((end
!= result
) /* this would be the only / */
242 * Try getting system-specific corepath if one exists.
244 * If the system doesn't define a corepath, then the default is used.
246 static char *get_corepath(const char *logbase
, const char *progname
)
248 #if (defined(FREEBSD) && defined(HAVE_SYSCTLBYNAME))
249 char *tmp_corepath
= NULL
;
250 tmp_corepath
= get_freebsd_corepath();
252 /* If this has been set correctly, we're done. */
258 #if defined(HAVE_SYS_KERNEL_PROC_CORE_PATTERN)
259 char *tmp_corepath
= NULL
;
260 tmp_corepath
= get_linux_corepath();
262 /* If this has been set correctly, we're done. */
268 /* Fall back to the default. */
269 return get_default_corepath(logbase
, progname
);
272 /*******************************************************************
273 make all the preparations to safely dump a core file
274 ********************************************************************/
276 void dump_core_setup(const char *progname
)
278 char *logbase
= NULL
;
281 if (lp_logfile() && *lp_logfile()) {
282 if (asprintf(&logbase
, "%s", lp_logfile()) < 0) {
285 if ((end
= strrchr_m(logbase
, '/'))) {
289 /* We will end up here if the log file is given on the command
290 * line by the -l option but the "log file" option is not set
293 if (asprintf(&logbase
, "%s", get_dyn_LOGFILEBASE()) < 0) {
298 SMB_ASSERT(progname
!= NULL
);
300 corepath
= get_corepath(logbase
, progname
);
302 DEBUG(0, ("Unable to setup corepath for %s: %s\n", progname
,
308 #ifdef HAVE_GETRLIMIT
312 getrlimit(RLIMIT_CORE
, &rlp
);
313 rlp
.rlim_cur
= MAX(16*1024*1024,rlp
.rlim_cur
);
314 setrlimit(RLIMIT_CORE
, &rlp
);
315 getrlimit(RLIMIT_CORE
, &rlp
);
316 DEBUG(3,("Maximum core file size limits now %d(soft) %d(hard)\n",
317 (int)rlp
.rlim_cur
,(int)rlp
.rlim_max
));
322 #if defined(HAVE_PRCTL) && defined(PR_SET_DUMPABLE)
323 /* On Linux we lose the ability to dump core when we change our user
324 * ID. We know how to dump core safely, so let's make sure we have our
327 prctl(PR_SET_DUMPABLE
, 1);
330 /* FIXME: if we have a core-plus-pid facility, configurably set
342 DEBUG(0, ("dump_core() called recursive\n"));
347 /* Note that even if core dumping has been disabled, we still set up
348 * the core path. This is to handle the case where core dumping is
349 * turned on in smb.conf and the relevant daemon is not restarted.
351 if (!lp_enable_core_files()) {
352 DEBUG(0, ("Exiting on internal error (core file administratively disabled)\n"));
357 /* If we're running as non root we might not be able to dump the core
358 * file to the corepath. There must not be an unbecome_root() before
359 * we call abort(). */
360 if (geteuid() != sec_initial_uid()) {
364 if (corepath
== NULL
) {
365 DEBUG(0, ("Can not dump core: corepath not set up\n"));
369 if (*corepath
!= '\0') {
370 /* The chdir might fail if we dump core before we finish
371 * processing the config file.
373 if (chdir(corepath
) != 0) {
374 DEBUG(0, ("unable to change to %s\n", corepath
));
375 DEBUGADD(0, ("refusing to dump core\n"));
379 DEBUG(0,("dumping core in %s\n", corepath
));
385 /* Ensure we don't have a signal handler for abort. */
387 CatchSignal(SIGABRT
, SIG_DFL
);
392 #else /* DUMP_CORE */
394 #endif /* DUMP_CORE */