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

Diff of /lbbs/src/bbs_net.c

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

Revision 1.11 by sysadm, Sat Apr 16 04:49:11 2005 UTC Revision 1.80 by sysadm, Wed Nov 5 04:19:21 2025 UTC
# Line 1  Line 1 
1  /***************************************************************************  /* SPDX-License-Identifier: GPL-3.0-or-later */
2                            bbs_net.c  -  description  /*
3                               -------------------   * bbs_net
4      begin                : Mon Oct 18 2004   *   - user interactive feature of site shuttle
5      copyright            : (C) 2004 by Leaflet   *
6      email                : leaflet@leafok.com   * Copyright (C) 2004-2025  Leaflet <leaflet@leafok.com>
7   ***************************************************************************/   */
   
 /***************************************************************************  
  *                                                                         *  
  *   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 2 of the License, or     *  
  *   (at your option) any later version.                                   *  
  *                                                                         *  
  ***************************************************************************/  
8    
9  #include "bbs.h"  #include "bbs.h"
10  #include "common.h"  #include "common.h"
11  #include "io.h"  #include "io.h"
12    #include "log.h"
13    #include "login.h"
14  #include "menu.h"  #include "menu.h"
15  #include "tcplib.h"  #include "screen.h"
16  #include <stdio.h>  #include <errno.h>
17    #include <fcntl.h>
18    #include <netdb.h>
19  #include <stdarg.h>  #include <stdarg.h>
20  #include <sys/ioctl.h>  #include <stdio.h>
21  #include <sys/socket.h>  #include <stdlib.h>
22  #include <netinet/in.h>  #include <string.h>
 #include <arpa/inet.h>  
23  #include <time.h>  #include <time.h>
24  #include <unistd.h>  #include <unistd.h>
25  #include <netdb.h>  #include <arpa/inet.h>
26    #include <libssh/libssh.h>
27    #include <libssh/server.h>
28    #include <libssh/callbacks.h>
29    #include <netinet/in.h>
30    #include <netinet/ip.h>
31    #include <sys/select.h>
32    #include <sys/ioctl.h>
33    #include <sys/socket.h>
34    #include <sys/epoll.h>
35    
36    static const char MENU_CONF_DELIM[] = " \t\r\n";
37    
38  #define TIME_OUT                15  enum _bbs_net_constant_t
39  #define MAX_PROCESS_BAR_LEN     30  {
40  #define MAXSTATION              26*2          MAX_PROCESS_BAR_LEN = 30,
41  #define STATION_PER_LINE        4          MAXSTATION = 26 * 2,
42            STATION_PER_LINE = 4,
43    };
44    
45  struct _bbsnet_conf  struct _bbsnet_conf
46  {  {
47    char host1[20];          char host1[20];
48    char host2[40];          char host2[40];
49    char ip[40];          char ip[40];
50    int port;          in_port_t port;
51            char charset[CHARSET_MAX_LEN + 1];
52  } bbsnet_conf[MAXSTATION];  } bbsnet_conf[MAXSTATION];
53    
54  MENU_SET bbsnet_menu;  static MENU_SET bbsnet_menu;
55    
56  int  static int load_bbsnet_conf(const char *file_config)
 load_bbsnet_conf (const char *file_config)  
57  {  {
58    FILE *fp;          FILE *fp;
59    MENU *p_menu;          MENU *p_menu;
60    MENU_ITEM *p_menuitem;          MENU_ITEM *p_menu_item;
61    char t[256], *t1, *t2, *t3, *t4;          MENU_ITEM_ID menu_item_id;
62    int item_count = 0;          char t[256], *t1, *t2, *t3, *t4, *t5, *saveptr;
63    
64    fp = fopen (file_config, "r");          fp = fopen(file_config, "r");
65    if (fp == NULL)          if (fp == NULL)
66      return -1;          {
67                    return -1;
68    p_menu = bbsnet_menu.p_menu[0] = malloc (sizeof (MENU));          }
   strcpy (p_menu->name, "BBSNET");  
   p_menu->title.show = 0;  
   p_menu->screen.show = 0;  
   
   while (fgets (t, 255, fp) && item_count < MAXSTATION)  
     {  
       t1 = strtok (t, " \t");  
       t2 = strtok (NULL, " \t\n");  
       t3 = strtok (NULL, " \t\n");  
       t4 = strtok (NULL, " \t\n");  
   
       if (t1[0] == '#' || t1[0] == '*' || t1 == NULL || t2 == NULL  
           || t3 == NULL)  
         continue;  
       strncpy (bbsnet_conf[item_count].host1, t2, 18);  
       bbsnet_conf[item_count].host1[18] = 0;  
       strncpy (bbsnet_conf[item_count].host2, t1, 36);  
       bbsnet_conf[item_count].host2[36] = 0;  
       strncpy (bbsnet_conf[item_count].ip, t3, 36);  
       bbsnet_conf[item_count].ip[36] = 0;  
       bbsnet_conf[item_count].port = t4 ? atoi (t4) : 23;  
   
       p_menuitem = p_menu->items[item_count] = malloc (sizeof (MENU_ITEM));  
       p_menuitem->row = 2 + item_count / STATION_PER_LINE;  
       p_menuitem->col = 5 + item_count % STATION_PER_LINE * 20;  
       sprintf (p_menuitem->action, "%d", item_count);  
       p_menuitem->submenu = 0;  
       p_menuitem->priv = 0;  
       p_menuitem->level = 0;  
       p_menuitem->display = 0;  
       p_menuitem->name[0] =  
         (item_count < MAXSTATION / 2 ? 'A' + item_count : 'a' + item_count);  
       p_menuitem->name[1] = '\0';  
       sprintf (p_menuitem->text, "%c. %s",  
                p_menuitem->name[0], bbsnet_conf[item_count].host1);  
   
       item_count++;  
     }  
   fclose (fp);  
   
   p_menu->item_count = item_count;  
   p_menu->item_cur_pos = 0;  
   
   bbsnet_menu.menu_count = 1;  
   bbsnet_menu.menu_select_depth = 0;  
   bbsnet_menu.p_menu_select[0] = bbsnet_menu.p_menu[0];  
69    
70    return 0;          bbsnet_menu.p_menu_pool = calloc(1, sizeof(MENU));
71            if (bbsnet_menu.p_menu_pool == NULL)
72            {
73                    log_error("calloc(p_menu_pool) error\n");
74                    return -3;
75            }
76            bbsnet_menu.menu_count = 1;
77    
78            bbsnet_menu.p_menu_item_pool = calloc(MAXSTATION, sizeof(MENU_ITEM));
79            if (bbsnet_menu.p_menu_item_pool == NULL)
80            {
81                    log_error("calloc(p_menu_item_pool) error\n");
82                    return -3;
83            }
84            bbsnet_menu.menu_item_count = MAXSTATION;
85    
86            p_menu = (MENU *)get_menu_by_id(&bbsnet_menu, 0);
87    
88            strncpy(p_menu->name, "BBSNET", sizeof(p_menu->name) - 1);
89            p_menu->name[sizeof(p_menu->name) - 1] = '\0';
90            p_menu->title.show = 0;
91            p_menu->screen_show = 0;
92    
93            menu_item_id = 0;
94            while (fgets(t, 255, fp) && menu_item_id < MAXSTATION)
95            {
96                    t1 = strtok_r(t, MENU_CONF_DELIM, &saveptr);
97                    t2 = strtok_r(NULL, MENU_CONF_DELIM, &saveptr);
98                    t3 = strtok_r(NULL, MENU_CONF_DELIM, &saveptr);
99                    t4 = strtok_r(NULL, MENU_CONF_DELIM, &saveptr);
100                    t5 = strtok_r(NULL, MENU_CONF_DELIM, &saveptr);
101    
102                    if (t1 == NULL || t2 == NULL || t3 == NULL || t4 == NULL || t5 == NULL || t[0] == '#' || t[0] == '*')
103                    {
104                            continue;
105                    }
106    
107                    strncpy(bbsnet_conf[menu_item_id].host1, t2, sizeof(bbsnet_conf[menu_item_id].host1) - 1);
108                    bbsnet_conf[menu_item_id].host1[sizeof(bbsnet_conf[menu_item_id].host1) - 1] = '\0';
109                    strncpy(bbsnet_conf[menu_item_id].host2, t1, sizeof(bbsnet_conf[menu_item_id].host2) - 1);
110                    bbsnet_conf[menu_item_id].host2[sizeof(bbsnet_conf[menu_item_id].host2) - 1] = '\0';
111                    strncpy(bbsnet_conf[menu_item_id].ip, t3, sizeof(bbsnet_conf[menu_item_id].ip) - 1);
112                    bbsnet_conf[menu_item_id].ip[sizeof(bbsnet_conf[menu_item_id].ip) - 1] = '\0';
113                    bbsnet_conf[menu_item_id].port = (in_port_t)(t4 ? atoi(t4) : 23);
114                    strncpy(bbsnet_conf[menu_item_id].charset, t5, sizeof(bbsnet_conf[menu_item_id].charset) - 1);
115                    bbsnet_conf[menu_item_id].charset[sizeof(bbsnet_conf[menu_item_id].charset) - 1] = '\0';
116    
117                    p_menu_item = get_menu_item_by_id(&bbsnet_menu, menu_item_id);
118                    if (p_menu_item == NULL)
119                    {
120                            log_error("get_menu_item_by_id(%d) return NULL pointer\n", menu_item_id);
121                            return -1;
122                    }
123    
124                    p_menu_item->row = (int16_t)(2 + menu_item_id / STATION_PER_LINE);
125                    p_menu_item->col = (int16_t)(5 + menu_item_id % STATION_PER_LINE * 20);
126                    snprintf(p_menu_item->action, sizeof(p_menu_item->action), "%d", (int16_t)menu_item_id);
127                    p_menu_item->submenu = 0;
128                    p_menu_item->priv = 0;
129                    p_menu_item->level = 0;
130                    p_menu_item->name[0] =
131                            (char)(menu_item_id < MAXSTATION / 2 ? 'A' + menu_item_id : 'a' + menu_item_id);
132                    p_menu_item->name[1] = '\0';
133                    snprintf(p_menu_item->text, sizeof(p_menu_item->text), "%c. %s",
134                                     p_menu_item->name[0], bbsnet_conf[menu_item_id].host1);
135    
136                    p_menu->items[p_menu->item_count] = menu_item_id;
137                    p_menu->item_count++;
138                    menu_item_id++;
139            }
140    
141            bbsnet_menu.menu_item_count = (int16_t)menu_item_id;
142            bbsnet_menu.menu_id_path[0] = 0;
143            bbsnet_menu.menu_item_pos[0] = 0;
144            bbsnet_menu.choose_step = 0;
145    
146            fclose(fp);
147    
148            return 0;
149  }  }
150    
151  static void  static void unload_bbsnet_conf(void)
 process_bar (int n, int len)  
152  {  {
153    char buf[256];          bbsnet_menu.menu_count = 0;
154    char buf2[256];          bbsnet_menu.menu_item_count = 0;
155    char *ptr;  
156    char *ptr2;          free(bbsnet_menu.p_menu_pool);
157    char *ptr3;          bbsnet_menu.p_menu_pool = NULL;
158            free(bbsnet_menu.p_menu_item_pool);
159    moveto (4, 0);          bbsnet_menu.p_menu_item_pool = NULL;
   prints ("\r\n");  
   sprintf (buf2, "            %3d%%              ", n * 100 / len);  
   ptr = buf;  
   ptr2 = buf2;  
   ptr3 = buf + n;  
   while (ptr != ptr3)  
     *ptr++ = *ptr2++;  
   *ptr++ = '\x1b';  
   *ptr++ = '[';  
   *ptr++ = '4';  
   *ptr++ = '4';  
   *ptr++ = 'm';  
   while (*ptr2 != '\0')  
     *ptr++ = *ptr2++;  
   *ptr++ = '\0';  
   prints ("\033[46m%s\033[m\r\n", buf);  
   prints ("\r\n");  
   iflush ();  
160  }  }
161    
162  int  static void process_bar(int n, int len)
 bbsnet_connect (int n)  
163  {  {
164    int sock, ch, result, len, loop;          char buf[LINE_BUFFER_LEN];
165    struct sockaddr_in sin;          char buf2[LINE_BUFFER_LEN];
   char buf[256];  
   fd_set inputs, testfds;  
   struct timeval timeout;  
   struct hostent *pHost = NULL;  
   int rc, rv, tos = 020, i;  
   char remote_addr[256];  
   int remote_port;  
   time_t t_used;  
   struct tm *tm_used;  
   
   clearscr ();  
   
   moveto (0, 0);  
   prints ("\033[1;32mڲ %s (%s) ӣԺ... \033[m\r\n",  
           bbsnet_conf[n].host1, bbsnet_conf[n].ip);  
   prints ("\033[1;32m %d ޷ϣ򽫷ӡ\033[m\r\n",  
           TIME_OUT);  
   iflush ();  
   
   pHost = gethostbyname (bbsnet_conf[n].ip);  
   
   if (pHost == NULL)  
     {  
       prints ("\033[1;31mʧܣ\033[m\r\n");  
       press_any_key ();  
       return -1;  
     }  
   
   sock = socket (AF_INET, SOCK_STREAM, IPPROTO_TCP);  
   
   if (sock < 0)  
     {  
       prints ("\033[1;31m޷socket\033[m\r\n");  
       press_any_key ();  
       return -1;  
     }  
   
   sin.sin_family = AF_INET;  
   sin.sin_addr.s_addr =  
     (strlen (hostaddr_server) > 0 ? inet_addr (hostaddr_server) : INADDR_ANY);  
   sin.sin_port = 0;  
   
   if (bind (sock, (struct sockaddr *) &sin, sizeof (sin)) < 0)  
     {  
       log_error ("Bind address %s:%u failed\n",  
                  inet_ntoa (sin.sin_addr), ntohs (sin.sin_port));  
       return -2;  
     }  
   
   bzero (&sin, sizeof (sin));  
   sin.sin_family = AF_INET;  
   sin.sin_addr = *(struct in_addr *) pHost->h_addr_list[0];  
   sin.sin_port = htons (bbsnet_conf[n].port);  
   
   strcpy (remote_addr, inet_ntoa (sin.sin_addr));  
   remote_port = ntohs (sin.sin_port);  
   
   prints ("\033[1;32mʾǰʹõʱ䡣\033[m\r\n");  
   process_bar (0, MAX_PROCESS_BAR_LEN);  
   for (i = 0; i < MAX_PROCESS_BAR_LEN; i++)  
     {  
       if (i == 0)  
         rv =  
           NonBlockConnectEx (sock, (struct sockaddr *) &sin, sizeof (sin),  
                              500, 1);  
       else  
         rv =  
           NonBlockConnectEx (sock, (struct sockaddr *) &sin, sizeof (sin),  
                              500, 0);  
       if (rv == ERR_TCPLIB_TIMEOUT)  
         {  
           process_bar (i + 1, MAX_PROCESS_BAR_LEN);  
           continue;  
         }  
       else if (rv == 0)  
         break;  
       else  
         {  
           prints ("\033[1;31mʧܣ\033[m\r\n");  
           press_any_key ();  
           return -1;  
         }  
     }  
   if (i == MAX_PROCESS_BAR_LEN)  
     {  
       prints ("\033[1;31mӳʱ\033[m\r\n");  
       press_any_key ();  
       return -1;  
     }  
   setsockopt (sock, IPPROTO_IP, IP_TOS, &tos, sizeof (int));  
   
   prints ("\033[1;31mӳɹ\033[m\r\n");  
   log_std ("BBSNET connect to %s:%d\n", remote_addr, remote_port);  
   
   FD_ZERO (&inputs);  
   FD_SET (0, &inputs);  
   FD_SET (sock, &inputs);  
   
   BBS_last_access_tm = t_used = time (0);  
   
   loop = 1;  
   
   while (loop)  
     {  
       testfds = inputs;  
       timeout.tv_sec = TIME_OUT;  
       timeout.tv_usec = 0;  
   
       result = select (FD_SETSIZE, &testfds, (fd_set *) NULL,  
                        (fd_set *) NULL, &timeout);  
   
       switch (result)  
         {  
         case 0:  
           if (time (0) - BBS_last_access_tm >= MAX_DELAY_TIME)  
             {  
               loop = 0;  
             }  
           break;  
         case -1:  
           log_error ("select() error!\n");  
           break;  
         default:  
           if (FD_ISSET (0, &testfds))  
             {  
               len = read (0, buf, 255);  
               if (len == 0)  
                 {  
                   loop = 0;  
                   break;  
                 }  
               write (sock, buf, len);  
             }  
           if (FD_ISSET (sock, &testfds))  
             {  
               len = read (sock, buf, 255);  
               if (len == 0)  
                 {  
                   loop = 0;  
                   break;  
                 }  
               write (1, buf, len);  
             }  
           BBS_last_access_tm = time (0);  
           break;  
         }  
     }  
   
   if (close (sock) == -1)  
     {  
       log_error ("Close socket failed\n");  
     }  
   
   t_used = time (0) - t_used;  
   tm_used = gmtime (&t_used);  
   
   log_std ("BBSNET disconnect, %d days %d hours %d minutes %d seconds used\n",  
            tm_used->tm_mday - 1, tm_used->tm_hour, tm_used->tm_min,  
            tm_used->tm_sec);  
166    
167    return 0;          if (len > LINE_BUFFER_LEN)
168            {
169                    len = LINE_BUFFER_LEN - 1;
170            }
171            if (n < 0)
172            {
173                    n = 0;
174            }
175            else if (n > len)
176            {
177                    n = len;
178            }
179    
180            moveto(4, 0);
181            prints(" ------------------------------ \r\n");
182            snprintf(buf, sizeof(buf), "            %3d%%              ", n * 100 / len);
183            memcpy(buf2, buf, (size_t)n);
184            buf2[n] = '\0';
185            prints("|\033[46m%s\033[44m%s\033[m|\r\n", buf2, buf + n);
186            prints(" ------------------------------ \r\n");
187            iflush();
188  }  }
189    
190  static int  static int bbsnet_connect(int n)
 bbsnet_refresh ()  
191  {  {
192    int i;          int sock, ret, loop, error;
193            int sock_connected = 0;
194            int flags_sock;
195            int flags_stdin;
196            int flags_stdout;
197            int len;
198            struct sockaddr_in sin;
199            char input_buf[LINE_BUFFER_LEN];
200            char output_buf[LINE_BUFFER_LEN];
201            int input_buf_len = 0;
202            int output_buf_len = 0;
203            int input_buf_offset = 0;
204            int output_buf_offset = 0;
205            char input_conv[LINE_BUFFER_LEN * 2];
206            char output_conv[LINE_BUFFER_LEN * 2];
207            int input_conv_len = 0;
208            int output_conv_len = 0;
209            int input_conv_offset = 0;
210            int output_conv_offset = 0;
211            iconv_t input_cd = NULL;
212            iconv_t output_cd = NULL;
213            char tocode[32];
214            struct epoll_event ev, events[MAX_EVENTS];
215            int nfds, epollfd;
216            int stdin_read_wait = 0;
217            int stdout_write_wait = 0;
218            int sock_read_wait = 0;
219            int sock_write_wait = 0;
220            struct hostent *p_host = NULL;
221            int tos;
222            char remote_addr[IP_ADDR_LEN];
223            int remote_port;
224            char local_addr[IP_ADDR_LEN];
225            int local_port;
226            socklen_t sock_len;
227            time_t t_used = time(NULL);
228            struct tm *tm_used;
229            int ch;
230    
231            if (user_online_update("BBS_NET") < 0)
232            {
233                    log_error("user_online_update(BBS_NET) error\n");
234            }
235    
236            clearscr();
237    
238            moveto(0, 0);
239            prints("\033[1;32m正在测试往 %s (%s) 的连接,请稍候... \033[m\r\n",
240                       bbsnet_conf[n].host1, bbsnet_conf[n].ip);
241            iflush();
242    
243            p_host = gethostbyname(bbsnet_conf[n].ip);
244    
245            if (p_host == NULL)
246            {
247                    prints("\033[1;31m查找主机名失败!\033[m\r\n");
248                    press_any_key();
249                    return -1;
250            }
251    
252            sock = socket(AF_INET, SOCK_STREAM, IPPROTO_TCP);
253    
254            if (sock < 0)
255            {
256                    prints("\033[1;31m无法创建socket!\033[m\r\n");
257                    press_any_key();
258                    return -1;
259            }
260    
261            sin.sin_family = AF_INET;
262            sin.sin_addr.s_addr = (BBS_address[0] != '\0' ? inet_addr(BBS_address) : INADDR_ANY);
263            sin.sin_port = 0;
264    
265            if (bind(sock, (struct sockaddr *)&sin, sizeof(sin)) < 0)
266            {
267                    log_error("Bind address %s:%u failed (%d)\n",
268                                      inet_ntoa(sin.sin_addr), ntohs(sin.sin_port), errno);
269                    return -2;
270            }
271    
272            memset(&sin, 0, sizeof(sin));
273            sin.sin_family = AF_INET;
274            sin.sin_addr = *(struct in_addr *)p_host->h_addr_list[0];
275            sin.sin_port = htons(bbsnet_conf[n].port);
276    
277            strncpy(remote_addr, inet_ntoa(sin.sin_addr), sizeof(remote_addr) - 1);
278            remote_addr[sizeof(remote_addr) - 1] = '\0';
279            remote_port = ntohs(sin.sin_port);
280    
281            prints("\033[1;32m穿梭进度条提示您当前已使用的时间,按\033[1;33mCtrl+C\033[1;32m中断。\033[m\r\n");
282            process_bar(0, MAX_PROCESS_BAR_LEN);
283    
284            // Set socket as non-blocking
285            flags_sock = fcntl(sock, F_GETFL, 0);
286            fcntl(sock, F_SETFL, flags_sock | O_NONBLOCK);
287    
288            // Set STDIN/STDOUT as non-blocking
289            flags_stdin = fcntl(STDIN_FILENO, F_GETFL, 0);
290            flags_stdout = fcntl(STDOUT_FILENO, F_GETFL, 0);
291            fcntl(STDIN_FILENO, F_SETFL, flags_stdin | O_NONBLOCK);
292            fcntl(STDOUT_FILENO, F_SETFL, flags_stdout | O_NONBLOCK);
293    
294    clearscr ();          epollfd = epoll_create1(0);
295    moveto (1, 0);          if (epollfd < 0)
296    prints          {
297      ("qTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTr");                  log_error("epoll_create1() error (%d)\n", errno);
298    for (i = 2; i < 19; i++)                  return -1;
299      {          }
300        moveto (i, 0);  
301        prints ("U");          ev.events = EPOLLOUT | EPOLLET;
302        moveto (i, 79);          ev.data.fd = sock;
303        prints ("U");          if (epoll_ctl(epollfd, EPOLL_CTL_ADD, sock, &ev) == -1)
304      }          {
305    moveto (19, 0);                  log_error("epoll_ctl(socket) error (%d)\n", errno);
306    prints                  goto cleanup;
307      ("UU");          }
308    moveto (22, 0);  
309    prints          ev.events = EPOLLIN | EPOLLET;
310      ("tTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTs");          ev.data.fd = STDIN_FILENO;
311    moveto (23, 0);          if (epoll_ctl(epollfd, EPOLL_CTL_ADD, STDIN_FILENO, &ev) == -1)
312    prints (" [\x1b[1;32mCtrl+C\x1b[m]˳");          {
313    iflush ();                  log_error("epoll_ctl(STDIN_FILENO) error (%d)\n", errno);
314                    goto cleanup;
315            }
316    
317            while (!SYS_server_exit)
318            {
319                    if ((ret = connect(sock, (struct sockaddr *)&sin, sizeof(sin))) < 0)
320                    {
321                            if (errno == EAGAIN || errno == EALREADY || errno == EINPROGRESS)
322                            {
323                                    // Use select / epoll to check writability of the socket,
324                                    // then use getsockopt to check the status of the socket.
325                                    // See man connect(2)
326                                    break;
327                            }
328                            else if (errno == EINTR)
329                            {
330                                    continue;
331                            }
332                            else
333                            {
334                                    log_error("connect(socket) error (%d)\n", errno);
335    
336    return 0;                                  prints("\033[1;31m连接失败!\033[m\r\n");
337                                    press_any_key();
338    
339                                    goto cleanup;
340                            }
341                    }
342            }
343    
344            for (int j = 0; j < MAX_PROCESS_BAR_LEN && !sock_connected && !SYS_server_exit; j++)
345            {
346                    nfds = epoll_wait(epollfd, events, MAX_EVENTS, 500); // 0.5 second
347    
348                    if (nfds < 0)
349                    {
350                            if (errno != EINTR)
351                            {
352                                    log_error("epoll_wait() error (%d)\n", errno);
353                                    break;
354                            }
355                    }
356                    else if (nfds == 0) // timeout
357                    {
358                            process_bar(j + 1, MAX_PROCESS_BAR_LEN);
359                    }
360                    else // ret > 0
361                    {
362                            for (int i = 0; i < nfds; i++)
363                            {
364                                    if (events[i].data.fd == sock)
365                                    {
366                                            len = sizeof(error);
367                                            if (getsockopt(sock, SOL_SOCKET, SO_ERROR, &error, (socklen_t *)&len) < 0)
368                                            {
369                                                    log_error("getsockopt() error (%d) !\n", error);
370                                                    goto cleanup;
371                                            }
372                                            if (error == 0)
373                                            {
374                                                    sock_connected = 1;
375                                            }
376                                    }
377                                    else if (events[i].data.fd == STDIN_FILENO)
378                                    {
379                                            ch = igetch(0);
380                                            if (ch == Ctrl('C') || ch == KEY_ESC)
381                                            {
382                                                    goto cleanup;
383                                            }
384                                    }
385                            }
386                    }
387            }
388            if (SYS_server_exit)
389            {
390                    goto cleanup;
391            }
392            if (!sock_connected)
393            {
394                    prints("\033[1;31m连接失败!\033[m\r\n");
395                    press_any_key();
396    
397                    goto cleanup;
398            }
399    
400            tos = IPTOS_LOWDELAY;
401            if (setsockopt(sock, IPPROTO_IP, IP_TOS, &tos, sizeof(tos)) < 0)
402            {
403                    log_error("setsockopt IP_TOS=%d error (%d)\n", tos, errno);
404            }
405    
406            sock_len = sizeof(sin);
407            if (getsockname(sock, (struct sockaddr *)&sin, &sock_len) < 0)
408            {
409                    log_error("getsockname() error: %d", errno);
410                    goto cleanup;
411            }
412    
413            strncpy(local_addr, inet_ntoa(sin.sin_addr), sizeof(local_addr) - 1);
414            local_addr[sizeof(local_addr) - 1] = '\0';
415            local_port = ntohs(sin.sin_port);
416    
417            prints("\033[1;31m连接成功!\033[m\r\n");
418            iflush();
419            log_common("BBSNET connect to %s:%d from %s:%d by [%s]\n",
420                               remote_addr, remote_port, local_addr, local_port, BBS_username);
421    
422            snprintf(tocode, sizeof(tocode), "%s%s", bbsnet_conf[n].charset,
423                             (strcasecmp(stdio_charset, bbsnet_conf[n].charset) == 0 ? "" : "//IGNORE"));
424            input_cd = iconv_open(tocode, stdio_charset);
425            if (input_cd == (iconv_t)(-1))
426            {
427                    log_error("iconv_open(%s->%s) error: %d\n", stdio_charset, tocode, errno);
428                    goto cleanup;
429            }
430    
431            snprintf(tocode, sizeof(tocode), "%s%s", stdio_charset,
432                             (strcasecmp(bbsnet_conf[n].charset, stdio_charset) == 0 ? "" : "//TRANSLIT"));
433            output_cd = iconv_open(tocode, bbsnet_conf[n].charset);
434            if (output_cd == (iconv_t)(-1))
435            {
436                    log_error("iconv_open(%s->%s) error: %d\n", bbsnet_conf[n].charset, tocode, errno);
437                    iconv_close(input_cd);
438                    goto cleanup;
439            }
440    
441            ev.events = EPOLLIN | EPOLLOUT | EPOLLET;
442            ev.data.fd = sock;
443            if (epoll_ctl(epollfd, EPOLL_CTL_MOD, sock, &ev) == -1)
444            {
445                    log_error("epoll_ctl(socket) error (%d)\n", errno);
446                    goto cleanup;
447            }
448    
449            ev.events = EPOLLOUT | EPOLLET;
450            ev.data.fd = STDOUT_FILENO;
451            if (epoll_ctl(epollfd, EPOLL_CTL_ADD, STDOUT_FILENO, &ev) == -1)
452            {
453                    log_error("epoll_ctl(STDOUT_FILENO) error (%d)\n", errno);
454                    goto cleanup;
455            }
456    
457            BBS_last_access_tm = t_used = time(NULL);
458            loop = 1;
459    
460            while (loop && !SYS_server_exit)
461            {
462                    if (SSH_v2 && ssh_channel_is_closed(SSH_channel))
463                    {
464                            log_error("SSH channel is closed\n");
465                            loop = 0;
466                            break;
467                    }
468    
469                    nfds = epoll_wait(epollfd, events, MAX_EVENTS, 100); // 0.1 second
470    
471                    if (nfds < 0)
472                    {
473                            if (errno != EINTR)
474                            {
475                                    log_error("epoll_wait() error (%d)\n", errno);
476                                    break;
477                            }
478                            continue;
479                    }
480                    else if (nfds == 0) // timeout
481                    {
482                            if (time(NULL) - BBS_last_access_tm >= BBS_max_user_idle_time)
483                            {
484                                    break;
485                            }
486                    }
487    
488                    for (int i = 0; i < nfds; i++)
489                    {
490                            if (events[i].data.fd == STDIN_FILENO)
491                            {
492                                    stdin_read_wait = 1;
493                            }
494    
495                            if (events[i].data.fd == sock)
496                            {
497                                    if (events[i].events & EPOLLIN)
498                                    {
499                                            sock_read_wait = 1;
500                                    }
501                                    if (events[i].events & EPOLLOUT)
502                                    {
503                                            sock_write_wait = 1;
504                                    }
505                            }
506    
507                            if (events[i].data.fd == STDOUT_FILENO)
508                            {
509                                    stdout_write_wait = 1;
510                            }
511                    }
512    
513                    if (stdin_read_wait)
514                    {
515                            while (input_buf_len < sizeof(input_buf) && !SYS_server_exit)
516                            {
517                                    if (SSH_v2)
518                                    {
519                                            ret = ssh_channel_read_nonblocking(SSH_channel, input_buf + input_buf_len, sizeof(input_buf) - (uint32_t)input_buf_len, 0);
520                                            if (ret == SSH_ERROR)
521                                            {
522                                                    log_error("ssh_channel_read_nonblocking() error: %s\n", ssh_get_error(SSH_session));
523                                                    loop = 0;
524                                                    break;
525                                            }
526                                            else if (ret == SSH_EOF)
527                                            {
528                                                    stdin_read_wait = 0;
529                                                    loop = 0;
530                                                    break;
531                                            }
532                                            else if (ret == 0)
533                                            {
534                                                    // Send NO-OP to remote server
535                                                    input_buf[input_buf_len] = '\0';
536                                                    input_buf_len++;
537                                                    BBS_last_access_tm = time(NULL);
538    
539                                                    stdin_read_wait = 0;
540                                                    break; // Check whether channel is still open
541                                            }
542                                    }
543                                    else
544                                    {
545                                            ret = (int)read(STDIN_FILENO, input_buf + input_buf_len, sizeof(input_buf) - (size_t)input_buf_len);
546                                    }
547                                    if (ret < 0)
548                                    {
549                                            if (errno == EAGAIN || errno == EWOULDBLOCK)
550                                            {
551                                                    stdin_read_wait = 0;
552                                                    break;
553                                            }
554                                            else if (errno == EINTR)
555                                            {
556                                                    continue;
557                                            }
558                                            else
559                                            {
560                                                    log_error("read(STDIN) error (%d)\n", errno);
561                                                    loop = 0;
562                                                    break;
563                                            }
564                                    }
565                                    else if (ret == 0) // broken pipe
566                                    {
567    #ifdef _DEBUG
568                                            log_error("read(STDIN) EOF\n");
569    #endif
570                                            stdin_read_wait = 0;
571                                            loop = 0;
572                                            break;
573                                    }
574                                    else
575                                    {
576                                            input_buf_len += ret;
577                                            BBS_last_access_tm = time(NULL);
578    
579                                            // Refresh current action while user input
580                                            if (user_online_update("BBS_NET") < 0)
581                                            {
582                                                    log_error("user_online_update(BBS_NET) error\n");
583                                            }
584    
585                                            continue;
586                                    }
587                            }
588                    }
589    
590                    if (sock_write_wait)
591                    {
592                            if (input_buf_offset < input_buf_len)
593                            {
594                                    // For debug
595    #ifdef _DEBUG
596                                    for (int j = input_buf_offset; j < input_buf_len; j++)
597                                    {
598                                            log_error("Debug input: <--[%u]\n", (input_buf[j] + 256) % 256);
599                                    }
600    #endif
601    
602                                    ret = io_buf_conv(input_cd, input_buf, &input_buf_len, &input_buf_offset, input_conv, sizeof(input_conv), &input_conv_len);
603                                    if (ret < 0)
604                                    {
605                                            log_error("io_buf_conv(input, %d, %d, %d) error\n", input_buf_len, input_buf_offset, input_conv_len);
606                                            input_buf_len = input_buf_offset; // Discard invalid sequence
607                                    }
608    
609                                    // For debug
610    #ifdef _DEBUG
611                                    for (int j = input_conv_offset; j < input_conv_len; j++)
612                                    {
613                                            log_error("Debug input_conv: <--[%u]\n", (input_conv[j] + 256) % 256);
614                                    }
615    #endif
616                            }
617    
618                            while (input_conv_offset < input_conv_len && !SYS_server_exit)
619                            {
620                                    ret = (int)write(sock, input_conv + input_conv_offset, (size_t)(input_conv_len - input_conv_offset));
621                                    if (ret < 0)
622                                    {
623                                            if (errno == EAGAIN || errno == EWOULDBLOCK)
624                                            {
625                                                    sock_write_wait = 0;
626                                                    break;
627                                            }
628                                            else if (errno == EINTR)
629                                            {
630                                                    continue;
631                                            }
632                                            else
633                                            {
634                                                    log_error("write(socket) error (%d)\n", errno);
635                                                    loop = 0;
636                                                    break;
637                                            }
638                                    }
639                                    else if (ret == 0) // broken pipe
640                                    {
641    #ifdef _DEBUG
642                                            log_error("write(socket) EOF\n");
643    #endif
644                                            sock_write_wait = 0;
645                                            loop = 0;
646                                            break;
647                                    }
648                                    else
649                                    {
650                                            input_conv_offset += ret;
651                                            if (input_conv_offset >= input_conv_len) // Output buffer complete
652                                            {
653                                                    input_conv_offset = 0;
654                                                    input_conv_len = 0;
655                                                    break;
656                                            }
657                                            continue;
658                                    }
659                            }
660                    }
661    
662                    if (sock_read_wait)
663                    {
664                            while (output_buf_len < sizeof(output_buf) && !SYS_server_exit)
665                            {
666                                    ret = (int)read(sock, output_buf + output_buf_len, sizeof(output_buf) - (size_t)output_buf_len);
667                                    if (ret < 0)
668                                    {
669                                            if (errno == EAGAIN || errno == EWOULDBLOCK)
670                                            {
671                                                    sock_read_wait = 0;
672                                                    break;
673                                            }
674                                            else if (errno == EINTR)
675                                            {
676                                                    continue;
677                                            }
678                                            else
679                                            {
680                                                    log_error("read(socket) error (%d)\n", errno);
681                                                    loop = 0;
682                                                    break;
683                                            }
684                                    }
685                                    else if (ret == 0) // broken pipe
686                                    {
687    #ifdef _DEBUG
688                                            log_error("read(socket) EOF\n");
689    #endif
690                                            sock_read_wait = 0;
691                                            loop = 0;
692                                            break;
693                                    }
694                                    else
695                                    {
696                                            output_buf_len += ret;
697                                            continue;
698                                    }
699                            }
700                    }
701    
702                    if (stdout_write_wait)
703                    {
704                            if (output_buf_offset < output_buf_len)
705                            {
706                                    ret = io_buf_conv(output_cd, output_buf, &output_buf_len, &output_buf_offset, output_conv, sizeof(output_conv), &output_conv_len);
707                                    if (ret < 0)
708                                    {
709                                            log_error("io_buf_conv(output, %d, %d, %d) error\n", output_buf_len, output_buf_offset, output_conv_len);
710                                            output_buf_len = output_buf_offset; // Discard invalid sequence
711                                    }
712                            }
713    
714                            while (output_conv_offset < output_conv_len && !SYS_server_exit)
715                            {
716                                    if (SSH_v2)
717                                    {
718                                            ret = ssh_channel_write(SSH_channel, output_conv + output_conv_offset, (uint32_t)(output_conv_len - output_conv_offset));
719                                            if (ret == SSH_ERROR)
720                                            {
721                                                    log_error("ssh_channel_write() error: %s\n", ssh_get_error(SSH_session));
722                                                    loop = 0;
723                                                    break;
724                                            }
725                                    }
726                                    else
727                                    {
728                                            ret = (int)write(STDOUT_FILENO, output_conv + output_conv_offset, (size_t)(output_conv_len - output_conv_offset));
729                                    }
730                                    if (ret < 0)
731                                    {
732                                            if (errno == EAGAIN || errno == EWOULDBLOCK)
733                                            {
734                                                    stdout_write_wait = 0;
735                                                    break;
736                                            }
737                                            else if (errno == EINTR)
738                                            {
739                                                    continue;
740                                            }
741                                            else
742                                            {
743                                                    log_error("write(STDOUT) error (%d)\n", errno);
744                                                    loop = 0;
745                                                    break;
746                                            }
747                                    }
748                                    else if (ret == 0) // broken pipe
749                                    {
750    #ifdef _DEBUG
751                                            log_error("write(STDOUT) EOF\n");
752    #endif
753                                            stdout_write_wait = 0;
754                                            loop = 0;
755                                            break;
756                                    }
757                                    else
758                                    {
759                                            output_conv_offset += ret;
760                                            if (output_conv_offset >= output_conv_len) // Output buffer complete
761                                            {
762                                                    output_conv_offset = 0;
763                                                    output_conv_len = 0;
764                                                    break;
765                                            }
766                                            continue;
767                                    }
768                            }
769                    }
770            }
771    
772            iconv_close(input_cd);
773            iconv_close(output_cd);
774    
775    cleanup:
776            if (close(epollfd) < 0)
777            {
778                    log_error("close(epoll) error (%d)\n");
779            }
780    
781            // Restore STDIN/STDOUT flags
782            fcntl(STDIN_FILENO, F_SETFL, flags_stdin);
783            fcntl(STDOUT_FILENO, F_SETFL, flags_stdout);
784    
785            // Restore socket flags
786            fcntl(sock, F_SETFL, flags_sock);
787    
788            if (close(sock) == -1)
789            {
790                    log_error("Close socket failed\n");
791            }
792    
793            t_used = time(NULL) - t_used;
794            tm_used = gmtime(&t_used);
795    
796            log_common("BBSNET disconnect, %d days %d hours %d minutes %d seconds used\n",
797                               tm_used->tm_mday - 1, tm_used->tm_hour, tm_used->tm_min,
798                               tm_used->tm_sec);
799    
800            BBS_last_access_tm = time(NULL);
801    
802            return 0;
803  }  }
804    
805  int  static int bbsnet_refresh()
 bbsnet_selchange (int new_pos)  
806  {  {
807    moveto (20, 0);          clearscr();
808    clrtoeol ();          moveto(1, 0);
809    prints ("U\x1b[1mλ:\x1b[1;33m%-18s\x1b[m  վ:\x1b[1;33m%s\x1b[m",          prints(" ----------------------------------------------------------------------------- ");
810            bbsnet_conf[new_pos].host2, bbsnet_conf[new_pos].host1);          for (int i = 2; i < 19; i++)
811    moveto (20, 79);          {
812    prints ("U");                  moveto(i, 0);
813    moveto (21, 0);                  prints("|");
814    clrtoeol ();                  moveto(i, 79);
815    prints ("U\x1b[1m:\x1b[1;33m%-20s", bbsnet_conf[new_pos].ip);                  prints("|");
816    if (bbsnet_conf[new_pos].port != 23)          }
817      prints ("  %d", bbsnet_conf[new_pos].port);          moveto(19, 0);
818    prints ("\x1b[m");          prints("|-----------------------------------------------------------------------------|");
819    moveto (21, 79);          moveto(22, 0);
820    prints ("U");          prints(" ----------------------------------------------------------------------------- ");
821    iflush ();          moveto(23, 0);
822            prints(" [\x1b[1;32mCtrl+C\x1b[m]退出");
823    
824            iflush();
825    
826    return 0;          return 0;
827  }  }
828    
829  int  static int bbsnet_selchange()
 bbs_net ()  
830  {  {
831    int ch, pos, i;          int i = bbsnet_menu.menu_item_pos[0];
   char file_config[256];  
832    
833    strcpy (file_config, app_home_dir);          moveto(20, 0);
834    strcat (file_config, "conf/bbsnet.conf");          clrtoeol();
835            prints("|\x1b[1m单位:\x1b[1;33m%-18s\x1b[m  站名:\x1b[1;33m%s\x1b[m",
836                       bbsnet_conf[i].host2, bbsnet_conf[i].host1);
837            moveto(20, 79);
838            prints("|");
839            moveto(21, 0);
840            clrtoeol();
841            prints("|\x1b[1m连往:\x1b[1;33m%-20s", bbsnet_conf[i].ip);
842            if (bbsnet_conf[i].port != 23)
843            {
844                    prints("  %d", bbsnet_conf[i].port);
845            }
846            prints("\x1b[m");
847            moveto(21, 79);
848            prints("|");
849            iflush();
850    
851    load_bbsnet_conf (file_config);          return 0;
852    }
853    
854    extern int bbs_net()
855    {
856            int ch, i;
857    
858    BBS_last_access_tm = time (0);          load_bbsnet_conf(CONF_BBSNET);
859    
860    clearscr ();          clearscr();
861    bbsnet_refresh ();          bbsnet_refresh();
862    pos = bbsnet_menu.p_menu[0]->item_cur_pos;          display_menu(&bbsnet_menu);
863    display_menu (get_menu (&bbsnet_menu, "BBSNET"));          bbsnet_selchange();
864    bbsnet_selchange (pos);  
865            while (!SYS_server_exit)
866    while (1)          {
867      {                  ch = igetch(100);
868        ch = igetch ();  
869        switch (ch)                  if (ch != KEY_NULL && ch != KEY_TIMEOUT)
870          {                  {
871          case KEY_NULL:                          BBS_last_access_tm = time(NULL);
872          case Ctrl ('C'):                  }
873            return 0;  
874          case KEY_TIMEOUT:                  switch (ch)
875            if (time (0) - BBS_last_access_tm >= MAX_DELAY_TIME)                  {
876              {                  case KEY_NULL: // broken pipe
877                return -1;                          log_error("KEY_NULL\n");
878              }                          goto cleanup;
879            continue;                  case KEY_TIMEOUT:
880          case CR:                          if (time(NULL) - BBS_last_access_tm >= BBS_max_user_idle_time)
881            pos = bbsnet_menu.p_menu[0]->item_cur_pos;                          {
882            bbsnet_connect (pos);                                  log_error("User input timeout\n");
883            bbsnet_refresh ();                                  goto cleanup;
884            display_current_menu (&bbsnet_menu);                          }
885            bbsnet_selchange (pos);                          continue;
886            break;                  case KEY_ESC:
887          case KEY_UP:                  case Ctrl('C'): // user cancel
888            for (i = 0; i < STATION_PER_LINE; i++)                          goto cleanup;
889              menu_control (&bbsnet_menu, KEY_UP);                  case CR:
890            pos = bbsnet_menu.p_menu[0]->item_cur_pos;                          bbsnet_connect(bbsnet_menu.menu_item_pos[0]);
891            bbsnet_selchange (pos);                          bbsnet_refresh();
892            break;                          display_menu(&bbsnet_menu);
893          case KEY_DOWN:                          bbsnet_selchange();
894            for (i = 0; i < STATION_PER_LINE; i++)                          break;
895              menu_control (&bbsnet_menu, KEY_DOWN);                  case KEY_UP:
896            pos = bbsnet_menu.p_menu[0]->item_cur_pos;                          for (i = 0; i < STATION_PER_LINE; i++)
897            bbsnet_selchange (pos);                          {
898            break;                                  menu_control(&bbsnet_menu, KEY_UP);
899          case KEY_LEFT:                          }
900            menu_control (&bbsnet_menu, KEY_UP);                          bbsnet_selchange();
901            pos = bbsnet_menu.p_menu[0]->item_cur_pos;                          break;
902            bbsnet_selchange (pos);                  case KEY_DOWN:
903            break;                          for (i = 0; i < STATION_PER_LINE; i++)
904          case KEY_RIGHT:                          {
905            menu_control (&bbsnet_menu, KEY_DOWN);                                  menu_control(&bbsnet_menu, KEY_DOWN);
906            pos = bbsnet_menu.p_menu[0]->item_cur_pos;                          }
907            bbsnet_selchange (pos);                          bbsnet_selchange();
908            break;                          break;
909          default:                  case KEY_LEFT:
910            menu_control (&bbsnet_menu, ch);                          menu_control(&bbsnet_menu, KEY_UP);
911            pos = bbsnet_menu.p_menu[0]->item_cur_pos;                          bbsnet_selchange();
912            bbsnet_selchange (pos);                          break;
913            break;                  case KEY_RIGHT:
914                            menu_control(&bbsnet_menu, KEY_DOWN);
915                            bbsnet_selchange();
916                            break;
917                    case KEY_HOME:
918                    case KEY_PGUP:
919                            menu_control(&bbsnet_menu, KEY_PGUP);
920                            bbsnet_selchange();
921                            break;
922                    case KEY_END:
923                    case KEY_PGDN:
924                            menu_control(&bbsnet_menu, KEY_PGDN);
925                            bbsnet_selchange();
926                            break;
927                    default:
928                            menu_control(&bbsnet_menu, ch);
929                            bbsnet_selchange();
930                            break;
931                    }
932          }          }
       BBS_last_access_tm = time (0);  
     }  
933    
934    return 0;  cleanup:
935            unload_bbsnet_conf();
936    
937            return 0;
938  }  }


Legend:
Removed lines/characters  
Changed lines/characters
  Added lines/characters

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