sources/TCP_echo.c

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