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

/* pngrio.c - functions for data input
3 4 5 6 7 8 9 10 11 12 13 14 15 16
 *
 * libpng 1.00.97
 * For conditions of distribution and use, see copyright notice in png.h
 * Copyright (c) 1995, 1996 Guy Eric Schalnat, Group 42, Inc.
 * Copyright (c) 1996, 1997 Andreas Dilger
 * May 28, 1997
 *
 * This file provides a location for all input.  Users which need
 * special handling are expected to write a function which has the same
 * arguments as this, and perform a similar function, but possibly has
 * a different input method.  Note that you shouldn't change this
 * 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. */
G
Guy Schalnat 已提交
26
void
A
Andreas Dilger 已提交
27
png_read_data(png_structp png_ptr, png_bytep data, png_size_t length)
G
Guy Schalnat 已提交
28
{
A
Andreas Dilger 已提交
29 30
   png_debug1(4,"reading %d bytes\n", length);
   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)
G
Guy Schalnat 已提交
37 38 39 40 41 42
/* This is the function which does the actual reading of data.  If you are
   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
static void
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 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.
    */
   check = (png_size_t)fread(data, (png_size_t)1, length,
      (FILE *)png_ptr->io_ptr);
G
Guy Schalnat 已提交
52 53 54 55 56 57 58 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.
*/
 
#define NEAR_BUF_SIZE 1024
#define MIN(a,b) (a <= b ? a : b)
 
static void
A
Andreas Dilger 已提交
68
png_default_read_data(png_structp png_ptr, png_bytep data, png_size_t length)
G
Guy Schalnat 已提交
69
{
A
Andreas Dilger 已提交
70
   int check;
G
Guy Schalnat 已提交
71
   png_byte *n_data;
A
Andreas Dilger 已提交
72
   FILE *io_ptr;
G
Guy Schalnat 已提交
73 74

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

/* 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.
   read_data_fn - pointer to a new input function which takes as it's
                  arguments a pointer to a png_struct, a pointer to
                  a location where input data can be stored, and a 32-bit
                  unsigned int which is the number of bytes to be read.
                  To exit and output any fatal error messages the new write
                  function should call png_error(png_ptr, "Error msg"). */
void
png_set_read_fn(png_structp png_ptr, png_voidp io_ptr,
   png_rw_ptr read_data_fn)
{
   png_ptr->io_ptr = io_ptr;

128
#if !defined(PNG_NO_STDIO)
A
Andreas Dilger 已提交
129
   if (read_data_fn != NULL)
G
Guy Schalnat 已提交
130 131 132
      png_ptr->read_data_fn = read_data_fn;
   else
      png_ptr->read_data_fn = png_default_read_data;
133 134 135
#else
   png_ptr->read_data_fn = read_data_fn;
#endif
G
Guy Schalnat 已提交
136 137 138 139 140 141 142 143 144

   /* It is an error to write to a read device */
   png_ptr->write_data_fn = NULL;

#if defined(PNG_WRITE_FLUSH_SUPPORTED)
   png_ptr->output_flush_fn = NULL;
#endif /* PNG_WRITE_FLUSH_SUPPORTED */
}