--- lbbs/src/screen.c 2025/04/30 09:18:20 1.24 +++ lbbs/src/screen.c 2025/05/19 13:03:14 1.67 @@ -1,35 +1,39 @@ /*************************************************************************** screen.c - description ------------------- - begin : Mon Oct 18 2004 - copyright : (C) 2004 by Leaflet - email : leaflet@leafok.com + Copyright : (C) 2004-2025 by Leaflet + Email : leaflet@leafok.com ***************************************************************************/ /*************************************************************************** * * * This program is free software; you can redistribute it and/or modify * * it under the terms of the GNU General Public License as published by * - * the Free Software Foundation; either version 2 of the License, or * + * the Free Software Foundation; either version 3 of the License, or * * (at your option) any later version. * * * ***************************************************************************/ +#include "screen.h" #include "bbs.h" #include "common.h" +#include "str_process.h" #include "log.h" #include "io.h" -#include "screen.h" +#include "file_loader.h" +#include #include #include +#include +#include +#include #include #include -#include +#include +#include #define ACTIVE_BOARD_HEIGHT 8 -int screen_lines = 24; - void moveto(int row, int col) { if (row >= 0) @@ -40,13 +44,11 @@ void moveto(int row, int col) { prints("\r"); } - iflush(); } void clrtoeol() { - prints("\033[K"); - iflush(); + prints(CTRL_SEQ_CLR_LINE); } void clrline(int line_begin, int line_end) @@ -56,15 +58,14 @@ void clrline(int line_begin, int line_en for (i = line_begin; i <= line_end; i++) { moveto(i, 0); - prints("\033[K"); + prints(CTRL_SEQ_CLR_LINE); } - - iflush(); } void clrtobot(int line_begin) { - clrline(line_begin, screen_lines); + moveto(line_begin, 0); + prints("\033[J"); moveto(line_begin, 0); } @@ -72,18 +73,17 @@ void clearscr() { prints("\033[2J"); moveto(0, 0); - iflush(); } int press_any_key() { - moveto(screen_lines, 0); + moveto(SCREEN_ROWS, 0); clrtoeol(); prints(" \033[1;33m按任意键继续...\033[0;37m"); iflush(); - return igetch_t(60); + return igetch_t(MIN(MAX_DELAY_TIME, 60)); } void set_input_echo(int echo) @@ -98,57 +98,87 @@ void set_input_echo(int echo) // outc ('\x85'); // ASCII code 133 prints("\xff\xfb\x01\xff\xfb\x03"); iflush(); - igetch_t(60); - igetch_t(60); + igetch(0); + igetch_reset(); } } -static int _str_input(char *buffer, int buffer_length, int echo_mode) +static int _str_input(char *buffer, int buf_size, int echo_mode) { - char buf[256], ch; - int c, offset = 0, len, loop = 1, i, hz = 0; + int c; + int offset = 0; + int hz = 0; - for (i = 0; i < buffer_length && buffer[i] != '\0'; i++) - { - offset++; - } + buffer[buf_size - 1] = '\0'; + for (offset = 0; offset < buf_size - 1 && buffer[offset] != '\0'; offset++) + ; - while (c = igetch_t(60)) + igetch_reset(); + + while (!SYS_server_exit) { - if (c == KEY_NULL || c == KEY_TIMEOUT || c == CR) + c = igetch_t(MIN(MAX_DELAY_TIME, 60)); + + if (c == CR) { + igetch_reset(); break; } - if (c == LF) + else if (c == KEY_TIMEOUT || c == KEY_NULL) // timeout or broken pipe + { + return -1; + } + else if (c == LF || c == '\0') { continue; } - if (c == BACKSPACE) + else if (c == BACKSPACE) { if (offset > 0) { - buffer[--offset] = '\0'; - prints("\b \b"); - // clrtoeol (); + offset--; + if (buffer[offset] < 0 || buffer[offset] > 127) + { + prints("\033[D \033[D"); + offset--; + if (offset < 0) // should not happen + { + log_error("Offset of buffer is negative\n"); + offset = 0; + } + } + buffer[offset] = '\0'; + prints("\033[D \033[D"); iflush(); } continue; } - if (c > 255 || iscntrl(c)) + else if (c > 255 || iscntrl(c)) { continue; } - if (c > 127 && c <= 255) + else if (c > 127 && c <= 255) { + if (!hz && offset + 2 > buf_size - 1) // No enough space for Chinese character + { + igetch(0); // Ignore 1 character + outc('\a'); + iflush(); + continue; + } hz = (!hz); } - if (offset >= buffer_length) + + if (offset + 1 > buf_size - 1) { outc('\a'); + iflush(); continue; } + buffer[offset++] = (char)c; buffer[offset] = '\0'; + switch (echo_mode) { case DOECHO: @@ -164,323 +194,362 @@ static int _str_input(char *buffer, int } } - prints("\r\n"); - iflush(); - return offset; } -int str_input(char *buffer, int buffer_length, int echo_mode) +int str_input(char *buffer, int buf_size, int echo_mode) { - int offset; + int len; - memset(buffer, '\0', buffer_length); + buffer[0] = '\0'; - offset = _str_input(buffer, buffer_length, echo_mode); + len = _str_input(buffer, buf_size, echo_mode); - return offset; + prints("\r\n"); + iflush(); + + return len; }; -int get_data(int row, int col, char *prompt, char *buffer, int buffer_length, int echo_mode) +int get_data(int row, int col, char *prompt, char *buffer, int buf_size, int echo_mode) { int len; moveto(row, col); - iflush(); prints(prompt); prints(buffer); iflush(); - len = _str_input(buffer, buffer_length, echo_mode); + len = _str_input(buffer, buf_size, echo_mode); return len; } -int display_file(const char *filename) +int display_file_ex(const char *filename, int begin_line, int wait) { - char buffer[260]; - FILE *fin; - int i; + static int show_help = 1; + char buffer[LINE_BUFFER_LEN]; + int ch = KEY_NULL; + int input_ok, line, max_lines; + long int line_current = 0; + const void *p_shm; + size_t data_len; + long line_total; + const void *p_data; + const long *p_line_offsets; + long int len; + long int percentile; + int loop; - if ((fin = fopen(filename, "r")) == NULL) + if ((p_shm = get_file_shm(filename, &data_len, &line_total, &p_data, &p_line_offsets)) == NULL) { - return -1; + log_error("get_file_shm(%s) error\n", filename); + return KEY_NULL; } - while (fgets(buffer, 255, fin)) - { - i = strlen(buffer); - if (buffer[i - 1] == '\n' && buffer[i - 2] != '\r') - { - buffer[i - 1] = '\r'; - buffer[i] = '\n'; - buffer[i + 1] = '\0'; - } - prints(buffer); - iflush(); - } - fclose(fin); - - return 0; -} - -int display_file_ex(const char *filename, int begin_line, int wait) -{ - char buffer[260], temp[256]; - int i, ch, input_ok, max_lines; - long int line, c_line_begin = 0, c_line_total = 0; - long int f_line, f_size, f_offset; - FILE *fin; - struct stat f_stat; - - max_lines = screen_lines - 1; - clrline(begin_line, screen_lines); + clrline(begin_line, SCREEN_ROWS); line = begin_line; - moveto(line, 0); + max_lines = SCREEN_ROWS - 1; - if ((fin = fopen(filename, "r")) != NULL) + loop = 1; + while (!SYS_server_exit && loop) { - if (fstat(fileno(fin), &f_stat) != 0) + if (line_current >= line_total && line_total <= SCREEN_ROWS - 2) { - log_error("Get file stat failed\n"); - return -1; - } - f_size = f_stat.st_size; + if (wait) + { + ch = press_any_key(); + } + else + { + iflush(); + } - while (fgets(buffer, 255, fin)) - c_line_total++; - rewind(fin); + loop = 0; + break; + } - while (fgets(buffer, 255, fin)) + if (line_current >= line_total || line >= max_lines) { - if (line >= max_lines) + if (line_current - (line - 1) + (SCREEN_ROWS - 2) < line_total) + { + percentile = (line_current - (line - 1) + (SCREEN_ROWS - 2)) * 100 / line_total; + } + else { - f_offset = ftell(fin); + percentile = 100; + } - moveto(screen_lines, 0); - prints("\033[1;44;32m下面还有喔 (%d%%)\033[33m │ 结束 ← │ ↑/↓/PgUp/PgDn 移动 │ ? 辅助说明 │ \033[m", - (f_offset - strlen(buffer)) * 100 / f_size); - iflush(); + moveto(SCREEN_ROWS, 0); + prints("\033[1;44;32m%s (%d%%)%s\033[33m │ 结束 ← │ ↑/↓/PgUp/PgDn 移动 │ ? 辅助说明 │ \033[m", + (percentile < 100 ? "下面还有喔" : "没有更多了"), percentile, + (percentile < 10 ? " " : (percentile < 100 ? " " : ""))); + iflush(); - input_ok = 0; - while (!input_ok) + input_ok = 0; + while (!SYS_server_exit && !input_ok) + { + ch = igetch_t(MAX_DELAY_TIME); + input_ok = 1; + switch (ch) { - ch = igetch_t(MAX_DELAY_TIME); - input_ok = 1; - switch (ch) + case KEY_NULL: + case KEY_TIMEOUT: + goto cleanup; + case KEY_HOME: + line_current = 0; + line = begin_line; + max_lines = SCREEN_ROWS - 1; + clrline(begin_line, SCREEN_ROWS); + break; + case KEY_END: + line_current = line_total - (SCREEN_ROWS - 2); + line = begin_line; + max_lines = SCREEN_ROWS - 1; + clrline(begin_line, SCREEN_ROWS); + break; + case KEY_UP: + if (line_current - line < 0) // Reach top { - case KEY_UP: - c_line_begin--; - if (c_line_begin >= 0) - { - rewind(fin); - for (f_line = 0; f_line < c_line_begin; f_line++) - { - if (fgets(buffer, 255, fin) == NULL) - goto exit; - } - } - else - { - goto exit; - } - break; - case KEY_DOWN: - case CR: - c_line_begin++; - rewind(fin); - for (f_line = 0; f_line < c_line_begin; f_line++) - { - if (fgets(buffer, 255, fin) == NULL) - goto exit; - } break; - case KEY_PGUP: - case Ctrl('B'): - if (c_line_begin > 0) - c_line_begin -= (max_lines - begin_line - 1); - else - goto exit; - if (c_line_begin < 0) - c_line_begin = 0; - rewind(fin); - for (f_line = 0; f_line < c_line_begin; f_line++) - { - if (fgets(buffer, 255, fin) == NULL) - goto exit; - } - break; - case KEY_RIGHT: - case KEY_PGDN: - case Ctrl('F'): - case KEY_SPACE: - c_line_begin += (max_lines - begin_line - 1); - if (c_line_begin + (max_lines - begin_line) > - c_line_total) - c_line_begin = - c_line_total - (max_lines - begin_line); - rewind(fin); - for (f_line = 0; f_line < c_line_begin; f_line++) - { - if (fgets(buffer, 255, fin) == NULL) - goto exit; - } + } + line_current -= line; + line = begin_line; + // max_lines = begin_line + 1; + // prints("\033[T"); // Scroll down 1 line + max_lines = SCREEN_ROWS - 1; // Legacy Fterm only works with this line + break; + case CR: + igetch_reset(); + case KEY_DOWN: + if (line_current + ((SCREEN_ROWS - 2) - (line - 1)) >= line_total) // Reach bottom + { break; - case KEY_NULL: - case KEY_TIMEOUT: - case KEY_LEFT: - case 'q': - case 'Q': - goto exit; + } + line_current += ((SCREEN_ROWS - 2) - (line - 1)); + line = SCREEN_ROWS - 2; + max_lines = SCREEN_ROWS - 1; + moveto(SCREEN_ROWS, 0); + clrtoeol(); + prints("\033[S"); // Scroll up 1 line + break; + case KEY_PGUP: + case Ctrl('B'): + if (line_current - line < 0) // Reach top + { break; - case '?': - case 'h': - case 'H': - // Display help information - strcpy(temp, app_home_dir); - strcat(temp, "data/read_help.txt"); - display_file_ex(temp, begin_line, 1); - - // Refresh after display help information - rewind(fin); - for (f_line = 0; f_line < c_line_begin; f_line++) - { - if (fgets(buffer, 255, fin) == NULL) - goto exit; - } + } + line_current -= ((SCREEN_ROWS - 3) + (line - 1)); + if (line_current < 0) + { + line_current = 0; + } + line = begin_line; + max_lines = SCREEN_ROWS - 1; + clrline(begin_line, SCREEN_ROWS); + break; + case KEY_RIGHT: + case KEY_PGDN: + case Ctrl('F'): + case KEY_SPACE: + if (line_current + (SCREEN_ROWS - 2) - (line - 1) >= line_total) // Reach bottom + { break; - default: - input_ok = 0; + } + line_current += (SCREEN_ROWS - 3) - (line - 1); + if (line_current + SCREEN_ROWS - 2 > line_total) // No enough lines to display + { + line_current = line_total - (SCREEN_ROWS - 2); + } + line = begin_line; + max_lines = SCREEN_ROWS - 1; + clrline(begin_line, SCREEN_ROWS); + break; + case KEY_LEFT: + case 'q': + case 'Q': + loop = 0; + break; + case '?': + case 'h': + case 'H': + if (!show_help) + { break; } - } - clrline(begin_line, screen_lines); - line = begin_line; - moveto(line, 0); + // Display help information + show_help = 0; + display_file_ex(DATA_READ_HELP, begin_line, 1); + show_help = 1; + + // Refresh after display help information + line_current -= (line - 1); + line = begin_line; + max_lines = SCREEN_ROWS - 1; + clrline(begin_line, SCREEN_ROWS); + break; + default: + input_ok = 0; + break; + } - continue; + BBS_last_access_tm = time(0); } - i = strlen(buffer); - if (buffer[i - 1] == '\n' && buffer[i - 2] != '\r') - { - buffer[i - 1] = '\r'; - buffer[i] = '\n'; - buffer[i + 1] = '\0'; - } - prints(buffer); - iflush(); + continue; + } - line++; + len = p_line_offsets[line_current + 1] - p_line_offsets[line_current]; + if (len >= LINE_BUFFER_LEN) + { + log_error("buffer overflow: len=%ld(%ld - %ld) line=%ld \n", + len, p_line_offsets[line_current + 1], p_line_offsets[line_current], line_current); + len = LINE_BUFFER_LEN - 1; } - if (wait) - ch = press_any_key(); - else - ch = 0; - exit: - fclose(fin); + memcpy(buffer, (const char *)p_data + p_line_offsets[line_current], (size_t)len); + buffer[len] = '\0'; - return ch; + moveto(line, 0); + clrtoeol(); + prints("%s", buffer); + line_current++; + line++; } - return -1; +cleanup: + return ch; } -int show_top(char *status) +int show_top(const char *status) { - char buffer[256]; + char status_f[21]; + int truncate; + int status_len; + int section_name_len; + int len; - str_space(buffer, 20 - strlen(BBS_current_section_name)); + strncpy(status_f, status, sizeof(status_f) - 1); + status_f[sizeof(status_f) - 1] = '\0'; + + len = split_line(status_f, 20, &truncate, &status_len); + if (truncate) + { + log_error("Status string is truncated\n"); + status_f[len] = '\0'; + } + + len = split_line(BBS_current_section_name, 20, &truncate, §ion_name_len); + if (truncate) + { + log_error("Section name is truncated\n"); + } moveto(1, 0); - prints("\033[1;44;33m%-20s \033[37m%20s" - " %s\033[33m讨论区 [%s]\033[m", - status, BBS_name, buffer, BBS_current_section_name); - iflush(); + clrtoeol(); + prints("\033[1;44;33m%s\033[37m%*s%*s\033[33m 讨论区 [%s]\033[m", + status_f, 44 - status_len, BBS_name, 26 - section_name_len, "", BBS_current_section_name); return 0; } -int show_bottom(char *msg) +int show_bottom(const char *msg) { - char str_time[256], str_time_onine[20], buffer[256]; + char str_time[LINE_BUFFER_LEN]; time_t time_online; struct tm *tm_online; + char msg_f[21]; + int truncate; + int msg_len; + int len; + int len_username; - get_time_str(str_time, 256); - str_space(buffer, 33 - strlen(BBS_username)); + get_time_str(str_time, sizeof(str_time)); + + strncpy(msg_f, msg, sizeof(msg_f) - 1); + msg_f[sizeof(msg_f) - 1] = '\0'; + + len = split_line(msg_f, 20, &truncate, &msg_len); + if (truncate) + { + log_error("Status string is truncated\n"); + msg_f[len] = '\0'; + } + + len_username = (int)strnlen(BBS_username, sizeof(BBS_username)); time_online = time(0) - BBS_login_tm; tm_online = gmtime(&time_online); - moveto(screen_lines, 0); - prints("\033[1;44;33m[\033[36m%s\033[33m]" - "%s帐号[\033[36m%s\033[33m]" - "[\033[36m%1d\033[33m:\033[36m%2d\033[33m:\033[36m%2d\033[33m]\033[m", - str_time, buffer, BBS_username, tm_online->tm_mday - 1, - tm_online->tm_hour, tm_online->tm_min); - iflush(); + moveto(SCREEN_ROWS, 0); + clrtoeol(); + prints("\033[1;44;33m[\033[36m%s\033[33m]%*s%*s帐号[\033[36m%s\033[33m]" + "[\033[36m%1d\033[33m天\033[36m%2d\033[33m时\033[36m%2d\033[33m分]\033[m", + str_time, 21, msg_f, 9 - len_username, "", BBS_username, + tm_online->tm_mday - 1, tm_online->tm_hour, tm_online->tm_min); return 0; } int show_active_board() { - char filename[256], buffer[260]; - FILE *fin; - int i, j; - static long int line; + static int line_current = 0; + static const void *p_shm = NULL; + static size_t data_len; + static long line_total; + static const void *p_data; + static const long *p_line_offsets; + + static time_t t_last_show = 0; + static int line_last = 0; + + char buffer[LINE_BUFFER_LEN]; + long int len; - sprintf(filename, "%sdata/active_board.txt", app_home_dir); + if (p_shm == NULL) + { + if ((p_shm = get_file_shm(DATA_ACTIVE_BOARD, &data_len, &line_total, &p_data, &p_line_offsets)) == NULL) + { + log_error("get_file_shm(%s) error\n", DATA_ACTIVE_BOARD); + return KEY_NULL; + } + } - clrline(3, 2 + ACTIVE_BOARD_HEIGHT); + if (time(0) - t_last_show >= 10) + { + line_last = line_current; + t_last_show = time(0); + } + else + { + line_current = line_last; + } - moveto(3, 0); + clrline(2, 2 + ACTIVE_BOARD_HEIGHT); - if ((fin = fopen(filename, "r")) != NULL) + for (int i = 0; i < ACTIVE_BOARD_HEIGHT; i++) { - for (j = 0; j < line; j++) + len = p_line_offsets[line_current + 1] - p_line_offsets[line_current]; + if (len >= LINE_BUFFER_LEN) { - if (fgets(buffer, 255, fin) == NULL) - { - line = 0; - rewind(fin); - break; - } + log_error("buffer overflow: len=%ld(%ld - %ld) line=%ld \n", + len, p_line_offsets[line_current + 1], p_line_offsets[line_current], line_current); + len = LINE_BUFFER_LEN - 1; } - for (j = 0; j < ACTIVE_BOARD_HEIGHT; j++) + memcpy(buffer, (const char *)p_data + p_line_offsets[line_current], (size_t)len); + buffer[len] = '\0'; + + moveto(3 + i, 0); + prints("%s", buffer); + + line_current++; + if (line_current >= line_total) { - if (fgets(buffer, 255, fin) == NULL) - { - line = 0; - if (j == 0) - { - rewind(fin); - if (fgets(buffer, 255, fin) == NULL) - { - break; - } - } - else - { - break; - } - } - line++; - i = strlen(buffer); - if (buffer[i - 1] == '\n' && buffer[i - 2] != '\r') - { - buffer[i - 1] = '\r'; - buffer[i] = '\n'; - buffer[i + 1] = '\0'; - } - prints(buffer); - iflush(); + line_current = 0; + break; } - fclose(fin); } return 0;