USERCOMMAND: Ensure sshkey is validating tag names

1 files changed, 6 insertions, 0 deletions

diff --git a/lib/gitano/usercommand.lua b/lib/gitano/usercommand.lua
index bf8791a..4a28fde 100644
--- a/lib/gitano/usercommand.lua
+++ b/lib/gitano/usercommand.lua
@@ -119,6 +119,12 @@ local function builtin_sshkey_validate(config, _, cmdline)
 	 log.error("sshkey", cmdline[2] .. ":  Expected tag and no more")
 	 return false
       end
+      if not cmdline[3]:match("^[a-z][a-z0-9_-]+$") then
+	 log.error("sshkey:", cmdline[3], "is not a valid tag name.")
+	 log.state("Tag names start with a letter and may contain only letters")
+	 log.state("and numbers, underscores and dashes.  Tag names must be at")
+	 log.state("least two characters long.")
+      end
    else
       log.error("sshkey: Unknown subcommand", cmdline[2])
       return false