Bring in Joerg's which command. It's small, it's simple, it will stop

people (like me! :) from whining!
Submitted by:	joerg

1 files changed, 62 insertions, 0 deletions

diff --git a/usr.bin/which/which.sh b/usr.bin/which/which.sh
new file mode 100755
index 0000000..7167140
--- /dev/null
+++ b/usr.bin/which/which.sh
@@ -0,0 +1,62 @@
+#!/bin/csh
+#
+#
+# Copyright (C) 1994, Joerg Wunsch <joerg@freebsd.org>
+#
+# Redistribution and use in source and binary forms, with or without
+# modification, are permitted provided that the following conditions
+# are met:
+# 1. Redistributions of source code must retain the above copyright
+#    notice, this list of conditions and the following disclaimer.
+# 2. Redistributions in binary form must reproduce the above copyright
+#    notice, this list of conditions and the following disclaimer in the
+#    documentation and/or other materials provided with the distribution.
+# 3. All advertising materials mentioning features or use of this software
+#    must display the following acknowledgement:
+#      This product includes software developed by the University of
+#      California, Berkeley and its contributors.
+# 4. Neither the name of the University nor the names of its contributors
+#    may be used to endorse or promote products derived from this software
+#    without specific prior written permission.
+#
+# THIS SOFTWARE IS PROVIDED BY THE CONTRIBUTOR ``AS IS'' AND ANY EXPRESS OR
+# IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
+# OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
+# IN NO EVENT SHALL THE CONTRIBUTOR BE LIABLE FOR ANY DIRECT, INDIRECT,
+# INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
+# NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
+# DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
+# THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
+# (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE
+# OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
+#
+# [whew!]
+#
+# $Id$
+
+foreach i ($argv)
+	echo -n "${i}:	"
+
+	set a = `alias $i`
+
+	if ("$a" != "") then	# test for alias
+		echo "aliased to $a"
+	else if  ("$i" =~ /*) then	# absolute path name
+		if (! -x "$i") then
+			echo "not found"
+		else
+			echo "$i"
+		endif
+	else			# search $path
+		set found = 0
+		foreach p ($path)
+
+			if (-x "$p/$i") then
+				echo "$p/$i"
+				set found = 1
+				break
+			endif
+		end
+		if ($found == 0) echo "not found"
+	endif
+end