1 files changed, 88 insertions, 0 deletions

diff --git a/regress/percent.sh b/regress/percent.sh
new file mode 100644
index 000000000..2e891f693
--- /dev/null
+++ b/regress/percent.sh
@@ -0,0 +1,88 @@
+#       $OpenBSD: percent.sh,v 1.6 2020/04/10 00:54:03 dtucker Exp $
+#       Placed in the Public Domain.
+
+tid="percent expansions"
+
+if [ -x "/usr/xpg4/bin/id" ]; then
+        PATH=/usr/xpg4/bin:$PATH
+        export PATH
+fi
+
+USER=`id -u -n`
+USERID=`id -u`
+HOST=`hostname | cut -f1 -d.`
+HOSTNAME=`hostname`
+
+# Localcommand is evaluated after connection because %T is not available
+# until then.  Because of this we use a different method of exercising it,
+# and we can't override the remote user otherwise authentication will fail.
+# We also have to explicitly enable it.
+echo "permitlocalcommand yes" >> $OBJ/ssh_proxy
+
+trial()
+{
+        opt="$1"; arg="$2"; expect="$3"
+
+        trace "test $opt=$arg $expect"
+        rm -f $OBJ/actual
+        case "$opt" in
+        localcommand)
+                ${SSH} -F $OBJ/ssh_proxy -o $opt="echo '$arg' >$OBJ/actual" \
+                    somehost true
+                got=`cat $OBJ/actual`
+                ;;
+        matchexec)
+                (cat $OBJ/ssh_proxy && \
+                 echo "Match Exec \"echo '$arg' >$OBJ/actual\"") \
+                    >$OBJ/ssh_proxy_match
+                ${SSH} -F $OBJ/ssh_proxy_match remuser@somehost true || true
+                got=`cat $OBJ/actual`
+                ;;
+        *forward)
+                # LocalForward and RemoteForward take two args and only
+                # operate on Unix domain socket paths
+                got=`${SSH} -F $OBJ/ssh_proxy -o $opt="/$arg /$arg" -G \
+                    remuser@somehost | awk '$1=="'$opt'"{print $2" "$3}'`
+                expect="/$expect /$expect"
+                ;;
+        *)
+                got=`${SSH} -F $OBJ/ssh_proxy -o $opt="$arg" -G \
+                    remuser@somehost | awk '$1=="'$opt'"{print $2}'`
+        esac
+        if [ "$got" != "$expect" ]; then
+                fail "$opt=$arg expect $expect got $got"
+        fi
+}
+
+for i in matchexec localcommand remotecommand controlpath identityagent \
+    forwardagent localforward remoteforward; do
+        verbose $tid $i
+        if [ "$i" = "localcommand" ]; then
+                REMUSER=$USER
+                trial $i '%T' NONE
+        else
+                REMUSER=remuser
+        fi
+        # Matches implementation in readconf.c:ssh_connection_hash()
+        HASH=`printf "${HOSTNAME}127.0.0.1${PORT}$REMUSER" |
+            openssl sha1 | cut -f2 -d' '`
+        trial $i '%%' '%'
+        trial $i '%C' $HASH
+        trial $i '%i' $USERID
+        trial $i '%h' 127.0.0.1
+        trial $i '%d' $HOME
+        trial $i '%L' $HOST
+        trial $i '%l' $HOSTNAME
+        trial $i '%n' somehost
+        trial $i '%p' $PORT
+        trial $i '%r' $REMUSER
+        trial $i '%u' $USER
+        trial $i '%%/%C/%i/%h/%d/%L/%l/%n/%p/%r/%u' \
+            "%/$HASH/$USERID/127.0.0.1/$HOME/$HOST/$HOSTNAME/somehost/$PORT/$REMUSER/$USER"
+done
+
+# A subset of options support tilde expansion
+for i in controlpath identityagent forwardagent; do
+        trial $i '~' $HOME/
+        trial $i '~/.ssh' $HOME/.ssh
+done