| 1 | /* $Cambridge: exim/test/src/fd.c,v 1.1 2006/02/06 16:24:05 ph10 Exp $ */ |
| 2 | |
| 3 | /* A program to check on open file descriptors. There are some weird options |
| 4 | for running it in Exim testing. If -q is given, make output suitable for |
| 5 | queryprogram. If -f is given, copy the input as for a transport filter. If -s |
| 6 | is given, add extra output from stat(). */ |
| 7 | |
| 8 | #include <stdio.h> |
| 9 | #include <stdlib.h> |
| 10 | #include <string.h> |
| 11 | #include <sys/types.h> |
| 12 | #include <fcntl.h> |
| 13 | #include <limits.h> |
| 14 | #include <errno.h> |
| 15 | #include <sys/stat.h> |
| 16 | #include <unistd.h> |
| 17 | |
| 18 | |
| 19 | /* The way of finding out the maximum file descriptor various between OS. |
| 20 | Most have sysconf(), but a few don't. */ |
| 21 | |
| 22 | #ifdef _SC_OPEN_MAX |
| 23 | #define mac_maxfd (sysconf(_SC_OPEN_MAX) - 1) |
| 24 | #elif defined OPEN_MAX |
| 25 | #define mac_maxfd (OPEN_MAX - 1) |
| 26 | #elif defined NOFILE |
| 27 | #define mac_maxfd (NOFILE - 1) |
| 28 | #else |
| 29 | #define mac_maxfd 255; /* just in case */ |
| 30 | #endif |
| 31 | |
| 32 | |
| 33 | int main(int argc, char **argv) |
| 34 | { |
| 35 | int fd; |
| 36 | int qpgm = 0; |
| 37 | int filter = 0; |
| 38 | int use_stat = 0; |
| 39 | struct stat statbuf; |
| 40 | char buffer[8192]; |
| 41 | char *p = buffer; |
| 42 | |
| 43 | while (argc > 1) |
| 44 | { |
| 45 | char *arg = argv[--argc]; |
| 46 | if (strcmp(arg, "-q") == 0) qpgm = 1; |
| 47 | if (strcmp(arg, "-f") == 0) filter = 1; |
| 48 | if (strcmp(arg, "-s") == 0) use_stat = 1; |
| 49 | } |
| 50 | |
| 51 | if (filter) |
| 52 | { |
| 53 | int len; |
| 54 | while ((len = read(0, buffer, sizeof(buffer))) > 0) |
| 55 | write(1, buffer, len); |
| 56 | } |
| 57 | |
| 58 | p += sprintf(p, "max fd = %d\n", (int)mac_maxfd); |
| 59 | |
| 60 | for (fd = 0; fd <= mac_maxfd; fd++) |
| 61 | { |
| 62 | int options = fcntl(fd, F_GETFD); |
| 63 | if (options >= 0) |
| 64 | { |
| 65 | int status = fcntl(fd, F_GETFL); |
| 66 | p += sprintf(p, "%3d opt=%d status=%X ", fd, options, status); |
| 67 | switch(status & 3) |
| 68 | { |
| 69 | case 0: p += sprintf(p, "RDONLY"); |
| 70 | break; |
| 71 | case 1: p += sprintf(p, "WRONLY"); |
| 72 | break; |
| 73 | case 2: p += sprintf(p, "RDWR"); |
| 74 | break; |
| 75 | } |
| 76 | if (isatty(fd)) p += sprintf(p, " TTY"); |
| 77 | if ((status & 8) != 0) p += sprintf(p, " APPEND"); |
| 78 | |
| 79 | if (use_stat && fstat(fd, &statbuf) >= 0) |
| 80 | { |
| 81 | p += sprintf(p, " mode=%o uid=%d size=%d", (int)statbuf.st_mode, |
| 82 | (int)statbuf.st_uid, (int)statbuf.st_size); |
| 83 | } |
| 84 | |
| 85 | p += sprintf(p, "\n"); |
| 86 | } |
| 87 | else if (errno != EBADF) |
| 88 | { |
| 89 | p += sprintf(p, "%3d errno=%d %s\n", fd, errno, strerror(errno)); |
| 90 | } |
| 91 | } |
| 92 | |
| 93 | if (qpgm) |
| 94 | { |
| 95 | for (p = buffer; *p != 0; p++) |
| 96 | if (*p == '\n') *p = ' '; |
| 97 | printf("ACCEPT DATA=\"%s\"\n", buffer); |
| 98 | } |
| 99 | else printf("%s", buffer); |
| 100 | |
| 101 | exit(0); |
| 102 | } |
| 103 | |
| 104 | /* End */ |