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


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

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