]> git.cworth.org Git - apitrace/blob - thirdparty/libpng/pngmem.c
egl: Add Khronos EGL headers
[apitrace] / thirdparty / libpng / pngmem.c
1
2 /* pngmem.c - stub functions for memory allocation
3  *
4  * Last changed in libpng 1.5.1 [February 3, 2011]
5  * Copyright (c) 1998-2011 Glenn Randers-Pehrson
6  * (Version 0.96 Copyright (c) 1996, 1997 Andreas Dilger)
7  * (Version 0.88 Copyright (c) 1995, 1996 Guy Eric Schalnat, Group 42, Inc.)
8  *
9  * This code is released under the libpng license.
10  * For conditions of distribution and use, see the disclaimer
11  * and license in png.h
12  *
13  * This file provides a location for all memory allocation.  Users who
14  * need special memory handling are expected to supply replacement
15  * functions for png_malloc() and png_free(), and to use
16  * png_create_read_struct_2() and png_create_write_struct_2() to
17  * identify the replacement functions.
18  */
19
20 #include "pngpriv.h"
21
22 #if defined(PNG_READ_SUPPORTED) || defined(PNG_WRITE_SUPPORTED)
23
24 /* Borland DOS special memory handler */
25 #if defined(__TURBOC__) && !defined(_Windows) && !defined(__FLAT__)
26 /* If you change this, be sure to change the one in png.h also */
27
28 /* Allocate memory for a png_struct.  The malloc and memset can be replaced
29    by a single call to calloc() if this is thought to improve performance. */
30 PNG_FUNCTION(png_voidp /* PRIVATE */,
31 png_create_struct,(int type),PNG_ALLOCATED)
32 {
33 #  ifdef PNG_USER_MEM_SUPPORTED
34    return (png_create_struct_2(type, NULL, NULL));
35 }
36
37 /* Alternate version of png_create_struct, for use with user-defined malloc. */
38 PNG_FUNCTION(png_voidp /* PRIVATE */,
39 png_create_struct_2,(int type, png_malloc_ptr malloc_fn, png_voidp mem_ptr),
40    PNG_ALLOCATED)
41 {
42 #  endif /* PNG_USER_MEM_SUPPORTED */
43    png_size_t size;
44    png_voidp struct_ptr;
45
46    if (type == PNG_STRUCT_INFO)
47       size = png_sizeof(png_info);
48
49    else if (type == PNG_STRUCT_PNG)
50       size = png_sizeof(png_struct);
51
52    else
53       return (png_get_copyright(NULL));
54
55 #  ifdef PNG_USER_MEM_SUPPORTED
56    if (malloc_fn != NULL)
57    {
58       png_struct dummy_struct;
59       png_structp png_ptr = &dummy_struct;
60       png_ptr->mem_ptr=mem_ptr;
61       struct_ptr = (*(malloc_fn))(png_ptr, (png_uint_32)size);
62    }
63
64    else
65 #  endif /* PNG_USER_MEM_SUPPORTED */
66    struct_ptr = (png_voidp)farmalloc(size);
67    if (struct_ptr != NULL)
68       png_memset(struct_ptr, 0, size);
69
70    return (struct_ptr);
71 }
72
73 /* Free memory allocated by a png_create_struct() call */
74 void /* PRIVATE */
75 png_destroy_struct(png_voidp struct_ptr)
76 {
77 #  ifdef PNG_USER_MEM_SUPPORTED
78    png_destroy_struct_2(struct_ptr, NULL, NULL);
79 }
80
81 /* Free memory allocated by a png_create_struct() call */
82 void /* PRIVATE */
83 png_destroy_struct_2(png_voidp struct_ptr, png_free_ptr free_fn,
84     png_voidp mem_ptr)
85 {
86 #  endif
87    if (struct_ptr != NULL)
88    {
89 #  ifdef PNG_USER_MEM_SUPPORTED
90       if (free_fn != NULL)
91       {
92          png_struct dummy_struct;
93          png_structp png_ptr = &dummy_struct;
94          png_ptr->mem_ptr=mem_ptr;
95          (*(free_fn))(png_ptr, struct_ptr);
96          return;
97       }
98
99 #  endif /* PNG_USER_MEM_SUPPORTED */
100       farfree (struct_ptr);
101    }
102 }
103
104 /* Allocate memory.  For reasonable files, size should never exceed
105  * 64K.  However, zlib may allocate more then 64K if you don't tell
106  * it not to.  See zconf.h and png.h for more information. zlib does
107  * need to allocate exactly 64K, so whatever you call here must
108  * have the ability to do that.
109  *
110  * Borland seems to have a problem in DOS mode for exactly 64K.
111  * It gives you a segment with an offset of 8 (perhaps to store its
112  * memory stuff).  zlib doesn't like this at all, so we have to
113  * detect and deal with it.  This code should not be needed in
114  * Windows or OS/2 modes, and only in 16 bit mode.  This code has
115  * been updated by Alexander Lehmann for version 0.89 to waste less
116  * memory.
117  *
118  * Note that we can't use png_size_t for the "size" declaration,
119  * since on some systems a png_size_t is a 16-bit quantity, and as a
120  * result, we would be truncating potentially larger memory requests
121  * (which should cause a fatal error) and introducing major problems.
122  */
123 PNG_FUNCTION(png_voidp,PNGAPI
124 png_calloc,(png_structp png_ptr, png_alloc_size_t size),PNG_ALLOCATED)
125 {
126    png_voidp ret;
127
128    ret = (png_malloc(png_ptr, size));
129
130    if (ret != NULL)
131       png_memset(ret,0,(png_size_t)size);
132
133    return (ret);
134 }
135
136 PNG_FUNCTION(png_voidp,PNGAPI
137 png_malloc,(png_structp png_ptr, png_alloc_size_t size),PNG_ALLOCATED)
138 {
139    png_voidp ret;
140
141    if (png_ptr == NULL || size == 0)
142       return (NULL);
143
144 #  ifdef PNG_USER_MEM_SUPPORTED
145    if (png_ptr->malloc_fn != NULL)
146       ret = ((png_voidp)(*(png_ptr->malloc_fn))(png_ptr, (png_size_t)size));
147
148    else
149       ret = (png_malloc_default(png_ptr, size));
150
151    if (ret == NULL && (png_ptr->flags&PNG_FLAG_MALLOC_NULL_MEM_OK) == 0)
152        png_error(png_ptr, "Out of memory");
153
154    return (ret);
155 }
156
157 PNG_FUNCTION(png_voidp,PNGAPI
158 png_malloc_default,(png_structp png_ptr, png_alloc_size_t size),PNG_ALLOCATED)
159 {
160    png_voidp ret;
161 #  endif /* PNG_USER_MEM_SUPPORTED */
162
163    if (png_ptr == NULL || size == 0)
164       return (NULL);
165
166 #  ifdef PNG_MAX_MALLOC_64K
167    if (size > (png_uint_32)65536L)
168    {
169       png_warning(png_ptr, "Cannot Allocate > 64K");
170       ret = NULL;
171    }
172
173    else
174 #  endif
175
176    if (size != (size_t)size)
177       ret = NULL;
178
179    else if (size == (png_uint_32)65536L)
180    {
181       if (png_ptr->offset_table == NULL)
182       {
183          /* Try to see if we need to do any of this fancy stuff */
184          ret = farmalloc(size);
185          if (ret == NULL || ((png_size_t)ret & 0xffff))
186          {
187             int num_blocks;
188             png_uint_32 total_size;
189             png_bytep table;
190             int i;
191             png_byte huge * hptr;
192
193             if (ret != NULL)
194             {
195                farfree(ret);
196                ret = NULL;
197             }
198
199             if (png_ptr->zlib_window_bits > 14)
200                num_blocks = (int)(1 << (png_ptr->zlib_window_bits - 14));
201
202             else
203                num_blocks = 1;
204
205             if (png_ptr->zlib_mem_level >= 7)
206                num_blocks += (int)(1 << (png_ptr->zlib_mem_level - 7));
207
208             else
209                num_blocks++;
210
211             total_size = ((png_uint_32)65536L) * (png_uint_32)num_blocks+16;
212
213             table = farmalloc(total_size);
214
215             if (table == NULL)
216             {
217 #  ifndef PNG_USER_MEM_SUPPORTED
218                if ((png_ptr->flags&PNG_FLAG_MALLOC_NULL_MEM_OK) == 0)
219                   png_error(png_ptr, "Out Of Memory"); /* Note "O", "M" */
220
221                else
222                   png_warning(png_ptr, "Out Of Memory");
223 #  endif
224                return (NULL);
225             }
226
227             if ((png_size_t)table & 0xfff0)
228             {
229 #  ifndef PNG_USER_MEM_SUPPORTED
230                if ((png_ptr->flags&PNG_FLAG_MALLOC_NULL_MEM_OK) == 0)
231                   png_error(png_ptr,
232                     "Farmalloc didn't return normalized pointer");
233
234                else
235                   png_warning(png_ptr,
236                     "Farmalloc didn't return normalized pointer");
237 #  endif
238                return (NULL);
239             }
240
241             png_ptr->offset_table = table;
242             png_ptr->offset_table_ptr = farmalloc(num_blocks *
243                png_sizeof(png_bytep));
244
245             if (png_ptr->offset_table_ptr == NULL)
246             {
247 #  ifndef PNG_USER_MEM_SUPPORTED
248                if ((png_ptr->flags&PNG_FLAG_MALLOC_NULL_MEM_OK) == 0)
249                   png_error(png_ptr, "Out Of memory"); /* Note "O", "m" */
250
251                else
252                   png_warning(png_ptr, "Out Of memory");
253 #  endif
254                return (NULL);
255             }
256
257             hptr = (png_byte huge *)table;
258             if ((png_size_t)hptr & 0xf)
259             {
260                hptr = (png_byte huge *)((long)(hptr) & 0xfffffff0L);
261                hptr = hptr + 16L;  /* "hptr += 16L" fails on Turbo C++ 3.0 */
262             }
263
264             for (i = 0; i < num_blocks; i++)
265             {
266                png_ptr->offset_table_ptr[i] = (png_bytep)hptr;
267                hptr = hptr + (png_uint_32)65536L;  /* "+=" fails on TC++3.0 */
268             }
269
270             png_ptr->offset_table_number = num_blocks;
271             png_ptr->offset_table_count = 0;
272             png_ptr->offset_table_count_free = 0;
273          }
274       }
275
276       if (png_ptr->offset_table_count >= png_ptr->offset_table_number)
277       {
278 #  ifndef PNG_USER_MEM_SUPPORTED
279          if ((png_ptr->flags&PNG_FLAG_MALLOC_NULL_MEM_OK) == 0)
280             png_error(png_ptr, "Out of Memory"); /* Note "o" and "M" */
281
282          else
283             png_warning(png_ptr, "Out of Memory");
284 #  endif
285          return (NULL);
286       }
287
288       ret = png_ptr->offset_table_ptr[png_ptr->offset_table_count++];
289    }
290
291    else
292       ret = farmalloc(size);
293
294 #  ifndef PNG_USER_MEM_SUPPORTED
295    if (ret == NULL)
296    {
297       if ((png_ptr->flags&PNG_FLAG_MALLOC_NULL_MEM_OK) == 0)
298          png_error(png_ptr, "Out of memory"); /* Note "o" and "m" */
299
300       else
301          png_warning(png_ptr, "Out of memory"); /* Note "o" and "m" */
302    }
303 #  endif
304
305    return (ret);
306 }
307
308 /* Free a pointer allocated by png_malloc().  In the default
309  * configuration, png_ptr is not used, but is passed in case it
310  * is needed.  If ptr is NULL, return without taking any action.
311  */
312 void PNGAPI
313 png_free(png_structp png_ptr, png_voidp ptr)
314 {
315    if (png_ptr == NULL || ptr == NULL)
316       return;
317
318 #  ifdef PNG_USER_MEM_SUPPORTED
319    if (png_ptr->free_fn != NULL)
320    {
321       (*(png_ptr->free_fn))(png_ptr, ptr);
322       return;
323    }
324
325    else
326       png_free_default(png_ptr, ptr);
327 }
328
329 void PNGAPI
330 png_free_default(png_structp png_ptr, png_voidp ptr)
331 {
332 #  endif /* PNG_USER_MEM_SUPPORTED */
333
334    if (png_ptr == NULL || ptr == NULL)
335       return;
336
337    if (png_ptr->offset_table != NULL)
338    {
339       int i;
340
341       for (i = 0; i < png_ptr->offset_table_count; i++)
342       {
343          if (ptr == png_ptr->offset_table_ptr[i])
344          {
345             ptr = NULL;
346             png_ptr->offset_table_count_free++;
347             break;
348          }
349       }
350       if (png_ptr->offset_table_count_free == png_ptr->offset_table_count)
351       {
352          farfree(png_ptr->offset_table);
353          farfree(png_ptr->offset_table_ptr);
354          png_ptr->offset_table = NULL;
355          png_ptr->offset_table_ptr = NULL;
356       }
357    }
358
359    if (ptr != NULL)
360       farfree(ptr);
361 }
362
363 #else /* Not the Borland DOS special memory handler */
364
365 /* Allocate memory for a png_struct or a png_info.  The malloc and
366    memset can be replaced by a single call to calloc() if this is thought
367    to improve performance noticably. */
368 PNG_FUNCTION(png_voidp /* PRIVATE */,
369 png_create_struct,(int type),PNG_ALLOCATED)
370 {
371 #  ifdef PNG_USER_MEM_SUPPORTED
372    return (png_create_struct_2(type, NULL, NULL));
373 }
374
375 /* Allocate memory for a png_struct or a png_info.  The malloc and
376    memset can be replaced by a single call to calloc() if this is thought
377    to improve performance noticably. */
378 PNG_FUNCTION(png_voidp /* PRIVATE */,
379 png_create_struct_2,(int type, png_malloc_ptr malloc_fn, png_voidp mem_ptr),
380    PNG_ALLOCATED)
381 {
382 #  endif /* PNG_USER_MEM_SUPPORTED */
383    png_size_t size;
384    png_voidp struct_ptr;
385
386    if (type == PNG_STRUCT_INFO)
387       size = png_sizeof(png_info);
388
389    else if (type == PNG_STRUCT_PNG)
390       size = png_sizeof(png_struct);
391
392    else
393       return (NULL);
394
395 #  ifdef PNG_USER_MEM_SUPPORTED
396    if (malloc_fn != NULL)
397    {
398       png_struct dummy_struct;
399       png_structp png_ptr = &dummy_struct;
400       png_ptr->mem_ptr=mem_ptr;
401       struct_ptr = (*(malloc_fn))(png_ptr, size);
402
403       if (struct_ptr != NULL)
404          png_memset(struct_ptr, 0, size);
405
406       return (struct_ptr);
407    }
408 #  endif /* PNG_USER_MEM_SUPPORTED */
409
410 #  if defined(__TURBOC__) && !defined(__FLAT__)
411    struct_ptr = (png_voidp)farmalloc(size);
412 #  else
413 #    if defined(_MSC_VER) && defined(MAXSEG_64K)
414    struct_ptr = (png_voidp)halloc(size, 1);
415 #    else
416    struct_ptr = (png_voidp)malloc(size);
417 #    endif
418 #  endif
419
420    if (struct_ptr != NULL)
421       png_memset(struct_ptr, 0, size);
422
423    return (struct_ptr);
424 }
425
426
427 /* Free memory allocated by a png_create_struct() call */
428 void /* PRIVATE */
429 png_destroy_struct(png_voidp struct_ptr)
430 {
431 #  ifdef PNG_USER_MEM_SUPPORTED
432    png_destroy_struct_2(struct_ptr, NULL, NULL);
433 }
434
435 /* Free memory allocated by a png_create_struct() call */
436 void /* PRIVATE */
437 png_destroy_struct_2(png_voidp struct_ptr, png_free_ptr free_fn,
438     png_voidp mem_ptr)
439 {
440 #  endif /* PNG_USER_MEM_SUPPORTED */
441    if (struct_ptr != NULL)
442    {
443 #  ifdef PNG_USER_MEM_SUPPORTED
444       if (free_fn != NULL)
445       {
446          png_struct dummy_struct;
447          png_structp png_ptr = &dummy_struct;
448          png_ptr->mem_ptr=mem_ptr;
449          (*(free_fn))(png_ptr, struct_ptr);
450          return;
451       }
452 #  endif /* PNG_USER_MEM_SUPPORTED */
453 #  if defined(__TURBOC__) && !defined(__FLAT__)
454       farfree(struct_ptr);
455
456 #  else
457 #    if defined(_MSC_VER) && defined(MAXSEG_64K)
458       hfree(struct_ptr);
459
460 #    else
461       free(struct_ptr);
462
463 #    endif
464 #  endif
465    }
466 }
467
468 /* Allocate memory.  For reasonable files, size should never exceed
469  * 64K.  However, zlib may allocate more then 64K if you don't tell
470  * it not to.  See zconf.h and png.h for more information.  zlib does
471  * need to allocate exactly 64K, so whatever you call here must
472  * have the ability to do that.
473  */
474
475 PNG_FUNCTION(png_voidp,PNGAPI
476 png_calloc,(png_structp png_ptr, png_alloc_size_t size),PNG_ALLOCATED)
477 {
478    png_voidp ret;
479
480    ret = (png_malloc(png_ptr, size));
481
482    if (ret != NULL)
483       png_memset(ret,0,(png_size_t)size);
484
485    return (ret);
486 }
487
488 PNG_FUNCTION(png_voidp,PNGAPI
489 png_malloc,(png_structp png_ptr, png_alloc_size_t size),PNG_ALLOCATED)
490 {
491    png_voidp ret;
492
493 #  ifdef PNG_USER_MEM_SUPPORTED
494    if (png_ptr == NULL || size == 0)
495       return (NULL);
496
497    if (png_ptr->malloc_fn != NULL)
498       ret = ((png_voidp)(*(png_ptr->malloc_fn))(png_ptr, (png_size_t)size));
499
500    else
501       ret = (png_malloc_default(png_ptr, size));
502
503    if (ret == NULL && (png_ptr->flags&PNG_FLAG_MALLOC_NULL_MEM_OK) == 0)
504        png_error(png_ptr, "Out of Memory");
505
506    return (ret);
507 }
508
509 PNG_FUNCTION(png_voidp,PNGAPI
510 png_malloc_default,(png_structp png_ptr, png_alloc_size_t size),PNG_ALLOCATED)
511 {
512    png_voidp ret;
513 #  endif /* PNG_USER_MEM_SUPPORTED */
514
515    if (png_ptr == NULL || size == 0)
516       return (NULL);
517
518 #  ifdef PNG_MAX_MALLOC_64K
519    if (size > (png_uint_32)65536L)
520    {
521 #    ifndef PNG_USER_MEM_SUPPORTED
522       if ((png_ptr->flags&PNG_FLAG_MALLOC_NULL_MEM_OK) == 0)
523          png_error(png_ptr, "Cannot Allocate > 64K");
524
525       else
526 #    endif
527          return NULL;
528    }
529 #  endif
530
531    /* Check for overflow */
532 #  if defined(__TURBOC__) && !defined(__FLAT__)
533
534    if (size != (unsigned long)size)
535       ret = NULL;
536
537    else
538       ret = farmalloc(size);
539
540 #  else
541 #    if defined(_MSC_VER) && defined(MAXSEG_64K)
542    if (size != (unsigned long)size)
543       ret = NULL;
544
545    else
546       ret = halloc(size, 1);
547
548 #    else
549    if (size != (size_t)size)
550       ret = NULL;
551
552    else
553       ret = malloc((size_t)size);
554 #    endif
555 #  endif
556
557 #  ifndef PNG_USER_MEM_SUPPORTED
558    if (ret == NULL && (png_ptr->flags&PNG_FLAG_MALLOC_NULL_MEM_OK) == 0)
559       png_error(png_ptr, "Out of Memory");
560 #  endif
561
562    return (ret);
563 }
564
565 /* Free a pointer allocated by png_malloc().  If ptr is NULL, return
566  * without taking any action.
567  */
568 void PNGAPI
569 png_free(png_structp png_ptr, png_voidp ptr)
570 {
571    if (png_ptr == NULL || ptr == NULL)
572       return;
573
574 #  ifdef PNG_USER_MEM_SUPPORTED
575    if (png_ptr->free_fn != NULL)
576    {
577       (*(png_ptr->free_fn))(png_ptr, ptr);
578       return;
579    }
580
581    else
582       png_free_default(png_ptr, ptr);
583 }
584
585 void PNGAPI
586 png_free_default(png_structp png_ptr, png_voidp ptr)
587 {
588    if (png_ptr == NULL || ptr == NULL)
589       return;
590
591 #  endif /* PNG_USER_MEM_SUPPORTED */
592
593 #  if defined(__TURBOC__) && !defined(__FLAT__)
594    farfree(ptr);
595
596 #  else
597 #    if defined(_MSC_VER) && defined(MAXSEG_64K)
598    hfree(ptr);
599
600 #    else
601    free(ptr);
602
603 #    endif
604 #  endif
605 }
606 #endif /* Not Borland DOS special memory handler */
607
608 /* This function was added at libpng version 1.2.3.  The png_malloc_warn()
609  * function will set up png_malloc() to issue a png_warning and return NULL
610  * instead of issuing a png_error, if it fails to allocate the requested
611  * memory.
612  */
613 PNG_FUNCTION(png_voidp,PNGAPI
614 png_malloc_warn,(png_structp png_ptr, png_alloc_size_t size),PNG_ALLOCATED)
615 {
616    png_voidp ptr;
617    png_uint_32 save_flags;
618    if (png_ptr == NULL)
619       return (NULL);
620
621    save_flags = png_ptr->flags;
622    png_ptr->flags|=PNG_FLAG_MALLOC_NULL_MEM_OK;
623    ptr = (png_voidp)png_malloc((png_structp)png_ptr, size);
624    png_ptr->flags=save_flags;
625    return(ptr);
626 }
627
628
629 #ifdef PNG_USER_MEM_SUPPORTED
630 /* This function is called when the application wants to use another method
631  * of allocating and freeing memory.
632  */
633 void PNGAPI
634 png_set_mem_fn(png_structp png_ptr, png_voidp mem_ptr, png_malloc_ptr
635   malloc_fn, png_free_ptr free_fn)
636 {
637    if (png_ptr != NULL)
638    {
639       png_ptr->mem_ptr = mem_ptr;
640       png_ptr->malloc_fn = malloc_fn;
641       png_ptr->free_fn = free_fn;
642    }
643 }
644
645 /* This function returns a pointer to the mem_ptr associated with the user
646  * functions.  The application should free any memory associated with this
647  * pointer before png_write_destroy and png_read_destroy are called.
648  */
649 png_voidp PNGAPI
650 png_get_mem_ptr(png_const_structp png_ptr)
651 {
652    if (png_ptr == NULL)
653       return (NULL);
654
655    return ((png_voidp)png_ptr->mem_ptr);
656 }
657 #endif /* PNG_USER_MEM_SUPPORTED */
658 #endif /* PNG_READ_SUPPORTED || PNG_WRITE_SUPPORTED */