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

/* pngrio.c - functions for data input
3
 *
4
 * libpng 1.2.1beta1 - October 19, 2001
5
 * For conditions of distribution and use, see copyright notice in png.h
6
 * Copyright (c) 1998-2001 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 21 22 23 24

#define PNG_INTERNAL
#include "png.h"

/* 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 已提交
25
   to read more then 64K on a 16 bit machine. */
26
void /* PRIVATE */
A
Andreas Dilger 已提交
27
png_read_data(png_structp png_ptr, png_bytep data, png_size_t length)
G
Guy Schalnat 已提交
28
{
29
   png_debug1(4,"reading %d bytes\n", (int)length);
A
Andreas Dilger 已提交
30
   if (png_ptr->read_data_fn != NULL)
G
Guy Schalnat 已提交
31 32 33 34 35
      (*(png_ptr->read_data_fn))(png_ptr, data, length);
   else
      png_error(png_ptr, "Call to NULL read function");
}

36
#if !defined(PNG_NO_STDIO)
37
/* This is the function that does the actual reading of data.  If you are
G
Guy Schalnat 已提交
38 39 40 41
   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
42
static void /* PRIVATE */
A
Andreas Dilger 已提交
43
png_default_read_data(png_structp png_ptr, png_bytep data, png_size_t length)
G
Guy Schalnat 已提交
44
{
A
Andreas Dilger 已提交
45 46 47 48 49
   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.
    */
50 51 52 53
#if defined(_WIN32_WCE)
   if ( !ReadFile((HANDLE)(png_ptr->io_ptr), data, length, &check, NULL) )
      check = 0;
#else
A
Andreas Dilger 已提交
54
   check = (png_size_t)fread(data, (png_size_t)1, length,
55
      (png_FILE_p)png_ptr->io_ptr);
56
#endif
G
Guy Schalnat 已提交
57 58 59 60 61 62 63 64 65

   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.
*/
66

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

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

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

/* 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.
127
   read_data_fn - pointer to a new input function that takes as its
G
Guy Schalnat 已提交
128 129
                  arguments a pointer to a png_struct, a pointer to
                  a location where input data can be stored, and a 32-bit
130
                  unsigned int that is the number of bytes to be read.
G
Guy Schalnat 已提交
131 132
                  To exit and output any fatal error messages the new write
                  function should call png_error(png_ptr, "Error msg"). */
133
void PNGAPI
G
Guy Schalnat 已提交
134 135 136 137 138
png_set_read_fn(png_structp png_ptr, png_voidp io_ptr,
   png_rw_ptr read_data_fn)
{
   png_ptr->io_ptr = io_ptr;

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

   /* It is an error to write to a read device */
149 150 151 152 153 154 155 156
   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 已提交
157 158 159

#if defined(PNG_WRITE_FLUSH_SUPPORTED)
   png_ptr->output_flush_fn = NULL;
160
#endif
G
Guy Schalnat 已提交
161
}