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 #ifndef S_ISREG
12 #ifndef S_IFREG
13 #define S_IFREG _S_IFREG
14 #endif
15 #ifndef S_IFMT
16 #define S_IFMT _S_IFMT
17 #endif
18 #define S_ISREG(m) (((m) & S_IFMT) == S_IFREG)
19 #endif /* not S_ISREG */
20
21 #ifndef O_BINARY
22 #ifdef _O_BINARY
23 #define O_BINARY _O_BINARY
24 #else
25 #define O_BINARY 0
26 #endif
27 #endif
28
29 #include "filemap.h"
30
31 int
filemap(const char * name,void (* processor)(const void *,size_t,const char *,void * arg),void * arg)32 filemap(const char *name,
33 void (*processor)(const void *, size_t, const char *, void *arg),
34 void *arg)
35 {
36 size_t nbytes;
37 int fd;
38 int n;
39 struct stat sb;
40 void *p;
41
42 fd = open(name, O_RDONLY|O_BINARY);
43 if (fd < 0) {
44 perror(name);
45 return 0;
46 }
47 if (fstat(fd, &sb) < 0) {
48 perror(name);
49 return 0;
50 }
51 if (!S_ISREG(sb.st_mode)) {
52 fprintf(stderr, "%s: not a regular file\n", name);
53 return 0;
54 }
55 nbytes = sb.st_size;
56 p = malloc(nbytes);
57 if (!p) {
58 fprintf(stderr, "%s: out of memory\n", name);
59 return 0;
60 }
61 n = read(fd, p, nbytes);
62 if (n < 0) {
63 perror(name);
64 free(p);
65 close(fd);
66 return 0;
67 }
68 if (n != nbytes) {
69 fprintf(stderr, "%s: read unexpected number of bytes\n", name);
70 free(p);
71 close(fd);
72 return 0;
73 }
74 processor(p, nbytes, name, arg);
75 free(p);
76 close(fd);
77 return 1;
78 }
79