Added rpi gpio program.
[utils.git] / krb5mapcc.c
... / ...
CommitLineData
1#include <stdlib.h>
2#include <stdio.h>
3#include <unistd.h>
4#include <errno.h>
5#include <ctype.h>
6#include <dirent.h>
7#include <fcntl.h>
8#include <string.h>
9
10int isnumeric(char *str)
11{
12 while(*str) {
13 if(!isdigit(*str))
14 return(0);
15 str++;
16 }
17 return(1);
18}
19
20char *findcc(int fd)
21{
22 int ret, dlen;
23 static char retbuf[1024];
24 char readbuf[1024];
25 char *p, *p2;
26
27 dlen = 0;
28 p = readbuf;
29 do {
30 if(dlen == 1024)
31 dlen = 0;
32 ret = read(fd, readbuf + dlen, sizeof(readbuf) - dlen);
33 if(ret < 0) {
34 perror("read environ");
35 return(NULL);
36 }
37 dlen += ret;
38
39 while((p = memchr(readbuf, 0, dlen)) != NULL) {
40 if((p2 = strchr(readbuf, '=')) != NULL) {
41 *(p2++) = 0;
42 if(!strcasecmp(readbuf, "KRB5CCNAME") && !strncasecmp(p2, "FILE:", 5)) {
43 if(strlen(p2 + 5) >= sizeof(retbuf)) {
44 fprintf(stderr, "really long ccname!\n");
45 return(NULL);
46 }
47 strcpy(retbuf, p2 + 5);
48 return(retbuf);
49 }
50 }
51 p++;
52 memmove(readbuf, p, dlen -= (p - readbuf));
53 }
54 } while(ret != 0);
55 return(NULL);
56}
57
58int main(int argc, char **argv)
59{
60 int fd;
61 DIR *proc;
62 struct dirent *de;
63 char envbuf[1024];
64 char *p, *cc;
65
66 if((proc = opendir("/proc")) == NULL) {
67 perror("/proc");
68 exit(1);
69 }
70 while((de = readdir(proc)) != NULL) {
71 if(!isnumeric(de->d_name))
72 continue;
73 if(strlen(de->d_name) > 30)
74 continue;
75
76 p = envbuf;
77 strcpy(p, "/proc/");
78 p += 6;
79 strcpy(p, de->d_name);
80 p += strlen(de->d_name);
81 *(p++) = '/';
82 strcpy(p, "environ");
83
84 if((fd = open(envbuf, O_RDONLY)) < 0)
85 continue;
86 cc = findcc(fd);
87 close(fd);
88
89 if(cc != NULL) {
90 printf("%s %s\n", de->d_name, cc);
91 }
92 }
93 closedir(proc);
94 return(0);
95}