#!/usr/bin/pdmenurc

title:TRC6500

menu:main:Maintainer actions

preproc: \
	awk -F\; ' \
	{ sub(/#.*/, "") } \
	$1 == ""  && NF == 5 { \
	    if (submenu) printf "\n"; \
	    submenu = 1; \
	    printf "menu:submenu%d:%s\n", n, $4; \
	    tab[n++] = $4; \
	} \
	$1 != "" && ! /^\// && $5 != ":goto:" { \
	    group = 1; \
    	    cmd = ""; \
    	    for (i = 5; i <= NF; i++) { \
	    if (cmd == "") \
	        cmd = $(i); \
	    else \
	        cmd = cmd ";" $(i); \
	    } \
	    printf "\texec:%s:display:%s\n", $4, cmd; \
	    nb[n - 1]++; \
	} \
	END { \
	    printf "\n"; \
	    printf "menu:main:Maintainer actions\n"; \
	    for (i = 0; i < n; i++) \
	        if (nb[i]) \
	            printf "\tshow:%s::submenu%d\n", tab[i], i; \
	    printf "\texit:E_xit::\n"; \
	} \
	' /etc/webconfig/alias.csv