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