/[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.9 by sysadm, Tue Mar 22 08:19:11 2005 UTC Revision 1.60 by sysadm, Mon Oct 20 01:55:50 2025 UTC
# Line 1  Line 1 
1  /***************************************************************************  /***************************************************************************
2                              io.c  -  description                                                          io.c  -  description
3                               -------------------                                                           -------------------
4      begin                : Mon Oct 18 2004          Copyright            : (C) 2004-2025 by Leaflet
5      copyright            : (C) 2004 by Leaflet          Email                : leaflet@leafok.com
     email                : leaflet@leafok.com  
6   ***************************************************************************/   ***************************************************************************/
7    
8  /***************************************************************************  /***************************************************************************
9   *                                                                         *   *                                                                         *
10   *   This program is free software; you can redistribute it and/or modify  *   *   This program is free software; you can redistribute it and/or modify  *
11   *   it under the terms of the GNU General Public License as published by  *   *   it under the terms of the GNU General Public License as published by  *
12   *   the Free Software Foundation; either version 2 of the License, or     *   *   the Free Software Foundation; either version 3 of the License, or     *
13   *   (at your option) any later version.                                   *   *   (at your option) any later version.                                   *
14   *                                                                         *   *                                                                         *
15   ***************************************************************************/   ***************************************************************************/
16    
 #include "io.h"  
17  #include "common.h"  #include "common.h"
18  #include <stdio.h>  #include "io.h"
19    #include "log.h"
20    #include <errno.h>
21    #include <fcntl.h>
22  #include <stdarg.h>  #include <stdarg.h>
23    #include <stdio.h>
24    #include <string.h>
25  #include <time.h>  #include <time.h>
 #include <fcntl.h>  
26  #include <unistd.h>  #include <unistd.h>
27    #include <sys/epoll.h>
28  #include <sys/ioctl.h>  #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[20] = BBS_DEFAULT_CHARSET;
35    
36    // static input / output buffer
37    static char stdin_buf[LINE_BUFFER_LEN];
38    static char stdout_buf[BUFSIZ];
39    static int stdin_buf_len = 0;
40    static int stdout_buf_len = 0;
41    static int stdin_buf_offset = 0;
42    static int stdout_buf_offset = 0;
43    
44    static char stdin_conv[LINE_BUFFER_LEN * 2];
45    static char stdout_conv[BUFSIZ * 2];
46    static int stdin_conv_len = 0;
47    static int stdout_conv_len = 0;
48    static int stdin_conv_offset = 0;
49    static int stdout_conv_offset = 0;
50    
51  int  static iconv_t stdin_cd = NULL;
52  outc (char c)  static iconv_t stdout_cd = NULL;
53    
54    int prints(const char *format, ...)
55  {  {
56    int retval;          char buf[BUFSIZ];
57            va_list args;
58            int ret;
59    
60            va_start(args, format);
61            ret = vsnprintf(buf, sizeof(buf), format, args);
62            va_end(args);
63    
64    retval = fprintf (stdout, "%c", c);          if (ret > 0)
65            {
66                    if (stdout_buf_len + ret > BUFSIZ)
67                    {
68                            iflush();
69                    }
70    
71                    if (stdout_buf_len + ret <= BUFSIZ)
72                    {
73                            memcpy(stdout_buf + stdout_buf_len, buf, (size_t)ret);
74                            stdout_buf_len += ret;
75                    }
76                    else
77                    {
78                            errno = EAGAIN;
79                            ret = (BUFSIZ - stdout_buf_len - ret);
80                            log_error("Output buffer is full, additional %d is required\n", ret);
81                    }
82            }
83    
84    return retval;          return ret;
85  }  }
86    
87  int  int outc(char c)
 prints (const char *format, ...)  
88  {  {
89    va_list args;          int ret;
90    int retval;  
91            if (stdout_buf_len + 1 > BUFSIZ)
92            {
93                    iflush();
94            }
95    
96    va_start (args, format);          if (stdout_buf_len + 1 <= BUFSIZ)
97    retval = vfprintf (stdout, format, args);          {
98    va_end (args);                  stdout_buf[stdout_buf_len] = c;
99                    stdout_buf_len++;
100            }
101            else
102            {
103                    errno = EAGAIN;
104                    ret = -1;
105            }
106    
107    return retval;          return ret;
108  }  }
109    
110  int  int iflush(void)
 iflush ()  
111  {  {
112    int retval;          int flags;
113            struct epoll_event ev, events[MAX_EVENTS];
114            int nfds, epollfd;
115            int retry;
116            int ret = 0;
117    
118    retval = fflush (stdout);          epollfd = epoll_create1(0);
119            if (epollfd < 0)
120            {
121                    log_error("epoll_create1() error (%d)\n", errno);
122                    return -1;
123            }
124    
125    return retval;          ev.events = EPOLLOUT;
126  }          ev.data.fd = STDOUT_FILENO;
127            if (epoll_ctl(epollfd, EPOLL_CTL_ADD, STDOUT_FILENO, &ev) == -1)
128            {
129                    log_error("epoll_ctl(STDOUT_FILENO) error (%d)\n", errno);
130                    if (close(epollfd) < 0)
131                    {
132                            log_error("close(epoll) error (%d)\n");
133                    }
134                    return -1;
135            }
136    
137  int          // Set STDOUT as non-blocking
138  igetch ()          flags = fcntl(STDOUT_FILENO, F_GETFL, 0);
139  {          fcntl(STDOUT_FILENO, F_SETFL, flags | O_NONBLOCK);
140    static char buf[256];  
141    unsigned char c, tmp[256];          // Retry wait / flush for at most 3 times
142    int out = KEY_NULL, loop = 1, in_esc = 0, in_ascii = 0, in_control = 0, i =          retry = 3;
143      0, j, result;          while (retry > 0 && !SYS_server_exit)
144    static int len = 0, pos = 0;          {
145    fd_set inputs, testfds;                  retry--;
   struct timeval timeout;  
146    
147    if (pos >= len)                  nfds = epoll_wait(epollfd, events, MAX_EVENTS, 100); // 0.1 second
     {  
       pos = 0;  
       len = 0;  
148    
149        FD_ZERO (&inputs);                  if (nfds < 0)
150        FD_SET (0, &inputs);                  {
151                            if (errno != EINTR)
152                            {
153                                    log_error("epoll_wait() error (%d)\n", errno);
154                                    break;
155                            }
156                            continue;
157                    }
158                    else if (nfds == 0) // timeout
159                    {
160                            continue;
161                    }
162    
163        testfds = inputs;                  for (int i = 0; i < nfds; i++)
164        timeout.tv_sec = 1;                  {
165        timeout.tv_usec = 0;                          if (events[i].data.fd == STDOUT_FILENO)
166                            {
167                                    if (stdout_buf_offset < stdout_buf_len)
168                                    {
169                                            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                                                    stdout_buf_len = stdout_buf_offset; // Discard invalid sequence
174                                            }
175                                    }
176    
177                                    while (stdout_conv_offset < stdout_conv_len && !SYS_server_exit) // write until complete or error
178                                    {
179                                            if (SSH_v2)
180                                            {
181                                                    ret = ssh_channel_write(SSH_channel, stdout_conv + stdout_conv_offset, (uint32_t)(stdout_conv_len - stdout_conv_offset));
182                                                    if (ret == SSH_ERROR)
183                                                    {
184                                                            log_error("ssh_channel_write() error: %s\n", ssh_get_error(SSH_session));
185                                                            retry = 0;
186                                                            break;
187                                                    }
188                                            }
189                                            else
190                                            {
191                                                    ret = (int)write(STDOUT_FILENO, stdout_conv + stdout_conv_offset, (size_t)(stdout_conv_len - stdout_conv_offset));
192                                            }
193                                            if (ret < 0)
194                                            {
195                                                    if (errno == EAGAIN || errno == EWOULDBLOCK)
196                                                    {
197                                                            break;
198                                                    }
199                                                    else if (errno == EINTR)
200                                                    {
201                                                            continue;
202                                                    }
203                                                    else
204                                                    {
205    #ifdef _DEBUG
206                                                            log_error("write(STDOUT) error (%d)\n", errno);
207    #endif
208                                                            retry = 0;
209                                                            break;
210                                                    }
211                                            }
212                                            else if (ret == 0) // broken pipe
213                                            {
214                                                    retry = 0;
215                                                    break;
216                                            }
217                                            else
218                                            {
219                                                    stdout_conv_offset += ret;
220                                                    if (stdout_conv_offset >= stdout_conv_len) // flush buffer completely
221                                                    {
222                                                            ret = 0;
223                                                            stdout_conv_offset = 0;
224                                                            stdout_conv_len = 0;
225                                                            retry = 0;
226                                                            break;
227                                                    }
228                                                    continue;
229                                            }
230                                    }
231                            }
232                    }
233            }
234    
235        result = select (FD_SETSIZE, &testfds, (fd_set *) NULL,          // Restore STDOUT flags
236                         (fd_set *) NULL, &timeout);          fcntl(STDOUT_FILENO, F_SETFL, flags);
237    
238        switch (result)          if (close(epollfd) < 0)
239          {          {
240          case 0:                  log_error("close(epoll) error (%d)\n");
           out = KEY_TIMEOUT;  
           break;  
         case -1:  
           log_error ("select() error!\n");  
           break;  
         default:  
           if (FD_ISSET (0, &testfds))  
             {  
               len = read (0, buf, 255);  
             }  
           break;  
241          }          }
242    
243        //For debug          return ret;
244        //for (j = 0; j < len; j++)  }
245        //  log_std ("<--[%u]\n", (buf[j] + 256) % 256);  
246      }  int igetch(int timeout)
247    {
248            struct epoll_event ev, events[MAX_EVENTS];
249            int nfds, epollfd;
250            int ret;
251            int loop;
252    
253            unsigned char tmp[LINE_BUFFER_LEN];
254            int out = KEY_NULL;
255            int in_esc = 0;
256            int in_ascii = 0;
257            int in_control = 0;
258            int i = 0;
259            int flags;
260    
261            if (stdin_conv_offset >= stdin_conv_len)
262            {
263                    stdin_conv_len = 0;
264                    stdin_conv_offset = 0;
265    
266                    epollfd = epoll_create1(0);
267                    if (epollfd < 0)
268                    {
269                            log_error("epoll_create1() error (%d)\n", errno);
270                            return -1;
271                    }
272    
273                    ev.events = EPOLLIN;
274                    ev.data.fd = STDIN_FILENO;
275                    if (epoll_ctl(epollfd, EPOLL_CTL_ADD, STDIN_FILENO, &ev) == -1)
276                    {
277                            log_error("epoll_ctl(STDIN_FILENO) error (%d)\n", errno);
278    
279    while (pos < len)                          if (close(epollfd) < 0)
280      {                          {
281        c = buf[pos++];                                  log_error("close(epoll) error (%d)\n");
282                            }
283                            return -1;
284                    }
285    
286                    flags = fcntl(STDIN_FILENO, F_GETFL, 0);
287                    fcntl(STDIN_FILENO, F_SETFL, flags | O_NONBLOCK);
288    
289                    for (loop = 1; loop && stdin_buf_len < sizeof(stdin_buf) && stdin_conv_offset >= stdin_conv_len && !SYS_server_exit;)
290                    {
291                            if (SSH_v2 && ssh_channel_is_closed(SSH_channel))
292                            {
293                                    log_error("SSH channel is closed\n");
294                                    loop = 0;
295                                    break;
296                            }
297    
298                            nfds = epoll_wait(epollfd, events, MAX_EVENTS, timeout);
299    
300                            if (nfds < 0)
301                            {
302                                    if (errno != EINTR)
303                                    {
304                                            log_error("epoll_wait() error (%d)\n", errno);
305                                            break;
306                                    }
307                                    continue;
308                            }
309                            else if (nfds == 0) // timeout
310                            {
311                                    out = KEY_TIMEOUT;
312                                    break;
313                            }
314    
315                            for (int i = 0; i < nfds; i++)
316                            {
317                                    if (events[i].data.fd == STDIN_FILENO)
318                                    {
319                                            while (stdin_buf_len < sizeof(stdin_buf) && !SYS_server_exit) // read until complete or error
320                                            {
321                                                    if (SSH_v2)
322                                                    {
323                                                            ret = ssh_channel_read_nonblocking(SSH_channel, stdin_buf + stdin_buf_len, sizeof(stdin_buf) - (uint32_t)stdin_buf_len, 0);
324                                                            if (ret == SSH_ERROR)
325                                                            {
326                                                                    log_error("ssh_channel_read_nonblocking() error: %s\n", ssh_get_error(SSH_session));
327                                                                    loop = 0;
328                                                                    break;
329                                                            }
330                                                            else if (ret == SSH_EOF)
331                                                            {
332                                                                    loop = 0;
333                                                                    break;
334                                                            }
335                                                            else if (ret == 0)
336                                                            {
337                                                                    out = 0;
338                                                                    loop = 0;
339                                                                    break;
340                                                            }
341                                                    }
342                                                    else
343                                                    {
344                                                            ret = (int)read(STDIN_FILENO, stdin_buf + stdin_buf_len, sizeof(stdin_buf) - (size_t)stdin_buf_len);
345                                                    }
346                                                    if (ret < 0)
347                                                    {
348                                                            if (errno == EAGAIN || errno == EWOULDBLOCK)
349                                                            {
350                                                                    out = 0;
351                                                                    loop = 0;
352                                                                    break;
353                                                            }
354                                                            else if (errno == EINTR)
355                                                            {
356                                                                    continue;
357                                                            }
358                                                            else
359                                                            {
360    #ifdef _DEBUG
361                                                                    log_error("read(STDIN) error (%d)\n", errno);
362    #endif
363                                                                    loop = 0;
364                                                                    break;
365                                                            }
366                                                    }
367                                                    else if (ret == 0) // broken pipe
368                                                    {
369                                                            loop = 0;
370                                                            break;
371                                                    }
372                                                    else
373                                                    {
374                                                            stdin_buf_len += ret;
375                                                            continue;
376                                                    }
377                                            }
378                                    }
379                            }
380    
381                            // For debug
382    #ifdef _DEBUG
383                            for (int j = stdin_buf_offset; j < stdin_buf_len; j++)
384                            {
385                                    log_error("Debug input: <--[%u]\n", (stdin_buf[j] + 256) % 256);
386                            }
387    #endif
388                    }
389    
390                    fcntl(STDIN_FILENO, F_SETFL, flags);
391    
392                    if (close(epollfd) < 0)
393                    {
394                            log_error("close(epoll) error (%d)\n");
395                    }
396    
397                    if (stdin_buf_offset < stdin_buf_len)
398                    {
399                            ret = io_buf_conv(stdin_cd, stdin_buf, &stdin_buf_len, &stdin_buf_offset, stdin_conv, sizeof(stdin_conv), &stdin_conv_len);
400                            if (ret < 0)
401                            {
402                                    log_error("io_buf_conv(stdin, %d, %d, %d) error\n", stdin_buf_len, stdin_buf_offset, stdin_conv_len);
403                                    stdin_buf_len = stdin_buf_offset; // Discard invalid sequence
404                            }
405    
406                            // For debug
407    #ifdef _DEBUG
408                            for (int j = stdin_conv_offset; j < stdin_conv_len; j++)
409                            {
410                                    log_error("Debug input_conv: <--[%u]\n", (stdin_conv[j] + 256) % 256);
411                            }
412    #endif
413                    }
414            }
415    
416        if (c == '\0')          while (stdin_conv_offset < stdin_conv_len)
417          {          {
418            out = c;                  unsigned char c = (unsigned char)stdin_conv[stdin_conv_offset++];
419            break;  
420                    // Convert \r\n to \r
421                    if (c == CR && stdin_conv_offset < stdin_conv_len && stdin_conv[stdin_conv_offset] == LF)
422                    {
423                            stdin_conv_offset++;
424                    }
425    
426                    // Convert single \n to \r
427                    if (c == LF)
428                    {
429                            c = CR;
430                    }
431    
432                    if (c == KEY_CONTROL)
433                    {
434                            if (in_control == 0)
435                            {
436                                    in_control = 1;
437                                    i = 0;
438                                    continue;
439                            }
440                    }
441    
442                    if (in_control)
443                    {
444                            tmp[i++] = c;
445                            if (i >= 2)
446                            {
447                                    out = (int)tmp[0] * 256 + tmp[1];
448                                    in_control = 0;
449                                    break;
450                            }
451                            continue;
452                    }
453    
454                    if (c == KEY_ESC)
455                    {
456                            if (in_esc == 0)
457                            {
458                                    in_esc = 1;
459                                    in_ascii = 1;
460                                    i = 0;
461                                    continue;
462                            }
463                            else
464                            {
465                                    out = KEY_CSI;
466                                    in_esc = 0;
467                                    break;
468                            }
469                    }
470    
471                    in_esc = 0;
472    
473                    if (in_ascii)
474                    {
475                            tmp[i++] = c;
476                            if (i == 2 && (tmp[0] == 79 || tmp[0] == 91))
477                            {
478                                    in_ascii = 0;
479                                    switch (tmp[1])
480                                    {
481                                    case 65:
482                                            out = KEY_UP;
483                                            break;
484                                    case 66:
485                                            out = KEY_DOWN;
486                                            break;
487                                    case 67:
488                                            out = KEY_RIGHT;
489                                            break;
490                                    case 68:
491                                            out = KEY_LEFT;
492                                            break;
493                                    default:
494                                            in_ascii = 1;
495                                    }
496                                    if (!in_ascii)
497                                    {
498                                            break;
499                                    }
500                            }
501                            if (i == 2 && tmp[0] == 91) // Fterm
502                            {
503                                    in_ascii = 0;
504                                    switch (tmp[1])
505                                    {
506                                    case 86:
507                                            out = KEY_SHIFT_F1;
508                                            break;
509                                    case 90:
510                                            out = KEY_SHIFT_F2;
511                                            break;
512                                    case 97:
513                                            out = KEY_SHIFT_F3;
514                                            break;
515                                    case 98:
516                                            out = KEY_SHIFT_F4;
517                                            break;
518                                    case 99:
519                                            out = KEY_SHIFT_F5;
520                                            break;
521                                    case 100:
522                                            out = KEY_SHIFT_F6;
523                                            break;
524                                    case 101:
525                                            out = KEY_SHIFT_F7;
526                                            break;
527                                    case 102:
528                                            out = KEY_SHIFT_F8;
529                                            break;
530                                    case 103:
531                                            out = KEY_SHIFT_F9;
532                                            break;
533                                    case 104:
534                                            out = KEY_SHIFT_F10;
535                                            break;
536                                    case 107:
537                                            out = KEY_CTRL_F1;
538                                            break;
539                                    case 108:
540                                            out = KEY_CTRL_F2;
541                                            break;
542                                    case 109:
543                                            out = KEY_CTRL_F3;
544                                            break;
545                                    case 112:
546                                            out = KEY_CTRL_F6;
547                                            break;
548                                    case 113:
549                                            out = KEY_CTRL_F7;
550                                            break;
551                                    case 114:
552                                            out = KEY_CTRL_F8;
553                                            break;
554                                    case 115:
555                                            out = KEY_CTRL_F9;
556                                            break;
557                                    case 116:
558                                            out = KEY_CTRL_F10;
559                                            break;
560                                    default:
561                                            in_ascii = 1;
562                                    }
563                                    if (!in_ascii)
564                                    {
565                                            break;
566                                    }
567                            }
568                            if (i == 2 && tmp[0] == 79) // Xterm
569                            {
570                                    in_ascii = 0;
571                                    switch (tmp[1])
572                                    {
573                                    case 80:
574                                            out = KEY_F1;
575                                            break;
576                                    case 81:
577                                            out = KEY_F2;
578                                            break;
579                                    case 82:
580                                            out = KEY_F3;
581                                            break;
582                                    case 83:
583                                            out = KEY_F4;
584                                            break;
585                                    default:
586                                            in_ascii = 1;
587                                    }
588                                    if (!in_ascii)
589                                    {
590                                            break;
591                                    }
592                            }
593                            if (i == 3 && tmp[0] == 91 && tmp[2] == 126)
594                            {
595                                    in_ascii = 0;
596                                    switch (tmp[1])
597                                    {
598                                    case 49:
599                                            out = KEY_HOME;
600                                            break;
601                                    case 50:
602                                            out = KEY_INS;
603                                            break;
604                                    case 51:
605                                            out = KEY_DEL;
606                                            break;
607                                    case 52:
608                                            out = KEY_END;
609                                            break;
610                                    case 53:
611                                            out = KEY_PGUP;
612                                            break;
613                                    case 54:
614                                            out = KEY_PGDN;
615                                            break;
616                                    default:
617                                            in_ascii = 1;
618                                    }
619                                    if (!in_ascii)
620                                    {
621                                            break;
622                                    }
623                            }
624                            if (i == 4 && tmp[0] == 91 && tmp[1] == 49 && tmp[3] == 126) // Fterm
625                            {
626                                    in_ascii = 0;
627                                    switch (tmp[2])
628                                    {
629                                    case 49:
630                                            out = KEY_F1;
631                                            break;
632                                    case 50:
633                                            out = KEY_F2;
634                                            break;
635                                    case 51:
636                                            out = KEY_F3;
637                                            break;
638                                    case 52:
639                                            out = KEY_F4;
640                                            break;
641                                    case 53:
642                                            out = KEY_F5;
643                                            break;
644                                    case 55:
645                                            out = KEY_F6;
646                                            break;
647                                    case 56:
648                                            out = KEY_F7;
649                                            break;
650                                    case 57:
651                                            out = KEY_F8;
652                                            break;
653                                    default:
654                                            in_ascii = 1;
655                                    }
656                                    if (!in_ascii)
657                                    {
658                                            break;
659                                    }
660                            }
661                            if (i == 4 && tmp[0] == 91 && tmp[1] == 50 && tmp[3] == 126) // Fterm
662                            {
663                                    in_ascii = 0;
664                                    switch (tmp[2])
665                                    {
666                                    case 48:
667                                            out = KEY_F9;
668                                            break;
669                                    case 49:
670                                            out = KEY_F10;
671                                            break;
672                                    case 50:
673                                            out = KEY_F11; // Fterm
674                                            break;
675                                    case 51:
676                                            out = KEY_F11; // Xterm
677                                            break;
678                                    case 52:
679                                            out = KEY_F12; // Xterm
680                                            break;
681                                    default:
682                                            in_ascii = 1;
683                                    }
684                                    if (!in_ascii)
685                                    {
686                                            break;
687                                    }
688                            }
689                            if (i == 5 && tmp[0] == 91 && tmp[1] == 49 && tmp[2] == 59 && tmp[3] == 53) // Xterm
690                            {
691                                    in_ascii = 0;
692                                    switch (tmp[4])
693                                    {
694                                    case 65:
695                                            out = KEY_CTRL_UP;
696                                            break;
697                                    case 66:
698                                            out = KEY_CTRL_DOWN;
699                                            break;
700                                    case 67:
701                                            out = KEY_CTRL_RIGHT;
702                                            break;
703                                    case 68:
704                                            out = KEY_CTRL_LEFT;
705                                            break;
706                                    case 70:
707                                            out = KEY_CTRL_END;
708                                            break;
709                                    case 72:
710                                            out = KEY_CTRL_HOME;
711                                            break;
712                                    case 80:
713                                            out = KEY_CTRL_F1;
714                                            break;
715                                    case 81:
716                                            out = KEY_CTRL_F2;
717                                            break;
718                                    case 82:
719                                            out = KEY_CTRL_F3;
720                                            break;
721                                    default:
722                                            in_ascii = 1;
723                                    }
724                                    if (!in_ascii)
725                                    {
726                                            break;
727                                    }
728                            }
729                            if (i == 6 && tmp[0] == 91 && tmp[1] == 49 && tmp[3] == 59 && tmp[4] == 53 && tmp[5] == 126) // Xterm
730                            {
731                                    in_ascii = 0;
732                                    switch (tmp[2])
733                                    {
734                                    case 53:
735                                            out = KEY_CTRL_F5;
736                                            break;
737                                    case 55:
738                                            out = KEY_CTRL_F6;
739                                            break;
740                                    case 56:
741                                            out = KEY_CTRL_F7;
742                                            break;
743                                    case 57:
744                                            out = KEY_CTRL_F8;
745                                            break;
746                                    default:
747                                            in_ascii = 1;
748                                    }
749                                    if (!in_ascii)
750                                    {
751                                            break;
752                                    }
753                            }
754                            if (i == 6 && tmp[0] == 91 && tmp[1] == 50 && tmp[3] == 59 && tmp[4] == 53 && tmp[5] == 126) // Xterm
755                            {
756                                    in_ascii = 0;
757                                    switch (tmp[2])
758                                    {
759                                    case 48:
760                                            out = KEY_CTRL_F9;
761                                            break;
762                                    case 49:
763                                            out = KEY_CTRL_F10;
764                                            break;
765                                    case 51:
766                                            out = KEY_CTRL_F11;
767                                            break;
768                                    case 52:
769                                            out = KEY_CTRL_F12;
770                                            break;
771                                    default:
772                                            in_ascii = 1;
773                                    }
774                                    if (!in_ascii)
775                                    {
776                                            break;
777                                    }
778                            }
779                            if (i == 5 && tmp[0] == 91 && tmp[1] == 49 && tmp[2] == 59 && tmp[3] == 50) // Xterm
780                            {
781                                    in_ascii = 0;
782                                    switch (tmp[4])
783                                    {
784                                    case 80:
785                                            out = KEY_SHIFT_F1;
786                                            break;
787                                    case 81:
788                                            out = KEY_SHIFT_F2;
789                                            break;
790                                    case 82:
791                                            out = KEY_SHIFT_F3;
792                                            break;
793                                    case 83:
794                                            out = KEY_SHIFT_F4;
795                                            break;
796                                    default:
797                                            in_ascii = 1;
798                                    }
799                                    if (!in_ascii)
800                                    {
801                                            break;
802                                    }
803                            }
804                            if (i == 6 && tmp[0] == 91 && tmp[1] == 49 && tmp[3] == 59 && tmp[4] == 50 && tmp[5] == 126) // Xterm
805                            {
806                                    in_ascii = 0;
807                                    switch (tmp[2])
808                                    {
809                                    case 53:
810                                            out = KEY_SHIFT_F5;
811                                            break;
812                                    case 55:
813                                            out = KEY_SHIFT_F6;
814                                            break;
815                                    case 56:
816                                            out = KEY_SHIFT_F7;
817                                            break;
818                                    case 57:
819                                            out = KEY_SHIFT_F8;
820                                            break;
821                                    default:
822                                            in_ascii = 1;
823                                    }
824                                    if (!in_ascii)
825                                    {
826                                            break;
827                                    }
828                            }
829                            if (i == 6 && tmp[0] == 91 && tmp[1] == 50 && tmp[3] == 59 && tmp[4] == 50 && tmp[5] == 126) // Xterm
830                            {
831                                    in_ascii = 0;
832                                    switch (tmp[2])
833                                    {
834                                    case 48:
835                                            out = KEY_SHIFT_F9;
836                                            break;
837                                    case 49:
838                                            out = KEY_SHIFT_F10;
839                                            break;
840                                    case 51:
841                                            out = KEY_SHIFT_F11;
842                                            break;
843                                    case 52:
844                                            out = KEY_SHIFT_F12;
845                                            break;
846                                    default:
847                                            in_ascii = 1;
848                                    }
849                                    if (!in_ascii)
850                                    {
851                                            break;
852                                    }
853                            }
854    
855                            if (c == 'm')
856                            {
857                                    in_ascii = 0;
858                            }
859                            continue;
860                    }
861    
862                    out = ((int)c + 256) % 256;
863                    break;
864          }          }
865    
866        if (c == KEY_CONTROL)          // For ESC key
867            if (out == 0 && in_esc)
868          {          {
869            if (in_control == 0)                  out = KEY_ESC;
             {  
               in_control = 1;  
               i = 0;  
               continue;  
             }  
870          }          }
871    
872        if (in_control)          // for debug
873    #ifdef _DEBUG
874            if (out != KEY_TIMEOUT && out != KEY_NULL)
875          {          {
876            tmp[i++] = c;                  log_error("Debug: -->[0x %x]\n", out);
           if (i >= 2)  
             {  
               out = (int) tmp[0] * 256 + tmp[1];  
               in_control = 0;  
               break;  
             }  
           continue;  
877          }          }
878    #endif
879    
880            return out;
881    }
882    
883    int igetch_t(int sec)
884    {
885            int ch;
886            time_t t_begin = time(NULL);
887    
888            do
889            {
890                    ch = igetch(100);
891            } while (!SYS_server_exit && ch == KEY_TIMEOUT && (time(NULL) - t_begin < sec));
892    
893            return ch;
894    }
895    
896        if (c == ESC_KEY)  void igetch_reset()
897    {
898            int ch;
899            do
900            {
901                    ch = igetch(100);
902            } while (ch != KEY_NULL && ch != KEY_TIMEOUT);
903    }
904    
905    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)
906    {
907            char *in_buf;
908            char *out_buf;
909            size_t in_bytes;
910            size_t out_bytes;
911            int ret;
912            int in_control = 0;
913            size_t i = 0;
914    
915            if (cd == NULL || p_buf == NULL || p_buf_len == NULL || p_buf_offset == NULL || p_conv == NULL || p_conv_len == NULL)
916          {          {
917            if (in_esc == 0)                  log_error("NULL pointer error\n");
918              {                  return -1;
               in_esc = 1;  
               in_ascii = 1;  
               i = 0;  
               continue;  
             }  
           else  
             {  
               out = ESC_KEY;  
               in_esc = 0;  
               break;  
             }  
919          }          }
920    
921        in_esc = 0;          in_buf = p_buf + *p_buf_offset;
922            in_bytes = (size_t)(*p_buf_len - *p_buf_offset);
923            out_buf = p_conv + *p_conv_len;
924            out_bytes = conv_size - (size_t)(*p_conv_len);
925    
926        if (in_ascii)          while (in_bytes > 0)
927          {          {
928            tmp[i++] = c;                  if ((unsigned char)(*in_buf) == KEY_CONTROL)
           if (c == 'm')  
             {  
               in_ascii = 0;  
               continue;  
             }  
           if (i == 2 && c >= 'A' && c <= 'D')  
             {  
               in_ascii = 0;  
               switch (c)  
929                  {                  {
930                  case 'A':                          if (in_control == 0)
931                    out = KEY_UP;                          {
932                    break;                                  in_control = 1;
933                  case 'B':                                  i = 0;
934                    out = KEY_DOWN;                          }
                   break;  
                 case 'C':  
                   out = KEY_RIGHT;  
                   break;  
                 case 'D':  
                   out = KEY_LEFT;  
                   break;  
935                  }                  }
936                break;  
937              }                  if (in_control)
           if (i == 3 && tmp[0] == 91 && tmp[2] == 126)  
             {  
               in_ascii = 0;  
               switch (tmp[1])  
938                  {                  {
939                  case 49:                          if (out_bytes <= 0)
940                    out = KEY_HOME;                          {
941                    break;                                  log_error("No enough free space in p_conv, conv_len=%d, conv_size=%d\n", *p_conv_len, conv_size);
942                  case 51:                                  return -2;
943                    out = KEY_DEL;                          }
944                    break;  
945                  case 52:                          *out_buf = *in_buf;
946                    out = KEY_END;                          in_buf++;
947                    break;                          out_buf++;
948                  case 53:                          in_bytes--;
949                    out = KEY_PGUP;                          out_bytes--;
950                    break;  
951                  case 54:                          (*p_buf_offset)++;
952                    out = KEY_PGDN;                          *p_conv_len = (int)(conv_size - out_bytes);
953                    break;  
954                            i++;
955                            if (i >= 2)
956                            {
957                                    in_control = 0;
958                            }
959                            continue;
960                  }                  }
               break;  
             }  
           continue;  
         }  
961    
962        out = ((int) c + 256) % 256;                  ret = (int)iconv(cd, &in_buf, &in_bytes, &out_buf, &out_bytes);
963        break;                  if (ret == -1)
964      }                  {
965                            if (errno == EINVAL) // Incomplete
966                            {
967    #ifdef _DEBUG
968                                    log_error("iconv(inbytes=%d, outbytes=%d) error: EINVAL, in_buf[0]=%d\n", in_bytes, out_bytes, in_buf[0]);
969    #endif
970                                    if (p_buf != in_buf)
971                                    {
972                                            *p_buf_len = (int)(p_buf + *p_buf_len - in_buf);
973                                            *p_buf_offset = 0;
974                                            *p_conv_len = (int)(conv_size - out_bytes);
975                                            memmove(p_buf, in_buf, (size_t)(*p_buf_len));
976                                    }
977    
978                                    break;
979                            }
980                            else if (errno == E2BIG)
981                            {
982                                    log_error("iconv(inbytes=%d, outbytes=%d) error: E2BIG\n", in_bytes, out_bytes);
983                                    return -1;
984                            }
985                            else if (errno == EILSEQ)
986                            {
987                                    if (in_bytes > out_bytes || out_bytes <= 0)
988                                    {
989                                            log_error("iconv(inbytes=%d, outbytes=%d) error: EILSEQ and E2BIG\n", in_bytes, out_bytes);
990                                            return -2;
991                                    }
992    
993                                    // reset in_bytes when "//IGNORE" is applied
994                                    if (in_bytes == 0)
995                                    {
996                                            in_bytes = (size_t)(*p_buf_len - *p_buf_offset);
997                                    }
998    
999                                    *out_buf = *in_buf;
1000                                    in_buf++;
1001                                    out_buf++;
1002                                    in_bytes--;
1003                                    out_bytes--;
1004    
1005    //for debug                                  continue;
1006    //log_std ("-->[%u]\n", out);                          }
1007                    }
1008                    else
1009                    {
1010                            *p_buf_len = 0;
1011                            *p_buf_offset = 0;
1012                            *p_conv_len = (int)(conv_size - out_bytes);
1013    
1014    return out;                          break;
1015                    }
1016            }
1017    
1018            return 0;
1019  }  }
1020    
1021  int  int io_conv_init(const char *charset)
 igetch_t (long int sec)  
1022  {  {
1023    int ch;          char tocode[32];
1024    time_t t_begin = time(0);  
1025              if (charset == NULL)
1026    do {          {
1027      ch = igetch ();                  log_error("NULL pointer error\n");
1028    } while ((ch == KEY_TIMEOUT) && (time(0) - t_begin < sec));                  return -1;
1029            }
1030    
1031            io_conv_cleanup();
1032    
1033            strncpy(stdio_charset, charset, sizeof(stdio_charset) - 1);
1034            stdio_charset[sizeof(stdio_charset) - 1] = '\0';
1035    
1036    return ch;          snprintf(tocode, sizeof(tocode), "%s%s", BBS_DEFAULT_CHARSET,
1037                             (strcasecmp(stdio_charset, BBS_DEFAULT_CHARSET) == 0 ? "" : "//IGNORE"));
1038            stdin_cd = iconv_open(tocode, stdio_charset);
1039            if (stdin_cd == (iconv_t)(-1))
1040            {
1041                    log_error("iconv_open(%s->%s) error: %d\n", stdio_charset, tocode, errno);
1042                    return -2;
1043            }
1044    
1045            snprintf(tocode, sizeof(tocode), "%s%s", stdio_charset,
1046                             (strcasecmp(BBS_DEFAULT_CHARSET, stdio_charset) == 0 ? "" : "//TRANSLIT"));
1047            stdout_cd = iconv_open(tocode, BBS_DEFAULT_CHARSET);
1048            if (stdout_cd == (iconv_t)(-1))
1049            {
1050                    log_error("iconv_open(%s->%s) error: %d\n", BBS_DEFAULT_CHARSET, tocode, errno);
1051                    iconv_close(stdin_cd);
1052                    return -2;
1053            }
1054    
1055            return 0;
1056  }  }
1057    
1058  int  int io_conv_cleanup(void)
 ikbhit ()  
1059  {  {
1060    int len;          if (stdin_cd != NULL)
1061            {
1062    ioctl (0, FIONREAD, &len);                  iconv_close(stdin_cd);
1063                    stdin_cd = NULL;
1064            }
1065            if (stdout_cd != NULL)
1066            {
1067                    iconv_close(stdout_cd);
1068                    stdout_cd = NULL;
1069            }
1070    
1071    return len;          return 0;
1072  }  }


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

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