From: CSRG <csrg@ucbvax.Berkeley.EDU>
Date: Sun, 10 Jan 1988 05:43:19 +0000 (-0800)
Subject: BSD 4_3_Tahoe development
X-Git-Tag: BSD-4_3_Net_1^2~241
X-Git-Url: https://git.subgeniuskitty.com/unix-history/.git/commitdiff_plain/6d20f196b7b1c0db3a6499103d003464d723d0d7?ds=inline

BSD 4_3_Tahoe development
Work on file usr/src/new/patch/filexp

Synthesized-from: CSRG/cd2/4.3tahoe
---

diff --git a/usr/src/new/patch/filexp b/usr/src/new/patch/filexp
new file mode 100644
index 0000000000..4221a83dd9
--- /dev/null
+++ b/usr/src/new/patch/filexp
@@ -0,0 +1,32 @@
+#!/bin/sh
+: expand filename
+case "$1" in
+~/*|~)
+    /bin/echo $1 | /bin/sed "s|~|${HOME-$LOGDIR}|"
+    ;;
+~*)
+    if /bin/test -f /bin/csh; then
+	/bin/csh -f -c "glob $1"
+	/bin/echo ""
+    else
+	name=`/bin/expr x$1 : '..\([^/]*\)'`
+	dir=`/bin/sed </etc/passwd -n -e "/^${name}:/{s/^[^:]*:[^:]*:[^:]*:[^:]*:[^:]*:\([^:]*\).*"'$'"/\1/" -e p -e q -e '}'`
+	if /bin/test ! -d "$dir"; then
+	    me=`basename $0`
+	    /bin/echo "$me: can't locate home directory for: $name" >&2
+	    exit 1
+	fi
+	case "$1" in
+	*/*)
+	    /bin/echo $dir/`/bin/expr x$1 : '..[^/]*/\(.*\)'`
+	    ;;
+	*)
+	    /bin/echo $dir
+	    ;;
+	esac
+    fi
+    ;;
+*)
+    /bin/echo $1
+    ;;
+esac