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

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