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


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

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