4 * resend.c (C) 1995-1998 Darren Reed
6 * See the IPFILTER.LICENCE file for details on licencing.
10 static const char sccsid[] = "@(#)resend.c 1.3 1/11/96 (C)1995 Darren Reed";
11 static const char rcsid[] = "@(#)$Id$";
13 #include <sys/param.h>
14 #include <sys/types.h>
16 #include <sys/socket.h>
18 #include <netinet/in.h>
19 #include <arpa/inet.h>
20 #include <netinet/in_systm.h>
21 #include <netinet/ip.h>
22 # include <netinet/ip_var.h>
23 # include <netinet/if_ether.h>
33 void dumppacket __P((ip_t *));
42 t = (tcphdr_t *)((char *)ip + (IP_HL(ip) << 2));
44 printf("tos %#x ", ip->ip_tos);
45 if (ip->ip_off & 0x3fff)
46 printf("frag @%#x ", (ip->ip_off & 0x1fff) << 3);
47 printf("len %d id %d ", ip->ip_len, ip->ip_id);
48 printf("ttl %d p %d src %s", ip->ip_ttl, ip->ip_p,
49 inet_ntoa(ip->ip_src));
50 if (ip->ip_p == IPPROTO_TCP || ip->ip_p == IPPROTO_UDP)
51 printf(",%d", t->th_sport);
52 printf(" dst %s", inet_ntoa(ip->ip_dst));
53 if (ip->ip_p == IPPROTO_TCP || ip->ip_p == IPPROTO_UDP)
54 printf(",%d", t->th_dport);
55 if (ip->ip_p == IPPROTO_TCP) {
56 printf(" seq %lu:%lu flags ",
57 (u_long)t->th_seq, (u_long)t->th_ack);
58 for (j = 0, i = 1; i < 256; i *= 2, j++)
60 printf("%c", "FSRPAU--"[j]);
66 int ip_resend(dev, mtu, r, gwip, datain)
76 int fd, wfd = initdevice(dev, 5), len, i;
83 fd = (*r->r_open)(datain);
85 fd = (*r->r_open)("-");
90 ip = (struct ip *)mb.mb_buf;
91 eh = (ether_header_t *)malloc(sizeof(*eh));
94 perror("malloc failed");
98 bzero((char *) &eh->ether_shost, sizeof(eh->ether_shost));
99 if (gwip.s_addr && (arp((char *)&gwip, dhost) == -1))
106 while ((i = (*r->r_readip)(&mb, NULL, NULL)) > 0)
108 if (!(opts & OPT_RAW)) {
109 len = ntohs(ip->ip_len);
110 eh = (ether_header_t *)realloc((char *)eh, sizeof(*eh) + len);
111 eh->ether_type = htons((u_short)ETHERTYPE_IP);
113 if (arp((char *)&gwip,
114 (char *) &eh->ether_dhost) == -1) {
119 bcopy(dhost, (char *) &eh->ether_dhost,
122 ip->ip_sum = chksum((u_short *)ip,
124 bcopy(ip, (char *)(eh + 1), len);
128 eh = (ether_header_t *)mb.mb_buf;
132 if (sendip(wfd, (char *)eh, len) == -1)
134 perror("send_packet");