lbbs/src/net_server.c

/***************************************************************************
                                                  net_server.c  -  description
                                                         -------------------
        Copyright            : (C) 2004-2025 by Leaflet
        Email                : leaflet@leafok.com
 ***************************************************************************/

/***************************************************************************
 *                                                                         *
 *   This program is free software; you can redistribute it and/or modify  *
 *   it under the terms of the GNU General Public License as published by  *
 *   the Free Software Foundation; either version 3 of the License, or     *
 *   (at your option) any later version.                                   *
 *                                                                         *
 ***************************************************************************/

#define _XOPEN_SOURCE 500
#define _POSIX_C_SOURCE 200809L
#define _GNU_SOURCE

#include "net_server.h"
#include "common.h"
#include "log.h"
#include "io.h"
#include "fork.h"
#include "menu.h"
#include <errno.h>
#include <fcntl.h>
#include <string.h>
#include <signal.h>
#include <stdlib.h>
#include <unistd.h>
#include <sys/syscall.h>
#include <sys/socket.h>
#include <sys/wait.h>
#include <arpa/inet.h>

int net_server(const char *hostaddr, in_port_t port)
{
        unsigned int namelen;
        int ret;
        int flags;
        struct sockaddr_in sin;
        fd_set testfds;
        struct timeval timeout;
        sigset_t nsigset;
        sigset_t osigset;
        siginfo_t siginfo;

        socket_server = socket(AF_INET, SOCK_STREAM, IPPROTO_TCP);

        if (socket_server < 0)
        {
                log_error("Create socket failed\n");
                exit(1);
        }

        sin.sin_family = AF_INET;
        sin.sin_addr.s_addr =
                (strnlen(hostaddr, sizeof(hostaddr)) > 0 ? inet_addr(hostaddr) : INADDR_ANY);
        sin.sin_port = htons(port);

        if (bind(socket_server, (struct sockaddr *)&sin, sizeof(sin)) < 0)
        {
                log_error("Bind address %s:%u failed\n",
                                  inet_ntoa(sin.sin_addr), ntohs(sin.sin_port));
                exit(2);
        }

        if (listen(socket_server, 10) < 0)
        {
                log_error("Socket listen failed\n");
                exit(3);
        }

        strncpy(hostaddr_server, inet_ntoa(sin.sin_addr), sizeof(hostaddr_server) - 1);
        hostaddr_server[sizeof(hostaddr_server) - 1] = '\0';

        port_server = ntohs(sin.sin_port);
        namelen = sizeof(sin);

        log_std("Listening at %s:%d\n", hostaddr_server, port_server);

        sigemptyset(&nsigset);
        sigaddset(&nsigset, SIGHUP);
        sigaddset(&nsigset, SIGCHLD);
        sigaddset(&nsigset, SIGTERM);

        while (!SYS_server_exit || SYS_child_process_count > 0)
        {
                sigprocmask(SIG_BLOCK, &nsigset, &osigset);

                while (SYS_child_exit_count > 0)
                {
                        siginfo.si_pid = 0;
                        ret = waitid(P_ALL, 0, &siginfo, WEXITED | WNOHANG);
                        if (ret == 0 && siginfo.si_pid > 0)
                        {
                                SYS_child_exit_count--;
                                SYS_child_process_count--;
                                log_std("Child process (%d) exited\n", siginfo.si_pid);
                        }
                        else if (ret == 0)
                        {
                                break;
                        }
                        else if (ret < 0)
                        {
                                log_error("Error in waitid: %d\n", errno);
                                break;
                        }
                }

                if (SYS_server_exit && SYS_child_exit_count == 0)
                {
                        if (kill(0, SIGTERM) < 0)
                        {
                                log_error("Send SIGTERM signal failed (%d)\n", errno);
                        }
                }

                if (SYS_menu_reload && !SYS_server_exit)
                {
                        if (reload_menu(&bbs_menu) < 0)
                        {
                                log_error("Reload menu failed\n");
                        }
                        else
                        {
                                log_std("Reload menu successfully\n");
                        }
                        SYS_menu_reload = 0;
                }

                sigprocmask(SIG_SETMASK, &osigset, NULL);

                FD_ZERO(&testfds);
                FD_SET(socket_server, &testfds);
        
                timeout.tv_sec = 0;
                timeout.tv_usec = 100 * 1000; // 0.1 second
        
                ret = select(FD_SETSIZE, &testfds, NULL, NULL, &timeout);

                if (ret < 0)
                {
                        if (errno != EINTR)
                        {
                                log_error("Accept connection error: %d\n", errno);
                        }
                        continue;
                }
                else if (ret == 0) // timeout
                {
                        continue;
                }

                // Stop accept new connection on exit
                if (SYS_server_exit)
                {
                        continue;
                }

                if (FD_ISSET(socket_server, &testfds))
                {
                        flags = fcntl(socket_server, F_GETFL, 0);
                        fcntl(socket_server, F_SETFL, flags | O_NONBLOCK);
                        while ((socket_client =
                                                accept(socket_server, (struct sockaddr *)&sin, &namelen)) < 0)
                        {
                                if (errno != EWOULDBLOCK && errno != ECONNABORTED && errno != EINTR)
                                {
                                        log_error("Accept connection error\n");
                                        break;
                                }
                        }
                        fcntl(socket_server, F_SETFL, flags);
                }

                if (socket_client < 0)
                {
                        log_error("Accept connection error\n");
                        continue;
                }

                strncpy(hostaddr_client, inet_ntoa(sin.sin_addr), sizeof(hostaddr_client) - 1);
                hostaddr_client[sizeof(hostaddr_client) - 1] = '\0';

                port_client = ntohs(sin.sin_port);

                log_std("Accept connection from %s:%d\n", hostaddr_client,
                                port_client);

                if (fork_server() < 0)
                {
                        log_error("Fork error\n");
                }

                if (close(socket_client) == -1)
                {
                        log_error("Close client socket failed\n");
                }
        }

        if (close(socket_server) == -1)
        {
                log_error("Close server socket failed\n");
        }

        return 0;
}
1	sysadm	1.1	/***************************************************************************
2	sysadm	1.13	net_server.c - description
3			-------------------
4	sysadm	1.18	Copyright : (C) 2004-2025 by Leaflet
5			Email : leaflet@leafok.com
6	sysadm	1.1	***************************************************************************/
7
8			/***************************************************************************
9			* *
10			* This program is free software; you can redistribute it and/or modify *
11			* it under the terms of the GNU General Public License as published by *
12	sysadm	1.18	* the Free Software Foundation; either version 3 of the License, or *
13	sysadm	1.1	* (at your option) any later version. *
14			* *
15			***************************************************************************/
16
17	sysadm	1.19	#define _XOPEN_SOURCE 500
18			#define _POSIX_C_SOURCE 200809L
19			#define _GNU_SOURCE
20
21	sysadm	1.14	#include "net_server.h"
22	sysadm	1.1	#include "common.h"
23	sysadm	1.14	#include "log.h"
24	sysadm	1.7	#include "io.h"
25	sysadm	1.14	#include "fork.h"
26	sysadm	1.19	#include "menu.h"
27	sysadm	1.20	#include <errno.h>
28			#include <fcntl.h>
29			#include <string.h>
30	sysadm	1.19	#include <signal.h>
31	sysadm	1.20	#include <stdlib.h>
32	sysadm	1.19	#include <unistd.h>
33			#include <sys/syscall.h>
34	sysadm	1.7	#include <sys/socket.h>
35	sysadm	1.19	#include <sys/wait.h>
36	sysadm	1.9	#include <arpa/inet.h>
37	sysadm	1.3
38	sysadm	1.17	int net_server(const char *hostaddr, in_port_t port)
39	sysadm	1.1	{
40	sysadm	1.15	unsigned int namelen;
41	sysadm	1.19	int ret;
42	sysadm	1.15	int flags;
43	sysadm	1.13	struct sockaddr_in sin;
44			fd_set testfds;
45			struct timeval timeout;
46	sysadm	1.19	sigset_t nsigset;
47			sigset_t osigset;
48			siginfo_t siginfo;
49	sysadm	1.10
50	sysadm	1.13	socket_server = socket(AF_INET, SOCK_STREAM, IPPROTO_TCP);
51	sysadm	1.10
52	sysadm	1.13	if (socket_server < 0)
53			{
54			log_error("Create socket failed\n");
55			exit(1);
56			}
57	sysadm	1.10
58	sysadm	1.13	sin.sin_family = AF_INET;
59			sin.sin_addr.s_addr =
60	sysadm	1.16	(strnlen(hostaddr, sizeof(hostaddr)) > 0 ? inet_addr(hostaddr) : INADDR_ANY);
61	sysadm	1.13	sin.sin_port = htons(port);
62
63			if (bind(socket_server, (struct sockaddr *)&sin, sizeof(sin)) < 0)
64	sysadm	1.10	{
65	sysadm	1.13	log_error("Bind address %s:%u failed\n",
66			inet_ntoa(sin.sin_addr), ntohs(sin.sin_port));
67			exit(2);
68	sysadm	1.10	}
69
70	sysadm	1.13	if (listen(socket_server, 10) < 0)
71	sysadm	1.10	{
72	sysadm	1.13	log_error("Socket listen failed\n");
73			exit(3);
74	sysadm	1.10	}
75	sysadm	1.1
76	sysadm	1.16	strncpy(hostaddr_server, inet_ntoa(sin.sin_addr), sizeof(hostaddr_server) - 1);
77			hostaddr_server[sizeof(hostaddr_server) - 1] = '\0';
78
79	sysadm	1.13	port_server = ntohs(sin.sin_port);
80	sysadm	1.19	namelen = sizeof(sin);
81	sysadm	1.13
82			log_std("Listening at %s:%d\n", hostaddr_server, port_server);
83
84	sysadm	1.19	sigemptyset(&nsigset);
85			sigaddset(&nsigset, SIGHUP);
86			sigaddset(&nsigset, SIGCHLD);
87			sigaddset(&nsigset, SIGTERM);
88
89			while (!SYS_server_exit \|\| SYS_child_process_count > 0)
90	sysadm	1.13	{
91	sysadm	1.19	sigprocmask(SIG_BLOCK, &nsigset, &osigset);
92
93			while (SYS_child_exit_count > 0)
94			{
95			siginfo.si_pid = 0;
96			ret = waitid(P_ALL, 0, &siginfo, WEXITED \| WNOHANG);
97			if (ret == 0 && siginfo.si_pid > 0)
98			{
99			SYS_child_exit_count--;
100			SYS_child_process_count--;
101			log_std("Child process (%d) exited\n", siginfo.si_pid);
102			}
103			else if (ret == 0)
104			{
105			break;
106			}
107			else if (ret < 0)
108			{
109			log_error("Error in waitid: %d\n", errno);
110			break;
111			}
112			}
113
114	sysadm	1.21	if (SYS_server_exit && SYS_child_exit_count == 0)
115			{
116			if (kill(0, SIGTERM) < 0)
117			{
118			log_error("Send SIGTERM signal failed (%d)\n", errno);
119			}
120			}
121
122	sysadm	1.20	if (SYS_menu_reload && !SYS_server_exit)
123	sysadm	1.19	{
124			if (reload_menu(&bbs_menu) < 0)
125			{
126			log_error("Reload menu failed\n");
127			}
128			else
129			{
130			log_std("Reload menu successfully\n");
131			}
132			SYS_menu_reload = 0;
133			}
134
135			sigprocmask(SIG_SETMASK, &osigset, NULL);
136
137	sysadm	1.13	FD_ZERO(&testfds);
138			FD_SET(socket_server, &testfds);
139	sysadm	1.20
140			timeout.tv_sec = 0;
141			timeout.tv_usec = 100 * 1000; // 0.1 second
142
143	sysadm	1.19	ret = select(FD_SETSIZE, &testfds, NULL, NULL, &timeout);
144
145			if (ret < 0)
146			{
147			if (errno != EINTR)
148			{
149			log_error("Accept connection error: %d\n", errno);
150			}
151			continue;
152			}
153			else if (ret == 0) // timeout
154	sysadm	1.13	{
155			continue;
156			}
157
158	sysadm	1.19	// Stop accept new connection on exit
159			if (SYS_server_exit)
160	sysadm	1.13	{
161			continue;
162			}
163
164			if (FD_ISSET(socket_server, &testfds))
165			{
166			flags = fcntl(socket_server, F_GETFL, 0);
167			fcntl(socket_server, F_SETFL, flags \| O_NONBLOCK);
168			while ((socket_client =
169			accept(socket_server, (struct sockaddr *)&sin, &namelen)) < 0)
170			{
171			if (errno != EWOULDBLOCK && errno != ECONNABORTED && errno != EINTR)
172			{
173			log_error("Accept connection error\n");
174			break;
175			}
176			}
177			fcntl(socket_server, F_SETFL, flags);
178			}
179
180			if (socket_client < 0)
181			{
182			log_error("Accept connection error\n");
183			continue;
184			}
185
186	sysadm	1.16	strncpy(hostaddr_client, inet_ntoa(sin.sin_addr), sizeof(hostaddr_client) - 1);
187			hostaddr_client[sizeof(hostaddr_client) - 1] = '\0';
188
189	sysadm	1.13	port_client = ntohs(sin.sin_port);
190
191			log_std("Accept connection from %s:%d\n", hostaddr_client,
192			port_client);
193
194			if (fork_server() < 0)
195			{
196			log_error("Fork error\n");
197			}
198
199			if (close(socket_client) == -1)
200			{
201			log_error("Close client socket failed\n");
202			}
203			}
204
205			if (close(socket_server) == -1)
206			{
207			log_error("Close server socket failed\n");
208			}
209	sysadm	1.7
210	sysadm	1.13	return 0;
211	sysadm	1.1	}
webmaster@leafok.com	ViewVC Help
Powered by ViewVC 1.3.0-beta1