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


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

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