/[LeafOK_CVS]/lbbs/src/net_server.c
ViewVC logotype

Contents of /lbbs/src/net_server.c

Parent Directory Parent Directory | Revision Log Revision Log


Revision 1.62 - (show annotations)
Sat Jun 21 02:15:18 2025 UTC (8 months, 3 weeks ago) by sysadm
Branch: MAIN
Changes since 1.61: +11 -11 lines
Content type: text/x-csrc
Re-order included order files

1 /***************************************************************************
2 net_server.c - description
3 -------------------
4 Copyright : (C) 2004-2025 by Leaflet
5 Email : leaflet@leafok.com
6 ***************************************************************************/
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 * the Free Software Foundation; either version 3 of the License, or *
13 * (at your option) any later version. *
14 * *
15 ***************************************************************************/
16
17 #include "bbs.h"
18 #include "bbs_main.h"
19 #include "common.h"
20 #include "database.h"
21 #include "file_loader.h"
22 #include "io.h"
23 #include "init.h"
24 #include "log.h"
25 #include "login.h"
26 #include "menu.h"
27 #include "net_server.h"
28 #include "section_list_loader.h"
29 #include <errno.h>
30 #include <fcntl.h>
31 #include <signal.h>
32 #include <stdlib.h>
33 #include <string.h>
34 #include <unistd.h>
35 #include <arpa/inet.h>
36 #include <libssh/callbacks.h>
37 #include <libssh/libssh.h>
38 #include <libssh/server.h>
39 #include <netinet/in.h>
40 #include <sys/epoll.h>
41 #include <sys/socket.h>
42 #include <sys/syscall.h>
43 #include <sys/types.h>
44 #include <sys/wait.h>
45 #include <systemd/sd-daemon.h>
46
47 struct process_sockaddr_t
48 {
49 pid_t pid;
50 in_addr_t s_addr;
51 };
52 typedef struct process_sockaddr_t PROCESS_SOCKADDR;
53
54 static PROCESS_SOCKADDR process_sockaddr_pool[MAX_CLIENT_LIMIT];
55
56 #define SSH_AUTH_MAX_DURATION (60 * 1000) // milliseconds
57
58 struct ssl_server_cb_data_t
59 {
60 int tries;
61 int error;
62 };
63
64 static int auth_password(ssh_session session, const char *user,
65 const char *password, void *userdata)
66 {
67 struct ssl_server_cb_data_t *p_data = userdata;
68 int ret;
69
70 if (strcmp(user, "guest") == 0)
71 {
72 ret = load_guest_info();
73 }
74 else
75 {
76 ret = check_user(user, password);
77 }
78
79 if (ret == 0)
80 {
81 return SSH_AUTH_SUCCESS;
82 }
83
84 if ((++(p_data->tries)) >= BBS_login_retry_times)
85 {
86 p_data->error = 1;
87 }
88
89 return SSH_AUTH_DENIED;
90 }
91
92 static int pty_request(ssh_session session, ssh_channel channel, const char *term,
93 int x, int y, int px, int py, void *userdata)
94 {
95 return 0;
96 }
97
98 static int shell_request(ssh_session session, ssh_channel channel, void *userdata)
99 {
100 return 0;
101 }
102
103 static struct ssh_channel_callbacks_struct channel_cb = {
104 .channel_pty_request_function = pty_request,
105 .channel_shell_request_function = shell_request};
106
107 static ssh_channel new_session_channel(ssh_session session, void *userdata)
108 {
109 if (SSH_channel != NULL)
110 {
111 return NULL;
112 }
113
114 SSH_channel = ssh_channel_new(session);
115 ssh_callbacks_init(&channel_cb);
116 ssh_set_channel_callbacks(SSH_channel, &channel_cb);
117
118 return SSH_channel;
119 }
120
121 static int fork_server(void)
122 {
123 ssh_event event;
124 int pid;
125 int i;
126 int ret;
127
128 struct ssl_server_cb_data_t cb_data = {
129 .tries = 0,
130 .error = 0,
131 };
132
133 struct ssh_server_callbacks_struct cb = {
134 .userdata = &cb_data,
135 .auth_password_function = auth_password,
136 .channel_open_request_session_function = new_session_channel,
137 };
138
139 pid = fork();
140
141 if (pid > 0) // Parent process
142 {
143 SYS_child_process_count++;
144 log_common("Child process (%d) start\n", pid);
145 return pid;
146 }
147 else if (pid < 0) // Error
148 {
149 log_error("fork() error (%d)\n", errno);
150 return -1;
151 }
152
153 // Child process
154
155 if (close(socket_server[0]) == -1 || close(socket_server[1]) == -1)
156 {
157 log_error("Close server socket failed\n");
158 }
159
160 SSH_session = ssh_new();
161
162 if (SSH_v2)
163 {
164 if (ssh_bind_accept_fd(sshbind, SSH_session, socket_client) != SSH_OK)
165 {
166 log_error("ssh_bind_accept_fd() error: %s\n", ssh_get_error(SSH_session));
167 goto cleanup;
168 }
169
170 ssh_bind_free(sshbind);
171
172 ssh_callbacks_init(&cb);
173 ssh_set_server_callbacks(SSH_session, &cb);
174
175 if (ssh_handle_key_exchange(SSH_session))
176 {
177 log_error("ssh_handle_key_exchange() error: %s\n", ssh_get_error(SSH_session));
178 goto cleanup;
179 }
180 ssh_set_auth_methods(SSH_session, SSH_AUTH_METHOD_PASSWORD);
181
182 event = ssh_event_new();
183 ssh_event_add_session(event, SSH_session);
184
185 for (i = 0; i < SSH_AUTH_MAX_DURATION && !SYS_server_exit && !cb_data.error && SSH_channel == NULL; i += 100)
186 {
187 ret = ssh_event_dopoll(event, 100); // 0.1 second
188 if (ret == SSH_ERROR)
189 {
190 log_error("ssh_event_dopoll() error: %s\n", ssh_get_error(SSH_session));
191 goto cleanup;
192 }
193 }
194
195 if (cb_data.error)
196 {
197 log_error("SSH auth error, tried %d times\n", cb_data.tries);
198 goto cleanup;
199 }
200 }
201
202 // Redirect Input
203 close(STDIN_FILENO);
204 if (dup2(socket_client, STDIN_FILENO) == -1)
205 {
206 log_error("Redirect stdin to client socket failed\n");
207 goto cleanup;
208 }
209
210 // Redirect Output
211 close(STDOUT_FILENO);
212 if (dup2(socket_client, STDOUT_FILENO) == -1)
213 {
214 log_error("Redirect stdout to client socket failed\n");
215 goto cleanup;
216 }
217
218 SYS_child_process_count = 0;
219
220 bbs_main();
221
222 cleanup:
223 // Child process exit
224 SYS_server_exit = 1;
225
226 if (SSH_v2)
227 {
228 ssh_channel_free(SSH_channel);
229 ssh_disconnect(SSH_session);
230 }
231 else if (close(socket_client) == -1)
232 {
233 log_error("Close client socket failed\n");
234 }
235
236 ssh_free(SSH_session);
237 ssh_finalize();
238
239 // Close Input and Output for client
240 close(STDIN_FILENO);
241 close(STDOUT_FILENO);
242
243 log_common("Process exit normally\n");
244 log_end();
245
246 _exit(0);
247
248 return 0;
249 }
250
251 int net_server(const char *hostaddr, in_port_t port[])
252 {
253 unsigned int addrlen;
254 int ret;
255 int flags[2];
256 struct sockaddr_in sin;
257 struct epoll_event ev, events[MAX_EVENTS];
258 int nfds, epollfd;
259 siginfo_t siginfo;
260 int sd_notify_stopping = 0;
261 MENU_SET *p_bbs_menu_new;
262 int i, j;
263 pid_t pid;
264 int ssh_log_level = SSH_LOG_NOLOG;
265
266 ssh_init();
267
268 sshbind = ssh_bind_new();
269
270 if (ssh_bind_options_set(sshbind, SSH_BIND_OPTIONS_BINDADDR, hostaddr) < 0 ||
271 ssh_bind_options_set(sshbind, SSH_BIND_OPTIONS_BINDPORT, &port) < 0 ||
272 ssh_bind_options_set(sshbind, SSH_BIND_OPTIONS_HOSTKEY, SSH_HOST_KEYFILE) < 0 ||
273 ssh_bind_options_set(sshbind, SSH_BIND_OPTIONS_LOG_VERBOSITY, &ssh_log_level) < 0)
274 {
275 log_error("Error setting SSH bind options: %s\n", ssh_get_error(sshbind));
276 ssh_bind_free(sshbind);
277 return -1;
278 }
279
280 epollfd = epoll_create1(0);
281 if (epollfd < 0)
282 {
283 log_error("epoll_create1() error (%d)\n", errno);
284 return -1;
285 }
286
287 // Server socket
288 for (i = 0; i < 2; i++)
289 {
290 socket_server[i] = socket(AF_INET, SOCK_STREAM, IPPROTO_TCP);
291
292 if (socket_server[i] < 0)
293 {
294 log_error("Create socket_server error (%d)\n", errno);
295 return -1;
296 }
297
298 sin.sin_family = AF_INET;
299 sin.sin_addr.s_addr = (hostaddr[0] != '\0' ? inet_addr(hostaddr) : INADDR_ANY);
300 sin.sin_port = htons(port[i]);
301
302 // Reuse address and port
303 flags[i] = 1;
304 if (setsockopt(socket_server[i], SOL_SOCKET, SO_REUSEADDR, &flags[i], sizeof(flags[i])) < 0)
305 {
306 log_error("setsockopt SO_REUSEADDR error (%d)\n", errno);
307 }
308 if (setsockopt(socket_server[i], SOL_SOCKET, SO_REUSEPORT, &flags[i], sizeof(flags[i])) < 0)
309 {
310 log_error("setsockopt SO_REUSEPORT error (%d)\n", errno);
311 }
312
313 if (bind(socket_server[i], (struct sockaddr *)&sin, sizeof(sin)) < 0)
314 {
315 log_error("Bind address %s:%u error (%d)\n",
316 inet_ntoa(sin.sin_addr), ntohs(sin.sin_port), errno);
317 return -1;
318 }
319
320 if (listen(socket_server[i], 10) < 0)
321 {
322 log_error("Telnet socket listen error (%d)\n", errno);
323 return -1;
324 }
325
326 log_common("Listening at %s:%u\n", inet_ntoa(sin.sin_addr), ntohs(sin.sin_port));
327
328 ev.events = EPOLLIN;
329 ev.data.fd = socket_server[i];
330 if (epoll_ctl(epollfd, EPOLL_CTL_ADD, socket_server[i], &ev) == -1)
331 {
332 log_error("epoll_ctl(socket_server[%d]) error (%d)\n", i, errno);
333 if (close(epollfd) < 0)
334 {
335 log_error("close(epoll) error (%d)\n");
336 }
337 return -1;
338 }
339
340 flags[i] = fcntl(socket_server[i], F_GETFL, 0);
341 fcntl(socket_server[i], F_SETFL, flags[i] | O_NONBLOCK);
342 }
343
344 // Startup complete
345 sd_notifyf(0, "READY=1\n"
346 "STATUS=Listening at %s:%d (Telnet) and %s:%d (SSH2)\n"
347 "MAINPID=%d",
348 hostaddr, port[0], hostaddr, port[1], getpid());
349
350 while (!SYS_server_exit || SYS_child_process_count > 0)
351 {
352 if (SYS_server_exit && !sd_notify_stopping)
353 {
354 sd_notify(0, "STOPPING=1");
355 sd_notify_stopping = 1;
356 }
357
358 while ((SYS_child_exit || SYS_server_exit) && SYS_child_process_count > 0)
359 {
360 SYS_child_exit = 0;
361
362 siginfo.si_pid = 0;
363 ret = waitid(P_ALL, 0, &siginfo, WEXITED | WNOHANG);
364 if (ret == 0 && siginfo.si_pid > 0)
365 {
366 SYS_child_exit = 1; // Retry waitid
367
368 SYS_child_process_count--;
369 log_common("Child process (%d) exited\n", siginfo.si_pid);
370
371 if (siginfo.si_pid != section_list_loader_pid)
372 {
373 i = 0;
374 for (; i < BBS_max_client; i++)
375 {
376 if (process_sockaddr_pool[i].pid == siginfo.si_pid)
377 {
378 process_sockaddr_pool[i].pid = 0;
379 break;
380 }
381 }
382 if (i >= BBS_max_client)
383 {
384 log_error("Child process (%d) not found in process sockaddr pool\n", siginfo.si_pid);
385 }
386 }
387 }
388 else if (ret == 0)
389 {
390 break;
391 }
392 else if (ret < 0)
393 {
394 log_error("Error in waitid: %d\n", errno);
395 break;
396 }
397 }
398
399 if (SYS_server_exit && !SYS_child_exit && SYS_child_process_count > 0)
400 {
401 log_common("Notify %d child process to exit\n", SYS_child_process_count);
402 if (kill(0, SIGTERM) < 0)
403 {
404 log_error("Send SIGTERM signal failed (%d)\n", errno);
405 }
406
407 sd_notifyf(0, "STATUS=Waiting for %d child process to exit", SYS_child_process_count);
408 }
409
410 if (SYS_conf_reload && !SYS_server_exit)
411 {
412 SYS_conf_reload = 0;
413 sd_notify(0, "RELOADING=1");
414
415 // Reload configuration
416 if (load_conf(CONF_BBSD) < 0)
417 {
418 log_error("Reload conf failed\n");
419 }
420
421 p_bbs_menu_new = calloc(1, sizeof(MENU_SET));
422 if (p_bbs_menu_new == NULL)
423 {
424 log_error("OOM: calloc(MENU_SET)\n");
425 }
426 else if (load_menu(p_bbs_menu_new, CONF_MENU) < 0)
427 {
428 unload_menu(p_bbs_menu_new);
429 free(p_bbs_menu_new);
430 p_bbs_menu_new = NULL;
431
432 log_error("Reload menu failed\n");
433 }
434 else
435 {
436 unload_menu(p_bbs_menu);
437 free(p_bbs_menu);
438
439 p_bbs_menu = p_bbs_menu_new;
440 p_bbs_menu_new = NULL;
441
442 log_common("Reload menu successfully\n");
443 }
444
445 sd_notify(0, "READY=1");
446 }
447
448 if (SYS_data_file_reload && !SYS_server_exit)
449 {
450 SYS_data_file_reload = 0;
451 sd_notify(0, "RELOADING=1");
452
453 for (int i = 0; i < data_files_load_startup_count; i++)
454 {
455 if (load_file(data_files_load_startup[i]) < 0)
456 {
457 log_error("load_file_mmap(%s) error\n", data_files_load_startup[i]);
458 }
459 }
460
461 log_common("Reload data files successfully\n");
462 sd_notify(0, "READY=1");
463 }
464
465 if (SYS_section_list_reload && !SYS_server_exit)
466 {
467 SYS_section_list_reload = 0;
468
469 if (section_list_loader_reload() < 0)
470 {
471 log_error("ksection_list_loader_reload() failed\n");
472 }
473 }
474
475 nfds = epoll_wait(epollfd, events, MAX_EVENTS, 100); // 0.1 second
476
477 if (nfds < 0)
478 {
479 if (errno != EINTR)
480 {
481 log_error("epoll_wait() error (%d)\n", errno);
482 break;
483 }
484 continue;
485 }
486
487 // Stop accept new connection on exit
488 if (SYS_server_exit)
489 {
490 continue;
491 }
492
493 for (int i = 0; i < nfds; i++)
494 {
495 if (events[i].data.fd == socket_server[0] || events[i].data.fd == socket_server[1])
496 {
497 SSH_v2 = (events[i].data.fd == socket_server[1] ? 1 : 0);
498
499 while (!SYS_server_exit) // Accept all incoming connections until error
500 {
501 addrlen = sizeof(sin);
502 socket_client = accept(socket_server[SSH_v2], (struct sockaddr *)&sin, &addrlen);
503 if (socket_client < 0)
504 {
505 if (errno == EAGAIN || errno == EWOULDBLOCK)
506 {
507 break;
508 }
509 else if (errno == EINTR)
510 {
511 continue;
512 }
513 else
514 {
515 log_error("accept(socket_server) error (%d)\n", errno);
516 break;
517 }
518 }
519
520 strncpy(hostaddr_client, inet_ntoa(sin.sin_addr), sizeof(hostaddr_client) - 1);
521 hostaddr_client[sizeof(hostaddr_client) - 1] = '\0';
522
523 port_client = ntohs(sin.sin_port);
524
525 log_common("Accept %sconnection from %s:%d\n", (SSH_v2 ? "" : "SSH2 "), hostaddr_client, port_client);
526
527 if (SYS_child_process_count - 1 < BBS_max_client)
528 {
529 j = 0;
530 for (i = 0; i < BBS_max_client; i++)
531 {
532 if (process_sockaddr_pool[i].pid != 0 && process_sockaddr_pool[i].s_addr == sin.sin_addr.s_addr)
533 {
534 j++;
535 if (j >= BBS_max_client_per_ip)
536 {
537 log_common("Too many client connections (%d) from %s\n", j, hostaddr_client);
538 break;
539 }
540 }
541 }
542
543 if (j < BBS_max_client_per_ip)
544 {
545 if ((pid = fork_server()) < 0)
546 {
547 log_error("fork_server() error\n");
548 }
549 else if (pid > 0)
550 {
551 i = 0;
552 for (; i < BBS_max_client; i++)
553 {
554 if (process_sockaddr_pool[i].pid == 0)
555 {
556 break;
557 }
558 }
559
560 if (i >= BBS_max_client)
561 {
562 log_error("Process sockaddr pool depleted\n");
563 }
564 else
565 {
566 process_sockaddr_pool[i].pid = pid;
567 process_sockaddr_pool[i].s_addr = sin.sin_addr.s_addr;
568 }
569 }
570 }
571 }
572 else
573 {
574 log_error("Rejected client connection over limit (%d)\n", SYS_child_process_count - 1);
575 }
576
577 if (close(socket_client) == -1)
578 {
579 log_error("close(socket_lient) error (%d)\n", errno);
580 }
581 }
582 }
583 }
584 }
585
586 if (close(epollfd) < 0)
587 {
588 log_error("close(epoll) error (%d)\n");
589 }
590
591 for (i = 0; i < 2; i++)
592 {
593 fcntl(socket_server[i], F_SETFL, flags[i]);
594
595 if (close(socket_server[i]) == -1)
596 {
597 log_error("Close server socket failed\n");
598 }
599 }
600
601 ssh_bind_free(sshbind);
602 ssh_finalize();
603
604 return 0;
605 }

webmaster@leafok.com
ViewVC Help
Powered by ViewVC 1.3.0-beta1