sources/TCP_cunc_daytimed.c

   1 /* TCP_cunc_daytimed.c
   2  *
   3  * Copyright (C) 2001 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_cunc_daytimed.c
  22  * Elementary TCP cuncurrent server for daytime service (port 13)
  23  *
  24  * Author: Simone Piccardi
  25  * May. 2001
  26  *
  27  * Usage: daytimed -h give all info
  28  *
  29  ****************************************************************/
  30 /*
  31  * Include needed headers
  32  */
  33 #include <sys/types.h>   /* primitive system data types */
  34 #include <unistd.h>      /* unix standard library */
  35 #include <arpa/inet.h>   /* IP addresses conversion utilities */
  36 #include <sys/socket.h>  /* socket constants, types and functions */
  37 #include <stdio.h>       /* standard I/O library */
  38 #include <time.h>        /* date and time constants, types and functions */
  39
  40 #define MAXLINE 80
  41 #define BACKLOG 10
  42 /* Program begin */
  43 void usage(void);
  44 int main(int argc, char *argv[])
  45 {
  46 /*
  47  * Variables definition
  48  */
  49     int list_fd, conn_fd;
  50     int i;
  51     struct sockaddr_in serv_add, client;
  52     char buffer[MAXLINE];
  53     socklen_t len;
  54     time_t timeval;
  55     pid_t pid;
  56     int logging=0;
  57     /*
  58      * Input section: decode parameters passed in the calling
  59      * Use getopt function
  60      */
  61     opterr = 0;  /* don't want writing to stderr */
  62     while ( (i = getopt(argc, argv, "hv")) != -1) {
  63         switch (i) {
  64         /*
  65          * Handling options
  66          */
  67         case 'h':
  68             printf("Wrong -h option use\n");
  69             usage();
  70             return(0);
  71             break;
  72         case '?':   /* unrecognized options */
  73             printf("Unrecognized options -%c\n",optopt);
  74             usage();
  75             return(0);
  76             break;
  77         case 'v':
  78             logging = 1;
  79             break;
  80         default:    /* should not reached */
  81             usage();
  82             return(0);
  83         }
  84     }
  85     /* ***********************************************************
  86      *
  87      *           Options processing completed
  88      *
  89      *                Main code beginning
  90      *
  91      * ***********************************************************/
  92     /* create socket */
  93     if ( (list_fd = socket(AF_INET, SOCK_STREAM, 0)) < 0) {
  94         perror("Socket creation error");
  95         exit(-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(13);                  /* daytime port is 13 */
 101     serv_add.sin_addr.s_addr = htonl(INADDR_ANY);   /* connect from anywhere */
 102     /* bind socket */
 103     if (bind(list_fd, (struct sockaddr *)&serv_add, sizeof(serv_add)) < 0) {
 104         perror("bind error");
 105         exit(-1);
 106     }
 107     /* listen on socket */
 108     if (listen(list_fd, BACKLOG) < 0 ) {
 109         perror("listen error");
 110         exit(-1);
 111     }
 112     /* write daytime to client */
 113     while (1) {
 114         len = sizeof(client);
 115         if ( (conn_fd =
 116               accept(list_fd, (struct sockaddr *)&client, &len)) <0 ) {
 117             perror("accept error");
 118             exit(-1);
 119         }
 120         /* fork to handle connection */
 121         if ( (pid = fork()) < 0 ){
 122             perror("fork error");
 123             exit(-1);
 124         }
 125         if (pid == 0) {                 /* child */
 126             close(list_fd);
 127             timeval = time(NULL);
 128             snprintf(buffer, sizeof(buffer), "%.24s\r\n", ctime(&timeval));
 129             if ( (write(conn_fd, buffer, strlen(buffer))) < 0 ) {
 130                 perror("write error");
 131                 exit(-1);
 132             }
 133             if (logging) {
 134                 inet_ntop(AF_INET, &client.sin_addr, buffer, sizeof(buffer));
 135                 printf("Request from host %s, port %d\n", buffer,
 136                        ntohs(client.sin_port));
 137             }
 138             close(conn_fd);
 139             exit(0);
 140         } else {                        /* parent */
 141             close(conn_fd);
 142         }
 143     }
 144     /* normal exit, never reached */
 145     exit(0);
 146 }
 147 /*
 148  * routine to print usage info and exit
 149  */
 150 void usage(void) {
 151     printf("Simple daytime server\n");
 152     printf("Usage:\n");
 153     printf("  daytimed [-hv] \n");
 154     printf("  -h           print this help\n");
 155     printf("  -v           print request source on stdout\n");
 156     exit(1);
 157 }
 158