arch/linux/ipx_lin.c

   1 /*
   2  * $Source: /cvs/cvsroot/d2x/arch/linux/ipx_lin.c,v $
   3  * $Revision: 1.3 $
   4  * $Author: bradleyb $
   5  * $Date: 2001-10-19 07:29:37 $
   6  *
   7  * Linux IPX
   8  *
   9  * $Log: not supported by cvs2svn $
  10  * Revision 1.2  2001/01/29 13:35:08  bradleyb
  11  * Fixed build system, minor fixes
  12  *
  13  */
  14
  15 #ifdef HAVE_CONFIG_H
  16 #include <conf.h>
  17 #endif
  18
  19 #include <stdio.h>
  20 #include <sys/types.h>
  21 #include <sys/socket.h>
  22 #include <string.h>
  23
  24 #ifdef HAVE_NETIPX_IPX_H
  25 #include <netipx/ipx.h>
  26 #else
  27 # include <linux/ipx.h>
  28 # ifndef IPX_TYPE
  29 #  define IPX_TYPE 1
  30 # endif
  31 #endif
  32
  33 #include <netinet/in.h>
  34 #include <unistd.h>
  35 #include <errno.h>
  36 #include "pstypes.h"
  37
  38 #include "ipx_ld.h"
  39 #include "ipx_hlpr.h"
  40 #include "ipx_lin.h"
  41
  42 extern unsigned char ipx_MyAddress[10];
  43
  44 int
  45 ipx_linux_GetMyAddress( void )
  46 {
  47   int sock;
  48   struct sockaddr_ipx ipxs;
  49   struct sockaddr_ipx ipxs2;
  50   int len;
  51   int i;
  52
  53   sock=socket(AF_IPX,SOCK_DGRAM,PF_IPX);
  54   if(sock==-1)
  55   {
  56     n_printf("IPX: could not open socket in GetMyAddress\n");
  57     return(-1);
  58   }
  59
  60   /* bind this socket to network 0 */
  61   ipxs.sipx_family=AF_IPX;
  62 #ifdef IPX_MANUAL_ADDRESS
  63   memcpy(&ipxs.sipx_network, ipx_MyAddress, 4);
  64 #else
  65   ipxs.sipx_network=0;
  66 #endif
  67   ipxs.sipx_port=0;
  68
  69   if(bind(sock,(struct sockaddr *)&ipxs,sizeof(ipxs))==-1)
  70   {
  71     n_printf("IPX: could bind to network 0 in GetMyAddress\n");
  72     close( sock );
  73     return(-1);
  74   }
  75
  76   len = sizeof(ipxs2);
  77   if (getsockname(sock,(struct sockaddr *)&ipxs2,&len) < 0) {
  78     n_printf("IPX: could not get socket name in GetMyAddress\n");
  79     close( sock );
  80     return(-1);
  81   }
  82
  83   memcpy(ipx_MyAddress, &ipxs2.sipx_network, 4);
  84   for (i = 0; i < 6; i++) {
  85     ipx_MyAddress[4+i] = ipxs2.sipx_node[i];
  86   }
  87   close( sock );
  88   return(0);
  89 }
  90
  91 int
  92 ipx_linux_OpenSocket(ipx_socket_t *sk, int port)
  93 {
  94   int sock;                     /* sock here means Linux socket handle */
  95   int opt;
  96   struct sockaddr_ipx ipxs;
  97   int len;
  98   struct sockaddr_ipx ipxs2;
  99
 100   /* DANG_FIXTHIS - kludge to support broken linux IPX stack */
 101   /* need to convert dynamic socket open into a real socket number */
 102 /*  if (port == 0) {
 103     n_printf("IPX: using socket %x\n", nextDynamicSocket);
 104     port = nextDynamicSocket++;
 105   }
 106 */
 107   /* do a socket call, then bind to this port */
 108   sock = socket(AF_IPX, SOCK_DGRAM, PF_IPX);
 109   if (sock == -1) {
 110     n_printf("IPX: could not open IPX socket.\n");
 111     return -1;
 112   }
 113
 114 #ifdef DOSEMU
 115   opt = 1;
 116   /* turn on socket debugging */
 117   if (d.network) {
 118     enter_priv_on();
 119     if (setsockopt(sock, SOL_SOCKET, SO_DEBUG, &opt, sizeof(opt)) == -1) {
 120       leave_priv_setting();
 121       n_printf("IPX: could not set socket option for debugging.\n");
 122       return -1;
 123     }
 124     leave_priv_setting();
 125   }
 126 #endif
 127   opt = 1;
 128   /* Permit broadcast output */
 129   enter_priv_on();
 130   if (setsockopt(sock, SOL_SOCKET, SO_BROADCAST,
 131                  &opt, sizeof(opt)) == -1) {
 132     leave_priv_setting();
 133     n_printf("IPX: could not set socket option for broadcast.\n");
 134     return -1;
 135   }
 136 #ifdef DOSEMU
 137   /* allow setting the type field in the IPX header */
 138   opt = 1;
 139 #if 0 /* this seems to be wrong: IPX_TYPE can only be set on level SOL_IPX */
 140   if (setsockopt(sock, SOL_SOCKET, IPX_TYPE, &opt, sizeof(opt)) == -1) {
 141 #else
 142   /* the socket _is_ an IPX socket, hence it first passes ipx_setsockopt()
 143    * in file linux/net/ipx/af_ipx.c. This one handles SOL_IPX itself and
 144    * passes SOL_SOCKET-levels down to sock_setsockopt().
 145    * Hence I guess the below is correct (can somebody please verify this?)
 146    * -- Hans, June 14 1997
 147    */
 148   if (setsockopt(sock, SOL_IPX, IPX_TYPE, &opt, sizeof(opt)) == -1) {
 149 #endif
 150     leave_priv_setting();
 151     n_printf("IPX: could not set socket option for type.\n");
 152     return -1;
 153   }
 154 #endif
 155   ipxs.sipx_family = AF_IPX;
 156   ipxs.sipx_network = *((unsigned int *)&ipx_MyAddress[0]);
 157 /*  ipxs.sipx_network = htonl(MyNetwork); */
 158   bzero(ipxs.sipx_node, 6);     /* Please fill in my node name */
 159   ipxs.sipx_port = htons(port);
 160
 161   /* now bind to this port */
 162   if (bind(sock, (struct sockaddr *) &ipxs, sizeof(ipxs)) == -1) {
 163     n_printf("IPX: could not bind socket to address\n");
 164     close( sock );
 165     leave_priv_setting();
 166     return -1;
 167   }
 168
 169   if( port==0 ) {
 170     len = sizeof(ipxs2);
 171     if (getsockname(sock,(struct sockaddr *)&ipxs2,&len) < 0) {
 172       n_printf("IPX: could not get socket name in IPXOpenSocket\n");
 173       close( sock );
 174       leave_priv_setting();
 175       return -1;
 176     } else {
 177       port = htons(ipxs2.sipx_port);
 178       n_printf("IPX: opened dynamic socket %04x\n", port);
 179     }
 180   }
 181   leave_priv_setting();
 182   sk->fd = sock;
 183   sk->socket = port;
 184   return 0;
 185 }
 186
 187 void ipx_linux_CloseSocket(ipx_socket_t *mysock) {
 188   /* now close the file descriptor for the socket, and free it */
 189   n_printf("IPX: closing file descriptor on socket %x\n", mysock->socket);
 190   close(mysock->fd);
 191 }
 192
 193 int ipx_linux_SendPacket(ipx_socket_t *mysock, IPXPacket_t *IPXHeader,
 194  u_char *data, int dataLen) {
 195   struct sockaddr_ipx ipxs;
 196
 197   ipxs.sipx_family = AF_IPX;
 198   /* get destination address from IPX packet header */
 199   memcpy(&ipxs.sipx_network, IPXHeader->Destination.Network, 4);
 200   /* if destination address is 0, then send to my net */
 201   if (ipxs.sipx_network == 0) {
 202     ipxs.sipx_network = *((unsigned int *)&ipx_MyAddress[0]);
 203 /*  ipxs.sipx_network = htonl(MyNetwork); */
 204   }
 205   memcpy(&ipxs.sipx_node, IPXHeader->Destination.Node, 6);
 206   memcpy(&ipxs.sipx_port, IPXHeader->Destination.Socket, 2);
 207   ipxs.sipx_type = IPXHeader->PacketType;
 208   /*    ipxs.sipx_port=htons(0x452); */
 209   return sendto(mysock->fd, data, dataLen, 0,
 210              (struct sockaddr *) &ipxs, sizeof(ipxs));
 211 }
 212
 213 int ipx_linux_ReceivePacket(ipx_socket_t *s, char *buffer, int bufsize,
 214  struct ipx_recv_data *rd) {
 215         int sz, size;
 216         struct sockaddr_ipx ipxs;
 217
 218         sz = sizeof(ipxs);
 219         if ((size = recvfrom(s->fd, buffer, bufsize, 0,
 220              (struct sockaddr *) &ipxs, &sz)) <= 0)
 221              return size;
 222         memcpy(rd->src_network, &ipxs.sipx_network, 4);
 223         memcpy(rd->src_node, ipxs.sipx_node, 6);
 224         rd->src_socket = ipxs.sipx_port;
 225         rd->dst_socket = s->socket;
 226         rd->pkt_type = ipxs.sipx_type;
 227
 228         return size;
 229 }