Annotation of OpenXM/src/kan96xx/plugin/mytcpio.c, Revision 1.11
1.11 ! takayama 1: /* $OpenXM: OpenXM/src/kan96xx/plugin/mytcpio.c,v 1.10 2003/07/20 07:18:45 takayama Exp $ */
1.1 maekawa 2: #include <stdio.h>
3: #include <sys/types.h>
4: #include <sys/socket.h>
5: #include <sys/time.h>
6: #include <netinet/in.h>
7: #include <netdb.h>
8: #include <setjmp.h>
9: /* -lnsl -lsocket /usr/ucblib/libucb.a */
10: #include "ox_kan.h"
11: /*
12: MyEnv_oxmisc is used in oxmisc.c.
13: It cannot be put in oxmisc.c for the case of sun.
14: */
15: #if defined(sun)
16: int MyEnv_oxmisc[2000];
17: #else
1.6 takayama 18: #if defined(__CYGWIN__)
19: sigjmp_buf MyEnv_oxmisc; /* may cause a trouble in Solaris. */
20: #else
1.1 maekawa 21: jmp_buf MyEnv_oxmisc; /* may cause a trouble in Solaris. */
1.6 takayama 22: #endif
1.1 maekawa 23: #endif
24:
25: #define READBUFSIZE 10000
1.7 takayama 26: #define MAX_LISTEN_QUEUE 3
1.1 maekawa 27: static void errorMsg1s(char *s) {
28: fprintf(stderr,"%s\n",s);
29: }
30:
1.3 takayama 31: #define SET_TCPIOERROR { if (TcpioError == NULL) TcpioError = stdout; }
32: FILE *TcpioError = NULL;
1.1 maekawa 33: int OpenedSocket = 0;
34: extern int Quiet;
35:
36: socketOpen(char *serverName,int portNumber) {
37: static struct hostent *myhost;
38: static struct sockaddr_in me;
39: static int s_waiting;
40: static int on;
41: extern int errno;
42: int tt;
43:
1.3 takayama 44: SET_TCPIOERROR;
1.1 maekawa 45: fprintf(TcpioError,"Hello from open. serverName is %s and portnumber is %d\n",
1.5 takayama 46: serverName,portNumber);
1.1 maekawa 47: if ((myhost = gethostbyname(serverName)) == NULL) {
48: errorMsg1s("Bad server name.");
49: return(-1);
50: }
51: bzero((char *)&me,sizeof(me));
52: me.sin_family = AF_INET;
53: me.sin_port = htons(portNumber);
54: bcopy(myhost->h_addr,
1.5 takayama 55: &me.sin_addr,myhost->h_length);
1.1 maekawa 56:
57: if ((s_waiting = socket(AF_INET,SOCK_STREAM,0)) < 0) {
58: errorMsg1s("Socket allocation is failed.");
59: return(-1);
60: }
61:
62: on=1; setsockopt(s_waiting,SOL_SOCKET,SO_REUSEADDR,&on,sizeof(on));
63: /* important */
64: if ((tt = bind(s_waiting,(struct sockaddr *) &me,sizeof(me))) == -1) {
65: fprintf(TcpioError,"Bind error. Error no is %d. See /usr/include/sys/errno.h. (asm/errno.h)\n",errno);
66: errorMsg1s("cannot bind");
67: return(-1);
68: }
69: /* printf("bind returns %d\n",tt); */
70: tt = sizeof(me);
71: if (getsockname(s_waiting,(struct sockaddr *)&me,&tt) < 0) {
72: fprintf(TcpioError,"getsockname error. Error no is %d. See /usr/include/sys/errno.h (asm/errno.h).\n",errno);
73: errorMsg1s("cannot getsockname");
74: return(-1);
75: }
76:
1.7 takayama 77: if (listen(s_waiting,MAX_LISTEN_QUEUE) < 0) {
1.1 maekawa 78: errorMsg1s("Listen failed");
79: return(-1);
80: }
81: fprintf(TcpioError,"Done the initialization. port =%d\n",ntohs(me.sin_port));
82: OpenedSocket = ntohs(me.sin_port);
83: return(s_waiting);
84: }
85:
86:
87: socketAccept(int snum) {
88: int s, news;
89:
1.3 takayama 90: SET_TCPIOERROR;
1.1 maekawa 91: s = snum;
92: fprintf(TcpioError,"Trying to accept... "); fflush(TcpioError);
93: if ((news = accept(s,NULL,NULL)) < 0) {
94: errorMsg1s("Error in accept.");
95: return(-1);
96: }
97: fprintf(TcpioError,"Accepted.\n"); fflush(TcpioError);
98: if (close(s) < 0) {
99: errorMsg1s("Error in closing the old socket.");
100: return(-1);
101: }
102: return(news);
103: }
104:
105: socketAcceptLocal(int snum) {
106: int s, news;
107: struct sockaddr peer;
108: int len;
109: int i;
1.3 takayama 110:
111: SET_TCPIOERROR;
1.1 maekawa 112: s = snum;
113: fprintf(TcpioError,"Trying to accept from localhost... "); fflush(TcpioError);
114: len = sizeof(struct sockaddr);
115: if ((news = accept(s,&peer,&len)) < 0) {
1.10 takayama 116: errorMsg1s("Error in accept. Retrying");
1.11 ! takayama 117: /* Code added for strange behavior on cygwin. */
! 118: if ((news = accept(s,&peer,&len)) < 0) {
! 119: errorMsg1s("Error in accept. Retrying");
! 120: return (-1);
! 121: }
1.1 maekawa 122: }
123:
124: len = sizeof(struct sockaddr);
125: getpeername(news,&peer,&len);
126: printf("len= %d\n",len);
127: for (i=0; i<len; i++) {
128: printf(" %x ",peer.sa_data[i]);
129: }
130: printf("\n");
131: if (peer.sa_data[2] == 0x7f && peer.sa_data[3] == 0 &&
132: peer.sa_data[4] == 0 && peer.sa_data[5] == 1) {
1.4 takayama 133: fprintf(stderr,"Authentication: localhost is allowed to be accepted.\n");
1.1 maekawa 134: }else{
1.4 takayama 135: errorMsg1s("Authentication: The connection is not from the localhost.");
1.1 maekawa 136: close(s);
137: fprintf(stderr,"The connection is refused.");
138: return(-1);
139: }
140:
141: fprintf(TcpioError,"Accepted.\n"); fflush(TcpioError);
142: if (close(s) < 0) {
143: errorMsg1s("Error in closing the old socket.");
144: return(-1);
145: }
1.8 takayama 146: return(news);
147: }
148:
149: /* It does not close the socket for listening. */
150: socketAcceptLocal2(int snum) {
151: int s, news;
152: struct sockaddr peer;
153: int len;
154: int i;
155:
156: SET_TCPIOERROR;
157: s = snum;
158: fprintf(TcpioError,"Trying to accept from localhost... "); fflush(TcpioError);
159: len = sizeof(struct sockaddr);
160: if ((news = accept(s,&peer,&len)) < 0) {
161: errorMsg1s("Error in accept.");
162: return(-1);
163: }
164:
165: len = sizeof(struct sockaddr);
166: getpeername(news,&peer,&len);
167: printf("len= %d\n",len);
168: for (i=0; i<len; i++) {
169: printf(" %x ",peer.sa_data[i]);
170: }
171: printf("\n");
172: if (peer.sa_data[2] == 0x7f && peer.sa_data[3] == 0 &&
173: peer.sa_data[4] == 0 && peer.sa_data[5] == 1) {
174: fprintf(stderr,"Authentication: localhost is allowed to be accepted.\n");
175: }else{
176: errorMsg1s("Authentication: The connection is not from the localhost.");
177: fprintf(stderr,"The connection is refused.");
178: return(-1);
179: }
180:
181: fprintf(TcpioError,"Accepted.\n"); fflush(TcpioError);
1.1 maekawa 182: return(news);
183: }
184:
185: int oxSocketSelect0(int fd,int t) {
186: fd_set readfds;
187: struct timeval timeout;
188: int debug = 0;
189: extern int errno;
1.3 takayama 190: SET_TCPIOERROR;
1.1 maekawa 191: FD_ZERO(&readfds);
192: FD_SET(fd,&readfds);
193: timeout.tv_sec = 0;
194: timeout.tv_usec = (long) t;
195: if (t >= 0) {
196: if (debug) {printf("select t>=0 for fd = %d\n",fd); fflush(NULL);}
197: if (select(fd+1,&readfds,(fd_set *)NULL,(fd_set *)NULL,&timeout)<0) {
198: /* It must be fd+1 !, Not fd. */
199: fprintf(TcpioError,"select (non-block) error. Error no is %d. See /usr/include/sys/errno.h (asm/errno.h).\n",errno);
200: errorMsg1s("oxSocketSelect0() : select failed.");
201: return(0);
202: }
203: if(debug){printf("Return from select t>=0 for fd = %d\n",fd);fflush(NULL);}
204: }else{ /* block */
205: if (select(fd+1,&readfds,(fd_set *)NULL,(fd_set *)NULL,(struct timeval *)NULL)<0) {
206: fprintf(TcpioError,"select (block) error. Error no is %d. See /usr/include/sys/errno.h (asm/errno.h).\n",errno);
207: errorMsg1s("socketSelect0() : select failed.");
208: return(0);
209: }
210: }
211: if (FD_ISSET(fd,&readfds)) return(1);
212: else return(0);
213: }
214:
215: oxSocketMultiSelect(int sid[],int size,int t,int result[])
216: {
217: int i,fd,p;
218: fd_set readfds;
219: struct timeval timeout;
220: int isdata = 0;
221: extern errno;
222:
1.3 takayama 223: SET_TCPIOERROR;
1.1 maekawa 224: FD_ZERO(&readfds);
225: timeout.tv_sec = 0;
226: timeout.tv_usec = (long)t;
227:
228: fd = 0;
229:
230: for (i=0; i<size; i++) {
231: if (sid[i] >= 0) {
232: p = sid[i];
233: if (p > fd) fd = p;
234: FD_SET(p,&readfds);
235: /* printf("p = %d, fd=%d",p,fd); */
236: }
237: }
238:
239: /* printf("MultiSelect..\n"); fflush(NULL); */
240: if (t >= 0) {
241: if (select(fd+1,&readfds,(fd_set *)NULL,(fd_set *)NULL,&timeout)<0) {
242: /* It must be fd+1 !, Not fd. */
243: fprintf(TcpioError,"Select error. Error no is %d. See /usr/include/sys/errno.h (asm/errno.h).\n",errno);
244: errorMsg1s("oxSocketMultiSelect() : select failed.");
245: return(0);
246: }
247: }else{ /* block */
248: if (select(fd+1,&readfds,(fd_set *)NULL,(fd_set *)NULL,(struct timeval *)NULL)<0) {
249: fprintf(TcpioError,"Select error. Error no is %d. See /usr/include/sys/errno.h (asm/errno.h).\n",errno);
250: errorMsg1s("oxSocketMultiSelect() : (block) select failed.");
251: return(0);
252: }
253: }
254: /* printf("Done. MultiSelect.\n"); fflush(NULL); */
255: for (i=0; i<size; i++) {
256: p = sid[i];
257: if ((sid[i] >=0) && FD_ISSET(p,&readfds)) {
258: result[i] = 1; isdata = 1;
259: }else{
260: result[i] = 0;
261: }
262: }
263: return(isdata);
264: }
265:
266:
267: socketConnect(char *serverName,int portNumber) {
268: struct hostent *servhost;
269: struct sockaddr_in server;
270: int socketid;
271: int on;
272:
1.3 takayama 273: SET_TCPIOERROR;
1.1 maekawa 274: if ((servhost = gethostbyname(serverName)) == NULL) {
275: errorMsg1s("bad server name.\n");
276: return(-1);
277: }
278: bzero((char *)&server,sizeof(server));
279: server.sin_family = AF_INET;
280: server.sin_port = htons(portNumber);
281: bcopy(servhost->h_addr,
1.5 takayama 282: (char *)&server.sin_addr,servhost->h_length);
1.1 maekawa 283:
284: if ((socketid = socket(AF_INET,SOCK_STREAM,0)) <0) {
285: errorMsg1s("socket allocation is failed.\n");
286: return(-1);
287: }
288: /* on=1; setsockopt(socketid,SOL_SOCKET,SO_REUSEADDR,&on,sizeof(on)); */
289: if (!Quiet) {
290: fprintf(TcpioError,"Trying to connect port %d, ip=%x\n",ntohs(server.sin_port),server.sin_addr);
291: }
292: if (connect(socketid,(struct sockaddr *)&server,sizeof(server)) == -1) {
293: errorMsg1s("cannot connect");
294: return(-1);
295: }
296: if (!Quiet) fprintf(TcpioError,"connected.\n");
297: return(socketid);
298: }
299:
300: socketConnectWithPass(char *servername,int port,char *pass)
301: {
302: int fd;
303: int m;
1.3 takayama 304: SET_TCPIOERROR;
1.1 maekawa 305: fd = socketConnect(servername,port);
1.9 takayama 306: if ((pass == NULL) && (fd >= 0)) return fd;
307: if ((pass == NULL) && (fd < 0)) return -1;
1.1 maekawa 308: if (fd >= 0) {
1.2 takayama 309: m = write(fd,pass,strlen(pass)+1);
310: if (m != strlen(pass)+1) {
1.1 maekawa 311: fprintf(TcpioError,"Fail to send password to fd=%d.\n",fd);
312: return(-1);
313: }
314: return(fd);
315: }else{
316: return(-1);
317: }
318: }
319:
FreeBSD-CVSweb <freebsd-cvsweb@FreeBSD.org>