src/my.c

   1 /*
   2    Copyright (C) Prikol Software 1996-1997
   3    Copyright (C) Aleksey Volynskov 1996-1997
   4    Copyright (C) <ARembo@gmail.com> 2011
   5
   6    This file is part of the Doom2D:Rembo project.
   7
   8    Doom2D:Rembo is free software; you can redistribute it and/or modify
   9    it under the terms of the GNU General Public License version 2 as
  10    published by the Free Software Foundation.
  11
  12    Doom2D:Rembo is distributed in the hope that it will be useful,
  13    but WITHOUT ANY WARRANTY; without even the implied warranty of
  14    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  15    GNU General Public License for more details.
  16
  17    You should have received a copy of the GNU General Public License
  18    along with this program; if not, see <http://www.gnu.org/licenses/> or
  19    write to the Free Software Foundation, Inc.,
  20    51 Franklin St, Fifth Floor, Boston, MA  02110-1301 USA
  21 */
  22
  23 #include <SDL.h>
  24 #include "glob.h"
  25 #include "keyb.h"
  26 #include "error.h"
  27 #include <stdio.h>
  28
  29 void mysplitpath(const char* path, char* drv, char* dir, char* name, char* ext)
  30 {
  31      const char* end; /* end of processed string */
  32      const char* p;   /* search pointer */
  33      const char* s;   /* copy pointer */
  34
  35      /* extract drive name */
  36      if (path[0] && path[1]==':') {
  37          if (drv) {
  38              *drv++ = *path++;
  39              *drv++ = *path++;
  40              *drv = '\0';
  41          }
  42      } else if (drv)
  43          *drv = '\0';
  44
  45      /* search for end of string or stream separator */
  46      for(end=path; *end && *end!=':'; )
  47          end++;
  48
  49      /* search for begin of file extension */
  50      for(p=end; p>path && *--p!='\\' && *p!='/'; )
  51          if (*p == '.') {
  52              end = p;
  53              break;
  54          }
  55
  56      if (ext)
  57          for(s=end; (*ext=*s++); )
  58              ext++;
  59
  60      /* search for end of directory name */
  61      for(p=end; p>path; )
  62          if (*--p=='\\' || *p=='/') {
  63              p++;
  64              break;
  65          }
  66
  67      if (name) {
  68          for(s=p; s<end; )
  69              *name++ = *s++;
  70
  71          *name = '\0';
  72      }
  73
  74      if (dir) {
  75          for(s=path; s<p; )
  76              *dir++ = *s++;
  77
  78          *dir = '\0';
  79      }
  80 }
  81
  82 void myfread(void *ptr, size_t n, size_t size, FILE *f) {
  83     if (fread(ptr,n,size,f) != size) ERR_fatal("File reading error\n");
  84 }
  85
  86 size_t myfreadc(void *ptr, size_t n, size_t size, FILE *f) {
  87     return fread(ptr,n,size,f);
  88 }
  89
  90 void myfwrite(void *ptr, size_t n, size_t size, FILE *f) {
  91     size_t s = fwrite(ptr,n,size,f);
  92 }
  93
  94 void myrandomize(void)
  95 {
  96     srand(SDL_GetTicks());
  97 }
  98
  99 int fexists(char * filename)
 100 {
 101     FILE *f;
 102     if (f = fopen(filename, "r"))
 103     {
 104         fclose(f);
 105         return 1;
 106     }
 107     return 0;
 108 }