wks: Allow gpg-wks-client --supported with just the domain name
authorWerner Koch <wk@gnupg.org>
Thu, 3 Aug 2017 19:16:22 +0000 (21:16 +0200)
committerWerner Koch <wk@gnupg.org>
Thu, 3 Aug 2017 19:16:34 +0000 (21:16 +0200)
* tools/gpg-wks-client.c (command_supported): Hack for missing local
part.

Signed-off-by: Werner Koch <wk@gnupg.org>
tools/gpg-wks-client.c

index 746aa53..594f28a 100644 (file)
@@ -551,7 +551,14 @@ command_supported (char *userid)
   char *addrspec = NULL;
   char *submission_to = NULL;
 
   char *addrspec = NULL;
   char *submission_to = NULL;
 
-  addrspec = mailbox_from_userid (userid);
+  if (!strchr (userid, '@'))
+    {
+      char *tmp = xstrconcat ("foo@", userid, NULL);
+      addrspec = mailbox_from_userid (tmp);
+      xfree (tmp);
+    }
+  else
+    addrspec = mailbox_from_userid (userid);
   if (!addrspec)
     {
       log_error (_("\"%s\" is not a proper mail address\n"), userid);
   if (!addrspec)
     {
       log_error (_("\"%s\" is not a proper mail address\n"), userid);