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