/[LeafOK_CVS]/lbbs/src/io.c
ViewVC logotype

Diff of /lbbs/src/io.c

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

Revision 1.56 by sysadm, Sun Oct 19 01:30:38 2025 UTC Revision 1.78 by sysadm, Thu Dec 18 11:37:08 2025 UTC
# Line 1  Line 1 
1  /***************************************************************************  /* SPDX-License-Identifier: GPL-3.0-or-later */
2                                                          io.c  -  description  /*
3                                                           -------------------   * io
4          Copyright            : (C) 2004-2025 by Leaflet   *   - basic terminal-based user input / output features
5          Email                : leaflet@leafok.com   *
6   ***************************************************************************/   * Copyright (C) 2004-2025  Leaflet <leaflet@leafok.com>
7     */
8  /***************************************************************************  
9   *                                                                         *  #ifdef HAVE_CONFIG_H
10   *   This program is free software; you can redistribute it and/or modify  *  #include "config.h"
11   *   it under the terms of the GNU General Public License as published by  *  #endif
  *   the Free Software Foundation; either version 3 of the License, or     *  
  *   (at your option) any later version.                                   *  
  *                                                                         *  
  ***************************************************************************/  
12    
13  #include "common.h"  #include "common.h"
14  #include "io.h"  #include "io.h"
# Line 24  Line 20 
20  #include <string.h>  #include <string.h>
21  #include <time.h>  #include <time.h>
22  #include <unistd.h>  #include <unistd.h>
 #include <sys/epoll.h>  
23  #include <sys/ioctl.h>  #include <sys/ioctl.h>
24  #include <sys/select.h>  #include <sys/select.h>
25  #include <libssh/callbacks.h>  #include <libssh/callbacks.h>
26  #include <libssh/libssh.h>  #include <libssh/libssh.h>
27  #include <libssh/server.h>  #include <libssh/server.h>
28    
29  char stdio_charset[32] = BBS_DEFAULT_CHARSET;  #ifdef HAVE_SYS_EPOLL_H
30    #include <sys/epoll.h>
31    #else
32    #include <poll.h>
33    #endif
34    
35    enum _io_constant_t
36    {
37            OUTPUT_BUF_SIZE = 8192,
38    };
39    
40    const char BBS_default_charset[CHARSET_MAX_LEN + 1] = "UTF-8";
41    char stdio_charset[CHARSET_MAX_LEN + 1] = "UTF-8";
42    
43    #ifdef HAVE_SYS_EPOLL_H
44    // epoll for STDIO
45    static int stdin_epollfd = -1;
46    static int stdout_epollfd = -1;
47    #endif
48    
49    static int stdin_flags = 0;
50    static int stdout_flags = 0;
51    
52  // static input / output buffer  // static input / output buffer
53  static char stdin_buf[LINE_BUFFER_LEN];  static char stdin_buf[LINE_BUFFER_LEN];
54  static char stdin_conv[LINE_BUFFER_LEN];  static char stdout_buf[OUTPUT_BUF_SIZE];
55  static int stdin_buf_len = 0;  static int stdin_buf_len = 0;
56  static int stdin_conv_len = 0;  static int stdout_buf_len = 0;
57  static int stdin_buf_offset = 0;  static int stdin_buf_offset = 0;
58  static int stdin_conv_offset = 0;  static int stdout_buf_offset = 0;
59    
60  static char stdout_buf[BUFSIZ];  static char stdin_conv[LINE_BUFFER_LEN * 2];
61  static char stdout_conv[BUFSIZ];  static char stdout_conv[OUTPUT_BUF_SIZE * 2];
62  static int stdout_buf_len = 0;  static int stdin_conv_len = 0;
63  static int stdout_conv_len = 0;  static int stdout_conv_len = 0;
64  static int stdout_buf_offset = 0;  static int stdin_conv_offset = 0;
65  static int stdout_conv_offset = 0;  static int stdout_conv_offset = 0;
66    
67  static iconv_t stdin_cd = NULL;  static iconv_t stdin_cd = (iconv_t)(-1);
68  static iconv_t stdout_cd = NULL;  static iconv_t stdout_cd = (iconv_t)(-1);
69    
70    int io_init(void)
71    {
72    #ifdef HAVE_SYS_EPOLL_H
73            struct epoll_event ev;
74    
75            if (stdin_epollfd == -1)
76            {
77                    stdin_epollfd = epoll_create1(0);
78                    if (stdin_epollfd == -1)
79                    {
80                            log_error("epoll_create1() error (%d)\n", errno);
81                            return -1;
82                    }
83    
84                    ev.events = EPOLLIN;
85                    ev.data.fd = STDIN_FILENO;
86                    if (epoll_ctl(stdin_epollfd, EPOLL_CTL_ADD, STDIN_FILENO, &ev) == -1)
87                    {
88                            log_error("epoll_ctl(STDIN_FILENO) error (%d)\n", errno);
89                            if (close(stdin_epollfd) < 0)
90                            {
91                                    log_error("close(stdin_epollfd) error (%d)\n", errno);
92                            }
93                            stdin_epollfd = -1;
94                            return -1;
95                    }
96    
97                    if ((stdin_flags = fcntl(STDIN_FILENO, F_GETFL, 0)) == -1)
98                    {
99                            log_error("fcntl(F_GETFL) error (%d)\n", errno);
100                            if (close(stdin_epollfd) < 0)
101                            {
102                                    log_error("close(stdin_epollfd) error (%d)\n", errno);
103                            }
104                            stdin_epollfd = -1;
105                            return -1;
106                    }
107                    if ((fcntl(STDIN_FILENO, F_SETFL, stdin_flags | O_NONBLOCK)) == -1)
108                    {
109                            log_error("fcntl(F_SETFL) error (%d)\n", errno);
110                            if (close(stdin_epollfd) < 0)
111                            {
112                                    log_error("close(stdin_epollfd) error (%d)\n", errno);
113                            }
114                            stdin_epollfd = -1;
115                            return -1;
116                    }
117            }
118    
119            if (stdout_epollfd == -1)
120            {
121                    stdout_epollfd = epoll_create1(0);
122                    if (stdout_epollfd == -1)
123                    {
124                            log_error("epoll_create1() error (%d)\n", errno);
125                            return -1;
126                    }
127    
128                    ev.events = EPOLLOUT;
129                    ev.data.fd = STDOUT_FILENO;
130                    if (epoll_ctl(stdout_epollfd, EPOLL_CTL_ADD, STDOUT_FILENO, &ev) == -1)
131                    {
132                            log_error("epoll_ctl(STDOUT_FILENO) error (%d)\n", errno);
133                            if (close(stdout_epollfd) < 0)
134                            {
135                                    log_error("close(stdout_epollfd) error (%d)\n", errno);
136                            }
137                            stdout_epollfd = -1;
138                            return -1;
139                    }
140    
141                    if ((stdout_flags = fcntl(STDOUT_FILENO, F_GETFL, 0)) == -1)
142                    {
143                            log_error("fcntl(F_GETFL) error (%d)\n", errno);
144                            if (close(stdout_epollfd) < 0)
145                            {
146                                    log_error("close(stdout_epollfd) error (%d)\n", errno);
147                            }
148                            stdout_epollfd = -1;
149                            return -1;
150                    }
151                    if ((fcntl(STDOUT_FILENO, F_SETFL, stdout_flags | O_NONBLOCK)) == -1)
152                    {
153                            log_error("fcntl(F_SETFL) error (%d)\n", errno);
154                            if (close(stdout_epollfd) < 0)
155                            {
156                                    log_error("close(stdout_epollfd) error (%d)\n", errno);
157                            }
158                            stdout_epollfd = -1;
159                            return -1;
160                    }
161            }
162    #else
163            if (stdin_flags == 0)
164            {
165                    if ((stdin_flags = fcntl(STDIN_FILENO, F_GETFL, 0)) == -1)
166                    {
167                            log_error("fcntl(F_GETFL) error (%d)\n", errno);
168                            return -1;
169                    }
170                    if ((fcntl(STDIN_FILENO, F_SETFL, stdin_flags | O_NONBLOCK)) == -1)
171                    {
172                            log_error("fcntl(F_SETFL) error (%d)\n", errno);
173                            return -1;
174                    }
175            }
176    
177            if (stdout_flags == 0)
178            {
179                    if ((stdout_flags = fcntl(STDOUT_FILENO, F_GETFL, 0)) == -1)
180                    {
181                            log_error("fcntl(F_GETFL) error (%d)\n", errno);
182                            return -1;
183                    }
184                    if ((fcntl(STDOUT_FILENO, F_SETFL, stdout_flags | O_NONBLOCK)) == -1)
185                    {
186                            log_error("fcntl(F_SETFL) error (%d)\n", errno);
187                            return -1;
188                    }
189            }
190    #endif
191    
192            return 0;
193    }
194    
195    void io_cleanup(void)
196    {
197    #ifdef HAVE_SYS_EPOLL_H
198            if (stdin_epollfd != -1)
199            {
200                    fcntl(STDIN_FILENO, F_SETFL, stdin_flags);
201                    stdin_flags = 0;
202    
203                    if (close(stdin_epollfd) < 0)
204                    {
205                            log_error("close(stdin_epollfd) error (%d)\n", errno);
206                    }
207                    stdin_epollfd = -1;
208            }
209    
210            if (stdout_epollfd != -1)
211            {
212                    fcntl(STDOUT_FILENO, F_SETFL, stdout_flags);
213                    stdout_flags = 0;
214    
215                    if (close(stdout_epollfd) < 0)
216                    {
217                            log_error("close(stdout_epollfd) error (%d)\n", errno);
218                    }
219                    stdout_epollfd = -1;
220            }
221    #else
222            if (stdin_flags != 0)
223            {
224                    fcntl(STDIN_FILENO, F_SETFL, stdin_flags);
225                    stdin_flags = 0;
226            }
227    
228            if (stdout_flags != 0)
229            {
230                    fcntl(STDOUT_FILENO, F_SETFL, stdout_flags);
231                    stdout_flags = 0;
232            }
233    #endif
234    }
235    
236  int prints(const char *format, ...)  int prints(const char *format, ...)
237  {  {
238          char buf[BUFSIZ];          char buf[OUTPUT_BUF_SIZE];
239          va_list args;          va_list args;
240          int ret;          int ret;
241    
# Line 63  int prints(const char *format, ...) Line 245  int prints(const char *format, ...)
245    
246          if (ret > 0)          if (ret > 0)
247          {          {
248                  if (stdout_buf_len + ret > BUFSIZ)                  int written = (ret >= sizeof(buf) ? (int)sizeof(buf) - 1 : ret);
249    
250                    if (stdout_buf_len + written > OUTPUT_BUF_SIZE)
251                  {                  {
252                          iflush();                          iflush();
253                  }                  }
254    
255                  if (stdout_buf_len + ret <= BUFSIZ)                  if (stdout_buf_len + written <= OUTPUT_BUF_SIZE)
256                  {                  {
257                          memcpy(stdout_buf + stdout_buf_len, buf, (size_t)ret);                          memcpy(stdout_buf + stdout_buf_len, buf, (size_t)written);
258                          stdout_buf_len += ret;                          stdout_buf_len += written;
259                  }                  }
260                  else                  else
261                  {                  {
262                          errno = EAGAIN;                          errno = EAGAIN;
263                          ret = (BUFSIZ - stdout_buf_len - ret);                          int need = stdout_buf_len + ret - OUTPUT_BUF_SIZE;
264                          log_error("Output buffer is full, additional %d is required\n", ret);                          log_error("Output buffer is full, additional %d is required\n", need);
265                            ret = -1;
266                  }                  }
267          }          }
268    
# Line 86  int prints(const char *format, ...) Line 271  int prints(const char *format, ...)
271    
272  int outc(char c)  int outc(char c)
273  {  {
274          int ret;          int ret = 0;
275    
276          if (stdout_buf_len + 1 > BUFSIZ)          if (stdout_buf_len + 1 > OUTPUT_BUF_SIZE)
277          {          {
278                  iflush();                  iflush();
279          }          }
280    
281          if (stdout_buf_len + 1 <= BUFSIZ)          if (stdout_buf_len + 1 <= OUTPUT_BUF_SIZE)
282          {          {
283                  stdout_buf[stdout_buf_len] = c;                  stdout_buf[stdout_buf_len] = c;
284                  stdout_buf_len++;                  stdout_buf_len++;
# Line 109  int outc(char c) Line 294  int outc(char c)
294    
295  int iflush(void)  int iflush(void)
296  {  {
297          int flags;  #ifdef HAVE_SYS_EPOLL_H
298          struct epoll_event ev, events[MAX_EVENTS];          struct epoll_event events[MAX_EVENTS];
299          int nfds, epollfd;  #else
300          int retry;          struct pollfd pfds[1];
301          int ret = 0;  #endif
   
         epollfd = epoll_create1(0);  
         if (epollfd < 0)  
         {  
                 log_error("epoll_create1() error (%d)\n", errno);  
                 return -1;  
         }  
   
         ev.events = EPOLLOUT;  
         ev.data.fd = STDOUT_FILENO;  
         if (epoll_ctl(epollfd, EPOLL_CTL_ADD, STDOUT_FILENO, &ev) == -1)  
         {  
                 log_error("epoll_ctl(STDOUT_FILENO) error (%d)\n", errno);  
                 if (close(epollfd) < 0)  
                 {  
                         log_error("close(epoll) error (%d)\n");  
                 }  
                 return -1;  
         }  
302    
303          // Set STDOUT as non-blocking          int nfds;
304          flags = fcntl(STDOUT_FILENO, F_GETFL, 0);          int ret = 0;
         fcntl(STDOUT_FILENO, F_SETFL, flags | O_NONBLOCK);  
305    
306          // Retry wait / flush for at most 3 times          // Retry wait / flush for at most 3 times
307          retry = 3;          for (int retry = 3; retry > 0 && !SYS_server_exit; retry--)
         while (retry > 0 && !SYS_server_exit)  
308          {          {
309                  retry--;  #ifdef HAVE_SYS_EPOLL_H
310                    nfds = epoll_wait(stdout_epollfd, events, MAX_EVENTS, 100); // 0.1 second
311                  nfds = epoll_wait(epollfd, events, MAX_EVENTS, 100); // 0.1 second                  ret = nfds;
312    #else
313                    pfds[0].fd = STDOUT_FILENO;
314                    pfds[0].events = POLLOUT;
315                    nfds = 1;
316                    ret = poll(pfds, (nfds_t)nfds, 100); // 0.1 second
317    #endif
318    
319                  if (nfds < 0)                  if (ret < 0)
320                  {                  {
321                          if (errno != EINTR)                          if (errno != EINTR)
322                          {                          {
323    #ifdef HAVE_SYS_EPOLL_H
324                                  log_error("epoll_wait() error (%d)\n", errno);                                  log_error("epoll_wait() error (%d)\n", errno);
325    #else
326                                    log_error("poll() error (%d)\n", errno);
327    #endif
328                                  break;                                  break;
329                          }                          }
330                          continue;                          continue;
331                  }                  }
332                  else if (nfds == 0) // timeout                  else if (ret == 0) // timeout
333                  {                  {
334                          continue;                          continue;
335                  }                  }
336    
337                  for (int i = 0; i < nfds; i++)                  for (int i = 0; i < nfds; i++)
338                  {                  {
339                          if (events[i].data.fd == STDOUT_FILENO)  #ifdef HAVE_SYS_EPOLL_H
340                            if (events[i].data.fd == STDOUT_FILENO && (events[i].events & (EPOLLHUP | EPOLLERR)))
341    #else
342                            if (pfds[i].fd == STDOUT_FILENO && (pfds[i].revents & (POLLHUP | POLLERR)))
343    #endif
344                            {
345    #ifdef HAVE_SYS_EPOLL_H
346                                    log_debug("STDOUT error events (%d)\n", events[i].events);
347    #else
348                                    log_debug("STDOUT error events (%d)\n", pfds[i].revents);
349    #endif
350                                    retry = 0;
351                                    break;
352                            }
353    
354    #ifdef HAVE_SYS_EPOLL_H
355                            if (events[i].data.fd == STDOUT_FILENO && (events[i].events & EPOLLOUT))
356    #else
357                            if (pfds[i].fd == STDOUT_FILENO && (pfds[i].revents & POLLOUT))
358    #endif
359                          {                          {
360                                  if (stdout_buf_offset < stdout_buf_len)                                  if (stdout_buf_offset < stdout_buf_len)
361                                  {                                  {
# Line 170  int iflush(void) Line 363  int iflush(void)
363                                          if (ret < 0)                                          if (ret < 0)
364                                          {                                          {
365                                                  log_error("io_buf_conv(stdout, %d, %d, %d) error\n", stdout_buf_len, stdout_buf_offset, stdout_conv_len);                                                  log_error("io_buf_conv(stdout, %d, %d, %d) error\n", stdout_buf_len, stdout_buf_offset, stdout_conv_len);
366                                                    stdout_buf_len = stdout_buf_offset; // Discard invalid sequence
367                                          }                                          }
368                                  }                                  }
369    
# Line 180  int iflush(void) Line 374  int iflush(void)
374                                                  ret = ssh_channel_write(SSH_channel, stdout_conv + stdout_conv_offset, (uint32_t)(stdout_conv_len - stdout_conv_offset));                                                  ret = ssh_channel_write(SSH_channel, stdout_conv + stdout_conv_offset, (uint32_t)(stdout_conv_len - stdout_conv_offset));
375                                                  if (ret == SSH_ERROR)                                                  if (ret == SSH_ERROR)
376                                                  {                                                  {
377                                                          log_error("ssh_channel_write() error: %s\n", ssh_get_error(SSH_session));                                                          log_debug("ssh_channel_write() error: %s\n", ssh_get_error(SSH_session));
378                                                          retry = 0;                                                          retry = 0;
379                                                          break;                                                          break;
380                                                  }                                                  }
# Line 201  int iflush(void) Line 395  int iflush(void)
395                                                  }                                                  }
396                                                  else                                                  else
397                                                  {                                                  {
398  #ifdef _DEBUG                                                          log_debug("write(STDOUT) error (%d)\n", errno);
                                                         log_error("write(STDOUT) error (%d)\n", errno);  
 #endif  
399                                                          retry = 0;                                                          retry = 0;
400                                                          break;                                                          break;
401                                                  }                                                  }
# Line 231  int iflush(void) Line 423  int iflush(void)
423                  }                  }
424          }          }
425    
         // Restore STDOUT flags  
         fcntl(STDOUT_FILENO, F_SETFL, flags);  
   
         if (close(epollfd) < 0)  
         {  
                 log_error("close(epoll) error (%d)\n");  
         }  
   
426          return ret;          return ret;
427  }  }
428    
429  int igetch(int timeout)  int igetch(int timeout)
430  {  {
431          struct epoll_event ev, events[MAX_EVENTS];          static int stdin_read_wait = 0;
432          int nfds, epollfd;  
433    #ifdef HAVE_SYS_EPOLL_H
434            struct epoll_event events[MAX_EVENTS];
435    #else
436            struct pollfd pfds[1];
437    #endif
438    
439            int nfds;
440          int ret;          int ret;
441          int loop;          int loop;
442    
# Line 255  int igetch(int timeout) Line 446  int igetch(int timeout)
446          int in_ascii = 0;          int in_ascii = 0;
447          int in_control = 0;          int in_control = 0;
448          int i = 0;          int i = 0;
         int flags;  
449    
450          if (stdin_conv_offset >= stdin_conv_len)          if (stdin_conv_offset >= stdin_conv_len)
451          {          {
452                  stdin_conv_len = 0;                  stdin_conv_len = 0;
453                  stdin_conv_offset = 0;                  stdin_conv_offset = 0;
454    
455                  epollfd = epoll_create1(0);                  for (loop = 1; loop && stdin_buf_len < sizeof(stdin_buf) && stdin_conv_offset >= stdin_conv_len && !SYS_server_exit;)
                 if (epollfd < 0)  
                 {  
                         log_error("epoll_create1() error (%d)\n", errno);  
                         return -1;  
                 }  
   
                 ev.events = EPOLLIN;  
                 ev.data.fd = STDIN_FILENO;  
                 if (epoll_ctl(epollfd, EPOLL_CTL_ADD, STDIN_FILENO, &ev) == -1)  
                 {  
                         log_error("epoll_ctl(STDIN_FILENO) error (%d)\n", errno);  
   
                         if (close(epollfd) < 0)  
                         {  
                                 log_error("close(epoll) error (%d)\n");  
                         }  
                         return -1;  
                 }  
   
                 flags = fcntl(STDIN_FILENO, F_GETFL, 0);  
                 fcntl(STDIN_FILENO, F_SETFL, flags | O_NONBLOCK);  
   
                 for (loop = 1; loop && stdin_conv_offset >= stdin_conv_len && !SYS_server_exit;)  
456                  {                  {
457                          if (SSH_v2 && ssh_channel_is_closed(SSH_channel))                          if (SSH_v2 && ssh_channel_is_closed(SSH_channel))
458                          {                          {
459                                  log_error("SSH channel is closed\n");                                  log_debug("SSH channel is closed\n");
460                                  loop = 0;                                  loop = 0;
461                                  break;                                  break;
462                          }                          }
463    
464                          nfds = epoll_wait(epollfd, events, MAX_EVENTS, timeout);                          if (!stdin_read_wait)
   
                         if (nfds < 0)  
465                          {                          {
466                                  if (errno != EINTR)  #ifdef HAVE_SYS_EPOLL_H
467                                    nfds = epoll_wait(stdin_epollfd, events, MAX_EVENTS, timeout);
468                                    ret = nfds;
469    #else
470                                    pfds[0].fd = STDIN_FILENO;
471                                    pfds[0].events = POLLIN;
472                                    nfds = 1;
473                                    ret = poll(pfds, (nfds_t)nfds, timeout);
474    #endif
475    
476                                    if (ret < 0)
477                                  {                                  {
478                                          log_error("epoll_wait() error (%d)\n", errno);                                          if (errno != EINTR)
479                                            {
480    #ifdef HAVE_SYS_EPOLL_H
481                                                    log_error("epoll_wait() error (%d)\n", errno);
482    #else
483                                                    log_error("poll() error (%d)\n", errno);
484    #endif
485                                                    break;
486                                            }
487                                            continue;
488                                    }
489                                    else if (ret == 0) // timeout
490                                    {
491                                            out = KEY_TIMEOUT;
492                                          break;                                          break;
493                                  }                                  }
494                                  continue;  
495                          }                                  for (int i = 0; i < nfds; i++)
496                          else if (nfds == 0) // timeout                                  {
497                          {  #ifdef HAVE_SYS_EPOLL_H
498                                  out = KEY_TIMEOUT;                                          if (events[i].data.fd == STDIN_FILENO && (events[i].events & (EPOLLHUP | EPOLLERR)))
499                                  break;  #else
500                                            if (pfds[i].fd == STDIN_FILENO && (pfds[i].revents & (POLLHUP | POLLERR)))
501    #endif
502                                            {
503    #ifdef HAVE_SYS_EPOLL_H
504                                                    log_debug("STDIN error events (%d)\n", events[i].events);
505    #else
506                                                    log_debug("STDIN error events (%d)\n", pfds[i].revents);
507    #endif
508                                                    loop = 0;
509                                                    break;
510                                            }
511    
512    #ifdef HAVE_SYS_EPOLL_H
513                                            if (events[i].data.fd == STDIN_FILENO && (events[i].events & EPOLLIN))
514    #else
515                                            if (pfds[i].fd == STDIN_FILENO && (pfds[i].revents & POLLIN))
516    #endif
517                                            {
518                                                    stdin_read_wait = 1;
519                                            }
520                                    }
521                          }                          }
522    
523                          for (int i = 0; i < nfds; i++)                          if (stdin_read_wait)
524                          {                          {
525                                  if (events[i].data.fd == STDIN_FILENO)                                  while (stdin_buf_len < sizeof(stdin_buf) && !SYS_server_exit) // read until complete or error
526                                  {                                  {
527                                          while (stdin_buf_len < sizeof(stdin_buf) && !SYS_server_exit) // read until complete or error                                          if (SSH_v2)
528                                          {                                          {
529                                                  if (SSH_v2)                                                  ret = ssh_channel_read_nonblocking(SSH_channel, stdin_buf + stdin_buf_len, sizeof(stdin_buf) - (uint32_t)stdin_buf_len, 0);
530                                                    if (ret == SSH_ERROR)
531                                                  {                                                  {
532                                                          ret = ssh_channel_read_nonblocking(SSH_channel, stdin_buf + stdin_buf_len, sizeof(stdin_buf) - (uint32_t)stdin_buf_len, 0);                                                          log_debug("ssh_channel_read_nonblocking() error: %s\n", ssh_get_error(SSH_session));
533                                                          if (ret == SSH_ERROR)                                                          loop = 0;
534                                                          {                                                          break;
                                                                 log_error("ssh_channel_read_nonblocking() error: %s\n", ssh_get_error(SSH_session));  
                                                                 loop = 0;  
                                                                 break;  
                                                         }  
                                                         else if (ret == SSH_EOF)  
                                                         {  
                                                                 loop = 0;  
                                                                 break;  
                                                         }  
                                                         else if (ret == 0)  
                                                         {  
                                                                 out = 0;  
                                                                 loop = 0;  
                                                                 break;  
                                                         }  
535                                                  }                                                  }
536                                                  else                                                  else if (ret == SSH_EOF)
537                                                  {                                                  {
538                                                          ret = (int)read(STDIN_FILENO, stdin_buf + stdin_buf_len, sizeof(stdin_buf) - (size_t)stdin_buf_len);                                                          stdin_read_wait = 0;
539                                                            loop = 0;
540                                                            break;
541                                                  }                                                  }
542                                                  if (ret < 0)                                                  else if (ret == 0)
543                                                  {                                                  {
544                                                          if (errno == EAGAIN || errno == EWOULDBLOCK)                                                          out = 0;
545                                                          {                                                          stdin_read_wait = 0;
546                                                                  out = 0;                                                          loop = 0;
547                                                                  loop = 0;                                                          break;
                                                                 break;  
                                                         }  
                                                         else if (errno == EINTR)  
                                                         {  
                                                                 continue;  
                                                         }  
                                                         else  
                                                         {  
 #ifdef _DEBUG  
                                                                 log_error("read(STDIN) error (%d)\n", errno);  
 #endif  
                                                                 loop = 0;  
                                                                 break;  
                                                         }  
548                                                  }                                                  }
549                                                  else if (ret == 0) // broken pipe                                          }
550                                            else
551                                            {
552                                                    ret = (int)read(STDIN_FILENO, stdin_buf + stdin_buf_len, sizeof(stdin_buf) - (size_t)stdin_buf_len);
553                                            }
554                                            if (ret < 0)
555                                            {
556                                                    if (errno == EAGAIN || errno == EWOULDBLOCK)
557                                                  {                                                  {
558                                                            out = 0;
559                                                            stdin_read_wait = 0;
560                                                          loop = 0;                                                          loop = 0;
561                                                          break;                                                          break;
562                                                  }                                                  }
563                                                  else                                                  else if (errno == EINTR)
564                                                  {                                                  {
                                                         stdin_buf_len += ret;  
565                                                          continue;                                                          continue;
566                                                  }                                                  }
567                                                    else
568                                                    {
569                                                            log_debug("read(STDIN) error (%d)\n", errno);
570                                                            loop = 0;
571                                                            break;
572                                                    }
573                                            }
574                                            else if (ret == 0) // broken pipe
575                                            {
576                                                    stdin_read_wait = 0;
577                                                    loop = 0;
578                                                    break;
579                                            }
580                                            else
581                                            {
582                                                    stdin_buf_len += ret;
583                                                    continue;
584                                          }                                          }
585                                  }                                  }
586                          }                          }
# Line 381  int igetch(int timeout) Line 589  int igetch(int timeout)
589  #ifdef _DEBUG  #ifdef _DEBUG
590                          for (int j = stdin_buf_offset; j < stdin_buf_len; j++)                          for (int j = stdin_buf_offset; j < stdin_buf_len; j++)
591                          {                          {
592                                  log_error("Debug input: <--[%u]\n", (stdin_buf[j] + 256) % 256);                                  log_debug("input: <--[%u]\n", (stdin_buf[j] + 256) % 256);
593                          }                          }
594  #endif  #endif
595                  }                  }
596    
                 fcntl(STDIN_FILENO, F_SETFL, flags);  
   
                 if (close(epollfd) < 0)  
                 {  
                         log_error("close(epoll) error (%d)\n");  
                 }  
   
597                  if (stdin_buf_offset < stdin_buf_len)                  if (stdin_buf_offset < stdin_buf_len)
598                  {                  {
599                          ret = io_buf_conv(stdin_cd, stdin_buf, &stdin_buf_len, &stdin_buf_offset, stdin_conv, sizeof(stdin_conv), &stdin_conv_len);                          ret = io_buf_conv(stdin_cd, stdin_buf, &stdin_buf_len, &stdin_buf_offset, stdin_conv, sizeof(stdin_conv), &stdin_conv_len);
600                          if (ret < 0)                          if (ret < 0)
601                          {                          {
602                                  log_error("io_buf_conv(stdin, %d, %d, %d) error\n", stdin_buf_len, stdin_buf_offset, stdin_conv_len);                                  log_error("io_buf_conv(stdin, %d, %d, %d) error\n", stdin_buf_len, stdin_buf_offset, stdin_conv_len);
603                                    stdin_buf_len = stdin_buf_offset; // Discard invalid sequence
604                          }                          }
605    
606                          // For debug                          // For debug
607  #ifdef _DEBUG  #ifdef _DEBUG
608                          for (int j = stdin_conv_offset; j < stdin_conv_len; j++)                          for (int j = stdin_conv_offset; j < stdin_conv_len; j++)
609                          {                          {
610                                  log_error("Debug input_conv: <--[%u]\n", (stdin_conv[j] + 256) % 256);                                  log_debug("input_conv: <--[%u]\n", (stdin_conv[j] + 256) % 256);
611                          }                          }
612  #endif  #endif
613                  }                  }
# Line 871  int igetch(int timeout) Line 1073  int igetch(int timeout)
1073  #ifdef _DEBUG  #ifdef _DEBUG
1074          if (out != KEY_TIMEOUT && out != KEY_NULL)          if (out != KEY_TIMEOUT && out != KEY_NULL)
1075          {          {
1076                  log_error("Debug: -->[0x %x]\n", out);                  log_debug("output: -->[0x %x]\n", out);
1077          }          }
1078  #endif  #endif
1079    
# Line 909  int io_buf_conv(iconv_t cd, char *p_buf, Line 1111  int io_buf_conv(iconv_t cd, char *p_buf,
1111          int ret;          int ret;
1112          int in_control = 0;          int in_control = 0;
1113          size_t i = 0;          size_t i = 0;
1114            int skip_current = 0;
1115    
1116          if (cd == NULL || p_buf == NULL || p_buf_len == NULL || p_buf_offset == NULL || p_conv == NULL || p_conv_len == NULL)          if (cd == (iconv_t)(-1) || p_buf == NULL || p_buf_len == NULL || p_buf_offset == NULL || p_conv == NULL || p_conv_len == NULL)
1117          {          {
1118                  log_error("NULL pointer error\n");                  log_error("NULL pointer error\n");
1119                  return -1;                  return -1;
# Line 932  int io_buf_conv(iconv_t cd, char *p_buf, Line 1135  int io_buf_conv(iconv_t cd, char *p_buf,
1135                          }                          }
1136                  }                  }
1137    
1138                  if (in_control)                  if (in_control || skip_current)
1139                  {                  {
1140                            skip_current = 0;
1141    
1142                          if (out_bytes <= 0)                          if (out_bytes <= 0)
1143                          {                          {
1144                                  log_error("iconv(inbytes=%d, outbytes=%d) error: EILSEQ and E2BIG\n", in_bytes, out_bytes);                                  log_error("No enough free space in p_conv, conv_len=%d, conv_size=%d\n", *p_conv_len, conv_size);
1145                                  return -2;                                  return -2;
1146                          }                          }
1147    
# Line 947  int io_buf_conv(iconv_t cd, char *p_buf, Line 1152  int io_buf_conv(iconv_t cd, char *p_buf,
1152                          out_bytes--;                          out_bytes--;
1153    
1154                          (*p_buf_offset)++;                          (*p_buf_offset)++;
1155                          *p_conv_len = (int)(conv_size - out_bytes);                          (*p_conv_len)++;
1156    
1157                          i++;                          i++;
1158                          if (i >= 2)                          if (i >= 2)
# Line 962  int io_buf_conv(iconv_t cd, char *p_buf, Line 1167  int io_buf_conv(iconv_t cd, char *p_buf,
1167                  {                  {
1168                          if (errno == EINVAL) // Incomplete                          if (errno == EINVAL) // Incomplete
1169                          {                          {
1170  #ifdef _DEBUG                                  log_debug("iconv(inbytes=%zu, outbytes=%zu) error: EINVAL, in_buf[0]=%d\n",
1171                                  log_error("iconv(inbytes=%d, outbytes=%d) error: EINVAL, in_buf[0]=%d\n", in_bytes, out_bytes, in_buf[0]);                                                    in_bytes, out_bytes, (unsigned char)in_buf[0]);
 #endif  
1172                                  if (p_buf != in_buf)                                  if (p_buf != in_buf)
1173                                  {                                  {
1174                                          *p_buf_len = (int)(p_buf + *p_buf_len - in_buf);                                          *p_buf_len -= (int)(in_buf - p_buf);
1175                                          *p_buf_offset = 0;                                          *p_buf_offset = 0;
1176                                          *p_conv_len = (int)(conv_size - out_bytes);                                          *p_conv_len = (int)(conv_size - out_bytes);
1177                                          memmove(p_buf, in_buf, (size_t)(*p_buf_len));                                          memmove(p_buf, in_buf, (size_t)(*p_buf_len));
# Line 977  int io_buf_conv(iconv_t cd, char *p_buf, Line 1181  int io_buf_conv(iconv_t cd, char *p_buf,
1181                          }                          }
1182                          else if (errno == E2BIG)                          else if (errno == E2BIG)
1183                          {                          {
1184                                  log_error("iconv(inbytes=%d, outbytes=%d) error: E2BIG\n", in_bytes, out_bytes);                                  log_error("iconv(inbytes=%zu, outbytes=%zu) error: E2BIG\n", in_bytes, out_bytes);
1185                                  return -1;                                  return -1;
1186                          }                          }
1187                          else if (errno == EILSEQ)                          else if (errno == EILSEQ)
1188                          {                          {
1189                                  if (in_bytes > out_bytes || out_bytes <= 0)                                  if (in_bytes > out_bytes || out_bytes <= 0)
1190                                  {                                  {
1191                                          log_error("iconv(inbytes=%d, outbytes=%d) error: EILSEQ and E2BIG\n", in_bytes, out_bytes);                                          log_error("iconv(inbytes=%zu, outbytes=%zu) error: EILSEQ\n", in_bytes, out_bytes);
1192                                          return -2;                                          return -2;
1193                                  }                                  }
1194    
1195                                  *out_buf = *in_buf;                                  // reset in_bytes when "//IGNORE" is applied
1196                                  in_buf++;                                  if (in_bytes == 0)
1197                                  out_buf++;                                  {
1198                                  in_bytes--;                                          in_bytes = (size_t)(*p_buf_len - *p_buf_offset);
1199                                  out_bytes--;                                          log_debug("Reset in_bytes from 0 to %zu\n", in_bytes);
1200                                    }
1201    
1202                                  continue;                                  log_debug("iconv(in_bytes=%zu, out_bytes=%zu) error: EILSEQ, in_buf[0]=%d\n",
1203                                                      in_bytes, out_bytes, (unsigned char)in_buf[0]);
1204                                    skip_current = 1;
1205                            }
1206                            else // something strange
1207                            {
1208                                    log_debug("iconv(in_bytes=%zu, out_bytes=%zu) error: %d, in_buf[0]=%d\n",
1209                                                      in_bytes, out_bytes, errno, (unsigned char)in_buf[0]);
1210                                    *p_buf_offset = (int)(in_buf - p_buf);
1211                                    *p_conv_len = (int)(conv_size - out_bytes);
1212                                    skip_current = 1;
1213                          }                          }
1214                  }                  }
1215                  else                  else
1216                  {                  {
1217                          *p_buf_len = 0;                          *p_buf_offset = (int)(in_buf - p_buf);
                         *p_buf_offset = 0;  
1218                          *p_conv_len = (int)(conv_size - out_bytes);                          *p_conv_len = (int)(conv_size - out_bytes);
   
                         break;  
1219                  }                  }
1220          }          }
1221    
1222            if (*p_buf_offset >= *p_buf_len)
1223            {
1224                    *p_buf_len = 0;
1225                    *p_buf_offset = 0;
1226            }
1227    
1228          return 0;          return 0;
1229  }  }
1230    
1231  int io_conv_init(const char *charset)  int io_conv_init(const char *charset)
1232  {  {
1233            char tocode[CHARSET_MAX_LEN + 20];
1234    
1235          if (charset == NULL)          if (charset == NULL)
1236          {          {
1237                  log_error("NULL pointer error\n");                  log_error("NULL pointer error\n");
# Line 1020  int io_conv_init(const char *charset) Line 1240  int io_conv_init(const char *charset)
1240    
1241          io_conv_cleanup();          io_conv_cleanup();
1242    
1243          snprintf(stdio_charset, sizeof(stdio_charset), "%s//TRANSLIT", charset);          strncpy(stdio_charset, charset, sizeof(stdio_charset) - 1);
1244            stdio_charset[sizeof(stdio_charset) - 1] = '\0';
1245    
1246          stdin_cd = iconv_open(BBS_DEFAULT_CHARSET, stdio_charset);          snprintf(tocode, sizeof(tocode), "%s%s", BBS_default_charset,
1247                             (strcasecmp(stdio_charset, BBS_default_charset) == 0 ? "" : "//IGNORE"));
1248            stdin_cd = iconv_open(tocode, stdio_charset);
1249          if (stdin_cd == (iconv_t)(-1))          if (stdin_cd == (iconv_t)(-1))
1250          {          {
1251                  log_error("iconv_open(%s->%s) error: %d\n", stdio_charset, BBS_DEFAULT_CHARSET, errno);                  log_error("iconv_open(%s->%s) error: %d\n", stdio_charset, tocode, errno);
1252                  return -2;                  return -2;
1253          }          }
1254          stdout_cd = iconv_open(stdio_charset, BBS_DEFAULT_CHARSET);  
1255            snprintf(tocode, sizeof(tocode), "%s%s", stdio_charset,
1256                             (strcasecmp(BBS_default_charset, stdio_charset) == 0 ? "" : "//TRANSLIT"));
1257            stdout_cd = iconv_open(tocode, BBS_default_charset);
1258          if (stdout_cd == (iconv_t)(-1))          if (stdout_cd == (iconv_t)(-1))
1259          {          {
1260                  log_error("iconv_open(%s->%s) error: %d\n", BBS_DEFAULT_CHARSET, stdio_charset, errno);                  log_error("iconv_open(%s->%s) error: %d\n", BBS_default_charset, tocode, errno);
1261                  iconv_close(stdin_cd);                  iconv_close(stdin_cd);
1262                    stdin_cd = (iconv_t)(-1);
1263                  return -2;                  return -2;
1264          }          }
1265    
# Line 1041  int io_conv_init(const char *charset) Line 1268  int io_conv_init(const char *charset)
1268    
1269  int io_conv_cleanup(void)  int io_conv_cleanup(void)
1270  {  {
1271          if (stdin_cd != NULL)          if (stdin_cd != (iconv_t)(-1))
1272          {          {
1273                  iconv_close(stdin_cd);                  iconv_close(stdin_cd);
1274                  stdin_cd = NULL;                  stdin_cd = (iconv_t)(-1);
1275          }          }
1276          if (stdout_cd != NULL)          if (stdout_cd != (iconv_t)(-1))
1277          {          {
1278                  iconv_close(stdout_cd);                  iconv_close(stdout_cd);
1279                  stdout_cd = NULL;                  stdout_cd = (iconv_t)(-1);
1280          }          }
1281    
1282          return 0;          return 0;

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