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

Legend:
Removed lines/characters  
Changed lines/characters
  Added lines/characters
webmaster@leafok.com
 ViewVC Help
Powered by ViewVC 1.3.0-beta1