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

Diff of /lbbs/src/menu.c

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

Revision 1.12 by sysadm, Mon Mar 21 13:27:00 2005 UTC Revision 1.68 by sysadm, Tue Jun 24 10:01:24 2025 UTC
# Line 1  Line 1 
1  /***************************************************************************  /***************************************************************************
2                            menu.c  -  description                                                    menu.c  -  description
3                               -------------------                                                           -------------------
4      begin                : Wed Mar 16 2004          Copyright            : (C) 2004-2025 by Leaflet
5      copyright            : (C) 2005 by Leaflet          Email                : leaflet@leafok.com
     email                : leaflet@leafok.com  
6   ***************************************************************************/   ***************************************************************************/
7    
8  /***************************************************************************  /***************************************************************************
9   *                                                                         *   *                                                                         *
10   *   This program is free software; you can redistribute it and/or modify  *   *   This program is free software; you can redistribute it and/or modify  *
11   *   it under the terms of the GNU General Public License as published by  *   *   it under the terms of the GNU General Public License as published by  *
12   *   the Free Software Foundation; either version 2 of the License, or     *   *   the Free Software Foundation; either version 3 of the License, or     *
13   *   (at your option) any later version.                                   *   *   (at your option) any later version.                                   *
14   *                                                                         *   *                                                                         *
15   ***************************************************************************/   ***************************************************************************/
16    
17  #include "bbs.h"  #include "bbs.h"
18  #include "menu.h"  #include "bbs_cmd.h"
19  #include "io.h"  #include "bbs_cmd.h"
20  #include "common.h"  #include "common.h"
21  #include <stdio.h>  #include "io.h"
22    #include "log.h"
23    #include "menu.h"
24    #include "screen.h"
25    #include "user_priv.h"
26  #include <ctype.h>  #include <ctype.h>
27  #include <regex.h>  #include <errno.h>
28    #include <stdio.h>
29  #include <stdlib.h>  #include <stdlib.h>
30    #include <string.h>
31    #include <unistd.h>
32    #include <sys/ipc.h>
33    #include <sys/shm.h>
34    
35    #define MENU_SCREEN_PATH_PREFIX "var/MENU_SCR_"
36    #define MENU_CONF_DELIM_WITH_SPACE " ,\t\r\n"
37    #define MENU_CONF_DELIM_WITHOUT_SPACE "\r\n"
38    
39  MENU_SET bbs_menu;  #define MENU_SET_RESERVED_LENGTH (sizeof(int16_t) * 4)
40    
41  int  MENU_SET *p_bbs_menu;
42  load_menu (MENU_SET * p_menu_set, const char *conf_file)  
43    int load_menu(MENU_SET *p_menu_set, const char *conf_file)
44  {  {
45    FILE *fin, *fout;          FILE *fin;
46    int i = 0, j;          int fin_line = 0;
47    char buffer[256], screen_filename[256], temp[256];          char buffer[LINE_BUFFER_LEN];
48    regmatch_t pmatch[10];          char temp[LINE_BUFFER_LEN];
49            char *p = NULL;
50    if ((fin = fopen (conf_file, "r")) == NULL)          char *q = NULL;
51      {          char *r = NULL;
52        log_error ("Open %s failed", conf_file);          char *saveptr = NULL;
53        return -1;          MENU *p_menu = NULL;
54      }          MENU_ITEM *p_menu_item = NULL;
55            MENU_SCREEN *p_screen = NULL;
56    while (fgets (buffer, 255, fin))          MENU_ID menu_id;
57      {          MENU_ITEM_ID menu_item_id;
58        switch (buffer[0])          MENU_SCREEN_ID screen_id;
59          {          int proj_id;
60          case '#':          key_t key;
61            break;          size_t size;
62          case '%':  
63            if (ireg ("^%S_([A-Za-z0-9_]+)", buffer, 2, pmatch) == 0)          // Use trie_dict to search menu_id by menu name
64              {          p_menu_set->p_menu_name_dict = trie_dict_create();
65                strncpy (temp, buffer + pmatch[1].rm_so,          if (p_menu_set->p_menu_name_dict == NULL)
66                         pmatch[1].rm_eo - pmatch[1].rm_so);          {
67                temp[pmatch[1].rm_eo - pmatch[1].rm_so] = '\0';                  log_error("trie_dict_create() error\n");
68                sprintf (screen_filename, "%sMENU_SCR_%s", app_temp_dir, temp);                  return -3;
69            }
70                if ((fout = fopen (screen_filename, "w")) == NULL)  
71                  {          // Use trie_dict to search screen_id by menu screen name
72                    log_error ("Open %s failed", screen_filename);          p_menu_set->p_menu_screen_dict = trie_dict_create();
73                    return -2;          if (p_menu_set->p_menu_screen_dict == NULL)
74                  }          {
75                    log_error("trie_dict_create() error\n");
76                while (fgets (buffer, 255, fin))                  return -3;
77                  {          }
78                    if (buffer[0] != '%')  
79                      fputs (buffer, fout);          if ((fin = fopen(conf_file, "r")) == NULL)
80                    else          {
81                      break;                  log_error("Open %s failed\n", conf_file);
82                  }                  return -2;
83            }
84                fclose (fout);  
85                break;          // Allocate shared memory
86              }          proj_id = (int)(time(NULL) % getpid());
87            key = ftok(conf_file, proj_id);
88            if (ireg ("^%menu ([A-Za-z0-9_]+)", buffer, 2, pmatch) == 0)          if (key == -1)
89              {          {
90                p_menu_set->p_menu[i] = malloc (sizeof (MENU));                  log_error("ftok(%s %d) error (%d)\n", conf_file, proj_id, errno);
91                    return -2;
92                strncpy (p_menu_set->p_menu[i]->name,          }
93                         buffer + pmatch[1].rm_so,  
94                         pmatch[1].rm_eo - pmatch[1].rm_so);          size = MENU_SET_RESERVED_LENGTH +
95                p_menu_set->p_menu[i]->name[pmatch[1].rm_eo - pmatch[1].rm_so] =                     sizeof(MENU) * MAX_MENUS +
96                  '\0';                     sizeof(MENU_ITEM) * MAX_MENUITEMS +
97                       sizeof(MENU_SCREEN) * MAX_MENUS +
98                j = 0;                     MAX_MENU_SCR_BUF_LENGTH * MAX_MENUS;
99            p_menu_set->shmid = shmget(key, size, IPC_CREAT | IPC_EXCL | 0600);
100                while (fgets (buffer, 255, fin))          if (p_menu_set->shmid == -1)
101                  {          {
102                    if (buffer[0] == '#')                  log_error("shmget(size = %d) error (%d)\n", size, errno);
103                      {                  return -3;
104                        continue;          }
105                      }          p_menu_set->p_reserved = shmat(p_menu_set->shmid, NULL, 0);
106                    if (buffer[0] == '%')          if (p_menu_set->p_reserved == (void *)-1)
107                      {          {
108                        p_menu_set->p_menu[i]->item_count = j;                  log_error("shmat() error (%d)\n", errno);
109                        p_menu_set->p_menu[i]->item_cur_pos = 0;                  return -3;
110                        i++;          }
111                        break;          p_menu_set->p_menu_pool = p_menu_set->p_reserved + MENU_SET_RESERVED_LENGTH;
112                      }          p_menu_set->p_menu_item_pool = p_menu_set->p_menu_pool + sizeof(MENU) * MAX_MENUS;
113                    if (ireg ("^!([A-Za-z0-9_.]+)[[:space:]]*([0-9]+),"          p_menu_set->p_menu_screen_pool = p_menu_set->p_menu_item_pool + sizeof(MENU_ITEM) * MAX_MENUITEMS;
114                              "[[:space:]]*([0-9]+),[[:space:]]*([0-9]+),"          p_menu_set->p_menu_screen_buf = p_menu_set->p_menu_screen_pool + sizeof(MENU_SCREEN) * MAX_MENUS;
115                              "[[:space:]]*([0-9]+),[[:space:]]*\"([A-Za-z0-9_]+)\","          p_menu_set->p_menu_screen_buf_free = p_menu_set->p_menu_screen_buf;
116                              "[[:space:]]*\"([^\"]+)\"",  
117                              buffer, 8, pmatch) == 0)          p_menu_set->menu_count = 0;
118                      {          p_menu_set->menu_item_count = 0;
119                        p_menu_set->p_menu[i]->items[j] =          p_menu_set->menu_screen_count = 0;
120                          malloc (sizeof (MENU_ITEM));          p_menu_set->choose_step = 0;
121                        p_menu_set->p_menu[i]->items[j]->submenu = 1;          p_menu_set->menu_id_path[0] = 0;
122                        strncpy (p_menu_set->p_menu[i]->items[j]->action,          p_menu_set->allow_exit = 0;
123                                 buffer + pmatch[1].rm_so,  
124                                 pmatch[1].rm_eo - pmatch[1].rm_so);          while (fgets(buffer, sizeof(buffer), fin))
125                        p_menu_set->p_menu[i]->items[j]->action[pmatch[1].          {
126                                                                rm_eo -                  fin_line++;
127                                                                pmatch[1].  
128                                                                rm_so] = '\0';                  p = strtok_r(buffer, MENU_CONF_DELIM_WITH_SPACE, &saveptr);
129                        strncpy (temp, buffer + pmatch[2].rm_so,                  if (p == NULL) // Blank line
130                                 pmatch[2].rm_eo - pmatch[2].rm_so);                  {
131                        temp[pmatch[2].rm_eo - pmatch[2].rm_so] = '\0';                          continue;
132                        p_menu_set->p_menu[i]->items[j]->row = atoi (temp);                  }
133                        strncpy (temp,  
134                                 buffer + pmatch[3].rm_so,                  if (*p == '#' || *p == '\r' || *p == '\n') // Comment or blank line
135                                 pmatch[3].rm_eo - pmatch[3].rm_so);                  {
136                        temp[pmatch[3].rm_eo - pmatch[3].rm_so] = '\0';                          continue;
137                        p_menu_set->p_menu[i]->items[j]->col = atoi (temp);                  }
138                        strncpy (temp,  
139                                 buffer + pmatch[4].rm_so,                  if (*p == '%')
140                                 pmatch[4].rm_eo - pmatch[4].rm_so);                  {
141                        temp[pmatch[4].rm_eo - pmatch[4].rm_so] = '\0';                          p++;
142                        p_menu_set->p_menu[i]->items[j]->priv = atoi (temp);  
143                        strncpy (temp,                          if (strcmp(p, "menu") == 0) // BEGIN of sub-menu
144                                 buffer + pmatch[5].rm_so,                          {
145                                 pmatch[5].rm_eo - pmatch[5].rm_so);                                  if (p_menu != NULL)
146                        temp[pmatch[5].rm_eo - pmatch[5].rm_so] = '\0';                                  {
147                        p_menu_set->p_menu[i]->items[j]->level = atoi (temp);                                          log_error("Incomplete menu definition in menu config line %d\n", fin_line);
148                        strncpy (p_menu_set->p_menu[i]->items[j]->name,                                          return -1;
149                                 buffer + pmatch[6].rm_so,                                  }
150                                 pmatch[6].rm_eo - pmatch[6].rm_so);  
151                        p_menu_set->p_menu[i]->items[j]->name[pmatch[6].rm_eo -                                  if (p_menu_set->menu_count >= MAX_MENUS)
152                                                              pmatch[6].rm_so] =                                  {
153                          '\0';                                          log_error("Menu count (%d) exceed limit (%d)\n", p_menu_set->menu_count, MAX_MENUS);
154                        strncpy (p_menu_set->p_menu[i]->items[j]->text,                                          return -3;
155                                 buffer + pmatch[7].rm_so,                                  }
156                                 pmatch[7].rm_eo - pmatch[7].rm_so);                                  menu_id = (MENU_ID)p_menu_set->menu_count;
157                        p_menu_set->p_menu[i]->items[j]->text[pmatch[7].rm_eo -                                  p_menu_set->menu_count++;
158                                                              pmatch[7].rm_so] =  
159                          '\0';                                  p_menu = get_menu_by_id(p_menu_set, menu_id);
160                        j++;  
161                        continue;                                  p_menu->item_count = 0;
162                      }                                  p_menu->title.show = 0;
163                    if (ireg ("^@([A-Za-z0-9_]+)[[:space:]]*([0-9]+),"                                  p_menu->screen_show = 0;
164                              "[[:space:]]*([0-9]+),[[:space:]]*([0-9]+),"                                  p_menu->page_item_limit = 0;
165                              "[[:space:]]*([0-9]+),[[:space:]]*\"([A-Za-z0-9_]+)\","                                  p_menu->use_filter = 0;
166                              "[[:space:]]*\"([^\"]+)\"",                                  p_menu->filter_handler = NULL;
167                              buffer, 8, pmatch) == 0)  
168                      {                                  q = strtok_r(NULL, MENU_CONF_DELIM_WITH_SPACE, &saveptr);
169                        p_menu_set->p_menu[i]->items[j] =                                  if (q == NULL)
170                          malloc (sizeof (MENU_ITEM));                                  {
171                        p_menu_set->p_menu[i]->items[j]->submenu = 0;                                          log_error("Error menu name in menu config line %d\n", fin_line);
172                        strncpy (p_menu_set->p_menu[i]->items[j]->action,                                          return -1;
173                                 buffer + pmatch[1].rm_so,                                  }
174                                 pmatch[1].rm_eo - pmatch[1].rm_so);                                  p = q;
175                        p_menu_set->p_menu[i]->items[j]->action[pmatch[1].                                  while (isalnum(*q) || *q == '_' || *q == '-')
176                                                                rm_eo -                                  {
177                                                                pmatch[1].                                          q++;
178                                                                rm_so] = '\0';                                  }
179                        strncpy (temp, buffer + pmatch[2].rm_so,                                  if (*q != '\0')
180                                 pmatch[2].rm_eo - pmatch[2].rm_so);                                  {
181                        temp[pmatch[2].rm_eo - pmatch[2].rm_so] = '\0';                                          log_error("Error menu name in menu config line %d\n", fin_line);
182                        p_menu_set->p_menu[i]->items[j]->row = atoi (temp);                                          return -1;
183                        strncpy (temp,                                  }
184                                 buffer + pmatch[3].rm_so,  
185                                 pmatch[3].rm_eo - pmatch[3].rm_so);                                  if (q - p > sizeof(p_menu->name) - 1)
186                        temp[pmatch[3].rm_eo - pmatch[3].rm_so] = '\0';                                  {
187                        p_menu_set->p_menu[i]->items[j]->col = atoi (temp);                                          log_error("Too longer menu name in menu config line %d\n", fin_line);
188                        strncpy (temp,                                          return -1;
189                                 buffer + pmatch[4].rm_so,                                  }
190                                 pmatch[4].rm_eo - pmatch[4].rm_so);                                  strncpy(p_menu->name, p, sizeof(p_menu->name) - 1);
191                        temp[pmatch[4].rm_eo - pmatch[4].rm_so] = '\0';                                  p_menu->name[sizeof(p_menu->name) - 1] = '\0';
192                        p_menu_set->p_menu[i]->items[j]->priv = atoi (temp);  
193                        strncpy (temp,                                  if (trie_dict_set(p_menu_set->p_menu_name_dict, p_menu->name, (int64_t)menu_id) != 1)
194                                 buffer + pmatch[5].rm_so,                                  {
195                                 pmatch[5].rm_eo - pmatch[5].rm_so);                                          log_error("Error set menu dict [%s]\n", p_menu->name);
196                        temp[pmatch[5].rm_eo - pmatch[5].rm_so] = '\0';                                  }
197                        p_menu_set->p_menu[i]->items[j]->level = atoi (temp);  
198                        strncpy (p_menu_set->p_menu[i]->items[j]->name,                                  // Check syntax
199                                 buffer + pmatch[6].rm_so,                                  q = strtok_r(NULL, MENU_CONF_DELIM_WITH_SPACE, &saveptr);
200                                 pmatch[6].rm_eo - pmatch[6].rm_so);                                  if (q != NULL)
201                        p_menu_set->p_menu[i]->items[j]->name[pmatch[6].rm_eo -                                  {
202                                                              pmatch[6].rm_so] =                                          log_error("Unknown extra content in menu config line %d\n", fin_line);
203                          '\0';                                          return -1;
204                        strncpy (p_menu_set->p_menu[i]->items[j]->text,                                  }
205                                 buffer + pmatch[7].rm_so,  
206                                 pmatch[7].rm_eo - pmatch[7].rm_so);                                  while (fgets(buffer, sizeof(buffer), fin))
207                        p_menu_set->p_menu[i]->items[j]->text[pmatch[7].rm_eo -                                  {
208                                                              pmatch[7].rm_so] =                                          fin_line++;
209                          '\0';  
210                        j++;                                          p = strtok_r(buffer, MENU_CONF_DELIM_WITH_SPACE, &saveptr);
211                        continue;                                          if (p == NULL) // Blank line
212                      }                                          {
213                    if (ireg ("^title[[:space:]]*([0-9]+),"                                                  continue;
214                              "[[:space:]]*([0-9]+),[[:space:]]*\"([^\"]+)\"",                                          }
215                              buffer, 4, pmatch) == 0)  
216                      {                                          if (*p == '#' || *p == '\r' || *p == '\n') // Comment or blank line
217                        strncpy (temp,                                          {
218                                 buffer + pmatch[1].rm_so,                                                  continue;
219                                 pmatch[1].rm_eo - pmatch[1].rm_so);                                          }
220                        temp[pmatch[1].rm_eo - pmatch[1].rm_so] = '\0';  
221                        p_menu_set->p_menu[i]->title.row = atoi (temp);                                          if (*p == '%') // END of sub-menu
222                        strncpy (temp,                                          {
223                                 buffer + pmatch[2].rm_so,                                                  p_menu = NULL;
224                                 pmatch[2].rm_eo - pmatch[2].rm_so);                                                  break;
225                        temp[pmatch[2].rm_eo - pmatch[2].rm_so] = '\0';                                          }
226                        p_menu_set->p_menu[i]->title.col = atoi (temp);                                          else if (*p == '!' || *p == '@')
227                        strncpy (p_menu_set->p_menu[i]->title.text,                                          {
228                                 buffer + pmatch[3].rm_so,                                                  // BEGIN of menu item
229                                 pmatch[3].rm_eo - pmatch[3].rm_so);                                                  if (p_menu->item_count >= MAX_ITEMS_PER_MENU)
230                        p_menu_set->p_menu[i]->title.text[pmatch[3].rm_eo -                                                  {
231                                                          pmatch[3].rm_so] =                                                          log_error("Menuitem count per menu (%d) exceed limit (%d)\n", p_menu->item_count, MAX_ITEMS_PER_MENU);
232                          '\0';                                                          return -1;
233                        continue;                                                  }
234                      }                                                  if (p_menu_set->menu_item_count >= MAX_MENUITEMS)
235                    if (ireg ("^screen[[:space:]]*([0-9]+),"                                                  {
236                              "[[:space:]]*([0-9]+),[[:space:]]*S_([A-Za-z0-9_]+)",                                                          log_error("Menuitem count (%d) exceed limit (%d)\n", p_menu_set->menu_item_count, MAX_MENUITEMS);
237                              buffer, 4, pmatch) == 0)                                                          return -3;
238                      {                                                  }
239                        strncpy (temp,                                                  menu_item_id = (MENU_ITEM_ID)p_menu_set->menu_item_count;
240                                 buffer + pmatch[1].rm_so,                                                  p_menu_set->menu_item_count++;
241                                 pmatch[1].rm_eo - pmatch[1].rm_so);  
242                        temp[pmatch[1].rm_eo - pmatch[1].rm_so] = '\0';                                                  p_menu->items[p_menu->item_count] = menu_item_id;
243                        p_menu_set->p_menu[i]->screen.row = atoi (temp);                                                  p_menu->item_count++;
244                        strncpy (temp,  
245                                 buffer + pmatch[2].rm_so,                                                  p_menu_item = get_menu_item_by_id(p_menu_set, menu_item_id);
246                                 pmatch[2].rm_eo - pmatch[2].rm_so);  
247                        temp[pmatch[2].rm_eo - pmatch[2].rm_so] = '\0';                                                  p_menu_item->submenu = (*p == '!' ? 1 : 0);
248                        p_menu_set->p_menu[i]->screen.col = atoi (temp);  
249                        strncpy (temp,                                                  // Menu item action
250                                 buffer + pmatch[3].rm_so,                                                  p++;
251                                 pmatch[3].rm_eo - pmatch[3].rm_so);                                                  if (strcmp(p, "..") == 0) // Return to parent menu
252                        temp[pmatch[3].rm_eo - pmatch[3].rm_so] = '\0';                                                  {
253                        sprintf (p_menu_set->p_menu[i]->screen.filename,                                                          q = p + 2; // strlen("..")
254                                 "%sMENU_SCR_%s", app_temp_dir, temp);                                                  }
255                        continue;                                                  else
256                      }                                                  {
257                  }                                                          q = p;
258              }                                                          while (isalnum(*q) || *q == '_' || *q == '-')
259            break;                                                          {
260          }                                                                  q++;
261      }                                                          }
262    fclose (fin);                                                          if (*q != '\0')
263                                                            {
264    p_menu_set->menu_count = i;                                                                  log_error("Error menu item action in menu config line %d\n", fin_line);
265    p_menu_set->menu_select_depth = 0;                                                                  return -1;
266    p_menu_set->p_menu_select[p_menu_set->menu_select_depth]                                                          }
267      = (i == 0 ? NULL : p_menu_set->p_menu[0]);                                                  }
268    
269                                                    if (q - p > sizeof(p_menu_item->action) - 1)
270                                                    {
271                                                            log_error("Too longer menu action in menu config line %d\n", fin_line);
272                                                            return -1;
273                                                    }
274                                                    strncpy(p_menu_item->action, p, sizeof(p_menu_item->action) - 1);
275                                                    p_menu_item->action[sizeof(p_menu_item->action) - 1] = '\0';
276    
277                                                    // Menu item row
278                                                    q = strtok_r(NULL, MENU_CONF_DELIM_WITH_SPACE, &saveptr);
279                                                    if (q == NULL)
280                                                    {
281                                                            log_error("Error menu item row in menu config line %d\n", fin_line);
282                                                            return -1;
283                                                    }
284                                                    p = q;
285                                                    while (isdigit(*q))
286                                                    {
287                                                            q++;
288                                                    }
289                                                    if (*q != '\0')
290                                                    {
291                                                            log_error("Error menu item row in menu config line %d\n", fin_line);
292                                                            return -1;
293                                                    }
294                                                    p_menu_item->row = (int16_t)atoi(p);
295    
296                                                    // Menu item col
297                                                    q = strtok_r(NULL, MENU_CONF_DELIM_WITH_SPACE, &saveptr);
298                                                    if (q == NULL)
299                                                    {
300                                                            log_error("Error menu item col in menu config line %d\n", fin_line);
301                                                            return -1;
302                                                    }
303                                                    p = q;
304                                                    while (isdigit(*q))
305                                                    {
306                                                            q++;
307                                                    }
308                                                    if (*q != '\0')
309                                                    {
310                                                            log_error("Error menu item col in menu config line %d\n", fin_line);
311                                                            return -1;
312                                                    }
313                                                    p_menu_item->col = (int16_t)atoi(p);
314    
315                                                    // Menu item priv
316                                                    q = strtok_r(NULL, MENU_CONF_DELIM_WITH_SPACE, &saveptr);
317                                                    if (q == NULL)
318                                                    {
319                                                            log_error("Error menu item priv in menu config line %d\n", fin_line);
320                                                            return -1;
321                                                    }
322                                                    p = q;
323                                                    while (isdigit(*q))
324                                                    {
325                                                            q++;
326                                                    }
327                                                    if (*q != '\0')
328                                                    {
329                                                            log_error("Error menu item priv in menu config line %d\n", fin_line);
330                                                            return -1;
331                                                    }
332                                                    p_menu_item->priv = atoi(p);
333    
334                                                    // Menu item level
335                                                    q = strtok_r(NULL, MENU_CONF_DELIM_WITH_SPACE, &saveptr);
336                                                    if (q == NULL)
337                                                    {
338                                                            log_error("Error menu item level in menu config line %d\n", fin_line);
339                                                            return -1;
340                                                    }
341                                                    p = q;
342                                                    while (isdigit(*q))
343                                                    {
344                                                            q++;
345                                                    }
346                                                    if (*q != '\0')
347                                                    {
348                                                            log_error("Error menu item level in menu config line %d\n", fin_line);
349                                                            return -1;
350                                                    }
351                                                    p_menu_item->level = atoi(p);
352    
353                                                    // Menu item name
354                                                    q = strtok_r(NULL, MENU_CONF_DELIM_WITH_SPACE, &saveptr);
355                                                    if (q == NULL || *q != '\"')
356                                                    {
357                                                            log_error("Error menu item name in menu config line %d\n", fin_line);
358                                                            return -1;
359                                                    }
360                                                    q++;
361                                                    p = q;
362                                                    while (*q != '\0' && *q != '\"')
363                                                    {
364                                                            if (*q == '\\')
365                                                            {
366                                                                    r = q;
367                                                                    while (*r != '\0')
368                                                                    {
369                                                                            *r = *(r + 1);
370                                                                            r++;
371                                                                    }
372                                                            }
373                                                            q++;
374                                                    }
375                                                    if (*q != '\"' || *(q + 1) != '\0')
376                                                    {
377                                                            log_error("Error menu item name in menu config line %d\n", fin_line);
378                                                            return -1;
379                                                    }
380                                                    *q = '\0';
381    
382                                                    if (q - p > sizeof(p_menu_item->name) - 1)
383                                                    {
384                                                            log_error("Too longer menu name in menu config line %d\n", fin_line);
385                                                            return -1;
386                                                    }
387                                                    strncpy(p_menu_item->name, p, sizeof(p_menu_item->name) - 1);
388                                                    p_menu_item->name[sizeof(p_menu_item->name) - 1] = '\0';
389    
390                                                    // Menu item text
391                                                    q = strtok_r(NULL, MENU_CONF_DELIM_WITHOUT_SPACE, &saveptr);
392                                                    if (q == NULL || (q = strchr(q, '\"')) == NULL)
393                                                    {
394                                                            log_error("Error menu item text in menu config line %d\n", fin_line);
395                                                            return -1;
396                                                    }
397                                                    q++;
398                                                    p = q;
399                                                    while (*q != '\0' && *q != '\"')
400                                                    {
401                                                            if (*q == '\\')
402                                                            {
403                                                                    r = q;
404                                                                    while (*r != '\0')
405                                                                    {
406                                                                            *r = *(r + 1);
407                                                                            r++;
408                                                                    }
409                                                            }
410                                                            q++;
411                                                    }
412                                                    if (*q != '\"')
413                                                    {
414                                                            log_error("Error menu item text in menu config line %d\n", fin_line);
415                                                            return -1;
416                                                    }
417                                                    *q = '\0';
418    
419                                                    if (q - p > sizeof(p_menu_item->text) - 1)
420                                                    {
421                                                            log_error("Too longer menu item text in menu config line %d\n", fin_line);
422                                                            return -1;
423                                                    }
424                                                    strncpy(p_menu_item->text, p, sizeof(p_menu_item->text) - 1);
425                                                    p_menu_item->text[sizeof(p_menu_item->text) - 1] = '\0';
426    
427                                                    // Check syntax
428                                                    q = strtok_r(q + 1, MENU_CONF_DELIM_WITH_SPACE, &saveptr);
429                                                    if (q != NULL)
430                                                    {
431                                                            log_error("Unknown extra content in menu config line %d\n", fin_line);
432                                                            return -1;
433                                                    }
434                                            }
435                                            else if (strcmp(p, "title") == 0)
436                                            {
437                                                    p_menu->title.show = 1;
438    
439                                                    // Menu title row
440                                                    q = strtok_r(NULL, MENU_CONF_DELIM_WITH_SPACE, &saveptr);
441                                                    if (q == NULL)
442                                                    {
443                                                            log_error("Error menu title row in menu config line %d\n", fin_line);
444                                                            return -1;
445                                                    }
446                                                    p = q;
447                                                    while (isdigit(*q))
448                                                    {
449                                                            q++;
450                                                    }
451                                                    if (*q != '\0')
452                                                    {
453                                                            log_error("Error menu title row in menu config line %d\n", fin_line);
454                                                            return -1;
455                                                    }
456                                                    p_menu->title.row = (int16_t)atoi(p);
457    
458                                                    // Menu title col
459                                                    q = strtok_r(NULL, MENU_CONF_DELIM_WITH_SPACE, &saveptr);
460                                                    if (q == NULL)
461                                                    {
462                                                            log_error("Error menu title col in menu config line %d\n", fin_line);
463                                                            return -1;
464                                                    }
465                                                    p = q;
466                                                    while (isdigit(*q))
467                                                    {
468                                                            q++;
469                                                    }
470                                                    if (*q != '\0')
471                                                    {
472                                                            log_error("Error menu title col in menu config line %d\n", fin_line);
473                                                            return -1;
474                                                    }
475                                                    p_menu->title.col = (int16_t)atoi(p);
476    
477                                                    // Menu title text
478                                                    q = strtok_r(NULL, MENU_CONF_DELIM_WITHOUT_SPACE, &saveptr);
479                                                    if (q == NULL || (q = strchr(q, '\"')) == NULL)
480                                                    {
481                                                            log_error("Error menu title text in menu config line %d\n", fin_line);
482                                                            return -1;
483                                                    }
484                                                    q++;
485                                                    p = q;
486                                                    while (*q != '\0' && *q != '\"')
487                                                    {
488                                                            if (*q == '\\')
489                                                            {
490                                                                    r = q;
491                                                                    while (*r != '\0')
492                                                                    {
493                                                                            *r = *(r + 1);
494                                                                            r++;
495                                                                    }
496                                                            }
497                                                            q++;
498                                                    }
499                                                    if (*q != '\"')
500                                                    {
501                                                            log_error("Error menu title text in menu config line %d\n", fin_line);
502                                                            return -1;
503                                                    }
504                                                    *q = '\0';
505    
506                                                    if (q - p > sizeof(p_menu->title.text) - 1)
507                                                    {
508                                                            log_error("Too longer menu title text in menu config line %d\n", fin_line);
509                                                            return -1;
510                                                    }
511                                                    strncpy(p_menu->title.text, p, sizeof(p_menu->title.text) - 1);
512                                                    p_menu->title.text[sizeof(p_menu->title.text) - 1] = '\0';
513    
514                                                    // Check syntax
515                                                    q = strtok_r(q + 1, MENU_CONF_DELIM_WITH_SPACE, &saveptr);
516                                                    if (q != NULL)
517                                                    {
518                                                            log_error("Unknown extra content in menu config line %d\n", fin_line);
519                                                            return -1;
520                                                    }
521                                            }
522                                            else if (strcmp(p, "screen") == 0)
523                                            {
524                                                    p_menu->screen_show = 1;
525    
526                                                    // Menu screen row
527                                                    q = strtok_r(NULL, MENU_CONF_DELIM_WITH_SPACE, &saveptr);
528                                                    if (q == NULL)
529                                                    {
530                                                            log_error("Error menu screen row in menu config line %d\n", fin_line);
531                                                            return -1;
532                                                    }
533                                                    p = q;
534                                                    while (isdigit(*q))
535                                                    {
536                                                            q++;
537                                                    }
538                                                    if (*q != '\0')
539                                                    {
540                                                            log_error("Error menu screen row in menu config line %d\n", fin_line);
541                                                            return -1;
542                                                    }
543                                                    p_menu->screen_row = (int16_t)atoi(p);
544    
545                                                    // Menu screen col
546                                                    q = strtok_r(NULL, MENU_CONF_DELIM_WITH_SPACE, &saveptr);
547                                                    if (q == NULL)
548                                                    {
549                                                            log_error("Error menu screen col in menu config line %d\n", fin_line);
550                                                            return -1;
551                                                    }
552                                                    p = q;
553                                                    while (isdigit(*q))
554                                                    {
555                                                            q++;
556                                                    }
557                                                    if (*q != '\0')
558                                                    {
559                                                            log_error("Error menu screen col in menu config line %d\n", fin_line);
560                                                            return -1;
561                                                    }
562                                                    p_menu->screen_col = (int16_t)atoi(p);
563    
564                                                    // Menu screen name
565                                                    q = strtok_r(NULL, MENU_CONF_DELIM_WITH_SPACE, &saveptr);
566                                                    if (q == NULL)
567                                                    {
568                                                            log_error("Error menu screen name in menu config line %d\n", fin_line);
569                                                            return -1;
570                                                    }
571                                                    p = q;
572                                                    while (isalnum(*q) || *q == '_' || *q == '-')
573                                                    {
574                                                            q++;
575                                                    }
576                                                    if (*q != '\0')
577                                                    {
578                                                            log_error("Error menu screen name in menu config line %d\n", fin_line);
579                                                            return -1;
580                                                    }
581                                                    strncpy(p_menu->screen_name, p, sizeof(p_menu->screen_name) - 1);
582                                                    p_menu->screen_name[sizeof(p_menu->screen_name) - 1] = '\0';
583    
584                                                    // Check syntax
585                                                    q = strtok_r(NULL, MENU_CONF_DELIM_WITH_SPACE, &saveptr);
586                                                    if (q != NULL)
587                                                    {
588                                                            log_error("Unknown extra content in menu config line %d\n", fin_line);
589                                                            return -1;
590                                                    }
591                                            }
592                                            else if (strcmp(p, "page") == 0)
593                                            {
594                                                    // Menu page row
595                                                    q = strtok_r(NULL, MENU_CONF_DELIM_WITH_SPACE, &saveptr);
596                                                    if (q == NULL)
597                                                    {
598                                                            log_error("Error menu page row in menu config line %d\n", fin_line);
599                                                            return -1;
600                                                    }
601                                                    p = q;
602                                                    while (isdigit(*q))
603                                                    {
604                                                            q++;
605                                                    }
606                                                    if (*q != '\0')
607                                                    {
608                                                            log_error("Error menu page row in menu config line %d\n", fin_line);
609                                                            return -1;
610                                                    }
611                                                    p_menu->page_row = (int16_t)atoi(p);
612    
613                                                    // Menu page col
614                                                    q = strtok_r(NULL, MENU_CONF_DELIM_WITH_SPACE, &saveptr);
615                                                    if (q == NULL)
616                                                    {
617                                                            log_error("Error menu page col in menu config line %d\n", fin_line);
618                                                            return -1;
619                                                    }
620                                                    p = q;
621                                                    while (isdigit(*q))
622                                                    {
623                                                            q++;
624                                                    }
625                                                    if (*q != '\0')
626                                                    {
627                                                            log_error("Error menu page col in menu config line %d\n", fin_line);
628                                                            return -1;
629                                                    }
630                                                    p_menu->page_col = (int16_t)atoi(p);
631    
632                                                    // Menu page item limit
633                                                    q = strtok_r(NULL, MENU_CONF_DELIM_WITH_SPACE, &saveptr);
634                                                    if (q == NULL)
635                                                    {
636                                                            log_error("Error menu page item limit in menu config line %d\n", fin_line);
637                                                            return -1;
638                                                    }
639                                                    p = q;
640                                                    while (isdigit(*q))
641                                                    {
642                                                            q++;
643                                                    }
644                                                    if (*q != '\0')
645                                                    {
646                                                            log_error("Error menu page item limit in menu config line %d\n", fin_line);
647                                                            return -1;
648                                                    }
649                                                    p_menu->page_item_limit = (int16_t)atoi(p);
650    
651                                                    // Check syntax
652                                                    q = strtok_r(NULL, MENU_CONF_DELIM_WITH_SPACE, &saveptr);
653                                                    if (q != NULL)
654                                                    {
655                                                            log_error("Unknown extra content in menu config line %d\n", fin_line);
656                                                            return -1;
657                                                    }
658                                            }
659                                            else if (strcmp(p, "use_filter") == 0)
660                                            {
661                                                    p_menu->use_filter = 1;
662    
663                                                    // Check syntax
664                                                    q = strtok_r(NULL, MENU_CONF_DELIM_WITH_SPACE, &saveptr);
665                                                    if (q != NULL)
666                                                    {
667                                                            log_error("Unknown extra content in menu config line %d\n", fin_line);
668                                                            return -1;
669                                                    }
670                                            }
671                                    }
672                            }
673                            else // BEGIN of menu screen
674                            {
675                                    if (p_menu_set->menu_item_count >= MAX_MENUS)
676                                    {
677                                            log_error("Menu screen count (%d) exceed limit (%d)\n", p_menu_set->menu_screen_count, MAX_MENUS);
678                                            return -3;
679                                    }
680                                    screen_id = (MENU_SCREEN_ID)p_menu_set->menu_screen_count;
681                                    p_menu_set->menu_screen_count++;
682    
683                                    p_screen = get_menu_screen_by_id(p_menu_set, screen_id);
684    
685                                    q = p;
686                                    while (isalnum(*q) || *q == '_' || *q == '-')
687                                    {
688                                            q++;
689                                    }
690                                    if (*q != '\0')
691                                    {
692                                            log_error("Error menu screen name in menu config line %d\n", fin_line);
693                                            return -1;
694                                    }
695                                    strncpy(p_screen->name, p, sizeof(p_screen->name) - 1);
696                                    p_screen->name[sizeof(p_screen->name) - 1] = '\0';
697    
698                                    if (trie_dict_set(p_menu_set->p_menu_screen_dict, p_screen->name, (int64_t)screen_id) != 1)
699                                    {
700                                            log_error("Error set menu screen dict [%s]\n", p_screen->name);
701                                    }
702    
703                                    // Check syntax
704                                    q = strtok_r(NULL, MENU_CONF_DELIM_WITH_SPACE, &saveptr);
705                                    if (q != NULL)
706                                    {
707                                            log_error("Unknown extra content in menu config line %d\n", fin_line);
708                                            return -1;
709                                    }
710    
711                                    p_screen->buf_offset = p_menu_set->p_menu_screen_buf_free - p_menu_set->p_menu_screen_buf;
712                                    p_screen->buf_length = -1;
713    
714                                    // safety appending boundary
715                                    q = p_menu_set->p_menu_screen_buf + MAX_MENU_SCR_BUF_LENGTH * MAX_MENUS - 1;
716    
717                                    while (fgets(buffer, sizeof(buffer), fin))
718                                    {
719                                            fin_line++;
720    
721                                            strncpy(temp, buffer, sizeof(temp) - 1); // Duplicate line for strtok_r
722                                            temp[sizeof(temp) - 1] = '\0';
723                                            p = strtok_r(temp, MENU_CONF_DELIM_WITH_SPACE, &saveptr);
724                                            if (p != NULL && *p == '%') // END of menu screen
725                                            {
726                                                    if (p_menu_set->p_menu_screen_buf_free + 1 > q)
727                                                    {
728                                                            log_error("Menu screen buffer depleted (%p + 1 > %p)\n", p_menu_set->p_menu_screen_buf_free, q);
729                                                            return -3;
730                                                    }
731    
732                                                    *(p_menu_set->p_menu_screen_buf_free) = '\0';
733                                                    p_menu_set->p_menu_screen_buf_free++;
734                                                    p_screen->buf_length = p_menu_set->p_menu_screen_buf_free - p_menu_set->p_menu_screen_buf - p_screen->buf_offset;
735                                                    break;
736                                            }
737    
738                                            // Clear line
739                                            if (p_menu_set->p_menu_screen_buf_free + strlen(CTRL_SEQ_CLR_LINE) > q)
740                                            {
741                                                    log_error("Menu screen buffer depleted (%p + %d > %p)\n", p_menu_set->p_menu_screen_buf_free, q, strlen(CTRL_SEQ_CLR_LINE));
742                                                    return -3;
743                                            }
744                                            p_menu_set->p_menu_screen_buf_free = stpcpy(p_menu_set->p_menu_screen_buf_free, CTRL_SEQ_CLR_LINE);
745    
746                                            p = buffer;
747                                            while (*p != '\0')
748                                            {
749                                                    if (p_menu_set->p_menu_screen_buf_free + 2 > q)
750                                                    {
751                                                            log_error("Menu screen buffer depleted (%p + 2 > %p)\n", p_menu_set->p_menu_screen_buf_free, q);
752                                                            return -3;
753                                                    }
754    
755                                                    if (*p == '\n' && p > buffer && *(p - 1) != '\r')
756                                                    {
757                                                            *(p_menu_set->p_menu_screen_buf_free) = '\r';
758                                                            p_menu_set->p_menu_screen_buf_free++;
759                                                    }
760    
761                                                    *(p_menu_set->p_menu_screen_buf_free) = *p;
762                                                    p++;
763                                                    p_menu_set->p_menu_screen_buf_free++;
764                                            }
765                                    }
766    
767                                    if (p_screen->buf_length == -1)
768                                    {
769                                            log_error("End of menu screen [%s] not found\n", p_screen->name);
770                                    }
771                            }
772                    }
773                    else // Invalid prefix
774                    {
775                            log_error("Error in menu config line %d\n", fin_line);
776                            return -1;
777                    }
778            }
779            fclose(fin);
780    
781            for (menu_id = 0; menu_id < p_menu_set->menu_count; menu_id++)
782            {
783                    p_menu = get_menu_by_id(p_menu_set, menu_id);
784    
785                    if (trie_dict_get(p_menu_set->p_menu_screen_dict, p_menu->screen_name, (int64_t *)(&(p_menu->screen_id))) != 1)
786                    {
787                            log_error("Undefined menu screen [%s]\n", p);
788                            return -1;
789                    }
790    
791                    // Set menu->filter_handler of each menu pointing to filter
792                    if (p_menu->use_filter == 1)
793                    {
794                            if ((p_menu->filter_handler = get_cmd_handler(p_menu->name)) == NULL)
795                            {
796                                    log_error("Undefined menu filter handler [%s]\n", p_menu->name);
797                                    return -1;
798                            }
799                    }
800            }
801    
802            for (menu_item_id = 0; menu_item_id < p_menu_set->menu_item_count; menu_item_id++)
803            {
804                    p_menu_item = get_menu_item_by_id(p_menu_set, menu_item_id);
805    
806    return 0;                  // Set menu_item->action_cmd_handler of each menu item pointing to bbs_cmd
807                    if (p_menu_item->submenu == 0)
808                    {
809                            if ((p_menu_item->action_cmd_handler = get_cmd_handler(p_menu_item->action)) == NULL)
810                            {
811                                    log_error("Undefined menu action cmd handler [%s]\n", p_menu_item->action);
812                                    return -1;
813                            }
814                    }
815                    // Set menu_item->action_menu_id of each menu item pointing to a submenu to the menu_id of the corresponding submenu
816                    else if (strcmp(p_menu_item->action, "..") != 0)
817                    {
818                            if (trie_dict_get(p_menu_set->p_menu_name_dict, p_menu_item->action, (int64_t *)&menu_id) != 1)
819                            {
820                                    log_error("Undefined sub menu id [%s]\n", p_menu_item->action);
821                                    return -1;
822                            }
823                            p_menu_item->action_menu_id = menu_id;
824                    }
825            }
826    
827            // Save status varaibles into reserved memory area
828            *((int16_t *)p_menu_set->p_reserved) = p_menu_set->menu_count;
829            *(((int16_t *)p_menu_set->p_reserved) + 1) = p_menu_set->menu_item_count;
830            *(((int16_t *)p_menu_set->p_reserved) + 2) = p_menu_set->menu_screen_count;
831    
832            return 0;
833  }  }
834    
835  MENU *  int display_menu_cursor(MENU_SET *p_menu_set, int show)
 get_menu (MENU_SET * p_menu_set, const char *menu_name)  
836  {  {
837    int i;          MENU_ID menu_id;
838            MENU_ITEM_ID menu_item_id;
839            MENU *p_menu;
840            MENU_ITEM *p_menu_item;
841            int16_t menu_item_pos;
842    
843            menu_id = p_menu_set->menu_id_path[p_menu_set->choose_step];
844            p_menu = get_menu_by_id(p_menu_set, menu_id);
845            if (p_menu == NULL)
846            {
847                    log_error("get_menu_by_id(%d) return NULL pointer\n", menu_id);
848                    return -1;
849            }
850    
851    for (i = 0; i < p_menu_set->menu_count; i++)          menu_item_pos = p_menu_set->menu_item_pos[p_menu_set->choose_step];
852      {          menu_item_id = p_menu->items[menu_item_pos];
853        if (strcmp (p_menu_set->p_menu[i]->name, menu_name) == 0)          p_menu_item = get_menu_item_by_id(p_menu_set, menu_item_id);
854            if (p_menu_item == NULL)
855          {          {
856            return p_menu_set->p_menu[i];                  log_error("get_menu_item_by_id(%d) return NULL pointer\n", menu_item_id);
857                    return -1;
858            }
859    
860            moveto(p_menu_set->menu_item_r_row[menu_item_pos], p_menu_set->menu_item_r_col[menu_item_pos] - 2);
861            outc(show ? '>' : ' ');
862    
863            return 0;
864    }
865    
866    static int display_menu_current_page(MENU_SET *p_menu_set)
867    {
868            int16_t row = 0;
869            int16_t col = 0;
870            MENU_ID menu_id;
871            MENU_ITEM_ID menu_item_id;
872            MENU *p_menu;
873            MENU_ITEM *p_menu_item;
874            int16_t menu_item_pos;
875            int16_t page_id = 0;
876            MENU_SCREEN *p_menu_screen;
877    
878            menu_id = p_menu_set->menu_id_path[p_menu_set->choose_step];
879            p_menu = get_menu_by_id(p_menu_set, menu_id);
880            if (p_menu == NULL)
881            {
882                    log_error("get_menu_by_id(%d) return NULL pointer\n", menu_id);
883                    return -1;
884            }
885    
886            clrline(p_menu->page_row, p_menu->page_row + p_menu->page_item_limit - 1);
887    
888            if (p_menu->title.show)
889            {
890                    if (p_menu->title.row == 0 && p_menu->title.col == 0)
891                    {
892                            show_top(p_menu->title.text, BBS_name, "");
893                    }
894                    else
895                    {
896                            moveto(p_menu->title.row, p_menu->title.col);
897                            prints("%s", p_menu->title.text);
898                    }
899            }
900    
901            if (p_menu->screen_show)
902            {
903                    p_menu_screen = get_menu_screen_by_id(p_menu_set, p_menu->screen_id);
904                    if (p_menu_screen == NULL)
905                    {
906                            log_error("get_menu_screen_by_id(%d) return NULL pointer\n", p_menu->screen_id);
907                            return -1;
908                    }
909    
910                    row = p_menu->screen_row;
911                    col = p_menu->screen_col;
912    
913                    moveto(row, col);
914                    prints("%s", p_menu_set->p_menu_screen_buf + p_menu_screen->buf_offset);
915            }
916    
917            menu_item_pos = p_menu_set->menu_item_pos[p_menu_set->choose_step];
918            page_id = p_menu_set->menu_item_page_id[menu_item_pos];
919    
920            while (menu_item_pos >= 0)
921            {
922                    if (p_menu_set->menu_item_page_id[menu_item_pos] != page_id)
923                    {
924                            menu_item_pos++;
925                            break;
926                    }
927    
928                    if (menu_item_pos == 0)
929                    {
930                            break;
931                    }
932    
933                    menu_item_pos--;
934            }
935    
936            for (; menu_item_pos < p_menu->item_count; menu_item_pos++)
937            {
938                    if (p_menu_set->menu_item_page_id[menu_item_pos] != page_id)
939                    {
940                            break;
941                    }
942    
943                    menu_item_id = p_menu->items[menu_item_pos];
944                    p_menu_item = get_menu_item_by_id(p_menu_set, menu_item_id);
945    
946                    if (p_menu_set->menu_item_display[menu_item_pos] == 0)
947                    {
948                            continue;
949                    }
950    
951                    row = p_menu_set->menu_item_r_row[menu_item_pos];
952                    col = p_menu_set->menu_item_r_col[menu_item_pos];
953    
954                    moveto(row, col);
955                    prints("%s", p_menu_item->text);
956          }          }
     }  
957    
958    return NULL;          return 0;
959  }  }
960    
961  void  int display_menu(MENU_SET *p_menu_set)
 display_menu_cursor (MENU * p_menu, int show)  
962  {  {
963    moveto ((p_menu->items[p_menu->item_cur_pos])->r_row,          int16_t row = 0;
964            (p_menu->items[p_menu->item_cur_pos])->r_col - 2);          int16_t col = 0;
965    prints (show ? ">" : " ");          int menu_selectable = 0;
966    iflush ();          MENU_ID menu_id;
967            MENU_ITEM_ID menu_item_id;
968            MENU *p_menu;
969            MENU_ITEM *p_menu_item;
970            int16_t menu_item_pos;
971            int16_t page_id = 0;
972            int page_item_count = 0;
973    
974            menu_id = p_menu_set->menu_id_path[p_menu_set->choose_step];
975            p_menu = get_menu_by_id(p_menu_set, menu_id);
976            if (p_menu == NULL)
977            {
978                    log_error("get_menu_by_id(%d) return NULL pointer\n", menu_id);
979                    if (p_menu_set->choose_step > 0)
980                    {
981                            p_menu_set->choose_step--;
982                            return REDRAW;
983                    }
984                    return EXITMENU;
985            }
986    
987            menu_item_pos = p_menu_set->menu_item_pos[p_menu_set->choose_step];
988            menu_item_id = p_menu->items[menu_item_pos];
989            p_menu_item = get_menu_item_by_id(p_menu_set, menu_item_id);
990            if (p_menu_item == NULL)
991            {
992                    log_error("get_menu_item_by_id(%d) return NULL pointer\n", menu_item_id);
993                    return EXITMENU;
994            }
995    
996            if (menu_item_pos > 0 &&
997                    !(p_menu->use_filter ? (p_menu->filter_handler((void *)p_menu_item) == 0)
998                                                             : (checkpriv(&BBS_priv, 0, p_menu_item->priv) == 0 ||
999                                                                    checklevel2(&BBS_priv, p_menu_item->level) == 0)))
1000            {
1001                    menu_selectable = 1;
1002            }
1003    
1004            for (menu_item_pos = 0; menu_item_pos < p_menu->item_count; menu_item_pos++)
1005            {
1006                    menu_item_id = p_menu->items[menu_item_pos];
1007                    p_menu_item = get_menu_item_by_id(p_menu_set, menu_item_id);
1008    
1009                    if (p_menu_item->row != 0)
1010                    {
1011                            row = p_menu_item->row;
1012                    }
1013                    if (p_menu_item->col != 0)
1014                    {
1015                            col = p_menu_item->col;
1016                    }
1017    
1018                    p_menu_set->menu_item_page_id[menu_item_pos] = page_id;
1019    
1020                    if (p_menu->use_filter ? (p_menu->filter_handler((void *)p_menu_item) == 0)
1021                                                               : (checkpriv(&BBS_priv, 0, p_menu_item->priv) == 0 ||
1022                                                                      checklevel2(&BBS_priv, p_menu_item->level) == 0))
1023                    {
1024                            p_menu_set->menu_item_display[menu_item_pos] = 0;
1025                            p_menu_set->menu_item_r_row[menu_item_pos] = 0;
1026                            p_menu_set->menu_item_r_col[menu_item_pos] = 0;
1027                    }
1028                    else
1029                    {
1030                            p_menu_set->menu_item_display[menu_item_pos] = 1;
1031    
1032                            if (!menu_selectable)
1033                            {
1034                                    p_menu_set->menu_item_pos[p_menu_set->choose_step] = menu_item_pos;
1035                                    menu_selectable = 1;
1036                            }
1037    
1038                            p_menu_set->menu_item_r_row[menu_item_pos] = row;
1039                            p_menu_set->menu_item_r_col[menu_item_pos] = col;
1040    
1041                            row++;
1042    
1043                            page_item_count++;
1044                            if (p_menu->page_item_limit > 0 && page_item_count >= p_menu->page_item_limit)
1045                            {
1046                                    page_id++;
1047                                    page_item_count = 0;
1048                                    row = p_menu->page_row;
1049                                    col = p_menu->page_col;
1050                            }
1051                    }
1052            }
1053    
1054            if (!menu_selectable)
1055            {
1056                    moveto(p_menu->screen_row, p_menu->screen_col);
1057                    clrtoeol();
1058                    prints("ûÓпÉÑ¡Ïî");
1059                    press_any_key();
1060                    return -1;
1061            }
1062    
1063            if (display_menu_current_page(p_menu_set) != 0)
1064            {
1065                    return -1;
1066            }
1067    
1068            display_menu_cursor(p_menu_set, 1);
1069    
1070            return 0;
1071  }  }
1072    
1073  int  int menu_control(MENU_SET *p_menu_set, int key)
 display_menu (MENU * p_menu)  
1074  {  {
1075    int i, row, col, menu_selectable = 0;          MENU_ID menu_id;
1076            MENU_ITEM_ID menu_item_id;
1077            MENU *p_menu;
1078            MENU_ITEM *p_menu_item;
1079            int16_t menu_item_pos;
1080            int16_t page_id;
1081            int require_page_change = 0;
1082    
1083    if (p_menu == NULL)          if (p_menu_set->menu_count == 0)
1084      return -1;          {
1085                    log_error("Empty menu set\n");
1086                    return EXITBBS;
1087            }
1088    
1089    show_top (p_menu->title.text);          menu_id = p_menu_set->menu_id_path[p_menu_set->choose_step];
1090            p_menu = get_menu_by_id(p_menu_set, menu_id);
1091            if (p_menu == NULL)
1092            {
1093                    log_error("get_menu_by_id(%d) return NULL pointer\n", menu_id);
1094                    if (p_menu_set->choose_step > 0)
1095                    {
1096                            p_menu_set->choose_step--;
1097                            return REDRAW;
1098                    }
1099                    return EXITBBS;
1100            }
1101    
1102    moveto (p_menu->screen.row, p_menu->screen.col);          if (p_menu->item_count == 0)
1103    if (display_file (p_menu->screen.filename) != 0)          {
1104      log_error ("Display menu screen <%s> failed!\n", p_menu->screen.filename);  #ifdef _DEBUG
1105                    log_error("Empty menu (%s)\n", p_menu->name);
1106    #endif
1107                    if (p_menu_set->choose_step > 0)
1108                    {
1109                            p_menu_set->choose_step--;
1110                            return REDRAW;
1111                    }
1112                    return EXITBBS;
1113            }
1114    
1115    row = p_menu->items[0]->row;          menu_item_pos = p_menu_set->menu_item_pos[p_menu_set->choose_step];
1116    col = p_menu->items[0]->col;          page_id = p_menu_set->menu_item_page_id[menu_item_pos];
1117    
1118    for (i = 0; i < p_menu->item_count; i++)          menu_item_id = p_menu->items[menu_item_pos];
1119      {          p_menu_item = get_menu_item_by_id(p_menu_set, menu_item_id);
1120        if (checkpriv (&BBS_priv, 0, p_menu->items[i]->priv) == 0          if (p_menu_item == NULL)
         || checklevel (&BBS_priv, p_menu->items[i]->level) == 0)  
1121          {          {
1122            p_menu->items[i]->display = 0;                  log_error("get_menu_item_by_id(%d) return NULL pointer\n", menu_item_id);
1123                    p_menu_set->menu_item_pos[p_menu_set->choose_step] = 0;
1124                    return REDRAW;
1125          }          }
1126        else  
1127            switch (key)
1128          {          {
1129            p_menu->items[i]->display = 1;          case CR:
1130                    igetch_reset();
1131            case KEY_RIGHT:
1132                    if (p_menu_item->submenu)
1133                    {
1134                            if (strcmp(p_menu_item->action, "..") == 0)
1135                            {
1136                                    return menu_control(p_menu_set, KEY_LEFT);
1137                            }
1138                            p_menu_set->choose_step++;
1139                            p_menu_set->menu_id_path[p_menu_set->choose_step] = p_menu_item->action_menu_id;
1140                            p_menu_set->menu_item_pos[p_menu_set->choose_step] = 0;
1141    
1142                            if (display_menu(p_menu_set) != 0)
1143                            {
1144                                    return menu_control(p_menu_set, KEY_LEFT);
1145                            }
1146                    }
1147                    else
1148                    {
1149                            return ((*(p_menu_item->action_cmd_handler))((void *)(p_menu_item->name)));
1150                    }
1151                    break;
1152            case KEY_ESC:
1153            case KEY_LEFT:
1154                    if (p_menu_set->choose_step > 0)
1155                    {
1156                            p_menu_set->choose_step--;
1157                            if (p_menu_set->choose_step == 0)
1158                            {
1159                                    return REDRAW;
1160                            }
1161                            if (display_menu(p_menu_set) != 0)
1162                            {
1163                                    return menu_control(p_menu_set, KEY_LEFT);
1164                            }
1165                    }
1166                    else
1167                    {
1168                            if (p_menu_set->allow_exit)
1169                            {
1170                                    return EXITMENU;
1171                            }
1172    
1173                            display_menu_cursor(p_menu_set, 0);
1174                            menu_item_pos = p_menu->item_count - 1;
1175                            while (menu_item_pos >= 0)
1176                            {
1177                                    menu_item_id = p_menu->items[menu_item_pos];
1178                                    p_menu_item = get_menu_item_by_id(p_menu_set, menu_item_id);
1179                                    if (p_menu_item == NULL)
1180                                    {
1181                                            log_error("get_menu_item_by_id(%d) return NULL pointer\n", menu_item_id);
1182                                            return -1;
1183                                    }
1184    
1185                                    if (!p_menu_set->menu_item_display[menu_item_pos] || p_menu_item->priv != 0 || p_menu_item->level != 0)
1186                                    {
1187                                            menu_item_pos--;
1188                                    }
1189                                    else
1190                                    {
1191                                            break;
1192                                    }
1193                            }
1194                            p_menu_set->menu_item_pos[p_menu_set->choose_step] = menu_item_pos;
1195                            display_menu_cursor(p_menu_set, 1);
1196                    }
1197                    break;
1198            case KEY_PGUP:
1199                    require_page_change = 1;
1200            case KEY_UP:
1201                    display_menu_cursor(p_menu_set, 0);
1202                    do
1203                    {
1204                            menu_item_pos--;
1205                            if (menu_item_pos < 0)
1206                            {
1207                                    menu_item_pos = p_menu->item_count - 1;
1208                                    require_page_change = 0;
1209                            }
1210                            menu_item_id = p_menu->items[menu_item_pos];
1211                            p_menu_item = get_menu_item_by_id(p_menu_set, menu_item_id);
1212                            if (p_menu_item == NULL)
1213                            {
1214                                    log_error("get_menu_item_by_id(%d) return NULL pointer\n", menu_item_id);
1215                                    return -1;
1216                            }
1217                            if (require_page_change && p_menu_set->menu_item_page_id[menu_item_pos] != page_id)
1218                            {
1219                                    require_page_change = 0;
1220                            }
1221                    } while (require_page_change || !p_menu_set->menu_item_display[menu_item_pos]);
1222                    p_menu_set->menu_item_pos[p_menu_set->choose_step] = menu_item_pos;
1223                    if (p_menu_set->menu_item_page_id[menu_item_pos] != page_id)
1224                    {
1225                            display_menu_current_page(p_menu_set);
1226                    }
1227                    display_menu_cursor(p_menu_set, 1);
1228                    break;
1229            case KEY_PGDN:
1230                    require_page_change = 1;
1231            case KEY_DOWN:
1232                    display_menu_cursor(p_menu_set, 0);
1233                    do
1234                    {
1235                            menu_item_pos++;
1236                            if (menu_item_pos >= p_menu->item_count)
1237                            {
1238                                    menu_item_pos = 0;
1239                                    require_page_change = 0;
1240                            }
1241                            menu_item_id = p_menu->items[menu_item_pos];
1242                            p_menu_item = get_menu_item_by_id(p_menu_set, menu_item_id);
1243                            if (p_menu_item == NULL)
1244                            {
1245                                    log_error("get_menu_item_by_id(%d) return NULL pointer\n", menu_item_id);
1246                                    return -1;
1247                            }
1248                            if (require_page_change && p_menu_set->menu_item_page_id[menu_item_pos] != page_id)
1249                            {
1250                                    require_page_change = 0;
1251                            }
1252                    } while (require_page_change || !p_menu_set->menu_item_display[menu_item_pos]);
1253                    p_menu_set->menu_item_pos[p_menu_set->choose_step] = menu_item_pos;
1254                    if (p_menu_set->menu_item_page_id[menu_item_pos] != page_id)
1255                    {
1256                            display_menu_current_page(p_menu_set);
1257                    }
1258                    display_menu_cursor(p_menu_set, 1);
1259                    break;
1260            case KEY_HOME:
1261                    display_menu_cursor(p_menu_set, 0);
1262                    menu_item_pos = 0;
1263                    while (menu_item_pos < p_menu->item_count - 1)
1264                    {
1265                            menu_item_id = p_menu->items[menu_item_pos];
1266                            p_menu_item = get_menu_item_by_id(p_menu_set, menu_item_id);
1267                            if (p_menu_item == NULL)
1268                            {
1269                                    log_error("get_menu_item_by_id(%d) return NULL pointer\n", menu_item_id);
1270                                    return -1;
1271                            }
1272    
1273                            if (p_menu_set->menu_item_display[menu_item_pos])
1274                            {
1275                                    break;
1276                            }
1277    
1278            menu_selectable = 1;                          menu_item_pos++;
1279                    }
1280                    p_menu_set->menu_item_pos[p_menu_set->choose_step] = menu_item_pos;
1281                    if (p_menu_set->menu_item_page_id[menu_item_pos] != page_id)
1282                    {
1283                            display_menu_current_page(p_menu_set);
1284                    }
1285                    display_menu_cursor(p_menu_set, 1);
1286                    break;
1287            case KEY_END:
1288                    display_menu_cursor(p_menu_set, 0);
1289                    menu_item_pos = p_menu->item_count - 1;
1290                    while (menu_item_pos > 0)
1291                    {
1292                            menu_item_id = p_menu->items[menu_item_pos];
1293                            p_menu_item = get_menu_item_by_id(p_menu_set, menu_item_id);
1294                            if (p_menu_item == NULL)
1295                            {
1296                                    log_error("get_menu_item_by_id(%d) return NULL pointer\n", menu_item_id);
1297                                    return -1;
1298                            }
1299    
1300                            if (p_menu_set->menu_item_display[menu_item_pos])
1301                            {
1302                                    break;
1303                            }
1304    
1305            if (p_menu->items[i]->row != 0)                          menu_item_pos--;
1306              row = p_menu->items[i]->row;                  }
1307            else                  p_menu_set->menu_item_pos[p_menu_set->choose_step] = menu_item_pos;
1308              row++;                  if (p_menu_set->menu_item_page_id[menu_item_pos] != page_id)
1309            p_menu->items[i]->r_row = row;                  {
1310            if (p_menu->items[i]->col != 0)                          display_menu_current_page(p_menu_set);
1311              col = p_menu->items[i]->col;                  }
1312            p_menu->items[i]->r_col = col;                  display_menu_cursor(p_menu_set, 1);
1313            moveto (row, col);                  break;
1314            prints (p_menu->items[i]->text);          default:
1315            iflush ();                  if (isalnum(key))
1316                    {
1317                            for (menu_item_pos = 0; menu_item_pos < p_menu->item_count; menu_item_pos++)
1318                            {
1319                                    menu_item_id = p_menu->items[menu_item_pos];
1320                                    p_menu_item = get_menu_item_by_id(p_menu_set, menu_item_id);
1321                                    if (p_menu_item == NULL)
1322                                    {
1323                                            log_error("get_menu_item_by_id(%d) return NULL pointer\n", menu_item_id);
1324                                            return -1;
1325                                    }
1326    
1327                                    if (toupper(key) == toupper(p_menu_item->name[0]) && p_menu_set->menu_item_display[menu_item_pos])
1328                                    {
1329                                            display_menu_cursor(p_menu_set, 0);
1330                                            p_menu_set->menu_item_pos[p_menu_set->choose_step] = menu_item_pos;
1331                                            if (p_menu_set->menu_item_page_id[menu_item_pos] != page_id)
1332                                            {
1333                                                    display_menu_current_page(p_menu_set);
1334                                            }
1335                                            display_menu_cursor(p_menu_set, 1);
1336                                            break;
1337                                    }
1338                            }
1339                    }
1340                    break;
1341          }          }
     }  
1342    
1343    if (!menu_selectable)          return NOREDRAW;
1344      return -1;  }
1345    
1346    display_menu_cursor (p_menu, 1);  int unload_menu(MENU_SET *p_menu_set)
1347    {
1348            int shmid;
1349    
1350    return 0;          if (p_menu_set == NULL)
1351            {
1352                    return -1;
1353            }
1354    
1355            if (p_menu_set->p_menu_name_dict != NULL)
1356            {
1357                    trie_dict_destroy(p_menu_set->p_menu_name_dict);
1358                    p_menu_set->p_menu_name_dict = NULL;
1359            }
1360    
1361            if (p_menu_set->p_menu_screen_dict != NULL)
1362            {
1363                    trie_dict_destroy(p_menu_set->p_menu_screen_dict);
1364                    p_menu_set->p_menu_screen_dict = NULL;
1365            }
1366    
1367            shmid = p_menu_set->shmid;
1368    
1369            detach_menu_shm(p_menu_set);
1370    
1371            if (shmctl(shmid, IPC_RMID, NULL) == -1)
1372            {
1373                    log_error("shmctl(shmid=%d, IPC_RMID) error (%d)\n", shmid, errno);
1374                    return -1;
1375            }
1376    
1377            return 0;
1378  }  }
1379    
1380  int  int get_menu_shm_readonly(MENU_SET *p_menu_set)
 display_current_menu (MENU_SET * p_menu_set)  
1381  {  {
1382    MENU *p_menu;          void *p_shm;
1383    
1384    p_menu = p_menu_set->p_menu_select[p_menu_set->menu_select_depth];          p_shm = shmat(p_menu_set->shmid, NULL, SHM_RDONLY);
1385            if (p_shm == (void *)-1)
1386            {
1387                    log_error("shmat(menu_shm shmid = %d) error (%d)\n", p_menu_set->shmid, errno);
1388                    return -1;
1389            }
1390    
1391            p_menu_set->p_reserved = p_shm;
1392            p_menu_set->p_menu_pool = p_menu_set->p_reserved + MENU_SET_RESERVED_LENGTH;
1393            p_menu_set->p_menu_item_pool = p_menu_set->p_menu_pool + sizeof(MENU) * MAX_MENUS;
1394            p_menu_set->p_menu_screen_pool = p_menu_set->p_menu_item_pool + sizeof(MENU_ITEM) * MAX_MENUITEMS;
1395            p_menu_set->p_menu_screen_buf = p_menu_set->p_menu_screen_pool + sizeof(MENU_SCREEN) * MAX_MENUS;
1396            p_menu_set->p_menu_screen_buf_free = p_menu_set->p_menu_screen_buf;
1397    
1398    return display_menu (p_menu);          return 0;
1399  }  }
1400    
1401  const char *  int set_menu_shm_readonly(MENU_SET *p_menu_set)
 menu_control (MENU_SET * p_menu_set, int key)  
1402  {  {
1403    int i;          void *p_shm;
1404    MENU *p_menu;  
1405            // Remap shared memory in read-only mode
1406            p_shm = shmat(p_menu_set->shmid, p_menu_set->p_reserved, SHM_RDONLY | SHM_REMAP);
1407            if (p_shm == (void *)-1)
1408            {
1409                    log_error("shmat(menu_shm shmid = %d) error (%d)\n", p_menu_set->shmid, errno);
1410                    return -1;
1411            }
1412    
1413    if (p_menu_set->menu_count == 0)          p_menu_set->p_reserved = p_shm;
     return "";  
1414    
1415    p_menu = p_menu_set->p_menu_select[p_menu_set->menu_select_depth];          return 0;
1416    }
1417    
1418    int detach_menu_shm(MENU_SET *p_menu_set)
1419    {
1420            p_menu_set->menu_count = 0;
1421            p_menu_set->menu_item_count = 0;
1422            p_menu_set->menu_screen_count = 0;
1423            p_menu_set->choose_step = 0;
1424    
1425            p_menu_set->p_menu_pool = NULL;
1426            p_menu_set->p_menu_item_pool = NULL;
1427            p_menu_set->p_menu_screen_pool = NULL;
1428            p_menu_set->p_menu_screen_buf = NULL;
1429            p_menu_set->p_menu_screen_buf_free = NULL;
1430    
1431    switch (key)          p_menu_set->p_menu_name_dict = NULL;
1432      {          p_menu_set->p_menu_screen_dict = NULL;
1433      case CR:  
1434      case KEY_RIGHT:          if (p_menu_set->p_reserved != NULL && shmdt(p_menu_set->p_reserved) == -1)
1435        if (p_menu->items[p_menu->item_cur_pos]->submenu)          {
1436          {                  log_error("shmdt() error (%d)\n", errno);
1437            if (strcmp (p_menu->items[p_menu->item_cur_pos]->action, "..") == 0)                  return -1;
             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--;  
           if (display_current_menu (p_menu_set) != 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->items[p_menu->item_cur_pos]->priv != 0  
             || p_menu->items[p_menu->item_cur_pos]->level != 0)  
             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;  
             }  
1438          }          }
     }  
1439    
1440    return "";          p_menu_set->p_reserved = NULL;
1441    
1442            return 0;
1443  }  }


Legend:
Removed lines/characters  
Changed lines/characters
  Added lines/characters

webmaster@leafok.com
ViewVC Help
Powered by ViewVC 1.3.0-beta1