/[LeafOK_CVS]/lbbs/src/menu.c
ViewVC logotype

Contents of /lbbs/src/menu.c

Parent Directory Parent Directory | Revision Log Revision Log


Revision 1.30 - (show annotations)
Tue May 6 05:31:26 2025 UTC (10 months, 1 week ago) by sysadm
Branch: MAIN
Changes since 1.29: +3 -4 lines
Content type: text/x-csrc
Update copyright and license information

1 /***************************************************************************
2 menu.c - description
3 -------------------
4 Copyright : (C) 2004-2025 by Leaflet
5 Email : leaflet@leafok.com
6 ***************************************************************************/
7
8 /***************************************************************************
9 * *
10 * 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 *
12 * the Free Software Foundation; either version 3 of the License, or *
13 * (at your option) any later version. *
14 * *
15 ***************************************************************************/
16
17 #include "bbs.h"
18 #include "bbs_cmd.h"
19 #include "user_priv.h"
20 #include "reg_ex.h"
21 #include "bbs_cmd.h"
22 #include "menu.h"
23 #include "log.h"
24 #include "io.h"
25 #include "screen.h"
26 #include "common.h"
27 #include <string.h>
28 #include <stdio.h>
29 #include <ctype.h>
30 #include <regex.h>
31 #include <stdlib.h>
32
33 #define MENU_TEMP_DIR "var"
34
35 MENU_SET bbs_menu;
36
37 int load_menu(MENU_SET *p_menu_set, const char *conf_file)
38 {
39 FILE *fin, *fout;
40 int i = 0, j;
41 char buffer[LINE_BUFFER_LEN];
42 char screen_filename[FILE_PATH_LEN];
43 char temp[LINE_BUFFER_LEN];
44 regmatch_t pmatch[10];
45
46 if ((fin = fopen(conf_file, "r")) == NULL)
47 {
48 log_error("Open %s failed", conf_file);
49 return -1;
50 }
51
52 strncpy(p_menu_set->conf_file, conf_file, sizeof(p_menu_set->conf_file) - 1);
53 p_menu_set->conf_file[sizeof(p_menu_set->conf_file) - 1] = '\0';
54
55 while (fgets(buffer, sizeof(buffer), fin))
56 {
57 switch (buffer[0])
58 {
59 case '#':
60 break;
61 case '%':
62 if (ireg("^%S_([A-Za-z0-9_]+)", buffer, 2, pmatch) == 0)
63 {
64 strncpy(temp, buffer + pmatch[1].rm_so,
65 (size_t)(pmatch[1].rm_eo - pmatch[1].rm_so));
66 temp[pmatch[1].rm_eo - pmatch[1].rm_so] = '\0';
67 snprintf(screen_filename, sizeof(screen_filename), "%s/MENU_SCR_%s", MENU_TEMP_DIR, temp);
68
69 if ((fout = fopen(screen_filename, "w")) == NULL)
70 {
71 log_error("Open %s failed", screen_filename);
72 return -2;
73 }
74
75 while (fgets(buffer, sizeof(buffer), fin))
76 {
77 if (buffer[0] != '%')
78 fputs(buffer, fout);
79 else
80 break;
81 }
82
83 fclose(fout);
84 break;
85 }
86
87 if (ireg("^%menu ([A-Za-z0-9_]+)", buffer, 2, pmatch) == 0)
88 {
89 p_menu_set->p_menu[i] = malloc(sizeof(MENU));
90 p_menu_set->p_menu[i]->title.show = 0;
91 p_menu_set->p_menu[i]->screen.show = 0;
92
93 strncpy(p_menu_set->p_menu[i]->name,
94 buffer + pmatch[1].rm_so,
95 (size_t)(pmatch[1].rm_eo - pmatch[1].rm_so));
96 p_menu_set->p_menu[i]->name[pmatch[1].rm_eo - pmatch[1].rm_so] =
97 '\0';
98
99 j = 0;
100
101 while (fgets(buffer, sizeof(buffer), fin))
102 {
103 if (buffer[0] == '#')
104 {
105 continue;
106 }
107 if (buffer[0] == '%')
108 {
109 p_menu_set->p_menu[i]->item_count = j;
110 p_menu_set->p_menu[i]->item_cur_pos = 0;
111 i++;
112 break;
113 }
114 if (ireg("^!([A-Za-z0-9_.]+)[[:space:]]*([0-9]+),"
115 "[[:space:]]*([0-9]+),[[:space:]]*([0-9]+),"
116 "[[:space:]]*([0-9]+),[[:space:]]*\"([^\"]+)\","
117 "[[:space:]]*\"([^\"]+)\"",
118 buffer, 8, pmatch) == 0)
119 {
120 p_menu_set->p_menu[i]->items[j] =
121 malloc(sizeof(MENU_ITEM));
122 p_menu_set->p_menu[i]->items[j]->submenu = 1;
123 strncpy(p_menu_set->p_menu[i]->items[j]->action,
124 buffer + pmatch[1].rm_so,
125 (size_t)(pmatch[1].rm_eo - pmatch[1].rm_so));
126 p_menu_set->p_menu[i]->items[j]->action[pmatch[1].rm_eo -
127 pmatch[1].rm_so] = '\0';
128 strncpy(temp, buffer + pmatch[2].rm_so,
129 (size_t)(pmatch[2].rm_eo - pmatch[2].rm_so));
130 temp[pmatch[2].rm_eo - pmatch[2].rm_so] = '\0';
131 p_menu_set->p_menu[i]->items[j]->row = atoi(temp);
132 strncpy(temp,
133 buffer + pmatch[3].rm_so,
134 (size_t)(pmatch[3].rm_eo - pmatch[3].rm_so));
135 temp[pmatch[3].rm_eo - pmatch[3].rm_so] = '\0';
136 p_menu_set->p_menu[i]->items[j]->col = atoi(temp);
137 strncpy(temp,
138 buffer + pmatch[4].rm_so,
139 (size_t)(pmatch[4].rm_eo - pmatch[4].rm_so));
140 temp[pmatch[4].rm_eo - pmatch[4].rm_so] = '\0';
141 p_menu_set->p_menu[i]->items[j]->priv = atoi(temp);
142 strncpy(temp,
143 buffer + pmatch[5].rm_so,
144 (size_t)(pmatch[5].rm_eo - pmatch[5].rm_so));
145 temp[pmatch[5].rm_eo - pmatch[5].rm_so] = '\0';
146 p_menu_set->p_menu[i]->items[j]->level = atoi(temp);
147 strncpy(p_menu_set->p_menu[i]->items[j]->name,
148 buffer + pmatch[6].rm_so,
149 (size_t)(pmatch[6].rm_eo - pmatch[6].rm_so));
150 p_menu_set->p_menu[i]->items[j]->name[pmatch[6].rm_eo -
151 pmatch[6].rm_so] =
152 '\0';
153 strncpy(p_menu_set->p_menu[i]->items[j]->text,
154 buffer + pmatch[7].rm_so,
155 (size_t)(pmatch[7].rm_eo - pmatch[7].rm_so));
156 p_menu_set->p_menu[i]->items[j]->text[pmatch[7].rm_eo -
157 pmatch[7].rm_so] =
158 '\0';
159 j++;
160 continue;
161 }
162 if (ireg("^@([A-Za-z0-9_]+)[[:space:]]*([0-9]+),"
163 "[[:space:]]*([0-9]+),[[:space:]]*([0-9]+),"
164 "[[:space:]]*([0-9]+),[[:space:]]*\"([^\"]+)\","
165 "[[:space:]]*\"([^\"]+)\"",
166 buffer, 8, pmatch) == 0)
167 {
168 p_menu_set->p_menu[i]->items[j] =
169 malloc(sizeof(MENU_ITEM));
170 p_menu_set->p_menu[i]->items[j]->submenu = 0;
171 strncpy(p_menu_set->p_menu[i]->items[j]->action,
172 buffer + pmatch[1].rm_so,
173 (size_t)(pmatch[1].rm_eo - pmatch[1].rm_so));
174 p_menu_set->p_menu[i]->items[j]->action[pmatch[1].rm_eo -
175 pmatch[1].rm_so] = '\0';
176 strncpy(temp, buffer + pmatch[2].rm_so,
177 (size_t)(pmatch[2].rm_eo - pmatch[2].rm_so));
178 temp[pmatch[2].rm_eo - pmatch[2].rm_so] = '\0';
179 p_menu_set->p_menu[i]->items[j]->row = atoi(temp);
180 strncpy(temp,
181 buffer + pmatch[3].rm_so,
182 (size_t)(pmatch[3].rm_eo - pmatch[3].rm_so));
183 temp[pmatch[3].rm_eo - pmatch[3].rm_so] = '\0';
184 p_menu_set->p_menu[i]->items[j]->col = atoi(temp);
185 strncpy(temp,
186 buffer + pmatch[4].rm_so,
187 (size_t)(pmatch[4].rm_eo - pmatch[4].rm_so));
188 temp[pmatch[4].rm_eo - pmatch[4].rm_so] = '\0';
189 p_menu_set->p_menu[i]->items[j]->priv = atoi(temp);
190 strncpy(temp,
191 buffer + pmatch[5].rm_so,
192 (size_t)(pmatch[5].rm_eo - pmatch[5].rm_so));
193 temp[pmatch[5].rm_eo - pmatch[5].rm_so] = '\0';
194 p_menu_set->p_menu[i]->items[j]->level = atoi(temp);
195 strncpy(p_menu_set->p_menu[i]->items[j]->name,
196 buffer + pmatch[6].rm_so,
197 (size_t)(pmatch[6].rm_eo - pmatch[6].rm_so));
198 p_menu_set->p_menu[i]->items[j]->name[pmatch[6].rm_eo -
199 pmatch[6].rm_so] =
200 '\0';
201 strncpy(p_menu_set->p_menu[i]->items[j]->text,
202 buffer + pmatch[7].rm_so,
203 (size_t)(pmatch[7].rm_eo - pmatch[7].rm_so));
204 p_menu_set->p_menu[i]->items[j]->text[pmatch[7].rm_eo -
205 pmatch[7].rm_so] =
206 '\0';
207 j++;
208 continue;
209 }
210 if (ireg("^title[[:space:]]*([0-9]+),"
211 "[[:space:]]*([0-9]+),[[:space:]]*\"([^\"]+)\"",
212 buffer, 4, pmatch) == 0)
213 {
214 p_menu_set->p_menu[i]->title.show = 1;
215 strncpy(temp,
216 buffer + pmatch[1].rm_so,
217 (size_t)(pmatch[1].rm_eo - pmatch[1].rm_so));
218 temp[pmatch[1].rm_eo - pmatch[1].rm_so] = '\0';
219 p_menu_set->p_menu[i]->title.row = atoi(temp);
220 strncpy(temp,
221 buffer + pmatch[2].rm_so,
222 (size_t)(pmatch[2].rm_eo - pmatch[2].rm_so));
223 temp[pmatch[2].rm_eo - pmatch[2].rm_so] = '\0';
224 p_menu_set->p_menu[i]->title.col = atoi(temp);
225 strncpy(p_menu_set->p_menu[i]->title.text,
226 buffer + pmatch[3].rm_so,
227 (size_t)(pmatch[3].rm_eo - pmatch[3].rm_so));
228 p_menu_set->p_menu[i]->title.text[pmatch[3].rm_eo -
229 pmatch[3].rm_so] =
230 '\0';
231 continue;
232 }
233 if (ireg("^screen[[:space:]]*([0-9]+),"
234 "[[:space:]]*([0-9]+),[[:space:]]*S_([A-Za-z0-9_]+)",
235 buffer, 4, pmatch) == 0)
236 {
237 p_menu_set->p_menu[i]->screen.show = 1;
238 strncpy(temp,
239 buffer + pmatch[1].rm_so,
240 (size_t)(pmatch[1].rm_eo - pmatch[1].rm_so));
241 temp[pmatch[1].rm_eo - pmatch[1].rm_so] = '\0';
242 p_menu_set->p_menu[i]->screen.row = atoi(temp);
243 strncpy(temp,
244 buffer + pmatch[2].rm_so,
245 (size_t)(pmatch[2].rm_eo - pmatch[2].rm_so));
246 temp[pmatch[2].rm_eo - pmatch[2].rm_so] = '\0';
247 p_menu_set->p_menu[i]->screen.col = atoi(temp);
248 strncpy(temp,
249 buffer + pmatch[3].rm_so,
250 (size_t)(pmatch[3].rm_eo - pmatch[3].rm_so));
251 temp[pmatch[3].rm_eo - pmatch[3].rm_so] = '\0';
252 snprintf(p_menu_set->p_menu[i]->screen.filename,
253 sizeof(p_menu_set->p_menu[i]->screen.filename),
254 "%s/MENU_SCR_%s", MENU_TEMP_DIR, temp);
255 continue;
256 }
257 }
258 }
259 break;
260 }
261 }
262 fclose(fin);
263
264 p_menu_set->menu_count = i;
265 p_menu_set->menu_select_depth = 0;
266 p_menu_set->p_menu_select[p_menu_set->menu_select_depth] = (i == 0 ? NULL : p_menu_set->p_menu[0]);
267
268 return 0;
269 }
270
271 MENU *
272 get_menu(MENU_SET *p_menu_set, const char *menu_name)
273 {
274 int i;
275
276 for (i = 0; i < p_menu_set->menu_count; i++)
277 {
278 if (strcmp(p_menu_set->p_menu[i]->name, menu_name) == 0)
279 {
280 return p_menu_set->p_menu[i];
281 }
282 }
283
284 return NULL;
285 }
286
287 static void display_menu_cursor(MENU *p_menu, int show)
288 {
289 moveto((p_menu->items[p_menu->item_cur_pos])->r_row,
290 (p_menu->items[p_menu->item_cur_pos])->r_col - 2);
291 outc(show ? '>' : ' ');
292 iflush();
293 }
294
295 int display_menu(MENU *p_menu)
296 {
297 int row = 0;
298 int col = 0;
299 int menu_selectable = 0;
300
301 if (p_menu == NULL)
302 {
303 return -1;
304 }
305
306 if (p_menu->title.show)
307 {
308 show_top(p_menu->title.text);
309 }
310
311 if (p_menu->screen.show)
312 {
313 moveto(p_menu->screen.row, p_menu->screen.col);
314 if (display_file(p_menu->screen.filename) != 0)
315 {
316 log_error("Display menu screen <%s> failed!\n",
317 p_menu->screen.filename);
318 }
319 }
320
321 for (int i = 0; i < p_menu->item_count; i++)
322 {
323 if (p_menu->items[i]->row != 0)
324 {
325 row = p_menu->items[i]->row;
326 }
327 if (p_menu->items[i]->col != 0)
328 {
329 col = p_menu->items[i]->col;
330 }
331
332 if (checkpriv(&BBS_priv, 0, p_menu->items[i]->priv) == 0 || checklevel(&BBS_priv, p_menu->items[i]->level) == 0)
333 {
334 p_menu->items[i]->display = 0;
335 p_menu->items[i]->r_row = 0;
336 p_menu->items[i]->r_col = 0;
337 }
338 else
339 {
340 p_menu->items[i]->display = 1;
341
342 if (!menu_selectable)
343 {
344 p_menu->item_cur_pos = i;
345 menu_selectable = 1;
346 }
347
348 p_menu->items[i]->r_row = row;
349 p_menu->items[i]->r_col = col;
350
351 moveto(row, col);
352 prints("%s", p_menu->items[i]->text);
353
354 row++;
355 }
356 }
357
358 if (!menu_selectable)
359 {
360 return -1;
361 }
362
363 display_menu_cursor(p_menu, 1);
364
365 return 0;
366 }
367
368 int display_current_menu(MENU_SET *p_menu_set)
369 {
370 MENU *p_menu;
371
372 p_menu = p_menu_set->p_menu_select[p_menu_set->menu_select_depth];
373
374 return display_menu(p_menu);
375 }
376
377 int menu_control(MENU_SET *p_menu_set, int key)
378 {
379 int i;
380 MENU *p_menu;
381
382 if (p_menu_set->menu_count == 0)
383 {
384 return 0;
385 }
386
387 p_menu = p_menu_set->p_menu_select[p_menu_set->menu_select_depth];
388
389 switch (key)
390 {
391 case CR:
392 igetch(1); // Cleanup remaining '\n' in the buffer
393 case KEY_RIGHT:
394 if (p_menu->items[p_menu->item_cur_pos]->submenu)
395 {
396 if (strcmp(p_menu->items[p_menu->item_cur_pos]->action, "..") == 0)
397 {
398 return menu_control(p_menu_set, KEY_LEFT);
399 }
400 p_menu_set->menu_select_depth++;
401 p_menu = get_menu(p_menu_set, p_menu->items[p_menu->item_cur_pos]->action);
402 p_menu_set->p_menu_select[p_menu_set->menu_select_depth] = p_menu;
403
404 if (display_menu(p_menu) != 0)
405 {
406 return menu_control(p_menu_set, KEY_LEFT);
407 }
408 break;
409 }
410 else
411 {
412 return (exec_cmd(p_menu->items[p_menu->item_cur_pos]->action,
413 p_menu->items[p_menu->item_cur_pos]->name));
414 }
415 case KEY_LEFT:
416 if (p_menu_set->menu_select_depth > 0)
417 {
418 p_menu_set->menu_select_depth--;
419 if (display_current_menu(p_menu_set) != 0)
420 {
421 return menu_control(p_menu_set, KEY_LEFT);
422 }
423 break;
424 }
425 else
426 {
427 display_menu_cursor(p_menu, 0);
428 p_menu->item_cur_pos = p_menu->item_count - 1;
429 while (!p_menu->items[p_menu->item_cur_pos]->display ||
430 p_menu->items[p_menu->item_cur_pos]->priv != 0 ||
431 p_menu->items[p_menu->item_cur_pos]->level != 0)
432 {
433 p_menu->item_cur_pos--;
434 }
435 display_menu_cursor(p_menu, 1);
436 break;
437 }
438 case KEY_UP:
439 display_menu_cursor(p_menu, 0);
440 do
441 {
442 p_menu->item_cur_pos--;
443 if (p_menu->item_cur_pos < 0)
444 {
445 p_menu->item_cur_pos = p_menu->item_count - 1;
446 }
447 } while (!p_menu->items[p_menu->item_cur_pos]->display);
448 display_menu_cursor(p_menu, 1);
449 break;
450 case KEY_DOWN:
451 display_menu_cursor(p_menu, 0);
452 do
453 {
454 p_menu->item_cur_pos++;
455 if (p_menu->item_cur_pos >= p_menu->item_count)
456 {
457 p_menu->item_cur_pos = 0;
458 }
459 } while (!p_menu->items[p_menu->item_cur_pos]->display);
460 display_menu_cursor(p_menu, 1);
461 break;
462 default:
463 for (i = 0; i < p_menu->item_count; i++)
464 {
465 if (key == p_menu->items[i]->name[0] &&
466 p_menu->items[i]->display)
467 {
468 display_menu_cursor(p_menu, 0);
469 p_menu->item_cur_pos = i;
470 display_menu_cursor(p_menu, 1);
471 return 0;
472 }
473 }
474 if (isalpha(key))
475 {
476 for (i = 0; i < p_menu->item_count; i++)
477 {
478 if (toupper(key) == toupper(p_menu->items[i]->name[0]) &&
479 p_menu->items[i]->display)
480 {
481 display_menu_cursor(p_menu, 0);
482 p_menu->item_cur_pos = i;
483 display_menu_cursor(p_menu, 1);
484 return 0;
485 }
486 }
487 }
488 }
489
490 return 0;
491 }
492
493 void unload_menu(MENU_SET *p_menu_set)
494 {
495 MENU *p_menu;
496 int i, j;
497
498 for (i = 0; i < p_menu_set->menu_count; i++)
499 {
500 p_menu = p_menu_set->p_menu[i];
501 for (j = 0; j < p_menu->item_count; j++)
502 {
503 free(p_menu->items[j]);
504 }
505 remove(p_menu->screen.filename);
506 free(p_menu);
507 }
508
509 p_menu_set->menu_count = 0;
510 p_menu_set->menu_select_depth = 0;
511 }
512
513 int reload_menu(MENU_SET *p_menu_set)
514 {
515 int result;
516 char conf_file[FILE_PATH_LEN];
517
518 strncpy(conf_file, p_menu_set->conf_file, sizeof(conf_file) - 1);
519 conf_file[sizeof(conf_file) - 1] = '\0';
520
521 unload_menu(p_menu_set);
522 result = load_menu(p_menu_set, conf_file);
523
524 return result;
525 }

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