/contrib/ntp/libisc/error.c

  1/*
  2 * Copyright (C) 1998-2001  Internet Software Consortium.
  3 *
  4 * Permission to use, copy, modify, and distribute this software for any
  5 * purpose with or without fee is hereby granted, provided that the above
  6 * copyright notice and this permission notice appear in all copies.
  7 *
  8 * THE SOFTWARE IS PROVIDED "AS IS" AND INTERNET SOFTWARE CONSORTIUM
  9 * DISCLAIMS ALL WARRANTIES WITH REGARD TO THIS SOFTWARE INCLUDING ALL
 10 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS. IN NO EVENT SHALL
 11 * INTERNET SOFTWARE CONSORTIUM BE LIABLE FOR ANY SPECIAL, DIRECT,
 12 * INDIRECT, OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES WHATSOEVER RESULTING
 13 * FROM LOSS OF USE, DATA OR PROFITS, WHETHER IN AN ACTION OF CONTRACT,
 14 * NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING OUT OF OR IN CONNECTION
 15 * WITH THE USE OR PERFORMANCE OF THIS SOFTWARE.
 16 */
 17
 18/* $Id: error.c,v 1.16 2001/08/08 22:54:49 gson Exp $ */
 19
 20#include <config.h>
 21
 22#include <stdio.h>
 23#include <stdlib.h>
 24
 25#include <isc/error.h>
 26#include <isc/msgs.h>
 27
 28static void
 29default_unexpected_callback(const char *, int, const char *, va_list)
 30     ISC_FORMAT_PRINTF(3, 0);
 31
 32static void
 33default_fatal_callback(const char *, int, const char *, va_list)
 34     ISC_FORMAT_PRINTF(3, 0);
 35
 36static isc_errorcallback_t unexpected_callback = default_unexpected_callback;
 37static isc_errorcallback_t fatal_callback = default_fatal_callback;
 38
 39void
 40isc_error_setunexpected(isc_errorcallback_t cb) {
 41	if (cb == NULL)
 42		unexpected_callback = default_unexpected_callback;
 43	else
 44		unexpected_callback = cb;
 45}
 46
 47void
 48isc_error_setfatal(isc_errorcallback_t cb) {
 49	if (cb == NULL)
 50		fatal_callback = default_fatal_callback;
 51	else
 52		fatal_callback = cb;
 53}
 54
 55void
 56isc_error_unexpected(const char *file, int line, const char *format, ...) {
 57	va_list args;
 58
 59	va_start(args, format);
 60	(unexpected_callback)(file, line, format, args);
 61	va_end(args);
 62}
 63
 64void
 65isc_error_fatal(const char *file, int line, const char *format, ...) {
 66	va_list args;
 67
 68	va_start(args, format);
 69	(fatal_callback)(file, line, format, args);
 70	va_end(args);
 71	abort();
 72}
 73
 74void
 75isc_error_runtimecheck(const char *file, int line, const char *expression) {
 76	isc_error_fatal(file, line, "RUNTIME_CHECK(%s) %s", expression,
 77			isc_msgcat_get(isc_msgcat, ISC_MSGSET_GENERAL,
 78				       ISC_MSG_FAILED, "failed"));
 79}
 80
 81static void
 82default_unexpected_callback(const char *file, int line, const char *format,
 83			    va_list args)
 84{
 85	fprintf(stderr, "%s:%d: ", file, line);
 86	vfprintf(stderr, format, args);
 87	fprintf(stderr, "\n");
 88	fflush(stderr);
 89}
 90
 91static void
 92default_fatal_callback(const char *file, int line, const char *format,
 93		       va_list args)
 94{
 95	fprintf(stderr, "%s:%d: %s: ", file, line,
 96		isc_msgcat_get(isc_msgcat, ISC_MSGSET_GENERAL,
 97			       ISC_MSG_FATALERROR, "fatal error"));
 98	vfprintf(stderr, format, args);
 99	fprintf(stderr, "\n");
100	fflush(stderr);
101}