1
2 /*
3 * ipsend.c (C) 1995-1998 Darren Reed
4 *
5 * See the IPFILTER.LICENCE file for details on licencing.
6 *
7 */
8 #include <sys/param.h>
9 #include <sys/types.h>
10 #include <sys/time.h>
11 #include <sys/socket.h>
12 #include <netinet/in.h>
13 #include <arpa/inet.h>
14 #include <netinet/in_systm.h>
15 #include <netinet/ip.h>
16 #include <netinet/ip_var.h>
17 #include <stdio.h>
18 #include <netdb.h>
19 #include <unistd.h>
20 #include <stdlib.h>
21 #include <string.h>
22 #include "ipsend.h"
23
24
25 extern char *optarg;
26 extern int optind;
27
28 char options[68];
29 # ifdef sun
30 char default_device[] = "le0";
31 # else
32 char default_device[] = "lan0";
33 # endif
34
35 static void usage(char *);
36 int main(int, char **);
37
38
usage(prog)39 static void usage(prog)
40 char *prog;
41 {
42 fprintf(stderr, "Usage: %s [options] dest\n\
43 \toptions:\n\
44 \t\t-d device\tSend out on this device\n\
45 \t\t-g gateway\tIP gateway to use if non-local dest.\n\
46 \t\t-m mtu\t\tfake MTU to use when sending out\n\
47 \t\t-p pointtest\t\n\
48 \t\t-s src\t\tsource address for IP packet\n\
49 \t\t-1 \t\tPerform test 1 (IP header)\n\
50 \t\t-2 \t\tPerform test 2 (IP options)\n\
51 \t\t-3 \t\tPerform test 3 (ICMP)\n\
52 \t\t-4 \t\tPerform test 4 (UDP)\n\
53 \t\t-5 \t\tPerform test 5 (TCP)\n\
54 \t\t-6 \t\tPerform test 6 (overlapping fragments)\n\
55 \t\t-7 \t\tPerform test 7 (random packets)\n\
56 ", prog);
57 exit(1);
58 }
59
60
61 int
main(int argc,char ** argv)62 main(int argc, char **argv)
63 {
64 struct tcpiphdr *ti;
65 struct in_addr gwip;
66 ip_t *ip;
67 char *name = argv[0], host[MAXHOSTNAMELEN + 1];
68 char *gateway = NULL, *dev = NULL;
69 char *src = NULL, *dst;
70 int mtu = 1500, tests = 0, pointtest = 0, c;
71
72 /*
73 * 65535 is maximum packet size...you never know...
74 */
75 ip = (ip_t *)calloc(1, 65536);
76 ti = (struct tcpiphdr *)ip;
77 ip->ip_len = sizeof(*ip);
78 IP_HL_A(ip, sizeof(*ip) >> 2);
79
80 while ((c = getopt(argc, argv, "1234567d:g:m:p:s:")) != -1)
81 switch (c)
82 {
83 case '1' :
84 case '2' :
85 case '3' :
86 case '4' :
87 case '5' :
88 case '6' :
89 case '7' :
90 tests = c - '0';
91 break;
92 case 'd' :
93 dev = optarg;
94 break;
95 case 'g' :
96 gateway = optarg;
97 break;
98 case 'm' :
99 mtu = atoi(optarg);
100 if (mtu < 28)
101 {
102 fprintf(stderr, "mtu must be > 28\n");
103 exit(1);
104 }
105 break;
106 case 'p' :
107 pointtest = atoi(optarg);
108 break;
109 case 's' :
110 src = optarg;
111 break;
112 default :
113 fprintf(stderr, "Unknown option \"%c\"\n", c);
114 usage(name);
115 }
116
117 if ((argc <= optind) || !argv[optind])
118 usage(name);
119 dst = argv[optind++];
120
121 if (!src)
122 {
123 gethostname(host, sizeof(host));
124 host[sizeof(host) - 1] = '\0';
125 src = host;
126 }
127
128 if (resolve(dst, (char *)&ip->ip_dst) == -1)
129 {
130 fprintf(stderr,"Cant resolve %s\n", dst);
131 exit(2);
132 }
133
134 if (resolve(src, (char *)&ip->ip_src) == -1)
135 {
136 fprintf(stderr,"Cant resolve %s\n", src);
137 exit(2);
138 }
139
140 if (!gateway)
141 gwip = ip->ip_dst;
142 else if (resolve(gateway, (char *)&gwip) == -1)
143 {
144 fprintf(stderr,"Cant resolve %s\n", gateway);
145 exit(2);
146 }
147
148
149 if (!dev)
150 dev = default_device;
151 printf("Device: %s\n", dev);
152 printf("Source: %s\n", inet_ntoa(ip->ip_src));
153 printf("Dest: %s\n", inet_ntoa(ip->ip_dst));
154 printf("Gateway: %s\n", inet_ntoa(gwip));
155 printf("mtu: %d\n", mtu);
156
157 switch (tests)
158 {
159 case 1 :
160 ip_test1(dev, mtu, (ip_t *)ti, gwip, pointtest);
161 break;
162 case 2 :
163 ip_test2(dev, mtu, (ip_t *)ti, gwip, pointtest);
164 break;
165 case 3 :
166 ip_test3(dev, mtu, (ip_t *)ti, gwip, pointtest);
167 break;
168 case 4 :
169 ip_test4(dev, mtu, (ip_t *)ti, gwip, pointtest);
170 break;
171 case 5 :
172 ip_test5(dev, mtu, (ip_t *)ti, gwip, pointtest);
173 break;
174 case 6 :
175 ip_test6(dev, mtu, (ip_t *)ti, gwip, pointtest);
176 break;
177 case 7 :
178 ip_test7(dev, mtu, (ip_t *)ti, gwip, pointtest);
179 break;
180 default :
181 ip_test1(dev, mtu, (ip_t *)ti, gwip, pointtest);
182 ip_test2(dev, mtu, (ip_t *)ti, gwip, pointtest);
183 ip_test3(dev, mtu, (ip_t *)ti, gwip, pointtest);
184 ip_test4(dev, mtu, (ip_t *)ti, gwip, pointtest);
185 ip_test5(dev, mtu, (ip_t *)ti, gwip, pointtest);
186 ip_test6(dev, mtu, (ip_t *)ti, gwip, pointtest);
187 ip_test7(dev, mtu, (ip_t *)ti, gwip, pointtest);
188 break;
189 }
190 return (0);
191 }
192