src/misc.c

   1 /*
   2  *  2ooM: The Master of Orion II Reverse Engineering Project
   3  *  Miscellaneous common routines for liblbx.
   4  *  Copyright (C) 2006-2008 Nick Bowler
   5  *
   6  *  This program is free software: you can redistribute it and/or modify
   7  *  it under the terms of the GNU General Public License as published by
   8  *  the Free Software Foundation, either version 3 of the License, or
   9  *  (at your option) any later version.
  10  *
  11  *  This program is distributed in the hope that it will be useful,
  12  *  but WITHOUT ANY WARRANTY; without even the implied warranty of
  13  *  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  14  *  GNU General Public License for more details.
  15  *
  16  *  You should have received a copy of the GNU General Public License
  17  *  along with this program.  If not, see <http://www.gnu.org/licenses/>.
  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 }