1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
|
#include <sys/socket.h>
#include <linux/types.h>
#include <sys/types.h>
#include <arpa/inet.h>
#include <unistd.h>
#include <string.h>
#include <stdlib.h>
#include <stdio.h>
#include <signal.h>
static int serve_new_conn(int sk)
{
int rd, wr;
char buf[1024];
printf("New connection\n");
while (1) {
rd = read(sk, buf, sizeof(buf));
if (!rd)
break;
if (rd < 0) {
perror("Can't read socket");
return 1;
}
wr = 0;
while (wr < rd) {
int w;
w = write(sk, buf + wr, rd - wr);
if (w <= 0) {
perror("Can't write socket");
return 1;
}
wr += w;
}
}
printf("Done\n");
return 0;
}
int main(int argc, char **argv)
{
int sk, port, ret;
struct sockaddr_in addr;
if (argc < 2) {
printf("Need port\n");
return -1;
}
/*
* Let kids die themselves
*/
signal(SIGCHLD, SIG_IGN);
sk = socket(PF_INET, SOCK_STREAM, IPPROTO_TCP);
if (sk < 0) {
perror("Can't create socket");
return -1;
}
port = atoi(argv[1]);
memset(&addr, 0, sizeof(addr));
addr.sin_family = AF_INET;
addr.sin_addr.s_addr = htonl(INADDR_ANY);
addr.sin_port = htons(port);
printf("Binding to port %d\n", port);
ret = bind(sk, (struct sockaddr *)&addr, sizeof(addr));
if (ret < 0) {
perror("Can't bind socket");
return -1;
}
ret = listen(sk, 16);
if (ret < 0) {
perror("Can't put sock to listen");
return -1;
}
printf("Waiting for connections\n");
while (1) {
int ask, pid;
ask = accept(sk, NULL, NULL);
if (ask < 0) {
perror("Can't accept new conn");
return -1;
}
pid = fork();
if (pid < 0) {
perror("Can't fork");
return -1;
}
if (pid > 0)
close(ask);
else {
close(sk);
ret = serve_new_conn(ask);
exit(ret);
}
}
}
|