/[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.13 by sysadm, Mon Mar 15 07:30:21 2010 UTC Revision 1.26 by sysadm, Sun May 11 04:09:08 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    
17  #include "io.h"  #include "io.h"
18    #include "log.h"
19  #include "common.h"  #include "common.h"
20  #include "tcplib.h"  #include <errno.h>
21  #include <stdio.h>  #include <stdio.h>
22  #include <stdarg.h>  #include <stdarg.h>
23  #include <time.h>  #include <time.h>
24  #include <fcntl.h>  #include <fcntl.h>
25  #include <unistd.h>  #include <unistd.h>
26    #include <sys/select.h>
27  #include <sys/ioctl.h>  #include <sys/ioctl.h>
28    
29  int  int outc(char c)
 outc (char c)  
30  {  {
31    int retval;          int retval;
32    
33    retval = fprintf (stdout, "%c", c);          retval = fprintf(stdout, "%c", c);
34    
35    return retval;          return retval;
36  }  }
37    
38  int  int prints(const char *format, ...)
 prints (const char *format, ...)  
39  {  {
40    va_list args;          va_list args;
41    int retval;          int retval;
42    
43    va_start (args, format);          va_start(args, format);
44    retval = vfprintf (stdout, format, args);          retval = vfprintf(stdout, format, args);
45    va_end (args);          va_end(args);
46    
47    return retval;          return retval;
48  }  }
49    
50  int  int iflush()
 iflush ()  
51  {  {
52    int retval;          int retval;
53    
54    retval = fflush (stdout);          retval = fflush(stdout);
55    
56    return retval;          return retval;
57  }  }
58    
59  int  int igetch(int clear_buf)
 igetch ()  
60  {  {
61    static char buf[256];          // static input buffer
62    unsigned char c, tmp[256];          static unsigned char buf[LINE_BUFFER_LEN];
63    int out = KEY_NULL, loop = 1, in_esc = 0, in_ascii = 0, in_control = 0, i =          static ssize_t len = 0;
64      0, j, result;          static int pos = 0;
65    static int len = 0, pos = 0;  
66    fd_set testfds;          fd_set testfds;
67    struct timeval timeout;          struct timeval timeout;
68    
69    //Stop on system exit          unsigned char tmp[LINE_BUFFER_LEN];
70    if (SYS_exit)          int ret;
71      return KEY_NULL;          int out = KEY_NULL;
72            int in_esc = 0;
73    if (pos >= len)          int in_ascii = 0;
74      {          int in_control = 0;
75        pos = 0;          int i = 0;
76        len = 0;          int flags;
   
       FD_ZERO (&testfds);  
       FD_SET (0, &testfds);  
77    
78        timeout.tv_sec = 1;          if (clear_buf)
       timeout.tv_usec = 0;  
   
       result = SignalSafeSelect (FD_SETSIZE, &testfds, (fd_set *) NULL,  
                        (fd_set *) NULL, &timeout);  
   
       if (result == 0)  
         {  
           return KEY_TIMEOUT;  
         }  
       if (result < 0)  
79          {          {
80            log_error ("select() error (%d) !\n", result);                  pos = 0;
81            return KEY_NULL;                  len = 0;
82    
83                    return 0;
84          }          }
85        if (result > 0)  
86            while (!SYS_server_exit && pos >= len)
87          {          {
88            if (FD_ISSET (0, &testfds))                  FD_ZERO(&testfds);
89              {                  FD_SET(STDIN_FILENO, &testfds);
               len = read (0, buf, 255);  
             }  
         }  
90    
91        //For debug                  timeout.tv_sec = 0;
92        //for (j = 0; j < len; j++)                  timeout.tv_usec = 100 * 1000; // 0.1 second
       //  log_std ("<--[%u]\n", (buf[j] + 256) % 256);  
     }  
   
   while (pos < len)  
     {  
       c = buf[pos++];  
93    
94        if (c == '\0')                  ret = select(STDIN_FILENO + 1, &testfds, NULL, NULL, &timeout);
         {  
           out = c;  
           break;  
         }  
95    
96        if (c == KEY_CONTROL)                  if (ret < 0)
97          {                  {
98            if (in_control == 0)                          if (errno != EINTR)
99              {                          {
100                in_control = 1;                                  log_error("Select error in igetch: !\n", errno);
101                i = 0;                                  return KEY_NULL;
102                continue;                          }
103              }                          continue;
104          }                  }
105                    else if (ret == 0)
106                    {
107                            return KEY_TIMEOUT;
108                    }
109    
110        if (in_control)                  if (FD_ISSET(STDIN_FILENO, &testfds))
111          {                  {
112            tmp[i++] = c;                          flags = fcntl(STDIN_FILENO, F_GETFL, 0);
113            if (i >= 2)                          fcntl(socket_server, F_SETFL, flags | O_NONBLOCK);
114              {  
115                out = (int) tmp[0] * 256 + tmp[1];                          len = read(STDIN_FILENO, buf, sizeof(buf));
116                in_control = 0;                          if (len < 0)
117                break;                          {
118              }                                  if (errno != EAGAIN && errno != EWOULDBLOCK && errno != EINTR)
119            continue;                                  {
120                                            log_error("Read socket error (%d)\n", errno);
121                                    }
122                            }
123    
124                            pos = 0;
125    
126                            fcntl(STDIN_FILENO, F_SETFL, flags);
127    
128                            break;
129                    }
130    
131                    // For debug
132                    // for (j = 0; j < len; j++)
133                    //   log_std ("<--[%u]\n", (buf[j] + 256) % 256);
134          }          }
135    
136        if (c == ESC_KEY)          while (pos < len)
137          {          {
138            if (in_esc == 0)                  unsigned char c = buf[pos++];
139              {  
140                in_esc = 1;                  if (c == '\0')
141                in_ascii = 1;                  {
142                i = 0;                          return KEY_NULL;
143                continue;                  }
             }  
           else  
             {  
               out = ESC_KEY;  
               in_esc = 0;  
               break;  
             }  
         }  
144    
145        in_esc = 0;                  if (c == KEY_CONTROL)
146                    {
147                            if (in_control == 0)
148                            {
149                                    in_control = 1;
150                                    i = 0;
151                                    continue;
152                            }
153                    }
154    
155        if (in_ascii)                  if (in_control)
156          {                  {
157            tmp[i++] = c;                          tmp[i++] = c;
158            if (c == 'm')                          if (i >= 2)
159              {                          {
160                in_ascii = 0;                                  out = (int)tmp[0] * 256 + tmp[1];
161                continue;                                  in_control = 0;
162              }                                  break;
163            if (i == 2 && c >= 'A' && c <= 'D')                          }
164              {                          continue;
165                in_ascii = 0;                  }
               switch (c)  
                 {  
                 case 'A':  
                   out = KEY_UP;  
                   break;  
                 case 'B':  
                   out = KEY_DOWN;  
                   break;  
                 case 'C':  
                   out = KEY_RIGHT;  
                   break;  
                 case 'D':  
                   out = KEY_LEFT;  
                   break;  
                 }  
               break;  
             }  
           if (i == 3 && tmp[0] == 91 && tmp[2] == 126)  
             {  
               in_ascii = 0;  
               switch (tmp[1])  
                 {  
                 case 49:  
                   out = KEY_HOME;  
                   break;  
                 case 51:  
                   out = KEY_DEL;  
                   break;  
                 case 52:  
                   out = KEY_END;  
                   break;  
                 case 53:  
                   out = KEY_PGUP;  
                   break;  
                 case 54:  
                   out = KEY_PGDN;  
                   break;  
                 }  
               break;  
             }  
           continue;  
         }  
166    
167        out = ((int) c + 256) % 256;                  if (c == ESC_KEY)
168        break;                  {
169      }                          if (in_esc == 0)
170                            {
171                                    in_esc = 1;
172                                    in_ascii = 1;
173                                    i = 0;
174                                    continue;
175                            }
176                            else
177                            {
178                                    out = ESC_KEY;
179                                    in_esc = 0;
180                                    break;
181                            }
182                    }
183    
184    //for debug                  in_esc = 0;
   //log_std ("-->[%u]\n", out);  
185    
186    return out;                  if (in_ascii)
187  }                  {
188                            tmp[i++] = c;
189                            if (c == 'm')
190                            {
191                                    in_ascii = 0;
192                                    continue;
193                            }
194                            if (i == 2 && c >= 'A' && c <= 'D')
195                            {
196                                    in_ascii = 0;
197                                    switch (c)
198                                    {
199                                    case 'A':
200                                            out = KEY_UP;
201                                            break;
202                                    case 'B':
203                                            out = KEY_DOWN;
204                                            break;
205                                    case 'C':
206                                            out = KEY_RIGHT;
207                                            break;
208                                    case 'D':
209                                            out = KEY_LEFT;
210                                            break;
211                                    }
212                                    break;
213                            }
214                            if (i == 3 && tmp[0] == 91 && tmp[2] == 126)
215                            {
216                                    in_ascii = 0;
217                                    switch (tmp[1])
218                                    {
219                                    case 49:
220                                            out = KEY_HOME;
221                                            break;
222                                    case 51:
223                                            out = KEY_DEL;
224                                            break;
225                                    case 52:
226                                            out = KEY_END;
227                                            break;
228                                    case 53:
229                                            out = KEY_PGUP;
230                                            break;
231                                    case 54:
232                                            out = KEY_PGDN;
233                                            break;
234                                    }
235                                    break;
236                            }
237                            continue;
238                    }
239    
240  int                  out = ((int)c + 256) % 256;
241  igetch_t (long int sec)                  break;
242  {          }
   int ch;  
   time_t t_begin = time (0);  
243    
244    do          // for debug
245      {          // log_std ("-->[%u]\n", out);
       ch = igetch ();  
     }  
   while ((ch == KEY_TIMEOUT || ch == 0xa) && (time (0) - t_begin < sec));  
246    
247    return ch;          return out;
248  }  }
249    
250  int  int igetch_t(long int sec)
 ikbhit ()  
251  {  {
252    int len;          int ch;
253            time_t t_begin = time(0);
254    
255    ioctl (0, FIONREAD, &len);          do
256            {
257                    ch = igetch(0);
258            } while (!SYS_server_exit && ch == KEY_TIMEOUT && (time(0) - t_begin < sec));
259    
260    return len;          return ch;
261  }  }

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