--- lbbs/src/screen.c 2005/03/22 13:36:13 1.14 +++ lbbs/src/screen.c 2025/05/17 06:14:22 1.56 @@ -1,456 +1,538 @@ /*************************************************************************** - screen.c - description - ------------------- - begin : Mon Oct 18 2004 - copyright : (C) 2004 by Leaflet - email : leaflet@leafok.com + screen.c - description + ------------------- + 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 "file_loader.h" +#include +#include +#include +#include +#include +#include #include #include -#include - -#define ACTIVE_BOARD_HEIGHT 8 +#include +#include -int screen_lines = 24; +#define ACTIVE_BOARD_HEIGHT 8 -void -moveto (int row, int col) +void moveto(int row, int col) { - if (row >= 0) - { - prints ("\033[%d;%dH", row, col); - } - else - { - prints ("\r"); - } - iflush (); + if (row >= 0) + { + prints("\033[%d;%dH", row, col); + } + else + { + prints("\r"); + } } -void -clrtoeol () +void clrtoeol() { - prints ("\033[K"); - iflush (); + prints("\033[K"); } -void -clrline (int line_begin, int line_end) +void clrline(int line_begin, int line_end) { - int i; + int i; - for (i = line_begin; i <= line_end; i++) - { - moveto (i, 0); - prints ("\033[K"); - } + for (i = line_begin; i <= line_end; i++) + { + moveto(i, 0); + prints("\033[K"); + } +} - iflush (); +void clrtobot(int line_begin) +{ + moveto(line_begin, 0); + prints("\033[J"); + moveto(line_begin, 0); } -void -clearscr () +void clearscr() { - prints ("\33[2J"); - moveto (0, 0); - iflush (); + prints("\033[2J"); + moveto(0, 0); } -int -press_any_key () +int press_any_key() { - moveto (screen_lines, 0); - clrtoeol (); + moveto(SCREEN_ROWS, 0); + clrtoeol(); - prints (" \033[1;33m按任意键继续...\033[0;37m"); - iflush (); + 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) +void set_input_echo(int echo) { - if (echo) - { - outc ('\x83'); // ASCII code 131 - iflush (); - } - else - { -// outc ('\x85'); // ASCII code 133 - prints ("\xff\xfb\x01\xff\xfb\x03"); - iflush (); - igetch_t (60); - igetch_t (60); - } + if (echo) + { + outc('\x83'); // ASCII code 131 + iflush(); + } + else + { + // outc ('\x85'); // ASCII code 133 + prints("\xff\xfb\x01\xff\xfb\x03"); + iflush(); + igetch(0); + igetch_reset(); + } } -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; - memset (buffer, '\0', buffer_length); + buffer[buf_size - 1] = '\0'; + for (offset = 0; offset < buf_size - 1 && buffer[offset] != '\0'; offset++) + ; - while (c = igetch_t (60)) - { - if (c == KEY_NULL || c == KEY_TIMEOUT || c == CR) - break; - if (c == LF) - continue; - if (c == BACKSPACE) - { - if (offset > 0) - { - buffer[--offset] = '\0'; - prints ("\b \b"); -// clrtoeol (); - iflush (); - } - continue; - } - if (c > 255 || iscntrl (c)) - { - continue; - } - if (c > 127 && c <= 255) - { - hz = (!hz); - } - if (offset >= buffer_length) - { - outc ('\a'); - continue; - } - buffer[offset++] = (char) c; - buffer[offset] = '\0'; - switch (echo_mode) - { - case 0: - outc ((char) c); - break; - case 1: - outc ('*'); - break; - } - if (!hz) + igetch_reset(); + + while (!SYS_server_exit) { - iflush (); - } - } + c = igetch_t(MIN(MAX_DELAY_TIME, 60)); + + if (c == CR) + { + igetch_reset(); + break; + } + else if (c == KEY_TIMEOUT || c == KEY_NULL) // timeout or broken pipe + { + return -1; + } + else if (c == LF || c == '\0') + { + continue; + } + else if (c == BACKSPACE) + { + if (offset > 0) + { + 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; + } + else if (c > 255 || iscntrl(c)) + { + continue; + } + 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 + 1 > buf_size - 1) + { + outc('\a'); + iflush(); + continue; + } - prints ("\r\n"); - iflush (); + buffer[offset++] = (char)c; + buffer[offset] = '\0'; - return offset; + switch (echo_mode) + { + case DOECHO: + outc((char)c); + break; + case NOECHO: + outc('*'); + break; + } + if (!hz) + { + iflush(); + } + } + + return offset; } -int -display_file (const char *filename) +int str_input(char *buffer, int buf_size, int echo_mode) { - char buffer[260]; - FILE *fin; - int i; + int len; - if ((fin = fopen (filename, "r")) == NULL) - { - return -1; - } + buffer[0] = '\0'; - 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); + len = _str_input(buffer, buf_size, echo_mode); - return 0; -} + prints("\r\n"); + iflush(); -int -display_file_ex (const char *filename, int begin_line, int wait) + return len; +}; + +int get_data(int row, int col, char *prompt, char *buffer, int buf_size, int echo_mode) { - char buffer[260], temp[256]; - int i, ch, input_ok; - 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; + int len; - clrline (begin_line, screen_lines); - line = begin_line; - moveto (line, 0); + moveto(row, col); + prints(prompt); + prints(buffer); + iflush(); - if ((fin = fopen (filename, "r")) != NULL) - { - if (fstat (fileno (fin), &f_stat) != 0) - { - log_error ("Get file stat failed\n"); - return -1; - } - f_size = f_stat.st_size; + len = _str_input(buffer, buf_size, echo_mode); - while (fgets (buffer, 255, fin)) - c_line_total++; - rewind (fin); + return len; +} + +int display_file_ex(const char *filename, int begin_line, int wait) +{ + 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_file_shm; + const void *p_data; + size_t data_len; + long line_total; + const long *p_line_offsets; + long int len; + long int percentile; + int loop; - while (fgets (buffer, 255, fin)) + if ((p_file_shm = get_file_shm(filename)) == NULL) { - if (line >= screen_lines) - { - f_offset = ftell (fin); + log_error("get_file_shm(%s) error\n", filename); + return KEY_NULL; + } + + data_len = *((size_t *)p_file_shm); + line_total = *((long *)(p_file_shm + sizeof(size_t))); + p_data = p_file_shm + sizeof(data_len) + sizeof(line_total); + p_line_offsets = p_data + data_len + 1; - moveto (screen_lines, 0); - prints - ("\033[1;44;32m下面还有喔 (%d%%)\033[33m │ 结束 ← │ ↑/↓/PgUp/PgDn 移动 │ ? 辅助说明 │ \033[m", - (f_offset - strlen (buffer)) * 100 / f_size); - iflush (); + clrline(begin_line, SCREEN_ROWS); + line = begin_line; + max_lines = SCREEN_ROWS - 1; - input_ok = 0; - while (!input_ok) + loop = 1; + while (!SYS_server_exit && loop) + { + if (line_current >= line_total && line_total <= SCREEN_ROWS - 2) { - ch = igetch_t (MAX_DELAY_TIME); - input_ok = 1; - switch (ch) - { - case KEY_UP: - c_line_begin--; - if (c_line_begin >= 0) + if (wait) { - rewind (fin); - for (f_line = 0; f_line < c_line_begin; f_line++) - { - if (fgets (buffer, 255, fin) == NULL) - goto exit; - } + ch = press_any_key(); } - else + else { - goto exit; + iflush(); } - 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 -= (screen_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++) + + loop = 0; + break; + } + + if (line_current >= line_total || line >= max_lines) + { + if (line_current - (line - 1) + (SCREEN_ROWS - 2) < line_total) { - if (fgets (buffer, 255, fin) == NULL) - goto exit; + percentile = (line_current - (line - 1) + (SCREEN_ROWS - 2)) * 100 / line_total; } - break; - case KEY_RIGHT: - case KEY_PGDN: - case Ctrl ('F'): - case KEY_SPACE: - c_line_begin += (screen_lines - begin_line - 1); - if (c_line_begin + (screen_lines - begin_line) > - c_line_total) - c_line_begin = - c_line_total - (screen_lines - begin_line); - rewind (fin); - for (f_line = 0; f_line < c_line_begin; f_line++) + else { - if (fgets (buffer, 255, fin) == NULL) - goto exit; + percentile = 100; } - break; - case KEY_NULL: - case KEY_TIMEOUT: - case KEY_LEFT: - case 'q': - case 'Q': - goto exit; - 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++) + + 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 (!SYS_server_exit && !input_ok) { - if (fgets (buffer, 255, fin) == NULL) - goto exit; + 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 + { + break; + } + 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; + } + 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; + } + 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; + } + 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; + } + + // 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: + log_std("Input: %d\n", ch); + input_ok = 0; + break; + } + + BBS_last_access_tm = time(0); } - break; - default: - input_ok = 0; - break; - } - } - clrline (begin_line, screen_lines); - line = begin_line; - moveto (line, 0); + continue; + } - continue; - } + len = p_line_offsets[line_current + 1] - p_line_offsets[line_current]; + if (len >= LINE_BUFFER_LEN) + { + log_error("Error length exceeds buffer size: %d\n", len); + len = LINE_BUFFER_LEN - 1; + } - 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 (); + memcpy(buffer, (const char *)p_data + p_line_offsets[line_current], (size_t)len); + buffer[len] = '\0'; - line++; + moveto(line, 0); + clrtoeol(); + prints("%s", buffer); + line_current++; + line++; } - if (wait) - ch = press_any_key (); - else - ch = 0; - - exit: - fclose (fin); - return ch; - } +cleanup: + if (shmdt(p_file_shm) == -1) + { + log_error("shmdt() error (%d)\n", errno); + } - return -1; + return ch; } -int -show_top (char *status) +int show_top(char *status) { - char buffer[256]; + int truncate; + int status_len; + int section_name_len; + int len; + char status_f[21]; - str_space (buffer, 20 - strlen (BBS_current_section_name)); + strncpy(status_f, status, sizeof(status_f) - 1); + status_f[sizeof(status_f) - 1] = '\0'; - 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 (); + 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); + clrtoeol(); + prints("\033[1;44;33m%s \033[37m%*s%*s\033[33m 讨论区 [%s]\033[m", + status_f, (39 - status_len), BBS_name, (30 - section_name_len), "", BBS_current_section_name); + iflush(); - return 0; + return 0; } -int -show_bottom (char *msg) +int show_bottom(char *msg) { - char str_time[256], str_time_onine[20], buffer[256]; - time_t time_online; - struct tm *tm_online; + char str_time[LINE_BUFFER_LEN]; + char space[LINE_BUFFER_LEN]; + time_t time_online; + struct tm *tm_online; - get_time_str (str_time, 256); - str_space (buffer, 33 - strlen (BBS_username)); + get_time_str(str_time, sizeof(str_time)); + str_space(space, 34 - (int)strnlen(BBS_username, sizeof(BBS_username))); - time_online = time (0) - BBS_login_tm; - tm_online = gmtime (&time_online); + 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帐号[\033[36m%s\033[33m]" + "[\033[36m%1d\033[33m:\033[36m%2d\033[33m:\033[36m%2d\033[33m]\033[m", + str_time, space, BBS_username, tm_online->tm_mday - 1, + tm_online->tm_hour, tm_online->tm_min); + iflush(); - return 0; + return 0; } -int -show_active_board () +int show_active_board() { - char filename[256], buffer[260]; - FILE *fin; - int i, j; - static long int line; - - sprintf (filename, "%sdata/active_board.txt", app_home_dir); + char filename[FILE_PATH_LEN]; + char buffer[LINE_BUFFER_LEN]; + FILE *fin; + static int line; + int len; + int end_of_line; + int display_len; - clrline (3, 2 + ACTIVE_BOARD_HEIGHT); + clrline(3, 2 + ACTIVE_BOARD_HEIGHT); - moveto (3, 0); - - if ((fin = fopen (filename, "r")) != NULL) - { - for (j = 0; j < line; j++) + if ((fin = fopen(DATA_ACTIVE_BOARD, "r")) == NULL) { - if (fgets (buffer, 255, fin) == NULL) - { - line = 0; - rewind (fin); - break; - } + log_error("Unable to open file %s\n", filename); + return -1; } - for (j = 0; j < ACTIVE_BOARD_HEIGHT; j++) + for (int i = 0; i < line; i++) { - if (fgets (buffer, 255, fin) == NULL) - { - line = 0; - if (j == 0) + if (fgets(buffer, sizeof(buffer), fin) == NULL) { - rewind (fin); - if (fgets (buffer, 255, fin) == NULL) - { - break; - } + line = 0; + rewind(fin); + break; } - else + } + + for (int i = 0; i < ACTIVE_BOARD_HEIGHT; i++) + { + if (fgets(buffer, sizeof(buffer), fin) == NULL) { - break; + line = 0; + 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++; + len = split_line(buffer, SCREEN_COLS, &end_of_line, &display_len); + buffer[len] = '\0'; // Truncate over-length line + moveto(3 + i, 0); + prints("%s", buffer); } - fclose (fin); - } + iflush(); + + fclose(fin); - return 0; + return 0; }