Subversion Repositories planix.SVN

Rev

Rev 2 | Details | Compare with Previous | Last modification | View Log | RSS feed

Rev Author Line No. Line
2 - 1
#define _BSD_EXTENSION
2
#define _NET_EXTENSION
3
#define _POSIX_SOURCE
4
 
5
#include <stdio.h>
6
#include <stdlib.h>
7
#include <unistd.h>
8
#include <ctype.h>
9
#include <string.h>
10
#include <sys/types.h>
11
#include <sys/socket.h>
12
#include <netinet/in.h>
13
#include <netdb.h>
14
#include <sys/time.h>
15
 
16
#define	DIALTIMEOUT	30
17
 
18
/* This is a dummy routine for non Plan9 systems.
19
 * No attempt has been made to be clever, it's just
20
 * supposed to work in this program.
21
 */
22
int dial_debug = 0;
23
 
24
int
25
dial(char *dest, char *local, char *dir, int *cfdp) {
26
	int sockconn, lport;
27
	struct hostent *hp;		/* Pointer to host info */
28
	struct sockaddr_in sin;		/* Socket address, Internet style */
29
	struct servent *sp = 0;
30
	char *tdest, *netname, *hostname, *servname;
31
	int sock_type;
32
#ifndef plan9
33
#define	USED(x)	if(x); else
34
	int sockoption, sockoptsize;
35
#endif
36
 
37
	USED(dir);
38
	USED(cfdp);
39
	if ((tdest = malloc(strlen(dest)+1)) == NULL) {
40
		if (dial_debug) fprintf(stderr, "dial: could not allocate memory\n");
41
		return(-1);
42
	}
43
	strcpy(tdest, dest);
44
 
45
	if ((netname = strtok(tdest, "!")) == NULL) {
46
		fprintf(stderr, "dial: no network name\n");
47
		return(-1);
48
	}
49
	if (strcmp(netname, "tcp") == 0) {
50
		sock_type = SOCK_STREAM;
51
	} else if (strcmp(netname, "udp") == 0) {
52
		sock_type = SOCK_DGRAM;
53
	} else {
54
		fprintf(stderr, "dial: network protocol name `%s' is invalid; must be `tcp' or `udp'\n", netname);
55
		return(-1);
56
	}
57
	if ((hostname = strtok(0, "!")) == NULL) {
58
		fprintf(stderr, "dial: no host name or number\n");
59
		return(-1);
60
	}
61
	if ((servname = strtok(0, "!")) == NULL) {
62
		fprintf(stderr, "dial: no service name or number\n");
63
		return(-1);
64
	}
65
	hp = gethostbyname(hostname);
66
	if (hp == (struct hostent *)NULL) {
67
		if (dial_debug) fprintf(stderr, "host `%s' unknown by local host\n", hostname);
68
		return(-1);
69
	}
70
	if (!isdigit(servname[0]))
71
		sp = getservbyname(servname, netname);
72
	sin.sin_addr.s_addr = *(unsigned long*)hp->h_addr;
73
	sin.sin_port	= htons((sp==0)?atoi(servname):sp->s_port);
74
	sin.sin_family	= AF_INET;
75
	if (local == NULL) {
76
		if ((sockconn = socket(AF_INET, sock_type, 0)) < 0) {
77
			if (dial_debug) perror("dial:socket():");
78
			return(-1);
79
		}
80
		if (dial_debug) fprintf(stderr, "socket FD=%d\n", sockconn);
81
	} else {
82
		lport = atoi(local);
83
		if ((lport < 512) || (lport >= 1024)) {
84
			fprintf(stderr, "dial:invalid local port %d\n", lport);
85
			return(-1);
86
		}
87
		if ((sockconn = rresvport(&lport)) < 0) {
88
			if (dial_debug) perror("dial:rresvport():");
89
			return(-1);
90
		}
91
	}
92
	if (dial_debug) {
93
		fprintf(stderr, "sin size=%d\n", sizeof(sin));
94
	}
95
	alarm(DIALTIMEOUT);
96
	if ((connect(sockconn, (struct sockaddr *) &sin, sizeof(sin)) < 0)) {
97
		if (dial_debug) perror("dial:connect():");
98
		return(-1);
99
	}
100
	alarm(0);
101
#ifndef plan9
102
	sockoptsize = sizeof(sockoption);
103
	if (getsockopt(sockconn, SOL_SOCKET, SO_KEEPALIVE, &sockoption, &sockoptsize) < 0) {
104
		if (dial_debug) perror("dial:getsockopt():");
105
		return(-1);
106
	}
107
	if (sockoptsize == sizeof(sockoption) && !sockoption) {
108
		if (setsockopt(sockconn, SOL_SOCKET, SO_KEEPALIVE, &sockoption, sockoptsize) < 0) {
109
			if (dial_debug) perror("dial:getsockopt():");
110
			return(-1);
111
		}
112
	}
113
#endif
114
	return(sockconn);
115
}