/[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.24 by sysadm, Mon May 5 14:27:57 2025 UTC Revision 1.35 by sysadm, Sun May 11 11:33: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 21  Line 20 
20  #include "io.h"  #include "io.h"
21  #include "screen.h"  #include "screen.h"
22  #include "menu.h"  #include "menu.h"
 #include "tcplib.h"  
23  #include <stdio.h>  #include <stdio.h>
24  #include <stdarg.h>  #include <stdarg.h>
25    #include <errno.h>
26    #include <string.h>
27    #include <stdlib.h>
28    #include <fcntl.h>
29    #include <time.h>
30    #include <unistd.h>
31    #include <netdb.h>
32    #include <sys/select.h>
33  #include <sys/ioctl.h>  #include <sys/ioctl.h>
34  #include <sys/socket.h>  #include <sys/socket.h>
35  #include <netinet/in.h>  #include <netinet/in.h>
36    #include <netinet/ip.h>
37  #include <arpa/inet.h>  #include <arpa/inet.h>
 #include <time.h>  
 #include <unistd.h>  
 #include <netdb.h>  
38    
39  #define TIME_OUT 15  #define MENU_CONF_DELIM " \t\r\n"
40    
41  #define MAX_PROCESS_BAR_LEN 30  #define MAX_PROCESS_BAR_LEN 30
42  #define MAXSTATION 26 * 2  #define MAXSTATION 26 * 2
43  #define STATION_PER_LINE 4  #define STATION_PER_LINE 4
# Line 69  int load_bbsnet_conf(const char *file_co Line 74  int load_bbsnet_conf(const char *file_co
74    
75          while (fgets(t, 255, fp) && item_count < MAXSTATION)          while (fgets(t, 255, fp) && item_count < MAXSTATION)
76          {          {
77                  t1 = strtok_r(t, " \t", &saveptr);                  t1 = strtok_r(t, MENU_CONF_DELIM, &saveptr);
78                  t2 = strtok_r(NULL, " \t\n", &saveptr);                  t2 = strtok_r(NULL, MENU_CONF_DELIM, &saveptr);
79                  t3 = strtok_r(NULL, " \t\n", &saveptr);                  t3 = strtok_r(NULL, MENU_CONF_DELIM, &saveptr);
80                  t4 = strtok_r(NULL, " \t\n", &saveptr);                  t4 = strtok_r(NULL, MENU_CONF_DELIM, &saveptr);
81    
82                  if (t1 == NULL || t2 == NULL || t3 == NULL || t[0] == '#' || t[0] == '*')                  if (t1 == NULL || t2 == NULL || t3 == NULL || t4 == NULL || t[0] == '#' || t[0] == '*')
83                  {                  {
84                          continue;                          continue;
85                  }                  }
# Line 117  int load_bbsnet_conf(const char *file_co Line 122  int load_bbsnet_conf(const char *file_co
122    
123  static void process_bar(int n, int len)  static void process_bar(int n, int len)
124  {  {
125          char buf[256];          char buf[LINE_BUFFER_LEN];
126          char buf2[256];          char buf2[LINE_BUFFER_LEN];
127          char *ptr;  
128          char *ptr2;          if (len > LINE_BUFFER_LEN)
129          char *ptr3;          {
130                    len = LINE_BUFFER_LEN - 1;
131            }
132            if (n < 0)
133            {
134                    n = 0;
135            }
136            else if (n > len)
137            {
138                    n = len;
139            }
140    
141          moveto(4, 0);          moveto(4, 0);
142          prints(" ------------------------------ \r\n");          prints(" ------------------------------ \r\n");
143          snprintf(buf2, sizeof(buf2), "            %3d%%              ", n * 100 / len);          snprintf(buf, sizeof(buf), "            %3d%%              ", n * 100 / len);
144          ptr = buf;          strncpy(buf2, buf, (size_t)n);
145          ptr2 = buf2;          buf2[n] = '\0';
146          ptr3 = buf + n;          prints("|\033[46m%s\033[44m%s\033[m|\r\n", buf2, buf + n);
         while (ptr != ptr3)  
                 *ptr++ = *ptr2++;  
         *ptr++ = '\x1b';  
         *ptr++ = '[';  
         *ptr++ = '4';  
         *ptr++ = '4';  
         *ptr++ = 'm';  
         while (*ptr2 != '\0')  
                 *ptr++ = *ptr2++;  
         *ptr++ = '\0';  
         prints("|\033[46m%s\033[m|\r\n", buf);  
147          prints(" ------------------------------ \r\n");          prints(" ------------------------------ \r\n");
148          iflush();          iflush();
149  }  }
150    
151  int bbsnet_connect(int n)  int bbsnet_connect(int n)
152  {  {
153          int sock, result, loop;          int sock, flags, ret, loop, error;
154          ssize_t len;          ssize_t len;
155          struct sockaddr_in sin;          struct sockaddr_in sin;
156          char buf[256];          char buf[LINE_BUFFER_LEN];
157          fd_set inputs, testfds;          fd_set read_fds;
158            fd_set write_fds;
159          struct timeval timeout;          struct timeval timeout;
160          struct hostent *pHost = NULL;          struct hostent *p_host = NULL;
161          int rv, tos = 020, i;          int tos;
162          char remote_addr[256];          int i;
163            char remote_addr[IP_ADDR_LEN];
164          int remote_port;          int remote_port;
165          time_t t_used;          time_t t_used;
166          struct tm *tm_used;          struct tm *tm_used;
167            int ch;
168            int offset;
169    
170          clearscr();          clearscr();
171    
172          moveto(0, 0);          moveto(0, 0);
173          prints("\033[1;32m正在测试往 %s (%s) 的连接，请稍候... \033[m\r\n",          prints("\033[1;32m正在测试往 %s (%s) 的连接，请稍候... \033[m\r\n",
174                     bbsnet_conf[n].host1, bbsnet_conf[n].ip);                     bbsnet_conf[n].host1, bbsnet_conf[n].ip);
         prints("\033[1;32m如果在 %d 秒内无法连上，穿梭程序将放弃连接。\033[m\r\n",  
                    TIME_OUT);  
175          iflush();          iflush();
176    
177          pHost = gethostbyname(bbsnet_conf[n].ip);          p_host = gethostbyname(bbsnet_conf[n].ip);
178    
179          if (pHost == NULL)          if (p_host == NULL)
180          {          {
181                  prints("\033[1;31m查找主机名失败！\033[m\r\n");                  prints("\033[1;31m查找主机名失败！\033[m\r\n");
182                  press_any_key();                  press_any_key();
# Line 187  int bbsnet_connect(int n) Line 193  int bbsnet_connect(int n)
193          }          }
194    
195          sin.sin_family = AF_INET;          sin.sin_family = AF_INET;
196          sin.sin_addr.s_addr =          sin.sin_addr.s_addr = (hostaddr_server[0] != '\0' ? inet_addr(hostaddr_server) : INADDR_ANY);
                 (strnlen(hostaddr_server, sizeof(hostaddr_server)) > 0 ? inet_addr(hostaddr_server) : INADDR_ANY);  
197          sin.sin_port = 0;          sin.sin_port = 0;
198    
199          if (bind(sock, (struct sockaddr *)&sin, sizeof(sin)) < 0)          if (bind(sock, (struct sockaddr *)&sin, sizeof(sin)) < 0)
200          {          {
201                  log_error("Bind address %s:%u failed\n",                  log_error("Bind address %s:%u failed (%d)\n",
202                                    inet_ntoa(sin.sin_addr), ntohs(sin.sin_port));                                    inet_ntoa(sin.sin_addr), ntohs(sin.sin_port), errno);
203                  return -2;                  return -2;
204          }          }
205    
206          bzero(&sin, sizeof(sin));          bzero(&sin, sizeof(sin));
207          sin.sin_family = AF_INET;          sin.sin_family = AF_INET;
208          sin.sin_addr = *(struct in_addr *)pHost->h_addr_list[0];          sin.sin_addr = *(struct in_addr *)p_host->h_addr_list[0];
209          sin.sin_port = htons(bbsnet_conf[n].port);          sin.sin_port = htons(bbsnet_conf[n].port);
210    
211          strncpy(remote_addr, inet_ntoa(sin.sin_addr), sizeof(remote_addr) - 1);          strncpy(remote_addr, inet_ntoa(sin.sin_addr), sizeof(remote_addr) - 1);
212          remote_addr[sizeof(remote_addr) - 1] = '\0';          remote_addr[sizeof(remote_addr) - 1] = '\0';
213          remote_port = ntohs(sin.sin_port);          remote_port = ntohs(sin.sin_port);
214    
215          prints("\033[1;32m穿梭进度条提示您当前已使用的时间。\033[m\r\n");          prints("\033[1;32m穿梭进度条提示您当前已使用的时间，按\033[1;33mCtrl+C\033[1;32m中断。\033[m\r\n");
216          process_bar(0, MAX_PROCESS_BAR_LEN);          process_bar(0, MAX_PROCESS_BAR_LEN);
217    
218            // Set socket as non-blocking
219            flags = fcntl(sock, F_GETFL, 0);
220            fcntl(sock, F_SETFL, flags | O_NONBLOCK);
221    
222            if ((ret = connect(sock, (struct sockaddr *)&sin, sizeof(sin))) < 0)
223            {
224                    if (errno != EINPROGRESS)
225                    {
226                            prints("\033[1;31m连接失败！\033[m\r\n");
227                            press_any_key();
228                            return -1;
229                    }
230            }
231    
232          for (i = 0; i < MAX_PROCESS_BAR_LEN; i++)          for (i = 0; i < MAX_PROCESS_BAR_LEN; i++)
233          {          {
234                  if (i == 0)                  ch = igetch(0); // 0.1 second
235                          rv =                  if (ch == Ctrl('C') || SYS_server_exit)
236                                  NonBlockConnectEx(sock, (struct sockaddr *)&sin, sizeof(sin),                  {
237                                                                    500, 1);                          return 0;
238                  else                  }
239                          rv =  
240                                  NonBlockConnectEx(sock, (struct sockaddr *)&sin, sizeof(sin),                  FD_ZERO(&read_fds);
241                                                                    500, 0);                  FD_SET(sock, &read_fds);
242                  if (rv == ERR_TCPLIB_TIMEOUT)  
243                    FD_ZERO(&write_fds);
244                    FD_SET(sock, &write_fds);
245    
246                    timeout.tv_sec = 0;
247                    timeout.tv_usec = 400 * 1000; // 0.4 second
248    
249                    ret = select(sock + 1, &read_fds, &write_fds, NULL, &timeout);
250    
251                    if (ret == 0) // Timeout
252                  {                  {
253                          process_bar(i + 1, MAX_PROCESS_BAR_LEN);                          process_bar(i + 1, MAX_PROCESS_BAR_LEN);
                         continue;  
254                  }                  }
255                  else if (rv == 0)                  else if (ret < 0)
256                  {                  {
257                          break;                          if (errno != EINTR)
258                            {
259                                    log_error("select() error (%d) !\n", errno);
260                                    return -1;
261                            }
262                  }                  }
263                  else                  // ret > 0
264                    else if (FD_ISSET(sock, &read_fds) || FD_ISSET(sock, &write_fds))
265                  {                  {
266                          prints("\033[1;31m连接失败！\033[m\r\n");                          len = sizeof(error);
267                          press_any_key();                          if (getsockopt(sock, SOL_SOCKET, SO_ERROR, &error, (socklen_t *)&len) < 0)
268                          return -1;                          {
269                                    log_error("getsockopt() error (%d) !\n", error);
270                                    return -1;
271                            }
272    
273                            break; // connected
274                  }                  }
275          }          }
276          if (i == MAX_PROCESS_BAR_LEN)          if (i == MAX_PROCESS_BAR_LEN)
# Line 241  int bbsnet_connect(int n) Line 279  int bbsnet_connect(int n)
279                  press_any_key();                  press_any_key();
280                  return -1;                  return -1;
281          }          }
282          setsockopt(sock, IPPROTO_IP, IP_TOS, &tos, sizeof(int));  
283            fcntl(sock, F_SETFL, flags); /* restore file status flags */
284    
285            tos = IPTOS_LOWDELAY;
286            if (setsockopt(sock, IPPROTO_IP, IP_TOS, &tos, sizeof(tos)) < 0)
287            {
288                    log_error("setsockopt IP_TOS=%d error (%d)\n", tos, errno);
289            }
290    
291          prints("\033[1;31m连接成功！\033[m\r\n");          prints("\033[1;31m连接成功！\033[m\r\n");
292            iflush();
293          log_std("BBSNET connect to %s:%d\n", remote_addr, remote_port);          log_std("BBSNET connect to %s:%d\n", remote_addr, remote_port);
294    
         FD_ZERO(&inputs);  
         FD_SET(0, &inputs);  
         FD_SET(sock, &inputs);  
   
295          BBS_last_access_tm = t_used = time(0);          BBS_last_access_tm = t_used = time(0);
   
296          loop = 1;          loop = 1;
297    
298          while (loop)          while (loop && !SYS_server_exit)
299          {          {
300                  testfds = inputs;                  FD_ZERO(&read_fds);
301                  timeout.tv_sec = TIME_OUT;                  FD_SET(STDIN_FILENO, &read_fds);
302                  timeout.tv_usec = 0;                  FD_SET(sock, &read_fds);
303    
304                    FD_ZERO(&write_fds);
305                    FD_SET(STDIN_FILENO, &write_fds);
306                    FD_SET(sock, &write_fds);
307    
308                    timeout.tv_sec = 0;
309                    timeout.tv_usec = 100 * 1000; // 0.1 second
310    
311                  result = SignalSafeSelect(FD_SETSIZE, &testfds, (fd_set *)NULL,                  ret = select(sock + 1, &read_fds, &write_fds, NULL, &timeout);
                                                                   (fd_set *)NULL, &timeout);  
312    
313                  if (result == 0)                  if (ret == 0) // timeout
314                  {                  {
315                          if (time(0) - BBS_last_access_tm >= MAX_DELAY_TIME)                          if (time(0) - BBS_last_access_tm >= MAX_DELAY_TIME)
316                          {                          {
317                                  loop = 0;                                  loop = 0;
318                          }                          }
319                  }                  }
320                  if (result < 0)                  else if (ret < 0)
321                  {                  {
322                          log_error("select() error (%d) !\n", result);                          if (errno != EINTR)
323                          loop = 0;                          {
324                                    log_error("select() error (%d) !\n", errno);
325                                    loop = 0;
326                            }
327                  }                  }
328                  if (result > 0)                  else if (ret > 0)
329                  {                  {
330                          if (FD_ISSET(0, &testfds))                          if (FD_ISSET(STDIN_FILENO, &read_fds) && FD_ISSET(sock, &write_fds))
331                          {                          {
332                                  len = read(0, buf, 255);                                  // Set STDIN as non-blocking
333                                  if (len == 0)                                  flags = fcntl(STDIN_FILENO, F_GETFL, 0);
334                                    fcntl(STDIN_FILENO, F_SETFL, flags | O_NONBLOCK);
335    
336                                    len = read(STDIN_FILENO, buf, sizeof(buf));
337                                    if (len < 0)
338                                  {                                  {
339                                            if (errno != EAGAIN && errno != EWOULDBLOCK && errno != EINTR)
340                                            {
341                                                    log_error("read(STDIN) error (%d)\n", errno);
342                                                    loop = 0;
343                                            }
344                                    }
345                                    else if (len == 0)
346                                    {
347                                            log_error("read(STDIN) reach EOF\n");
348                                          loop = 0;                                          loop = 0;
349                                  }                                  }
350                                  write(sock, buf, (size_t)len);                                  else
351                                    {
352                                            offset = 0;
353                                            do
354                                            {
355                                                    ret = (int)write(sock, buf + offset, (size_t)(len - offset));
356                                                    if (ret < 0)
357                                                    {
358                                                            log_error("write(socket) error (%d)\n", errno);
359                                                            loop = 0;
360                                                            break;
361                                                    }
362                                                    offset += ret;
363                                            } while (offset < len);
364    
365                                            BBS_last_access_tm = time(0);
366                                    }
367    
368                                    // Restore STDIN flags
369                                    fcntl(STDIN_FILENO, F_SETFL, flags);
370                          }                          }
371                          if (FD_ISSET(sock, &testfds))                          if (FD_ISSET(sock, &read_fds) && FD_ISSET(STDIN_FILENO, &write_fds))
372                          {                          {
373                                  len = read(sock, buf, 255);                                  // Set socket as non-blocking
374                                  if (len == 0)                                  flags = fcntl(sock, F_GETFL, 0);
375                                    fcntl(sock, F_SETFL, flags | O_NONBLOCK);
376    
377                                    len = read(sock, buf, sizeof(buf));
378                                    if (len < 0)
379                                    {
380                                            if (errno != EAGAIN && errno != EWOULDBLOCK && errno != EINTR)
381                                            {
382                                                    log_error("read(socket) error (%d)\n", errno);
383                                                    loop = 0;
384                                            }
385                                    }
386                                    else if (len == 0)
387                                  {                                  {
388                                            log_error("read(socket) reach EOF\n");
389                                          loop = 0;                                          loop = 0;
390                                  }                                  }
391                                  write(1, buf, (size_t)len);                                  else
392                                    {
393                                            offset = 0;
394                                            do
395                                            {
396                                                    ret = (int)write(STDOUT_FILENO, buf + offset, (size_t)(len - offset));
397                                                    if (ret < 0)
398                                                    {
399                                                            log_error("write(STDOUT) error (%d)\n", errno);
400                                                            loop = 0;
401                                                            break;
402                                                    }
403                                                    offset += ret;
404                                            } while (offset < len);
405                                    }
406    
407                                    // Restore socket flags
408                                    fcntl(sock, F_SETFL, flags);
409                          }                          }
                         BBS_last_access_tm = time(0);  
410                  }                  }
411          }          }
412    
# Line 376  int bbs_net() Line 487  int bbs_net()
487          display_menu(get_menu(&bbsnet_menu, "BBSNET"));          display_menu(get_menu(&bbsnet_menu, "BBSNET"));
488          bbsnet_selchange(pos);          bbsnet_selchange(pos);
489    
490          while (1)          while (!SYS_server_exit)
491          {          {
492                  ch = igetch(0);                  ch = igetch(0);
493                  switch (ch)                  switch (ch)
494                  {                  {
495                  case KEY_NULL:                  case KEY_NULL: // broken pipe
496                  case Ctrl('C'):                  case Ctrl('C'): // user cancel
497                          return 0;                          return 0;
498                  case KEY_TIMEOUT:                  case KEY_TIMEOUT:
499                          if (time(0) - BBS_last_access_tm >= MAX_DELAY_TIME)                          if (time(0) - BBS_last_access_tm >= MAX_DELAY_TIME)
500                          {                          {
501                                  return -1;                                  return 0;
502                          }                          }
503                          continue;                          continue;
504                  case CR:                  case CR:

Legend:
Removed lines/characters  
Changed lines/characters
  Added lines/characters
webmaster@leafok.com
 ViewVC Help
Powered by ViewVC 1.3.0-beta1