17c478bd9Sstevel@tonic-gate /*
27c478bd9Sstevel@tonic-gate * CDDL HEADER START
37c478bd9Sstevel@tonic-gate *
47c478bd9Sstevel@tonic-gate * The contents of this file are subject to the terms of the
5*a574db85Sraf * Common Development and Distribution License (the "License").
6*a574db85Sraf * You may not use this file except in compliance with the License.
77c478bd9Sstevel@tonic-gate *
87c478bd9Sstevel@tonic-gate * You can obtain a copy of the license at usr/src/OPENSOLARIS.LICENSE
97c478bd9Sstevel@tonic-gate * or http://www.opensolaris.org/os/licensing.
107c478bd9Sstevel@tonic-gate * See the License for the specific language governing permissions
117c478bd9Sstevel@tonic-gate * and limitations under the License.
127c478bd9Sstevel@tonic-gate *
137c478bd9Sstevel@tonic-gate * When distributing Covered Code, include this CDDL HEADER in each
147c478bd9Sstevel@tonic-gate * file and include the License file at usr/src/OPENSOLARIS.LICENSE.
157c478bd9Sstevel@tonic-gate * If applicable, add the following below this CDDL HEADER, with the
167c478bd9Sstevel@tonic-gate * fields enclosed by brackets "[]" replaced with your own identifying
177c478bd9Sstevel@tonic-gate * information: Portions Copyright [yyyy] [name of copyright owner]
187c478bd9Sstevel@tonic-gate *
197c478bd9Sstevel@tonic-gate * CDDL HEADER END
207c478bd9Sstevel@tonic-gate */
21*a574db85Sraf
227c478bd9Sstevel@tonic-gate /*
23*a574db85Sraf * Copyright 2008 Sun Microsystems, Inc. All rights reserved.
247c478bd9Sstevel@tonic-gate * Use is subject to license terms.
257c478bd9Sstevel@tonic-gate */
267c478bd9Sstevel@tonic-gate
277c478bd9Sstevel@tonic-gate /*
287c478bd9Sstevel@tonic-gate * Failure routines for libumem (not standalone)
297c478bd9Sstevel@tonic-gate */
307c478bd9Sstevel@tonic-gate
317c478bd9Sstevel@tonic-gate #include <sys/types.h>
327c478bd9Sstevel@tonic-gate #include <signal.h>
337c478bd9Sstevel@tonic-gate #include <stdarg.h>
347c478bd9Sstevel@tonic-gate #include <string.h>
357c478bd9Sstevel@tonic-gate
367c478bd9Sstevel@tonic-gate #include "misc.h"
377c478bd9Sstevel@tonic-gate
387c478bd9Sstevel@tonic-gate static volatile int umem_exiting = 0;
397c478bd9Sstevel@tonic-gate #define UMEM_EXIT_ABORT 1
407c478bd9Sstevel@tonic-gate
417c478bd9Sstevel@tonic-gate static mutex_t umem_exit_lock = DEFAULTMUTEX; /* protects umem_exiting */
427c478bd9Sstevel@tonic-gate
437c478bd9Sstevel@tonic-gate static int
firstexit(int type)447c478bd9Sstevel@tonic-gate firstexit(int type)
457c478bd9Sstevel@tonic-gate {
467c478bd9Sstevel@tonic-gate if (umem_exiting)
477c478bd9Sstevel@tonic-gate return (0);
487c478bd9Sstevel@tonic-gate
497c478bd9Sstevel@tonic-gate (void) mutex_lock(&umem_exit_lock);
507c478bd9Sstevel@tonic-gate if (umem_exiting) {
517c478bd9Sstevel@tonic-gate (void) mutex_unlock(&umem_exit_lock);
527c478bd9Sstevel@tonic-gate return (0);
537c478bd9Sstevel@tonic-gate }
547c478bd9Sstevel@tonic-gate umem_exiting = type;
557c478bd9Sstevel@tonic-gate (void) mutex_unlock(&umem_exit_lock);
567c478bd9Sstevel@tonic-gate
577c478bd9Sstevel@tonic-gate return (1);
587c478bd9Sstevel@tonic-gate }
597c478bd9Sstevel@tonic-gate
607c478bd9Sstevel@tonic-gate /*
617c478bd9Sstevel@tonic-gate * We can't use abort(3C), since it closes all of the standard library
627c478bd9Sstevel@tonic-gate * FILEs, which can call free().
637c478bd9Sstevel@tonic-gate *
647c478bd9Sstevel@tonic-gate * In addition, we can't just raise(SIGABRT), since the current handler
657c478bd9Sstevel@tonic-gate * might do allocation. We give them once chance, though.
667c478bd9Sstevel@tonic-gate */
677c478bd9Sstevel@tonic-gate static void __NORETURN
umem_do_abort(void)687c478bd9Sstevel@tonic-gate umem_do_abort(void)
697c478bd9Sstevel@tonic-gate {
707c478bd9Sstevel@tonic-gate if (firstexit(UMEM_EXIT_ABORT))
717c478bd9Sstevel@tonic-gate (void) raise(SIGABRT);
727c478bd9Sstevel@tonic-gate
737c478bd9Sstevel@tonic-gate for (;;) {
747c478bd9Sstevel@tonic-gate (void) signal(SIGABRT, SIG_DFL);
757c478bd9Sstevel@tonic-gate (void) sigrelse(SIGABRT);
767c478bd9Sstevel@tonic-gate (void) raise(SIGABRT);
777c478bd9Sstevel@tonic-gate }
787c478bd9Sstevel@tonic-gate }
797c478bd9Sstevel@tonic-gate
807c478bd9Sstevel@tonic-gate #define SKIP_FRAMES 1 /* skip the panic frame */
817c478bd9Sstevel@tonic-gate #define ERR_STACK_FRAMES 128
827c478bd9Sstevel@tonic-gate
837c478bd9Sstevel@tonic-gate static void
print_stacktrace(void)847c478bd9Sstevel@tonic-gate print_stacktrace(void)
857c478bd9Sstevel@tonic-gate {
867c478bd9Sstevel@tonic-gate uintptr_t cur_stack[ERR_STACK_FRAMES];
877c478bd9Sstevel@tonic-gate
887c478bd9Sstevel@tonic-gate /*
897c478bd9Sstevel@tonic-gate * if we are in a signal context, checking for it will recurse
907c478bd9Sstevel@tonic-gate */
917c478bd9Sstevel@tonic-gate uint_t nframes = getpcstack(cur_stack, ERR_STACK_FRAMES, 0);
927c478bd9Sstevel@tonic-gate uint_t idx;
937c478bd9Sstevel@tonic-gate
947c478bd9Sstevel@tonic-gate if (nframes > SKIP_FRAMES) {
957c478bd9Sstevel@tonic-gate umem_printf("stack trace:\n");
967c478bd9Sstevel@tonic-gate
977c478bd9Sstevel@tonic-gate for (idx = SKIP_FRAMES; idx < nframes; idx++) {
987c478bd9Sstevel@tonic-gate (void) print_sym((void *)cur_stack[idx]);
997c478bd9Sstevel@tonic-gate umem_printf("\n");
1007c478bd9Sstevel@tonic-gate }
1017c478bd9Sstevel@tonic-gate }
1027c478bd9Sstevel@tonic-gate }
1037c478bd9Sstevel@tonic-gate
1047c478bd9Sstevel@tonic-gate void
umem_panic(const char * format,...)1057c478bd9Sstevel@tonic-gate umem_panic(const char *format, ...)
1067c478bd9Sstevel@tonic-gate {
1077c478bd9Sstevel@tonic-gate va_list va;
1087c478bd9Sstevel@tonic-gate
1097c478bd9Sstevel@tonic-gate va_start(va, format);
1107c478bd9Sstevel@tonic-gate umem_vprintf(format, va);
1117c478bd9Sstevel@tonic-gate va_end(va);
1127c478bd9Sstevel@tonic-gate
1137c478bd9Sstevel@tonic-gate if (format[strlen(format)-1] != '\n')
1147c478bd9Sstevel@tonic-gate umem_error_enter("\n");
1157c478bd9Sstevel@tonic-gate
1167c478bd9Sstevel@tonic-gate print_stacktrace();
1177c478bd9Sstevel@tonic-gate
1187c478bd9Sstevel@tonic-gate umem_do_abort();
1197c478bd9Sstevel@tonic-gate }
1207c478bd9Sstevel@tonic-gate
1217c478bd9Sstevel@tonic-gate void
umem_err_recoverable(const char * format,...)1227c478bd9Sstevel@tonic-gate umem_err_recoverable(const char *format, ...)
1237c478bd9Sstevel@tonic-gate {
1247c478bd9Sstevel@tonic-gate va_list va;
1257c478bd9Sstevel@tonic-gate
1267c478bd9Sstevel@tonic-gate va_start(va, format);
1277c478bd9Sstevel@tonic-gate umem_vprintf(format, va);
1287c478bd9Sstevel@tonic-gate va_end(va);
1297c478bd9Sstevel@tonic-gate
1307c478bd9Sstevel@tonic-gate if (format[strlen(format)-1] != '\n')
1317c478bd9Sstevel@tonic-gate umem_error_enter("\n");
1327c478bd9Sstevel@tonic-gate
1337c478bd9Sstevel@tonic-gate print_stacktrace();
1347c478bd9Sstevel@tonic-gate
1357c478bd9Sstevel@tonic-gate if (umem_abort > 0)
1367c478bd9Sstevel@tonic-gate umem_do_abort();
1377c478bd9Sstevel@tonic-gate }
1387c478bd9Sstevel@tonic-gate
1397c478bd9Sstevel@tonic-gate int
__umem_assert_failed(const char * assertion,const char * file,int line)1407c478bd9Sstevel@tonic-gate __umem_assert_failed(const char *assertion, const char *file, int line)
1417c478bd9Sstevel@tonic-gate {
1427c478bd9Sstevel@tonic-gate umem_panic("Assertion failed: %s, file %s, line %d\n",
1437c478bd9Sstevel@tonic-gate assertion, file, line);
1447c478bd9Sstevel@tonic-gate /*NOTREACHED*/
1457c478bd9Sstevel@tonic-gate return (0);
1467c478bd9Sstevel@tonic-gate }
147