removed examples with copyright issues at FSF request

[thirdparty/bash.git] / examples / scripts.v2 / where

diff --git a/examples/scripts.v2/where b/examples/scripts.v2/where
deleted file mode 100644 (file)
index 7a1dbde..0000000
--- a/examples/scripts.v2/where
+++ /dev/null
@@ -1,111 +0,0 @@
-#! /bin/bash
-#
-# original from:
-# @(#) where.ksh 1.1 94/07/11
-# 91/01/12 john h. dubois iii (john@armory.com)
-# 92/08/10 Only print executable *files*.
-# 92/10/06 Print err msg if no match found.
-# 92/11/27 Added implicit *
-# 93/07/23 Print help only if -h is given.
-# 94/01/01 Added -x option
-# 94/07/11 Don't bother with eval
-#
-# conversion to bash v2 syntax done by Chet Ramey
-
-name=${0##*/}
-Usage="Usage: $name [-hx] 'pattern' ..."
-typeset -i exact=0
-
-phelp()
-{
-echo "$name: find executable files in PATH that match patterns.
-$Usage
-$name searches each directory specified in the PATH environment variable
-for executable files that match the specified patterns.  Patterns are
-given as Korn shell filename patterns.  They are surrounded by implicit
-'*' characters, so that \"foo\" will match any executble file whose name
-contains contains \"foo\".  This can be overridden by using '^' and '$' to
-force a match to start at the beginning and end at the end of a filename
-respectively.  Characters that are special to the shell must generally
-be protected from the shell by surrounding them with quotes.
-Examples:
-$name foo
-lists all executable files in PATH that contain foo.
-$name '^b*sh$'
-lists all executable files in PATH that start with b and end with sh.
-An error message is printed if a no matching file is found for a pattern.
-Options:
--h: Print this help.
--x: Find exact matches only; equivalent to putting ^ and $ at the start
-    and end of each pattern."
-}
-
-istrue()
-{
-       test 0 -ne "$1"
-}
-
-isfalse()
-{
-       test 0 -eq "$1"
-}
-
-while getopts "xh" opt; do
-       case "$opt" in
-       x)      exact=1;;
-       h)      phelp ; exit 0;;
-       *)      echo -e "$Usage\nUse -h for help." 1>&2; exit 2;;
-       esac
-done
-
-shift $((OPTIND-1))
-
-set +f                 # make sure filename globbing is on
-Args=("$@")            # save args
-
-OIFS=$IFS
-IFS=:          # Make PATH be split on :
-Paths=($PATH)
-IFS=$OIFS
-
-for arg in "${Args[@]}"; do
-
-    # get rid of leading ^
-    if istrue $exact; then
-       arg=${arg}
-    else
-           case "$arg" in
-           ^*) arg=${arg#?};;
-           *) arg="*$arg" ;;   # Pattern is not anchored at start
-           esac
-    fi
-
-    # get rid of trailing $
-    if istrue $exact; then
-       arg="$arg"
-    else
-       case "$arg" in
-       *\$)    arg=${arg%?} ;;
-       *)      arg="$arg*" ;;
-       esac
-    fi
-
-    found=0    # Pattern not found yet
-    Patterns=
-    # Make a pattern for each element of PATH
-    for PathElem in "${Paths[@]}"; do
-       [ -z "$PathElem" ] && PathElem=.
-       Patterns="$Patterns $PathElem/$arg"
-    done
-
-    # Find all pattern matches that are executable regular files.
-    for file in $Patterns; do
-       if [ -x "$file" ] && [ -f "$file" ]; then
-           echo "$file"
-           found=1
-       fi
-    done
-    if [ $found = 0 ]; then
-       echo "$arg: not found." 1>&2
-    fi
-done