--- lbbs/src/menu.c 2005/03/21 04:43:47 1.11 +++ lbbs/src/menu.c 2025/05/18 08:53:21 1.47 @@ -1,422 +1,1142 @@ /*************************************************************************** - menu.c - description - ------------------- - begin : Wed Mar 16 2004 - copyright : (C) 2005 by Leaflet - email : leaflet@leafok.com + menu.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 "bbs.h" +#include "bbs_cmd.h" +#include "user_priv.h" +#include "bbs_cmd.h" #include "menu.h" +#include "log.h" #include "io.h" +#include "screen.h" #include "common.h" +#include #include #include -#include #include +#include +#include +#include +#include -MENU_SET bbs_menu; +#define MENU_SCREEN_PATH_PREFIX "var/MENU_SCR_" +#define MENU_CONF_DELIM_WITH_SPACE " ,\t\r\n" +#define MENU_CONF_DELIM_WITHOUT_SPACE "\r\n" -int -load_menu (MENU_SET * p_menu_set, const char *conf_file) +#define MENU_SET_RESERVED_LENGTH (sizeof(int16_t) * 4) + +MENU_SET *p_bbs_menu; + +int load_menu(MENU_SET *p_menu_set, const char *conf_file) { - FILE *fin, *fout; - int i = 0, j; - char buffer[256], screen_filename[256], temp[256]; - regmatch_t pmatch[10]; - - if ((fin = fopen (conf_file, "r")) == NULL) - { - log_error ("Open %s failed", conf_file); - return -1; - } - - while (fgets (buffer, 255, fin)) - { - switch (buffer[0]) - { - case '#': - break; - case '%': - if (ireg ("^%S_([A-Za-z0-9_]+)", buffer, 2, pmatch) == 0) - { - strncpy (temp, buffer + pmatch[1].rm_so, - pmatch[1].rm_eo - pmatch[1].rm_so); - temp[pmatch[1].rm_eo - pmatch[1].rm_so] = '\0'; - sprintf (screen_filename, "%sMENU_SCR_%s", app_temp_dir, temp); - - if ((fout = fopen (screen_filename, "w")) == NULL) - { - log_error ("Open %s failed", screen_filename); - return -2; - } - - while (fgets (buffer, 255, fin)) - { - if (buffer[0] != '%') - fputs (buffer, fout); - else - break; - } - - fclose (fout); - break; - } - - if (ireg ("^%menu ([A-Za-z0-9_]+)", buffer, 2, pmatch) == 0) - { - p_menu_set->p_menu[i] = malloc (sizeof (MENU)); - - strncpy (p_menu_set->p_menu[i]->name, - buffer + pmatch[1].rm_so, - pmatch[1].rm_eo - pmatch[1].rm_so); - p_menu_set->p_menu[i]->name[pmatch[1].rm_eo - pmatch[1].rm_so] = - '\0'; - - j = 0; - - while (fgets (buffer, 255, fin)) - { - if (buffer[0] == '#') - { - continue; - } - if (buffer[0] == '%') - { - p_menu_set->p_menu[i]->item_count = j; - p_menu_set->p_menu[i]->item_cur_pos = 0; - i++; - break; - } - if (ireg ("^!([A-Za-z0-9_.]+)[[:space:]]*([0-9]+)," - "[[:space:]]*([0-9]+),[[:space:]]*([0-9]+)," - "[[:space:]]*([0-9]+),[[:space:]]*\"([A-Za-z0-9_]+)\"," - "[[:space:]]*\"([^\"]+)\"", - buffer, 8, pmatch) == 0) - { - p_menu_set->p_menu[i]->items[j] = - malloc (sizeof (MENU_ITEM)); - p_menu_set->p_menu[i]->items[j]->submenu = 1; - strncpy (p_menu_set->p_menu[i]->items[j]->action, - buffer + pmatch[1].rm_so, - pmatch[1].rm_eo - pmatch[1].rm_so); - p_menu_set->p_menu[i]->items[j]->action[pmatch[1]. - rm_eo - - pmatch[1]. - rm_so] = '\0'; - strncpy (temp, buffer + pmatch[2].rm_so, - pmatch[2].rm_eo - pmatch[2].rm_so); - temp[pmatch[2].rm_eo - pmatch[2].rm_so] = '\0'; - p_menu_set->p_menu[i]->items[j]->row = atoi (temp); - strncpy (temp, - buffer + pmatch[3].rm_so, - pmatch[3].rm_eo - pmatch[3].rm_so); - temp[pmatch[3].rm_eo - pmatch[3].rm_so] = '\0'; - p_menu_set->p_menu[i]->items[j]->col = atoi (temp); - strncpy (temp, - buffer + pmatch[4].rm_so, - pmatch[4].rm_eo - pmatch[4].rm_so); - temp[pmatch[4].rm_eo - pmatch[4].rm_so] = '\0'; - p_menu_set->p_menu[i]->items[j]->priv = atoi (temp); - strncpy (temp, - buffer + pmatch[5].rm_so, - pmatch[5].rm_eo - pmatch[5].rm_so); - temp[pmatch[5].rm_eo - pmatch[5].rm_so] = '\0'; - p_menu_set->p_menu[i]->items[j]->level = atoi (temp); - strncpy (p_menu_set->p_menu[i]->items[j]->name, - buffer + pmatch[6].rm_so, - pmatch[6].rm_eo - pmatch[6].rm_so); - p_menu_set->p_menu[i]->items[j]->name[pmatch[6].rm_eo - - pmatch[6].rm_so] = - '\0'; - strncpy (p_menu_set->p_menu[i]->items[j]->text, - buffer + pmatch[7].rm_so, - pmatch[7].rm_eo - pmatch[7].rm_so); - p_menu_set->p_menu[i]->items[j]->text[pmatch[7].rm_eo - - pmatch[7].rm_so] = - '\0'; - j++; - continue; - } - if (ireg ("^@([A-Za-z0-9_]+)[[:space:]]*([0-9]+)," - "[[:space:]]*([0-9]+),[[:space:]]*([0-9]+)," - "[[:space:]]*([0-9]+),[[:space:]]*\"([A-Za-z0-9_]+)\"," - "[[:space:]]*\"([^\"]+)\"", - buffer, 8, pmatch) == 0) - { - p_menu_set->p_menu[i]->items[j] = - malloc (sizeof (MENU_ITEM)); - p_menu_set->p_menu[i]->items[j]->submenu = 0; - strncpy (p_menu_set->p_menu[i]->items[j]->action, - buffer + pmatch[1].rm_so, - pmatch[1].rm_eo - pmatch[1].rm_so); - p_menu_set->p_menu[i]->items[j]->action[pmatch[0]. - rm_eo - - pmatch[0]. - rm_so] = '\0'; - strncpy (temp, buffer + pmatch[2].rm_so, - pmatch[2].rm_eo - pmatch[2].rm_so); - temp[pmatch[2].rm_eo - pmatch[2].rm_so] = '\0'; - p_menu_set->p_menu[i]->items[j]->row = atoi (temp); - strncpy (temp, - buffer + pmatch[3].rm_so, - pmatch[3].rm_eo - pmatch[3].rm_so); - temp[pmatch[3].rm_eo - pmatch[3].rm_so] = '\0'; - p_menu_set->p_menu[i]->items[j]->col = atoi (temp); - strncpy (temp, - buffer + pmatch[4].rm_so, - pmatch[4].rm_eo - pmatch[4].rm_so); - temp[pmatch[4].rm_eo - pmatch[4].rm_so] = '\0'; - p_menu_set->p_menu[i]->items[j]->priv = atoi (temp); - strncpy (temp, - buffer + pmatch[5].rm_so, - pmatch[5].rm_eo - pmatch[5].rm_so); - temp[pmatch[5].rm_eo - pmatch[5].rm_so] = '\0'; - p_menu_set->p_menu[i]->items[j]->level = atoi (temp); - strncpy (p_menu_set->p_menu[i]->items[j]->name, - buffer + pmatch[6].rm_so, - pmatch[6].rm_eo - pmatch[6].rm_so); - p_menu_set->p_menu[i]->items[j]->name[pmatch[6].rm_eo - - pmatch[6].rm_so] = - '\0'; - strncpy (p_menu_set->p_menu[i]->items[j]->text, - buffer + pmatch[7].rm_so, - pmatch[7].rm_eo - pmatch[7].rm_so); - p_menu_set->p_menu[i]->items[j]->text[pmatch[7].rm_eo - - pmatch[7].rm_so] = - '\0'; - j++; - continue; - } - if (ireg ("^title[[:space:]]*([0-9]+)," - "[[:space:]]*([0-9]+),[[:space:]]*\"([^\"]+)\"", - buffer, 4, pmatch) == 0) - { - strncpy (temp, - buffer + pmatch[1].rm_so, - pmatch[1].rm_eo - pmatch[1].rm_so); - temp[pmatch[1].rm_eo - pmatch[1].rm_so] = '\0'; - p_menu_set->p_menu[i]->title.row = atoi (temp); - strncpy (temp, - buffer + pmatch[2].rm_so, - pmatch[2].rm_eo - pmatch[2].rm_so); - temp[pmatch[2].rm_eo - pmatch[2].rm_so] = '\0'; - p_menu_set->p_menu[i]->title.col = atoi (temp); - strncpy (p_menu_set->p_menu[i]->title.text, - buffer + pmatch[3].rm_so, - pmatch[3].rm_eo - pmatch[3].rm_so); - p_menu_set->p_menu[i]->title.text[pmatch[3].rm_eo - - pmatch[3].rm_so] = - '\0'; - continue; - } - if (ireg ("^screen[[:space:]]*([0-9]+)," - "[[:space:]]*([0-9]+),[[:space:]]*S_([A-Za-z0-9_]+)", - buffer, 4, pmatch) == 0) - { - strncpy (temp, - buffer + pmatch[1].rm_so, - pmatch[1].rm_eo - pmatch[1].rm_so); - temp[pmatch[1].rm_eo - pmatch[1].rm_so] = '\0'; - p_menu_set->p_menu[i]->screen.row = atoi (temp); - strncpy (temp, - buffer + pmatch[2].rm_so, - pmatch[2].rm_eo - pmatch[2].rm_so); - temp[pmatch[2].rm_eo - pmatch[2].rm_so] = '\0'; - p_menu_set->p_menu[i]->screen.col = atoi (temp); - strncpy (temp, - buffer + pmatch[3].rm_so, - pmatch[3].rm_eo - pmatch[3].rm_so); - temp[pmatch[3].rm_eo - pmatch[3].rm_so] = '\0'; - sprintf (p_menu_set->p_menu[i]->screen.filename, - "%sMENU_SCR_%s", app_temp_dir, temp); - continue; - } - } - } - break; - } - } - fclose (fin); - - p_menu_set->menu_count = i; - p_menu_set->menu_select_depth = 0; - p_menu_set->p_menu_select[p_menu_set->menu_select_depth] - = (i == 0 ? NULL : p_menu_set->p_menu[0]); + FILE *fin; + int fin_line = 0; + char buffer[LINE_BUFFER_LEN]; + char temp[LINE_BUFFER_LEN]; + char *p = NULL; + char *q = NULL; + char *saveptr = NULL; + MENU *p_menu = NULL; + MENU_ITEM *p_menu_item = NULL; + MENU_SCREEN *p_screen = NULL; + MENU_ID menu_id; + MENU_ITEM_ID menu_item_id; + MENU_SCREEN_ID screen_id; + int proj_id; + key_t key; + size_t size; + + // Use trie_dict to search menu_id by menu name + p_menu_set->p_menu_name_dict = trie_dict_create(); + if (p_menu_set->p_menu_name_dict == NULL) + { + log_error("trie_dict_create() error\n"); + return -3; + } + + // Use trie_dict to search screen_id by menu screen name + p_menu_set->p_menu_screen_dict = trie_dict_create(); + if (p_menu_set->p_menu_screen_dict == NULL) + { + log_error("trie_dict_create() error\n"); + return -3; + } + + if ((fin = fopen(conf_file, "r")) == NULL) + { + log_error("Open %s failed", conf_file); + return -2; + } + + // Allocate shared memory + proj_id = (int)(time(NULL) % getpid()); + key = ftok(conf_file, proj_id); + if (key == -1) + { + log_error("ftok(%s %d) error (%d)\n", conf_file, proj_id, errno); + return -2; + } + + size = MENU_SET_RESERVED_LENGTH + + sizeof(MENU) * MAX_MENUS + + sizeof(MENU_ITEM) * MAX_MENUITEMS + + sizeof(MENU_SCREEN) * MAX_MENUS + + MAX_MENU_SCR_BUF_LENGTH * MAX_MENUS; + p_menu_set->shmid = shmget(key, size, IPC_CREAT | IPC_EXCL | 0600); + if (p_menu_set->shmid == -1) + { + log_error("shmget(size = %d) error (%d)\n", size, errno); + return -3; + } + p_menu_set->p_reserved = shmat(p_menu_set->shmid, NULL, 0); + if (p_menu_set->p_reserved == (void *)-1) + { + log_error("shmat() error (%d)\n", errno); + return -3; + } + p_menu_set->p_menu_pool = p_menu_set->p_reserved + MENU_SET_RESERVED_LENGTH; + p_menu_set->p_menu_item_pool = p_menu_set->p_menu_pool + sizeof(MENU) * MAX_MENUS; + p_menu_set->p_menu_screen_pool = p_menu_set->p_menu_item_pool + sizeof(MENU_ITEM) * MAX_MENUITEMS; + p_menu_set->p_menu_screen_buf = p_menu_set->p_menu_screen_pool + sizeof(MENU_SCREEN) * MAX_MENUS; + p_menu_set->p_menu_screen_buf_free = p_menu_set->p_menu_screen_buf; + + p_menu_set->menu_count = 0; + p_menu_set->menu_item_count = 0; + p_menu_set->menu_screen_count = 0; + p_menu_set->choose_step = 0; + p_menu_set->menu_id_path[0] = 0; + + while (fgets(buffer, sizeof(buffer), fin)) + { + fin_line++; + + p = strtok_r(buffer, MENU_CONF_DELIM_WITH_SPACE, &saveptr); + if (p == NULL) // Blank line + { + continue; + } + + if (*p == '#' || *p == '\r' || *p == '\n') // Comment or blank line + { + continue; + } + + if (*p == '%') + { + p++; + + if (strcmp(p, "menu") == 0) // BEGIN of sub-menu + { + if (p_menu != NULL) + { + log_error("Incomplete menu definition in menu config line %d\n", fin_line); + return -1; + } + + if (p_menu_set->menu_count >= MAX_MENUS) + { + log_error("Menu count (%d) exceed limit (%d)\n", p_menu_set->menu_count, MAX_MENUS); + return -3; + } + menu_id = (MENU_ID)p_menu_set->menu_count; + p_menu_set->menu_count++; + + p_menu = get_menu_by_id(p_menu_set, menu_id); + + p_menu->item_count = 0; + p_menu->title.show = 0; + p_menu->screen_show = 0; + + q = strtok_r(NULL, MENU_CONF_DELIM_WITH_SPACE, &saveptr); + if (q == NULL) + { + log_error("Error menu name in menu config line %d\n", fin_line); + return -1; + } + p = q; + while (isalnum(*q) || *q == '_') + { + q++; + } + if (*q != '\0') + { + log_error("Error menu name in menu config line %d\n", fin_line); + return -1; + } + + if (q - p > sizeof(p_menu->name) - 1) + { + log_error("Too longer menu name in menu config line %d\n", fin_line); + return -1; + } + strncpy(p_menu->name, p, sizeof(p_menu->name) - 1); + p_menu->name[sizeof(p_menu->name) - 1] = '\0'; + + if (trie_dict_set(p_menu_set->p_menu_name_dict, p_menu->name, (int64_t)menu_id) != 1) + { + log_error("Error set menu dict [%s]\n", p_menu->name); + } + + // Check syntax + q = strtok_r(NULL, MENU_CONF_DELIM_WITH_SPACE, &saveptr); + if (q != NULL) + { + log_error("Unknown extra content in menu config line %d\n", fin_line); + return -1; + } + + while (fgets(buffer, sizeof(buffer), fin)) + { + fin_line++; + + p = strtok_r(buffer, MENU_CONF_DELIM_WITH_SPACE, &saveptr); + if (p == NULL) // Blank line + { + continue; + } + + if (*p == '#' || *p == '\r' || *p == '\n') // Comment or blank line + { + continue; + } + + if (*p == '%') // END of sub-menu + { + p_menu = NULL; + break; + } + else if (*p == '!' || *p == '@') + { + // BEGIN of menu item + if (p_menu->item_count >= MAX_ITEMS_PER_MENU) + { + log_error("Menuitem count per menu (%d) exceed limit (%d)\n", p_menu->item_count, MAX_ITEMS_PER_MENU); + return -1; + } + if (p_menu_set->menu_item_count >= MAX_MENUITEMS) + { + log_error("Menuitem count (%d) exceed limit (%d)\n", p_menu_set->menu_item_count, MAX_MENUITEMS); + return -3; + } + menu_item_id = (MENU_ITEM_ID)p_menu_set->menu_item_count; + p_menu_set->menu_item_count++; + + p_menu->items[p_menu->item_count] = menu_item_id; + p_menu->item_count++; + + p_menu_item = get_menu_item_by_id(p_menu_set, menu_item_id); + + p_menu_item->submenu = (*p == '!' ? 1 : 0); + + // Menu item action + p++; + if (strcmp(p, "..") == 0) // Return to parent menu + { + q = p + 2; // strlen("..") + } + else + { + q = p; + while (isalnum(*q) || *q == '_') + { + q++; + } + if (*q != '\0') + { + log_error("Error menu item action in menu config line %d\n", fin_line); + return -1; + } + } + + if (q - p > sizeof(p_menu_item->action) - 1) + { + log_error("Too longer menu action in menu config line %d\n", fin_line); + return -1; + } + strncpy(p_menu_item->action, p, sizeof(p_menu_item->action) - 1); + p_menu_item->action[sizeof(p_menu_item->action) - 1] = '\0'; + + // Menu item row + q = strtok_r(NULL, MENU_CONF_DELIM_WITH_SPACE, &saveptr); + if (q == NULL) + { + log_error("Error menu item row in menu config line %d\n", fin_line); + return -1; + } + p = q; + while (isdigit(*q)) + { + q++; + } + if (*q != '\0') + { + log_error("Error menu item row in menu config line %d\n", fin_line); + return -1; + } + p_menu_item->row = (int16_t)atoi(p); + + // Menu item col + q = strtok_r(NULL, MENU_CONF_DELIM_WITH_SPACE, &saveptr); + if (q == NULL) + { + log_error("Error menu item col in menu config line %d\n", fin_line); + return -1; + } + p = q; + while (isdigit(*q)) + { + q++; + } + if (*q != '\0') + { + log_error("Error menu item col in menu config line %d\n", fin_line); + return -1; + } + p_menu_item->col = (int16_t)atoi(p); + + // Menu item priv + q = strtok_r(NULL, MENU_CONF_DELIM_WITH_SPACE, &saveptr); + if (q == NULL) + { + log_error("Error menu item priv in menu config line %d\n", fin_line); + return -1; + } + p = q; + while (isdigit(*q)) + { + q++; + } + if (*q != '\0') + { + log_error("Error menu item priv in menu config line %d\n", fin_line); + return -1; + } + p_menu_item->priv = atoi(p); + + // Menu item level + q = strtok_r(NULL, MENU_CONF_DELIM_WITH_SPACE, &saveptr); + if (q == NULL) + { + log_error("Error menu item level in menu config line %d\n", fin_line); + return -1; + } + p = q; + while (isdigit(*q)) + { + q++; + } + if (*q != '\0') + { + log_error("Error menu item level in menu config line %d\n", fin_line); + return -1; + } + p_menu_item->level = atoi(p); + + // Menu item name + q = strtok_r(NULL, MENU_CONF_DELIM_WITH_SPACE, &saveptr); + if (q == NULL || *q != '\"') + { + log_error("Error menu item name in menu config line %d\n", fin_line); + return -1; + } + q++; + p = q; + while (*q != '\0' && *q != '\"') + { + q++; + } + if (*q != '\"' || *(q + 1) != '\0') + { + log_error("Error menu item name in menu config line %d\n", fin_line); + return -1; + } + *q = '\0'; + + if (q - p > sizeof(p_menu_item->name) - 1) + { + log_error("Too longer menu name in menu config line %d\n", fin_line); + return -1; + } + strncpy(p_menu_item->name, p, sizeof(p_menu_item->name) - 1); + p_menu_item->name[sizeof(p_menu_item->name) - 1] = '\0'; + + // Menu item text + q = strtok_r(NULL, MENU_CONF_DELIM_WITHOUT_SPACE, &saveptr); + if (q == NULL || (q = strchr(q, '\"')) == NULL) + { + log_error("Error menu item text in menu config line %d\n", fin_line); + return -1; + } + q++; + p = q; + while (*q != '\0' && *q != '\"') + { + q++; + } + if (*q != '\"') + { + log_error("Error menu item text in menu config line %d\n", fin_line); + return -1; + } + *q = '\0'; + + if (q - p > sizeof(p_menu_item->text) - 1) + { + log_error("Too longer menu item text in menu config line %d\n", fin_line); + return -1; + } + strncpy(p_menu_item->text, p, sizeof(p_menu_item->text) - 1); + p_menu_item->text[sizeof(p_menu_item->text) - 1] = '\0'; + + // Check syntax + q = strtok_r(q + 1, MENU_CONF_DELIM_WITH_SPACE, &saveptr); + if (q != NULL) + { + log_error("Unknown extra content in menu config line %d\n", fin_line); + return -1; + } + } + else if (strcmp(p, "title") == 0) + { + p_menu->title.show = 1; + + // Menu title row + q = strtok_r(NULL, MENU_CONF_DELIM_WITH_SPACE, &saveptr); + if (q == NULL) + { + log_error("Error menu title row in menu config line %d\n", fin_line); + return -1; + } + p = q; + while (isdigit(*q)) + { + q++; + } + if (*q != '\0') + { + log_error("Error menu title row in menu config line %d\n", fin_line); + return -1; + } + p_menu->title.row = (int16_t)atoi(p); + + // Menu title col + q = strtok_r(NULL, MENU_CONF_DELIM_WITH_SPACE, &saveptr); + if (q == NULL) + { + log_error("Error menu title col in menu config line %d\n", fin_line); + return -1; + } + p = q; + while (isdigit(*q)) + { + q++; + } + if (*q != '\0') + { + log_error("Error menu title col in menu config line %d\n", fin_line); + return -1; + } + p_menu->title.col = (int16_t)atoi(p); + + // Menu title text + q = strtok_r(NULL, MENU_CONF_DELIM_WITHOUT_SPACE, &saveptr); + if (q == NULL || (q = strchr(q, '\"')) == NULL) + { + log_error("Error menu title text in menu config line %d\n", fin_line); + return -1; + } + q++; + p = q; + while (*q != '\0' && *q != '\"') + { + q++; + } + if (*q != '\"') + { + log_error("Error menu title text in menu config line %d\n", fin_line); + return -1; + } + *q = '\0'; + + if (q - p > sizeof(p_menu_item->text) - 1) + { + log_error("Too longer menu title text in menu config line %d\n", fin_line); + return -1; + } + strncpy(p_menu->title.text, p, sizeof(p_menu->title.text) - 1); + p_menu->title.text[sizeof(p_menu->title.text) - 1] = '\0'; + + // Check syntax + q = strtok_r(q + 1, MENU_CONF_DELIM_WITH_SPACE, &saveptr); + if (q != NULL) + { + log_error("Unknown extra content in menu config line %d\n", fin_line); + return -1; + } + } + else if (strcmp(p, "screen") == 0) + { + p_menu->screen_show = 1; + + // Menu screen row + q = strtok_r(NULL, MENU_CONF_DELIM_WITH_SPACE, &saveptr); + if (q == NULL) + { + log_error("Error menu screen row in menu config line %d\n", fin_line); + return -1; + } + p = q; + while (isdigit(*q)) + { + q++; + } + if (*q != '\0') + { + log_error("Error menu screen row in menu config line %d\n", fin_line); + return -1; + } + p_menu->screen_row = (int16_t)atoi(p); + + // Menu screen col + q = strtok_r(NULL, MENU_CONF_DELIM_WITH_SPACE, &saveptr); + if (q == NULL) + { + log_error("Error menu screen col in menu config line %d\n", fin_line); + return -1; + } + p = q; + while (isdigit(*q)) + { + q++; + } + if (*q != '\0') + { + log_error("Error menu screen col in menu config line %d\n", fin_line); + return -1; + } + p_menu->screen_col = (int16_t)atoi(p); + + // Menu screen name + q = strtok_r(NULL, MENU_CONF_DELIM_WITH_SPACE, &saveptr); + if (q == NULL) + { + log_error("Error menu screen name in menu config line %d\n", fin_line); + return -1; + } + p = q; + while (isalnum(*q) || *q == '_') + { + q++; + } + if (*q != '\0') + { + log_error("Error menu screen name in menu config line %d\n", fin_line); + return -1; + } + strncpy(p_menu->screen_name, p, sizeof(p_menu->screen_name) - 1); + p_menu->screen_name[sizeof(p_menu->screen_name) - 1] = '\0'; + + // Check syntax + q = strtok_r(NULL, MENU_CONF_DELIM_WITH_SPACE, &saveptr); + if (q != NULL) + { + log_error("Unknown extra content in menu config line %d\n", fin_line); + return -1; + } + } + } + } + else // BEGIN of menu screen + { + if (p_menu_set->menu_item_count >= MAX_MENUS) + { + log_error("Menu screen count (%d) exceed limit (%d)\n", p_menu_set->menu_screen_count, MAX_MENUS); + return -3; + } + screen_id = (MENU_SCREEN_ID)p_menu_set->menu_screen_count; + p_menu_set->menu_screen_count++; + + p_screen = get_menu_screen_by_id(p_menu_set, screen_id); + + q = p; + while (isalnum(*q) || *q == '_') + { + q++; + } + if (*q != '\0') + { + log_error("Error menu screen name in menu config line %d\n", fin_line); + return -1; + } + strncpy(p_screen->name, p, sizeof(p_screen->name) - 1); + p_screen->name[sizeof(p_screen->name) - 1] = '\0'; + + if (trie_dict_set(p_menu_set->p_menu_screen_dict, p_screen->name, (int64_t)screen_id) != 1) + { + log_error("Error set menu screen dict [%s]\n", p_screen->name); + } + + // Check syntax + q = strtok_r(NULL, MENU_CONF_DELIM_WITH_SPACE, &saveptr); + if (q != NULL) + { + log_error("Unknown extra content in menu config line %d\n", fin_line); + return -1; + } + + p_screen->buf_offset = p_menu_set->p_menu_screen_buf_free - p_menu_set->p_menu_screen_buf; + p_screen->buf_length = -1; + + // safety appending boundary + q = p_menu_set->p_menu_screen_buf + MAX_MENU_SCR_BUF_LENGTH * MAX_MENUS - 1; + + while (fgets(buffer, sizeof(buffer), fin)) + { + fin_line++; + + strncpy(temp, buffer, sizeof(temp) - 1); // Duplicate line for strtok_r + temp[sizeof(temp) - 1] = '\0'; + p = strtok_r(temp, MENU_CONF_DELIM_WITH_SPACE, &saveptr); + if (p != NULL && *p == '%') // END of menu screen + { + if (p_menu_set->p_menu_screen_buf_free + 1 > q) + { + log_error("Menu screen buffer depleted (%p + 1 > %p)\n", p_menu_set->p_menu_screen_buf_free, q); + return -3; + } + + *(p_menu_set->p_menu_screen_buf_free) = '\0'; + p_menu_set->p_menu_screen_buf_free++; + p_screen->buf_length = p_menu_set->p_menu_screen_buf_free - p_menu_set->p_menu_screen_buf - p_screen->buf_offset; + break; + } + + // Clear line + if (p_menu_set->p_menu_screen_buf_free + strlen(CTRL_SEQ_CLR_LINE) > q) + { + log_error("Menu screen buffer depleted (%p + %d > %p)\n", p_menu_set->p_menu_screen_buf_free, q, strlen(CTRL_SEQ_CLR_LINE)); + return -3; + } + p_menu_set->p_menu_screen_buf_free = stpcpy(p_menu_set->p_menu_screen_buf_free, CTRL_SEQ_CLR_LINE); + + p = buffer; + while (*p != '\0') + { + if (p_menu_set->p_menu_screen_buf_free + 2 > q) + { + log_error("Menu screen buffer depleted (%p + 2 > %p)\n", p_menu_set->p_menu_screen_buf_free, q); + return -3; + } + + if (*p == '\n' && p > buffer && *(p - 1) != '\r') + { + *(p_menu_set->p_menu_screen_buf_free) = '\r'; + p_menu_set->p_menu_screen_buf_free++; + } + + *(p_menu_set->p_menu_screen_buf_free) = *p; + p++; + p_menu_set->p_menu_screen_buf_free++; + } + } + + if (p_screen->buf_length == -1) + { + log_error("End of menu screen [%s] not found\n", p_screen->name); + } + } + } + else // Invalid prefix + { + log_error("Error in menu config line %d\n", fin_line); + return -1; + } + } + fclose(fin); + + for (menu_id = 0; menu_id < p_menu_set->menu_count; menu_id++) + { + p_menu = get_menu_by_id(p_menu_set, menu_id); + + if (trie_dict_get(p_menu_set->p_menu_screen_dict, p_menu->screen_name, (int64_t *)(&(p_menu->screen_id))) != 1) + { + log_error("Undefined menu screen [%s]\n", p); + return -1; + } + } - return 0; + for (menu_item_id = 0; menu_item_id < p_menu_set->menu_item_count; menu_item_id++) + { + p_menu_item = get_menu_item_by_id(p_menu_set, menu_item_id); + + // Set menu_item->action_cmd_handler of each menu item pointing to bbs_cmd + if (p_menu_item->submenu == 0) + { + if ((p_menu_item->action_cmd_handler = get_cmd_handler(p_menu_item->action)) == NULL) + { + log_error("Undefined menu action cmd handler [%s]\n", p_menu_item->action); + return -1; + } + } + // Set menu_item->action_menu_id of each menu item pointing to a submenu to the menu_id of the corresponding submenu + else if (strcmp(p_menu_item->action, "..") != 0) + { + if (trie_dict_get(p_menu_set->p_menu_name_dict, p_menu_item->action, (int64_t *)&menu_id) != 1) + { + log_error("Undefined menu action [%s]\n", p_menu_item->action); + return -1; + } + p_menu_item->action_menu_id = menu_id; + } + } + + // Save status varaibles into reserved memory area + *((int16_t *)p_menu_set->p_reserved) = p_menu_set->menu_count; + *(((int16_t *)p_menu_set->p_reserved) + 1) = p_menu_set->menu_item_count; + *(((int16_t *)p_menu_set->p_reserved) + 2) = p_menu_set->menu_screen_count; + + return 0; } -MENU * -get_menu (MENU_SET * p_menu_set, const char *menu_name) +static int display_menu_cursor(MENU_SET *p_menu_set, int show) { - int i; + MENU_ID menu_id; + MENU_ITEM_ID menu_item_id; + MENU *p_menu; + MENU_ITEM *p_menu_item; + int16_t menu_item_pos; + + menu_id = p_menu_set->menu_id_path[p_menu_set->choose_step]; + p_menu = get_menu_by_id(p_menu_set, menu_id); + if (p_menu == NULL) + { + log_error("get_menu_by_id(%d) return NULL pointer\n", menu_id); + return -1; + } - for (i = 0; i < p_menu_set->menu_count; i++) - { - if (strcmp (p_menu_set->p_menu[i]->name, menu_name) == 0) + menu_item_pos = p_menu_set->menu_item_pos[p_menu_set->choose_step]; + menu_item_id = p_menu->items[menu_item_pos]; + p_menu_item = get_menu_item_by_id(p_menu_set, menu_item_id); + if (p_menu_item == NULL) { - return p_menu_set->p_menu[i]; + log_error("get_menu_item_by_id(%d) return NULL pointer\n", menu_item_id); + return -1; } - } - return NULL; + moveto(p_menu_set->menu_item_r_row[menu_item_pos], p_menu_set->menu_item_r_col[menu_item_pos] - 2); + outc(show ? '>' : ' '); + iflush(); + + return 0; } -void -display_menu_cursor (MENU * p_menu, int show) +int display_menu(MENU_SET *p_menu_set) { - moveto ((p_menu->items[p_menu->item_cur_pos])->r_row, - (p_menu->items[p_menu->item_cur_pos])->r_col - 2); - prints (show ? ">" : " "); - iflush (); + int16_t row = 0; + int16_t col = 0; + int menu_selectable = 0; + MENU_ID menu_id; + MENU_ITEM_ID menu_item_id; + MENU *p_menu; + MENU_ITEM *p_menu_item; + MENU_SCREEN *p_menu_screen; + int16_t menu_item_pos; + + menu_id = p_menu_set->menu_id_path[p_menu_set->choose_step]; + p_menu = get_menu_by_id(p_menu_set, menu_id); + if (p_menu == NULL) + { + log_error("get_menu_by_id(%d) return NULL pointer\n", menu_id); + return -1; + } + + menu_item_pos = p_menu_set->menu_item_pos[p_menu_set->choose_step]; + menu_item_id = p_menu->items[menu_item_pos]; + p_menu_item = get_menu_item_by_id(p_menu_set, menu_item_id); + if (p_menu_item == NULL) + { + log_error("get_menu_item_by_id(%d) return NULL pointer\n", menu_item_id); + return -1; + } + + if (menu_item_pos > 0 && + checkpriv(&BBS_priv, 0, p_menu_item->priv) != 0 && + checklevel(&BBS_priv, p_menu_item->level) != 0) + { + menu_selectable = 1; + } + + if (p_menu->title.show) + { + show_top(p_menu->title.text); + } + + if (p_menu->screen_show) + { + p_menu_screen = get_menu_screen_by_id(p_menu_set, p_menu->screen_id); + if (p_menu_screen == NULL) + { + log_error("get_menu_screen_by_id(%d) return NULL pointer\n", p_menu->screen_id); + return -1; + } + + moveto(p_menu->screen_row, p_menu->screen_col); + prints("%s", p_menu_set->p_menu_screen_buf + p_menu_screen->buf_offset); + iflush(); + } + + for (menu_item_pos = 0; menu_item_pos < p_menu->item_count; menu_item_pos++) + { + menu_item_id = p_menu->items[menu_item_pos]; + p_menu_item = get_menu_item_by_id(p_menu_set, menu_item_id); + + if (p_menu_item->row != 0) + { + row = p_menu_item->row; + } + if (p_menu_item->col != 0) + { + col = p_menu_item->col; + } + + if (checkpriv(&BBS_priv, 0, p_menu_item->priv) == 0 || checklevel(&BBS_priv, p_menu_item->level) == 0) + { + p_menu_set->menu_item_display[menu_item_pos] = 0; + p_menu_set->menu_item_r_row[menu_item_pos] = 0; + p_menu_set->menu_item_r_col[menu_item_pos] = 0; + } + else + { + p_menu_set->menu_item_display[menu_item_pos] = 1; + + if (!menu_selectable) + { + p_menu_set->menu_item_pos[p_menu_set->choose_step] = menu_item_pos; + menu_selectable = 1; + } + + p_menu_set->menu_item_r_row[menu_item_pos] = row; + p_menu_set->menu_item_r_col[menu_item_pos] = col; + + moveto(row, col); + prints("%s", p_menu_item->text); + + row++; + } + } + + if (!menu_selectable) + { + return -1; + } + + display_menu_cursor(p_menu_set, 1); + + return 0; } -int -display_menu (MENU * p_menu) +int menu_control(MENU_SET *p_menu_set, int key) { - int i, row, col, menu_selectable = 0; + MENU_ID menu_id; + MENU_ITEM_ID menu_item_id; + MENU *p_menu; + MENU_ITEM *p_menu_item; + int16_t menu_item_pos; - if (p_menu == NULL) - return -1; - - show_top (p_menu->title.text); + if (p_menu_set->menu_count == 0) + { + return 0; + } - moveto (p_menu->screen.row, p_menu->screen.col); - if (display_file (p_menu->screen.filename) != 0) - log_error ("Display menu screen <%s> failed!\n", p_menu->screen.filename); + menu_id = p_menu_set->menu_id_path[p_menu_set->choose_step]; + p_menu = get_menu_by_id(p_menu_set, menu_id); + if (p_menu == NULL) + { + log_error("get_menu_by_id(%d) return NULL pointer\n", menu_id); + return -1; + } - row = p_menu->items[0]->row; - col = p_menu->items[0]->col; + if (p_menu->item_count == 0) + { + return 0; + } - for (i = 0; i < p_menu->item_count; i++) - { - if (checkpriv (&BBS_priv, 0, p_menu->items[i]->priv) == 0 - || checklevel (&BBS_priv, p_menu->items[i]->level) == 0) + menu_item_pos = p_menu_set->menu_item_pos[p_menu_set->choose_step]; + menu_item_id = p_menu->items[menu_item_pos]; + p_menu_item = get_menu_item_by_id(p_menu_set, menu_item_id); + if (p_menu_item == NULL) { - p_menu->items[i]->display = 0; + log_error("get_menu_item_by_id(%d) return NULL pointer\n", menu_item_id); + return -1; } - else + + switch (key) { - p_menu->items[i]->display = 1; + case CR: + igetch_reset(); + case KEY_RIGHT: + if (p_menu_item->submenu) + { + if (strcmp(p_menu_item->action, "..") == 0) + { + return menu_control(p_menu_set, KEY_LEFT); + } + p_menu_set->choose_step++; + p_menu_set->menu_id_path[p_menu_set->choose_step] = p_menu_item->action_menu_id; + p_menu_set->menu_item_pos[p_menu_set->choose_step] = 0; + + if (display_menu(p_menu_set) != 0) + { + return menu_control(p_menu_set, KEY_LEFT); + } + } + else + { + return ((*(p_menu_item->action_cmd_handler))((void *)(p_menu_item->name))); + } + break; + case KEY_LEFT: + if (p_menu_set->choose_step > 0) + { + p_menu_set->choose_step--; + if (display_menu(p_menu_set) != 0) + { + return menu_control(p_menu_set, KEY_LEFT); + } + } + else + { + display_menu_cursor(p_menu_set, 0); + menu_item_pos = p_menu->item_count - 1; + while (menu_item_pos >= 0) + { + menu_item_id = p_menu->items[menu_item_pos]; + p_menu_item = get_menu_item_by_id(p_menu_set, menu_item_id); + if (p_menu_item == NULL) + { + log_error("get_menu_item_by_id(%d) return NULL pointer\n", menu_item_id); + return -1; + } + + if (!p_menu_set->menu_item_display[menu_item_pos] || p_menu_item->priv != 0 || p_menu_item->level != 0) + { + menu_item_pos--; + } + else + { + break; + } + } + p_menu_set->menu_item_pos[p_menu_set->choose_step] = menu_item_pos; + display_menu_cursor(p_menu_set, 1); + } + break; + case KEY_UP: + display_menu_cursor(p_menu_set, 0); + do + { + menu_item_pos--; + if (menu_item_pos < 0) + { + menu_item_pos = p_menu->item_count - 1; + } + menu_item_id = p_menu->items[menu_item_pos]; + p_menu_item = get_menu_item_by_id(p_menu_set, menu_item_id); + if (p_menu_item == NULL) + { + log_error("get_menu_item_by_id(%d) return NULL pointer\n", menu_item_id); + return -1; + } + } while (!p_menu_set->menu_item_display[menu_item_pos]); + p_menu_set->menu_item_pos[p_menu_set->choose_step] = menu_item_pos; + display_menu_cursor(p_menu_set, 1); + break; + case KEY_DOWN: + display_menu_cursor(p_menu_set, 0); + do + { + menu_item_pos++; + if (menu_item_pos >= p_menu->item_count) + { + menu_item_pos = 0; + } + menu_item_id = p_menu->items[menu_item_pos]; + p_menu_item = get_menu_item_by_id(p_menu_set, menu_item_id); + if (p_menu_item == NULL) + { + log_error("get_menu_item_by_id(%d) return NULL pointer\n", menu_item_id); + return -1; + } + } while (!p_menu_set->menu_item_display[menu_item_pos]); + p_menu_set->menu_item_pos[p_menu_set->choose_step] = menu_item_pos; + display_menu_cursor(p_menu_set, 1); + break; + case KEY_HOME: + case KEY_PGUP: + display_menu_cursor(p_menu_set, 0); + menu_item_pos = 0; + while (menu_item_pos < p_menu->item_count - 1) + { + menu_item_id = p_menu->items[menu_item_pos]; + p_menu_item = get_menu_item_by_id(p_menu_set, menu_item_id); + if (p_menu_item == NULL) + { + log_error("get_menu_item_by_id(%d) return NULL pointer\n", menu_item_id); + return -1; + } + + if (p_menu_set->menu_item_display[menu_item_pos]) + { + break; + } - menu_selectable = 1; + menu_item_pos++; + } + p_menu_set->menu_item_pos[p_menu_set->choose_step] = menu_item_pos; + display_menu_cursor(p_menu_set, 1); + break; + case KEY_END: + case KEY_PGDN: + display_menu_cursor(p_menu_set, 0); + menu_item_pos = p_menu->item_count - 1; + while (menu_item_pos > 0) + { + menu_item_id = p_menu->items[menu_item_pos]; + p_menu_item = get_menu_item_by_id(p_menu_set, menu_item_id); + if (p_menu_item == NULL) + { + log_error("get_menu_item_by_id(%d) return NULL pointer\n", menu_item_id); + return -1; + } + + if (p_menu_set->menu_item_display[menu_item_pos]) + { + break; + } - if (p_menu->items[i]->row != 0) - row = p_menu->items[i]->row; - else - row++; - p_menu->items[i]->r_row = row; - if (p_menu->items[i]->col != 0) - col = p_menu->items[i]->col; - p_menu->items[i]->r_col = col; - moveto (row, col); - prints (p_menu->items[i]->text); - iflush (); + menu_item_pos--; + } + p_menu_set->menu_item_pos[p_menu_set->choose_step] = menu_item_pos; + display_menu_cursor(p_menu_set, 1); + break; + default: + if (isalnum(key)) + { + for (menu_item_pos = 0; menu_item_pos < p_menu->item_count; menu_item_pos++) + { + menu_item_id = p_menu->items[menu_item_pos]; + p_menu_item = get_menu_item_by_id(p_menu_set, menu_item_id); + if (p_menu_item == NULL) + { + log_error("get_menu_item_by_id(%d) return NULL pointer\n", menu_item_id); + return -1; + } + + if (toupper(key) == toupper(p_menu_item->name[0]) && p_menu_set->menu_item_display[menu_item_pos]) + { + display_menu_cursor(p_menu_set, 0); + p_menu_set->menu_item_pos[p_menu_set->choose_step] = menu_item_pos; + display_menu_cursor(p_menu_set, 1); + return 0; + } + } + } + break; } - } - if (!menu_selectable) - return -1; + return 0; +} - display_menu_cursor (p_menu, 1); +int unload_menu(MENU_SET *p_menu_set) +{ + if (p_menu_set->p_menu_name_dict != NULL) + { + trie_dict_destroy(p_menu_set->p_menu_name_dict); + p_menu_set->p_menu_name_dict = NULL; + } - return 0; + if (p_menu_set->p_menu_screen_dict != NULL) + { + trie_dict_destroy(p_menu_set->p_menu_screen_dict); + p_menu_set->p_menu_screen_dict = NULL; + } + + unload_menu_shm(p_menu_set); + + if (shmctl(p_menu_set->shmid, IPC_RMID, NULL) == -1) + { + log_error("shmctl(shmid=%d, IPC_RMID) error (%d)\n", p_menu_set->shmid, errno); + return -1; + } + + return 0; } -const char * -menu_control (MENU_SET * p_menu_set, int key) +int load_menu_shm(MENU_SET *p_menu_set) { - int i; - MENU *p_menu; + // Mount shared memory + if (p_menu_set->p_reserved == NULL) + { + p_menu_set->p_reserved = shmat(p_menu_set->shmid, NULL, SHM_RDONLY); + if (p_menu_set->p_reserved == (void *)-1) + { + log_error("shmat() error (%d)\n", errno); + return -1; + } + } + + p_menu_set->p_menu_pool = p_menu_set->p_reserved + MENU_SET_RESERVED_LENGTH; + p_menu_set->p_menu_item_pool = p_menu_set->p_menu_pool + sizeof(MENU) * MAX_MENUS; + p_menu_set->p_menu_screen_pool = p_menu_set->p_menu_item_pool + sizeof(MENU_ITEM) * MAX_MENUITEMS; + p_menu_set->p_menu_screen_buf = p_menu_set->p_menu_screen_pool + sizeof(MENU_SCREEN) * MAX_MENUS; + p_menu_set->p_menu_screen_buf_free = p_menu_set->p_menu_screen_buf; + + // Restore status varaibles into reserved memory area + p_menu_set->menu_count = *((int16_t *)p_menu_set->p_reserved); + p_menu_set->menu_item_count = *(((int16_t *)p_menu_set->p_reserved) + 1); + p_menu_set->menu_screen_count = *(((int16_t *)p_menu_set->p_reserved) + 2); + + p_menu_set->choose_step = 0; + p_menu_set->menu_id_path[0] = 0; - if (p_menu_set->menu_count == 0) - return ""; + p_menu_set->p_menu_name_dict = NULL; + p_menu_set->p_menu_screen_dict = NULL; - p_menu = p_menu_set->p_menu_select[p_menu_set->menu_select_depth]; + return 0; +} + +int unload_menu_shm(MENU_SET *p_menu_set) +{ + p_menu_set->menu_count = 0; + p_menu_set->menu_item_count = 0; + p_menu_set->menu_screen_count = 0; + p_menu_set->choose_step = 0; + + p_menu_set->p_menu_pool = NULL; + p_menu_set->p_menu_item_pool = NULL; + p_menu_set->p_menu_screen_pool = NULL; + p_menu_set->p_menu_screen_buf = NULL; + p_menu_set->p_menu_screen_buf_free = NULL; - switch (key) - { - case CR: - case KEY_RIGHT: - if (p_menu->items[p_menu->item_cur_pos]->submenu) - { - if (strcmp (p_menu->items[p_menu->item_cur_pos]->action, "..") == 0) - return menu_control (p_menu_set, KEY_LEFT); - p_menu_set->menu_select_depth++; - p_menu = - p_menu_set->p_menu_select[p_menu_set->menu_select_depth] = - get_menu (p_menu_set, - p_menu->items[p_menu->item_cur_pos]->action); - if (display_menu (p_menu) != 0) - return menu_control (p_menu_set, KEY_LEFT); - break; - } - else - { - return (p_menu->items[p_menu->item_cur_pos]->action); - } - case KEY_LEFT: - if (p_menu_set->menu_select_depth > 0) - { - p_menu_set->menu_select_depth--; - p_menu = p_menu_set->p_menu_select[p_menu_set->menu_select_depth]; - if (display_menu (p_menu) != 0) - return menu_control (p_menu_set, KEY_LEFT); - break; - } - else - { - display_menu_cursor (p_menu, 0); - p_menu->item_cur_pos = p_menu->item_count - 1; - while (!p_menu->items[p_menu->item_cur_pos]->display) - p_menu->item_cur_pos--; - display_menu_cursor (p_menu, 1); - break; - } - case KEY_UP: - display_menu_cursor (p_menu, 0); - do - { - p_menu->item_cur_pos--; - if (p_menu->item_cur_pos < 0) - p_menu->item_cur_pos = p_menu->item_count - 1; - } - while (!p_menu->items[p_menu->item_cur_pos]->display); - display_menu_cursor (p_menu, 1); - break; - case KEY_DOWN: - display_menu_cursor (p_menu, 0); - do - { - p_menu->item_cur_pos++; - if (p_menu->item_cur_pos >= p_menu->item_count) - p_menu->item_cur_pos = 0; - } - while (!p_menu->items[p_menu->item_cur_pos]->display); - display_menu_cursor (p_menu, 1); - break; - default: - for (i = 0; i < p_menu->item_count; i++) - { - if (toupper (key) == toupper (p_menu->items[i]->name[0])) - { - display_menu_cursor (p_menu, 0); - p_menu->item_cur_pos = i; - display_menu_cursor (p_menu, 1); - break; - } + if (p_menu_set->p_reserved != NULL && shmdt(p_menu_set->p_reserved) == -1) + { + log_error("shmdt() error (%d)\n", errno); + return -1; } - } + p_menu_set->p_reserved = NULL; - return ""; + return 0; }