#!/bin/ksh
# Script Name   : test.sh
# Purpose       : Basic User Interface
# Origin Date   : 02/10/07
# Version       : 1.0
# Author        : 
# Description   : Basic dynamic menu system for Unix scripts.

#===================================================
f_get_key()
#---------------------------------------------------
# Function to return the next keystroke.
#===================================================
{
    oldstty=`stty -g`
    stty -icanon -echo min 1 time 0
    key=`dd bs=1 count=1 2>/dev/null`
    stty "$oldstty"
}

#===================================================
f_head()
#---------------------------------------------------
# Function to clear the screen and draw the header.
#===================================================
{
    if [ "$nomenu" = "1" ]; then
        echo "===================================================="
        echo "$*"
        echo "===================================================="
    else
        clear
        echo "####################################################"
        echo "#                       _        _            _    #"
        echo "#   ___ _ __ ___   ___ | | _____| |_ ___  ___| |_  #"
        echo "#  / __| '_ \` _ \ / _ \| |/ / _ \ __/ _ \/ __| __| #"
        echo "#  \__ \ | | | | | (_) |   <  __/ ||  __/\__ \ |_  #"
        echo "#  |___/_| |_| |_|\___/|_|\_\___|\__\___||___/\__| #"
        echo "#                                                  #"
        echo "####################################################"
        echo `date '+%d/%m/%y'`"                                       "`date '+%H:%M'`
        echo "===================================================="
        echo
        c_width=52
        c_text="- $* - $current -"
        c_width=$(( ($c_width + ${#c_text}) / 2 )) 
        printf "%${c_width}.${c_width}s\n" "$c_text"
        echo
    fi
}

#===================================================
f_foot()
#---------------------------------------------------
# Function to add the footer and request an input.
#===================================================
{
    if [ "$nomenu" = "1" ]; then
        echo
        echo
    else
        echo
        echo "===================================================="
        echo "         MAIN MENU: 0 | UP: RETURN | EXIT: x        "
        echo "===================================================="
        f_get_key
    fi
}

#===================================================
#---------------------------------- END OF FUNCTIONS
#---------------------------------------------------
# START OF MAIN PROGRAM ----------------------------
#===================================================

current=""
parent=""
key=""
nomenu=""

if [ "$1" != "" ]; then
    current=$1
	key=unset
else
    current=0
fi

until [ "$key" = "x" ]
do
    if [ "$current" = "0" ]; then
        parent=0
    else
        parent=`echo $current | awk '{print substr($0,1,length($0)-1)}'`
    fi
    
	temp=$current$key"_*"
	if [ -e $temp ]; then
		current=$current$key
	else
		current=$current
	fi
	
	if [ "$key" = "" ]; then
		current=$parent
	elif [ "$key" = "0" ]; then
		current=0
	fi
	
	temp=$current"_*"
	title=`ls -l $temp | awk '{print $9}' | sed 's/^[0-9]*_//;s/_/ /g;s/.sh$//'`
	temp=$current"?_*"
	if [ -e $temp ]; then
		f_head $title
		ls -l $temp | awk '{print $9}' | sort -n | sed 's/^[0-9]*\([0-9]\)_/ \1) /;s/_/ /g;s/.sh$//'
		f_foot
	else
		temp=$current"_*.sh"
		f_head $title
		if [ -x $temp ]; then
			./$temp
		else
			echo "No associated executables ($temp) have been found!"
		fi
		f_foot
	fi
done
clear
echo "...THANKS FOR USING THE SMOKETEST!"
echo
exit 0