Suppress -Wunused-function for pdfium's third-party libraries.
[pdfium.git] / samples / fx_lpng / lpng_v163 / fx_pngerror.c
1 /* pngerror.c - stub functions for i/o and memory allocation\r
2  *\r
3  * Last changed in libpng 1.6.1 [March 28, 2013]\r
4  * Copyright (c) 1998-2013 Glenn Randers-Pehrson\r
5  * (Version 0.96 Copyright (c) 1996, 1997 Andreas Dilger)\r
6  * (Version 0.88 Copyright (c) 1995, 1996 Guy Eric Schalnat, Group 42, Inc.)\r
7  *\r
8  * This code is released under the libpng license.\r
9  * For conditions of distribution and use, see the disclaimer\r
10  * and license in png.h\r
11  *\r
12  * This file provides a location for all error handling.  Users who\r
13  * need special error handling are expected to write replacement functions\r
14  * and use png_set_error_fn() to use those functions.  See the instructions\r
15  * at each function.\r
16  */\r
17 \r
18 #include "pngpriv.h"\r
19 \r
20 #if defined(PNG_READ_SUPPORTED) || defined(PNG_WRITE_SUPPORTED)\r
21 \r
22 static PNG_FUNCTION(void, png_default_error,PNGARG((png_const_structrp png_ptr,\r
23     png_const_charp error_message)),PNG_NORETURN);\r
24 \r
25 #ifdef PNG_WARNINGS_SUPPORTED\r
26 static void /* PRIVATE */\r
27 png_default_warning PNGARG((png_const_structrp png_ptr,\r
28    png_const_charp warning_message));\r
29 #endif /* PNG_WARNINGS_SUPPORTED */\r
30 \r
31 /* This function is called whenever there is a fatal error.  This function\r
32  * should not be changed.  If there is a need to handle errors differently,\r
33  * you should supply a replacement error function and use png_set_error_fn()\r
34  * to replace the error function at run-time.\r
35  */\r
36 #ifdef PNG_ERROR_TEXT_SUPPORTED\r
37 PNG_FUNCTION(void,PNGAPI\r
38 png_error,(png_const_structrp png_ptr, png_const_charp error_message),\r
39    PNG_NORETURN)\r
40 {\r
41 #ifdef PNG_ERROR_NUMBERS_SUPPORTED\r
42    char msg[16];\r
43    if (png_ptr != NULL)\r
44    {\r
45       if (png_ptr->flags&\r
46          (PNG_FLAG_STRIP_ERROR_NUMBERS|PNG_FLAG_STRIP_ERROR_TEXT))\r
47       {\r
48          if (*error_message == PNG_LITERAL_SHARP)\r
49          {\r
50             /* Strip "#nnnn " from beginning of error message. */\r
51             int offset;\r
52             for (offset = 1; offset<15; offset++)\r
53                if (error_message[offset] == ' ')\r
54                   break;\r
55 \r
56             if (png_ptr->flags&PNG_FLAG_STRIP_ERROR_TEXT)\r
57             {\r
58                int i;\r
59                for (i = 0; i < offset - 1; i++)\r
60                   msg[i] = error_message[i + 1];\r
61                msg[i - 1] = '\0';\r
62                error_message = msg;\r
63             }\r
64 \r
65             else\r
66                error_message += offset;\r
67       }\r
68 \r
69       else\r
70       {\r
71          if (png_ptr->flags&PNG_FLAG_STRIP_ERROR_TEXT)\r
72          {\r
73             msg[0] = '0';\r
74             msg[1] = '\0';\r
75             error_message = msg;\r
76          }\r
77        }\r
78      }\r
79    }\r
80 #endif\r
81    if (png_ptr != NULL && png_ptr->error_fn != NULL)\r
82       (*(png_ptr->error_fn))(png_constcast(png_structrp,png_ptr),\r
83           error_message);\r
84 \r
85    /* If the custom handler doesn't exist, or if it returns,\r
86       use the default handler, which will not return. */\r
87    png_default_error(png_ptr, error_message);\r
88 }\r
89 #else\r
90 PNG_FUNCTION(void,PNGAPI\r
91 png_err,(png_const_structrp png_ptr),PNG_NORETURN)\r
92 {\r
93    /* Prior to 1.5.2 the error_fn received a NULL pointer, expressed\r
94     * erroneously as '\0', instead of the empty string "".  This was\r
95     * apparently an error, introduced in libpng-1.2.20, and png_default_error\r
96     * will crash in this case.\r
97     */\r
98    if (png_ptr != NULL && png_ptr->error_fn != NULL)\r
99       (*(png_ptr->error_fn))(png_constcast(png_structrp,png_ptr), "");\r
100 \r
101    /* If the custom handler doesn't exist, or if it returns,\r
102       use the default handler, which will not return. */\r
103    png_default_error(png_ptr, "");\r
104 }\r
105 #endif /* PNG_ERROR_TEXT_SUPPORTED */\r
106 \r
107 /* Utility to safely appends strings to a buffer.  This never errors out so\r
108  * error checking is not required in the caller.\r
109  */\r
110 size_t\r
111 png_safecat(png_charp buffer, size_t bufsize, size_t pos,\r
112    png_const_charp string)\r
113 {\r
114    if (buffer != NULL && pos < bufsize)\r
115    {\r
116       if (string != NULL)\r
117          while (*string != '\0' && pos < bufsize-1)\r
118            buffer[pos++] = *string++;\r
119 \r
120       buffer[pos] = '\0';\r
121    }\r
122 \r
123    return pos;\r
124 }\r
125 \r
126 #if defined(PNG_WARNINGS_SUPPORTED) || defined(PNG_TIME_RFC1123_SUPPORTED)\r
127 /* Utility to dump an unsigned value into a buffer, given a start pointer and\r
128  * and end pointer (which should point just *beyond* the end of the buffer!)\r
129  * Returns the pointer to the start of the formatted string.\r
130  */\r
131 png_charp\r
132 png_format_number(png_const_charp start, png_charp end, int format,\r
133    png_alloc_size_t number)\r
134 {\r
135    int count = 0;    /* number of digits output */\r
136    int mincount = 1; /* minimum number required */\r
137    int output = 0;   /* digit output (for the fixed point format) */\r
138 \r
139    *--end = '\0';\r
140 \r
141    /* This is written so that the loop always runs at least once, even with\r
142     * number zero.\r
143     */\r
144    while (end > start && (number != 0 || count < mincount))\r
145    {\r
146 \r
147       static const char digits[] = "0123456789ABCDEF";\r
148 \r
149       switch (format)\r
150       {\r
151          case PNG_NUMBER_FORMAT_fixed:\r
152             /* Needs five digits (the fraction) */\r
153             mincount = 5;\r
154             if (output || number % 10 != 0)\r
155             {\r
156                *--end = digits[number % 10];\r
157                output = 1;\r
158             }\r
159             number /= 10;\r
160             break;\r
161 \r
162          case PNG_NUMBER_FORMAT_02u:\r
163             /* Expects at least 2 digits. */\r
164             mincount = 2;\r
165             /* FALL THROUGH */\r
166 \r
167          case PNG_NUMBER_FORMAT_u:\r
168             *--end = digits[number % 10];\r
169             number /= 10;\r
170             break;\r
171 \r
172          case PNG_NUMBER_FORMAT_02x:\r
173             /* This format expects at least two digits */\r
174             mincount = 2;\r
175             /* FALL THROUGH */\r
176 \r
177          case PNG_NUMBER_FORMAT_x:\r
178             *--end = digits[number & 0xf];\r
179             number >>= 4;\r
180             break;\r
181 \r
182          default: /* an error */\r
183             number = 0;\r
184             break;\r
185       }\r
186 \r
187       /* Keep track of the number of digits added */\r
188       ++count;\r
189 \r
190       /* Float a fixed number here: */\r
191       if (format == PNG_NUMBER_FORMAT_fixed) if (count == 5) if (end > start)\r
192       {\r
193          /* End of the fraction, but maybe nothing was output?  In that case\r
194           * drop the decimal point.  If the number is a true zero handle that\r
195           * here.\r
196           */\r
197          if (output)\r
198             *--end = '.';\r
199          else if (number == 0) /* and !output */\r
200             *--end = '0';\r
201       }\r
202    }\r
203 \r
204    return end;\r
205 }\r
206 #endif\r
207 \r
208 #ifdef PNG_WARNINGS_SUPPORTED\r
209 /* This function is called whenever there is a non-fatal error.  This function\r
210  * should not be changed.  If there is a need to handle warnings differently,\r
211  * you should supply a replacement warning function and use\r
212  * png_set_error_fn() to replace the warning function at run-time.\r
213  */\r
214 void PNGAPI\r
215 png_warning(png_const_structrp png_ptr, png_const_charp warning_message)\r
216 {\r
217    int offset = 0;\r
218    if (png_ptr != NULL)\r
219    {\r
220 #ifdef PNG_ERROR_NUMBERS_SUPPORTED\r
221    if (png_ptr->flags&\r
222        (PNG_FLAG_STRIP_ERROR_NUMBERS|PNG_FLAG_STRIP_ERROR_TEXT))\r
223 #endif\r
224       {\r
225          if (*warning_message == PNG_LITERAL_SHARP)\r
226          {\r
227             for (offset = 1; offset < 15; offset++)\r
228                if (warning_message[offset] == ' ')\r
229                   break;\r
230          }\r
231       }\r
232    }\r
233    if (png_ptr != NULL && png_ptr->warning_fn != NULL)\r
234       (*(png_ptr->warning_fn))(png_constcast(png_structrp,png_ptr),\r
235          warning_message + offset);\r
236    else\r
237       png_default_warning(png_ptr, warning_message + offset);\r
238 }\r
239 \r
240 /* These functions support 'formatted' warning messages with up to\r
241  * PNG_WARNING_PARAMETER_COUNT parameters.  In the format string the parameter\r
242  * is introduced by @<number>, where 'number' starts at 1.  This follows the\r
243  * standard established by X/Open for internationalizable error messages.\r
244  */\r
245 void\r
246 png_warning_parameter(png_warning_parameters p, int number,\r
247    png_const_charp string)\r
248 {\r
249    if (number > 0 && number <= PNG_WARNING_PARAMETER_COUNT)\r
250       (void)png_safecat(p[number-1], (sizeof p[number-1]), 0, string);\r
251 }\r
252 \r
253 void\r
254 png_warning_parameter_unsigned(png_warning_parameters p, int number, int format,\r
255    png_alloc_size_t value)\r
256 {\r
257    char buffer[PNG_NUMBER_BUFFER_SIZE];\r
258    png_warning_parameter(p, number, PNG_FORMAT_NUMBER(buffer, format, value));\r
259 }\r
260 \r
261 void\r
262 png_warning_parameter_signed(png_warning_parameters p, int number, int format,\r
263    png_int_32 value)\r
264 {\r
265    png_alloc_size_t u;\r
266    png_charp str;\r
267    char buffer[PNG_NUMBER_BUFFER_SIZE];\r
268 \r
269    /* Avoid overflow by doing the negate in a png_alloc_size_t: */\r
270    u = (png_alloc_size_t)value;\r
271    if (value < 0)\r
272       u = ~u + 1;\r
273 \r
274    str = PNG_FORMAT_NUMBER(buffer, format, u);\r
275 \r
276    if (value < 0 && str > buffer)\r
277       *--str = '-';\r
278 \r
279    png_warning_parameter(p, number, str);\r
280 }\r
281 \r
282 void\r
283 png_formatted_warning(png_const_structrp png_ptr, png_warning_parameters p,\r
284    png_const_charp message)\r
285 {\r
286    /* The internal buffer is just 192 bytes - enough for all our messages,\r
287     * overflow doesn't happen because this code checks!  If someone figures\r
288     * out how to send us a message longer than 192 bytes, all that will\r
289     * happen is that the message will be truncated appropriately.\r
290     */\r
291    size_t i = 0; /* Index in the msg[] buffer: */\r
292    char msg[192];\r
293 \r
294    /* Each iteration through the following loop writes at most one character\r
295     * to msg[i++] then returns here to validate that there is still space for\r
296     * the trailing '\0'.  It may (in the case of a parameter) read more than\r
297     * one character from message[]; it must check for '\0' and continue to the\r
298     * test if it finds the end of string.\r
299     */\r
300    while (i<(sizeof msg)-1 && *message != '\0')\r
301    {\r
302       /* '@' at end of string is now just printed (previously it was skipped);\r
303        * it is an error in the calling code to terminate the string with @.\r
304        */\r
305       if (p != NULL && *message == '@' && message[1] != '\0')\r
306       {\r
307          int parameter_char = *++message; /* Consume the '@' */\r
308          static const char valid_parameters[] = "123456789";\r
309          int parameter = 0;\r
310 \r
311          /* Search for the parameter digit, the index in the string is the\r
312           * parameter to use.\r
313           */\r
314          while (valid_parameters[parameter] != parameter_char &&\r
315             valid_parameters[parameter] != '\0')\r
316             ++parameter;\r
317 \r
318          /* If the parameter digit is out of range it will just get printed. */\r
319          if (parameter < PNG_WARNING_PARAMETER_COUNT)\r
320          {\r
321             /* Append this parameter */\r
322             png_const_charp parm = p[parameter];\r
323             png_const_charp pend = p[parameter] + (sizeof p[parameter]);\r
324 \r
325             /* No need to copy the trailing '\0' here, but there is no guarantee\r
326              * that parm[] has been initialized, so there is no guarantee of a\r
327              * trailing '\0':\r
328              */\r
329             while (i<(sizeof msg)-1 && *parm != '\0' && parm < pend)\r
330                msg[i++] = *parm++;\r
331 \r
332             /* Consume the parameter digit too: */\r
333             ++message;\r
334             continue;\r
335          }\r
336 \r
337          /* else not a parameter and there is a character after the @ sign; just\r
338           * copy that.  This is known not to be '\0' because of the test above.\r
339           */\r
340       }\r
341 \r
342       /* At this point *message can't be '\0', even in the bad parameter case\r
343        * above where there is a lone '@' at the end of the message string.\r
344        */\r
345       msg[i++] = *message++;\r
346    }\r
347 \r
348    /* i is always less than (sizeof msg), so: */\r
349    msg[i] = '\0';\r
350 \r
351    /* And this is the formatted message. It may be larger than\r
352     * PNG_MAX_ERROR_TEXT, but that is only used for 'chunk' errors and these\r
353     * are not (currently) formatted.\r
354     */\r
355    png_warning(png_ptr, msg);\r
356 }\r
357 #endif /* PNG_WARNINGS_SUPPORTED */\r
358 \r
359 #ifdef PNG_BENIGN_ERRORS_SUPPORTED\r
360 void PNGAPI\r
361 png_benign_error(png_const_structrp png_ptr, png_const_charp error_message)\r
362 {\r
363    if (png_ptr->flags & PNG_FLAG_BENIGN_ERRORS_WARN)\r
364    {\r
365 #     ifdef PNG_READ_SUPPORTED\r
366          if ((png_ptr->mode & PNG_IS_READ_STRUCT) != 0 &&\r
367             png_ptr->chunk_name != 0)\r
368             png_chunk_warning(png_ptr, error_message);\r
369          else\r
370 #     endif\r
371       png_warning(png_ptr, error_message);\r
372    }\r
373 \r
374    else\r
375    {\r
376 #     ifdef PNG_READ_SUPPORTED\r
377          if ((png_ptr->mode & PNG_IS_READ_STRUCT) != 0 &&\r
378             png_ptr->chunk_name != 0)\r
379             png_chunk_error(png_ptr, error_message);\r
380          else\r
381 #     endif\r
382       png_error(png_ptr, error_message);\r
383    }\r
384 }\r
385 \r
386 void /* PRIVATE */\r
387 png_app_warning(png_const_structrp png_ptr, png_const_charp error_message)\r
388 {\r
389   if (png_ptr->flags & PNG_FLAG_APP_WARNINGS_WARN)\r
390      png_warning(png_ptr, error_message);\r
391   else\r
392      png_error(png_ptr, error_message);\r
393 }\r
394 \r
395 void /* PRIVATE */\r
396 png_app_error(png_const_structrp png_ptr, png_const_charp error_message)\r
397 {\r
398   if (png_ptr->flags & PNG_FLAG_APP_ERRORS_WARN)\r
399      png_warning(png_ptr, error_message);\r
400   else\r
401      png_error(png_ptr, error_message);\r
402 }\r
403 #endif /* BENIGN_ERRORS */\r
404 \r
405 /* These utilities are used internally to build an error message that relates\r
406  * to the current chunk.  The chunk name comes from png_ptr->chunk_name,\r
407  * this is used to prefix the message.  The message is limited in length\r
408  * to 63 bytes, the name characters are output as hex digits wrapped in []\r
409  * if the character is invalid.\r
410  */\r
411 #define isnonalpha(c) ((c) < 65 || (c) > 122 || ((c) > 90 && (c) < 97))\r
412 static PNG_CONST char png_digit[16] = {\r
413    '0', '1', '2', '3', '4', '5', '6', '7', '8', '9',\r
414    'A', 'B', 'C', 'D', 'E', 'F'\r
415 };\r
416 \r
417 #define PNG_MAX_ERROR_TEXT 196 /* Currently limited be profile_error in png.c */\r
418 #if defined(PNG_WARNINGS_SUPPORTED) || defined(PNG_ERROR_TEXT_SUPPORTED)\r
419 static void /* PRIVATE */\r
420 png_format_buffer(png_const_structrp png_ptr, png_charp buffer, png_const_charp\r
421     error_message)\r
422 {\r
423    png_uint_32 chunk_name = png_ptr->chunk_name;\r
424    int iout = 0, ishift = 24;\r
425 \r
426    while (ishift >= 0)\r
427    {\r
428       int c = (int)(chunk_name >> ishift) & 0xff;\r
429 \r
430       ishift -= 8;\r
431       if (isnonalpha(c))\r
432       {\r
433          buffer[iout++] = PNG_LITERAL_LEFT_SQUARE_BRACKET;\r
434          buffer[iout++] = png_digit[(c & 0xf0) >> 4];\r
435          buffer[iout++] = png_digit[c & 0x0f];\r
436          buffer[iout++] = PNG_LITERAL_RIGHT_SQUARE_BRACKET;\r
437       }\r
438 \r
439       else\r
440       {\r
441          buffer[iout++] = (char)c;\r
442       }\r
443    }\r
444 \r
445    if (error_message == NULL)\r
446       buffer[iout] = '\0';\r
447 \r
448    else\r
449    {\r
450       int iin = 0;\r
451 \r
452       buffer[iout++] = ':';\r
453       buffer[iout++] = ' ';\r
454 \r
455       while (iin < PNG_MAX_ERROR_TEXT-1 && error_message[iin] != '\0')\r
456          buffer[iout++] = error_message[iin++];\r
457 \r
458       /* iin < PNG_MAX_ERROR_TEXT, so the following is safe: */\r
459       buffer[iout] = '\0';\r
460    }\r
461 }\r
462 #endif /* PNG_WARNINGS_SUPPORTED || PNG_ERROR_TEXT_SUPPORTED */\r
463 \r
464 #if defined(PNG_READ_SUPPORTED) && defined(PNG_ERROR_TEXT_SUPPORTED)\r
465 PNG_FUNCTION(void,PNGAPI\r
466 png_chunk_error,(png_const_structrp png_ptr, png_const_charp error_message),\r
467    PNG_NORETURN)\r
468 {\r
469    char msg[18+PNG_MAX_ERROR_TEXT];\r
470    if (png_ptr == NULL)\r
471       png_error(png_ptr, error_message);\r
472 \r
473    else\r
474    {\r
475       png_format_buffer(png_ptr, msg, error_message);\r
476       png_error(png_ptr, msg);\r
477    }\r
478 }\r
479 #endif /* PNG_READ_SUPPORTED && PNG_ERROR_TEXT_SUPPORTED */\r
480 \r
481 #ifdef PNG_WARNINGS_SUPPORTED\r
482 void PNGAPI\r
483 png_chunk_warning(png_const_structrp png_ptr, png_const_charp warning_message)\r
484 {\r
485    char msg[18+PNG_MAX_ERROR_TEXT];\r
486    if (png_ptr == NULL)\r
487       png_warning(png_ptr, warning_message);\r
488 \r
489    else\r
490    {\r
491       png_format_buffer(png_ptr, msg, warning_message);\r
492       png_warning(png_ptr, msg);\r
493    }\r
494 }\r
495 #endif /* PNG_WARNINGS_SUPPORTED */\r
496 \r
497 #ifdef PNG_READ_SUPPORTED\r
498 #ifdef PNG_BENIGN_ERRORS_SUPPORTED\r
499 void PNGAPI\r
500 png_chunk_benign_error(png_const_structrp png_ptr, png_const_charp\r
501     error_message)\r
502 {\r
503    if (png_ptr->flags & PNG_FLAG_BENIGN_ERRORS_WARN)\r
504       png_chunk_warning(png_ptr, error_message);\r
505 \r
506    else\r
507       png_chunk_error(png_ptr, error_message);\r
508 }\r
509 #endif\r
510 #endif /* PNG_READ_SUPPORTED */\r
511 \r
512 void /* PRIVATE */\r
513 png_chunk_report(png_const_structrp png_ptr, png_const_charp message, int error)\r
514 {\r
515    /* This is always supported, but for just read or just write it\r
516     * unconditionally does the right thing.\r
517     */\r
518 #  if defined(PNG_READ_SUPPORTED) && defined(PNG_WRITE_SUPPORTED)\r
519       if (png_ptr->mode & PNG_IS_READ_STRUCT)\r
520 #  endif\r
521 \r
522 #  ifdef PNG_READ_SUPPORTED\r
523       {\r
524          if (error < PNG_CHUNK_ERROR)\r
525             png_chunk_warning(png_ptr, message);\r
526 \r
527          else\r
528             png_chunk_benign_error(png_ptr, message);\r
529       }\r
530 #  endif\r
531 \r
532 #  if defined(PNG_READ_SUPPORTED) && defined(PNG_WRITE_SUPPORTED)\r
533       else if (!(png_ptr->mode & PNG_IS_READ_STRUCT))\r
534 #  endif\r
535 \r
536 #  ifdef PNG_WRITE_SUPPORTED\r
537       {\r
538          if (error < PNG_CHUNK_WRITE_ERROR)\r
539             png_app_warning(png_ptr, message);\r
540 \r
541          else\r
542             png_app_error(png_ptr, message);\r
543       }\r
544 #  endif\r
545 }\r
546 \r
547 #ifdef PNG_ERROR_TEXT_SUPPORTED\r
548 #ifdef PNG_FLOATING_POINT_SUPPORTED\r
549 PNG_FUNCTION(void,\r
550 png_fixed_error,(png_const_structrp png_ptr, png_const_charp name),PNG_NORETURN)\r
551 {\r
552 #  define fixed_message "fixed point overflow in "\r
553 #  define fixed_message_ln ((sizeof fixed_message)-1)\r
554    int  iin;\r
555    char msg[fixed_message_ln+PNG_MAX_ERROR_TEXT];\r
556    memcpy(msg, fixed_message, fixed_message_ln);\r
557    iin = 0;\r
558    if (name != NULL) while (iin < (PNG_MAX_ERROR_TEXT-1) && name[iin] != 0)\r
559    {\r
560       msg[fixed_message_ln + iin] = name[iin];\r
561       ++iin;\r
562    }\r
563    msg[fixed_message_ln + iin] = 0;\r
564    png_error(png_ptr, msg);\r
565 }\r
566 #endif\r
567 #endif\r
568 \r
569 #ifdef PNG_SETJMP_SUPPORTED\r
570 /* This API only exists if ANSI-C style error handling is used,\r
571  * otherwise it is necessary for png_default_error to be overridden.\r
572  */\r
573 jmp_buf* PNGAPI\r
574 png_set_longjmp_fn(png_structrp png_ptr, png_longjmp_ptr longjmp_fn,\r
575     size_t jmp_buf_size)\r
576 {\r
577    /* From libpng 1.6.0 the app gets one chance to set a 'jmpbuf_size' value\r
578     * and it must not change after that.  Libpng doesn't care how big the\r
579     * buffer is, just that it doesn't change.\r
580     *\r
581     * If the buffer size is no *larger* than the size of jmp_buf when libpng is\r
582     * compiled a built in jmp_buf is returned; this preserves the pre-1.6.0\r
583     * semantics that this call will not fail.  If the size is larger, however,\r
584     * the buffer is allocated and this may fail, causing the function to return\r
585     * NULL.\r
586     */\r
587    if (png_ptr == NULL)\r
588       return NULL;\r
589 \r
590    if (png_ptr->jmp_buf_ptr == NULL)\r
591    {\r
592       png_ptr->jmp_buf_size = 0; /* not allocated */\r
593 \r
594       if (jmp_buf_size <= (sizeof png_ptr->jmp_buf_local))\r
595          png_ptr->jmp_buf_ptr = &png_ptr->jmp_buf_local;\r
596 \r
597       else\r
598       {\r
599          png_ptr->jmp_buf_ptr = png_voidcast(jmp_buf *,\r
600             png_malloc_warn(png_ptr, jmp_buf_size));\r
601 \r
602          if (png_ptr->jmp_buf_ptr == NULL)\r
603             return NULL; /* new NULL return on OOM */\r
604 \r
605          png_ptr->jmp_buf_size = jmp_buf_size;\r
606       }\r
607    }\r
608 \r
609    else /* Already allocated: check the size */\r
610    {\r
611       size_t size = png_ptr->jmp_buf_size;\r
612 \r
613       if (size == 0)\r
614       {\r
615          size = (sizeof png_ptr->jmp_buf_local);\r
616          if (png_ptr->jmp_buf_ptr != &png_ptr->jmp_buf_local)\r
617          {\r
618             /* This is an internal error in libpng: somehow we have been left\r
619              * with a stack allocated jmp_buf when the application regained\r
620              * control.  It's always possible to fix this up, but for the moment\r
621              * this is a png_error because that makes it easy to detect.\r
622              */\r
623             png_error(png_ptr, "Libpng jmp_buf still allocated");\r
624             /* png_ptr->jmp_buf_ptr = &png_ptr->jmp_buf_local; */\r
625          }\r
626       }\r
627 \r
628       if (size != jmp_buf_size)\r
629       {\r
630          png_warning(png_ptr, "Application jmp_buf size changed");\r
631          return NULL; /* caller will probably crash: no choice here */\r
632       }\r
633    }\r
634 \r
635    /* Finally fill in the function, now we have a satisfactory buffer. It is\r
636     * valid to change the function on every call.\r
637     */\r
638    png_ptr->longjmp_fn = longjmp_fn;\r
639    return png_ptr->jmp_buf_ptr;\r
640 }\r
641 \r
642 void /* PRIVATE */\r
643 png_free_jmpbuf(png_structrp png_ptr)\r
644 {\r
645    if (png_ptr != NULL)\r
646    {\r
647       jmp_buf *jb = png_ptr->jmp_buf_ptr;\r
648 \r
649       /* A size of 0 is used to indicate a local, stack, allocation of the\r
650        * pointer; used here and in png.c\r
651        */\r
652       if (jb != NULL && png_ptr->jmp_buf_size > 0)\r
653       {\r
654 \r
655          /* This stuff is so that a failure to free the error control structure\r
656           * does not leave libpng in a state with no valid error handling: the\r
657           * free always succeeds, if there is an error it gets ignored.\r
658           */\r
659          if (jb != &png_ptr->jmp_buf_local)\r
660          {\r
661             /* Make an internal, libpng, jmp_buf to return here */\r
662             jmp_buf free_jmp_buf;\r
663 \r
664             if (!setjmp(free_jmp_buf))\r
665             {\r
666                png_ptr->jmp_buf_ptr = &free_jmp_buf; /* come back here */\r
667                png_ptr->jmp_buf_size = 0; /* stack allocation */\r
668                png_ptr->longjmp_fn = longjmp;\r
669                png_free(png_ptr, jb); /* Return to setjmp on error */\r
670             }\r
671          }\r
672       }\r
673 \r
674       /* *Always* cancel everything out: */\r
675       png_ptr->jmp_buf_size = 0;\r
676       png_ptr->jmp_buf_ptr = NULL;\r
677       png_ptr->longjmp_fn = 0;\r
678    }\r
679 }\r
680 #endif\r
681 \r
682 /* This is the default error handling function.  Note that replacements for\r
683  * this function MUST NOT RETURN, or the program will likely crash.  This\r
684  * function is used by default, or if the program supplies NULL for the\r
685  * error function pointer in png_set_error_fn().\r
686  */\r
687 static PNG_FUNCTION(void /* PRIVATE */,\r
688 png_default_error,(png_const_structrp png_ptr, png_const_charp error_message),\r
689    PNG_NORETURN)\r
690 {\r
691 #ifdef PNG_CONSOLE_IO_SUPPORTED\r
692 #ifdef PNG_ERROR_NUMBERS_SUPPORTED\r
693    /* Check on NULL only added in 1.5.4 */\r
694    if (error_message != NULL && *error_message == PNG_LITERAL_SHARP)\r
695    {\r
696       /* Strip "#nnnn " from beginning of error message. */\r
697       int offset;\r
698       char error_number[16];\r
699       for (offset = 0; offset<15; offset++)\r
700       {\r
701          error_number[offset] = error_message[offset + 1];\r
702          if (error_message[offset] == ' ')\r
703             break;\r
704       }\r
705 \r
706       if ((offset > 1) && (offset < 15))\r
707       {\r
708          error_number[offset - 1] = '\0';\r
709          fprintf(stderr, "libpng error no. %s: %s",\r
710              error_number, error_message + offset + 1);\r
711          fprintf(stderr, PNG_STRING_NEWLINE);\r
712       }\r
713 \r
714       else\r
715       {\r
716          fprintf(stderr, "libpng error: %s, offset=%d",\r
717              error_message, offset);\r
718          fprintf(stderr, PNG_STRING_NEWLINE);\r
719       }\r
720    }\r
721    else\r
722 #endif\r
723    {\r
724       fprintf(stderr, "libpng error: %s", error_message ? error_message :\r
725          "undefined");\r
726       fprintf(stderr, PNG_STRING_NEWLINE);\r
727    }\r
728 #else\r
729    PNG_UNUSED(error_message) /* Make compiler happy */\r
730 #endif\r
731    png_longjmp(png_ptr, 1);\r
732 }\r
733 \r
734 PNG_FUNCTION(void,PNGAPI\r
735 png_longjmp,(png_const_structrp png_ptr, int val),PNG_NORETURN)\r
736 {\r
737 #ifdef PNG_SETJMP_SUPPORTED\r
738    if (png_ptr && png_ptr->longjmp_fn && png_ptr->jmp_buf_ptr)\r
739       png_ptr->longjmp_fn(*png_ptr->jmp_buf_ptr, val);\r
740 #endif\r
741 \r
742    /* Here if not setjmp support or if png_ptr is null. */\r
743    PNG_ABORT();\r
744 }\r
745 \r
746 #ifdef PNG_WARNINGS_SUPPORTED\r
747 /* This function is called when there is a warning, but the library thinks\r
748  * it can continue anyway.  Replacement functions don't have to do anything\r
749  * here if you don't want them to.  In the default configuration, png_ptr is\r
750  * not used, but it is passed in case it may be useful.\r
751  */\r
752 static void /* PRIVATE */\r
753 png_default_warning(png_const_structrp png_ptr, png_const_charp warning_message)\r
754 {\r
755 #ifdef PNG_CONSOLE_IO_SUPPORTED\r
756 #  ifdef PNG_ERROR_NUMBERS_SUPPORTED\r
757    if (*warning_message == PNG_LITERAL_SHARP)\r
758    {\r
759       int offset;\r
760       char warning_number[16];\r
761       for (offset = 0; offset < 15; offset++)\r
762       {\r
763          warning_number[offset] = warning_message[offset + 1];\r
764          if (warning_message[offset] == ' ')\r
765             break;\r
766       }\r
767 \r
768       if ((offset > 1) && (offset < 15))\r
769       {\r
770          warning_number[offset + 1] = '\0';\r
771          fprintf(stderr, "libpng warning no. %s: %s",\r
772              warning_number, warning_message + offset);\r
773          fprintf(stderr, PNG_STRING_NEWLINE);\r
774       }\r
775 \r
776       else\r
777       {\r
778          fprintf(stderr, "libpng warning: %s",\r
779              warning_message);\r
780          fprintf(stderr, PNG_STRING_NEWLINE);\r
781       }\r
782    }\r
783    else\r
784 #  endif\r
785 \r
786    {\r
787       fprintf(stderr, "libpng warning: %s", warning_message);\r
788       fprintf(stderr, PNG_STRING_NEWLINE);\r
789    }\r
790 #else\r
791    PNG_UNUSED(warning_message) /* Make compiler happy */\r
792 #endif\r
793    PNG_UNUSED(png_ptr) /* Make compiler happy */\r
794 }\r
795 #endif /* PNG_WARNINGS_SUPPORTED */\r
796 \r
797 /* This function is called when the application wants to use another method\r
798  * of handling errors and warnings.  Note that the error function MUST NOT\r
799  * return to the calling routine or serious problems will occur.  The return\r
800  * method used in the default routine calls longjmp(png_ptr->jmp_buf_ptr, 1)\r
801  */\r
802 void PNGAPI\r
803 png_set_error_fn(png_structrp png_ptr, png_voidp error_ptr,\r
804     png_error_ptr error_fn, png_error_ptr warning_fn)\r
805 {\r
806    if (png_ptr == NULL)\r
807       return;\r
808 \r
809    png_ptr->error_ptr = error_ptr;\r
810    png_ptr->error_fn = error_fn;\r
811 #ifdef PNG_WARNINGS_SUPPORTED\r
812    png_ptr->warning_fn = warning_fn;\r
813 #else\r
814    PNG_UNUSED(warning_fn)\r
815 #endif\r
816 }\r
817 \r
818 \r
819 /* This function returns a pointer to the error_ptr associated with the user\r
820  * functions.  The application should free any memory associated with this\r
821  * pointer before png_write_destroy and png_read_destroy are called.\r
822  */\r
823 png_voidp PNGAPI\r
824 png_get_error_ptr(png_const_structrp png_ptr)\r
825 {\r
826    if (png_ptr == NULL)\r
827       return NULL;\r
828 \r
829    return ((png_voidp)png_ptr->error_ptr);\r
830 }\r
831 \r
832 \r
833 #ifdef PNG_ERROR_NUMBERS_SUPPORTED\r
834 void PNGAPI\r
835 png_set_strip_error_numbers(png_structrp png_ptr, png_uint_32 strip_mode)\r
836 {\r
837    if (png_ptr != NULL)\r
838    {\r
839       png_ptr->flags &=\r
840          ((~(PNG_FLAG_STRIP_ERROR_NUMBERS |\r
841          PNG_FLAG_STRIP_ERROR_TEXT))&strip_mode);\r
842    }\r
843 }\r
844 #endif\r
845 \r
846 #if defined(PNG_SIMPLIFIED_READ_SUPPORTED) ||\\r
847    defined(PNG_SIMPLIFIED_WRITE_SUPPORTED)\r
848    /* Currently the above both depend on SETJMP_SUPPORTED, however it would be\r
849     * possible to implement without setjmp support just so long as there is some\r
850     * way to handle the error return here:\r
851     */\r
852 PNG_FUNCTION(void /* PRIVATE */,\r
853 png_safe_error,(png_structp png_nonconst_ptr, png_const_charp error_message),\r
854    PNG_NORETURN)\r
855 {\r
856    const png_const_structrp png_ptr = png_nonconst_ptr;\r
857    png_imagep image = png_voidcast(png_imagep, png_ptr->error_ptr);\r
858 \r
859    /* An error is always logged here, overwriting anything (typically a warning)\r
860     * that is already there:\r
861     */\r
862    if (image != NULL)\r
863    {\r
864       png_safecat(image->message, (sizeof image->message), 0, error_message);\r
865       image->warning_or_error |= PNG_IMAGE_ERROR;\r
866 \r
867       /* Retrieve the jmp_buf from within the png_control, making this work for\r
868        * C++ compilation too is pretty tricky: C++ wants a pointer to the first\r
869        * element of a jmp_buf, but C doesn't tell us the type of that.\r
870        */\r
871       if (image->opaque != NULL && image->opaque->error_buf != NULL)\r
872          longjmp(png_control_jmp_buf(image->opaque), 1);\r
873 \r
874       /* Missing longjmp buffer, the following is to help debugging: */\r
875       {\r
876          size_t pos = png_safecat(image->message, (sizeof image->message), 0,\r
877             "bad longjmp: ");\r
878          png_safecat(image->message, (sizeof image->message), pos,\r
879              error_message);\r
880       }\r
881    }\r
882 \r
883    /* Here on an internal programming error. */\r
884    abort();\r
885 }\r
886 \r
887 #ifdef PNG_WARNINGS_SUPPORTED\r
888 void /* PRIVATE */\r
889 png_safe_warning(png_structp png_nonconst_ptr, png_const_charp warning_message)\r
890 {\r
891    const png_const_structrp png_ptr = png_nonconst_ptr;\r
892    png_imagep image = png_voidcast(png_imagep, png_ptr->error_ptr);\r
893 \r
894    /* A warning is only logged if there is no prior warning or error. */\r
895    if (image->warning_or_error == 0)\r
896    {\r
897       png_safecat(image->message, (sizeof image->message), 0, warning_message);\r
898       image->warning_or_error |= PNG_IMAGE_WARNING;\r
899    }\r
900 }\r
901 #endif\r
902 \r
903 int /* PRIVATE */\r
904 png_safe_execute(png_imagep image_in, int (*function)(png_voidp), png_voidp arg)\r
905 {\r
906    volatile png_imagep image = image_in;\r
907    volatile int result;\r
908    volatile png_voidp saved_error_buf;\r
909    jmp_buf safe_jmpbuf;\r
910 \r
911    /* Safely execute function(arg) with png_error returning to this function. */\r
912    saved_error_buf = image->opaque->error_buf;\r
913    result = setjmp(safe_jmpbuf) == 0;\r
914 \r
915    if (result)\r
916    {\r
917 \r
918       image->opaque->error_buf = safe_jmpbuf;\r
919       result = function(arg);\r
920    }\r
921 \r
922    image->opaque->error_buf = saved_error_buf;\r
923 \r
924    /* And do the cleanup prior to any failure return. */\r
925    if (!result)\r
926       png_image_free(image);\r
927 \r
928    return result;\r
929 }\r
930 #endif /* SIMPLIFIED READ/WRITE */\r
931 #endif /* PNG_READ_SUPPORTED || PNG_WRITE_SUPPORTED */\r