Add ping command to localkannel-dispatch, and mention it in help output of localsmsadmin.

1 files changed, 23 insertions, 1 deletions

diff --git a/localkannel-dispatch b/localkannel-dispatch
index 8e098cc..21fc1bf 100755
--- a/localkannel-dispatch
+++ b/localkannel-dispatch
@@ -166,13 +166,35 @@ fi
 
 case "$app" in
   /*)
+	cmd="$(echo "$app" | perl -pe 's/^\///;')"
+	case "$cmd" in
+	  ping)
+		shift
+		if [ "help" = "$1" ]; then
+			$sbindir/localsendsms "$to" "Usage:
+/ping [...]
+
+Respond \"pong\" and echo back any addition input."
+		else
+			$sbindir/localsendsms "$to" pong "$@"
+		fi
+		exit 0
+		;;
+	esac
 	candidates=$(cd "$vardir/user" && grep -lF "$to" */phone | perl -pe "s,/phone$,,") || candidates=
 	[ -z "$candidates" ] || $(grep -vqF "$candidates" "$vardir/group/admin/user") || admin=true
 	if [ -n "$ADMIN_OK" ] && [ -n "$admin" ]; then
-		cmd="$(echo "$app" | perl -pe 's/^\///;')"
 		str="$($sbindir/localsmsadmin "$cmd" "$@" 2>&1)" || exit1 "$str"
 		$sbindir/localsendsms "$to" $str
 		exit 0
+	elif [ "help" = "$cmd" ]; then
+		$sbindir/localsendsms "$to" "Commands:
+/ping [...]
+/COMMAND help
+/help
+
+try e.g. \"/del help\"."
+		exit 0
 	fi
 	;;
 esac