pngrio.c 5.3 KB
Newer Older
G
Guy Schalnat 已提交
1 2

/* pngrio.c - functions for data input
3
 *
4
 * libpng 1.2.9beta2 - February 22, 2006
5
 * For conditions of distribution and use, see copyright notice in png.h
6
 * Copyright (c) 1998-2006 Glenn Randers-Pehrson
7 8
 * (Version 0.96 Copyright (c) 1996, 1997 Andreas Dilger)
 * (Version 0.88 Copyright (c) 1995, 1996 Guy Eric Schalnat, Group 42, Inc.)
9
 *
10 11 12 13
 * This file provides a location for all input.  Users who need
 * special handling are expected to write a function that has the same
 * arguments as this and performs a similar function, but that possibly
 * has a different input method.  Note that you shouldn't change this
14 15 16
 * function, but rather write a replacement function and then make
 * libpng use it at run time with png_set_read_fn(...).
 */
G
Guy Schalnat 已提交
17 18 19 20

#define PNG_INTERNAL
#include "png.h"

21 22
#if defined(PNG_READ_SUPPORTED)

G
Guy Schalnat 已提交
23 24 25 26
/* Read the data from whatever input you are using.  The default routine
   reads from a file pointer.  Note that this routine sometimes gets called
   with very small lengths, so you should implement some kind of simple
   buffering if you are using unbuffered reads.  This should never be asked
A
Andreas Dilger 已提交
27
   to read more then 64K on a 16 bit machine. */
28
void /* PRIVATE */
A
Andreas Dilger 已提交
29
png_read_data(png_structp png_ptr, png_bytep data, png_size_t length)
G
Guy Schalnat 已提交
30
{
31
   png_debug1(4,"reading %d bytes\n", (int)length);
A
Andreas Dilger 已提交
32
   if (png_ptr->read_data_fn != NULL)
G
Guy Schalnat 已提交
33 34 35 36 37
      (*(png_ptr->read_data_fn))(png_ptr, data, length);
   else
      png_error(png_ptr, "Call to NULL read function");
}

38
#if !defined(PNG_NO_STDIO)
39
/* This is the function that does the actual reading of data.  If you are
G
Guy Schalnat 已提交
40 41 42 43
   not reading from a standard C stream, you should create a replacement
   read_data function and use it at run time with png_set_read_fn(), rather
   than changing the library. */
#ifndef USE_FAR_KEYWORD
44
void PNGAPI
A
Andreas Dilger 已提交
45
png_default_read_data(png_structp png_ptr, png_bytep data, png_size_t length)
G
Guy Schalnat 已提交
46
{
A
Andreas Dilger 已提交
47 48 49 50 51
   png_size_t check;

   /* fread() returns 0 on error, so it is OK to store this in a png_size_t
    * instead of an int, which is what fread() actually returns.
    */
52 53 54 55
#if defined(_WIN32_WCE)
   if ( !ReadFile((HANDLE)(png_ptr->io_ptr), data, length, &check, NULL) )
      check = 0;
#else
A
Andreas Dilger 已提交
56
   check = (png_size_t)fread(data, (png_size_t)1, length,
57
      (png_FILE_p)png_ptr->io_ptr);
58
#endif
G
Guy Schalnat 已提交
59 60 61 62 63 64 65 66 67

   if (check != length)
      png_error(png_ptr, "Read Error");
}
#else
/* this is the model-independent version. Since the standard I/O library
   can't handle far buffers in the medium and small models, we have to copy
   the data.
*/
68

G
Guy Schalnat 已提交
69 70
#define NEAR_BUF_SIZE 1024
#define MIN(a,b) (a <= b ? a : b)
71

72
static void /* PRIVATE */
A
Andreas Dilger 已提交
73
png_default_read_data(png_structp png_ptr, png_bytep data, png_size_t length)
G
Guy Schalnat 已提交
74
{
A
Andreas Dilger 已提交
75
   int check;
G
Guy Schalnat 已提交
76
   png_byte *n_data;
77
   png_FILE_p io_ptr;
G
Guy Schalnat 已提交
78 79

   /* Check if data really is near. If so, use usual code. */
A
Andreas Dilger 已提交
80
   n_data = (png_byte *)CVT_PTR_NOCHECK(data);
81
   io_ptr = (png_FILE_p)CVT_PTR(png_ptr->io_ptr);
G
Guy Schalnat 已提交
82 83
   if ((png_bytep)n_data == data)
   {
84 85 86 87
#if defined(_WIN32_WCE)
      if ( !ReadFile((HANDLE)(png_ptr->io_ptr), data, length, &check, NULL) )
         check = 0;
#else
A
Andreas Dilger 已提交
88
      check = fread(n_data, 1, length, io_ptr);
89
#endif
G
Guy Schalnat 已提交
90 91 92 93 94 95
   }
   else
   {
      png_byte buf[NEAR_BUF_SIZE];
      png_size_t read, remaining, err;
      check = 0;
A
Andreas Dilger 已提交
96
      remaining = length;
G
Guy Schalnat 已提交
97 98 99
      do
      {
         read = MIN(NEAR_BUF_SIZE, remaining);
100 101 102 103
#if defined(_WIN32_WCE)
         if ( !ReadFile((HANDLE)(io_ptr), buf, read, &err, NULL) )
            err = 0;
#else
A
Andreas Dilger 已提交
104
         err = fread(buf, (png_size_t)1, read, io_ptr);
105
#endif
G
Guy Schalnat 已提交
106 107 108 109 110 111 112 113 114 115
         png_memcpy(data, buf, read); /* copy far buffer to near buffer */
         if(err != read)
            break;
         else
            check += err;
         data += read;
         remaining -= read;
      }
      while (remaining != 0);
   }
116
   if ((png_uint_32)check != (png_uint_32)length)
G
Guy Schalnat 已提交
117 118 119
      png_error(png_ptr, "read Error");
}
#endif
120
#endif
G
Guy Schalnat 已提交
121 122 123 124 125 126 127 128

/* This function allows the application to supply a new input function
   for libpng if standard C streams aren't being used.

   This function takes as its arguments:
   png_ptr      - pointer to a png input data structure
   io_ptr       - pointer to user supplied structure containing info about
                  the input functions.  May be NULL.
129
   read_data_fn - pointer to a new input function that takes as its
G
Guy Schalnat 已提交
130 131
                  arguments a pointer to a png_struct, a pointer to
                  a location where input data can be stored, and a 32-bit
132
                  unsigned int that is the number of bytes to be read.
G
Guy Schalnat 已提交
133 134
                  To exit and output any fatal error messages the new write
                  function should call png_error(png_ptr, "Error msg"). */
135
void PNGAPI
G
Guy Schalnat 已提交
136 137 138 139 140
png_set_read_fn(png_structp png_ptr, png_voidp io_ptr,
   png_rw_ptr read_data_fn)
{
   png_ptr->io_ptr = io_ptr;

141
#if !defined(PNG_NO_STDIO)
A
Andreas Dilger 已提交
142
   if (read_data_fn != NULL)
G
Guy Schalnat 已提交
143 144
      png_ptr->read_data_fn = read_data_fn;
   else
145
      png_ptr->read_data_fn = png_default_read_data;
146 147 148
#else
   png_ptr->read_data_fn = read_data_fn;
#endif
G
Guy Schalnat 已提交
149 150

   /* It is an error to write to a read device */
151 152 153 154 155 156 157 158
   if (png_ptr->write_data_fn != NULL)
   {
      png_ptr->write_data_fn = NULL;
      png_warning(png_ptr,
         "It's an error to set both read_data_fn and write_data_fn in the ");
      png_warning(png_ptr,
         "same structure.  Resetting write_data_fn to NULL.");
   }
G
Guy Schalnat 已提交
159 160 161

#if defined(PNG_WRITE_FLUSH_SUPPORTED)
   png_ptr->output_flush_fn = NULL;
162
#endif
G
Guy Schalnat 已提交
163
}
164
#endif /* PNG_READ_SUPPORTED */