/*  * This file is part of the UCB release of Plan 9. It is subject to the license * terms in the LICENSE file found in the top-level directory of this * distribution and at http://akaros.cs.berkeley.edu/files/Plan9License. No * part of the UCB release of Plan 9, including this file, may be copied, * modified, propagated, or distributed except according to the terms contained * in the LICENSE file. */ #define _BSD_EXTENSION#define _NET_EXTENSION#define _POSIX_SOURCE #include <stdio.h>#include <stdlib.h>#include <unistd.h>#include <ctype.h>#include <string.h>#include <sys/types.h>#include <sys/socket.h>#include <netinet/in.h>#include <netdb.h>#include <sys/time.h> #define	DIALTIMEOUT	30 /* This is a dummy routine for non Plan9 systems. * No attempt has been made to be clever, it's just * supposed to work in this program. */int dial_debug = 0; intdial(char *dest, char *local, char *dir, int *cfdp) {	int sockconn, lport;	struct hostent *hp;		/* Pointer to host info */	struct sockaddr_in sin;		/* Socket address, Internet style */	struct servent *sp = 0;	char *tdest, *netname, *hostname, *servname;	int sock_type;#ifndef plan9#define	USED(x)	if(x); else	int sockoption, sockoptsize;#endif 	USED(dir);	USED(cfdp);	if ((tdest = malloc(strlen(dest)+1)) == NULL) {		if (dial_debug) fprintf(stderr, "dial: could not allocate memory\n");		return(-1);	}	strcpy(tdest, dest); 	if ((netname = strtok(tdest, "!")) == NULL) {		fprintf(stderr, "dial: no network name\n");		return(-1);	}	if (strcmp(netname, "tcp") == 0) {		sock_type = SOCK_STREAM;	} else if (strcmp(netname, "udp") == 0) {		sock_type = SOCK_DGRAM;	} else {		fprintf(stderr, "dial: network protocol name `%s' is invalid; must be `tcp' or `udp'\n", netname);		return(-1);	}	if ((hostname = strtok(0, "!")) == NULL) {		fprintf(stderr, "dial: no host name or number\n");		return(-1);	}	if ((servname = strtok(0, "!")) == NULL) {		fprintf(stderr, "dial: no service name or number\n");		return(-1);	}	hp = gethostbyname(hostname);	if (hp == (struct hostent *)NULL) {		if (dial_debug) fprintf(stderr, "host `%s' unknown by local host\n", hostname);		return(-1);	}	if (!isdigit(servname[0]))		sp = getservbyname(servname, netname);	sin.sin_addr.s_addr = *(unsigned long*)hp->h_addr;	sin.sin_port	= htons((sp==0)?atoi(servname):sp->s_port);	sin.sin_family	= AF_INET;	if (local == NULL) {		if ((sockconn = socket(AF_INET, sock_type, 0)) < 0) {			if (dial_debug) perror("dial:socket():");			return(-1);		}		if (dial_debug) fprintf(stderr, "socket FD=%d\n", sockconn);	} else {		lport = atoi(local);		if ((lport < 512) || (lport >= 1024)) {			fprintf(stderr, "dial:invalid local port %d\n", lport);			return(-1);		}		if ((sockconn = rresvport(&lport)) < 0) {			if (dial_debug) perror("dial:rresvport():");			return(-1);		}	}	if (dial_debug) {		fprintf(stderr, "sin size=%d\n", sizeof(sin));	}	alarm(DIALTIMEOUT);	if ((connect(sockconn, (struct sockaddr *) &sin, sizeof(sin)) < 0)) {		if (dial_debug) perror("dial:connect():");		return(-1);	}	alarm(0);#ifndef plan9	sockoptsize = sizeof(sockoption);	if (getsockopt(sockconn, SOL_SOCKET, SO_KEEPALIVE, &sockoption, &sockoptsize) < 0) {		if (dial_debug) perror("dial:getsockopt():");		return(-1);	}	if (sockoptsize == sizeof(sockoption) && !sockoption) {		if (setsockopt(sockconn, SOL_SOCKET, SO_KEEPALIVE, &sockoption, sockoptsize) < 0) {			if (dial_debug) perror("dial:getsockopt():");			return(-1);		}	}#endif	return(sockconn);}