form1-extra revision 285830
196896Sgrog#! /bin/sh 296896Sgrog# $Id: form1-extra,v 1.5 2010/01/13 10:47:35 tom Exp $ 396896Sgrog 496896Sgrog. ./setup-vars 596896Sgrog 696897Sgrogbacktitle="An Example for the use of --form:" 796897Sgrog 896897Sgrogids=`id|sed -e 's/([^)]*)//g'` 996897Sgroguid=`echo "$ids" | sed -e 's/^uid=//' -e 's/ .*//'` 1096897Sgroggid=`echo "$ids" | sed -e 's/^.* gid=//' -e 's/ .*//'` 1196897Sgrog 1296897Sgroguser="$USER" 1396897Sgroghome="$HOME" 1496897Sgrog 1596897Sgrogreturncode=0 1696897Sgrogwhile test $returncode != 1 && test $returncode != 250 1796897Sgrogdo 1896897Sgrogexec 3>&1 1996897Sgrogvalue=`$DIALOG --ok-label "Submit" \ 2096897Sgrog --extra-button \ 2196897Sgrog --backtitle "$backtitle" "$@" \ 2296897Sgrog --form "Here is a possible piece of a configuration program." \ 2396897Sgrog20 50 0 \ 2496897Sgrog "Username:" 1 1 "$user" 1 10 10 0 \ 2596897Sgrog "UID:" 2 1 "$uid" 2 10 8 0 \ 2696897Sgrog "GID:" 3 1 "$gid" 3 10 8 0 \ 2796897Sgrog "HOME:" 4 1 "$home" 4 10 40 0 \ 2896897Sgrog2>&1 1>&3` 2996897Sgrogreturncode=$? 3096897Sgrogexec 3>&- 3196897Sgrog 3296897Sgrogshow=`echo "$value" |sed -e 's/^/ /'` 3396897Sgrog 3496897Sgrog case $returncode in 3596897Sgrog $DIALOG_CANCEL) 3696897Sgrog "$DIALOG" \ 3796897Sgrog --clear \ 3896897Sgrog --backtitle "$backtitle" \ 3996897Sgrog --yesno "Really quit?" 10 30 4096897Sgrog case $? in 4196897Sgrog $DIALOG_OK) 4296897Sgrog break 4396896Sgrog ;; 4496896Sgrog $DIALOG_CANCEL) 4596896Sgrog returncode=99 4696896Sgrog ;; 4796896Sgrog esac 4896896Sgrog ;; 4996896Sgrog $DIALOG_OK) 5096896Sgrog "$DIALOG" \ 5196896Sgrog --clear \ 5296896Sgrog --backtitle "$backtitle" --no-collapse --cr-wrap \ 5396896Sgrog --msgbox "Resulting data:\n\ 5496896Sgrog$show" 10 40 5596896Sgrog ;; 5696896Sgrog $DIALOG_HELP) 5796896Sgrog echo "Button 2 (Help) pressed." 5896896Sgrog exit 5996896Sgrog ;; 6096896Sgrog $DIALOG_EXTRA) 6196896Sgrog echo "Button 3 (Extra) pressed." 6296896Sgrog exit 6396896Sgrog ;; 6496896Sgrog *) 6596896Sgrog echo "Return code was $returncode" 6696896Sgrog exit 6796896Sgrog ;; 6896896Sgrog esac 6996896Sgrogdone 7096896Sgrog