sources/TCP_echod_first.c

   1 /* TCP_echod.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 echod
  22  * Elementary TCP server for echo service (port 7)
  23  *
  24  * Author: Simone Piccardi
  25  * Jun. 2001
  26  *
  27  * Usage: echod -h give all info
  28  *
  29  * $Id: TCP_echod_first.c,v 1.1 2003/05/06 14:05:12 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 <time.h>
  41 #include <syslog.h>      /* syslog system functions */
  42 #include <signal.h>      /* signal functions */
  43 #include "Gapil.h"
  44
  45 #define BACKLOG 10
  46 #define MAXLINE 256
  47 int demonize  = 1;  /* daemon use option */
  48 int debugging = 0;  /* debug info printing option */
  49 /* Subroutines declaration */
  50 void usage(void);
  51 void ServEcho(int sockfd);
  52 void PrintErr(char * error);
  53 /* Program beginning */
  54 int main(int argc, char *argv[])
  55 {
  56 /*
  57  * Variables definition
  58  */
  59     int list_fd, conn_fd;
  60     pid_t pid;
  61     struct sockaddr_in serv_add;
  62     /*
  63      * Input section: decode parameters passed in the calling
  64      * Use getopt function
  65      */
  66     int i;
  67     opterr = 0;  /* don't want writing to stderr */
  68     while ( (i = getopt(argc, argv, "hdi")) != -1) {
  69         switch (i) {
  70         /*
  71          * Handling options
  72          */
  73         case 'h':
  74             printf("Wrong -h option use\n");
  75             usage();
  76             return(0);
  77             break;
  78         case 'i':
  79             demonize = 0;
  80             break;
  81         case 'd':
  82             debugging = 1;
  83             break;
  84         case '?':   /* unrecognized options */
  85             printf("Unrecognized options -%c\n",optopt);
  86             usage();
  87         default:    /* should not reached */
  88             usage();
  89         }
  90     }
  91     /* ***********************************************************
  92      *
  93      *           Options processing completed
  94      *
  95      *                Main code beginning
  96      *
  97      * ***********************************************************/
  98     /* install SIGCHLD handler */
  99     Signal(SIGCHLD, HandSigCHLD);  /* establish handler */
 100     /* create socket */
 101     if ( (list_fd = socket(AF_INET, SOCK_STREAM, 0)) < 0) {
 102         perror("Socket creation error");
 103         exit(1);
 104     }
 105     /* initialize address */
 106     memset((void *)&serv_add, 0, sizeof(serv_add)); /* clear server address */
 107     serv_add.sin_family = AF_INET;                  /* address type is INET */
 108     serv_add.sin_port = htons(7);                   /* echo port is 7 */
 109     serv_add.sin_addr.s_addr = htonl(INADDR_ANY);   /* connect from anywhere */
 110     /* bind socket */
 111     if (bind(list_fd, (struct sockaddr *)&serv_add, sizeof(serv_add)) < 0) {
 112         perror("bind error");
 113         exit(1);
 114     }
 115     /* release privileges and go daemon */
 116     if (setgid(65534) !=0) { /* first give away group privileges */
 117         perror("cannot give away group privileges");
 118         exit(1);
 119     }
 120     if (setuid(65534) !=0) { /* and only after user ... */
 121         perror("cannot give away user privileges");
 122         exit(1);
 123     }
 124     if (demonize) {          /* go daemon */
 125         openlog(argv[0], 0, LOG_DAEMON); /* open logging */
 126         if (daemon(0, 0) != 0) {
 127             perror("cannot start as daemon");
 128             exit(1);
 129         }
 130     }
 131     /* main body */
 132     if (listen(list_fd, BACKLOG) < 0 ) {
 133         PrintErr("listen error");
 134         exit(1);
 135     }
 136     /* handle echo to client */
 137     while (1) {
 138         /* accept connection */
 139         if ( (conn_fd = accept(list_fd, NULL, NULL)) < 0) {
 140             PrintErr("accept error");
 141             exit(1);
 142         }
 143         /* fork to handle connection */
 144         if ( (pid = fork()) < 0 ){
 145             PrintErr("fork error");
 146             exit(1);
 147         }
 148         if (pid == 0) {      /* child */
 149             close(list_fd);          /* close listening socket */
 150             ServEcho(conn_fd);       /* handle echo */
 151             exit(0);
 152         } else {             /* parent */
 153             close(conn_fd);          /* close connected socket */
 154         }
 155     }
 156     /* normal exit, never reached */
 157     exit(0);
 158 }
 159 /*
 160  * routine to print usage info and exit
 161  */
 162 void usage(void) {
 163     printf("Elementary echo server\n");
 164     printf("Usage:\n");
 165     printf("  echod [-h] \n");
 166     printf("  -h           print this help\n");
 167     printf("  -d           print debug info\n");
 168     printf("  -i           use interactively\n");
 169     exit(1);
 170 }
 171 /*
 172  * routine to handle echo for connection
 173  */
 174 void ServEcho(int sockfd) {
 175     char buffer[MAXLINE];
 176     int nread, nwrite;
 177     char debug[MAXLINE+20];
 178     int size;
 179     /* main loop, reading 0 char means client close connection */
 180     while ( (nread = read(sockfd, buffer, MAXLINE)) != 0) {
 181         nwrite = FullWrite(sockfd, buffer, nread);
 182         if (debugging) {
 183             buffer[nread] = 0;
 184             snprintf(debug, MAXLINE+20, "Letti %d byte, %s", nread, buffer);
 185             if (demonize) {          /* go daemon */
 186                 syslog(LOG_DEBUG, debug);
 187             } else {
 188                 printf("%s", debug);
 189             }
 190         }
 191     }
 192     return;
 193 }
 194 /*
 195  * routine to print error on stout or syslog
 196  */
 197 void PrintErr(char * error) {
 198     if (demonize) {          /* go daemon */
 199         syslog(LOG_ERR, error);
 200     } else {
 201         perror(error);
 202     }
 203     return;
 204 }