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


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

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