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


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

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