Merge branch 'master' of ssh://gapil.gnulinux.it/srv/git/gapil
[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  ****************************************************************/
31 /* 
32  * Include needed headers
33  */
34 #include <sys/types.h>   /* primitive system data types */
35 #include <unistd.h>      /* unix standard library */
36 #include <arpa/inet.h>   /* IP addresses conversion utilities */
37 #include <sys/socket.h>  /* socket constants, types and functions */
38 #include <stdio.h>       /* standard I/O library */
39 #include <errno.h>       /* error definitions and routines */
40 #include <string.h>      /* C strings library */
41 #include <stdlib.h>      /* C standard library */
42
43 #include "Gapil.h"
44 #include "macros.h"
45
46
47 #define MAXLINE 256
48 void usage(void);
49 void ClientEcho(FILE * filein, int socket);
50 void SigTERM_hand(int sig);
51
52 /* Program begin */
53 int main(int argc, char *argv[])
54 {
55 /* 
56  * Variables definition  
57  */
58     int sock, i;
59     int reset = 0;
60     struct sockaddr_in serv_add;
61     struct linger ling;
62     /*
63      * Input section: decode parameters passed in the calling 
64      * Use getopt function
65      */
66     opterr = 0;  /* don't want writing to stderr */
67     while ( (i = getopt(argc, argv, "hr")) != -1) {
68         switch (i) {
69         /* 
70          * Handling options 
71          */ 
72         case 'h':  
73             printf("Wrong -h option use\n");
74             usage();
75             return(1);
76             break;
77         case 'r':
78             reset = 1;
79             break;
80         case '?':   /* unrecognized options */
81             printf("Unrecognized options -%c\n",optopt);
82             usage();
83         default:    /* should not reached */
84             usage();
85         }
86     }
87     /* ***********************************************************
88      * 
89      *           Options processing completed
90      *
91      *                Main code beginning
92      * 
93      * ***********************************************************/
94     /* create socket */
95     if ( (sock = socket(AF_INET, SOCK_STREAM, 0)) < 0) {
96         perror("Socket creation error");
97         return 1;
98     }
99     /* initialize address */
100     memset((void *) &serv_add, 0, sizeof(serv_add)); /* clear server address */
101     serv_add.sin_family = AF_INET;                   /* address type is INET */
102     serv_add.sin_port = htons(7);                    /* echo port is 7 */
103     /* build address using inet_pton */
104     if ( (inet_pton(AF_INET, argv[optind], &serv_add.sin_addr)) <= 0) {
105         perror("Address creation error");
106         return 1;
107     }
108     /* extablish connection */
109     if (connect(sock, (struct sockaddr *)&serv_add, sizeof(serv_add)) < 0) {
110         perror("Connection error");
111         return 1;
112     }
113     /* check if resetting on close is required */
114     if (reset) {
115         printf("Setting reset on close \n");
116         ling.l_onoff = 1;
117         ling.l_linger = 0;      
118         if (setsockopt(sock, SOL_SOCKET, SO_LINGER, &ling, sizeof(ling))) {
119             perror("Cannot set linger");
120             exit(1);
121         }
122     }
123     /* do read/write operations */
124     ClientEcho(stdin, sock);
125     /* normal exit */
126     return 0;
127 }
128 /*
129  * routine to print usage info and exit 
130  */
131 void usage(void) {
132     printf("Take daytime from a remote host \n");
133     printf("Usage:\n");
134     printf("  daytime [-h] [-v] [host in dotted decimal form] \n");
135 //    printf("  -v         set verbosity on\n");
136     printf("  -r           require reset on closing\n");
137     printf("  -h           print this help\n");
138     exit(1);
139 }
140
141 void ClientEcho(FILE * filein, int socket) 
142 {
143     char sendbuff[MAXLINE+1], recvbuff[MAXLINE+1];
144     int nread, nwrite; 
145     int maxfd;
146     fd_set fset;
147     /* initialize file descriptor set */
148     FD_ZERO(&fset);
149     maxfd = max(fileno(filein), socket) + 1;
150     while (1) {
151         FD_SET(socket, &fset);         /* set for the socket */
152         FD_SET(fileno(filein), &fset); /* set for the standard input */
153         select(maxfd, &fset, NULL, NULL, NULL); /* wait for read ready */
154         if (FD_ISSET(fileno(filein), &fset)) {  /* if ready on stdin */
155             if (fgets(sendbuff, MAXLINE, filein) == NULL) { /* if no input */
156                 return;                /* we stopped client */
157             } else {                   /* else we have to write to socket */
158                 nwrite = FullWrite(socket, sendbuff, strlen(sendbuff)); 
159                 if (nwrite < 0) {      /* on error stop */
160                     printf("Errore in scrittura: %s", strerror(errno));
161                     return;
162                 }
163             }
164         }
165         if (FD_ISSET(socket, &fset)) { /* if ready on socket */ 
166             nread = read(socket, recvbuff, strlen(sendbuff)); /* do read */
167             if (nread < 0) {  /* error condition, stop client */
168                 printf("Errore in lettura: %s\n", strerror(errno));
169                 return;
170             }
171             if (nread == 0) { /* server closed connection, stop */
172                 printf("EOF sul socket\n");
173                 return;
174             }
175             recvbuff[nread] = 0;   /* else read is ok, write on stdout */
176             if (fputs(recvbuff, stdout) == EOF) {
177                 perror("Errore in scrittura su terminale");
178                 return;
179             }
180         }
181     }
182 }