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

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