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