2
* Copyright 1998-2002 Stephen C. Grubb (ploticus.sourceforge.net) .
3
* This code is covered under the GNU General Public License (GPL);
4
* see the file ./Copyright for details. */
7
/* error msg handler */
10
static char emode[20] = "stderr";
11
static char progname[20] = "";
14
TDH_err( errno, msg, parm )
21
/* allow error mode to be set from environment */
22
s = getenv( "TDHKIT_ERRMODE" );
29
if( parm[0] != '\0' ) {
35
if( strcmp( emode, "cgi" )==0 )
36
printf( "<br><h4>%s error %d: %s %s%s%s</h4><br>\n", progname, errno, msg, op, parm, cp );
38
else fprintf( stderr, "%s error %d: %s %s%s%s\n", progname, errno, msg, op, parm, cp );
48
strcpy( progname, prog);