/* ioapi.c -- IO base function header for compress/uncompress .zip

   files using zlib + zip or unzip API

   Version 1.01e, February 12th, 2005

   Copyright (C) 1998-2005 Gilles Vollant

*/

#include <stdio.h>

#include <stdlib.h>

#include <string.h>

#include "zlib.h"

#include "ioapi.h"

/* I've found an old Unix (a SunOS 4.1.3_U1) without all SEEK_* defined.... */

#ifndef SEEK_CUR

#define SEEK_CUR    1

#endif

#ifndef SEEK_END

#define SEEK_END    2

#endif

#ifndef SEEK_SET

#define SEEK_SET    0

#endif

voidpf ZCALLBACK fopen_file_func OF((

   voidpf opaque,

   const char* filename,

   int mode));

uLong ZCALLBACK fread_file_func OF((

   voidpf opaque,

   voidpf stream,

   void* buf,

   uLong size));

uLong ZCALLBACK fwrite_file_func OF((

   voidpf opaque,

   voidpf stream,

   const void* buf,

   uLong size));

long ZCALLBACK ftell_file_func OF((

   voidpf opaque,

   voidpf stream));

long ZCALLBACK fseek_file_func OF((

   voidpf opaque,

   voidpf stream,

   uLong offset,

   int origin));

int ZCALLBACK fclose_file_func OF((

   voidpf opaque,

   voidpf stream));

int ZCALLBACK ferror_file_func OF((

   voidpf opaque,

   voidpf stream));

voidpf ZCALLBACK fopen_file_func (opaque, filename, mode)

   voidpf opaque;

   const char* filename;

   int mode;

{

    FILE* file = NULL;

    const char* mode_fopen = NULL;

    if ((mode & ZLIB_FILEFUNC_MODE_READWRITEFILTER)==ZLIB_FILEFUNC_MODE_READ)

        mode_fopen = "rb";

    else

    if (mode & ZLIB_FILEFUNC_MODE_EXISTING)

        mode_fopen = "r+b";

    else

    if (mode & ZLIB_FILEFUNC_MODE_CREATE)

        mode_fopen = "wb";

    if ((filename!=NULL) && (mode_fopen != NULL))

        file = fopen(filename, mode_fopen);

    return file;

}

uLong ZCALLBACK fread_file_func (opaque, stream, buf, size)

   voidpf opaque;

   voidpf stream;

   void* buf;

   uLong size;

{

    uLong ret;

    ret = (uLong)fread(buf, 1, (size_t)size, (FILE *)stream);

    return ret;

}

uLong ZCALLBACK fwrite_file_func (opaque, stream, buf, size)

   voidpf opaque;

   voidpf stream;

   const void* buf;

   uLong size;

{

    uLong ret;

    ret = (uLong)fwrite(buf, 1, (size_t)size, (FILE *)stream);

    return ret;

}

long ZCALLBACK ftell_file_func (opaque, stream)

   voidpf opaque;

   voidpf stream;

{

    long ret;

    ret = ftell((FILE *)stream);

    return ret;

}

long ZCALLBACK fseek_file_func (opaque, stream, offset, origin)

   voidpf opaque;

   voidpf stream;

   uLong offset;

   int origin;

{

    int fseek_origin=0;

    long ret;

    switch (origin)

    {

    case ZLIB_FILEFUNC_SEEK_CUR :

        fseek_origin = SEEK_CUR;

        break;

    case ZLIB_FILEFUNC_SEEK_END :

        fseek_origin = SEEK_END;

        break;

    case ZLIB_FILEFUNC_SEEK_SET :

        fseek_origin = SEEK_SET;

        break;

    default: return -1;

    }

    ret = 0;

    fseek((FILE *)stream, offset, fseek_origin);

    return ret;

}

int ZCALLBACK fclose_file_func (opaque, stream)

   voidpf opaque;

   voidpf stream;

{

    int ret;

    ret = fclose((FILE *)stream);

    return ret;

}

int ZCALLBACK ferror_file_func (opaque, stream)

   voidpf opaque;

   voidpf stream;

{

    int ret;

    ret = ferror((FILE *)stream);

    return ret;

}

void fill_fopen_filefunc (pzlib_filefunc_def)

  zlib_filefunc_def* pzlib_filefunc_def;

{

    pzlib_filefunc_def->zopen_file = fopen_file_func;

    pzlib_filefunc_def->zread_file = fread_file_func;

    pzlib_filefunc_def->zwrite_file = fwrite_file_func;

    pzlib_filefunc_def->ztell_file = ftell_file_func;

    pzlib_filefunc_def->zseek_file = fseek_file_func;

    pzlib_filefunc_def->zclose_file = fclose_file_func;

    pzlib_filefunc_def->zerror_file = ferror_file_func;

    pzlib_filefunc_def->opaque = NULL;

}