/[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.28 by sysadm, Sun May 11 14:52:26 2025 UTC Revision 1.31 by sysadm, Tue May 13 07:28:51 2025 UTC
# Line 26  Line 26 
26  #include <unistd.h>  #include <unistd.h>
27  #include <sys/select.h>  #include <sys/select.h>
28  #include <sys/ioctl.h>  #include <sys/ioctl.h>
29    #include <sys/epoll.h>
30    
31  static char stdout_buf[BUFSIZ];  static char stdout_buf[BUFSIZ];
32  static int stdout_buf_len = 0;  static int stdout_buf_len = 0;
33    static int stdout_buf_offset = 0;
34    
35  int prints(const char *format, ...)  int prints(const char *format, ...)
36  {  {
# Line 40  int prints(const char *format, ...) Line 42  int prints(const char *format, ...)
42          ret = vsnprintf(buf, sizeof(buf), format, args);          ret = vsnprintf(buf, sizeof(buf), format, args);
43          va_end(args);          va_end(args);
44    
45          if (ret > 0 && stdout_buf_len + ret < BUFSIZ)          if (ret > 0)
46          {          {
47                  memcpy(stdout_buf + stdout_buf_len, buf, (size_t)(ret + 1));                  if (stdout_buf_len + ret > BUFSIZ)
48                  stdout_buf_len += ret;                  {
49                            iflush();
50                    }
51    
52                    if (stdout_buf_len + ret <= BUFSIZ)
53                    {
54                            memcpy(stdout_buf + stdout_buf_len, buf, (size_t)ret);
55                            stdout_buf_len += ret;
56                    }
57                    else
58                    {
59                            errno = EAGAIN;
60                            ret = (BUFSIZ - stdout_buf_len - ret);
61                    }
62          }          }
63          else if (ret > 0) // No enough free buffer  
64            return ret;
65    }
66    
67    int outc(char c)
68    {
69            int ret;
70    
71            if (stdout_buf_len + 1 > BUFSIZ)
72            {
73                    iflush();
74            }
75    
76            if (stdout_buf_len + 1 <= BUFSIZ)
77            {
78                    stdout_buf[stdout_buf_len] = c;
79                    stdout_buf_len++;
80            }
81            else
82          {          {
83                  ret = (BUFSIZ - stdout_buf_len - ret - 1);                  errno = EAGAIN;
84                    ret = -1;
85          }          }
86    
87          return ret;          return ret;
# Line 56  int prints(const char *format, ...) Line 90  int prints(const char *format, ...)
90  int iflush()  int iflush()
91  {  {
92          int flags;          int flags;
93          fd_set write_fds;          struct epoll_event ev, events[MAX_EVENTS];
94          struct timeval timeout;          int nfds, epollfd;
95          int stdout_buf_offset = 0;          int retry;
         int loop = 1;  
96          int ret = 0;          int ret = 0;
97    
98            epollfd = epoll_create1(0);
99            if (epollfd < 0)
100            {
101                    log_error("epoll_create1() error (%d)\n", errno);
102                    return -1;
103            }
104    
105            ev.events = EPOLLOUT;
106            ev.data.fd = STDOUT_FILENO;
107            if (epoll_ctl(epollfd, EPOLL_CTL_ADD, STDOUT_FILENO, &ev) == -1)
108            {
109                    log_error("epoll_ctl(STDOUT_FILENO) error (%d)\n", errno);
110                    if (close(epollfd) < 0)
111                    {
112                            log_error("close(epoll) error (%d)\n");
113                    }
114                    return -1;
115            }
116    
117          // Set STDOUT as non-blocking          // Set STDOUT as non-blocking
118          flags = fcntl(STDOUT_FILENO, F_GETFL, 0);          flags = fcntl(STDOUT_FILENO, F_GETFL, 0);
119          fcntl(STDOUT_FILENO, F_SETFL, flags | O_NONBLOCK);          fcntl(STDOUT_FILENO, F_SETFL, flags | O_NONBLOCK);
120    
121          while (loop && !SYS_server_exit)          // Retry wait / flush for at most 3 times
122            retry = 3;
123            while (retry > 0 && !SYS_server_exit)
124          {          {
125                  FD_ZERO(&write_fds);                  retry--;
                 FD_SET(STDOUT_FILENO, &write_fds);  
   
                 timeout.tv_sec = 0;  
                 timeout.tv_usec = 100 * 1000; // 0.1 second  
126    
127                  ret = select(STDOUT_FILENO + 1, NULL, &write_fds, NULL, &timeout);                  nfds = epoll_wait(epollfd, events, MAX_EVENTS, 100); // 0.1 second
128    
129                  if (ret == 0) // timeout                  if (nfds < 0)
                 {  
                         continue;  
                 }  
                 else if (ret < 0)  
130                  {                  {
131                          if (errno != EINTR)                          if (errno != EINTR)
132                          {                          {
133                                  log_error("select() error (%d) !\n", errno);                                  log_error("epoll_wait() error (%d)\n", errno);
134                                  loop = 0;                                  break;
135                          }                          }
136                            continue;
137                  }                  }
138                  else if (FD_ISSET(STDOUT_FILENO, &write_fds))                  else if (nfds == 0) // timeout
139                  {                  {
140                          ret = (int)write(STDOUT_FILENO, stdout_buf + stdout_buf_offset, (size_t)(stdout_buf_len - stdout_buf_offset));                          continue;
141                          if (ret < 0)                  }
142                          {  
143                                  if (errno != EAGAIN && errno != EWOULDBLOCK && errno != EINTR)                  for (int i = 0; i < nfds; i++)
144                                  {                  {
145                                          log_error("write(STDOUT) error (%d)\n", errno);                          if (events[i].data.fd == STDOUT_FILENO)
                                         loop = 0;  
                                 }  
                         }  
                         else if (ret == 0) // broken pipe  
                         {  
                                 loop = 0;  
                         }  
                         else  
146                          {                          {
147                                  stdout_buf_offset += ret;                                  while (stdout_buf_offset < stdout_buf_len && !SYS_server_exit) // write until complete or error
                                 if (stdout_buf_offset >= stdout_buf_len) // Flush buffer complete  
148                                  {                                  {
149                                          ret = 0;                                          ret = (int)write(STDOUT_FILENO, stdout_buf + stdout_buf_offset, (size_t)(stdout_buf_len - stdout_buf_offset));
150                                          stdout_buf_len = 0;                                          if (ret < 0)
151                                          loop = 0;                                          {
152                                                    if (errno == EAGAIN || errno == EWOULDBLOCK)
153                                                    {
154                                                            break;
155                                                    }
156                                                    else if (errno == EINTR)
157                                                    {
158                                                            continue;
159                                                    }
160                                                    else
161                                                    {
162                                                            log_error("write(STDOUT) error (%d)\n", errno);
163                                                            retry = 0;
164                                                            break;
165                                                    }
166                                            }
167                                            else if (ret == 0) // broken pipe
168                                            {
169                                                    retry = 0;
170                                                    break;
171                                            }
172                                            else
173                                            {
174                                                    stdout_buf_offset += ret;
175                                                    if (stdout_buf_offset >= stdout_buf_len) // flush buffer completely
176                                                    {
177                                                            ret = 0;
178                                                            stdout_buf_offset = 0;
179                                                            stdout_buf_len = 0;
180                                                            retry = 0;
181                                                            break;
182                                                    }
183                                                    continue;
184                                            }
185                                  }                                  }
186                          }                          }
187                  }                  }
# Line 119  int iflush() Line 190  int iflush()
190          // Restore STDOUT flags          // Restore STDOUT flags
191          fcntl(STDOUT_FILENO, F_SETFL, flags);          fcntl(STDOUT_FILENO, F_SETFL, flags);
192    
193            if (close(epollfd) < 0)
194            {
195                    log_error("close(epoll) error (%d)\n");
196            }
197    
198          return ret;          return ret;
199  }  }
200    
201  int igetch(int clear_buf)  int igetch(int timeout)
202  {  {
203          // static input buffer          // static input buffer
204          static unsigned char buf[LINE_BUFFER_LEN];          static unsigned char buf[LINE_BUFFER_LEN];
205          static ssize_t len = 0;          static int len = 0;
206          static int pos = 0;          static int pos = 0;
207    
208          fd_set readfds;          struct epoll_event ev, events[MAX_EVENTS];
209          struct timeval timeout;          int nfds, epollfd;
210            int ret;
211            int loop;
212    
213          unsigned char tmp[LINE_BUFFER_LEN];          unsigned char tmp[LINE_BUFFER_LEN];
214          int ret;          int out = KEY_NULL;
         int out = '\0';  
215          int in_esc = 0;          int in_esc = 0;
216          int in_ascii = 0;          int in_ascii = 0;
217          int in_control = 0;          int in_control = 0;
218          int i = 0;          int i = 0;
219          int flags;          int flags;
220    
221          if (clear_buf)          epollfd = epoll_create1(0);
222            if (epollfd < 0)
223          {          {
224                  pos = 0;                  log_error("epoll_create1() error (%d)\n", errno);
225                  len = 0;                  return -1;
   
                 return '\0';  
226          }          }
227    
228          while (!SYS_server_exit && pos >= len)          ev.events = EPOLLIN;
229            ev.data.fd = STDIN_FILENO;
230            if (epoll_ctl(epollfd, EPOLL_CTL_ADD, STDIN_FILENO, &ev) == -1)
231          {          {
232                  FD_ZERO(&readfds);                  log_error("epoll_ctl(STDIN_FILENO) error (%d)\n", errno);
                 FD_SET(STDIN_FILENO, &readfds);  
233    
234                  timeout.tv_sec = 0;                  if (close(epollfd) < 0)
235                  timeout.tv_usec = 100 * 1000; // 0.1 second                  {
236                            log_error("close(epoll) error (%d)\n");
237                    }
238                    return -1;
239            }
240    
241            flags = fcntl(STDIN_FILENO, F_GETFL, 0);
242            fcntl(STDIN_FILENO, F_SETFL, flags | O_NONBLOCK);
243    
244            loop = 1;
245    
246                  ret = select(STDIN_FILENO + 1, &readfds, NULL, NULL, &timeout);          while (loop && pos >= len && !SYS_server_exit)
247            {
248                    len = 0;
249                    pos = 0;
250    
251                  if (ret < 0)                  nfds = epoll_wait(epollfd, events, MAX_EVENTS, timeout);
252    
253                    if (nfds < 0)
254                  {                  {
255                          if (errno != EINTR)                          if (errno != EINTR)
256                          {                          {
257                                  log_error("select() error (%d) !\n", errno);                                  log_error("epoll_wait() error (%d)\n", errno);
258                                  return KEY_NULL;                                  break;
259                          }                          }
260                          continue;                          continue;
261                  }                  }
262                  else if (ret == 0)                  else if (nfds == 0) // timeout
263                  {                  {
264                          return KEY_TIMEOUT;                          out = KEY_TIMEOUT;
265                            break;
266                  }                  }
267    
268                  if (FD_ISSET(STDIN_FILENO, &readfds))                  for (int i = 0; i < nfds; i++)
269                  {                  {
270                          flags = fcntl(STDIN_FILENO, F_GETFL, 0);                          if (events[i].data.fd == STDIN_FILENO)
                         fcntl(socket_server, F_SETFL, flags | O_NONBLOCK);  
   
                         len = read(STDIN_FILENO, buf, sizeof(buf));  
                         if (len < 0)  
271                          {                          {
272                                  if (errno != EAGAIN && errno != EWOULDBLOCK && errno != EINTR)                                  while (len < sizeof(buf) && !SYS_server_exit) // read until complete or error
273                                  {                                  {
274                                          log_error("read(STDIN) error (%d)\n", errno);                                          ret = (int)read(STDIN_FILENO, buf + len, sizeof(buf) - (size_t)len);
275                                            if (ret < 0)
276                                            {
277                                                    if (errno == EAGAIN || errno == EWOULDBLOCK)
278                                                    {
279                                                            loop = 0;
280                                                            break;
281                                                    }
282                                                    else if (errno == EINTR)
283                                                    {
284                                                            continue;
285                                                    }
286                                                    else
287                                                    {
288                                                            log_error("read(STDIN) error (%d)\n", errno);
289                                                            loop = 0;
290                                                            break;
291                                                    }
292                                            }
293                                            else if (ret == 0) // broken pipe
294                                            {
295                                                    loop = 0;
296                                                    break;
297                                            }
298                                            else
299                                            {
300                                                    len += ret;
301                                                    continue;
302                                            }
303                                  }                                  }
304                          }                          }
                         else if (len == 0)  
                         {  
                                 out = KEY_NULL; // broken pipe  
                         }  
   
                         pos = 0;  
   
                         fcntl(STDIN_FILENO, F_SETFL, flags);  
   
                         break;  
305                  }                  }
306    
307                  // For debug                  // For debug
# Line 203  int igetch(int clear_buf) Line 309  int igetch(int clear_buf)
309                  //   log_std ("<--[%u]\n", (buf[j] + 256) % 256);                  //   log_std ("<--[%u]\n", (buf[j] + 256) % 256);
310          }          }
311    
312            fcntl(STDIN_FILENO, F_SETFL, flags);
313    
314          while (pos < len)          while (pos < len)
315          {          {
316                  unsigned char c = buf[pos++];                  unsigned char c = buf[pos++];
# Line 309  int igetch(int clear_buf) Line 417  int igetch(int clear_buf)
417          // for debug          // for debug
418          // log_std ("-->[%u]\n", out);          // log_std ("-->[%u]\n", out);
419    
420            if (close(epollfd) < 0)
421            {
422                    log_error("close(epoll) error (%d)\n");
423            }
424    
425          return out;          return out;
426  }  }
427    
428  int igetch_t(long int sec)  int igetch_t(int sec)
429  {  {
430          int ch;          int ch;
431          time_t t_begin = time(0);          time_t t_begin = time(0);
432    
433          do          do
434          {          {
435                  ch = igetch(0);                  ch = igetch(100);
436          } while (!SYS_server_exit && ch == KEY_TIMEOUT && (time(0) - t_begin < sec));          } while (!SYS_server_exit && ch == KEY_TIMEOUT && (time(0) - t_begin < sec));
437    
438          return ch;          return ch;
439  }  }
440    
441    void igetch_reset()
442    {
443            int ch;
444            do
445            {
446                    ch = igetch(0);
447            } while (ch != KEY_NULL && ch != KEY_TIMEOUT);
448    }

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