]> code.citadel.org Git - citadel.git/blob - citadel/utilsmenu
* citadel.spec: commented out Icon line and the openldap-servers dependency.
[citadel.git] / citadel / utilsmenu
1 #!/bin/sh
2
3 # Citadel/UX Utilities Menu (shell script)
4 # version 1.1 - July 1999
5 # see copyright.txt for copyright information
6
7 if test -n "$PAGER"
8 then
9         MORECMD=$PAGER
10 elif test -n "$LESSOPEN"
11 then
12         MORECMD=less
13 else
14         MORECMD=more
15 fi
16
17 while true
18 do
19         clear
20         echo
21         echo
22         echo "                    Citadel/UX Utilities Menu"
23         cat <<!!
24
25  a. Citadel/UX login                     g. 
26  b.                                      h. Read call log
27  c. Calling statistics                   i. 
28  d.                                      j. Who is logged in
29  e.                                      k. Setup and configuration
30  f. User list                            q. Quit
31
32 !!
33         echo "Please enter your selection:"
34         read x
35         case $x in
36                 [a,A])  ./citadel
37                         ;;
38                 [c,C])  ./stats |$MORECMD
39                         ;;
40                 [f,F])  clear
41                         ./userlist |$MORECMD
42                         ;;
43                 [h,H])  ./readlog |$MORECMD
44                         ;;
45                 [j,J])  ./whobbs |$MORECMD
46                         ;;
47                 [k,K])  clear
48                         ./setup
49                         ;;
50                 [q,Q])  clear
51                         break;;
52                 !)      sh
53                         ;;
54                 *)      echo "Selection $x is not available"
55                         sleep 1
56                         ;;
57                 esac
58         done