nuclear@2: /*
nuclear@2:  * jerror.c
nuclear@2:  *
nuclear@2:  * Copyright (C) 1991-1998, Thomas G. Lane.
nuclear@2:  * This file is part of the Independent JPEG Group's software.
nuclear@2:  * For conditions of distribution and use, see the accompanying README file.
nuclear@2:  *
nuclear@2:  * This file contains simple error-reporting and trace-message routines.
nuclear@2:  * These are suitable for Unix-like systems and others where writing to
nuclear@2:  * stderr is the right thing to do.  Many applications will want to replace
nuclear@2:  * some or all of these routines.
nuclear@2:  *
nuclear@2:  * If you define USE_WINDOWS_MESSAGEBOX in jconfig.h or in the makefile,
nuclear@2:  * you get a Windows-specific hack to display error messages in a dialog box.
nuclear@2:  * It ain't much, but it beats dropping error messages into the bit bucket,
nuclear@2:  * which is what happens to output to stderr under most Windows C compilers.
nuclear@2:  *
nuclear@2:  * These routines are used by both the compression and decompression code.
nuclear@2:  */
nuclear@2: 
nuclear@2: /* this is not a core library module, so it doesn't define JPEG_INTERNALS */
nuclear@2: #include "jinclude.h"
nuclear@2: #include "jpeglib.h"
nuclear@2: #include "jversion.h"
nuclear@2: #include "jerror.h"
nuclear@2: 
nuclear@2: #ifdef USE_WINDOWS_MESSAGEBOX
nuclear@2: #include <windows.h>
nuclear@2: #endif
nuclear@2: 
nuclear@2: #ifndef EXIT_FAILURE		/* define exit() codes if not provided */
nuclear@2: #define EXIT_FAILURE  1
nuclear@2: #endif
nuclear@2: 
nuclear@2: 
nuclear@2: /*
nuclear@2:  * Create the message string table.
nuclear@2:  * We do this from the master message list in jerror.h by re-reading
nuclear@2:  * jerror.h with a suitable definition for macro JMESSAGE.
nuclear@2:  * The message table is made an external symbol just in case any applications
nuclear@2:  * want to refer to it directly.
nuclear@2:  */
nuclear@2: 
nuclear@2: #ifdef NEED_SHORT_EXTERNAL_NAMES
nuclear@2: #define jpeg_std_message_table	jMsgTable
nuclear@2: #endif
nuclear@2: 
nuclear@2: #define JMESSAGE(code,string)	string ,
nuclear@2: 
nuclear@2: const char * const jpeg_std_message_table[] = {
nuclear@2: #include "jerror.h"
nuclear@2:   NULL
nuclear@2: };
nuclear@2: 
nuclear@2: 
nuclear@2: /*
nuclear@2:  * Error exit handler: must not return to caller.
nuclear@2:  *
nuclear@2:  * Applications may override this if they want to get control back after
nuclear@2:  * an error.  Typically one would longjmp somewhere instead of exiting.
nuclear@2:  * The setjmp buffer can be made a private field within an expanded error
nuclear@2:  * handler object.  Note that the info needed to generate an error message
nuclear@2:  * is stored in the error object, so you can generate the message now or
nuclear@2:  * later, at your convenience.
nuclear@2:  * You should make sure that the JPEG object is cleaned up (with jpeg_abort
nuclear@2:  * or jpeg_destroy) at some point.
nuclear@2:  */
nuclear@2: 
nuclear@2: METHODDEF(void)
nuclear@2: error_exit (j_common_ptr cinfo)
nuclear@2: {
nuclear@2:   /* Always display the message */
nuclear@2:   (*cinfo->err->output_message) (cinfo);
nuclear@2: 
nuclear@2:   /* Let the memory manager delete any temp files before we die */
nuclear@2:   jpeg_destroy(cinfo);
nuclear@2: 
nuclear@2:   exit(EXIT_FAILURE);
nuclear@2: }
nuclear@2: 
nuclear@2: 
nuclear@2: /*
nuclear@2:  * Actual output of an error or trace message.
nuclear@2:  * Applications may override this method to send JPEG messages somewhere
nuclear@2:  * other than stderr.
nuclear@2:  *
nuclear@2:  * On Windows, printing to stderr is generally completely useless,
nuclear@2:  * so we provide optional code to produce an error-dialog popup.
nuclear@2:  * Most Windows applications will still prefer to override this routine,
nuclear@2:  * but if they don't, it'll do something at least marginally useful.
nuclear@2:  *
nuclear@2:  * NOTE: to use the library in an environment that doesn't support the
nuclear@2:  * C stdio library, you may have to delete the call to fprintf() entirely,
nuclear@2:  * not just not use this routine.
nuclear@2:  */
nuclear@2: 
nuclear@2: METHODDEF(void)
nuclear@2: output_message (j_common_ptr cinfo)
nuclear@2: {
nuclear@2:   char buffer[JMSG_LENGTH_MAX];
nuclear@2: 
nuclear@2:   /* Create the message */
nuclear@2:   (*cinfo->err->format_message) (cinfo, buffer);
nuclear@2: 
nuclear@2: #ifdef USE_WINDOWS_MESSAGEBOX
nuclear@2:   /* Display it in a message dialog box */
nuclear@2:   MessageBox(GetActiveWindow(), buffer, "JPEG Library Error",
nuclear@2: 	     MB_OK | MB_ICONERROR);
nuclear@2: #else
nuclear@2:   /* Send it to stderr, adding a newline */
nuclear@2:   fprintf(stderr, "%s\n", buffer);
nuclear@2: #endif
nuclear@2: }
nuclear@2: 
nuclear@2: 
nuclear@2: /*
nuclear@2:  * Decide whether to emit a trace or warning message.
nuclear@2:  * msg_level is one of:
nuclear@2:  *   -1: recoverable corrupt-data warning, may want to abort.
nuclear@2:  *    0: important advisory messages (always display to user).
nuclear@2:  *    1: first level of tracing detail.
nuclear@2:  *    2,3,...: successively more detailed tracing messages.
nuclear@2:  * An application might override this method if it wanted to abort on warnings
nuclear@2:  * or change the policy about which messages to display.
nuclear@2:  */
nuclear@2: 
nuclear@2: METHODDEF(void)
nuclear@2: emit_message (j_common_ptr cinfo, int msg_level)
nuclear@2: {
nuclear@2:   struct jpeg_error_mgr * err = cinfo->err;
nuclear@2: 
nuclear@2:   if (msg_level < 0) {
nuclear@2:     /* It's a warning message.  Since corrupt files may generate many warnings,
nuclear@2:      * the policy implemented here is to show only the first warning,
nuclear@2:      * unless trace_level >= 3.
nuclear@2:      */
nuclear@2:     if (err->num_warnings == 0 || err->trace_level >= 3)
nuclear@2:       (*err->output_message) (cinfo);
nuclear@2:     /* Always count warnings in num_warnings. */
nuclear@2:     err->num_warnings++;
nuclear@2:   } else {
nuclear@2:     /* It's a trace message.  Show it if trace_level >= msg_level. */
nuclear@2:     if (err->trace_level >= msg_level)
nuclear@2:       (*err->output_message) (cinfo);
nuclear@2:   }
nuclear@2: }
nuclear@2: 
nuclear@2: 
nuclear@2: /*
nuclear@2:  * Format a message string for the most recent JPEG error or message.
nuclear@2:  * The message is stored into buffer, which should be at least JMSG_LENGTH_MAX
nuclear@2:  * characters.  Note that no '\n' character is added to the string.
nuclear@2:  * Few applications should need to override this method.
nuclear@2:  */
nuclear@2: 
nuclear@2: METHODDEF(void)
nuclear@2: format_message (j_common_ptr cinfo, char * buffer)
nuclear@2: {
nuclear@2:   struct jpeg_error_mgr * err = cinfo->err;
nuclear@2:   int msg_code = err->msg_code;
nuclear@2:   const char * msgtext = NULL;
nuclear@2:   const char * msgptr;
nuclear@2:   char ch;
nuclear@2:   boolean isstring;
nuclear@2: 
nuclear@2:   /* Look up message string in proper table */
nuclear@2:   if (msg_code > 0 && msg_code <= err->last_jpeg_message) {
nuclear@2:     msgtext = err->jpeg_message_table[msg_code];
nuclear@2:   } else if (err->addon_message_table != NULL &&
nuclear@2: 	     msg_code >= err->first_addon_message &&
nuclear@2: 	     msg_code <= err->last_addon_message) {
nuclear@2:     msgtext = err->addon_message_table[msg_code - err->first_addon_message];
nuclear@2:   }
nuclear@2: 
nuclear@2:   /* Defend against bogus message number */
nuclear@2:   if (msgtext == NULL) {
nuclear@2:     err->msg_parm.i[0] = msg_code;
nuclear@2:     msgtext = err->jpeg_message_table[0];
nuclear@2:   }
nuclear@2: 
nuclear@2:   /* Check for string parameter, as indicated by %s in the message text */
nuclear@2:   isstring = FALSE;
nuclear@2:   msgptr = msgtext;
nuclear@2:   while ((ch = *msgptr++) != '\0') {
nuclear@2:     if (ch == '%') {
nuclear@2:       if (*msgptr == 's') isstring = TRUE;
nuclear@2:       break;
nuclear@2:     }
nuclear@2:   }
nuclear@2: 
nuclear@2:   /* Format the message into the passed buffer */
nuclear@2:   if (isstring)
nuclear@2:     sprintf(buffer, msgtext, err->msg_parm.s);
nuclear@2:   else
nuclear@2:     sprintf(buffer, msgtext,
nuclear@2: 	    err->msg_parm.i[0], err->msg_parm.i[1],
nuclear@2: 	    err->msg_parm.i[2], err->msg_parm.i[3],
nuclear@2: 	    err->msg_parm.i[4], err->msg_parm.i[5],
nuclear@2: 	    err->msg_parm.i[6], err->msg_parm.i[7]);
nuclear@2: }
nuclear@2: 
nuclear@2: 
nuclear@2: /*
nuclear@2:  * Reset error state variables at start of a new image.
nuclear@2:  * This is called during compression startup to reset trace/error
nuclear@2:  * processing to default state, without losing any application-specific
nuclear@2:  * method pointers.  An application might possibly want to override
nuclear@2:  * this method if it has additional error processing state.
nuclear@2:  */
nuclear@2: 
nuclear@2: METHODDEF(void)
nuclear@2: reset_error_mgr (j_common_ptr cinfo)
nuclear@2: {
nuclear@2:   cinfo->err->num_warnings = 0;
nuclear@2:   /* trace_level is not reset since it is an application-supplied parameter */
nuclear@2:   cinfo->err->msg_code = 0;	/* may be useful as a flag for "no error" */
nuclear@2: }
nuclear@2: 
nuclear@2: 
nuclear@2: /*
nuclear@2:  * Fill in the standard error-handling methods in a jpeg_error_mgr object.
nuclear@2:  * Typical call is:
nuclear@2:  *	struct jpeg_compress_struct cinfo;
nuclear@2:  *	struct jpeg_error_mgr err;
nuclear@2:  *
nuclear@2:  *	cinfo.err = jpeg_std_error(&err);
nuclear@2:  * after which the application may override some of the methods.
nuclear@2:  */
nuclear@2: 
nuclear@2: GLOBAL(struct jpeg_error_mgr *)
nuclear@2: jpeg_std_error (struct jpeg_error_mgr * err)
nuclear@2: {
nuclear@2:   err->error_exit = error_exit;
nuclear@2:   err->emit_message = emit_message;
nuclear@2:   err->output_message = output_message;
nuclear@2:   err->format_message = format_message;
nuclear@2:   err->reset_error_mgr = reset_error_mgr;
nuclear@2: 
nuclear@2:   err->trace_level = 0;		/* default = no tracing */
nuclear@2:   err->num_warnings = 0;	/* no warnings emitted yet */
nuclear@2:   err->msg_code = 0;		/* may be useful as a flag for "no error" */
nuclear@2: 
nuclear@2:   /* Initialize message table pointers */
nuclear@2:   err->jpeg_message_table = jpeg_std_message_table;
nuclear@2:   err->last_jpeg_message = (int) JMSG_LASTMSGCODE - 1;
nuclear@2: 
nuclear@2:   err->addon_message_table = NULL;
nuclear@2:   err->first_addon_message = 0;	/* for safety */
nuclear@2:   err->last_addon_message = 0;
nuclear@2: 
nuclear@2:   return err;
nuclear@2: }