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


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

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