3dphotoshoot

annotate libs/libpng/pngrio.c @ 14:06dc8b9b4f89

find changesets by author, revision, files, or words in the commit message
added libimago, libjpeg and libpng
author John Tsiombikas <nuclear@member.fsf.org>
date Sun, 07 Jun 2015 17:25:49 +0300
parents
children
rev   line source
nuclear@14 1
nuclear@14 2 /* pngrio.c - functions for data input
nuclear@14 3 *
nuclear@14 4 * Last changed in libpng 1.2.30 [August 15, 2008]
nuclear@14 5 * For conditions of distribution and use, see copyright notice in png.h
nuclear@14 6 * Copyright (c) 1998-2008 Glenn Randers-Pehrson
nuclear@14 7 * (Version 0.96 Copyright (c) 1996, 1997 Andreas Dilger)
nuclear@14 8 * (Version 0.88 Copyright (c) 1995, 1996 Guy Eric Schalnat, Group 42, Inc.)
nuclear@14 9 *
nuclear@14 10 * This file provides a location for all input. Users who need
nuclear@14 11 * special handling are expected to write a function that has the same
nuclear@14 12 * arguments as this and performs a similar function, but that possibly
nuclear@14 13 * has a different input method. Note that you shouldn't change this
nuclear@14 14 * function, but rather write a replacement function and then make
nuclear@14 15 * libpng use it at run time with png_set_read_fn(...).
nuclear@14 16 */
nuclear@14 17
nuclear@14 18 #define PNG_INTERNAL
nuclear@14 19 #include "png.h"
nuclear@14 20 #if defined(PNG_READ_SUPPORTED)
nuclear@14 21
nuclear@14 22 /* Read the data from whatever input you are using. The default routine
nuclear@14 23 reads from a file pointer. Note that this routine sometimes gets called
nuclear@14 24 with very small lengths, so you should implement some kind of simple
nuclear@14 25 buffering if you are using unbuffered reads. This should never be asked
nuclear@14 26 to read more then 64K on a 16 bit machine. */
nuclear@14 27 void /* PRIVATE */
nuclear@14 28 png_read_data(png_structp png_ptr, png_bytep data, png_size_t length)
nuclear@14 29 {
nuclear@14 30 png_debug1(4, "reading %d bytes\n", (int)length);
nuclear@14 31 if (png_ptr->read_data_fn != NULL)
nuclear@14 32 (*(png_ptr->read_data_fn))(png_ptr, data, length);
nuclear@14 33 else
nuclear@14 34 png_error(png_ptr, "Call to NULL read function");
nuclear@14 35 }
nuclear@14 36
nuclear@14 37 #if !defined(PNG_NO_STDIO)
nuclear@14 38 /* This is the function that does the actual reading of data. If you are
nuclear@14 39 not reading from a standard C stream, you should create a replacement
nuclear@14 40 read_data function and use it at run time with png_set_read_fn(), rather
nuclear@14 41 than changing the library. */
nuclear@14 42 #ifndef USE_FAR_KEYWORD
nuclear@14 43 void PNGAPI
nuclear@14 44 png_default_read_data(png_structp png_ptr, png_bytep data, png_size_t length)
nuclear@14 45 {
nuclear@14 46 png_size_t check;
nuclear@14 47
nuclear@14 48 if (png_ptr == NULL) return;
nuclear@14 49 /* fread() returns 0 on error, so it is OK to store this in a png_size_t
nuclear@14 50 * instead of an int, which is what fread() actually returns.
nuclear@14 51 */
nuclear@14 52 #if defined(_WIN32_WCE)
nuclear@14 53 if ( !ReadFile((HANDLE)(png_ptr->io_ptr), data, length, &check, NULL) )
nuclear@14 54 check = 0;
nuclear@14 55 #else
nuclear@14 56 check = (png_size_t)fread(data, (png_size_t)1, length,
nuclear@14 57 (png_FILE_p)png_ptr->io_ptr);
nuclear@14 58 #endif
nuclear@14 59
nuclear@14 60 if (check != length)
nuclear@14 61 png_error(png_ptr, "Read Error");
nuclear@14 62 }
nuclear@14 63 #else
nuclear@14 64 /* this is the model-independent version. Since the standard I/O library
nuclear@14 65 can't handle far buffers in the medium and small models, we have to copy
nuclear@14 66 the data.
nuclear@14 67 */
nuclear@14 68
nuclear@14 69 #define NEAR_BUF_SIZE 1024
nuclear@14 70 #define MIN(a,b) (a <= b ? a : b)
nuclear@14 71
nuclear@14 72 static void PNGAPI
nuclear@14 73 png_default_read_data(png_structp png_ptr, png_bytep data, png_size_t length)
nuclear@14 74 {
nuclear@14 75 int check;
nuclear@14 76 png_byte *n_data;
nuclear@14 77 png_FILE_p io_ptr;
nuclear@14 78
nuclear@14 79 if (png_ptr == NULL) return;
nuclear@14 80 /* Check if data really is near. If so, use usual code. */
nuclear@14 81 n_data = (png_byte *)CVT_PTR_NOCHECK(data);
nuclear@14 82 io_ptr = (png_FILE_p)CVT_PTR(png_ptr->io_ptr);
nuclear@14 83 if ((png_bytep)n_data == data)
nuclear@14 84 {
nuclear@14 85 #if defined(_WIN32_WCE)
nuclear@14 86 if ( !ReadFile((HANDLE)(png_ptr->io_ptr), data, length, &check, NULL) )
nuclear@14 87 check = 0;
nuclear@14 88 #else
nuclear@14 89 check = fread(n_data, 1, length, io_ptr);
nuclear@14 90 #endif
nuclear@14 91 }
nuclear@14 92 else
nuclear@14 93 {
nuclear@14 94 png_byte buf[NEAR_BUF_SIZE];
nuclear@14 95 png_size_t read, remaining, err;
nuclear@14 96 check = 0;
nuclear@14 97 remaining = length;
nuclear@14 98 do
nuclear@14 99 {
nuclear@14 100 read = MIN(NEAR_BUF_SIZE, remaining);
nuclear@14 101 #if defined(_WIN32_WCE)
nuclear@14 102 if ( !ReadFile((HANDLE)(io_ptr), buf, read, &err, NULL) )
nuclear@14 103 err = 0;
nuclear@14 104 #else
nuclear@14 105 err = fread(buf, (png_size_t)1, read, io_ptr);
nuclear@14 106 #endif
nuclear@14 107 png_memcpy(data, buf, read); /* copy far buffer to near buffer */
nuclear@14 108 if (err != read)
nuclear@14 109 break;
nuclear@14 110 else
nuclear@14 111 check += err;
nuclear@14 112 data += read;
nuclear@14 113 remaining -= read;
nuclear@14 114 }
nuclear@14 115 while (remaining != 0);
nuclear@14 116 }
nuclear@14 117 if ((png_uint_32)check != (png_uint_32)length)
nuclear@14 118 png_error(png_ptr, "read Error");
nuclear@14 119 }
nuclear@14 120 #endif
nuclear@14 121 #endif
nuclear@14 122
nuclear@14 123 /* This function allows the application to supply a new input function
nuclear@14 124 for libpng if standard C streams aren't being used.
nuclear@14 125
nuclear@14 126 This function takes as its arguments:
nuclear@14 127 png_ptr - pointer to a png input data structure
nuclear@14 128 io_ptr - pointer to user supplied structure containing info about
nuclear@14 129 the input functions. May be NULL.
nuclear@14 130 read_data_fn - pointer to a new input function that takes as its
nuclear@14 131 arguments a pointer to a png_struct, a pointer to
nuclear@14 132 a location where input data can be stored, and a 32-bit
nuclear@14 133 unsigned int that is the number of bytes to be read.
nuclear@14 134 To exit and output any fatal error messages the new write
nuclear@14 135 function should call png_error(png_ptr, "Error msg"). */
nuclear@14 136 void PNGAPI
nuclear@14 137 png_set_read_fn(png_structp png_ptr, png_voidp io_ptr,
nuclear@14 138 png_rw_ptr read_data_fn)
nuclear@14 139 {
nuclear@14 140 if (png_ptr == NULL) return;
nuclear@14 141 png_ptr->io_ptr = io_ptr;
nuclear@14 142
nuclear@14 143 #if !defined(PNG_NO_STDIO)
nuclear@14 144 if (read_data_fn != NULL)
nuclear@14 145 png_ptr->read_data_fn = read_data_fn;
nuclear@14 146 else
nuclear@14 147 png_ptr->read_data_fn = png_default_read_data;
nuclear@14 148 #else
nuclear@14 149 png_ptr->read_data_fn = read_data_fn;
nuclear@14 150 #endif
nuclear@14 151
nuclear@14 152 /* It is an error to write to a read device */
nuclear@14 153 if (png_ptr->write_data_fn != NULL)
nuclear@14 154 {
nuclear@14 155 png_ptr->write_data_fn = NULL;
nuclear@14 156 png_warning(png_ptr,
nuclear@14 157 "It's an error to set both read_data_fn and write_data_fn in the ");
nuclear@14 158 png_warning(png_ptr,
nuclear@14 159 "same structure. Resetting write_data_fn to NULL.");
nuclear@14 160 }
nuclear@14 161
nuclear@14 162 #if defined(PNG_WRITE_FLUSH_SUPPORTED)
nuclear@14 163 png_ptr->output_flush_fn = NULL;
nuclear@14 164 #endif
nuclear@14 165 }
nuclear@14 166 #endif /* PNG_READ_SUPPORTED */