home *** CD-ROM | disk | FTP | other *** search
- /*********************************************************************\
- * Copyright (c) 1991 by Wen-King Su (wen-king@vlsi.cs.caltech.edu) *
- * *
- * You may copy or modify this file in any manner you wish, provided *
- * that this notice is always included, and that you hold the author *
- * harmless for any loss or damage resulting from the installation or *
- * use of this software. *
- \*********************************************************************/
-
- #include "common_def.h"
-
- static struct sockaddr_in INET_ZERO = { AF_INET };
-
- extern int errno;
- #define DSIZE (sizeof(int)*8)
- #define SAVE(A) { int sav; sav = errno; A; errno = sav; }
-
- #ifndef EXOS_IPC
-
- #include <netdb.h>
-
- extern unsigned long inet_addr();
-
- _x_udp(port)
- int *port;
- {
- int f, len, zz;
- struct sockaddr_in me ;
- struct sockaddr_in sin;
-
- me = sin = INET_ZERO;
-
- me.sin_port = htons((unsigned short) *port);
- me.sin_family = AF_INET;
-
- if((f=socket(AF_INET,SOCK_DGRAM,0)) == -1) return(-1);
-
- if( setsockopt(f,SOL_SOCKET,SO_REUSEADDR,(char *)&zz,sizeof(zz)) < 0 ||
- bind(f,(struct sockaddr *) &me,(len = sizeof(me))) < 0 ||
- getsockname(f,(char *)&sin,&len) < 0)
- { SAVE(((void) close(f))); return(-1); }
- if(!*port) *port = ntohs((unsigned short) sin.sin_port); return(f);
- }
-
- _x_adr(host,port,his)
- struct sockaddr_in *his;
- char *host;
- int port;
- {
- char myhost[128];
- struct hostent *H;
- int i;
- char *s, *d;
-
- *his = INET_ZERO;
- if(!host) (void) gethostname(host = myhost,sizeof(myhost));
-
- if((his->sin_addr.s_addr = inet_addr(host)) != -1)
- { his->sin_family = AF_INET;
- } else
- if(H = gethostbyname(host))
- { for(s = (char *)H->h_addr, d = (char *)&his->sin_addr, i = H->h_length;
- i--; *d++ = *s++);
- his->sin_family = H->h_addrtype;
- } else return(-1);
- his->sin_port = htons((unsigned short) port);
-
- return(0);
- }
-
- _x_select(rf, tt) /* tt is in unit of ms */
- int *rf;
- long tt;
- {
- struct timeval timeout;
-
- if(tt != -1)
- {
- timeout.tv_sec = tt / 1000;
- timeout.tv_usec = (tt % 1000)*1000;
- return(select(DSIZE, rf, (int *) 0, (int *) 0, &timeout));
- }
-
- return(select(DSIZE, rf, (int *) 0, (int *) 0, (struct timeval *) 0));
- }
- #endif /* not EXOS_IPC */
-
- #ifdef EXOS_IPC
-
- extern long rhost();
-
- _x_udp(port)
- int *port;
- {
- struct sockaddr_in sin; int f;
-
- sin = INET_ZERO;
- sin.sin_family = AF_INET;
- sin.sin_port = htons((unsigned short) *port);
- if((f = socket(SOCK_DGRAM, (struct sockproto *) 0, &sin, SO_REUSEADDR))
- == -1) return(-1);
- sin = INET_ZERO;
- if(socketaddr(f,&sin) == -1) { SAVE(((void) close(f))); return(-1); }
- if(!*port) *port = ntohs((unsigned short) sin.sin_port); return(f);
- }
-
- _x_adr(host,port,his)
- char *host;
- int port;
- struct sockaddr_in *his;
- {
- char myhost[128];
- int f;
-
- *his = INET_ZERO;
- if(!host) (void) gethostname(host = myhost,sizeof(myhost));
-
- his->sin_family = AF_INET;
- his->sin_port = htons((unsigned short) port);
-
- if((his->sin_addr.s_addr = rhost(&host)) == -1) return(-1);
-
- return(0);
- }
-
- _x_select(readfds, tt)
- int *readfds;
- long tt; /* Time to wait in miniseconds. */
- {
- int code;
- long mask = *readfds;
-
- if(tt & 0xc0000000) tt = 0x3fffffff;/* It does not like 0x7fffffff. */
-
- code = select(DSIZE, &mask, (long *) 0, tt);
-
- *readfds = mask;
-
- return(code);
- }
-
- recvfrom(s, msg, len, flags, from, fromlen)
- char *msg;
- int s, len, flags, *fromlen;
- struct sockaddr_in *from;
- {
- return(receive(s,from,msg,len));
- }
-
- sendto(s, msg, len, flags, to, tolen)
- char *msg;
- int s, len, flags, tolen;
- struct sockaddr_in *to;
- {
- to->sin_family = AF_INET;
- return(send(s,to,msg,len));
- }
-
- #endif /* EXOS_IPC */
-