dwww Home | Show directory contents | Find package

#! /bin/sh
# $Id: inputmenu4,v 1.12 2020/11/26 00:28:24 tom Exp $
#
# "inputmenu1" with a different label for the extra-button

. ./setup-vars

backtitle="An Example for the use of --inputmenu:"

ids=`id|sed -e 's/([^)]*)//g'`
uid=`echo "$ids" | sed -e 's/^uid=//' -e 's/ .*//'`
gid=`echo "$ids" | sed -e 's/^.* gid=//' -e 's/ .*//'`

user="$USER"
home="$HOME"

returncode=0
while test $returncode != 1 && test $returncode != 250
do
exec 3>&1
returntext=`$DIALOG --clear --ok-label "Create" \
        --extra-label "Edit" \
          --backtitle "$backtitle" "$@" \
          --inputmenu "Originally I designed --inputmenu for a \
configuration purpose. Here is a possible piece of a configuration program." \
20 50 10 \
        "Username:"     "$user" \
        "UID:"          "$uid" \
        "GID:"          "$gid" \
        "HOME:"         "$home" \
2>&1 1>&3`
returncode=$?
exec 3>&-

        case $returncode in
        $DIALOG_CANCEL)
                "$DIALOG" \
                --clear \
                --backtitle "$backtitle" \
                --yesno "Really quit?" 10 30
                case $? in
                $DIALOG_OK)
                        break
                        ;;
                $DIALOG_CANCEL)
                        returncode=99
                        ;;
                esac
                ;;
        $DIALOG_OK)
                "$DIALOG" \
                --clear \
                --backtitle "$backtitle" \
                --msgbox "useradd \n\
                        -d $home \n\
                        -u $uid \n\
                        -g $gid \n\
                        $user" 10 40
                ;;
        $DIALOG_EXTRA)
                tag=`echo "$returntext" |sed -e 's/^RENAMED //' -e 's/:.*//'`
                item=`echo "$returntext" |sed -e 's/^[^:]*:[ ]*//' -e 's/[ ]*$//'`

                case "$tag" in
                Username)
                        user="$item"
                        ;;
                UID)
                        uid="$item"
                        ;;
                GID)
                        gid="$item"
                        ;;
                HOME)
                        home="$item"
                        ;;
                esac
                ;;

        *)
                . ./report-button
                break
                ;;

        esac
done

Generated by dwww version 1.15 on Sun Jun 30 09:59:48 CEST 2024.