src/misc.c

   1 /* 2ooM: The Master of Orion II Reverse Engineering Project
   2  * Miscellaneous common routines for liblbx.
   3  * Copyright (C) 2006-2008 Nick Bowler
   4  *
   5  * This program is free software; you can redistribute it and/or modify
   6  * it under the terms of the GNU General Public License as published by
   7  * the Free Software Foundation; either version 2 of the License, or
   8  * (at your option) any later version.
   9  *
  10  * This program is distributed in the hope that it will be useful,
  11  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  12  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  13  * GNU General Public License for more details.
  14  *
  15  * You should have received a copy of the GNU General Public License along
  16  * with this program; if not, write to the Free Software Foundation, Inc.,
  17  * 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA.
  18  */
  19 #ifdef HAVE_CONFIG_H
  20 #       include "config.h"
  21 #endif
  22
  23 #include <stdio.h>
  24 #include <errno.h>
  25
  26 #include "misc.h"
  27 #include "lbx.h"
  28
  29 int _lbx_fseek(FILE *f, long *current, size_t offset)
  30 {
  31         static unsigned char oblivion[1024];
  32         long dist;
  33
  34         if (*current < offset) {
  35                 dist = offset - *current;
  36         } else if (*current > offset) {
  37                 dist = -(long)(*current - offset);
  38         } else {
  39                 return 0;
  40         }
  41
  42         if (fseek(f, dist, SEEK_CUR) == 0) {
  43                 *current += dist;
  44         } else if (*current < offset) {
  45                 while (dist) {
  46                         size_t rc, amt = MIN(sizeof oblivion, dist);
  47                         rc = fread(oblivion, 1, amt, f);
  48                         *current += rc;
  49                         dist -= rc;
  50                         if (rc < amt) {
  51                                 if (feof(f))
  52                                         lbx_errno = LBX_EEOF;
  53                                 else
  54                                         lbx_errno = -errno;
  55                                 return -1;
  56                         }
  57                 }
  58         } else {
  59                 lbx_errno = -errno;
  60                 return -1;
  61         }
  62         return 0;
  63 }