ee2fa94708b63fce9f8d96274bef76178e008f8b
[gapil.git] / sources / TCP_echo_third.c
1 /* TCP_echo_third.c
2  * 
3  * Copyright (C) 2001-2003 Simone Piccardi
4  * 
5  * This program is free software; you can redistribute it and/or modify
6  * it under the terms of the GNU General Public License as published by
7  * the Free Software Foundation; either version 2 of the License, or (at
8  * your option) any later version.
9  * 
10  * This program is distributed in the hope that it will be useful, but
11  * WITHOUT ANY WARRANTY; without even the implied warranty of
12  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
13  * General Public License for more details.
14  * 
15  * You should have received a copy of the GNU General Public License
16  * along with this program; if not, write to the Free Software
17  * Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
18  */
19 /****************************************************************
20  *
21  * Program TCP_echo_third.c
22  * Simple TCP client for echo service (port 7)
23  * This version use select
24  *
25  * Author: Simone Piccardi
26  * Jun. 2001
27  *
28  * Usage: echo -h give all info's
29  *
30  * $Id$
31  *
32  ****************************************************************/
33 /* 
34  * Include needed headers
35  */
36 #include <sys/types.h>   /* predefined types */
37 #include <unistd.h>      /* include unix standard library */
38 #include <arpa/inet.h>   /* IP addresses conversion utiliites */
39 #include <sys/socket.h>  /* socket library */
40 #include <stdio.h>       /* include standard I/O library */
41 #include <errno.h>       /* include error codes */
42 #include <string.h>      /* include erroro strings definitions */
43
44 #include "macros.h"
45
46 #define MAXLINE 256
47 void usage(void);
48 void ClientEcho(FILE * filein, int socket);
49 void SigTERM_hand(int sig);
50
51 /* Program begin */
52 int main(int argc, char *argv[])
53 {
54 /* 
55  * Variables definition  
56  */
57     int sock, i;
58     int reset = 0;
59     struct sockaddr_in serv_add;
60     struct linger ling;
61     /*
62      * Input section: decode parameters passed in the calling 
63      * Use getopt function
64      */
65     opterr = 0;  /* don't want writing to stderr */
66     while ( (i = getopt(argc, argv, "hr")) != -1) {
67         switch (i) {
68         /* 
69          * Handling options 
70          */ 
71         case 'h':  
72             printf("Wrong -h option use\n");
73             usage();
74             return(1);
75             break;
76         case 'r':
77             reset = 1;
78             break;
79         case '?':   /* unrecognized options */
80             printf("Unrecognized options -%c\n",optopt);
81             usage();
82         default:    /* should not reached */
83             usage();
84         }
85     }
86     /* ***********************************************************
87      * 
88      *           Options processing completed
89      *
90      *                Main code beginning
91      * 
92      * ***********************************************************/
93     /* create socket */
94     if ( (sock = socket(AF_INET, SOCK_STREAM, 0)) < 0) {
95         perror("Socket creation error");
96         return 1;
97     }
98     /* initialize address */
99     memset((void *) &serv_add, 0, sizeof(serv_add)); /* clear server address */
100     serv_add.sin_family = AF_INET;                   /* address type is INET */
101     serv_add.sin_port = htons(7);                    /* echo port is 7 */
102     /* build address using inet_pton */
103     if ( (inet_pton(AF_INET, argv[optind], &serv_add.sin_addr)) <= 0) {
104         perror("Address creation error");
105         return 1;
106     }
107     /* extablish connection */
108     if (connect(sock, (struct sockaddr *)&serv_add, sizeof(serv_add)) < 0) {
109         perror("Connection error");
110         return 1;
111     }
112     /* check if resetting on close is required */
113     if (reset) {
114         printf("Setting reset on close \n");
115         ling.l_onoff = 1;
116         ling.l_linger = 0;      
117         if (setsockopt(sock, SOL_SOCKET, SO_LINGER, &ling, sizeof(ling))) {
118             perror("Cannot set linger");
119             exit(1);
120         }
121     }
122     /* do read/write operations */
123     ClientEcho(stdin, sock);
124     /* normal exit */
125     return 0;
126 }
127 /*
128  * routine to print usage info and exit 
129  */
130 void usage(void) {
131     printf("Take daytime from a remote host \n");
132     printf("Usage:\n");
133     printf("  daytime [-h] [-v] [host in dotted decimal form] \n");
134 //    printf("  -v         set verbosity on\n");
135     printf("  -r           require reset on closing\n");
136     printf("  -h           print this help\n");
137     exit(1);
138 }
139
140 void ClientEcho(FILE * filein, int socket) 
141 {
142     char sendbuff[MAXLINE+1], recvbuff[MAXLINE+1];
143     int nread, nwrite; 
144     int maxfd;
145     fd_set fset;
146     /* initialize file descriptor set */
147     FD_ZERO(&fset);
148     maxfd = max(fileno(filein), socket) + 1;
149     while (1) {
150         FD_SET(socket, &fset);         /* set for the socket */
151         FD_SET(fileno(filein), &fset); /* set for the standard input */
152         select(maxfd, &fset, NULL, NULL, NULL); /* wait for read ready */
153         if (FD_ISSET(fileno(filein), &fset)) {  /* if ready on stdin */
154             if (fgets(sendbuff, MAXLINE, filein) == NULL) { /* if no input */
155                 return;                /* we stopped client */
156             } else {                   /* else we have to write to socket */
157                 nwrite = FullWrite(socket, sendbuff, strlen(sendbuff)); 
158                 if (nwrite < 0) {      /* on error stop */
159                     printf("Errore in scrittura: %s", strerror(errno));
160                     return;
161                 }
162             }
163         }
164         if (FD_ISSET(socket, &fset)) { /* if ready on socket */ 
165             nread = read(socket, recvbuff, strlen(sendbuff)); /* do read */
166             if (nread < 0) {  /* error condition, stop client */
167                 printf("Errore in lettura: %s\n", strerror(errno));
168                 return;
169             }
170             if (nread == 0) { /* server closed connection, stop */
171                 printf("EOF sul socket\n");
172                 return;
173             }
174             recvbuff[nread] = 0;   /* else read is ok, write on stdout */
175             if (fputs(recvbuff, stdout) == EOF) {
176                 perror("Errore in scrittura su terminale");
177                 return;
178             }
179         }
180     }
181 }