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


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

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