home *** CD-ROM | disk | FTP | other *** search
/ Dream 49 / Amiga_Dream_49.iso / axeneoffice / live / linux-2.0 / xallwrite < prev    next >
Text File  |  1998-02-09  |  4KB  |  154 lines
  1. #!/bin/sh
  2. # 
  3. # XAllWrite
  4. # XAllWrite script
  5. # 
  6. # Copyright (c)1996. All Rights reserved Axene.
  7. # EMail: <xcalibur@axene.com>
  8. # 
  9. # Started on  Fri Nov 17 17:34:10 1995 Nucleus
  10. # Last update Sun Jan 18 19:25:34 1998 Xibios 2
  11. #
  12.  
  13. #--- Init global variables
  14. SkipLine() { echo " "; }
  15. Fatal() { echo "${progname}: error: ${1}" 1>&2 ; exit 1; }
  16.  
  17. progname=`basename $0`
  18. bin_list=
  19. name_base=XAllWrite
  20.  
  21. # ---------------------------------------------------------------------- # 
  22. # AskOneFromList - Let the user choose an item among a list              # 
  23. #                  <text> <default-index> <var > <choice-1>...<choice-n> #
  24. # ---------------------------------------------------------------------- #
  25. AskOneFromList()
  26. {
  27.   _ask_text=$1
  28.   _ask_default=$2
  29.   _ask_var=$3
  30.   shift 3
  31.   _arg_all=$@
  32.   _arg_num=$#
  33.  
  34.   while :; do
  35.     if [ "$force_flag" = "yes" ]; then
  36.       return $_ask_default
  37.     else
  38.       echo $_ask_text
  39.       _ask_count=0
  40.       while [ $_ask_count -lt $_arg_num ]; do
  41.         if [ $_ask_count -eq $_ask_default ]; then
  42.           _ask_reply="(DEFAULT)"
  43.         else
  44.           _ask_reply=
  45.         fi
  46.         _ask_count=`expr $_ask_count + 1`
  47.         eval "echo \"  \$_ask_count. \$1 $_ask_reply\""
  48.     shift 1
  49.       done
  50.       read _ask_reply
  51.       if [ -z "$_ask_reply" ]; then
  52.     _arg_cnt=0
  53.         for _ask_phrase in $_arg_all; do
  54.          if [ $_arg_cnt -eq $_ask_default ]; then
  55.           eval "$_ask_var=\"\$_ask_phrase\""
  56.           break
  57.         fi
  58.         _arg_cnt=`expr $_arg_cnt + 1`
  59.         done        
  60.     return $_ask_default
  61.       fi
  62.       if [ $_ask_reply -gt 0 -a $_ask_reply -le $_arg_num ]; then
  63.         SkipLine
  64.     _arg_cnt=1
  65.         for _ask_phrase in $_arg_all; do
  66.          if [ $_arg_cnt -eq $_ask_reply ]; then
  67.           eval "$_ask_var=\"\$_ask_phrase\""
  68.           break
  69.          fi
  70.          _arg_cnt=`expr $_arg_cnt + 1`
  71.         done
  72.         return `expr $_ask_reply - 1`
  73.       fi
  74.       echo "ERROR: You must enter a number between 1 and $_arg_num"
  75.       exit 1
  76.     fi
  77.   done
  78. } 
  79.  
  80. # ---------------------------------------------------------------------- # 
  81. # ---------------------------------------------------------------------- #
  82. TestInHostList()
  83. {
  84.  _Host=xibios.xibios.net
  85.  _HostsDB=$ZHOME/lib/locale/axene.hosts
  86.  
  87.  _count_exec=0
  88.  for _file in $ZHOME/bin/${name_base}*; do
  89.   if [ -x $_file ]; then
  90.    _count_exec=`expr $_count_exec + 1`
  91.   fi
  92.  done
  93.  
  94.  if [ "$_count_exec" -eq "0" ]; then
  95.    Fatal "No executable found in $ZHOME/bin/"
  96.  fi
  97.  
  98.  if [ "$_count_exec" -eq "1" ]; then
  99.   bin_list=$ZHOME/bin/${name_base}*
  100.  else
  101.   _No_Host=0
  102.   _Bin_ok=0
  103.   test -r $_HostsDB || _No_Host=1
  104.   if [ "$_No_Host" -eq "0" ]; then
  105.    exec 5<$_HostsDB
  106.    while read _v_host <&5 ; do
  107.      if [ "$_v_host" = "$_Host" ]; then
  108.       read bin_list <&5
  109.       bin_list=$ZHOME/bin/${name_base}.${bin_list}
  110.       _Bin_ok=1
  111.       while read _v_host <&5 ; do
  112.       echo flush > /dev/null
  113.       done
  114.      else
  115.       read _v_burk <&5
  116.       read _v_burk <&5
  117.      fi
  118.    done
  119.    exec 5<&-
  120.   else
  121.    echo "No $_HostsDB defined."
  122.    if [ -w $ZHOME/lib/locale/ ]; then
  123.     touch $_HostsDB
  124.    else
  125.     echo "Not authorized to write into directory $ZHOME/lib/locale/"
  126.    fi
  127.   fi
  128.      
  129.   if [ "$_Bin_ok" -eq "0" ]; then
  130.    AskOneFromList "Please select the program to execute on $_Host" 0 bin_list $ZHOME/bin/${name_base}*
  131.    if [ ! -w $_HostsDB ]; then
  132.     echo "Could not add this entry to $_HostsDB"
  133.    else
  134.     echo "host \`$_Host\' is now associated with program :"
  135.     echo "\`$bin_list\'."
  136.     echo "(if error, edit or delete $_HostsDB)" 
  137.     echo $_Host >> $_HostsDB
  138.     echo $bin_list | cut -d"." -f2- >> $_HostsDB
  139.     echo ----- >> $_HostsDB
  140.    fi
  141.   fi
  142.  fi
  143. }
  144.  
  145. ZHOME=`dirname $0`
  146. AXENE_LIB=$ZHOME/lib
  147. XALLWRITE_LIB=$ZHOME/lib
  148. XAPPLRESDIR=$ZHOME/app-defaults
  149. export AXENE_LIB XALLWRITE_LIB XAPPLRESDIR
  150.  
  151. TestInHostList
  152. exec $bin_list $@
  153.  
  154.