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 } 101