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 #include <stdlib.h>
  43 #include <netinet/tcp.h>
  44
  45 /* still not defined in some include, because too new ... */
  46 #ifndef TCP_CONGESTION
  47 #define TCP_CONGESTION  13
  48 #endif
  49
  50
  51
  52 #include "Gapil.h"
  53 #include "macros.h"
  54
  55 #define MAXLINE 256
  56 void usage(void);
  57 void ClientEcho(FILE * filein, int socket);
  58 void SigTERM_hand(int sig);
  59
  60 /* Program begin */
  61 int main(int argc, char *argv[])
  62 {
  63 /*
  64  * Variables definition
  65  */
  66     int sock, i;
  67     socklen_t len;
  68     int reset = 0;
  69     int verbosity = 0;
  70     char buffer[MAXLINE];
  71     struct linger ling;
  72     /*
  73      * Input section: decode parameters passed in the calling
  74      * Use getopt function
  75      */
  76     opterr = 0;  /* don't want writing to stderr */
  77     while ( (i = getopt(argc, argv, "hrv")) != -1) {
  78         switch (i) {
  79         /*
  80          * Handling options
  81          */
  82         case 'h':
  83             printf("Wrong -h option use\n");
  84             usage();
  85             return(1);
  86             break;
  87         case 'v':
  88             verbosity = 1;
  89             break;
  90         case 'r':
  91             reset = 1;
  92             break;
  93         case '?':   /* unrecognized options */
  94             printf("Unrecognized options -%c\n",optopt);
  95             usage();
  96         default:    /* should not reached */
  97             usage();
  98         }
  99     }
 100     /* ***********************************************************
 101      *
 102      *           Options processing completed
 103      *
 104      *                Main code beginning
 105      *
 106      * ***********************************************************/
 107     /* call sockconn to get a connected socket */
 108     if ( (sock = sockconn(argv[optind], "echo", 6, SOCK_STREAM)) < 0) {
 109         if (errno) perror("Socket creation error");
 110         return 1;
 111     }
 112     /* print some info about the socket, used to test some TCP_* options */
 113     if (verbosity) {
 114         len = sizeof(buffer);
 115         if (getsockopt(sock, SOL_TCP, TCP_CONGESTION, buffer, &len) < 0) {
 116             perror("Cannot read congestion algorithm");
 117         } else {
 118             buffer[len]=0;
 119             printf("Congestion algorithm %s\n", buffer);
 120         }
 121     }
 122     /* check if resetting on close is required */
 123     if (reset) {
 124         printf("Setting reset on close \n");
 125         ling.l_onoff = 1;
 126         ling.l_linger = 0;
 127         if (setsockopt(sock, SOL_SOCKET, SO_LINGER, &ling, sizeof(ling))) {
 128             perror("Cannot set linger");
 129             exit(1);
 130         }
 131     }
 132     /* do read/write operations */
 133     ClientEcho(stdin, sock);
 134     /* normal exit */
 135     return 0;
 136 }
 137 /*
 138  * routine to print usage info and exit
 139  */
 140 void usage(void) {
 141     printf("Take daytime from a remote host \n");
 142     printf("Usage:\n");
 143     printf("  daytime [-h] [-v] [host in dotted decimal form] \n");
 144 //    printf("  -v         set verbosity on\n");
 145     printf("  -r           require reset on closing\n");
 146     printf("  -h           print this help\n");
 147     exit(1);
 148 }
 149
 150 void ClientEcho(FILE * filein, int socket)
 151 {
 152     char sendbuff[MAXLINE+1], recvbuff[MAXLINE+1];
 153     int nread, nwrite;
 154     int maxfd;
 155     fd_set fset;
 156     int eof = 0;
 157     /* initialize file descriptor set */
 158     FD_ZERO(&fset);
 159     maxfd = max(fileno(filein), socket) + 1;
 160     while (1) {
 161         FD_SET(socket, &fset);         /* set for the socket */
 162         if (eof == 0) {
 163             FD_SET(fileno(filein), &fset); /* set for the standard input */
 164         }
 165         select(maxfd, &fset, NULL, NULL, NULL); /* wait for read ready */
 166         if (FD_ISSET(fileno(filein), &fset)) {  /* if ready on stdin */
 167             if (fgets(sendbuff, MAXLINE, filein) == NULL) { /* if no input */
 168                 eof = 1;               /* EOF on input */
 169                 shutdown(socket, SHUT_WR);      /* close write half */
 170                 FD_CLR(fileno(filein), &fset);  /* no more interest on stdin */
 171             } else {                   /* else we have to write to socket */
 172                 nwrite = FullWrite(socket, sendbuff, strlen(sendbuff));
 173                 if (nwrite < 0) {      /* on error stop */
 174                     printf("Errore in scrittura: %s", strerror(errno));
 175                     return;
 176                 }
 177             }
 178         }
 179         if (FD_ISSET(socket, &fset)) { /* if ready on socket */
 180             nread = read(socket, recvbuff, strlen(sendbuff)); /* do read */
 181             if (nread < 0) {  /* error condition, stop client */
 182                 printf("Errore in lettura: %s\n", strerror(errno));
 183                 return;
 184             }
 185             if (nread == 0) { /* server closed connection, stop */
 186                 if (eof == 1) {
 187                     return;
 188                 } else {
 189                     printf("EOF prematuro sul socket\n");
 190                     return;
 191                 }
 192             }
 193             recvbuff[nread] = 0;   /* else read is ok, write on stdout */
 194             if (fputs(recvbuff, stdout) == EOF) {
 195                 perror("Errore in scrittura su terminale");
 196                 return;
 197             }
 198         }
 199     }
 200 }