1217309Snwhitehorn#! /bin/sh
2217309Snwhitehorn# $Id: form3,v 1.6 2010/01/13 10:49:52 tom Exp $
3217309Snwhitehorn# form1 with --help-button
4217309Snwhitehorn
5217309Snwhitehorn. ./setup-vars
6217309Snwhitehorn
7217309Snwhitehornbacktitle="An Example for the use of --form:"
8217309Snwhitehorn
9217309Snwhitehornids=`id|sed -e 's/([^)]*)//g'`
10217309Snwhitehornuid=`echo "$ids" | sed -e 's/^uid=//' -e 's/ .*//'`
11217309Snwhitehorngid=`echo "$ids" | sed -e 's/^.* gid=//' -e 's/ .*//'`
12217309Snwhitehorn
13217309Snwhitehornuser="$USER"
14217309Snwhitehornhome="$HOME"
15217309Snwhitehorn
16217309Snwhitehornreturncode=0
17217309Snwhitehornwhile test $returncode != 1 && test $returncode != 250
18217309Snwhitehorndo
19217309Snwhitehornexec 3>&1
20217309Snwhitehornvalue=`$DIALOG --ok-label "Submit" \
21217309Snwhitehorn	  --help-button \
22217309Snwhitehorn	  --backtitle "$backtitle" "$@" \
23217309Snwhitehorn	  --form "Here is a possible piece of a configuration program." \
24217309Snwhitehorn20 50 0 \
25217309Snwhitehorn	"Username:" 1 1	"$user" 1 10 10 0 \
26217309Snwhitehorn	"UID:"      2 1	"$uid"  2 10  8 0 \
27217309Snwhitehorn	"GID:"      3 1	"$gid"  3 10  8 0 \
28217309Snwhitehorn	"HOME:"     4 1	"$home" 4 10 40 0 \
29217309Snwhitehorn2>&1 1>&3`
30217309Snwhitehornreturncode=$?
31217309Snwhitehornexec 3>&-
32217309Snwhitehorn
33217309Snwhitehornshow=`echo "$value" |sed -e 's/^/	/'`
34217309Snwhitehorn
35217309Snwhitehorn	case $returncode in
36217309Snwhitehorn	$DIALOG_CANCEL)
37217309Snwhitehorn		"$DIALOG" \
38217309Snwhitehorn		--clear \
39217309Snwhitehorn		--backtitle "$backtitle" \
40217309Snwhitehorn		--yesno "Really quit?" 10 30
41217309Snwhitehorn		case $? in
42217309Snwhitehorn		$DIALOG_OK)
43217309Snwhitehorn			break
44217309Snwhitehorn			;;
45217309Snwhitehorn		$DIALOG_CANCEL)
46217309Snwhitehorn			returncode=99
47217309Snwhitehorn			;;
48217309Snwhitehorn		esac
49217309Snwhitehorn		;;
50217309Snwhitehorn	$DIALOG_OK)
51217309Snwhitehorn		"$DIALOG" \
52217309Snwhitehorn		--clear \
53217309Snwhitehorn		--backtitle "$backtitle" --no-collapse --cr-wrap \
54217309Snwhitehorn		--msgbox "Resulting data:\n\
55217309Snwhitehorn$show" 10 40
56217309Snwhitehorn		;;
57217309Snwhitehorn	$DIALOG_HELP)
58217309Snwhitehorn		"$DIALOG" \
59217309Snwhitehorn		--clear \
60217309Snwhitehorn		--backtitle "$backtitle" --no-collapse --cr-wrap \
61217309Snwhitehorn		--msgbox "Help data:\n\
62217309Snwhitehorn$show" 10 40
63217309Snwhitehorn		;;
64217309Snwhitehorn	*)
65217309Snwhitehorn		echo "Return code was $returncode"
66217309Snwhitehorn		exit
67217309Snwhitehorn		;;
68217309Snwhitehorn	esac
69217309Snwhitehorndone
70