1 /**************************************************************************** 2 * Copyright (c) 1998 Free Software Foundation, Inc. * 3 * * 4 * Permission is hereby granted, free of charge, to any person obtaining a * 5 * copy of this software and associated documentation files (the * 6 * "Software"), to deal in the Software without restriction, including * 7 * without limitation the rights to use, copy, modify, merge, publish, * 8 * distribute, distribute with modifications, sublicense, and/or sell * 9 * copies of the Software, and to permit persons to whom the Software is * 10 * furnished to do so, subject to the following conditions: * 11 * * 12 * The above copyright notice and this permission notice shall be included * 13 * in all copies or substantial portions of the Software. * 14 * * 15 * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS * 16 * OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF * 17 * MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. * 18 * IN NO EVENT SHALL THE ABOVE COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, * 19 * DAMAGES OR OTHER LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR * 20 * OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION WITH THE SOFTWARE OR * 21 * THE USE OR OTHER DEALINGS IN THE SOFTWARE. * 22 * * 23 * Except as contained in this notice, the name(s) of the above copyright * 24 * holders shall not be used in advertising or otherwise to promote the * 25 * sale, use or other dealings in this Software without prior written * 26 * authorization. * 27 ****************************************************************************/ 28 29 /**************************************************************************** 30 * Author: Zeyd M. Ben-Halim <zmbenhal@netcom.com> 1992,1995 * 31 * and: Eric S. Raymond <esr@snark.thyrsus.com> * 32 ****************************************************************************/ 33 34 35 /* 36 * comp_error.c -- Error message routines 37 * 38 */ 39 40 #include <curses.priv.h> 41 42 #include <tic.h> 43 44 MODULE_ID("$Id: comp_error.c,v 1.16 1998/08/01 23:39:51 tom Exp $") 45 46 bool _nc_suppress_warnings; 47 int _nc_curr_line; /* current line # in input */ 48 int _nc_curr_col; /* current column # in input */ 49 50 static const char *sourcename; 51 static char termtype[MAX_NAME_SIZE+1]; 52 53 void _nc_set_source(const char *const name) 54 { 55 sourcename = name; 56 } 57 58 void _nc_set_type(const char *const name) 59 { 60 if (name) 61 strncpy( termtype, name, MAX_NAME_SIZE ); 62 else 63 termtype[0] = '\0'; 64 } 65 66 void _nc_get_type(char *name) 67 { 68 strcpy( name, termtype ); 69 } 70 71 static inline void where_is_problem(void) 72 { 73 fprintf (stderr, "\"%s\"", sourcename); 74 if (_nc_curr_line >= 0) 75 fprintf (stderr, ", line %d", _nc_curr_line); 76 if (_nc_curr_col >= 0) 77 fprintf (stderr, ", col %d", _nc_curr_col); 78 if (termtype[0]) 79 fprintf (stderr, ", terminal '%s'", termtype); 80 fputc(':', stderr); 81 fputc(' ', stderr); 82 } 83 84 void _nc_warning(const char *const fmt, ...) 85 { 86 va_list argp; 87 88 if (_nc_suppress_warnings) 89 return; 90 91 where_is_problem(); 92 va_start(argp,fmt); 93 vfprintf (stderr, fmt, argp); 94 fprintf (stderr, "\n"); 95 va_end(argp); 96 } 97 98 99 void _nc_err_abort(const char *const fmt, ...) 100 { 101 va_list argp; 102 103 where_is_problem(); 104 va_start(argp,fmt); 105 vfprintf (stderr, fmt, argp); 106 fprintf (stderr, "\n"); 107 va_end(argp); 108 exit(EXIT_FAILURE); 109 } 110 111 112 void _nc_syserr_abort(const char *const fmt, ...) 113 { 114 va_list argp; 115 116 where_is_problem(); 117 va_start(argp,fmt); 118 vfprintf (stderr, fmt, argp); 119 fprintf (stderr, "\n"); 120 va_end(argp); 121 122 /* If we're debugging, try to show where the problem occurred - this 123 * will dump core. 124 */ 125 #if defined(TRACE) || !defined(NDEBUG) 126 abort(); 127 #else 128 /* Dumping core in production code is not a good idea. 129 */ 130 exit(EXIT_FAILURE); 131 #endif 132 } 133