1/*
2 * (C)opyright 1992-1998 Darren Reed.
3 * (C)opyright 1997 Marc Boucher.
4 *
5 * See the IPFILTER.LICENCE file for details on licencing.
6 */
7#ifdef __sgi
8# include <sys/ptimers.h>
9#endif
10#include <stdio.h>
11#include <sys/types.h>
12#include <string.h>
13#include <unistd.h>
14#include <stdlib.h>
15#include <errno.h>
16#include <sys/socket.h>
17#include <sys/ioctl.h>
18
19#include <net/if.h>
20#include <net/raw.h>
21#include <netinet/in.h>
22#include <netinet/in_systm.h>
23#include <netinet/ip.h>
24#include <netinet/if_ether.h>
25#include <netinet/ip_var.h>
26#include <netinet/udp.h>
27#include <netinet/udp_var.h>
28#include <netinet/tcp.h>
29#include "ipsend.h"
30
31#if !defined(lint) && defined(LIBC_SCCS)
32static char sirix[] = "@(#)sirix.c 1.0 10/9/97 (C)1997 Marc Boucher";
33#endif
34
35
36int initdevice(char *device, int sport, int tout)
37{
38 int fd;
39 struct sockaddr_raw sr;
40
41 if ((fd = socket(PF_RAW, SOCK_RAW, RAWPROTO_DRAIN)) < 0)
42 {
43 perror("socket(PF_RAW, SOCK_RAW, RAWPROTO_DRAIN)");
44 return -1;
45 }
46
47 memset(&sr, 0, sizeof(sr));
48 sr.sr_family = AF_RAW;
49 sr.sr_port = ETHERTYPE_IP;
50 strncpy(sr.sr_ifname, device, sizeof(sr.sr_ifname));
51 if (bind(fd, &sr, sizeof(sr)) < 0)
52 {
53 perror("bind AF_RAW");
54 close(fd);
55 return -1;
56 }
57 return fd;
58}
59
60
61/*
62 * output an IP packet
63 */
64int sendip(int fd, char *pkt, int len)
65{
66 struct sockaddr_raw sr;
67 int srlen = sizeof(sr);
68 struct ifreq ifr;
69 struct ether_header *eh = (struct ether_header *)pkt;
70
71 if (getsockname(fd, &sr, &srlen) == -1)
72 {
73 perror("getsockname");
74 return -1;
75 }
76
77 memset(&ifr, 0, sizeof(ifr));
78 strncpy(ifr.ifr_name, sr.sr_ifname, sizeof ifr.ifr_name);
79
80 if (ioctl(fd, SIOCGIFADDR, &ifr) == -1)
81 {
82 perror("ioctl SIOCGIFADDR");
83 return -1;
84 }
85
86 memcpy(eh->ether_shost, ifr.ifr_addr.sa_data, sizeof(eh->ether_shost));
87
88 if (write(fd, pkt, len) == -1)
89 {
90 perror("send");
91 return -1;
92 }
93
94 return len;
95}