contrib/ipfilter/ipsend/sdlpi.c

   1 /*      $FreeBSD$       */
   2
   3 /*
   4  * (C)opyright 1992-1998 Darren Reed. (from tcplog)
   5  *
   6  * See the IPFILTER.LICENCE file for details on licencing.
   7  *
   8  */
   9
  10 #include <stdio.h>
  11 #include <netdb.h>
  12 #include <ctype.h>
  13 #include <fcntl.h>
  14 #include <signal.h>
  15 #include <errno.h>
  16 #include <sys/types.h>
  17 #include <sys/time.h>
  18 #include <sys/timeb.h>
  19 #include <sys/socket.h>
  20 #include <sys/file.h>
  21 #include <sys/ioctl.h>
  22 #include <sys/stropts.h>
  23
  24 #ifdef sun
  25 # include <sys/pfmod.h>
  26 # include <sys/bufmod.h>
  27 #endif
  28 # include <sys/dlpi.h>
  29
  30 #include <net/if.h>
  31 #include <netinet/in.h>
  32 #include <netinet/in_systm.h>
  33 #include <netinet/ip.h>
  34 #include <netinet/if_ether.h>
  35 #include <netinet/ip_var.h>
  36 #include <netinet/udp.h>
  37 #include <netinet/udp_var.h>
  38 #include <netinet/tcp.h>
  39
  40 #include "ipsend.h"
  41
  42 #if !defined(lint)
  43 static const char sccsid[] = "@(#)sdlpi.c       1.3 10/30/95 (C)1995 Darren Reed";
  44 static const char rcsid[] = "@(#)$Id$";
  45 #endif
  46
  47 #define CHUNKSIZE       8192
  48 #define BUFSPACE        (4*CHUNKSIZE)
  49
  50
  51 /*
  52  * Be careful to only include those defined in the flags option for the
  53  * interface are included in the header size.
  54  */
  55 int     initdevice(device, tout)
  56         char    *device;
  57         int     tout;
  58 {
  59         char    devname[16], *s, buf[256];
  60         int     i, fd;
  61
  62         (void) strcpy(devname, "/dev/");
  63         (void) strncat(devname, device, sizeof(devname) - strlen(devname));
  64
  65         s = devname + 5;
  66         while (*s && !ISDIGIT(*s))
  67                 s++;
  68         if (!*s)
  69             {
  70                 fprintf(stderr, "bad device name %s\n", devname);
  71                 exit(-1);
  72             }
  73         i = atoi(s);
  74         *s = '\0';
  75         /*
  76          * For writing
  77          */
  78         if ((fd = open(devname, O_RDWR)) < 0)
  79             {
  80                 fprintf(stderr, "O_RDWR(1) ");
  81                 perror(devname);
  82                 exit(-1);
  83             }
  84
  85         if (dlattachreq(fd, i) == -1)
  86             {
  87                 fprintf(stderr, "dlattachreq: DLPI error\n");
  88                 exit(-1);
  89             }
  90         else if (dlokack(fd, buf) == -1)
  91             {
  92                 fprintf(stderr, "dlokack(attach): DLPI error\n");
  93                 exit(-1);
  94             }
  95 #ifdef DL_HP_RAWDLS
  96         if (dlpromisconreq(fd, DL_PROMISC_SAP) < 0)
  97             {
  98                 fprintf(stderr, "dlpromisconreq: DL_PROMISC_PHYS error\n");
  99                 exit(-1);
 100             }
 101         else if (dlokack(fd, buf) < 0)
 102             {
 103                 fprintf(stderr, "dlokack(promisc): DLPI error\n");
 104                 exit(-1);
 105             }
 106         /* 22 is INSAP as per the HP-UX DLPI Programmer's Guide */
 107
 108         dlbindreq(fd, 22, 1, DL_HP_RAWDLS, 0, 0);
 109 #else
 110         dlbindreq(fd, ETHERTYPE_IP, 0, DL_CLDLS, 0, 0);
 111 #endif
 112         dlbindack(fd, buf);
 113         /*
 114          * write full headers
 115          */
 116 #ifdef DLIOCRAW /* we require RAW DLPI mode, which is a Sun extension */
 117         if (strioctl(fd, DLIOCRAW, -1, 0, NULL) == -1)
 118             {
 119                 fprintf(stderr, "DLIOCRAW error\n");
 120                 exit(-1);
 121             }
 122 #endif
 123         return fd;
 124 }
 125
 126
 127 /*
 128  * output an IP packet onto a fd opened for /dev/nit
 129  */
 130 int     sendip(fd, pkt, len)
 131         int     fd, len;
 132         char    *pkt;
 133 {
 134         struct strbuf dbuf, *dp = &dbuf, *cp = NULL;
 135         int pri = 0;
 136 #ifdef DL_HP_RAWDLS
 137         struct strbuf cbuf;
 138         dl_hp_rawdata_req_t raw;
 139
 140         cp = &cbuf;
 141         raw.dl_primitive = DL_HP_RAWDATA_REQ;
 142         cp->len = sizeof(raw);
 143         cp->buf = (char *)&raw;
 144         cp->maxlen = cp->len;
 145         pri = MSG_HIPRI;
 146 #endif
 147         /*
 148          * construct NIT STREAMS messages, first control then data.
 149          */
 150         dp->buf = pkt;
 151         dp->len = len;
 152         dp->maxlen = dp->len;
 153
 154         if (putmsg(fd, cp, dp, pri) == -1)
 155             {
 156                 perror("putmsg");
 157                 return -1;
 158             }
 159         if (ioctl(fd, I_FLUSH, FLUSHW) == -1)
 160             {
 161                 perror("I_FLUSHW");
 162                 return -1;
 163             }
 164         return len;
 165 }
 166