/[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.19 by sysadm, Sat May 7 12:08:28 2005 UTC Revision 1.33 by sysadm, Thu May 8 15:24:59 2025 UTC
# Line 1  Line 1 
1  /***************************************************************************  /***************************************************************************
2                            menu.c  -  description                                                    menu.c  -  description
3                               -------------------                                                           -------------------
4      begin                : Wed Mar 16 2004          Copyright            : (C) 2004-2025 by Leaflet
5      copyright            : (C) 2005 by Leaflet          Email                : leaflet@leafok.com
     email                : leaflet@leafok.com  
6   ***************************************************************************/   ***************************************************************************/
7    
8  /***************************************************************************  /***************************************************************************
9   *                                                                         *   *                                                                         *
10   *   This program is free software; you can redistribute it and/or modify  *   *   This program is free software; you can redistribute it and/or modify  *
11   *   it under the terms of the GNU General Public License as published by  *   *   it under the terms of the GNU General Public License as published by  *
12   *   the Free Software Foundation; either version 2 of the License, or     *   *   the Free Software Foundation; either version 3 of the License, or     *
13   *   (at your option) any later version.                                   *   *   (at your option) any later version.                                   *
14   *                                                                         *   *                                                                         *
15   ***************************************************************************/   ***************************************************************************/
16    
17  #include "bbs.h"  #include "bbs.h"
18  #include "bbs_cmd.h"  #include "bbs_cmd.h"
19    #include "user_priv.h"
20    #include "reg_ex.h"
21    #include "bbs_cmd.h"
22  #include "menu.h"  #include "menu.h"
23    #include "log.h"
24  #include "io.h"  #include "io.h"
25    #include "screen.h"
26  #include "common.h"  #include "common.h"
27    #include <string.h>
28  #include <stdio.h>  #include <stdio.h>
29  #include <ctype.h>  #include <ctype.h>
 #include <regex.h>  
30  #include <stdlib.h>  #include <stdlib.h>
31    
32    #define MENU_SCREEN_PATH_PREFIX "var/MENU_SCR_"
33    #define MENU_CONF_DELIM_WITH_SPACE " ,\t\r\n"
34    #define MENU_CONF_DELIM_WITHOUT_SPACE "\r\n"
35    
36  MENU_SET bbs_menu;  MENU_SET bbs_menu;
37    
38  int  int load_menu(MENU_SET *p_menu_set, const char *conf_file)
 load_menu (MENU_SET * p_menu_set, const char *conf_file)  
39  {  {
40    FILE *fin, *fout;          FILE *fin, *fout;
41    int i = 0, j;          int fin_line = 0;
42    char buffer[256], screen_filename[256], temp[256];          int i = 0;
43    regmatch_t pmatch[10];          int j = 0;
44            char buffer[LINE_BUFFER_LEN];
45    if ((fin = fopen (conf_file, "r")) == NULL)          char temp[LINE_BUFFER_LEN];
46      {          char screen_filename[FILE_PATH_LEN];
47        log_error ("Open %s failed", conf_file);          char *p = NULL;
48        return -1;          char *q = NULL;
49      }          char *saveptr = NULL;
50            MENU *p_menu = NULL;
51    strcpy (p_menu_set->conf_file, conf_file);          MENU_ITEM *p_item = NULL;
52    
53    while (fgets (buffer, 255, fin))          p_menu_set->menu_count = 0;
54      {  
55        switch (buffer[0])          if ((fin = fopen(conf_file, "r")) == NULL)
56          {          {
57          case '#':                  log_error("Open %s failed", conf_file);
58            break;                  return -2;
59          case '%':          }
60            if (ireg ("^%S_([A-Za-z0-9_]+)", buffer, 2, pmatch) == 0)  
61              {          strncpy(p_menu_set->conf_file, conf_file, sizeof(p_menu_set->conf_file) - 1);
62                strncpy (temp, buffer + pmatch[1].rm_so,          p_menu_set->conf_file[sizeof(p_menu_set->conf_file) - 1] = '\0';
63                         pmatch[1].rm_eo - pmatch[1].rm_so);  
64                temp[pmatch[1].rm_eo - pmatch[1].rm_so] = '\0';          while (fgets(buffer, sizeof(buffer), fin))
65                sprintf (screen_filename, "%sMENU_SCR_%s", app_temp_dir, temp);          {
66                    fin_line++;
67                if ((fout = fopen (screen_filename, "w")) == NULL)  
68                  {                  p = strtok_r(buffer, MENU_CONF_DELIM_WITH_SPACE, &saveptr);
69                    log_error ("Open %s failed", screen_filename);                  if (p == NULL) // Blank line
70                    return -2;                  {
71                  }                          continue;
72                    }
73                while (fgets (buffer, 255, fin))  
74                  {                  if (*p == '#' || *p == '\r' || *p == '\n') // Comment or blank line
75                    if (buffer[0] != '%')                  {
76                      fputs (buffer, fout);                          continue;
77                    else                  }
78                      break;  
79                  }                  if (*p == '%')
80                    {
81                fclose (fout);                          p++;
               break;  
             }  
   
           if (ireg ("^%menu ([A-Za-z0-9_]+)", buffer, 2, pmatch) == 0)  
             {  
               p_menu_set->p_menu[i] = malloc (sizeof (MENU));  
               p_menu_set->p_menu[i]->title.show = 0;  
               p_menu_set->p_menu[i]->screen.show = 0;  
   
               strncpy (p_menu_set->p_menu[i]->name,  
                        buffer + pmatch[1].rm_so,  
                        pmatch[1].rm_eo - pmatch[1].rm_so);  
               p_menu_set->p_menu[i]->name[pmatch[1].rm_eo - pmatch[1].rm_so] =  
                 '\0';  
   
               j = 0;  
   
               while (fgets (buffer, 255, fin))  
                 {  
                   if (buffer[0] == '#')  
                     {  
                       continue;  
                     }  
                   if (buffer[0] == '%')  
                     {  
                       p_menu_set->p_menu[i]->item_count = j;  
                       p_menu_set->p_menu[i]->item_cur_pos = 0;  
                       i++;  
                       break;  
                     }  
                   if (ireg ("^!([A-Za-z0-9_.]+)[[:space:]]*([0-9]+),"  
                             "[[:space:]]*([0-9]+),[[:space:]]*([0-9]+),"  
                             "[[:space:]]*([0-9]+),[[:space:]]*\"([^\"]+)\","  
                             "[[:space:]]*\"([^\"]+)\"",  
                             buffer, 8, pmatch) == 0)  
                     {  
                       p_menu_set->p_menu[i]->items[j] =  
                         malloc (sizeof (MENU_ITEM));  
                       p_menu_set->p_menu[i]->items[j]->submenu = 1;  
                       strncpy (p_menu_set->p_menu[i]->items[j]->action,  
                                buffer + pmatch[1].rm_so,  
                                pmatch[1].rm_eo - pmatch[1].rm_so);  
                       p_menu_set->p_menu[i]->items[j]->action[pmatch[1].  
                                                               rm_eo -  
                                                               pmatch[1].  
                                                               rm_so] = '\0';  
                       strncpy (temp, buffer + pmatch[2].rm_so,  
                                pmatch[2].rm_eo - pmatch[2].rm_so);  
                       temp[pmatch[2].rm_eo - pmatch[2].rm_so] = '\0';  
                       p_menu_set->p_menu[i]->items[j]->row = atoi (temp);  
                       strncpy (temp,  
                                buffer + pmatch[3].rm_so,  
                                pmatch[3].rm_eo - pmatch[3].rm_so);  
                       temp[pmatch[3].rm_eo - pmatch[3].rm_so] = '\0';  
                       p_menu_set->p_menu[i]->items[j]->col = atoi (temp);  
                       strncpy (temp,  
                                buffer + pmatch[4].rm_so,  
                                pmatch[4].rm_eo - pmatch[4].rm_so);  
                       temp[pmatch[4].rm_eo - pmatch[4].rm_so] = '\0';  
                       p_menu_set->p_menu[i]->items[j]->priv = atoi (temp);  
                       strncpy (temp,  
                                buffer + pmatch[5].rm_so,  
                                pmatch[5].rm_eo - pmatch[5].rm_so);  
                       temp[pmatch[5].rm_eo - pmatch[5].rm_so] = '\0';  
                       p_menu_set->p_menu[i]->items[j]->level = atoi (temp);  
                       strncpy (p_menu_set->p_menu[i]->items[j]->name,  
                                buffer + pmatch[6].rm_so,  
                                pmatch[6].rm_eo - pmatch[6].rm_so);  
                       p_menu_set->p_menu[i]->items[j]->name[pmatch[6].rm_eo -  
                                                             pmatch[6].rm_so] =  
                         '\0';  
                       strncpy (p_menu_set->p_menu[i]->items[j]->text,  
                                buffer + pmatch[7].rm_so,  
                                pmatch[7].rm_eo - pmatch[7].rm_so);  
                       p_menu_set->p_menu[i]->items[j]->text[pmatch[7].rm_eo -  
                                                             pmatch[7].rm_so] =  
                         '\0';  
                       j++;  
                       continue;  
                     }  
                   if (ireg ("^@([A-Za-z0-9_]+)[[:space:]]*([0-9]+),"  
                             "[[:space:]]*([0-9]+),[[:space:]]*([0-9]+),"  
                             "[[:space:]]*([0-9]+),[[:space:]]*\"([^\"]+)\","  
                             "[[:space:]]*\"([^\"]+)\"",  
                             buffer, 8, pmatch) == 0)  
                     {  
                       p_menu_set->p_menu[i]->items[j] =  
                         malloc (sizeof (MENU_ITEM));  
                       p_menu_set->p_menu[i]->items[j]->submenu = 0;  
                       strncpy (p_menu_set->p_menu[i]->items[j]->action,  
                                buffer + pmatch[1].rm_so,  
                                pmatch[1].rm_eo - pmatch[1].rm_so);  
                       p_menu_set->p_menu[i]->items[j]->action[pmatch[1].  
                                                               rm_eo -  
                                                               pmatch[1].  
                                                               rm_so] = '\0';  
                       strncpy (temp, buffer + pmatch[2].rm_so,  
                                pmatch[2].rm_eo - pmatch[2].rm_so);  
                       temp[pmatch[2].rm_eo - pmatch[2].rm_so] = '\0';  
                       p_menu_set->p_menu[i]->items[j]->row = atoi (temp);  
                       strncpy (temp,  
                                buffer + pmatch[3].rm_so,  
                                pmatch[3].rm_eo - pmatch[3].rm_so);  
                       temp[pmatch[3].rm_eo - pmatch[3].rm_so] = '\0';  
                       p_menu_set->p_menu[i]->items[j]->col = atoi (temp);  
                       strncpy (temp,  
                                buffer + pmatch[4].rm_so,  
                                pmatch[4].rm_eo - pmatch[4].rm_so);  
                       temp[pmatch[4].rm_eo - pmatch[4].rm_so] = '\0';  
                       p_menu_set->p_menu[i]->items[j]->priv = atoi (temp);  
                       strncpy (temp,  
                                buffer + pmatch[5].rm_so,  
                                pmatch[5].rm_eo - pmatch[5].rm_so);  
                       temp[pmatch[5].rm_eo - pmatch[5].rm_so] = '\0';  
                       p_menu_set->p_menu[i]->items[j]->level = atoi (temp);  
                       strncpy (p_menu_set->p_menu[i]->items[j]->name,  
                                buffer + pmatch[6].rm_so,  
                                pmatch[6].rm_eo - pmatch[6].rm_so);  
                       p_menu_set->p_menu[i]->items[j]->name[pmatch[6].rm_eo -  
                                                             pmatch[6].rm_so] =  
                         '\0';  
                       strncpy (p_menu_set->p_menu[i]->items[j]->text,  
                                buffer + pmatch[7].rm_so,  
                                pmatch[7].rm_eo - pmatch[7].rm_so);  
                       p_menu_set->p_menu[i]->items[j]->text[pmatch[7].rm_eo -  
                                                             pmatch[7].rm_so] =  
                         '\0';  
                       j++;  
                       continue;  
                     }  
                   if (ireg ("^title[[:space:]]*([0-9]+),"  
                             "[[:space:]]*([0-9]+),[[:space:]]*\"([^\"]+)\"",  
                             buffer, 4, pmatch) == 0)  
                     {  
                       p_menu_set->p_menu[i]->title.show = 1;  
                       strncpy (temp,  
                                buffer + pmatch[1].rm_so,  
                                pmatch[1].rm_eo - pmatch[1].rm_so);  
                       temp[pmatch[1].rm_eo - pmatch[1].rm_so] = '\0';  
                       p_menu_set->p_menu[i]->title.row = atoi (temp);  
                       strncpy (temp,  
                                buffer + pmatch[2].rm_so,  
                                pmatch[2].rm_eo - pmatch[2].rm_so);  
                       temp[pmatch[2].rm_eo - pmatch[2].rm_so] = '\0';  
                       p_menu_set->p_menu[i]->title.col = atoi (temp);  
                       strncpy (p_menu_set->p_menu[i]->title.text,  
                                buffer + pmatch[3].rm_so,  
                                pmatch[3].rm_eo - pmatch[3].rm_so);  
                       p_menu_set->p_menu[i]->title.text[pmatch[3].rm_eo -  
                                                         pmatch[3].rm_so] =  
                         '\0';  
                       continue;  
                     }  
                   if (ireg ("^screen[[:space:]]*([0-9]+),"  
                             "[[:space:]]*([0-9]+),[[:space:]]*S_([A-Za-z0-9_]+)",  
                             buffer, 4, pmatch) == 0)  
                     {  
                       p_menu_set->p_menu[i]->screen.show = 1;  
                       strncpy (temp,  
                                buffer + pmatch[1].rm_so,  
                                pmatch[1].rm_eo - pmatch[1].rm_so);  
                       temp[pmatch[1].rm_eo - pmatch[1].rm_so] = '\0';  
                       p_menu_set->p_menu[i]->screen.row = atoi (temp);  
                       strncpy (temp,  
                                buffer + pmatch[2].rm_so,  
                                pmatch[2].rm_eo - pmatch[2].rm_so);  
                       temp[pmatch[2].rm_eo - pmatch[2].rm_so] = '\0';  
                       p_menu_set->p_menu[i]->screen.col = atoi (temp);  
                       strncpy (temp,  
                                buffer + pmatch[3].rm_so,  
                                pmatch[3].rm_eo - pmatch[3].rm_so);  
                       temp[pmatch[3].rm_eo - pmatch[3].rm_so] = '\0';  
                       sprintf (p_menu_set->p_menu[i]->screen.filename,  
                                "%sMENU_SCR_%s", app_temp_dir, temp);  
                       continue;  
                     }  
                 }  
             }  
           break;  
         }  
     }  
   fclose (fin);  
   
   p_menu_set->menu_count = i;  
   p_menu_set->menu_select_depth = 0;  
   p_menu_set->p_menu_select[p_menu_set->menu_select_depth]  
     = (i == 0 ? NULL : p_menu_set->p_menu[0]);  
82    
83    return 0;                          if (strcmp(p, "menu") == 0) // BEGIN of sub-menu
84                            {
85                                    if (p_menu != NULL)
86                                    {
87                                            log_error("Incomplete menu definition in menu config line %d\n", fin_line);
88                                            return -1;
89                                    }
90                                    p_menu = (MENU *)malloc(sizeof(MENU));
91                                    if (p_menu == NULL)
92                                    {
93                                            log_error("Unable to allocate memory for menu\n");
94                                            return -3;
95                                    }
96                                    p_menu_set->p_menu[i] = p_menu;
97                                    i++;
98                                    p_menu_set->menu_count = i;
99    
100                                    j = 0; // Menu item counter
101                                    p_menu->item_count = 0;
102                                    p_menu->item_cur_pos = 0;
103                                    p_menu->title.show = 0;
104                                    p_menu->screen.show = 0;
105    
106                                    q = strtok_r(NULL, MENU_CONF_DELIM_WITH_SPACE, &saveptr);
107                                    if (q == NULL)
108                                    {
109                                            log_error("Error menu name in menu config line %d\n", fin_line);
110                                            return -1;
111                                    }
112                                    p = q;
113                                    while (isalnum(*q) || *q == '_')
114                                    {
115                                            q++;
116                                    }
117                                    if (*q != '\0')
118                                    {
119                                            log_error("Error menu name in menu config line %d\n", fin_line);
120                                            return -1;
121                                    }
122    
123                                    if (q - p > sizeof(p_menu->name) - 1)
124                                    {
125                                            log_error("Too longer menu name in menu config line %d\n", fin_line);
126                                            return -1;
127                                    }
128                                    strncpy(p_menu->name, p, sizeof(p_menu->name) - 1);
129                                    p_menu->name[sizeof(p_menu->name) - 1] = '\0';
130    
131                                    // Check syntax
132                                    q = strtok_r(NULL, MENU_CONF_DELIM_WITH_SPACE, &saveptr);
133                                    if (q != NULL)
134                                    {
135                                            log_error("Unknown extra content in menu config line %d\n", fin_line);
136                                            return -1;
137                                    }
138    
139                                    while (fgets(buffer, sizeof(buffer), fin))
140                                    {
141                                            fin_line++;
142    
143                                            p = strtok_r(buffer, MENU_CONF_DELIM_WITH_SPACE, &saveptr);
144                                            if (p == NULL) // Blank line
145                                            {
146                                                    continue;
147                                            }
148    
149                                            if (*p == '#' || *p == '\r' || *p == '\n') // Comment or blank line
150                                            {
151                                                    continue;
152                                            }
153    
154                                            if (*p == '%') // END of sub-menu
155                                            {
156                                                    p_menu = NULL;
157                                                    break;
158                                            }
159                                            else if (*p == '!' || *p == '@')
160                                            {
161                                                    // BEGIN of menu item
162                                                    p_item = (MENU_ITEM *)malloc(sizeof(MENU_ITEM));
163                                                    if (p_item == NULL)
164                                                    {
165                                                            log_error("Unable to allocate memory for menu item\n");
166                                                            return -3;
167                                                    }
168                                                    p_menu->items[j] = p_item;
169                                                    j++;
170                                                    p_menu->item_count = j;
171    
172                                                    p_item->submenu = (*p == '!' ? 1 : 0);
173    
174                                                    // Menu item action
175                                                    p++;
176                                                    if (strcmp(p, "..") == 0) // Return to parent menu
177                                                    {
178                                                            q = p + 2; // strlen("..")
179                                                    }
180                                                    else
181                                                    {
182                                                            q = p;
183                                                            while (isalnum(*q) || *q == '_')
184                                                            {
185                                                                    q++;
186                                                            }
187                                                            if (*q != '\0')
188                                                            {
189                                                                    log_error("Error menu item action in menu config line %d\n", fin_line);
190                                                                    return -1;
191                                                            }
192                                                    }
193    
194                                                    if (q - p > sizeof(p_item->action) - 1)
195                                                    {
196                                                            log_error("Too longer menu action in menu config line %d\n", fin_line);
197                                                            return -1;
198                                                    }
199                                                    strncpy(p_item->action, p, sizeof(p_item->action) - 1);
200                                                    p_item->action[sizeof(p_item->action) - 1] = '\0';
201    
202                                                    // Menu item row
203                                                    q = strtok_r(NULL, MENU_CONF_DELIM_WITH_SPACE, &saveptr);
204                                                    if (q == NULL)
205                                                    {
206                                                            log_error("Error menu item row in menu config line %d\n", fin_line);
207                                                            return -1;
208                                                    }
209                                                    p = q;
210                                                    while (isdigit(*q))
211                                                    {
212                                                            q++;
213                                                    }
214                                                    if (*q != '\0')
215                                                    {
216                                                            log_error("Error menu item row in menu config line %d\n", fin_line);
217                                                            return -1;
218                                                    }
219                                                    p_item->row = atoi(p);
220    
221                                                    // Menu item col
222                                                    q = strtok_r(NULL, MENU_CONF_DELIM_WITH_SPACE, &saveptr);
223                                                    if (q == NULL)
224                                                    {
225                                                            log_error("Error menu item col in menu config line %d\n", fin_line);
226                                                            return -1;
227                                                    }
228                                                    p = q;
229                                                    while (isdigit(*q))
230                                                    {
231                                                            q++;
232                                                    }
233                                                    if (*q != '\0')
234                                                    {
235                                                            log_error("Error menu item col in menu config line %d\n", fin_line);
236                                                            return -1;
237                                                    }
238                                                    p_item->col = atoi(p);
239    
240                                                    // Menu item priv
241                                                    q = strtok_r(NULL, MENU_CONF_DELIM_WITH_SPACE, &saveptr);
242                                                    if (q == NULL)
243                                                    {
244                                                            log_error("Error menu item priv in menu config line %d\n", fin_line);
245                                                            return -1;
246                                                    }
247                                                    p = q;
248                                                    while (isdigit(*q))
249                                                    {
250                                                            q++;
251                                                    }
252                                                    if (*q != '\0')
253                                                    {
254                                                            log_error("Error menu item priv in menu config line %d\n", fin_line);
255                                                            return -1;
256                                                    }
257                                                    p_item->priv = atoi(p);
258    
259                                                    // Menu item level
260                                                    q = strtok_r(NULL, MENU_CONF_DELIM_WITH_SPACE, &saveptr);
261                                                    if (q == NULL)
262                                                    {
263                                                            log_error("Error menu item level in menu config line %d\n", fin_line);
264                                                            return -1;
265                                                    }
266                                                    p = q;
267                                                    while (isdigit(*q))
268                                                    {
269                                                            q++;
270                                                    }
271                                                    if (*q != '\0')
272                                                    {
273                                                            log_error("Error menu item level in menu config line %d\n", fin_line);
274                                                            return -1;
275                                                    }
276                                                    p_item->level = atoi(p);
277    
278                                                    // Menu item name
279                                                    q = strtok_r(NULL, MENU_CONF_DELIM_WITH_SPACE, &saveptr);
280                                                    if (q == NULL || *q != '\"')
281                                                    {
282                                                            log_error("Error menu item name in menu config line %d\n", fin_line);
283                                                            return -1;
284                                                    }
285                                                    q++;
286                                                    p = q;
287                                                    while (*q != '\0' && *q != '\"')
288                                                    {
289                                                            q++;
290                                                    }
291                                                    if (*q != '\"' || *(q + 1) != '\0')
292                                                    {
293                                                            log_error("Error menu item name in menu config line %d\n", fin_line);
294                                                            return -1;
295                                                    }
296                                                    *q = '\0';
297    
298                                                    if (q - p > sizeof(p_item->name) - 1)
299                                                    {
300                                                            log_error("Too longer menu name in menu config line %d\n", fin_line);
301                                                            return -1;
302                                                    }
303                                                    strncpy(p_item->name, p, sizeof(p_item->name) - 1);
304                                                    p_item->name[sizeof(p_item->name) - 1] = '\0';
305    
306                                                    // Menu item text
307                                                    q = strtok_r(NULL, MENU_CONF_DELIM_WITHOUT_SPACE, &saveptr);
308                                                    if (q == NULL || (q = strchr(q, '\"')) == NULL)
309                                                    {
310                                                            log_error("Error menu item text in menu config line %d\n", fin_line);
311                                                            return -1;
312                                                    }
313                                                    q++;
314                                                    p = q;
315                                                    while (*q != '\0' && *q != '\"')
316                                                    {
317                                                            q++;
318                                                    }
319                                                    if (*q != '\"')
320                                                    {
321                                                            log_error("Error menu item text in menu config line %d\n", fin_line);
322                                                            return -1;
323                                                    }
324                                                    *q = '\0';
325    
326                                                    if (q - p > sizeof(p_item->text) - 1)
327                                                    {
328                                                            log_error("Too longer menu item text in menu config line %d\n", fin_line);
329                                                            return -1;
330                                                    }
331                                                    strncpy(p_item->text, p, sizeof(p_item->text) - 1);
332                                                    p_item->text[sizeof(p_item->text) - 1] = '\0';
333    
334                                                    // Check syntax
335                                                    q = strtok_r(q + 1, MENU_CONF_DELIM_WITH_SPACE, &saveptr);
336                                                    if (q != NULL)
337                                                    {
338                                                            log_error("Unknown extra content in menu config line %d\n", fin_line);
339                                                            return -1;
340                                                    }
341                                            }
342                                            else if (strcmp(p, "title") == 0)
343                                            {
344                                                    p_menu->title.show = 1;
345    
346                                                    // Menu title row
347                                                    q = strtok_r(NULL, MENU_CONF_DELIM_WITH_SPACE, &saveptr);
348                                                    if (q == NULL)
349                                                    {
350                                                            log_error("Error menu title row in menu config line %d\n", fin_line);
351                                                            return -1;
352                                                    }
353                                                    p = q;
354                                                    while (isdigit(*q))
355                                                    {
356                                                            q++;
357                                                    }
358                                                    if (*q != '\0')
359                                                    {
360                                                            log_error("Error menu title row in menu config line %d\n", fin_line);
361                                                            return -1;
362                                                    }
363                                                    p_menu->title.row = atoi(p);
364    
365                                                    // Menu title col
366                                                    q = strtok_r(NULL, MENU_CONF_DELIM_WITH_SPACE, &saveptr);
367                                                    if (q == NULL)
368                                                    {
369                                                            log_error("Error menu title col in menu config line %d\n", fin_line);
370                                                            return -1;
371                                                    }
372                                                    p = q;
373                                                    while (isdigit(*q))
374                                                    {
375                                                            q++;
376                                                    }
377                                                    if (*q != '\0')
378                                                    {
379                                                            log_error("Error menu title col in menu config line %d\n", fin_line);
380                                                            return -1;
381                                                    }
382                                                    p_menu->title.col = atoi(p);
383    
384                                                    // Menu title text
385                                                    q = strtok_r(NULL, MENU_CONF_DELIM_WITHOUT_SPACE, &saveptr);
386                                                    if (q == NULL || (q = strchr(q, '\"')) == NULL)
387                                                    {
388                                                            log_error("Error menu title text in menu config line %d\n", fin_line);
389                                                            return -1;
390                                                    }
391                                                    q++;
392                                                    p = q;
393                                                    while (*q != '\0' && *q != '\"')
394                                                    {
395                                                            q++;
396                                                    }
397                                                    if (*q != '\"')
398                                                    {
399                                                            log_error("Error menu title text in menu config line %d\n", fin_line);
400                                                            return -1;
401                                                    }
402                                                    *q = '\0';
403    
404                                                    if (q - p > sizeof(p_item->text) - 1)
405                                                    {
406                                                            log_error("Too longer menu title text in menu config line %d\n", fin_line);
407                                                            return -1;
408                                                    }
409                                                    strncpy(p_menu->title.text, p, sizeof(p_menu->title.text) - 1);
410                                                    p_menu->title.text[sizeof(p_menu->title.text) - 1] = '\0';
411    
412                                                    // Check syntax
413                                                    q = strtok_r(q + 1, MENU_CONF_DELIM_WITH_SPACE, &saveptr);
414                                                    if (q != NULL)
415                                                    {
416                                                            log_error("Unknown extra content in menu config line %d\n", fin_line);
417                                                            return -1;
418                                                    }
419                                            }
420                                            else if (strcmp(p, "screen") == 0)
421                                            {
422                                                    p_menu->screen.show = 1;
423    
424                                                    // Menu screen row
425                                                    q = strtok_r(NULL, MENU_CONF_DELIM_WITH_SPACE, &saveptr);
426                                                    if (q == NULL)
427                                                    {
428                                                            log_error("Error menu screen row in menu config line %d\n", fin_line);
429                                                            return -1;
430                                                    }
431                                                    p = q;
432                                                    while (isdigit(*q))
433                                                    {
434                                                            q++;
435                                                    }
436                                                    if (*q != '\0')
437                                                    {
438                                                            log_error("Error menu screen row in menu config line %d\n", fin_line);
439                                                            return -1;
440                                                    }
441                                                    p_menu->screen.row = atoi(p);
442    
443                                                    // Menu screen col
444                                                    q = strtok_r(NULL, MENU_CONF_DELIM_WITH_SPACE, &saveptr);
445                                                    if (q == NULL)
446                                                    {
447                                                            log_error("Error menu screen col in menu config line %d\n", fin_line);
448                                                            return -1;
449                                                    }
450                                                    p = q;
451                                                    while (isdigit(*q))
452                                                    {
453                                                            q++;
454                                                    }
455                                                    if (*q != '\0')
456                                                    {
457                                                            log_error("Error menu screen col in menu config line %d\n", fin_line);
458                                                            return -1;
459                                                    }
460                                                    p_menu->screen.col = atoi(p);
461    
462                                                    // Menu screen name
463                                                    q = strtok_r(NULL, MENU_CONF_DELIM_WITH_SPACE, &saveptr);
464                                                    if (q == NULL)
465                                                    {
466                                                            log_error("Error menu screen name in menu config line %d\n", fin_line);
467                                                            return -1;
468                                                    }
469                                                    p = q;
470                                                    while (isalnum(*q) || *q == '_')
471                                                    {
472                                                            q++;
473                                                    }
474                                                    if (*q != '\0')
475                                                    {
476                                                            log_error("Error menu screen name in menu config line %d\n", fin_line);
477                                                            return -1;
478                                                    }
479    
480                                                    snprintf(p_menu->screen.filename, sizeof(p_menu->screen.filename), "%s%s", MENU_SCREEN_PATH_PREFIX, p);
481    
482                                                    // Check syntax
483                                                    q = strtok_r(NULL, MENU_CONF_DELIM_WITH_SPACE, &saveptr);
484                                                    if (q != NULL)
485                                                    {
486                                                            log_error("Unknown extra content in menu config line %d\n", fin_line);
487                                                            return -1;
488                                                    }
489                                            }
490                                    }
491                            }
492                            else // BEGIN of menu screen
493                            {
494                                    q = p;
495                                    while (isalnum(*q) || *q == '_')
496                                    {
497                                            q++;
498                                    }
499                                    if (*q != '\0')
500                                    {
501                                            log_error("Error menu screen name in menu config line %d\n", fin_line);
502                                            return -1;
503                                    }
504    
505                                    snprintf(screen_filename, sizeof(screen_filename), "%s%s", MENU_SCREEN_PATH_PREFIX, p);
506    
507                                    // Check syntax
508                                    q = strtok_r(NULL, MENU_CONF_DELIM_WITH_SPACE, &saveptr);
509                                    if (q != NULL)
510                                    {
511                                            log_error("Unknown extra content in menu config line %d\n", fin_line);
512                                            return -1;
513                                    }
514    
515                                    if ((fout = fopen(screen_filename, "w")) == NULL)
516                                    {
517                                            log_error("Open %s failed", screen_filename);
518                                            return -2;
519                                    }
520    
521                                    while (fgets(buffer, sizeof(buffer), fin))
522                                    {
523                                            fin_line++;
524    
525                                            memcpy(temp, buffer, sizeof(temp)); // Duplicate line for strtok_r
526                                            p = strtok_r(temp, MENU_CONF_DELIM_WITH_SPACE, &saveptr);
527                                            if (p != NULL && *p == '%') // END of menu screen
528                                            {
529                                                    break;
530                                            }
531    
532                                            if (fputs(buffer, fout) < 0)
533                                            {
534                                                    log_error("Write %s failed", screen_filename);
535                                                    return -2;
536                                            }
537                                    }
538    
539                                    fclose(fout);
540                            }
541                    }
542                    else // Invalid prefix
543                    {
544                            log_error("Error in menu config line %d\n", fin_line);
545                            return -1;
546                    }
547            }
548            fclose(fin);
549    
550            p_menu_set->menu_count = i;
551            p_menu_set->menu_select_depth = 0;
552            p_menu_set->p_menu_select[p_menu_set->menu_select_depth] = (i == 0 ? NULL : p_menu_set->p_menu[0]);
553    
554            return 0;
555  }  }
556    
557  MENU *  MENU *get_menu(MENU_SET *p_menu_set, const char *menu_name)
 get_menu (MENU_SET * p_menu_set, const char *menu_name)  
558  {  {
559    int i;          int i;
560    
561    for (i = 0; i < p_menu_set->menu_count; i++)          for (i = 0; i < p_menu_set->menu_count; i++)
     {  
       if (strcmp (p_menu_set->p_menu[i]->name, menu_name) == 0)  
562          {          {
563            return p_menu_set->p_menu[i];                  if (strcmp(p_menu_set->p_menu[i]->name, menu_name) == 0)
564                    {
565                            return p_menu_set->p_menu[i];
566                    }
567          }          }
     }  
568    
569    return NULL;          return NULL;
570  }  }
571    
572  static void  static void display_menu_cursor(MENU *p_menu, int show)
 display_menu_cursor (MENU * p_menu, int show)  
573  {  {
574    moveto ((p_menu->items[p_menu->item_cur_pos])->r_row,          moveto((p_menu->items[p_menu->item_cur_pos])->r_row,
575            (p_menu->items[p_menu->item_cur_pos])->r_col - 2);                     (p_menu->items[p_menu->item_cur_pos])->r_col - 2);
576    prints (show ? ">" : " ");          outc(show ? '>' : ' ');
577    iflush ();          iflush();
578  }  }
579    
580  int  int display_menu(MENU *p_menu)
 display_menu (MENU * p_menu)  
581  {  {
582    int i, row, col, menu_selectable = 0;          int row = 0;
583            int col = 0;
584            int menu_selectable = 0;
585    
586    if (p_menu == NULL)          if (p_menu == NULL)
587      return -1;          {
588                    return -1;
589    if (p_menu->title.show)          }
     show_top (p_menu->title.text);  
   
   if (p_menu->screen.show)  
     {  
       moveto (p_menu->screen.row, p_menu->screen.col);  
       if (display_file (p_menu->screen.filename) != 0)  
         log_error ("Display menu screen <%s> failed!\n",  
                    p_menu->screen.filename);  
     }  
590    
591    row = p_menu->items[0]->row;          if (p_menu->title.show)
592    col = p_menu->items[0]->col;          {
593                    show_top(p_menu->title.text);
594            }
595    
596    for (i = 0; i < p_menu->item_count; i++)          if (p_menu->screen.show)
     {  
       if (checkpriv (&BBS_priv, 0, p_menu->items[i]->priv) == 0  
           || checklevel (&BBS_priv, p_menu->items[i]->level) == 0)  
597          {          {
598            p_menu->items[i]->display = 0;                  moveto(p_menu->screen.row, p_menu->screen.col);
599                    if (display_file(p_menu->screen.filename) != 0)
600                    {
601                            log_error("Display menu screen <%s> failed!\n",
602                                              p_menu->screen.filename);
603                    }
604          }          }
605        else  
606            for (int i = 0; i < p_menu->item_count; i++)
607          {          {
608            p_menu->items[i]->display = 1;                  if (p_menu->items[i]->row != 0)
609                    {
610                            row = p_menu->items[i]->row;
611                    }
612                    if (p_menu->items[i]->col != 0)
613                    {
614                            col = p_menu->items[i]->col;
615                    }
616    
617                    if (checkpriv(&BBS_priv, 0, p_menu->items[i]->priv) == 0 || checklevel(&BBS_priv, p_menu->items[i]->level) == 0)
618                    {
619                            p_menu->items[i]->display = 0;
620                            p_menu->items[i]->r_row = 0;
621                            p_menu->items[i]->r_col = 0;
622                    }
623                    else
624                    {
625                            p_menu->items[i]->display = 1;
626    
627            menu_selectable = 1;                          if (!menu_selectable)
628                            {
629                                    p_menu->item_cur_pos = i;
630                                    menu_selectable = 1;
631                            }
632    
633            if (p_menu->items[i]->row != 0)                          p_menu->items[i]->r_row = row;
634              row = p_menu->items[i]->row;                          p_menu->items[i]->r_col = col;
635            else  
636              row++;                          moveto(row, col);
637            p_menu->items[i]->r_row = row;                          prints("%s", p_menu->items[i]->text);
638            if (p_menu->items[i]->col != 0)  
639              col = p_menu->items[i]->col;                          row++;
640            p_menu->items[i]->r_col = col;                  }
           moveto (row, col);  
           prints (p_menu->items[i]->text);  
           iflush ();  
641          }          }
     }  
642    
643    if (!menu_selectable)          if (!menu_selectable)
644      return -1;          {
645                    return -1;
646            }
647    
648    display_menu_cursor (p_menu, 1);          display_menu_cursor(p_menu, 1);
649    
650    return 0;          return 0;
651  }  }
652    
653  int  int display_current_menu(MENU_SET *p_menu_set)
 display_current_menu (MENU_SET * p_menu_set)  
654  {  {
655    MENU *p_menu;          MENU *p_menu;
656    
657    p_menu = p_menu_set->p_menu_select[p_menu_set->menu_select_depth];          p_menu = p_menu_set->p_menu_select[p_menu_set->menu_select_depth];
658    
659    return display_menu (p_menu);          return display_menu(p_menu);
660  }  }
661    
662  int  int menu_control(MENU_SET *p_menu_set, int key)
 menu_control (MENU_SET * p_menu_set, int key)  
663  {  {
664    int i;          int i;
665    MENU *p_menu;          MENU *p_menu;
666    
667    if (p_menu_set->menu_count == 0)          if (p_menu_set->menu_count == 0)
668      return 0;          {
669                    return 0;
670            }
671    
672    p_menu = p_menu_set->p_menu_select[p_menu_set->menu_select_depth];          p_menu = p_menu_set->p_menu_select[p_menu_set->menu_select_depth];
673    
674    switch (key)          switch (key)
675      {          {
676      case CR:          case CR:
677      case KEY_RIGHT:                  igetch(1); // Cleanup remaining '\n' in the buffer
678        if (p_menu->items[p_menu->item_cur_pos]->submenu)          case KEY_RIGHT:
679          {                  if (p_menu->items[p_menu->item_cur_pos]->submenu)
680            if (strcmp (p_menu->items[p_menu->item_cur_pos]->action, "..") == 0)                  {
681              return menu_control (p_menu_set, KEY_LEFT);                          if (strcmp(p_menu->items[p_menu->item_cur_pos]->action, "..") == 0)
682            p_menu_set->menu_select_depth++;                          {
683            p_menu =                                  return menu_control(p_menu_set, KEY_LEFT);
684              p_menu_set->p_menu_select[p_menu_set->menu_select_depth] =                          }
685              get_menu (p_menu_set,                          p_menu_set->menu_select_depth++;
686                        p_menu->items[p_menu->item_cur_pos]->action);                          p_menu = get_menu(p_menu_set, p_menu->items[p_menu->item_cur_pos]->action);
687            if (display_menu (p_menu) != 0)                          p_menu_set->p_menu_select[p_menu_set->menu_select_depth] = p_menu;
688              return menu_control (p_menu_set, KEY_LEFT);  
689            break;                          if (display_menu(p_menu) != 0)
690          }                          {
691        else                                  return menu_control(p_menu_set, KEY_LEFT);
692          {                          }
693            return (exec_cmd(p_menu->items[p_menu->item_cur_pos]->action,                          break;
694              p_menu->items[p_menu->item_cur_pos]->name));                  }
695          }                  else
696      case KEY_LEFT:                  {
697        if (p_menu_set->menu_select_depth > 0)                          return (exec_cmd(p_menu->items[p_menu->item_cur_pos]->action,
698          {                                                           p_menu->items[p_menu->item_cur_pos]->name));
699            p_menu_set->menu_select_depth--;                  }
700            if (display_current_menu (p_menu_set) != 0)          case KEY_LEFT:
701              return menu_control (p_menu_set, KEY_LEFT);                  if (p_menu_set->menu_select_depth > 0)
702            break;                  {
703          }                          p_menu_set->menu_select_depth--;
704        else                          if (display_current_menu(p_menu_set) != 0)
705          {                          {
706            display_menu_cursor (p_menu, 0);                                  return menu_control(p_menu_set, KEY_LEFT);
707            p_menu->item_cur_pos = p_menu->item_count - 1;                          }
708            while (!p_menu->items[p_menu->item_cur_pos]->display                          break;
709                   || p_menu->items[p_menu->item_cur_pos]->priv != 0                  }
710                   || p_menu->items[p_menu->item_cur_pos]->level != 0)                  else
711              p_menu->item_cur_pos--;                  {
712            display_menu_cursor (p_menu, 1);                          display_menu_cursor(p_menu, 0);
713            break;                          p_menu->item_cur_pos = p_menu->item_count - 1;
714          }                          while (!p_menu->items[p_menu->item_cur_pos]->display ||
715      case KEY_UP:                                     p_menu->items[p_menu->item_cur_pos]->priv != 0 ||
716        display_menu_cursor (p_menu, 0);                                     p_menu->items[p_menu->item_cur_pos]->level != 0)
717        do                          {
718          {                                  p_menu->item_cur_pos--;
719            p_menu->item_cur_pos--;                          }
720            if (p_menu->item_cur_pos < 0)                          display_menu_cursor(p_menu, 1);
721              p_menu->item_cur_pos = p_menu->item_count - 1;                          break;
722          }                  }
723        while (!p_menu->items[p_menu->item_cur_pos]->display);          case KEY_UP:
724        display_menu_cursor (p_menu, 1);                  display_menu_cursor(p_menu, 0);
725        break;                  do
726      case KEY_DOWN:                  {
727        display_menu_cursor (p_menu, 0);                          p_menu->item_cur_pos--;
728        do                          if (p_menu->item_cur_pos < 0)
729          {                          {
730            p_menu->item_cur_pos++;                                  p_menu->item_cur_pos = p_menu->item_count - 1;
731            if (p_menu->item_cur_pos >= p_menu->item_count)                          }
732              p_menu->item_cur_pos = 0;                  } while (!p_menu->items[p_menu->item_cur_pos]->display);
733          }                  display_menu_cursor(p_menu, 1);
734        while (!p_menu->items[p_menu->item_cur_pos]->display);                  break;
735        display_menu_cursor (p_menu, 1);          case KEY_DOWN:
736        break;                  display_menu_cursor(p_menu, 0);
737      default:                  do
738        for (i = 0; i < p_menu->item_count; i++)                  {
739          {                          p_menu->item_cur_pos++;
740            if (key == p_menu->items[i]->name[0] &&                          if (p_menu->item_cur_pos >= p_menu->item_count)
741              p_menu->items[i]->display)                          {
742              {                                  p_menu->item_cur_pos = 0;
743                display_menu_cursor (p_menu, 0);                          }
744                p_menu->item_cur_pos = i;                  } while (!p_menu->items[p_menu->item_cur_pos]->display);
745                display_menu_cursor (p_menu, 1);                  display_menu_cursor(p_menu, 1);
746                return 0;                  break;
747              }          default:
748          }                  if (isalnum(key))
749        if (isalpha (key))                  {
750          {                          for (i = 0; i < p_menu->item_count; i++)
751            for (i = 0; i < p_menu->item_count; i++)                          {
752              {                                  if (toupper(key) == toupper(p_menu->items[i]->name[0]) &&
753                if (toupper (key) == toupper (p_menu->items[i]->name[0]) &&                                          p_menu->items[i]->display)
754                  p_menu->items[i]->display)                                  {
755                   {                                          display_menu_cursor(p_menu, 0);
756                    display_menu_cursor (p_menu, 0);                                          p_menu->item_cur_pos = i;
757                    p_menu->item_cur_pos = i;                                          display_menu_cursor(p_menu, 1);
758                    display_menu_cursor (p_menu, 1);                                          return 0;
759                    return 0;                                  }
760                            }
761                  }                  }
             }  
762          }          }
     }  
763    
764    return 0;          return 0;
765  }  }
766    
767  void  void unload_menu(MENU_SET *p_menu_set)
 unload_menu (MENU_SET * p_menu_set)  
768  {  {
769    MENU *p_menu;          MENU *p_menu;
770    MENU_ITEM *p_menuitem;          int i, j;
771    int i, j;  
772            for (i = 0; i < p_menu_set->menu_count; i++)
   for (i = 0; i < p_menu_set->menu_count; i++)  
     {  
       p_menu = p_menu_set->p_menu[i];  
       for (j = 0; j < p_menu->item_count; j++)  
773          {          {
774            free (p_menu->items[j]);                  p_menu = p_menu_set->p_menu[i];
775                    for (j = 0; j < p_menu->item_count; j++)
776                    {
777                            free(p_menu->items[j]);
778                    }
779                    free(p_menu);
780          }          }
       free (p_menu);  
     }  
781    
782    p_menu_set->menu_count = 0;          p_menu_set->menu_count = 0;
783    p_menu_set->menu_select_depth = 0;          p_menu_set->menu_select_depth = 0;
784  }  }
785    
786  int  int reload_menu(MENU_SET *p_menu_set)
 reload_menu (MENU_SET * p_menu_set)  
787  {  {
788    int result;          int result;
789    char conf_file[256];          char conf_file[FILE_PATH_LEN];
790      
791    strcpy (conf_file, p_menu_set->conf_file);          strncpy(conf_file, p_menu_set->conf_file, sizeof(conf_file) - 1);
792    unload_menu (p_menu_set);          conf_file[sizeof(conf_file) - 1] = '\0';
793    result = load_menu (p_menu_set, conf_file);  
794            unload_menu(p_menu_set);
795            result = load_menu(p_menu_set, conf_file);
796    
797    return result;          return result;
798  }  }

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