form6 revision 217309 
1145519Sdarrenr#! /bin/sh
2145510Sdarrenr# $Id: form6,v 1.5 2010/01/13 10:49:52 tom Exp $
3145510Sdarrenr# form4 with --help-status
4255332Scy
5145510Sdarrenr. ./setup-vars
6145510Sdarrenr
7145510Sdarrenrbacktitle="An Example for the use of --form:"
8255332Scy
9145510Sdarrenrids=`id|sed -e 's/([^)]*)//g'`
10145510Sdarrenruid=`echo "$ids" | sed -e 's/^uid=//' -e 's/ .*//'`
11145510Sdarrenrgid=`echo "$ids" | sed -e 's/^.* gid=//' -e 's/ .*//'`
12145510Sdarrenr
13145510Sdarrenruser="$USER"
14145510Sdarrenrhome="$HOME"
15145510Sdarrenr
16255332Scyreturncode=0
17255332Scywhile test $returncode != 1 && test $returncode != 250
18255332Scydo
19145510Sdarrenrexec 3>&1
20145510Sdarrenrvalue=`$DIALOG --ok-label "Submit" \
21145510Sdarrenr	  --help-status \
22255332Scy	  --help-button \
23145510Sdarrenr	  --item-help \
24255332Scy	  --backtitle "$backtitle" "$@" \
25145510Sdarrenr	  --form "Here is a possible piece of a configuration program." \
26255332Scy20 50 0 \
27145510Sdarrenr	"Username:" 1 1	"$user" 1 10 -9 9 "Login name" \
28255332Scy	"UID:"      2 1	"$uid"  2 10  8 0 "User ID" \
29145510Sdarrenr	"GID:"      3 1	"$gid"  3 10  8 0 "Group ID" \
30255332Scy	"HOME:"     4 1	"$home" 4 10 40 0 "User's home-directory" \
31153881Sguido2>&1 1>&3`
32161357Sguidoreturncode=$?
33153881Sguidoexec 3>&-
34145510Sdarrenr
35161357Sguidoshow=`echo "$value" |sed -e 's/^/	/'`
36145510Sdarrenr
37255332Scy	case $returncode in
38145510Sdarrenr	$DIALOG_CANCEL)
39145510Sdarrenr		"$DIALOG" \
40		--clear \
41		--backtitle "$backtitle" \
42		--yesno "Really quit?" 10 30
43		case $? in
44		$DIALOG_OK)
45			break
46			;;
47		$DIALOG_CANCEL)
48			returncode=99
49			;;
50		esac
51		;;
52	$DIALOG_OK)
53		"$DIALOG" \
54		--clear \
55		--backtitle "$backtitle" --no-collapse --cr-wrap \
56		--msgbox "Resulting data:\n\
57$show" 10 40
58		;;
59	$DIALOG_HELP)
60		"$DIALOG" \
61		--clear \
62		--backtitle "$backtitle" --no-collapse --cr-wrap \
63		--msgbox "Help data:\n\
64$show" 10 40
65		;;
66	*)
67		echo "Return code was $returncode"
68		exit
69		;;
70	esac
71done
72