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


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

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