11#endif
12
13#include <ctype.h>
14
15#include "ipf.h"
16#include "ipt.h"
17
18
19extern int opts;
20
21static int hex_open __P((char *));
22static int hex_close __P((void));
23static int hex_readip __P((char *, int, char **, int *));
24static char *readhex __P((char *, char *));
25
26struct ipread iphex = { hex_open, hex_close, hex_readip, 0 };
27static FILE *tfp = NULL;
28static int tfd = -1;
29
30static int hex_open(fname)
31char *fname;
32{
33 if (tfp && tfd != -1) {
34 rewind(tfp);
35 return tfd;
36 }
37
38 if (!strcmp(fname, "-")) {
39 tfd = 0;
40 tfp = stdin;
41 } else {
42 tfd = open(fname, O_RDONLY);
43 if (tfd != -1)
44 tfp = fdopen(tfd, "r");
45 }
46 return tfd;
47}
48
49
50static int hex_close()
51{
52 int cfd = tfd;
53
54 tfd = -1;
55 return close(cfd);
56}
57
58
59static int hex_readip(buf, cnt, ifn, dir)
60char *buf, **ifn;
61int cnt, *dir;
62{
63 register char *s, *t, *u;
64 char line[513];
65 ip_t *ip;
66
67 /*
68 * interpret start of line as possibly "[ifname]" or
69 * "[in/out,ifname]".
70 */
71 if (ifn)
72 *ifn = NULL;
73 if (dir)
74 *dir = 0;
75 ip = (ip_t *)buf;
76 while (fgets(line, sizeof(line)-1, tfp)) {
77 if ((s = strchr(line, '\n'))) {
78 if (s == line)
79 return (char *)ip - buf;
80 *s = '\0';
81 }
82 if ((s = strchr(line, '#')))
83 *s = '\0';
84 if (!*line)
85 continue;
86 if ((opts & OPT_DEBUG) != 0) {
87 printf("input: %s", line);
88 }
89
90 if ((*line == '[') && (s = strchr(line, ']'))) {
91 t = line + 1;
92 if (s - t > 0) {
93 *s++ = '\0';
94 if ((u = strchr(t, ',')) && (u < s)) {
95 u++;
96 if (ifn)
97 *ifn = strdup(u);
98 if (dir) {
99 if (*t == 'i')
100 *dir = 0;
101 else if (*t == 'o')
102 *dir = 1;
103 }
104 } else if (ifn)
105 *ifn = t;
106 }
107 } else
108 s = line;
109 t = (char *)ip;
110 ip = (ip_t *)readhex(s, (char *)ip);
111 if ((opts & OPT_DEBUG) != 0) {
112 if (opts & OPT_ASCII) {
113 if (t < (char *)ip)
114 putchar('\t');
115 while (t < (char *)ip) {
116 if (ISPRINT(*t) && ISASCII(*t))
117 putchar(*t);
118 else
119 putchar('.');
120 t++;
121 }
122 }
123 putchar('\n');
124 fflush(stdout);
125 }
126 }
127 if (feof(tfp))
128 return 0;
129 return -1;
130}
131
132
133static char *readhex(src, dst)
134register char *src, *dst;
135{
136 int state = 0;
137 char c;
138
139 while ((c = *src++)) {
140 if (ISSPACE(c)) {
141 if (state) {
142 dst++;
143 state = 0;
144 }
145 continue;
146 } else if ((c >= '0' && c <= '9') || (c >= 'a' && c <= 'f') ||
147 (c >= 'A' && c <= 'F')) {
148 c = ISDIGIT(c) ? (c - '0') : (TOUPPER(c) - 55);
149 if (state == 0) {
150 *dst = (c << 4);
151 state++;
152 } else {
153 *dst++ |= c;
154 state = 0;
155 }
156 } else
157 break;
158 }
159 return dst;
160}
| 11#endif
12
13#include <ctype.h>
14
15#include "ipf.h"
16#include "ipt.h"
17
18
19extern int opts;
20
21static int hex_open __P((char *));
22static int hex_close __P((void));
23static int hex_readip __P((char *, int, char **, int *));
24static char *readhex __P((char *, char *));
25
26struct ipread iphex = { hex_open, hex_close, hex_readip, 0 };
27static FILE *tfp = NULL;
28static int tfd = -1;
29
30static int hex_open(fname)
31char *fname;
32{
33 if (tfp && tfd != -1) {
34 rewind(tfp);
35 return tfd;
36 }
37
38 if (!strcmp(fname, "-")) {
39 tfd = 0;
40 tfp = stdin;
41 } else {
42 tfd = open(fname, O_RDONLY);
43 if (tfd != -1)
44 tfp = fdopen(tfd, "r");
45 }
46 return tfd;
47}
48
49
50static int hex_close()
51{
52 int cfd = tfd;
53
54 tfd = -1;
55 return close(cfd);
56}
57
58
59static int hex_readip(buf, cnt, ifn, dir)
60char *buf, **ifn;
61int cnt, *dir;
62{
63 register char *s, *t, *u;
64 char line[513];
65 ip_t *ip;
66
67 /*
68 * interpret start of line as possibly "[ifname]" or
69 * "[in/out,ifname]".
70 */
71 if (ifn)
72 *ifn = NULL;
73 if (dir)
74 *dir = 0;
75 ip = (ip_t *)buf;
76 while (fgets(line, sizeof(line)-1, tfp)) {
77 if ((s = strchr(line, '\n'))) {
78 if (s == line)
79 return (char *)ip - buf;
80 *s = '\0';
81 }
82 if ((s = strchr(line, '#')))
83 *s = '\0';
84 if (!*line)
85 continue;
86 if ((opts & OPT_DEBUG) != 0) {
87 printf("input: %s", line);
88 }
89
90 if ((*line == '[') && (s = strchr(line, ']'))) {
91 t = line + 1;
92 if (s - t > 0) {
93 *s++ = '\0';
94 if ((u = strchr(t, ',')) && (u < s)) {
95 u++;
96 if (ifn)
97 *ifn = strdup(u);
98 if (dir) {
99 if (*t == 'i')
100 *dir = 0;
101 else if (*t == 'o')
102 *dir = 1;
103 }
104 } else if (ifn)
105 *ifn = t;
106 }
107 } else
108 s = line;
109 t = (char *)ip;
110 ip = (ip_t *)readhex(s, (char *)ip);
111 if ((opts & OPT_DEBUG) != 0) {
112 if (opts & OPT_ASCII) {
113 if (t < (char *)ip)
114 putchar('\t');
115 while (t < (char *)ip) {
116 if (ISPRINT(*t) && ISASCII(*t))
117 putchar(*t);
118 else
119 putchar('.');
120 t++;
121 }
122 }
123 putchar('\n');
124 fflush(stdout);
125 }
126 }
127 if (feof(tfp))
128 return 0;
129 return -1;
130}
131
132
133static char *readhex(src, dst)
134register char *src, *dst;
135{
136 int state = 0;
137 char c;
138
139 while ((c = *src++)) {
140 if (ISSPACE(c)) {
141 if (state) {
142 dst++;
143 state = 0;
144 }
145 continue;
146 } else if ((c >= '0' && c <= '9') || (c >= 'a' && c <= 'f') ||
147 (c >= 'A' && c <= 'F')) {
148 c = ISDIGIT(c) ? (c - '0') : (TOUPPER(c) - 55);
149 if (state == 0) {
150 *dst = (c << 4);
151 state++;
152 } else {
153 *dst++ |= c;
154 state = 0;
155 }
156 } else
157 break;
158 }
159 return dst;
160}
|