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

Diff of /lbbs/src/net_server.c

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

Revision 1.47 by sysadm, Tue Jun 3 13:27:49 2025 UTC Revision 1.97 by sysadm, Fri Nov 28 03:23:58 2025 UTC
# Line 1  Line 1 
1  /***************************************************************************  /* SPDX-License-Identifier: GPL-3.0-or-later */
2                                                    net_server.c  -  description  /*
3                                                           -------------------   * net_server
4          Copyright            : (C) 2004-2025 by Leaflet   *   - network server with SSH support
5          Email                : leaflet@leafok.com   *
6   ***************************************************************************/   * Copyright (C) 2004-2025  Leaflet <leaflet@leafok.com>
7     */
8  /***************************************************************************  
9   *                                                                         *  #ifdef HAVE_CONFIG_H
10   *   This program is free software; you can redistribute it and/or modify  *  #include "config.h"
11   *   it under the terms of the GNU General Public License as published by  *  #endif
12   *   the Free Software Foundation; either version 3 of the License, or     *  
13   *   (at your option) any later version.                                   *  #include "bbs.h"
14   *                                                                         *  #include "bbs_main.h"
15   ***************************************************************************/  #include "bwf.h"
   
 #define _XOPEN_SOURCE 500  
 #define _POSIX_C_SOURCE 200809L  
 #define _GNU_SOURCE  
   
 #include "net_server.h"  
16  #include "common.h"  #include "common.h"
17  #include "log.h"  #include "database.h"
18    #include "file_loader.h"
19    #include "hash_dict.h"
20  #include "io.h"  #include "io.h"
21  #include "init.h"  #include "init.h"
22  #include "fork.h"  #include "log.h"
23    #include "login.h"
24  #include "menu.h"  #include "menu.h"
25  #include "file_loader.h"  #include "net_server.h"
26    #include "section_list.h"
27  #include "section_list_loader.h"  #include "section_list_loader.h"
28  #include <errno.h>  #include <errno.h>
29  #include <fcntl.h>  #include <fcntl.h>
30  #include <string.h>  #include <pty.h>
31  #include <signal.h>  #include <signal.h>
32  #include <stdlib.h>  #include <stdlib.h>
33    #include <string.h>
34  #include <unistd.h>  #include <unistd.h>
35  #include <sys/syscall.h>  #include <utmp.h>
36    #include <arpa/inet.h>
37    #include <libssh/callbacks.h>
38    #include <libssh/libssh.h>
39    #include <libssh/server.h>
40    #include <netinet/in.h>
41    #include <sys/ioctl.h>
42  #include <sys/socket.h>  #include <sys/socket.h>
43    #include <sys/types.h>
44  #include <sys/wait.h>  #include <sys/wait.h>
45    
46    #ifdef HAVE_SYS_EPOLL_H
47  #include <sys/epoll.h>  #include <sys/epoll.h>
48  #include <arpa/inet.h>  #else
49  #include <netinet/in.h>  #include <poll.h>
50    #endif
51    
52    #ifdef HAVE_SYSTEMD_SD_DAEMON_H
53  #include <systemd/sd-daemon.h>  #include <systemd/sd-daemon.h>
54    #endif
55    
56  struct process_sockaddr_t  enum _net_server_constant_t
57  {  {
58            WAIT_CHILD_PROCESS_EXIT_TIMEOUT = 5, // second
59            WAIT_CHILD_PROCESS_KILL_TIMEOUT = 1, // second
60    
61            SSH_AUTH_MAX_DURATION = 60 * 1000, // milliseconds
62    };
63    
64    /* A userdata struct for session. */
65    struct session_data_struct
66    {
67            int tries;
68            int error;
69    };
70    
71    /* A userdata struct for channel. */
72    struct channel_data_struct
73    {
74            /* pid of the child process the channel will spawn. */
75          pid_t pid;          pid_t pid;
76          in_addr_t s_addr;          /* For PTY allocation */
77            socket_t pty_master;
78            socket_t pty_slave;
79            /* For communication with the child process. */
80            socket_t child_stdin;
81            socket_t child_stdout;
82            /* Only used for subsystem and exec requests. */
83            socket_t child_stderr;
84            /* Event which is used to poll the above descriptors. */
85            ssh_event event;
86            /* Terminal size struct. */
87            struct winsize *winsize;
88  };  };
 typedef struct process_sockaddr_t PROCESS_SOCKADDR;  
89    
90  static PROCESS_SOCKADDR process_sockaddr_pool[MAX_CLIENTS_LIMIT];  static int socket_server[2];
91    static int socket_client;
92    
93    #ifdef HAVE_SYS_EPOLL_H
94    static int epollfd_server = -1;
95    #endif
96    
97    static ssh_bind sshbind;
98    
99    static HASH_DICT *hash_dict_pid_sockaddr = NULL;
100    static HASH_DICT *hash_dict_sockaddr_count = NULL;
101    
102  int net_server(const char *hostaddr, in_port_t port)  static const char SFTP_SERVER_PATH[] = "/usr/lib/sftp-server";
103    
104    static int auth_password(ssh_session session, const char *user,
105                                                     const char *password, void *userdata)
106  {  {
107          unsigned int namelen;          struct session_data_struct *sdata = (struct session_data_struct *)userdata;
108          int ret;          int ret;
         int flags;  
         struct sockaddr_in sin;  
         struct epoll_event ev, events[MAX_EVENTS];  
         int nfds, epollfd;  
         siginfo_t siginfo;  
         int sd_notify_stopping = 0;  
         MENU_SET *p_bbs_menu_new;  
         int i, j;  
         pid_t pid;  
109    
110          socket_server = socket(AF_INET, SOCK_STREAM, IPPROTO_TCP);          if (strcmp(user, "guest") == 0)
111            {
112                    ret = load_guest_info();
113            }
114            else
115            {
116                    ret = check_user(user, password);
117            }
118    
119          if (socket_server < 0)          if (ret == 0)
120          {          {
121                  log_error("Create socket failed\n");                  return SSH_AUTH_SUCCESS;
122                  return -1;          }
123    
124            if ((++(sdata->tries)) >= BBS_login_retry_times)
125            {
126                    sdata->error = 1;
127          }          }
128    
129          sin.sin_family = AF_INET;          return SSH_AUTH_DENIED;
130          sin.sin_addr.s_addr = (hostaddr[0] != '\0' ? inet_addr(hostaddr) : INADDR_ANY);  }
131          sin.sin_port = htons(port);  
132    static int pty_request(ssh_session session, ssh_channel channel, const char *term,
133                                               int cols, int rows, int px, int py, void *userdata)
134    {
135            struct channel_data_struct *cdata = (struct channel_data_struct *)userdata;
136            int rc;
137    
138          // Reuse address and port          (void)session;
139          flags = 1;          (void)channel;
140          if (setsockopt(socket_server, SOL_SOCKET, SO_REUSEADDR, &flags, sizeof(flags)) < 0)          (void)term;
141    
142            cdata->winsize->ws_row = (unsigned short int)rows;
143            cdata->winsize->ws_col = (unsigned short int)cols;
144            cdata->winsize->ws_xpixel = (unsigned short int)px;
145            cdata->winsize->ws_ypixel = (unsigned short int)py;
146    
147            rc = openpty(&cdata->pty_master, &cdata->pty_slave, NULL, NULL, cdata->winsize);
148            if (rc != 0)
149          {          {
150                  log_error("setsockopt SO_REUSEADDR error (%d)\n", errno);                  log_error("Failed to open pty\n");
151                    return SSH_ERROR;
152          }          }
153          if (setsockopt(socket_server, SOL_SOCKET, SO_REUSEPORT, &flags, sizeof(flags)) < 0)  
154            return SSH_OK;
155    }
156    
157    static int pty_resize(ssh_session session, ssh_channel channel, int cols, int rows,
158                                              int py, int px, void *userdata)
159    {
160            struct channel_data_struct *cdata = (struct channel_data_struct *)userdata;
161    
162            (void)session;
163            (void)channel;
164    
165            cdata->winsize->ws_row = (unsigned short int)rows;
166            cdata->winsize->ws_col = (unsigned short int)cols;
167            cdata->winsize->ws_xpixel = (unsigned short int)px;
168            cdata->winsize->ws_ypixel = (unsigned short int)py;
169    
170            if (cdata->pty_master != -1)
171          {          {
172                  log_error("setsockopt SO_REUSEPORT error (%d)\n", errno);                  return ioctl(cdata->pty_master, TIOCSWINSZ, cdata->winsize);
173          }          }
174    
175          if (bind(socket_server, (struct sockaddr *)&sin, sizeof(sin)) < 0)          return SSH_ERROR;
176    }
177    
178    static int exec_pty(const char *mode, const char *command, struct channel_data_struct *cdata)
179    {
180            (void)cdata;
181    
182            if (command != NULL)
183          {          {
184                  log_error("Bind address %s:%u failed (%d)\n",                  log_error("Forbid exec /bin/sh %s %s)\n", mode, command);
185                                    inet_ntoa(sin.sin_addr), ntohs(sin.sin_port), errno);          }
186                  return -1;  
187            return SSH_OK;
188    }
189    
190    static int exec_nopty(const char *command, struct channel_data_struct *cdata)
191    {
192            (void)cdata;
193    
194            if (command != NULL)
195            {
196                    log_error("Forbid exec /bin/sh -c %s)\n", command);
197            }
198    
199            return SSH_OK;
200    }
201    
202    static int exec_request(ssh_session session, ssh_channel channel, const char *command, void *userdata)
203    {
204            struct channel_data_struct *cdata = (struct channel_data_struct *)userdata;
205    
206            (void)session;
207            (void)channel;
208    
209            if (cdata->pid > 0)
210            {
211                    return SSH_ERROR;
212            }
213    
214            if (cdata->pty_master != -1 && cdata->pty_slave != -1)
215            {
216                    return exec_pty("-c", command, cdata);
217            }
218            return exec_nopty(command, cdata);
219    }
220    
221    static int shell_request(ssh_session session, ssh_channel channel, void *userdata)
222    {
223            struct channel_data_struct *cdata = (struct channel_data_struct *)userdata;
224    
225            (void)session;
226            (void)channel;
227    
228            if (cdata->pid > 0)
229            {
230                    return SSH_ERROR;
231            }
232    
233            if (cdata->pty_master != -1 && cdata->pty_slave != -1)
234            {
235                    return exec_pty("-l", NULL, cdata);
236            }
237            /* Client requested a shell without a pty, let's pretend we allow that */
238            return SSH_OK;
239    }
240    
241    static int subsystem_request(ssh_session session, ssh_channel channel, const char *subsystem, void *userdata)
242    {
243            (void)session;
244            (void)channel;
245    
246            log_error("subsystem_request(subsystem=%s)\n", subsystem);
247    
248            /* subsystem requests behave similarly to exec requests. */
249            if (strcmp(subsystem, "sftp") == 0)
250            {
251                    return exec_request(session, channel, SFTP_SERVER_PATH, userdata);
252          }          }
253            return SSH_ERROR;
254    }
255    
256    static ssh_channel channel_open(ssh_session session, void *userdata)
257    {
258            (void)userdata;
259    
260          if (listen(socket_server, 10) < 0)          if (SSH_channel != NULL)
261          {          {
262                  log_error("Socket listen failed (%d)\n", errno);                  return NULL;
263            }
264    
265            SSH_channel = ssh_channel_new(session);
266    
267            return SSH_channel;
268    }
269    
270    static int fork_server(void)
271    {
272            ssh_event event;
273            long int ssh_timeout = 0;
274            int pid;
275            int i;
276            int ret;
277    
278            /* Structure for storing the pty size. */
279            struct winsize wsize = {
280                    .ws_row = 0,
281                    .ws_col = 0,
282                    .ws_xpixel = 0,
283                    .ws_ypixel = 0};
284    
285            /* Our struct holding information about the channel. */
286            struct channel_data_struct cdata = {
287                    .pid = 0,
288                    .pty_master = -1,
289                    .pty_slave = -1,
290                    .child_stdin = -1,
291                    .child_stdout = -1,
292                    .child_stderr = -1,
293                    .event = NULL,
294                    .winsize = &wsize};
295    
296            struct session_data_struct cb_data = {
297                    .tries = 0,
298                    .error = 0,
299            };
300    
301            struct ssh_channel_callbacks_struct channel_cb = {
302                    .userdata = &cdata,
303                    .channel_pty_request_function = pty_request,
304                    .channel_pty_window_change_function = pty_resize,
305                    .channel_shell_request_function = shell_request,
306                    .channel_exec_request_function = exec_request,
307                    .channel_subsystem_request_function = subsystem_request};
308    
309            struct ssh_server_callbacks_struct server_cb = {
310                    .userdata = &cb_data,
311                    .auth_password_function = auth_password,
312                    .channel_open_request_session_function = channel_open,
313            };
314    
315            pid = fork();
316    
317            if (pid > 0) // Parent process
318            {
319                    SYS_child_process_count++;
320                    log_common("Child process (%d) start\n", pid);
321                    return pid;
322            }
323            else if (pid < 0) // Error
324            {
325                    log_error("fork() error (%d)\n", errno);
326                  return -1;                  return -1;
327          }          }
328    
329          strncpy(hostaddr_server, inet_ntoa(sin.sin_addr), sizeof(hostaddr_server) - 1);          // Child process
330          hostaddr_server[sizeof(hostaddr_server) - 1] = '\0';  #ifdef HAVE_SYS_EPOLL_H
331            if (close(epollfd_server) < 0)
332            {
333                    log_error("close(epollfd_server) error (%d)\n");
334            }
335    #endif
336    
337            for (i = 0; i < 2; i++)
338            {
339                    if (close(socket_server[i]) == -1)
340                    {
341                            log_error("Close server socket failed\n");
342                    }
343            }
344    
345            hash_dict_destroy(hash_dict_pid_sockaddr);
346            hash_dict_destroy(hash_dict_sockaddr_count);
347    
348            SSH_session = ssh_new();
349    
350            if (SSH_v2)
351            {
352                    if (ssh_bind_accept_fd(sshbind, SSH_session, socket_client) != SSH_OK)
353                    {
354                            log_error("ssh_bind_accept_fd() error: %s\n", ssh_get_error(SSH_session));
355                            goto cleanup;
356                    }
357    
358                    ssh_bind_free(sshbind);
359    
360                    ssh_timeout = 60; // second
361                    if (ssh_options_set(SSH_session, SSH_OPTIONS_TIMEOUT, &ssh_timeout) < 0)
362                    {
363                            log_error("Error setting SSH options: %s\n", ssh_get_error(SSH_session));
364                            goto cleanup;
365                    }
366    
367                    ssh_set_auth_methods(SSH_session, SSH_AUTH_METHOD_PASSWORD);
368    
369                    ssh_callbacks_init(&server_cb);
370                    ssh_callbacks_init(&channel_cb);
371    
372                    ssh_set_server_callbacks(SSH_session, &server_cb);
373    
374                    if (ssh_handle_key_exchange(SSH_session))
375                    {
376                            log_error("ssh_handle_key_exchange() error: %s\n", ssh_get_error(SSH_session));
377                            goto cleanup;
378                    }
379    
380                    event = ssh_event_new();
381                    ssh_event_add_session(event, SSH_session);
382    
383                    for (i = 0; i < SSH_AUTH_MAX_DURATION && !SYS_server_exit && !cb_data.error && SSH_channel == NULL; i += 100)
384                    {
385                            ret = ssh_event_dopoll(event, 100); // 0.1 second
386                            if (ret == SSH_ERROR)
387                            {
388    #ifdef _DEBUG
389                                    log_error("ssh_event_dopoll() error: %s\n", ssh_get_error(SSH_session));
390    #endif
391                                    goto cleanup;
392                            }
393                    }
394    
395          port_server = ntohs(sin.sin_port);                  if (cb_data.error)
396          namelen = sizeof(sin);                  {
397                            log_error("SSH auth error, tried %d times\n", cb_data.tries);
398                            goto cleanup;
399                    }
400    
401          log_std("Listening at %s:%d\n", hostaddr_server, port_server);                  ssh_set_channel_callbacks(SSH_channel, &channel_cb);
402    
403          epollfd = epoll_create1(0);                  do
404          if (epollfd < 0)                  {
405                            ret = ssh_event_dopoll(event, 100); // 0.1 second
406                            if (ret == SSH_ERROR)
407                            {
408                                    ssh_channel_close(SSH_channel);
409                            }
410    
411                            if (ret == SSH_AGAIN) // loop until SSH connection is fully established
412                            {
413                                    /* Executed only once, once the child process starts. */
414                                    cdata.event = event;
415                                    break;
416                            }
417                    } while (ssh_channel_is_open(SSH_channel));
418    
419                    ssh_timeout = 0;
420                    if (ssh_options_set(SSH_session, SSH_OPTIONS_TIMEOUT, &ssh_timeout) < 0)
421                    {
422                            log_error("Error setting SSH options: %s\n", ssh_get_error(SSH_session));
423                            goto cleanup;
424                    }
425            }
426    
427            // Redirect Input
428            if (dup2(socket_client, STDIN_FILENO) == -1)
429            {
430                    log_error("Redirect stdin to client socket failed\n");
431                    goto cleanup;
432            }
433    
434            // Redirect Output
435            if (dup2(socket_client, STDOUT_FILENO) == -1)
436            {
437                    log_error("Redirect stdout to client socket failed\n");
438                    goto cleanup;
439            }
440    
441            if (io_init() < 0)
442            {
443                    log_error("io_init() error\n");
444                    goto cleanup;
445            }
446    
447            SYS_child_process_count = 0;
448    
449            // BWF compile
450            if (bwf_compile() < 0)
451            {
452                    log_error("bwf_compile() error\n");
453                    goto cleanup;
454            }
455    
456            bbs_main();
457    
458    cleanup:
459            // Child process exit
460            SYS_server_exit = 1;
461    
462            if (SSH_v2)
463            {
464                    if (cdata.pty_master != -1)
465                    {
466                            close(cdata.pty_master);
467                    }
468                    if (cdata.child_stdin != -1)
469                    {
470                            close(cdata.child_stdin);
471                    }
472                    if (cdata.child_stdout != -1)
473                    {
474                            close(cdata.child_stdout);
475                    }
476                    if (cdata.child_stderr != -1)
477                    {
478                            close(cdata.child_stderr);
479                    }
480    
481                    ssh_channel_free(SSH_channel);
482                    ssh_disconnect(SSH_session);
483            }
484            else if (close(socket_client) == -1)
485            {
486                    log_error("Close client socket failed\n");
487            }
488    
489            ssh_free(SSH_session);
490            ssh_finalize();
491    
492            // BWF cleanup
493            bwf_cleanup();
494    
495            // Close Input and Output for client
496            io_cleanup();
497            close(STDIN_FILENO);
498            close(STDOUT_FILENO);
499    
500            log_common("Process exit normally\n");
501            log_end();
502    
503            _exit(0);
504    
505            return 0;
506    }
507    
508    int net_server(const char *hostaddr, in_port_t port[])
509    {
510            unsigned int addrlen;
511            int ret;
512            int flags_server[2];
513            struct sockaddr_in sin;
514    
515    #ifdef HAVE_SYS_EPOLL_H
516            struct epoll_event ev, events[MAX_EVENTS];
517    #else
518            struct pollfd pfds[2];
519    #endif
520    
521            int nfds;
522            int notify_child_exit = 0;
523            time_t tm_notify_child_exit = time(NULL);
524            int i, j;
525            pid_t pid;
526            int ssh_key_valid = 0;
527            int ssh_log_level = SSH_LOG_NOLOG;
528    
529    #ifdef HAVE_SYSTEMD_SD_DAEMON_H
530            int sd_notify_stopping = 0;
531    #endif
532    
533            ssh_init();
534    
535            sshbind = ssh_bind_new();
536    
537            if (ssh_bind_options_set(sshbind, SSH_BIND_OPTIONS_HOSTKEY, SSH_HOST_RSA_KEY_FILE) < 0)
538            {
539                    log_error("Error setting SSH RSA key: %s\n", SSH_HOST_RSA_KEY_FILE);
540            }
541            else
542            {
543                    ssh_key_valid = 1;
544            }
545            if (ssh_bind_options_set(sshbind, SSH_BIND_OPTIONS_HOSTKEY, SSH_HOST_ED25519_KEY_FILE) < 0)
546            {
547                    log_error("Error setting SSH ED25519 key: %s\n", SSH_HOST_ED25519_KEY_FILE);
548            }
549            else
550            {
551                    ssh_key_valid = 1;
552            }
553    
554            if (!ssh_key_valid)
555            {
556                    log_error("Error: no valid SSH host key\n");
557                    ssh_bind_free(sshbind);
558                    return -1;
559            }
560    
561            if (ssh_bind_options_set(sshbind, SSH_BIND_OPTIONS_BINDADDR, hostaddr) < 0 ||
562                    ssh_bind_options_set(sshbind, SSH_BIND_OPTIONS_BINDPORT, &port) < 0 ||
563                    ssh_bind_options_set(sshbind, SSH_BIND_OPTIONS_HOSTKEY_ALGORITHMS, "ssh-rsa,rsa-sha2-512,rsa-sha2-256,ssh-ed25519") < 0 ||
564                    ssh_bind_options_set(sshbind, SSH_BIND_OPTIONS_LOG_VERBOSITY, &ssh_log_level) < 0)
565            {
566                    log_error("Error setting SSH bind options: %s\n", ssh_get_error(sshbind));
567                    ssh_bind_free(sshbind);
568                    return -1;
569            }
570    
571    #ifdef HAVE_SYS_EPOLL_H
572            epollfd_server = epoll_create1(0);
573            if (epollfd_server == -1)
574          {          {
575                  log_error("epoll_create1() error (%d)\n", errno);                  log_error("epoll_create1() error (%d)\n", errno);
576                  return -1;                  return -1;
577          }          }
578    #endif
579    
580          ev.events = EPOLLIN;          // Server socket
581          ev.data.fd = socket_server;          for (i = 0; i < 2; i++)
         if (epoll_ctl(epollfd, EPOLL_CTL_ADD, socket_server, &ev) == -1)  
582          {          {
583                  log_error("epoll_ctl(socket_server) error (%d)\n", errno);                  socket_server[i] = socket(AF_INET, SOCK_STREAM, IPPROTO_TCP);
584                  if (close(epollfd) < 0)  
585                    if (socket_server[i] < 0)
586                  {                  {
587                          log_error("close(epoll) error (%d)\n");                          log_error("Create socket_server error (%d)\n", errno);
588                            return -1;
589                  }                  }
590                  return -1;  
591                    sin.sin_family = AF_INET;
592                    sin.sin_addr.s_addr = (hostaddr[0] != '\0' ? inet_addr(hostaddr) : INADDR_ANY);
593                    sin.sin_port = htons(port[i]);
594    
595                    // Reuse address and port
596                    flags_server[i] = 1;
597                    if (setsockopt(socket_server[i], SOL_SOCKET, SO_REUSEADDR, &flags_server[i], sizeof(flags_server[i])) < 0)
598                    {
599                            log_error("setsockopt SO_REUSEADDR error (%d)\n", errno);
600                    }
601    #if defined(SO_REUSEPORT)
602                    if (setsockopt(socket_server[i], SOL_SOCKET, SO_REUSEPORT, &flags_server[i], sizeof(flags_server[i])) < 0)
603                    {
604                            log_error("setsockopt SO_REUSEPORT error (%d)\n", errno);
605                    }
606    #endif
607    
608                    if (bind(socket_server[i], (struct sockaddr *)&sin, sizeof(sin)) < 0)
609                    {
610                            log_error("Bind address %s:%u error (%d)\n",
611                                              inet_ntoa(sin.sin_addr), ntohs(sin.sin_port), errno);
612                            return -1;
613                    }
614    
615                    if (listen(socket_server[i], 10) < 0)
616                    {
617                            log_error("Telnet socket listen error (%d)\n", errno);
618                            return -1;
619                    }
620    
621                    log_common("Listening at %s:%u\n", inet_ntoa(sin.sin_addr), ntohs(sin.sin_port));
622    
623    #ifdef HAVE_SYS_EPOLL_H
624                    ev.events = EPOLLIN;
625                    ev.data.fd = socket_server[i];
626                    if (epoll_ctl(epollfd_server, EPOLL_CTL_ADD, socket_server[i], &ev) == -1)
627                    {
628                            log_error("epoll_ctl(socket_server[%d]) error (%d)\n", i, errno);
629                            if (close(epollfd_server) < 0)
630                            {
631                                    log_error("close(epoll) error (%d)\n");
632                            }
633                            return -1;
634                    }
635    #endif
636    
637                    flags_server[i] = fcntl(socket_server[i], F_GETFL, 0);
638                    fcntl(socket_server[i], F_SETFL, flags_server[i] | O_NONBLOCK);
639          }          }
640    
641          flags = fcntl(socket_server, F_GETFL, 0);          hash_dict_pid_sockaddr = hash_dict_create(MAX_CLIENT_LIMIT);
642          fcntl(socket_server, F_SETFL, flags | O_NONBLOCK);          if (hash_dict_pid_sockaddr == NULL)
643            {
644                    log_error("hash_dict_create(hash_dict_pid_sockaddr) error\n");
645                    return -1;
646            }
647            hash_dict_sockaddr_count = hash_dict_create(MAX_CLIENT_LIMIT);
648            if (hash_dict_sockaddr_count == NULL)
649            {
650                    log_error("hash_dict_create(hash_dict_sockaddr_count) error\n");
651                    return -1;
652            }
653    
654          // Startup complete          // Startup complete
655    #ifdef HAVE_SYSTEMD_SD_DAEMON_H
656          sd_notifyf(0, "READY=1\n"          sd_notifyf(0, "READY=1\n"
657                                    "STATUS=Listening at %s:%d\n"                                    "STATUS=Listening at %s:%d (Telnet) and %s:%d (SSH2)\n"
658                                    "MAINPID=%d",                                    "MAINPID=%d",
659                             hostaddr_server, port_server, getpid());                             hostaddr, port[0], hostaddr, port[1], getpid());
660    #endif
661    
662          while (!SYS_server_exit || SYS_child_process_count > 0)          while (!SYS_server_exit || SYS_child_process_count > 0)
663          {          {
664    #ifdef HAVE_SYSTEMD_SD_DAEMON_H
665                  if (SYS_server_exit && !sd_notify_stopping)                  if (SYS_server_exit && !sd_notify_stopping)
666                  {                  {
667                          sd_notify(0, "STOPPING=1");                          sd_notify(0, "STOPPING=1");
668                          sd_notify_stopping = 1;                          sd_notify_stopping = 1;
669                  }                  }
670    #endif
671    
672                  while ((SYS_child_exit || SYS_server_exit) && SYS_child_process_count > 0)                  while ((SYS_child_exit || SYS_server_exit) && SYS_child_process_count > 0)
673                  {                  {
674                          SYS_child_exit = 0;                          SYS_child_exit = 0;
675    
676                          siginfo.si_pid = 0;                          pid = waitpid(-1, &ret, WNOHANG);
677                          ret = waitid(P_ALL, 0, &siginfo, WEXITED | WNOHANG);                          if (pid > 0)
                         if (ret == 0 && siginfo.si_pid > 0)  
678                          {                          {
679                                  SYS_child_exit = 1; // Retry waitid                                  SYS_child_exit = 1; // Retry waitid
   
680                                  SYS_child_process_count--;                                  SYS_child_process_count--;
                                 log_std("Child process (%d) exited\n", siginfo.si_pid);  
681    
682                                  if (siginfo.si_pid != section_list_loader_pid)                                  if (WIFEXITED(ret))
683                                    {
684                                            log_common("Child process (%d) exited, status=%d\n", pid, WEXITSTATUS(ret));
685                                    }
686                                    else if (WIFSIGNALED(ret))
687                                    {
688                                            log_common("Child process (%d) is killed, status=%d\n", pid, WTERMSIG(ret));
689                                    }
690                                    else
691                                    {
692                                            log_common("Child process (%d) exited abnormally, status=%d\n", pid, ret);
693                                    }
694    
695                                    if (pid != section_list_loader_pid)
696                                  {                                  {
697                                          i = 0;                                          j = 0;
698                                          for (; i < BBS_max_client; i++)                                          ret = hash_dict_get(hash_dict_pid_sockaddr, (uint64_t)pid, (int64_t *)&j);
699                                            if (ret < 0)
700                                          {                                          {
701                                                  if (process_sockaddr_pool[i].pid == siginfo.si_pid)                                                  log_error("hash_dict_get(hash_dict_pid_sockaddr, %d) error\n", pid);
                                                 {  
                                                         process_sockaddr_pool[i].pid = 0;  
                                                         break;  
                                                 }  
702                                          }                                          }
703                                          if (i >= BBS_max_client)                                          else
704                                          {                                          {
705                                                  log_error("Child process (%d) not found in process sockaddr pool\n", siginfo.si_pid);                                                  ret = hash_dict_inc(hash_dict_sockaddr_count, (uint64_t)j, -1);
706                                                    if (ret < 0)
707                                                    {
708                                                            log_error("hash_dict_inc(hash_dict_sockaddr_count, %d, -1) error\n", j);
709                                                    }
710    
711                                                    ret = hash_dict_del(hash_dict_pid_sockaddr, (uint64_t)pid);
712                                                    if (ret < 0)
713                                                    {
714                                                            log_error("hash_dict_del(hash_dict_pid_sockaddr, %d) error\n", pid);
715                                                    }
716                                          }                                          }
717                                  }                                  }
718                          }                          }
719                          else if (ret == 0)                          else if (pid == 0)
720                          {                          {
721                                  break;                                  break;
722                          }                          }
723                          else if (ret < 0)                          else if (pid < 0)
724                          {                          {
725                                  log_error("Error in waitid: %d\n", errno);                                  log_error("Error in waitpid(): %d\n", errno);
726                                  break;                                  break;
727                          }                          }
728                  }                  }
729    
730                  if (SYS_server_exit && !SYS_child_exit && SYS_child_process_count > 0)                  if (SYS_server_exit && !SYS_child_exit && SYS_child_process_count > 0)
731                  {                  {
732                          log_std("Notify %d child process to exit\n", SYS_child_process_count);                          if (notify_child_exit == 0)
                         if (kill(0, SIGTERM) < 0)  
733                          {                          {
734                                  log_error("Send SIGTERM signal failed (%d)\n", errno);  #ifdef HAVE_SYSTEMD_SD_DAEMON_H
735                                    sd_notifyf(0, "STATUS=Notify %d child process to exit", SYS_child_process_count);
736                                    log_common("Notify %d child process to exit\n", SYS_child_process_count);
737    #endif
738    
739                                    if (kill(0, SIGTERM) < 0)
740                                    {
741                                            log_error("Send SIGTERM signal failed (%d)\n", errno);
742                                    }
743    
744                                    notify_child_exit = 1;
745                                    tm_notify_child_exit = time(NULL);
746                          }                          }
747                            else if (notify_child_exit == 1 && time(NULL) - tm_notify_child_exit >= WAIT_CHILD_PROCESS_EXIT_TIMEOUT)
748                            {
749    #ifdef HAVE_SYSTEMD_SD_DAEMON_H
750                                    sd_notifyf(0, "STATUS=Kill %d child process", SYS_child_process_count);
751    #endif
752    
753                          sd_notifyf(0, "STATUS=Waiting for %d child process to exit", SYS_child_process_count);                                  if (kill(0, SIGKILL) < 0)
754                                    {
755                                            log_error("Send SIGKILL signal failed (%d)\n", errno);
756                                    }
757    
758                                    notify_child_exit = 2;
759                                    tm_notify_child_exit = time(NULL);
760                            }
761                            else if (notify_child_exit == 2 && time(NULL) - tm_notify_child_exit >= WAIT_CHILD_PROCESS_KILL_TIMEOUT)
762                            {
763                                    log_error("Main process prepare to exit without waiting for %d child process any longer\n", SYS_child_process_count);
764                                    SYS_child_process_count = 0;
765                            }
766                  }                  }
767    
768                  if (SYS_conf_reload && !SYS_server_exit)                  if (SYS_conf_reload && !SYS_server_exit)
769                  {                  {
770                          SYS_conf_reload = 0;                          SYS_conf_reload = 0;
771    
772    #ifdef HAVE_SYSTEMD_SD_DAEMON_H
773                          sd_notify(0, "RELOADING=1");                          sd_notify(0, "RELOADING=1");
774    #endif
775    
776                            // Restart log
777                            if (log_restart() < 0)
778                            {
779                                    log_error("Restart logging failed\n");
780                            }
781    
782                          // Reload configuration                          // Reload configuration
783                          if (load_conf(CONF_BBSD) < 0)                          if (load_conf(CONF_BBSD) < 0)
# Line 207  int net_server(const char *hostaddr, in_ Line 785  int net_server(const char *hostaddr, in_
785                                  log_error("Reload conf failed\n");                                  log_error("Reload conf failed\n");
786                          }                          }
787    
788                          p_bbs_menu_new = calloc(1, sizeof(MENU_SET));                          // Reload BWF config
789                          if (p_bbs_menu_new == NULL)                          if (bwf_load(CONF_BWF) < 0)
790                          {                          {
791                                  log_error("OOM: calloc(MENU_SET)\n");                                  log_error("Reload BWF conf failed\n");
792                          }                          }
                         else if (load_menu(p_bbs_menu_new, CONF_MENU) < 0)  
                         {  
                                 unload_menu(p_bbs_menu_new);  
                                 free(p_bbs_menu_new);  
                                 p_bbs_menu_new = NULL;  
793    
794                                  log_error("Reload menu failed\n");                          if (detach_menu_shm(&bbs_menu) < 0)
795                            {
796                                    log_error("detach_menu_shm(bbs_menu) error\n");
797                          }                          }
798                          else                          if (load_menu(&bbs_menu, CONF_MENU) < 0)
799                          {                          {
800                                  unload_menu(p_bbs_menu);                                  log_error("load_menu(bbs_menu) error\n");
801                                  free(p_bbs_menu);                                  unload_menu(&bbs_menu);
   
                                 p_bbs_menu = p_bbs_menu_new;  
                                 p_bbs_menu_new = NULL;  
   
                                 log_std("Reload menu successfully\n");  
802                          }                          }
803    
804                          sd_notify(0, "READY=1");                          if (detach_menu_shm(&top10_menu) < 0)
805                  }                          {
806                                    log_error("detach_menu_shm(top10_menu) error\n");
807                  if (SYS_data_file_reload && !SYS_server_exit)                          }
808                  {                          if (load_menu(&top10_menu, CONF_TOP10_MENU) < 0)
809                          SYS_data_file_reload = 0;                          {
810                          sd_notify(0, "RELOADING=1");                                  log_error("load_menu(top10_menu) error\n");
811                                    unload_menu(&top10_menu);
812                            }
813    
814                          for (int i = 0; i < data_files_load_startup_count; i++)                          for (int i = 0; i < data_files_load_startup_count; i++)
815                          {                          {
816                                  if (load_file(data_files_load_startup[i]) < 0)                                  if (load_file(data_files_load_startup[i]) < 0)
817                                  {                                  {
818                                          log_error("load_file_mmap(%s) error\n", data_files_load_startup[i]);                                          log_error("load_file(%s) error\n", data_files_load_startup[i]);
819                                  }                                  }
820                          }                          }
821    
822                          log_std("Reload data files successfully\n");                          // Load section config and gen_ex
823                          sd_notify(0, "READY=1");                          if (load_section_config_from_db(1) < 0)
824                  }                          {
825                                    log_error("load_section_config_from_db(1) error\n");
826                  if (SYS_section_list_reload && !SYS_server_exit)                          }
                 {  
                         SYS_section_list_reload = 0;  
827    
828                          if (section_list_loader_reload() < 0)                          // Notify child processes to reload configuration
829                            if (kill(0, SIGUSR1) < 0)
830                          {                          {
831                                  log_error("ksection_list_loader_reload() failed\n");                                  log_error("Send SIGUSR1 signal failed (%d)\n", errno);
832                          }                          }
                 }  
833    
834                  nfds = epoll_wait(epollfd, events, MAX_EVENTS, 100); // 0.1 second  #ifdef HAVE_SYSTEMD_SD_DAEMON_H
835                            sd_notify(0, "READY=1");
836    #endif
837                    }
838    
839                  if (nfds < 0)  #ifdef HAVE_SYS_EPOLL_H
840                    nfds = epoll_wait(epollfd_server, events, MAX_EVENTS, 100); // 0.1 second
841                    ret = nfds;
842    #else
843                    pfds[0].fd = socket_server[0];
844                    pfds[0].events = POLLIN;
845                    pfds[1].fd = socket_server[1];
846                    pfds[1].events = POLLIN;
847                    nfds = 2;
848                    ret = poll(pfds, (nfds_t)nfds, 100); // 0.1 second
849    #endif
850                    if (ret < 0)
851                  {                  {
852                          if (errno != EINTR)                          if (errno != EINTR)
853                          {                          {
854    #ifdef HAVE_SYS_EPOLL_H
855                                  log_error("epoll_wait() error (%d)\n", errno);                                  log_error("epoll_wait() error (%d)\n", errno);
856    #else
857                                    log_error("poll() error (%d)\n", errno);
858    #endif
859                                  break;                                  break;
860                          }                          }
861                          continue;                          continue;
# Line 281  int net_server(const char *hostaddr, in_ Line 869  int net_server(const char *hostaddr, in_
869    
870                  for (int i = 0; i < nfds; i++)                  for (int i = 0; i < nfds; i++)
871                  {                  {
872                          if (events[i].data.fd == socket_server)  #ifdef HAVE_SYS_EPOLL_H
873                          {                          if (events[i].data.fd == socket_server[0] || events[i].data.fd == socket_server[1])
874    #else
875                            if ((pfds[i].fd == socket_server[0] || pfds[i].fd == socket_server[1]) && (pfds[i].revents & POLLIN))
876    #endif
877                            {
878    #ifdef HAVE_SYS_EPOLL_H
879                                    SSH_v2 = (events[i].data.fd == socket_server[1] ? 1 : 0);
880    #else
881                                    SSH_v2 = (pfds[i].fd == socket_server[1] ? 1 : 0);
882    #endif
883    
884                                  while (!SYS_server_exit) // Accept all incoming connections until error                                  while (!SYS_server_exit) // Accept all incoming connections until error
885                                  {                                  {
886                                          socket_client = accept(socket_server, (struct sockaddr *)&sin, &namelen);                                          addrlen = sizeof(sin);
887                                            socket_client = accept(socket_server[SSH_v2], (struct sockaddr *)&sin, (socklen_t *)&addrlen);
888                                          if (socket_client < 0)                                          if (socket_client < 0)
889                                          {                                          {
890                                                  if (errno == EAGAIN || errno == EWOULDBLOCK)                                                  if (errno == EAGAIN || errno == EWOULDBLOCK)
# Line 308  int net_server(const char *hostaddr, in_ Line 907  int net_server(const char *hostaddr, in_
907    
908                                          port_client = ntohs(sin.sin_port);                                          port_client = ntohs(sin.sin_port);
909    
910                                          log_std("Accept connection from %s:%d\n", hostaddr_client, port_client);                                          log_common("Accept %s connection from %s:%d\n", (SSH_v2 ? "SSH" : "telnet"), hostaddr_client, port_client);
911    
912                                          if (SYS_child_process_count - 1 < BBS_max_client)                                          if (SYS_child_process_count - 1 < BBS_max_client)
913                                          {                                          {
914                                                  j = 0;                                                  j = 0;
915                                                  for (i = 0; i < BBS_max_client; i++)                                                  ret = hash_dict_get(hash_dict_sockaddr_count, (uint64_t)sin.sin_addr.s_addr, (int64_t *)&j);
916                                                    if (ret < 0)
917                                                  {                                                  {
918                                                          if (process_sockaddr_pool[i].pid != 0 && process_sockaddr_pool[i].s_addr == sin.sin_addr.s_addr)                                                          log_error("hash_dict_get(hash_dict_sockaddr_count, %s) error\n", hostaddr_client);
                                                         {  
                                                                 j++;  
                                                                 if (j >= BBS_max_client_per_ip)  
                                                                 {  
                                                                         log_error("Too many client connections (%d) from %s\n", j, hostaddr_client);  
                                                                         break;  
                                                                 }  
                                                         }  
919                                                  }                                                  }
920    
921                                                  if (j < BBS_max_client_per_ip)                                                  if (j < BBS_max_client_per_ip)
# Line 334  int net_server(const char *hostaddr, in_ Line 926  int net_server(const char *hostaddr, in_
926                                                          }                                                          }
927                                                          else if (pid > 0)                                                          else if (pid > 0)
928                                                          {                                                          {
929                                                                  i = 0;                                                                  ret = hash_dict_set(hash_dict_pid_sockaddr, (uint64_t)pid, sin.sin_addr.s_addr);
930                                                                  for (; i < BBS_max_client; i++)                                                                  if (ret < 0)
931                                                                  {                                                                  {
932                                                                          if (process_sockaddr_pool[i].pid == 0)                                                                          log_error("hash_dict_set(hash_dict_pid_sockaddr, %d, %s) error\n", pid, hostaddr_client);
                                                                         {  
                                                                                 break;  
                                                                         }  
933                                                                  }                                                                  }
934    
935                                                                  if (i >= BBS_max_client)                                                                  ret = hash_dict_inc(hash_dict_sockaddr_count, (uint64_t)sin.sin_addr.s_addr, 1);
936                                                                    if (ret < 0)
937                                                                  {                                                                  {
938                                                                          log_error("Process sockaddr pool depleted\n");                                                                          log_error("hash_dict_inc(hash_dict_sockaddr_count, %s, %d) error\n", hostaddr_client, 1);
                                                                 }  
                                                                 else  
                                                                 {  
                                                                         process_sockaddr_pool[i].pid = pid;  
                                                                         process_sockaddr_pool[i].s_addr = sin.sin_addr.s_addr;  
939                                                                  }                                                                  }
940                                                          }                                                          }
941                                                  }                                                  }
942                                                    else
943                                                    {
944                                                            log_error("Rejected client connection from %s over limit per IP (%d)\n", hostaddr_client, BBS_max_client_per_ip);
945                                                    }
946                                          }                                          }
947                                          else                                          else
948                                          {                                          {
# Line 369  int net_server(const char *hostaddr, in_ Line 958  int net_server(const char *hostaddr, in_
958                  }                  }
959          }          }
960    
961          if (close(epollfd) < 0)  #ifdef HAVE_SYS_EPOLL_H
962            if (close(epollfd_server) < 0)
963          {          {
964                  log_error("close(epoll) error (%d)\n");                  log_error("close(epollfd_server) error (%d)\n");
965          }          }
966    #endif
967    
968          fcntl(socket_server, F_SETFL, flags);          for (i = 0; i < 2; i++)
   
         if (close(socket_server) == -1)  
969          {          {
970                  log_error("Close server socket failed\n");                  if (close(socket_server[i]) == -1)
971                    {
972                            log_error("Close server socket failed\n");
973                    }
974          }          }
975    
976            hash_dict_destroy(hash_dict_pid_sockaddr);
977            hash_dict_destroy(hash_dict_sockaddr_count);
978    
979            ssh_bind_free(sshbind);
980            ssh_finalize();
981    
982          return 0;          return 0;
983  }  }

Legend:
Removed lines/characters  
Changed lines/characters
  Added lines/characters
webmaster@leafok.com
 ViewVC Help
Powered by ViewVC 1.3.0-beta1