Return to readfilemap.c CVS log

Up to [ELWIX - Embedded LightWeight unIX -] / embedaddon / expat / xmlwf

expat 2.1.0

    1: /* Copyright (c) 1998, 1999 Thai Open Source Software Center Ltd
    2:    See the file COPYING for copying permission.
    3: */
    4: 
    5: #include <sys/types.h>
    6: #include <sys/stat.h>
    7: #include <fcntl.h>
    8: #include <stdlib.h>
    9: #include <stdio.h>
   10: 
   11: #ifdef __WATCOMC__
   12: #ifndef __LINUX__
   13: #include <io.h>
   14: #else
   15: #include <unistd.h>
   16: #endif
   17: #endif
   18: 
   19: #ifdef __BEOS__
   20: #include <unistd.h>
   21: #endif
   22: 
   23: #ifndef S_ISREG
   24: #ifndef S_IFREG
   25: #define S_IFREG _S_IFREG
   26: #endif
   27: #ifndef S_IFMT
   28: #define S_IFMT _S_IFMT
   29: #endif
   30: #define S_ISREG(m) (((m) & S_IFMT) == S_IFREG)
   31: #endif /* not S_ISREG */
   32: 
   33: #ifndef O_BINARY
   34: #ifdef _O_BINARY
   35: #define O_BINARY _O_BINARY
   36: #else
   37: #define O_BINARY 0
   38: #endif
   39: #endif
   40: 
   41: #include "filemap.h"
   42: 
   43: int
   44: filemap(const char *name,
   45:         void (*processor)(const void *, size_t, const char *, void *arg),
   46:         void *arg)
   47: {
   48:   size_t nbytes;
   49:   int fd;
   50:   int n;
   51:   struct stat sb;
   52:   void *p;
   53: 
   54:   fd = open(name, O_RDONLY|O_BINARY);
   55:   if (fd < 0) {
   56:     perror(name);
   57:     return 0;
   58:   }
   59:   if (fstat(fd, &sb) < 0) {
   60:     perror(name);
   61:     close(fd);
   62:     return 0;
   63:   }
   64:   if (!S_ISREG(sb.st_mode)) {
   65:     fprintf(stderr, "%s: not a regular file\n", name);
   66:     close(fd);
   67:     return 0;
   68:   }
   69:   nbytes = sb.st_size;
   70:   /* malloc will return NULL with nbytes == 0, handle files with size 0 */
   71:   if (nbytes == 0) {
   72:     static const char c = '\0';
   73:     processor(&c, 0, name, arg);
   74:     close(fd);
   75:     return 1;
   76:   }
   77:   p = malloc(nbytes);
   78:   if (!p) {
   79:     fprintf(stderr, "%s: out of memory\n", name);
   80:     close(fd);
   81:     return 0;
   82:   }
   83:   n = read(fd, p, nbytes);
   84:   if (n < 0) {
   85:     perror(name);
   86:     free(p);
   87:     close(fd);
   88:     return 0;
   89:   }
   90:   if (n != nbytes) {
   91:     fprintf(stderr, "%s: read unexpected number of bytes\n", name);
   92:     free(p);
   93:     close(fd);
   94:     return 0;
   95:   }
   96:   processor(p, nbytes, name, arg);
   97:   free(p);
   98:   close(fd);
   99:   return 1;
  100: }