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

Annotation of /lbbs/src/screen.c

Parent Directory Parent Directory | Revision Log Revision Log

Revision 1.131 - (hide annotations)
Thu Nov 20 09:02:46 2025 UTC (3 months, 3 weeks ago) by sysadm
Branch: MAIN
Changes since 1.130: +0 -1 lines
Content type: text/x-csrc 
Add alternative POSIX semaphore based rd/rw (un)lock in user_list
1 sysadm 1.121 /* SPDX-License-Identifier: GPL-3.0-or-later */
2     /*
3     * screen
4     * - advanced telnet-based user interactive input / output features
5     *
6 sysadm 1.122 * Copyright (C) 2004-2025 Leaflet <leaflet@leafok.com>
7 sysadm 1.121 */
8 sysadm 1.1
9 sysadm 1.129 #ifdef HAVE_CONFIG_H
10     #include "config.h"
11     #endif
12    
13 sysadm 1.9 #include "bbs.h"
14 sysadm 1.6 #include "common.h"
15 sysadm 1.89 #include "editor.h"
16 sysadm 1.54 #include "file_loader.h"
17 sysadm 1.102 #include "io.h"
18     #include "log.h"
19 sysadm 1.101 #include "login.h"
20 sysadm 1.102 #include "screen.h"
21     #include "str_process.h"
22     #include <ctype.h>
23     #include <errno.h>
24 sysadm 1.52 #include <fcntl.h>
25 sysadm 1.98 #include <string.h>
26 sysadm 1.102 #include <stdlib.h>
27 sysadm 1.41 #include <unistd.h>
28 sysadm 1.127 #include <wchar.h>
29 sysadm 1.102 #include <sys/param.h>
30 sysadm 1.6 #include <sys/stat.h>
31 sysadm 1.102 #include <sys/types.h>
32 sysadm 1.1
33 sysadm 1.124 const char CTRL_SEQ_CLR_LINE[] = "\033[K";
34 sysadm 1.9
35 sysadm 1.124 static const int ACTIVE_BOARD_HEIGHT = 8;
36    
37     static const int STR_TOP_LEFT_MAX_LEN = 80;
38     static const int STR_TOP_MIDDLE_MAX_LEN = 40;
39     static const int STR_TOP_RIGHT_MAX_LEN = 80;
40 sysadm 1.70
41 sysadm 1.119 static size_t get_time_str(char *s, size_t len)
42 sysadm 1.107 {
43     time_t curtime;
44     struct tm local_tm;
45    
46     time(&curtime);
47     localtime_r(&curtime, &local_tm);
48 sysadm 1.119 size_t j = strftime(s, len, "%m/%d %H:%M %Z", &local_tm);
49 sysadm 1.107
50 sysadm 1.119 return j;
51 sysadm 1.107 }
52    
53 sysadm 1.21 void moveto(int row, int col)
54 sysadm 1.1 {
55 sysadm 1.21 if (row >= 0)
56     {
57     prints("\033[%d;%dH", row, col);
58     }
59     else
60     {
61     prints("\r");
62     }
63 sysadm 1.1 }
64    
65 sysadm 1.21 void clrtoeol()
66 sysadm 1.1 {
67 sysadm 1.63 prints(CTRL_SEQ_CLR_LINE);
68 sysadm 1.2 }
69    
70 sysadm 1.21 void clrline(int line_begin, int line_end)
71 sysadm 1.5 {
72 sysadm 1.21 int i;
73 sysadm 1.6
74 sysadm 1.21 for (i = line_begin; i <= line_end; i++)
75     {
76     moveto(i, 0);
77 sysadm 1.63 prints(CTRL_SEQ_CLR_LINE);
78 sysadm 1.21 }
79 sysadm 1.5 }
80    
81 sysadm 1.21 void clrtobot(int line_begin)
82 sysadm 1.16 {
83 sysadm 1.21 moveto(line_begin, 0);
84 sysadm 1.25 prints("\033[J");
85     moveto(line_begin, 0);
86 sysadm 1.16 }
87    
88 sysadm 1.21 void clearscr()
89 sysadm 1.2 {
90 sysadm 1.23 prints("\033[2J");
91 sysadm 1.21 moveto(0, 0);
92 sysadm 1.6 }
93    
94 sysadm 1.113 inline int press_any_key()
95     {
96 sysadm 1.114 return press_any_key_ex(" \033[1;33m按任意键继续...\033[m", 60);
97 sysadm 1.113 }
98    
99 sysadm 1.114 int press_any_key_ex(const char *msg, int sec)
100 sysadm 1.6 {
101 sysadm 1.112 int ch = 0;
102     int duration = 0;
103     time_t t_begin = time(NULL);
104    
105 sysadm 1.53 moveto(SCREEN_ROWS, 0);
106 sysadm 1.21 clrtoeol();
107 sysadm 1.6
108 sysadm 1.113 prints(msg);
109 sysadm 1.21 iflush();
110 sysadm 1.6
111 sysadm 1.114 igetch_reset();
112    
113 sysadm 1.112 do
114     {
115 sysadm 1.114 ch = igetch_t(sec - duration);
116 sysadm 1.112 duration = (int)(time(NULL) - t_begin);
117     } while (!SYS_server_exit && ch == 0 && duration < 60);
118    
119     return ch;
120 sysadm 1.1 }
121    
122 sysadm 1.21 void set_input_echo(int echo)
123 sysadm 1.7 {
124 sysadm 1.21 if (echo)
125     {
126     outc('\x83'); // ASCII code 131
127     }
128     else
129     {
130 sysadm 1.111 // outc ('\x85'); // ASCII code 133
131 sysadm 1.21 prints("\xff\xfb\x01\xff\xfb\x03");
132     }
133 sysadm 1.111 iflush();
134 sysadm 1.7 }
135    
136 sysadm 1.124 static int _str_input(char *buffer, int buf_size, int max_display_len, enum io_echo_t echo_mode)
137 sysadm 1.1 {
138 sysadm 1.104 int ch;
139 sysadm 1.38 int offset = 0;
140 sysadm 1.104 int eol;
141     int display_len;
142 sysadm 1.127 char input_str[5];
143 sysadm 1.104 int str_len = 0;
144 sysadm 1.127 wchar_t wcs[2];
145 sysadm 1.104 char c;
146 sysadm 1.1
147 sysadm 1.38 buffer[buf_size - 1] = '\0';
148 sysadm 1.104 offset = split_line(buffer, max_display_len, &eol, &display_len, 0);
149 sysadm 1.21
150 sysadm 1.47 igetch_reset();
151    
152 sysadm 1.48 while (!SYS_server_exit)
153 sysadm 1.1 {
154 sysadm 1.123 ch = igetch_t(MIN(BBS_max_user_idle_time, 60));
155 sysadm 1.48
156 sysadm 1.104 if (ch == CR)
157 sysadm 1.22 {
158 sysadm 1.21 break;
159 sysadm 1.22 }
160 sysadm 1.104 else if (ch == KEY_TIMEOUT || ch == KEY_NULL) // timeout or broken pipe
161 sysadm 1.41 {
162     return -1;
163     }
164 sysadm 1.104 else if (ch == LF || ch == '\0')
165 sysadm 1.22 {
166 sysadm 1.21 continue;
167 sysadm 1.22 }
168 sysadm 1.104 else if (ch == BACKSPACE)
169 sysadm 1.21 {
170     if (offset > 0)
171     {
172 sysadm 1.31 offset--;
173 sysadm 1.104 if (buffer[offset] < 0 || buffer[offset] > 127) // UTF8
174 sysadm 1.31 {
175 sysadm 1.115 while (offset > 0 && (buffer[offset] & 0xc0) != 0xc0)
176 sysadm 1.31 {
177 sysadm 1.104 offset--;
178 sysadm 1.31 }
179 sysadm 1.104 display_len--;
180     prints("\033[D \033[D");
181 sysadm 1.31 }
182     buffer[offset] = '\0';
183 sysadm 1.104 display_len--;
184 sysadm 1.31 prints("\033[D \033[D");
185 sysadm 1.21 iflush();
186     }
187     continue;
188     }
189 sysadm 1.104 else if (ch > 255 || iscntrl(ch))
190 sysadm 1.21 {
191     continue;
192     }
193 sysadm 1.104 else if ((ch & 0xff80) == 0x80) // head of multi-byte character
194 sysadm 1.21 {
195 sysadm 1.104 str_len = 0;
196 sysadm 1.115 c = (char)(ch & 0xf0);
197     while (c & 0x80)
198 sysadm 1.104 {
199     input_str[str_len] = (char)(ch - 256);
200     str_len++;
201 sysadm 1.115 c = (c & 0x7f) << 1;
202 sysadm 1.104
203 sysadm 1.115 if ((c & 0x80) == 0) // Input completed
204 sysadm 1.104 {
205     break;
206     }
207    
208     // Expect additional bytes of input
209     ch = igetch(100); // 0.1 second
210     if (ch == KEY_NULL || ch == KEY_TIMEOUT) // Ignore received bytes if no futher input
211     {
212 sysadm 1.106 #ifdef _DEBUG
213 sysadm 1.104 log_error("Ignore %d bytes of incomplete UTF8 character\n", str_len);
214 sysadm 1.106 #endif
215 sysadm 1.104 str_len = 0;
216     break;
217     }
218     }
219 sysadm 1.127 input_str[str_len] = '\0';
220 sysadm 1.104
221     if (str_len == 0) // Incomplete input
222     {
223     continue;
224     }
225    
226 sysadm 1.127 if (mbstowcs(wcs, input_str, 1) == (size_t)-1)
227     {
228     log_error("mbstowcs() error\n");
229     }
230     if (offset + str_len > buf_size - 1 || display_len + (UTF8_fixed_width ? 2 : wcwidth(wcs[0])) > max_display_len) // No enough space for Chinese character
231 sysadm 1.31 {
232     outc('\a');
233     iflush();
234     continue;
235     }
236 sysadm 1.104
237     memcpy(buffer + offset, input_str, (size_t)str_len);
238     offset += str_len;
239     buffer[offset] = '\0';
240     display_len += 2;
241    
242     switch (echo_mode)
243     {
244     case DOECHO:
245     prints(input_str);
246     break;
247     case NOECHO:
248     prints("**");
249     break;
250     }
251 sysadm 1.21 }
252 sysadm 1.104 else if (ch >= 32 && ch < 127) // Printable character
253 sysadm 1.21 {
254 sysadm 1.104 if (offset + 1 > buf_size - 1 || display_len + 1 > max_display_len)
255     {
256     outc('\a');
257     iflush();
258     continue;
259     }
260 sysadm 1.43
261 sysadm 1.104 buffer[offset++] = (char)ch;
262     buffer[offset] = '\0';
263     display_len++;
264 sysadm 1.43
265 sysadm 1.104 switch (echo_mode)
266     {
267     case DOECHO:
268     outc((char)ch);
269     break;
270     case NOECHO:
271     outc('*');
272     break;
273     }
274 sysadm 1.21 }
275 sysadm 1.104 else // Invalid character
276 sysadm 1.21 {
277 sysadm 1.104 continue;
278 sysadm 1.21 }
279 sysadm 1.104
280     iflush();
281 sysadm 1.6 }
282 sysadm 1.1
283 sysadm 1.21 return offset;
284 sysadm 1.1 }
285    
286 sysadm 1.124 int str_input(char *buffer, int buf_size, enum io_echo_t echo_mode)
287 sysadm 1.18 {
288 sysadm 1.32 int len;
289    
290     buffer[0] = '\0';
291 sysadm 1.21
292 sysadm 1.104 len = _str_input(buffer, buf_size, buf_size, echo_mode);
293 sysadm 1.21
294 sysadm 1.32 prints("\r\n");
295     iflush();
296 sysadm 1.21
297 sysadm 1.32 return len;
298 sysadm 1.115 }
299 sysadm 1.18
300 sysadm 1.108 int get_data(int row, int col, char *prompt, char *buffer, int buf_size, int max_display_len)
301 sysadm 1.15 {
302 sysadm 1.108 int len = 0;
303     int col_cur = 0;
304     int ch;
305     int offset = 0;
306     int eol;
307     int display_len;
308 sysadm 1.127 char input_str[5];
309 sysadm 1.128 int str_len = 0;
310 sysadm 1.127 wchar_t wcs[2];
311 sysadm 1.128 int wc_len;
312 sysadm 1.108 char c;
313    
314     buffer[buf_size - 1] = '\0';
315     offset = split_line(buffer, max_display_len, &eol, &display_len, 0);
316     buffer[offset] = '\0';
317     len = offset;
318     col_cur = col + str_length(prompt, 1) + display_len;
319 sysadm 1.15
320 sysadm 1.21 moveto(row, col);
321 sysadm 1.80 prints("%s", prompt);
322     prints("%s", buffer);
323 sysadm 1.108 prints("%*s", max_display_len - display_len, "");
324     moveto(row, col_cur);
325 sysadm 1.21 iflush();
326 sysadm 1.15
327 sysadm 1.108 igetch_reset();
328    
329     while (!SYS_server_exit)
330     {
331 sysadm 1.123 ch = igetch_t(MIN(BBS_max_user_idle_time, 60));
332 sysadm 1.108
333     if (ch == CR)
334     {
335     break;
336     }
337     else if (ch == KEY_TIMEOUT || ch == KEY_NULL) // timeout or broken pipe
338     {
339     return -1;
340     }
341     else if (ch == LF || ch == '\0')
342     {
343     continue;
344     }
345     else if (ch == BACKSPACE)
346     {
347     if (offset > 0)
348     {
349     str_len = 1;
350     offset--;
351     if (buffer[offset] < 0 || buffer[offset] > 127) // UTF8
352     {
353 sysadm 1.115 while (offset > 0 && (buffer[offset] & 0xc0) != 0xc0)
354 sysadm 1.108 {
355     str_len++;
356     offset--;
357     }
358 sysadm 1.128
359     if (mbstowcs(wcs, buffer + offset, 1) == (size_t)-1)
360     {
361     log_error("mbstowcs() error\n");
362     }
363     wc_len = (UTF8_fixed_width ? 2 : wcwidth(wcs[0]));
364    
365     if (wc_len == 2)
366     {
367     display_len--;
368     col_cur--;
369     }
370 sysadm 1.108 }
371    
372     memmove(buffer + offset, buffer + offset + str_len, (size_t)(len - offset - str_len));
373     len -= str_len;
374     buffer[len] = '\0';
375     display_len--;
376     col_cur--;
377    
378     moveto(row, col_cur);
379     prints("%s", buffer + offset);
380     prints("%*s", max_display_len - display_len, "");
381     moveto(row, col_cur);
382     iflush();
383     }
384     continue;
385     }
386     else if (ch == KEY_DEL)
387     {
388     if (offset < len)
389     {
390     if ((buffer[offset] & 0x80) == 0x80) // head of multi-byte character
391     {
392     str_len = 0;
393 sysadm 1.115 c = (char)(buffer[offset] & 0xf0);
394     while (c & 0x80)
395 sysadm 1.108 {
396     str_len++;
397 sysadm 1.115 c = (c & 0x7f) << 1;
398 sysadm 1.108 }
399     display_len--;
400     }
401     else
402     {
403     str_len = 1;
404     }
405    
406     memmove(buffer + offset, buffer + offset + str_len, (size_t)(len - offset - str_len));
407     len -= str_len;
408     buffer[len] = '\0';
409     display_len--;
410    
411     moveto(row, col_cur);
412     prints("%s", buffer + offset);
413     prints("%*s", max_display_len - display_len, "");
414     moveto(row, col_cur);
415     iflush();
416     }
417     continue;
418     }
419     else if (ch == KEY_LEFT)
420     {
421     if (offset > 0)
422     {
423     str_len = 1;
424     offset--;
425     if (buffer[offset] < 0 || buffer[offset] > 127) // UTF8
426     {
427 sysadm 1.115 while (offset > 0 && (buffer[offset] & 0xc0) != 0xc0)
428 sysadm 1.108 {
429     str_len++;
430     offset--;
431     }
432 sysadm 1.128
433     if (mbstowcs(wcs, buffer + offset, 1) == (size_t)-1)
434     {
435     log_error("mbstowcs() error\n");
436     }
437     wc_len = (UTF8_fixed_width ? 2 : wcwidth(wcs[0]));
438    
439     if (wc_len == 2)
440     {
441     col_cur--;
442     }
443 sysadm 1.108 }
444     col_cur--;
445    
446     moveto(row, col_cur);
447     iflush();
448     }
449     continue;
450     }
451     else if (ch == KEY_RIGHT)
452     {
453     if (offset < len)
454     {
455     str_len = 0;
456     if ((buffer[offset] & 0x80) == 0x80) // head of multi-byte character
457     {
458 sysadm 1.115 c = (char)(buffer[offset] & 0xf0);
459     while (c & 0x80)
460 sysadm 1.108 {
461     str_len++;
462 sysadm 1.115 c = (c & 0x7f) << 1;
463 sysadm 1.108 }
464 sysadm 1.128
465     if (mbstowcs(wcs, buffer + offset, 1) == (size_t)-1)
466     {
467     log_error("mbstowcs() error\n");
468     }
469     wc_len = (UTF8_fixed_width ? 2 : wcwidth(wcs[0]));
470    
471     if (wc_len == 2)
472     {
473     col_cur++;
474     }
475 sysadm 1.108 }
476     else
477     {
478     str_len = 1;
479     }
480    
481     col_cur++;
482     offset += str_len;
483    
484     moveto(row, col_cur);
485     iflush();
486     }
487     continue;
488     }
489     else if (ch == KEY_HOME || ch == KEY_UP)
490     {
491     if (offset > 0)
492     {
493     offset = 0;
494     col_cur = col + str_length(prompt, 1);
495    
496     moveto(row, col_cur);
497     iflush();
498     }
499     continue;
500     }
501     else if (ch == KEY_END || ch == KEY_DOWN)
502     {
503     if (offset < len)
504     {
505     offset = len;
506     col_cur = col + str_length(prompt, 1) + display_len;
507    
508     moveto(row, col_cur);
509     iflush();
510     }
511     continue;
512     }
513     else if (ch > 255 || iscntrl(ch))
514     {
515     continue;
516     }
517     else if ((ch & 0xff80) == 0x80) // head of multi-byte character
518     {
519     str_len = 0;
520 sysadm 1.115 c = (char)(ch & 0xf0);
521     while (c & 0x80)
522 sysadm 1.108 {
523     input_str[str_len] = (char)(ch - 256);
524     str_len++;
525 sysadm 1.115 c = (c & 0x7f) << 1;
526 sysadm 1.108
527 sysadm 1.115 if ((c & 0x80) == 0) // Input completed
528 sysadm 1.108 {
529     break;
530     }
531    
532     // Expect additional bytes of input
533     ch = igetch(100); // 0.1 second
534     if (ch == KEY_NULL || ch == KEY_TIMEOUT) // Ignore received bytes if no futher input
535     {
536     #ifdef _DEBUG
537     log_error("Ignore %d bytes of incomplete UTF8 character\n", str_len);
538     #endif
539     str_len = 0;
540     break;
541     }
542     }
543 sysadm 1.127 input_str[str_len] = '\0';
544 sysadm 1.108
545     if (str_len == 0) // Incomplete input
546     {
547     continue;
548     }
549    
550 sysadm 1.127 if (mbstowcs(wcs, input_str, 1) == (size_t)-1)
551     {
552     log_error("mbstowcs() error\n");
553     }
554 sysadm 1.128 wc_len = (UTF8_fixed_width ? 2 : wcwidth(wcs[0]));
555    
556     if (len + str_len > buf_size - 1 ||
557     display_len + wc_len > max_display_len) // No enough space for Chinese character
558 sysadm 1.108 {
559     outc('\a');
560     iflush();
561     continue;
562     }
563    
564     memmove(buffer + offset + str_len, buffer + offset, (size_t)(len - offset));
565     memcpy(buffer + offset, input_str, (size_t)str_len);
566     len += str_len;
567     buffer[len] = '\0';
568 sysadm 1.128 display_len += wc_len;
569 sysadm 1.108
570     moveto(row, col_cur);
571     prints("%s", buffer + offset);
572     prints("%*s", max_display_len - display_len, "");
573    
574 sysadm 1.128 col_cur += wc_len;
575 sysadm 1.108
576     moveto(row, col_cur);
577     iflush();
578    
579     offset += str_len;
580     }
581     else if (ch >= 32 && ch < 127) // Printable character
582     {
583     if (len + 1 > buf_size - 1 || display_len + 1 > max_display_len)
584     {
585     outc('\a');
586     iflush();
587     continue;
588     }
589    
590     memmove(buffer + offset + 1, buffer + offset, (size_t)(len - offset));
591     buffer[offset] = (char)ch;
592     len++;
593     buffer[len] = '\0';
594     display_len++;
595    
596     moveto(row, col_cur);
597     prints("%s", buffer + offset);
598     prints("%*s", max_display_len - display_len, "");
599    
600     col_cur++;
601    
602     moveto(row, col_cur);
603     iflush();
604    
605     offset++;
606     }
607     else // Invalid character
608     {
609     continue;
610     }
611     }
612 sysadm 1.21
613     return len;
614 sysadm 1.15 }
615    
616 sysadm 1.89 int display_data(const void *p_data, long display_line_total, const long *p_line_offsets, int eof_exit,
617 sysadm 1.81 display_data_key_handler key_handler, const char *help_filename)
618 sysadm 1.1 {
619 sysadm 1.37 static int show_help = 1;
620 sysadm 1.26 char buffer[LINE_BUFFER_LEN];
621 sysadm 1.85 DISPLAY_CTX ctx;
622 sysadm 1.81 int ch = 0;
623 sysadm 1.91 int input_ok;
624     const int screen_begin_row = 1;
625 sysadm 1.95 const int screen_row_total = SCREEN_ROWS - screen_begin_row;
626     int output_current_row = screen_begin_row;
627     int output_end_row = SCREEN_ROWS - 1;
628 sysadm 1.54 long int line_current = 0;
629 sysadm 1.34 long int len;
630     long int percentile;
631 sysadm 1.54 int loop;
632 sysadm 1.78 int eol, display_len;
633 sysadm 1.52
634 sysadm 1.95 clrline(output_current_row, SCREEN_ROWS);
635 sysadm 1.6
636 sysadm 1.81 // update msg_ext with extended key handler
637 sysadm 1.85 if (key_handler(&ch, &ctx) != 0)
638 sysadm 1.81 {
639     return ch;
640     }
641    
642 sysadm 1.54 loop = 1;
643 sysadm 1.44 while (!SYS_server_exit && loop)
644 sysadm 1.6 {
645 sysadm 1.126 if (eof_exit > 0 && line_current >= display_line_total)
646 sysadm 1.27 {
647 sysadm 1.82 if (eof_exit == 1)
648 sysadm 1.27 {
649     ch = press_any_key();
650     }
651 sysadm 1.82 else // if (eof_exit == 2)
652 sysadm 1.27 {
653     iflush();
654     }
655    
656     loop = 0;
657     break;
658     }
659    
660 sysadm 1.95 if (line_current >= display_line_total || output_current_row > output_end_row)
661 sysadm 1.21 {
662 sysadm 1.95 ctx.reach_begin = (line_current < output_current_row ? 1 : 0);
663 sysadm 1.85
664 sysadm 1.95 if (line_current - (output_current_row - screen_begin_row) + screen_row_total < display_line_total)
665 sysadm 1.27 {
666 sysadm 1.95 percentile = (line_current - (output_current_row - screen_begin_row) + screen_row_total) * 100 / display_line_total;
667 sysadm 1.85 ctx.reach_end = 0;
668 sysadm 1.27 }
669     else
670     {
671     percentile = 100;
672 sysadm 1.85 ctx.reach_end = 1;
673 sysadm 1.27 }
674 sysadm 1.6
675 sysadm 1.95 ctx.line_top = line_current - (output_current_row - screen_begin_row) + 1;
676     ctx.line_bottom = MIN(line_current - (output_current_row - screen_begin_row) + screen_row_total, display_line_total);
677 sysadm 1.85
678 sysadm 1.78 snprintf(buffer, sizeof(buffer),
679 sysadm 1.104 "\033[1;44;33m第\033[32m%ld\033[33m-\033[32m%ld\033[33m行 (\033[32m%ld%%\033[33m) %s",
680 sysadm 1.85 ctx.line_top,
681     ctx.line_bottom,
682     percentile,
683     ctx.msg);
684 sysadm 1.78
685 sysadm 1.97 len = split_line(buffer, SCREEN_COLS, &eol, &display_len, 1);
686 sysadm 1.81 for (; display_len < SCREEN_COLS; display_len++)
687 sysadm 1.78 {
688     buffer[len++] = ' ';
689     }
690     buffer[len] = '\0';
691     strncat(buffer, "\033[m", sizeof(buffer) - 1 - strnlen(buffer, sizeof(buffer)));
692    
693 sysadm 1.53 moveto(SCREEN_ROWS, 0);
694 sysadm 1.80 prints("%s", buffer);
695 sysadm 1.26 iflush();
696 sysadm 1.6
697 sysadm 1.26 input_ok = 0;
698 sysadm 1.44 while (!SYS_server_exit && !input_ok)
699 sysadm 1.21 {
700 sysadm 1.123 ch = igetch_t(BBS_max_user_idle_time);
701 sysadm 1.94 input_ok = 1;
702    
703 sysadm 1.110 if (ch != KEY_NULL && ch != KEY_TIMEOUT)
704     {
705     BBS_last_access_tm = time(NULL);
706     }
707    
708 sysadm 1.81 // extended key handler
709 sysadm 1.85 if (key_handler(&ch, &ctx) != 0)
710 sysadm 1.81 {
711     goto cleanup;
712     }
713    
714 sysadm 1.26 switch (ch)
715 sysadm 1.21 {
716 sysadm 1.67 case KEY_NULL:
717 sysadm 1.110 log_error("KEY_NULL\n");
718     goto cleanup;
719 sysadm 1.41 case KEY_TIMEOUT:
720 sysadm 1.110 log_error("User input timeout\n");
721 sysadm 1.41 goto cleanup;
722 sysadm 1.50 case KEY_HOME:
723 sysadm 1.95 if (line_current - output_current_row < 0) // Reach begin
724 sysadm 1.84 {
725     break;
726     }
727 sysadm 1.54 line_current = 0;
728 sysadm 1.95 output_current_row = screen_begin_row;
729     output_end_row = SCREEN_ROWS - 1;
730     clrline(output_current_row, SCREEN_ROWS);
731 sysadm 1.50 break;
732     case KEY_END:
733 sysadm 1.91 if (display_line_total < screen_row_total)
734 sysadm 1.83 {
735 sysadm 1.84 break;
736 sysadm 1.83 }
737 sysadm 1.91 line_current = display_line_total - screen_row_total;
738 sysadm 1.95 output_current_row = screen_begin_row;
739     output_end_row = SCREEN_ROWS - 1;
740     clrline(output_current_row, SCREEN_ROWS);
741 sysadm 1.50 break;
742 sysadm 1.26 case KEY_UP:
743 sysadm 1.95 if (line_current - output_current_row < 0) // Reach begin
744 sysadm 1.21 {
745     break;
746 sysadm 1.26 }
747 sysadm 1.95 line_current -= output_current_row;
748     output_current_row = screen_begin_row;
749 sysadm 1.89 // screen_end_line = screen_begin_line;
750 sysadm 1.39 // prints("\033[T"); // Scroll down 1 line
751 sysadm 1.95 output_end_row = SCREEN_ROWS - 1; // Legacy Fterm only works with this line
752 sysadm 1.26 break;
753 sysadm 1.49 case CR:
754 sysadm 1.26 case KEY_DOWN:
755 sysadm 1.95 if (line_current + (screen_row_total - (output_current_row - screen_begin_row)) >= display_line_total) // Reach end
756 sysadm 1.26 {
757 sysadm 1.21 break;
758 sysadm 1.26 }
759 sysadm 1.95 line_current += (screen_row_total - (output_current_row - screen_begin_row));
760     output_current_row = screen_row_total;
761     output_end_row = SCREEN_ROWS - 1;
762 sysadm 1.53 moveto(SCREEN_ROWS, 0);
763 sysadm 1.26 clrtoeol();
764 sysadm 1.104 // prints("\033[S"); // Scroll up 1 line
765 sysadm 1.103 prints("\n"); // Legacy Cterm only works with this line
766 sysadm 1.26 break;
767     case KEY_PGUP:
768 sysadm 1.95 if (line_current - output_current_row < 0) // Reach begin
769 sysadm 1.26 {
770 sysadm 1.21 break;
771 sysadm 1.26 }
772 sysadm 1.95 line_current -= ((screen_row_total - 1) + (output_current_row - screen_begin_row));
773 sysadm 1.54 if (line_current < 0)
774 sysadm 1.26 {
775 sysadm 1.54 line_current = 0;
776 sysadm 1.26 }
777 sysadm 1.95 output_current_row = screen_begin_row;
778     output_end_row = SCREEN_ROWS - 1;
779     clrline(output_current_row, SCREEN_ROWS);
780 sysadm 1.26 break;
781 sysadm 1.116 case KEY_SPACE:
782 sysadm 1.26 case KEY_PGDN:
783 sysadm 1.95 if (line_current + screen_row_total - (output_current_row - screen_begin_row) >= display_line_total) // Reach end
784 sysadm 1.26 {
785 sysadm 1.21 break;
786     }
787 sysadm 1.95 line_current += (screen_row_total - 1) - (output_current_row - screen_begin_row);
788 sysadm 1.91 if (line_current + screen_row_total > display_line_total) // No enough lines to display
789 sysadm 1.26 {
790 sysadm 1.91 line_current = display_line_total - screen_row_total;
791 sysadm 1.26 }
792 sysadm 1.95 output_current_row = screen_begin_row;
793     output_end_row = SCREEN_ROWS - 1;
794     clrline(output_current_row, SCREEN_ROWS);
795 sysadm 1.26 break;
796 sysadm 1.74 case KEY_ESC:
797 sysadm 1.26 case KEY_LEFT:
798 sysadm 1.27 loop = 0;
799 sysadm 1.26 break;
800     case 'h':
801 sysadm 1.81 if (!show_help) // Not reentrant
802 sysadm 1.37 {
803     break;
804     }
805 sysadm 1.26 // Display help information
806 sysadm 1.37 show_help = 0;
807 sysadm 1.89 display_file(help_filename, 1);
808 sysadm 1.37 show_help = 1;
809 sysadm 1.81 case KEY_F5:
810 sysadm 1.26 // Refresh after display help information
811 sysadm 1.95 line_current -= (output_current_row - screen_begin_row);
812     output_current_row = screen_begin_row;
813     output_end_row = SCREEN_ROWS - 1;
814     clrline(output_current_row, SCREEN_ROWS);
815 sysadm 1.89 break;
816 sysadm 1.81 case 0: // Refresh bottom line
817     break;
818 sysadm 1.26 default:
819     input_ok = 0;
820     break;
821 sysadm 1.21 }
822 sysadm 1.6 }
823 sysadm 1.21
824 sysadm 1.26 continue;
825     }
826 sysadm 1.21
827 sysadm 1.55 len = p_line_offsets[line_current + 1] - p_line_offsets[line_current];
828 sysadm 1.89 if (len >= sizeof(buffer))
829 sysadm 1.26 {
830 sysadm 1.87 log_error("Buffer overflow: len=%ld(%ld - %ld) line=%ld \n",
831 sysadm 1.62 len, p_line_offsets[line_current + 1], p_line_offsets[line_current], line_current);
832 sysadm 1.89 len = sizeof(buffer) - 1;
833 sysadm 1.26 }
834 sysadm 1.87 else if (len < 0)
835     {
836     log_error("Incorrect line offsets: len=%ld(%ld - %ld) line=%ld \n",
837     len, p_line_offsets[line_current + 1], p_line_offsets[line_current], line_current);
838     len = 0;
839     }
840 sysadm 1.52
841 sysadm 1.55 memcpy(buffer, (const char *)p_data + p_line_offsets[line_current], (size_t)len);
842 sysadm 1.52 buffer[len] = '\0';
843    
844 sysadm 1.95 moveto(output_current_row, 0);
845 sysadm 1.26 clrtoeol();
846     prints("%s", buffer);
847 sysadm 1.54 line_current++;
848 sysadm 1.95 output_current_row++;
849 sysadm 1.26 }
850 sysadm 1.6
851 sysadm 1.41 cleanup:
852 sysadm 1.78 return ch;
853     }
854    
855 sysadm 1.126 int display_file_key_handler(int *p_key, DISPLAY_CTX *p_ctx)
856 sysadm 1.81 {
857 sysadm 1.85 switch (*p_key)
858 sysadm 1.81 {
859     case 0: // Set msg
860 sysadm 1.85 snprintf(p_ctx->msg, sizeof(p_ctx->msg),
861 sysadm 1.104 "| 返回[\033[32m←\033[33m,\033[32mESC\033[33m] | "
862     "移动[\033[32m↑\033[33m/\033[32m↓\033[33m/\033[32mPgUp\033[33m/\033[32mPgDn\033[33m] | "
863     "帮助[\033[32mh\033[33m] |");
864 sysadm 1.81 break;
865     }
866    
867     return 0;
868     }
869    
870 sysadm 1.89 int display_file(const char *filename, int eof_exit)
871 sysadm 1.78 {
872 sysadm 1.81 int ret;
873 sysadm 1.130 void *p_shm;
874 sysadm 1.78 size_t data_len;
875     long line_total;
876     const void *p_data;
877     const long *p_line_offsets;
878    
879     if ((p_shm = get_file_shm_readonly(filename, &data_len, &line_total, &p_data, &p_line_offsets)) == NULL)
880     {
881     log_error("get_file_shm(%s) error\n", filename);
882     return KEY_NULL;
883     }
884    
885 sysadm 1.101 if (user_online_update("VIEW_FILE") < 0)
886     {
887     log_error("user_online_update(VIEW_FILE) error\n");
888     }
889    
890 sysadm 1.89 ret = display_data(p_data, line_total, p_line_offsets, eof_exit, display_file_key_handler, DATA_READ_HELP);
891 sysadm 1.78
892 sysadm 1.69 if (detach_file_shm(p_shm) < 0)
893     {
894     log_error("detach_file_shm(%s) error\n", filename);
895     }
896    
897 sysadm 1.81 return ret;
898 sysadm 1.1 }
899 sysadm 1.9
900 sysadm 1.73 int show_top(const char *str_left, const char *str_middle, const char *str_right)
901 sysadm 1.9 {
902 sysadm 1.71 char str_left_f[STR_TOP_LEFT_MAX_LEN + 1];
903     char str_middle_f[STR_TOP_MIDDLE_MAX_LEN + 1];
904     char str_right_f[STR_TOP_RIGHT_MAX_LEN + 1];
905 sysadm 1.70 int str_left_len;
906 sysadm 1.71 int str_middle_len;
907 sysadm 1.70 int str_right_len;
908 sysadm 1.71 int eol;
909 sysadm 1.51 int len;
910 sysadm 1.40
911 sysadm 1.71 strncpy(str_left_f, str_left, sizeof(str_left_f) - 1);
912     str_left_f[sizeof(str_left_f) - 1] = '\0';
913 sysadm 1.105 len = split_line(str_left_f, STR_TOP_LEFT_MAX_LEN / 2, &eol, &str_left_len, 1);
914 sysadm 1.71 str_left_f[len] = '\0';
915    
916     strncpy(str_middle_f, str_middle, sizeof(str_middle_f) - 1);
917     str_middle_f[sizeof(str_middle_f) - 1] = '\0';
918 sysadm 1.105 len = split_line(str_middle, STR_TOP_MIDDLE_MAX_LEN / 2, &eol, &str_middle_len, 1);
919 sysadm 1.71 str_middle_f[len] = '\0';
920    
921 sysadm 1.73 strncpy(str_right_f, str_right, sizeof(str_right_f) - 1);
922 sysadm 1.71 str_right_f[sizeof(str_right_f) - 1] = '\0';
923 sysadm 1.105 len = split_line(str_right, STR_TOP_RIGHT_MAX_LEN / 2, &eol, &str_right_len, 1);
924 sysadm 1.71 str_right_f[len] = '\0';
925 sysadm 1.9
926 sysadm 1.21 moveto(1, 0);
927 sysadm 1.26 clrtoeol();
928 sysadm 1.105 prints("\033[1;44;33m%s\033[37m%*s%s\033[33m%*s%s\033[m",
929     str_left_f, 44 - str_left_len - str_middle_len, "",
930     str_middle_f, 36 - str_right_len, "", str_right_f);
931 sysadm 1.9
932 sysadm 1.21 return 0;
933 sysadm 1.9 }
934    
935 sysadm 1.57 int show_bottom(const char *msg)
936 sysadm 1.9 {
937 sysadm 1.26 char str_time[LINE_BUFFER_LEN];
938 sysadm 1.119 int len_str_time;
939 sysadm 1.21 time_t time_online;
940     struct tm *tm_online;
941 sysadm 1.77 char msg_f[LINE_BUFFER_LEN];
942 sysadm 1.72 int eol;
943 sysadm 1.119 int len_msg;
944 sysadm 1.58 int len;
945     int len_username;
946 sysadm 1.88 char str_tm_online[LINE_BUFFER_LEN];
947 sysadm 1.125 int len_str_tm_online;
948 sysadm 1.9
949 sysadm 1.119 len_str_time = (int)get_time_str(str_time, sizeof(str_time));
950 sysadm 1.9
951 sysadm 1.76 msg_f[0] = '\0';
952 sysadm 1.119 len_msg = 0;
953 sysadm 1.77 if (msg != NULL)
954 sysadm 1.76 {
955 sysadm 1.77 strncpy(msg_f, msg, sizeof(msg_f) - 1);
956 sysadm 1.76 msg_f[sizeof(msg_f) - 1] = '\0';
957 sysadm 1.119 len = split_line(msg_f, 23, &eol, &len_msg, 1);
958 sysadm 1.77 msg_f[len] = '\0';
959 sysadm 1.76 }
960 sysadm 1.58
961     len_username = (int)strnlen(BBS_username, sizeof(BBS_username));
962    
963 sysadm 1.99 time_online = time(NULL) - BBS_login_tm;
964 sysadm 1.21 tm_online = gmtime(&time_online);
965 sysadm 1.118 if (tm_online->tm_mday > 1)
966 sysadm 1.88 {
967     snprintf(str_tm_online, sizeof(str_tm_online),
968 sysadm 1.119 "\033[36m%d\033[33md \033[36m%d\033[33m:\033[36m%.2d",
969     tm_online->tm_mday - 1, tm_online->tm_hour, tm_online->tm_min);
970 sysadm 1.88 }
971     else
972     {
973     snprintf(str_tm_online, sizeof(str_tm_online),
974 sysadm 1.119 "\033[36m%d\033[33m:\033[36m%.2d",
975 sysadm 1.89 tm_online->tm_hour, tm_online->tm_min);
976 sysadm 1.88 }
977 sysadm 1.125 len_str_tm_online = str_length(str_tm_online, 1);
978 sysadm 1.9
979 sysadm 1.53 moveto(SCREEN_ROWS, 0);
980 sysadm 1.26 clrtoeol();
981 sysadm 1.119 prints("\033[1;44;33m时间[\033[36m%s\033[33m]%s%*s \033[33m用户[\033[36m%s\033[33m][%s\033[33m]\033[m",
982 sysadm 1.127 str_time, msg_f, 65 - len_str_time - len_msg - len_username - len_str_tm_online,
983     "", BBS_username, str_tm_online);
984 sysadm 1.9
985 sysadm 1.21 return 0;
986 sysadm 1.9 }
987    
988 sysadm 1.21 int show_active_board()
989 sysadm 1.9 {
990 sysadm 1.59 static int line_current = 0;
991 sysadm 1.61 static const void *p_shm = NULL;
992 sysadm 1.59 static size_t data_len;
993     static long line_total;
994 sysadm 1.61 static const void *p_data;
995 sysadm 1.59 static const long *p_line_offsets;
996    
997 sysadm 1.65 static time_t t_last_show = 0;
998     static int line_last = 0;
999    
1000 sysadm 1.26 char buffer[LINE_BUFFER_LEN];
1001 sysadm 1.59 long int len;
1002 sysadm 1.9
1003 sysadm 1.61 if (p_shm == NULL)
1004 sysadm 1.26 {
1005 sysadm 1.69 if ((p_shm = get_file_shm_readonly(DATA_ACTIVE_BOARD, &data_len, &line_total, &p_data, &p_line_offsets)) == NULL)
1006 sysadm 1.9 {
1007 sysadm 1.59 log_error("get_file_shm(%s) error\n", DATA_ACTIVE_BOARD);
1008     return KEY_NULL;
1009 sysadm 1.9 }
1010 sysadm 1.26 }
1011 sysadm 1.21
1012 sysadm 1.99 if (time(NULL) - t_last_show >= 10)
1013 sysadm 1.65 {
1014     line_last = line_current;
1015 sysadm 1.99 t_last_show = time(NULL);
1016 sysadm 1.65 }
1017     else
1018     {
1019     line_current = line_last;
1020     }
1021    
1022 sysadm 1.64 clrline(2, 2 + ACTIVE_BOARD_HEIGHT);
1023 sysadm 1.59
1024 sysadm 1.26 for (int i = 0; i < ACTIVE_BOARD_HEIGHT; i++)
1025     {
1026 sysadm 1.59 len = p_line_offsets[line_current + 1] - p_line_offsets[line_current];
1027     if (len >= LINE_BUFFER_LEN)
1028 sysadm 1.9 {
1029 sysadm 1.62 log_error("buffer overflow: len=%ld(%ld - %ld) line=%ld \n",
1030     len, p_line_offsets[line_current + 1], p_line_offsets[line_current], line_current);
1031 sysadm 1.59 len = LINE_BUFFER_LEN - 1;
1032 sysadm 1.9 }
1033 sysadm 1.59
1034     memcpy(buffer, (const char *)p_data + p_line_offsets[line_current], (size_t)len);
1035     buffer[len] = '\0';
1036    
1037 sysadm 1.26 moveto(3 + i, 0);
1038     prints("%s", buffer);
1039 sysadm 1.59
1040     line_current++;
1041 sysadm 1.60 if (line_current >= line_total)
1042 sysadm 1.59 {
1043     line_current = 0;
1044     break;
1045     }
1046 sysadm 1.9 }
1047 sysadm 1.26
1048 sysadm 1.21 return 0;
1049 sysadm 1.9 }
webmaster@leafok.com
 ViewVC Help
Powered by ViewVC 1.3.0-beta1