1217309Snwhitehorn#! /bin/sh
2217309Snwhitehorn# $Id: form4,v 1.6 2010/01/13 10:49:52 tom Exp $
3217309Snwhitehorn# form3 with --item-help
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	  --item-help \
23217309Snwhitehorn	  --backtitle "$backtitle" "$@" \
24217309Snwhitehorn	  --form "Here is a possible piece of a configuration program." \
25217309Snwhitehorn20 50 0 \
26217309Snwhitehorn	"Username:" 1 1	"$user" 1 10 10 0 "Login name" \
27217309Snwhitehorn	"UID:"      2 1	"$uid"  2 10  8 0 "User ID" \
28217309Snwhitehorn	"GID:"      3 1	"$gid"  3 10  8 0 "Group ID" \
29217309Snwhitehorn	"HOME:"     4 1	"$home" 4 10 40 0 "User's home-directory" \
30217309Snwhitehorn2>&1 1>&3`
31217309Snwhitehornreturncode=$?
32217309Snwhitehornexec 3>&-
33217309Snwhitehorn
34217309Snwhitehornshow=`echo "$value" |sed -e 's/^/	/'`
35217309Snwhitehorn
36217309Snwhitehorn	case $returncode in
37217309Snwhitehorn	$DIALOG_CANCEL)
38217309Snwhitehorn		"$DIALOG" \
39217309Snwhitehorn		--clear \
40217309Snwhitehorn		--backtitle "$backtitle" \
41217309Snwhitehorn		--yesno "Really quit?" 10 30
42217309Snwhitehorn		case $? in
43217309Snwhitehorn		$DIALOG_OK)
44217309Snwhitehorn			break
45217309Snwhitehorn			;;
46217309Snwhitehorn		$DIALOG_CANCEL)
47217309Snwhitehorn			returncode=99
48217309Snwhitehorn			;;
49217309Snwhitehorn		esac
50217309Snwhitehorn		;;
51217309Snwhitehorn	$DIALOG_OK)
52217309Snwhitehorn		"$DIALOG" \
53217309Snwhitehorn		--clear \
54217309Snwhitehorn		--backtitle "$backtitle" --no-collapse --cr-wrap \
55217309Snwhitehorn		--msgbox "Resulting data:\n\
56217309Snwhitehorn$show" 10 40
57217309Snwhitehorn		;;
58217309Snwhitehorn	$DIALOG_HELP)
59217309Snwhitehorn		"$DIALOG" \
60217309Snwhitehorn		--clear \
61217309Snwhitehorn		--backtitle "$backtitle" --no-collapse --cr-wrap \
62217309Snwhitehorn		--msgbox "Help data:\n\
63217309Snwhitehorn$show" 10 40
64217309Snwhitehorn		;;
65217309Snwhitehorn	*)
66217309Snwhitehorn		echo "Return code was $returncode"
67217309Snwhitehorn		exit
68217309Snwhitehorn		;;
69217309Snwhitehorn	esac
70217309Snwhitehorndone
71