Implement subcommand find.

1 files changed, 27 insertions, 12 deletions

diff --git a/localsmsadmin b/localsmsadmin
index 5c249ff..9628ef7 100755
--- a/localsmsadmin
+++ b/localsmsadmin
@@ -317,18 +317,33 @@ EOF
 		;;
 	esac
 	;;
-#  list|show|view)
-#	case "$1" in
-#	  default|user|group|session)
-#		type="$1"; shift
-#		response="$(listobject "$type" "$@")" || exit1 "Failed listing $type${response:+ $response}"
-#		exit0 "Listing $type: $response."
-#		;;
-#	  *)
-#		exit1 "Cannot list \"$1\" (try \"/help\" to see supported commands)!"
-#		;;
-#	esac
-#	;;
+  find)
+	case "$1" in
+	  help)
+		cat <<EOF
+Usage:
+/find user keyword
+/find group keyword
+/find session keyword
+/find default keyword
+
+Find and return name of object if it exist
+EOF
+		exit 0
+		;;
+	  default|user|group|session)
+		type="$1"; shift
+		name="$1"; [ -n "$name" ] || exit1 "Internal error (empty name)!"; shift
+		[ -z "$*" ] || exit1 "Internal error (too many options)!"
+		oldname="$(findobjects "$type" "$name")" || exit1 "Internal error${oldname:+ $oldname}"
+		[ -n "$oldname" ] || exit1 "No $type named \"$name\"!"
+		exit0 "$name"
+		;;
+	  *)
+		exit1 "Cannot find \"$1\" (try \"/help\" to see supported commands)!"
+		;;
+	esac
+	;;
   mission)
 	case "$1" in
 	  help)