sources/TCP_countd.c

   1 /* TCP_countd.c
   2  *
   3  * Copyright (C) 2007 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 countd: Elementary TCP server for teaching purpose, count
  22  * number of request to the server itself, use POSIX semaphores and
  23  * shared memory
  24  *
  25  * Author: Simone Piccardi
  26  * Feb. 2007
  27  *
  28  * Usage: countd -h give all info
  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 <time.h>        /* date and time constants, types and functions */
  40 #include <sys/mman.h>
  41 #include <semaphore.h>
  42 #include <syslog.h>      /* syslog system functions */
  43 #include <signal.h>      /* signal constants, types and functions */
  44 #include <errno.h>       /* error definitions and routines */
  45 #include <string.h>      /* C strings library */
  46 #include <stdlib.h>      /* C standard library */
  47
  48 #include "Gapil.h"
  49
  50 #define BACKLOG 10
  51 #define MAXLINE 256
  52 int demonize  = 1;  /* daemon use option: default is daemon */
  53 int debugging = 0;  /* debug info printing option: default is no debug */
  54 /* Subroutines declaration */
  55 void usage(void);
  56 void ServEcho(int sockfd);
  57 void PrintErr(char * error);
  58 /* Program beginning */
  59 int main(int argc, char *argv[])
  60 {
  61 /*
  62  * Variables definition
  63  */
  64     int list_fd, conn_fd;
  65     int reuse = 0;
  66     int compat = 0;
  67     pid_t pid;
  68     struct sockaddr_in cli_add;
  69     socklen_t len;
  70     char debug[MAXLINE], ipaddr[20];
  71     /*
  72      * Input section: decode parameters passed in the calling
  73      * Use getopt function
  74      */
  75     int i;
  76     opterr = 0;  /* don't want writing to stderr */
  77     while ( (i = getopt(argc, argv, "hrdic")) != -1) {
  78         switch (i) {
  79         /*
  80          * Handling options
  81          */
  82         case 'h':
  83             printf("Wrong -h option use\n");
  84             usage();
  85             return(0);
  86             break;
  87         case 'i':
  88             demonize = 0;
  89             break;
  90         case 'r':
  91             reuse = 1;
  92             break;
  93         case 'c':
  94             compat = 1;
  95             break;
  96         case 'd':
  97             debugging = 1;
  98             break;
  99         case '?':   /* unrecognized options */
 100             printf("Unrecognized options -%c\n",optopt);
 101             usage();
 102         default:    /* should not reached */
 103             usage();
 104         }
 105     }
 106     /* ***********************************************************
 107      *
 108      *           Options processing completed
 109      *
 110      *                Main code beginning
 111      *
 112      * ***********************************************************/
 113     /* Main code begin here */
 114     if (compat) {                             /* install signal handler */
 115         Signal(SIGCHLD, HandSigCHLD);         /* non restarting handler */
 116     } else {
 117         SignalRestart(SIGCHLD, HandSigCHLD);  /* restarting handler */
 118     }
 119     /* create and bind socket */
 120     if ( (list_fd = sockbindopt(argv[optind], "1234", 6,
 121                                 SOCK_STREAM, reuse)) < 0) {
 122         return 1;
 123     }
 124     /* release privileges and go daemon */
 125     if (setgid(65534) !=0) { /* first give away group privileges */
 126         perror("cannot give away group privileges");
 127         exit(1);
 128     }
 129     if (setuid(65534) !=0) { /* and only after user ... */
 130         perror("cannot give away user privileges");
 131         exit(1);
 132     }
 133     if (demonize) {          /* go daemon */
 134         openlog(argv[0], 0, LOG_DAEMON); /* open logging */
 135         if (daemon(0, 0) != 0) {
 136             perror("cannot start as daemon");
 137             exit(1);
 138         }
 139     }
 140     /* main body */
 141     if (listen(list_fd, BACKLOG) < 0 ) {
 142         PrintErr("listen error");
 143         exit(1);
 144     }
 145     /* handle echo to client */
 146     while (1) {
 147         /* accept connection */
 148         len = sizeof(cli_add);
 149         while (((conn_fd = accept(list_fd, (struct sockaddr *)&cli_add, &len))
 150                 < 0) && (errno == EINTR));
 151         if (conn_fd < 0) {
 152             PrintErr("accept error");
 153             exit(1);
 154         }
 155         if (debugging) {
 156             inet_ntop(AF_INET, &cli_add.sin_addr, ipaddr, sizeof(ipaddr));
 157             snprintf(debug, MAXLINE, "Accepted connection form %s\n", ipaddr);
 158             if (demonize) {
 159                 syslog(LOG_DEBUG, debug);
 160             } else {
 161                 printf("%s", debug);
 162             }
 163         }
 164         /* fork to handle connection */
 165         if ( (pid = fork()) < 0 ){
 166             PrintErr("fork error");
 167             exit(1);
 168         }
 169         if (pid == 0) {      /* child */
 170             close(list_fd);          /* close listening socket */
 171             if (debugging) {
 172                 snprintf(debug, MAXLINE, "Closed connection %s\n", ipaddr);
 173                 if (demonize) {
 174                     syslog(LOG_DEBUG, debug);
 175                 } else {
 176                     printf("%s", debug);
 177                 }
 178             }
 179             exit(0);
 180         } else {             /* parent */
 181             close(conn_fd);          /* close connected socket */
 182         }
 183     }
 184     /* normal exit, never reached */
 185     exit(0);
 186 }
 187 /*
 188  * routine to print usage info and exit
 189  */
 190 void usage(void) {
 191     printf("Elementary connection counter server\n");
 192     printf("Usage:\n");
 193     printf("  countd [-h] \n");
 194     printf("  -h           print this help\n");
 195     printf("  -d           write debug info\n");
 196     printf("  -r           enable SO_REUSEADDR\n");
 197     printf("  -i           use interactively\n");
 198     printf("  -c           disable BSD semantics\n");
 199     printf("  -w N         wait N sec. before calling accept\n");
 200     exit(1);
 201 }
 202 /*
 203  * routine to print error on stout or syslog
 204  */
 205 void PrintErr(char * error) {
 206     if (demonize) {                       /* daemon mode */
 207         syslog(LOG_ERR, "%s: %m", error); /* log string and error message */
 208     } else {
 209         perror(error);
 210     }
 211     return;
 212 }
 213