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 return 0; 62 } 63 if (!S_ISREG(sb.st_mode)) { 64 fprintf(stderr, "%s: not a regular file\n", name); 65 return 0; 66 } 67 nbytes = sb.st_size; 68 /* malloc will return NULL with nbytes == 0, handle files with size 0 */ 69 if (nbytes == 0) { 70 static const char c = '\0'; 71 processor(&c, 0, name, arg); 72 close(fd); 73 return 1; 74 } 75 p = malloc(nbytes); 76 if (!p) { 77 fprintf(stderr, "%s: out of memory\n", name); 78 close(fd); 79 return 0; 80 } 81 n = read(fd, p, nbytes); 82 if (n < 0) { 83 perror(name); 84 free(p); 85 close(fd); 86 return 0; 87 } 88 if (n != nbytes) { 89 fprintf(stderr, "%s: read unexpected number of bytes\n", name); 90 free(p); 91 close(fd); 92 return 0; 93 } 94 processor(p, nbytes, name, arg); 95 free(p); 96 close(fd); 97 return 1; 98 } 99