418 lines
9.4 KiB
C
418 lines
9.4 KiB
C
|
#include "fitz-imp.h"
|
||
|
|
||
|
#include <string.h>
|
||
|
|
||
|
#define MIN_BOMB (100 << 20)
|
||
|
|
||
|
/*
|
||
|
Read from a stream into a given data block.
|
||
|
|
||
|
stm: The stream to read from.
|
||
|
|
||
|
data: The data block to read into.
|
||
|
|
||
|
len: The length of the data block (in bytes).
|
||
|
|
||
|
Returns the number of bytes read. May throw exceptions.
|
||
|
*/
|
||
|
size_t
|
||
|
fz_read(fz_context *ctx, fz_stream *stm, unsigned char *buf, size_t len)
|
||
|
{
|
||
|
size_t count, n;
|
||
|
|
||
|
count = 0;
|
||
|
do
|
||
|
{
|
||
|
n = fz_available(ctx, stm, len);
|
||
|
if (n > len)
|
||
|
n = len;
|
||
|
if (n == 0)
|
||
|
break;
|
||
|
|
||
|
memcpy(buf, stm->rp, n);
|
||
|
stm->rp += n;
|
||
|
buf += n;
|
||
|
count += n;
|
||
|
len -= n;
|
||
|
}
|
||
|
while (len > 0);
|
||
|
|
||
|
return count;
|
||
|
}
|
||
|
|
||
|
static unsigned char skip_buf[4096];
|
||
|
|
||
|
/*
|
||
|
Read from a stream discarding data.
|
||
|
|
||
|
stm: The stream to read from.
|
||
|
|
||
|
len: The number of bytes to read.
|
||
|
|
||
|
Returns the number of bytes read. May throw exceptions.
|
||
|
*/
|
||
|
size_t fz_skip(fz_context *ctx, fz_stream *stm, size_t len)
|
||
|
{
|
||
|
size_t count, l, total = 0;
|
||
|
|
||
|
while (len)
|
||
|
{
|
||
|
l = len;
|
||
|
if (l > sizeof(skip_buf))
|
||
|
l = sizeof(skip_buf);
|
||
|
count = fz_read(ctx, stm, skip_buf, l);
|
||
|
total += count;
|
||
|
if (count < l)
|
||
|
break;
|
||
|
len -= count;
|
||
|
}
|
||
|
return total;
|
||
|
}
|
||
|
|
||
|
/*
|
||
|
Read all of a stream into a buffer.
|
||
|
|
||
|
stm: The stream to read from
|
||
|
|
||
|
initial: Suggested initial size for the buffer.
|
||
|
|
||
|
Returns a buffer created from reading from the stream. May throw
|
||
|
exceptions on failure to allocate.
|
||
|
*/
|
||
|
fz_buffer *
|
||
|
fz_read_all(fz_context *ctx, fz_stream *stm, size_t initial)
|
||
|
{
|
||
|
return fz_read_best(ctx, stm, initial, NULL);
|
||
|
}
|
||
|
|
||
|
/*
|
||
|
Attempt to read a stream into a buffer. If truncated
|
||
|
is NULL behaves as fz_read_all, sets a truncated flag in case of
|
||
|
error.
|
||
|
|
||
|
stm: The stream to read from.
|
||
|
|
||
|
initial: Suggested initial size for the buffer.
|
||
|
|
||
|
truncated: Flag to store success/failure indication in.
|
||
|
|
||
|
Returns a buffer created from reading from the stream.
|
||
|
*/
|
||
|
fz_buffer *
|
||
|
fz_read_best(fz_context *ctx, fz_stream *stm, size_t initial, int *truncated)
|
||
|
{
|
||
|
fz_buffer *buf = NULL;
|
||
|
int check_bomb = (initial > 0);
|
||
|
size_t n;
|
||
|
|
||
|
fz_var(buf);
|
||
|
|
||
|
if (truncated)
|
||
|
*truncated = 0;
|
||
|
|
||
|
fz_try(ctx)
|
||
|
{
|
||
|
if (initial < 1024)
|
||
|
initial = 1024;
|
||
|
|
||
|
buf = fz_new_buffer(ctx, initial+1);
|
||
|
|
||
|
while (1)
|
||
|
{
|
||
|
if (buf->len == buf->cap)
|
||
|
fz_grow_buffer(ctx, buf);
|
||
|
|
||
|
if (check_bomb && buf->len >= MIN_BOMB && buf->len / 200 > initial)
|
||
|
fz_throw(ctx, FZ_ERROR_GENERIC, "compression bomb detected");
|
||
|
|
||
|
n = fz_read(ctx, stm, buf->data + buf->len, buf->cap - buf->len);
|
||
|
if (n == 0)
|
||
|
break;
|
||
|
|
||
|
buf->len += n;
|
||
|
}
|
||
|
}
|
||
|
fz_catch(ctx)
|
||
|
{
|
||
|
if (fz_caught(ctx) == FZ_ERROR_TRYLATER)
|
||
|
{
|
||
|
fz_drop_buffer(ctx, buf);
|
||
|
fz_rethrow(ctx);
|
||
|
}
|
||
|
if (truncated)
|
||
|
{
|
||
|
*truncated = 1;
|
||
|
}
|
||
|
else
|
||
|
{
|
||
|
fz_drop_buffer(ctx, buf);
|
||
|
fz_rethrow(ctx);
|
||
|
}
|
||
|
}
|
||
|
|
||
|
return buf;
|
||
|
}
|
||
|
|
||
|
/*
|
||
|
Read a line from stream into the buffer until either a
|
||
|
terminating newline or EOF, which it replaces with a null byte ('\0').
|
||
|
|
||
|
Returns buf on success, and NULL when end of file occurs while no characters
|
||
|
have been read.
|
||
|
*/
|
||
|
char *
|
||
|
fz_read_line(fz_context *ctx, fz_stream *stm, char *mem, size_t n)
|
||
|
{
|
||
|
char *s = mem;
|
||
|
int c = EOF;
|
||
|
while (n > 1)
|
||
|
{
|
||
|
c = fz_read_byte(ctx, stm);
|
||
|
if (c == EOF)
|
||
|
break;
|
||
|
if (c == '\r') {
|
||
|
c = fz_peek_byte(ctx, stm);
|
||
|
if (c == '\n')
|
||
|
fz_read_byte(ctx, stm);
|
||
|
break;
|
||
|
}
|
||
|
if (c == '\n')
|
||
|
break;
|
||
|
*s++ = c;
|
||
|
n--;
|
||
|
}
|
||
|
if (n)
|
||
|
*s = '\0';
|
||
|
return (s == mem && c == EOF) ? NULL : mem;
|
||
|
}
|
||
|
|
||
|
/*
|
||
|
return the current reading position within a stream
|
||
|
*/
|
||
|
int64_t
|
||
|
fz_tell(fz_context *ctx, fz_stream *stm)
|
||
|
{
|
||
|
return stm->pos - (stm->wp - stm->rp);
|
||
|
}
|
||
|
|
||
|
/*
|
||
|
Seek within a stream.
|
||
|
|
||
|
stm: The stream to seek within.
|
||
|
|
||
|
offset: The offset to seek to.
|
||
|
|
||
|
whence: From where the offset is measured (see fseek).
|
||
|
*/
|
||
|
void
|
||
|
fz_seek(fz_context *ctx, fz_stream *stm, int64_t offset, int whence)
|
||
|
{
|
||
|
stm->avail = 0; /* Reset bit reading */
|
||
|
if (stm->seek)
|
||
|
{
|
||
|
if (whence == 1)
|
||
|
{
|
||
|
offset += fz_tell(ctx, stm);
|
||
|
whence = 0;
|
||
|
}
|
||
|
stm->seek(ctx, stm, offset, whence);
|
||
|
stm->eof = 0;
|
||
|
}
|
||
|
else if (whence != 2)
|
||
|
{
|
||
|
if (whence == 0)
|
||
|
offset -= fz_tell(ctx, stm);
|
||
|
if (offset < 0)
|
||
|
fz_warn(ctx, "cannot seek backwards");
|
||
|
/* dog slow, but rare enough */
|
||
|
while (offset-- > 0)
|
||
|
{
|
||
|
if (fz_read_byte(ctx, stm) == EOF)
|
||
|
{
|
||
|
fz_warn(ctx, "seek failed");
|
||
|
break;
|
||
|
}
|
||
|
}
|
||
|
}
|
||
|
else
|
||
|
fz_warn(ctx, "cannot seek");
|
||
|
}
|
||
|
|
||
|
/*
|
||
|
Read all the contents of a file into a buffer.
|
||
|
*/
|
||
|
fz_buffer *
|
||
|
fz_read_file(fz_context *ctx, const char *filename)
|
||
|
{
|
||
|
fz_stream *stm;
|
||
|
fz_buffer *buf = NULL;
|
||
|
|
||
|
fz_var(buf);
|
||
|
|
||
|
stm = fz_open_file(ctx, filename);
|
||
|
fz_try(ctx)
|
||
|
{
|
||
|
buf = fz_read_all(ctx, stm, 0);
|
||
|
}
|
||
|
fz_always(ctx)
|
||
|
{
|
||
|
fz_drop_stream(ctx, stm);
|
||
|
}
|
||
|
fz_catch(ctx)
|
||
|
{
|
||
|
fz_rethrow(ctx);
|
||
|
}
|
||
|
|
||
|
return buf;
|
||
|
}
|
||
|
|
||
|
/*
|
||
|
fz_read_[u]int(16|24|32|64)(_le)?
|
||
|
|
||
|
Read a 16/32/64 bit signed/unsigned integer from stream,
|
||
|
in big or little-endian byte orders.
|
||
|
|
||
|
Throws an exception if EOF is encountered.
|
||
|
*/
|
||
|
uint16_t fz_read_uint16(fz_context *ctx, fz_stream *stm)
|
||
|
{
|
||
|
int a = fz_read_byte(ctx, stm);
|
||
|
int b = fz_read_byte(ctx, stm);
|
||
|
if (a == EOF || b == EOF)
|
||
|
fz_throw(ctx, FZ_ERROR_GENERIC, "premature end of file in int16");
|
||
|
return ((uint16_t)a<<8) | ((uint16_t)b);
|
||
|
}
|
||
|
|
||
|
uint32_t fz_read_uint24(fz_context *ctx, fz_stream *stm)
|
||
|
{
|
||
|
int a = fz_read_byte(ctx, stm);
|
||
|
int b = fz_read_byte(ctx, stm);
|
||
|
int c = fz_read_byte(ctx, stm);
|
||
|
if (a == EOF || b == EOF || c == EOF)
|
||
|
fz_throw(ctx, FZ_ERROR_GENERIC, "premature end of file in int24");
|
||
|
return ((uint32_t)a<<16) | ((uint32_t)b<<8) | ((uint32_t)c);
|
||
|
}
|
||
|
|
||
|
uint32_t fz_read_uint32(fz_context *ctx, fz_stream *stm)
|
||
|
{
|
||
|
int a = fz_read_byte(ctx, stm);
|
||
|
int b = fz_read_byte(ctx, stm);
|
||
|
int c = fz_read_byte(ctx, stm);
|
||
|
int d = fz_read_byte(ctx, stm);
|
||
|
if (a == EOF || b == EOF || c == EOF || d == EOF)
|
||
|
fz_throw(ctx, FZ_ERROR_GENERIC, "premature end of file in int32");
|
||
|
return ((uint32_t)a<<24) | ((uint32_t)b<<16) | ((uint32_t)c<<8) | ((uint32_t)d);
|
||
|
}
|
||
|
|
||
|
uint64_t fz_read_uint64(fz_context *ctx, fz_stream *stm)
|
||
|
{
|
||
|
int a = fz_read_byte(ctx, stm);
|
||
|
int b = fz_read_byte(ctx, stm);
|
||
|
int c = fz_read_byte(ctx, stm);
|
||
|
int d = fz_read_byte(ctx, stm);
|
||
|
int e = fz_read_byte(ctx, stm);
|
||
|
int f = fz_read_byte(ctx, stm);
|
||
|
int g = fz_read_byte(ctx, stm);
|
||
|
int h = fz_read_byte(ctx, stm);
|
||
|
if (a == EOF || b == EOF || c == EOF || d == EOF || e == EOF || f == EOF || g == EOF || h == EOF)
|
||
|
fz_throw(ctx, FZ_ERROR_GENERIC, "premature end of file in int64");
|
||
|
return ((uint64_t)a<<56) | ((uint64_t)b<<48) | ((uint64_t)c<<40) | ((uint64_t)d<<32)
|
||
|
| ((uint64_t)e<<24) | ((uint64_t)f<<16) | ((uint64_t)g<<8) | ((uint64_t)h);
|
||
|
}
|
||
|
|
||
|
uint16_t fz_read_uint16_le(fz_context *ctx, fz_stream *stm)
|
||
|
{
|
||
|
int a = fz_read_byte(ctx, stm);
|
||
|
int b = fz_read_byte(ctx, stm);
|
||
|
if (a == EOF || b == EOF)
|
||
|
fz_throw(ctx, FZ_ERROR_GENERIC, "premature end of file in int16");
|
||
|
return ((uint16_t)a) | ((uint16_t)b<<8);
|
||
|
}
|
||
|
|
||
|
uint32_t fz_read_uint24_le(fz_context *ctx, fz_stream *stm)
|
||
|
{
|
||
|
int a = fz_read_byte(ctx, stm);
|
||
|
int b = fz_read_byte(ctx, stm);
|
||
|
int c = fz_read_byte(ctx, stm);
|
||
|
if (a == EOF || b == EOF || c == EOF)
|
||
|
fz_throw(ctx, FZ_ERROR_GENERIC, "premature end of file in int24");
|
||
|
return ((uint32_t)a) | ((uint32_t)b<<8) | ((uint32_t)c<<16);
|
||
|
}
|
||
|
|
||
|
uint32_t fz_read_uint32_le(fz_context *ctx, fz_stream *stm)
|
||
|
{
|
||
|
int a = fz_read_byte(ctx, stm);
|
||
|
int b = fz_read_byte(ctx, stm);
|
||
|
int c = fz_read_byte(ctx, stm);
|
||
|
int d = fz_read_byte(ctx, stm);
|
||
|
if (a == EOF || b == EOF || c == EOF || d == EOF)
|
||
|
fz_throw(ctx, FZ_ERROR_GENERIC, "premature end of file in int32");
|
||
|
return ((uint32_t)a) | ((uint32_t)b<<8) | ((uint32_t)c<<16) | ((uint32_t)d<<24);
|
||
|
}
|
||
|
|
||
|
uint64_t fz_read_uint64_le(fz_context *ctx, fz_stream *stm)
|
||
|
{
|
||
|
int a = fz_read_byte(ctx, stm);
|
||
|
int b = fz_read_byte(ctx, stm);
|
||
|
int c = fz_read_byte(ctx, stm);
|
||
|
int d = fz_read_byte(ctx, stm);
|
||
|
int e = fz_read_byte(ctx, stm);
|
||
|
int f = fz_read_byte(ctx, stm);
|
||
|
int g = fz_read_byte(ctx, stm);
|
||
|
int h = fz_read_byte(ctx, stm);
|
||
|
if (a == EOF || b == EOF || c == EOF || d == EOF || e == EOF || f == EOF || g == EOF || h == EOF)
|
||
|
fz_throw(ctx, FZ_ERROR_GENERIC, "premature end of file in int64");
|
||
|
return ((uint64_t)a) | ((uint64_t)b<<8) | ((uint64_t)c<<16) | ((uint64_t)d<<24)
|
||
|
| ((uint64_t)e<<32) | ((uint64_t)f<<40) | ((uint64_t)g<<48) | ((uint64_t)h<<56);
|
||
|
}
|
||
|
|
||
|
int16_t fz_read_int16(fz_context *ctx, fz_stream *stm) { return (int16_t)fz_read_uint16(ctx, stm); }
|
||
|
int32_t fz_read_int32(fz_context *ctx, fz_stream *stm) { return (int32_t)fz_read_uint32(ctx, stm); }
|
||
|
int64_t fz_read_int64(fz_context *ctx, fz_stream *stm) { return (int64_t)fz_read_uint64(ctx, stm); }
|
||
|
|
||
|
int16_t fz_read_int16_le(fz_context *ctx, fz_stream *stm) { return (int16_t)fz_read_uint16_le(ctx, stm); }
|
||
|
int32_t fz_read_int32_le(fz_context *ctx, fz_stream *stm) { return (int32_t)fz_read_uint32_le(ctx, stm); }
|
||
|
int64_t fz_read_int64_le(fz_context *ctx, fz_stream *stm) { return (int64_t)fz_read_uint64_le(ctx, stm); }
|
||
|
|
||
|
float
|
||
|
fz_read_float_le(fz_context *ctx, fz_stream *stm)
|
||
|
{
|
||
|
union {float f;int32_t i;} u;
|
||
|
|
||
|
u.i = fz_read_int32_le(ctx, stm);
|
||
|
return u.f;
|
||
|
}
|
||
|
|
||
|
float
|
||
|
fz_read_float(fz_context *ctx, fz_stream *stm)
|
||
|
{
|
||
|
union {float f;int32_t i;} u;
|
||
|
|
||
|
u.i = fz_read_int32(ctx, stm);
|
||
|
return u.f;
|
||
|
}
|
||
|
|
||
|
|
||
|
/*
|
||
|
Read a null terminated string from the stream into
|
||
|
a buffer of a given length. The buffer will be null terminated.
|
||
|
Throws on failure (including the failure to fit the entire string
|
||
|
including the terminator into the buffer).
|
||
|
*/
|
||
|
void fz_read_string(fz_context *ctx, fz_stream *stm, char *buffer, int len)
|
||
|
{
|
||
|
int c;
|
||
|
do
|
||
|
{
|
||
|
if (len <= 0)
|
||
|
fz_throw(ctx, FZ_ERROR_GENERIC, "Buffer overrun reading null terminated string");
|
||
|
|
||
|
c = fz_read_byte(ctx, stm);
|
||
|
if (c == EOF)
|
||
|
fz_throw(ctx, FZ_ERROR_GENERIC, "EOF reading null terminated string");
|
||
|
*buffer++ = c;
|
||
|
len--;
|
||
|
}
|
||
|
while (c != 0);
|
||
|
}
|