/[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.38 by sysadm, Wed Jun 4 13:42:53 2025 UTC Revision 1.56 by sysadm, Sun Oct 19 01:30:38 2025 UTC
# Line 14  Line 14 
14   *                                                                         *   *                                                                         *
15   ***************************************************************************/   ***************************************************************************/
16    
17    #include "common.h"
18  #include "io.h"  #include "io.h"
19  #include "log.h"  #include "log.h"
 #include "common.h"  
20  #include <errno.h>  #include <errno.h>
21  #include <stdio.h>  #include <fcntl.h>
22  #include <stdarg.h>  #include <stdarg.h>
23    #include <stdio.h>
24  #include <string.h>  #include <string.h>
25  #include <time.h>  #include <time.h>
 #include <fcntl.h>  
26  #include <unistd.h>  #include <unistd.h>
 #include <sys/select.h>  
 #include <sys/ioctl.h>  
27  #include <sys/epoll.h>  #include <sys/epoll.h>
28    #include <sys/ioctl.h>
29    #include <sys/select.h>
30    #include <libssh/callbacks.h>
31    #include <libssh/libssh.h>
32    #include <libssh/server.h>
33    
34    char stdio_charset[32] = BBS_DEFAULT_CHARSET;
35    
36    // static input / output buffer
37    static char stdin_buf[LINE_BUFFER_LEN];
38    static char stdin_conv[LINE_BUFFER_LEN];
39    static int stdin_buf_len = 0;
40    static int stdin_conv_len = 0;
41    static int stdin_buf_offset = 0;
42    static int stdin_conv_offset = 0;
43    
44  static char stdout_buf[BUFSIZ];  static char stdout_buf[BUFSIZ];
45    static char stdout_conv[BUFSIZ];
46  static int stdout_buf_len = 0;  static int stdout_buf_len = 0;
47    static int stdout_conv_len = 0;
48  static int stdout_buf_offset = 0;  static int stdout_buf_offset = 0;
49    static int stdout_conv_offset = 0;
50    
51    static iconv_t stdin_cd = NULL;
52    static iconv_t stdout_cd = NULL;
53    
54  int prints(const char *format, ...)  int prints(const char *format, ...)
55  {  {
# Line 88  int outc(char c) Line 107  int outc(char c)
107          return ret;          return ret;
108  }  }
109    
110  int iflush()  int iflush(void)
111  {  {
112          int flags;          int flags;
113          struct epoll_event ev, events[MAX_EVENTS];          struct epoll_event ev, events[MAX_EVENTS];
# Line 145  int iflush() Line 164  int iflush()
164                  {                  {
165                          if (events[i].data.fd == STDOUT_FILENO)                          if (events[i].data.fd == STDOUT_FILENO)
166                          {                          {
167                                  while (stdout_buf_offset < stdout_buf_len && !SYS_server_exit) // write until complete or error                                  if (stdout_buf_offset < stdout_buf_len)
168                                  {                                  {
169                                          ret = (int)write(STDOUT_FILENO, stdout_buf + stdout_buf_offset, (size_t)(stdout_buf_len - stdout_buf_offset));                                          ret = io_buf_conv(stdout_cd, stdout_buf, &stdout_buf_len, &stdout_buf_offset, stdout_conv, sizeof(stdout_conv), &stdout_conv_len);
170                                            if (ret < 0)
171                                            {
172                                                    log_error("io_buf_conv(stdout, %d, %d, %d) error\n", stdout_buf_len, stdout_buf_offset, stdout_conv_len);
173                                            }
174                                    }
175    
176                                    while (stdout_conv_offset < stdout_conv_len && !SYS_server_exit) // write until complete or error
177                                    {
178                                            if (SSH_v2)
179                                            {
180                                                    ret = ssh_channel_write(SSH_channel, stdout_conv + stdout_conv_offset, (uint32_t)(stdout_conv_len - stdout_conv_offset));
181                                                    if (ret == SSH_ERROR)
182                                                    {
183                                                            log_error("ssh_channel_write() error: %s\n", ssh_get_error(SSH_session));
184                                                            retry = 0;
185                                                            break;
186                                                    }
187                                            }
188                                            else
189                                            {
190                                                    ret = (int)write(STDOUT_FILENO, stdout_conv + stdout_conv_offset, (size_t)(stdout_conv_len - stdout_conv_offset));
191                                            }
192                                          if (ret < 0)                                          if (ret < 0)
193                                          {                                          {
194                                                  if (errno == EAGAIN || errno == EWOULDBLOCK)                                                  if (errno == EAGAIN || errno == EWOULDBLOCK)
# Line 160  int iflush() Line 201  int iflush()
201                                                  }                                                  }
202                                                  else                                                  else
203                                                  {                                                  {
204    #ifdef _DEBUG
205                                                          log_error("write(STDOUT) error (%d)\n", errno);                                                          log_error("write(STDOUT) error (%d)\n", errno);
206    #endif
207                                                          retry = 0;                                                          retry = 0;
208                                                          break;                                                          break;
209                                                  }                                                  }
# Line 172  int iflush() Line 215  int iflush()
215                                          }                                          }
216                                          else                                          else
217                                          {                                          {
218                                                  stdout_buf_offset += ret;                                                  stdout_conv_offset += ret;
219                                                  if (stdout_buf_offset >= stdout_buf_len) // flush buffer completely                                                  if (stdout_conv_offset >= stdout_conv_len) // flush buffer completely
220                                                  {                                                  {
221                                                          ret = 0;                                                          ret = 0;
222                                                          stdout_buf_offset = 0;                                                          stdout_conv_offset = 0;
223                                                          stdout_buf_len = 0;                                                          stdout_conv_len = 0;
224                                                          retry = 0;                                                          retry = 0;
225                                                          break;                                                          break;
226                                                  }                                                  }
# Line 201  int iflush() Line 244  int iflush()
244    
245  int igetch(int timeout)  int igetch(int timeout)
246  {  {
         // static input buffer  
         static unsigned char buf[LINE_BUFFER_LEN];  
         static int len = 0;  
         static int pos = 0;  
   
247          struct epoll_event ev, events[MAX_EVENTS];          struct epoll_event ev, events[MAX_EVENTS];
248          int nfds, epollfd;          int nfds, epollfd;
249          int ret;          int ret;
# Line 219  int igetch(int timeout) Line 257  int igetch(int timeout)
257          int i = 0;          int i = 0;
258          int flags;          int flags;
259    
260          epollfd = epoll_create1(0);          if (stdin_conv_offset >= stdin_conv_len)
         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)  
261          {          {
262                  log_error("epoll_ctl(STDIN_FILENO) error (%d)\n", errno);                  stdin_conv_len = 0;
263                    stdin_conv_offset = 0;
264    
265                  if (close(epollfd) < 0)                  epollfd = epoll_create1(0);
266                    if (epollfd < 0)
267                  {                  {
268                          log_error("close(epoll) error (%d)\n");                          log_error("epoll_create1() error (%d)\n", errno);
269                            return -1;
270                  }                  }
                 return -1;  
         }  
   
         flags = fcntl(STDIN_FILENO, F_GETFL, 0);  
         fcntl(STDIN_FILENO, F_SETFL, flags | O_NONBLOCK);  
271    
272          loop = 1;                  ev.events = EPOLLIN;
273                    ev.data.fd = STDIN_FILENO;
274                    if (epoll_ctl(epollfd, EPOLL_CTL_ADD, STDIN_FILENO, &ev) == -1)
275                    {
276                            log_error("epoll_ctl(STDIN_FILENO) error (%d)\n", errno);
277    
278          while (loop && pos >= len && !SYS_server_exit)                          if (close(epollfd) < 0)
279          {                          {
280                  len = 0;                                  log_error("close(epoll) error (%d)\n");
281                  pos = 0;                          }
282                            return -1;
283                    }
284    
285                  nfds = epoll_wait(epollfd, events, MAX_EVENTS, timeout);                  flags = fcntl(STDIN_FILENO, F_GETFL, 0);
286                    fcntl(STDIN_FILENO, F_SETFL, flags | O_NONBLOCK);
287    
288                  if (nfds < 0)                  for (loop = 1; loop && stdin_conv_offset >= stdin_conv_len && !SYS_server_exit;)
289                  {                  {
290                          if (errno != EINTR)                          if (SSH_v2 && ssh_channel_is_closed(SSH_channel))
291                          {                          {
292                                  log_error("epoll_wait() error (%d)\n", errno);                                  log_error("SSH channel is closed\n");
293                                    loop = 0;
294                                  break;                                  break;
295                          }                          }
                         continue;  
                 }  
                 else if (nfds == 0) // timeout  
                 {  
                         out = KEY_TIMEOUT;  
                         break;  
                 }  
296    
297                  for (int i = 0; i < nfds; i++)                          nfds = epoll_wait(epollfd, events, MAX_EVENTS, timeout);
298                  {  
299                          if (events[i].data.fd == STDIN_FILENO)                          if (nfds < 0)
300                          {                          {
301                                  while (len < sizeof(buf) && !SYS_server_exit) // read until complete or error                                  if (errno != EINTR)
302                                  {                                  {
303                                          ret = (int)read(STDIN_FILENO, buf + len, sizeof(buf) - (size_t)len);                                          log_error("epoll_wait() error (%d)\n", errno);
304                                          if (ret < 0)                                          break;
305                                    }
306                                    continue;
307                            }
308                            else if (nfds == 0) // timeout
309                            {
310                                    out = KEY_TIMEOUT;
311                                    break;
312                            }
313    
314                            for (int i = 0; i < nfds; i++)
315                            {
316                                    if (events[i].data.fd == STDIN_FILENO)
317                                    {
318                                            while (stdin_buf_len < sizeof(stdin_buf) && !SYS_server_exit) // read until complete or error
319                                          {                                          {
320                                                  if (errno == EAGAIN || errno == EWOULDBLOCK)                                                  if (SSH_v2)
321                                                  {                                                  {
322                                                          out = 0;                                                          ret = ssh_channel_read_nonblocking(SSH_channel, stdin_buf + stdin_buf_len, sizeof(stdin_buf) - (uint32_t)stdin_buf_len, 0);
323                                                          loop = 0;                                                          if (ret == SSH_ERROR)
324                                                          break;                                                          {
325                                                                    log_error("ssh_channel_read_nonblocking() error: %s\n", ssh_get_error(SSH_session));
326                                                                    loop = 0;
327                                                                    break;
328                                                            }
329                                                            else if (ret == SSH_EOF)
330                                                            {
331                                                                    loop = 0;
332                                                                    break;
333                                                            }
334                                                            else if (ret == 0)
335                                                            {
336                                                                    out = 0;
337                                                                    loop = 0;
338                                                                    break;
339                                                            }
340                                                  }                                                  }
341                                                  else if (errno == EINTR)                                                  else
342                                                  {                                                  {
343                                                          continue;                                                          ret = (int)read(STDIN_FILENO, stdin_buf + stdin_buf_len, sizeof(stdin_buf) - (size_t)stdin_buf_len);
344                                                  }                                                  }
345                                                  else                                                  if (ret < 0)
346                                                    {
347                                                            if (errno == EAGAIN || errno == EWOULDBLOCK)
348                                                            {
349                                                                    out = 0;
350                                                                    loop = 0;
351                                                                    break;
352                                                            }
353                                                            else if (errno == EINTR)
354                                                            {
355                                                                    continue;
356                                                            }
357                                                            else
358                                                            {
359    #ifdef _DEBUG
360                                                                    log_error("read(STDIN) error (%d)\n", errno);
361    #endif
362                                                                    loop = 0;
363                                                                    break;
364                                                            }
365                                                    }
366                                                    else if (ret == 0) // broken pipe
367                                                  {                                                  {
                                                         log_error("read(STDIN) error (%d)\n", errno);  
368                                                          loop = 0;                                                          loop = 0;
369                                                          break;                                                          break;
370                                                  }                                                  }
371                                          }                                                  else
372                                          else if (ret == 0) // broken pipe                                                  {
373                                          {                                                          stdin_buf_len += ret;
374                                                  loop = 0;                                                          continue;
375                                                  break;                                                  }
                                         }  
                                         else  
                                         {  
                                                 len += ret;  
                                                 continue;  
376                                          }                                          }
377                                  }                                  }
378                          }                          }
379    
380                            // For debug
381    #ifdef _DEBUG
382                            for (int j = stdin_buf_offset; j < stdin_buf_len; j++)
383                            {
384                                    log_error("Debug input: <--[%u]\n", (stdin_buf[j] + 256) % 256);
385                            }
386    #endif
387                  }                  }
388    
389                  // For debug                  fcntl(STDIN_FILENO, F_SETFL, flags);
                 // for (int j = pos; j < len; j++)  
                 // {  
                 //      log_common("Debug: <--[%u]\n", (buf[j] + 256) % 256);  
                 // }  
         }  
390    
391          fcntl(STDIN_FILENO, F_SETFL, flags);                  if (close(epollfd) < 0)
392                    {
393                            log_error("close(epoll) error (%d)\n");
394                    }
395    
396                    if (stdin_buf_offset < stdin_buf_len)
397                    {
398                            ret = io_buf_conv(stdin_cd, stdin_buf, &stdin_buf_len, &stdin_buf_offset, stdin_conv, sizeof(stdin_conv), &stdin_conv_len);
399                            if (ret < 0)
400                            {
401                                    log_error("io_buf_conv(stdin, %d, %d, %d) error\n", stdin_buf_len, stdin_buf_offset, stdin_conv_len);
402                            }
403    
404                            // For debug
405    #ifdef _DEBUG
406                            for (int j = stdin_conv_offset; j < stdin_conv_len; j++)
407                            {
408                                    log_error("Debug input_conv: <--[%u]\n", (stdin_conv[j] + 256) % 256);
409                            }
410    #endif
411                    }
412            }
413    
414          while (pos < len)          while (stdin_conv_offset < stdin_conv_len)
415          {          {
416                  unsigned char c = buf[pos++];                  unsigned char c = (unsigned char)stdin_conv[stdin_conv_offset++];
417    
418                    // Convert \r\n to \r
419                    if (c == CR && stdin_conv_offset < stdin_conv_len && stdin_conv[stdin_conv_offset] == LF)
420                    {
421                            stdin_conv_offset++;
422                    }
423    
424                    // Convert single \n to \r
425                    if (c == LF)
426                    {
427                            c = CR;
428                    }
429    
430                  if (c == KEY_CONTROL)                  if (c == KEY_CONTROL)
431                  {                  {
# Line 488  int igetch(int timeout) Line 596  int igetch(int timeout)
596                                  case 49:                                  case 49:
597                                          out = KEY_HOME;                                          out = KEY_HOME;
598                                          break;                                          break;
599                                    case 50:
600                                            out = KEY_INS;
601                                            break;
602                                  case 51:                                  case 51:
603                                          out = KEY_DEL;                                          out = KEY_DEL;
604                                          break;                                          break;
# Line 508  int igetch(int timeout) Line 619  int igetch(int timeout)
619                                          break;                                          break;
620                                  }                                  }
621                          }                          }
622                          if (i == 4 && tmp[0] == 91 && tmp[1] == 49 && tmp[3] == 126)  // Fterm                          if (i == 4 && tmp[0] == 91 && tmp[1] == 49 && tmp[3] == 126) // Fterm
623                          {                          {
624                                  in_ascii = 0;                                  in_ascii = 0;
625                                  switch (tmp[2])                                  switch (tmp[2])
# Line 578  int igetch(int timeout) Line 689  int igetch(int timeout)
689                                  in_ascii = 0;                                  in_ascii = 0;
690                                  switch (tmp[4])                                  switch (tmp[4])
691                                  {                                  {
692                                    case 65:
693                                            out = KEY_CTRL_UP;
694                                            break;
695                                    case 66:
696                                            out = KEY_CTRL_DOWN;
697                                            break;
698                                    case 67:
699                                            out = KEY_CTRL_RIGHT;
700                                            break;
701                                    case 68:
702                                            out = KEY_CTRL_LEFT;
703                                            break;
704                                    case 70:
705                                            out = KEY_CTRL_END;
706                                            break;
707                                    case 72:
708                                            out = KEY_CTRL_HOME;
709                                            break;
710                                  case 80:                                  case 80:
711                                          out = KEY_CTRL_F1;                                          out = KEY_CTRL_F1;
712                                          break;                                          break;
# Line 732  int igetch(int timeout) Line 861  int igetch(int timeout)
861                  break;                  break;
862          }          }
863    
         if (close(epollfd) < 0)  
         {  
                 log_error("close(epoll) error (%d)\n");  
         }  
   
864          // For ESC key          // For ESC key
865          if (out == 0 && in_esc)          if (out == 0 && in_esc)
866          {          {
# Line 744  int igetch(int timeout) Line 868  int igetch(int timeout)
868          }          }
869    
870          // for debug          // for debug
871          // if (out != KEY_TIMEOUT && out != KEY_NULL)  #ifdef _DEBUG
872          // {          if (out != KEY_TIMEOUT && out != KEY_NULL)
873          //      log_common ("Debug: -->[0x %x]\n", out);          {
874          // }                  log_error("Debug: -->[0x %x]\n", out);
875            }
876    #endif
877    
878          return out;          return out;
879  }  }
# Line 755  int igetch(int timeout) Line 881  int igetch(int timeout)
881  int igetch_t(int sec)  int igetch_t(int sec)
882  {  {
883          int ch;          int ch;
884          time_t t_begin = time(0);          time_t t_begin = time(NULL);
885    
886          do          do
887          {          {
888                  ch = igetch(100);                  ch = igetch(100);
889          } while (!SYS_server_exit && ch == KEY_TIMEOUT && (time(0) - t_begin < sec));          } while (!SYS_server_exit && ch == KEY_TIMEOUT && (time(NULL) - t_begin < sec));
890    
891          return ch;          return ch;
892  }  }
# Line 770  void igetch_reset() Line 896  void igetch_reset()
896          int ch;          int ch;
897          do          do
898          {          {
899                  ch = igetch(0);                  ch = igetch(100);
900          } while (ch != KEY_NULL && ch != KEY_TIMEOUT);          } while (ch != KEY_NULL && ch != KEY_TIMEOUT);
901  }  }
902    
903    int io_buf_conv(iconv_t cd, char *p_buf, int *p_buf_len, int *p_buf_offset, char *p_conv, size_t conv_size, int *p_conv_len)
904    {
905            char *in_buf;
906            char *out_buf;
907            size_t in_bytes;
908            size_t out_bytes;
909            int ret;
910            int in_control = 0;
911            size_t i = 0;
912    
913            if (cd == NULL || p_buf == NULL || p_buf_len == NULL || p_buf_offset == NULL || p_conv == NULL || p_conv_len == NULL)
914            {
915                    log_error("NULL pointer error\n");
916                    return -1;
917            }
918    
919            in_buf = p_buf + *p_buf_offset;
920            in_bytes = (size_t)(*p_buf_len - *p_buf_offset);
921            out_buf = p_conv + *p_conv_len;
922            out_bytes = conv_size - (size_t)(*p_conv_len);
923    
924            while (in_bytes > 0)
925            {
926                    if ((unsigned char)(*in_buf) == KEY_CONTROL)
927                    {
928                            if (in_control == 0)
929                            {
930                                    in_control = 1;
931                                    i = 0;
932                            }
933                    }
934    
935                    if (in_control)
936                    {
937                            if (out_bytes <= 0)
938                            {
939                                    log_error("iconv(inbytes=%d, outbytes=%d) error: EILSEQ and E2BIG\n", in_bytes, out_bytes);
940                                    return -2;
941                            }
942    
943                            *out_buf = *in_buf;
944                            in_buf++;
945                            out_buf++;
946                            in_bytes--;
947                            out_bytes--;
948    
949                            (*p_buf_offset)++;
950                            *p_conv_len = (int)(conv_size - out_bytes);
951    
952                            i++;
953                            if (i >= 2)
954                            {
955                                    in_control = 0;
956                            }
957                            continue;
958                    }
959    
960                    ret = (int)iconv(cd, &in_buf, &in_bytes, &out_buf, &out_bytes);
961                    if (ret == -1)
962                    {
963                            if (errno == EINVAL) // Incomplete
964                            {
965    #ifdef _DEBUG
966                                    log_error("iconv(inbytes=%d, outbytes=%d) error: EINVAL, in_buf[0]=%d\n", in_bytes, out_bytes, in_buf[0]);
967    #endif
968                                    if (p_buf != in_buf)
969                                    {
970                                            *p_buf_len = (int)(p_buf + *p_buf_len - in_buf);
971                                            *p_buf_offset = 0;
972                                            *p_conv_len = (int)(conv_size - out_bytes);
973                                            memmove(p_buf, in_buf, (size_t)(*p_buf_len));
974                                    }
975    
976                                    break;
977                            }
978                            else if (errno == E2BIG)
979                            {
980                                    log_error("iconv(inbytes=%d, outbytes=%d) error: E2BIG\n", in_bytes, out_bytes);
981                                    return -1;
982                            }
983                            else if (errno == EILSEQ)
984                            {
985                                    if (in_bytes > out_bytes || out_bytes <= 0)
986                                    {
987                                            log_error("iconv(inbytes=%d, outbytes=%d) error: EILSEQ and E2BIG\n", in_bytes, out_bytes);
988                                            return -2;
989                                    }
990    
991                                    *out_buf = *in_buf;
992                                    in_buf++;
993                                    out_buf++;
994                                    in_bytes--;
995                                    out_bytes--;
996    
997                                    continue;
998                            }
999                    }
1000                    else
1001                    {
1002                            *p_buf_len = 0;
1003                            *p_buf_offset = 0;
1004                            *p_conv_len = (int)(conv_size - out_bytes);
1005    
1006                            break;
1007                    }
1008            }
1009    
1010            return 0;
1011    }
1012    
1013    int io_conv_init(const char *charset)
1014    {
1015            if (charset == NULL)
1016            {
1017                    log_error("NULL pointer error\n");
1018                    return -1;
1019            }
1020    
1021            io_conv_cleanup();
1022    
1023            snprintf(stdio_charset, sizeof(stdio_charset), "%s//TRANSLIT", charset);
1024    
1025            stdin_cd = iconv_open(BBS_DEFAULT_CHARSET, stdio_charset);
1026            if (stdin_cd == (iconv_t)(-1))
1027            {
1028                    log_error("iconv_open(%s->%s) error: %d\n", stdio_charset, BBS_DEFAULT_CHARSET, errno);
1029                    return -2;
1030            }
1031            stdout_cd = iconv_open(stdio_charset, BBS_DEFAULT_CHARSET);
1032            if (stdout_cd == (iconv_t)(-1))
1033            {
1034                    log_error("iconv_open(%s->%s) error: %d\n", BBS_DEFAULT_CHARSET, stdio_charset, errno);
1035                    iconv_close(stdin_cd);
1036                    return -2;
1037            }
1038    
1039            return 0;
1040    }
1041    
1042    int io_conv_cleanup(void)
1043    {
1044            if (stdin_cd != NULL)
1045            {
1046                    iconv_close(stdin_cd);
1047                    stdin_cd = NULL;
1048            }
1049            if (stdout_cd != NULL)
1050            {
1051                    iconv_close(stdout_cd);
1052                    stdout_cd = NULL;
1053            }
1054    
1055            return 0;
1056    }

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