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


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

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