mirror of git://git.gnupg.org/gnupg.git
340 lines
9.1 KiB
C
340 lines
9.1 KiB
C
/* t-mbox-util.c - Module test for mbox-util.c
|
|
* Copyright (C) 2015 Werner Koch
|
|
*
|
|
* This file is part of GnuPG.
|
|
*
|
|
* GnuPG is free software; you can redistribute it and/or modify
|
|
* it under the terms of the GNU General Public License as published by
|
|
* the Free Software Foundation; either version 3 of the License, or
|
|
* (at your option) any later version.
|
|
*
|
|
* GnuPG is distributed in the hope that it will be useful,
|
|
* but WITHOUT ANY WARRANTY; without even the implied warranty of
|
|
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
|
|
* GNU General Public License for more details.
|
|
*
|
|
* You should have received a copy of the GNU General Public License
|
|
* along with this program; if not, see <https://www.gnu.org/licenses/>.
|
|
*/
|
|
|
|
#include <config.h>
|
|
#include <stdio.h>
|
|
#include <stdlib.h>
|
|
#include <string.h>
|
|
|
|
#include "util.h"
|
|
#include "mbox-util.h"
|
|
|
|
#define PGM "t-mbox-util"
|
|
|
|
|
|
#define pass() do { ; } while(0)
|
|
#define fail(a) do { fprintf (stderr, "%s:%d: test %d failed\n",\
|
|
__FILE__,__LINE__, (a)); \
|
|
exit (1); \
|
|
} while(0)
|
|
|
|
|
|
static int verbose;
|
|
static int debug;
|
|
|
|
|
|
static void
|
|
run_mbox_test (void)
|
|
{
|
|
static struct
|
|
{
|
|
const char *userid;
|
|
const char *mbox;
|
|
} testtbl[] =
|
|
{
|
|
{ "Werner Koch <wk@gnupg.org>", "wk@gnupg.org" },
|
|
{ "<wk@gnupg.org>", "wk@gnupg.org" },
|
|
{ "wk@gnupg.org", "wk@gnupg.org" },
|
|
{ "wk@gnupg.org ", NULL },
|
|
{ " wk@gnupg.org", NULL },
|
|
{ "Werner Koch (test) <wk@gnupg.org>", "wk@gnupg.org" },
|
|
{ "Werner Koch <wk@gnupg.org> (test)", "wk@gnupg.org" },
|
|
{ "Werner Koch <wk@gnupg.org (test)", NULL },
|
|
{ "Werner Koch <wk@gnupg.org >", NULL },
|
|
{ "Werner Koch <wk@gnupg.org", NULL },
|
|
{ "", NULL },
|
|
{ "@", NULL },
|
|
{ "bar <>", NULL },
|
|
{ "<foo@example.org>", "foo@example.org" },
|
|
{ "<foo.@example.org>", "foo.@example.org" },
|
|
{ "<.foo.@example.org>", ".foo.@example.org" },
|
|
{ "<foo..@example.org>", "foo..@example.org" },
|
|
{ "<foo..bar@example.org>", "foo..bar@example.org" },
|
|
{ "<foo@example.org.>", NULL },
|
|
{ "<foo@example..org>", NULL },
|
|
{ "<foo@.>", NULL },
|
|
{ "<@example.org>", NULL },
|
|
{ "<foo@@example.org>", NULL },
|
|
{ "<@foo@example.org>", NULL },
|
|
{ "<foo@example.org> ()", "foo@example.org" },
|
|
{ "<fo()o@example.org> ()", "fo()o@example.org" },
|
|
{ "<fo()o@example.org> ()", "fo()o@example.org" },
|
|
{ "fo()o@example.org", NULL},
|
|
{ "Mr. Foo <foo@example.org><bar@example.net>", "foo@example.org"},
|
|
{ "Surname, Forename | company <foo@example.org>", "foo@example.org"},
|
|
/* The next one is for sure not RFC-822 correct but nevertheless
|
|
* the way gpg does it. We won't change it because the user-id
|
|
* is only rfc-822 alike and not compliant (think only of our
|
|
* utf-8 requirement). */
|
|
{ "\"<foo@example.org>\" <foo@example.net>", "foo@example.org"},
|
|
{ NULL, NULL }
|
|
};
|
|
int idx;
|
|
|
|
for (idx=0; testtbl[idx].userid; idx++)
|
|
{
|
|
char *mbox = mailbox_from_userid (testtbl[idx].userid, 0);
|
|
|
|
if (!testtbl[idx].mbox)
|
|
{
|
|
if (mbox)
|
|
fail (idx);
|
|
}
|
|
else if (!mbox)
|
|
fail (idx);
|
|
else if (strcmp (mbox, testtbl[idx].mbox))
|
|
fail (idx);
|
|
|
|
xfree (mbox);
|
|
}
|
|
}
|
|
|
|
|
|
static void
|
|
run_mbox_no_sub_test (void)
|
|
{
|
|
static struct
|
|
{
|
|
const char *userid;
|
|
const char *mbox;
|
|
} testtbl[] =
|
|
{
|
|
{ "foo+bar@example.org", "foo@example.org" },
|
|
{ "Werner Koch <wk@gnupg.org>", "wk@gnupg.org" },
|
|
{ "<wk@gnupg.org>", "wk@gnupg.org" },
|
|
{ "wk@gnupg.org", "wk@gnupg.org" },
|
|
{ "wk@gnupg.org ", NULL },
|
|
{ " wk@gnupg.org", NULL },
|
|
{ "Werner Koch (test) <wk@gnupg.org>", "wk@gnupg.org" },
|
|
{ "Werner Koch <wk@gnupg.org> (test)", "wk@gnupg.org" },
|
|
{ "Werner Koch <wk@gnupg.org (test)", NULL },
|
|
{ "Werner Koch <wk@gnupg.org >", NULL },
|
|
{ "Werner Koch <wk@gnupg.org", NULL },
|
|
{ "", NULL },
|
|
{ "@", NULL },
|
|
{ "bar <>", NULL },
|
|
{ "<foo@example.org>", "foo@example.org" },
|
|
{ "<foo.@example.org>", "foo.@example.org" },
|
|
{ "<.foo.@example.org>", ".foo.@example.org" },
|
|
{ "<foo..@example.org>", "foo..@example.org" },
|
|
{ "<foo..bar@example.org>", "foo..bar@example.org" },
|
|
{ "<foo@example.org.>", NULL },
|
|
{ "<foo@example..org>", NULL },
|
|
{ "<foo@.>", NULL },
|
|
{ "<@example.org>", NULL },
|
|
{ "<foo@@example.org>", NULL },
|
|
{ "<@foo@example.org>", NULL },
|
|
{ "<foo@example.org> ()", "foo@example.org" },
|
|
{ "<fo()o@example.org> ()", "fo()o@example.org" },
|
|
{ "<fo()o@example.org> ()", "fo()o@example.org" },
|
|
{ "fo()o@example.org", NULL},
|
|
{ "Mr. Foo <foo@example.org><bar@example.net>", "foo@example.org"},
|
|
{ "foo+bar@example.org", "foo@example.org" },
|
|
{ "foo++bar@example.org", "foo++bar@example.org" },
|
|
{ "foo++@example.org", "foo++@example.org" },
|
|
{ "foo+@example.org", "foo+@example.org" },
|
|
{ "+foo@example.org", "+foo@example.org" },
|
|
{ "++foo@example.org", "++foo@example.org" },
|
|
{ "+foo+@example.org", "+foo+@example.org" },
|
|
{ "+@example.org", "+@example.org" },
|
|
{ "++@example.org", "++@example.org" },
|
|
{ "foo+b@example.org", "foo@example.org" },
|
|
{ "foo+ba@example.org", "foo@example.org" },
|
|
{ "foo+bar@example.org", "foo@example.org" },
|
|
{ "foo+barb@example.org", "foo@example.org" },
|
|
{ "foo+barba@example.org", "foo@example.org" },
|
|
{ "f+b@example.org", "f@example.org" },
|
|
{ "fo+b@example.org", "fo@example.org" },
|
|
|
|
{ NULL, NULL }
|
|
};
|
|
int idx;
|
|
|
|
for (idx=0; testtbl[idx].userid; idx++)
|
|
{
|
|
char *mbox = mailbox_from_userid (testtbl[idx].userid, 1);
|
|
|
|
if (!testtbl[idx].mbox)
|
|
{
|
|
if (mbox)
|
|
fail (idx);
|
|
}
|
|
else if (!mbox)
|
|
fail (idx);
|
|
else if (strcmp (mbox, testtbl[idx].mbox))
|
|
fail (idx);
|
|
|
|
xfree (mbox);
|
|
}
|
|
}
|
|
|
|
|
|
static void
|
|
run_dns_test (void)
|
|
{
|
|
static struct
|
|
{
|
|
const char *name;
|
|
int valid;
|
|
} testtbl[] =
|
|
{
|
|
{ "", 0 },
|
|
{ ".", 0 },
|
|
{ "-", 0 },
|
|
{ "a", 1 },
|
|
{ "ab", 1 },
|
|
{ "a.b", 1 },
|
|
{ "a.b.", 1 },
|
|
{ ".a.b.", 0 },
|
|
{ ".a.b", 0 },
|
|
{ "-a.b", 0 },
|
|
{ "a-.b", 0 },
|
|
{ "a.-b", 0 },
|
|
{ "a.b-", 0 },
|
|
{ "a.b-.", 0 },
|
|
{ "a..b", 0 },
|
|
{ "ab.c", 1 },
|
|
{ "a-b.c", 1 },
|
|
{ "a-b-.c", 0 },
|
|
{ "-a-b.c", 0 },
|
|
{ "example.org", 1 },
|
|
{ "x.example.org", 1 },
|
|
{ "xy.example.org", 1 },
|
|
{ "Xy.example.org", 1 },
|
|
{ "-Xy.example.org", 0 },
|
|
{ "Xy.example-.org", 0 },
|
|
{ "foo.example.org..", 0 },
|
|
{ "foo.example.org.", 1 },
|
|
{ ".foo.example.org.", 0 },
|
|
{ "..foo.example.org.", 0 },
|
|
{ NULL, 0 }
|
|
};
|
|
int idx;
|
|
|
|
for (idx=0; testtbl[idx].name; idx++)
|
|
{
|
|
if (is_valid_domain_name (testtbl[idx].name) != testtbl[idx].valid)
|
|
fail (idx);
|
|
}
|
|
}
|
|
|
|
|
|
static void
|
|
run_filter (int no_sub)
|
|
{
|
|
char buf[4096];
|
|
int c;
|
|
char *p, *mbox;
|
|
unsigned int count1 = 0;
|
|
unsigned int count2 = 0;
|
|
|
|
while (fgets (buf, sizeof buf, stdin))
|
|
{
|
|
p = strchr (buf, '\n');
|
|
if (p)
|
|
*p = 0;
|
|
else
|
|
{
|
|
/* Skip to the end of the line. */
|
|
while ((c = getc (stdin)) != EOF && c != '\n')
|
|
;
|
|
}
|
|
count1++;
|
|
trim_spaces (buf);
|
|
mbox = mailbox_from_userid (buf, no_sub);
|
|
if (mbox)
|
|
{
|
|
printf ("%s\n", mbox);
|
|
xfree (mbox);
|
|
count2++;
|
|
}
|
|
}
|
|
if (verbose)
|
|
fprintf (stderr, PGM ": lines=%u mboxes=%u\n", count1, count2);
|
|
}
|
|
|
|
|
|
int
|
|
main (int argc, char **argv)
|
|
{
|
|
int last_argc = -1;
|
|
int opt_filter = 0;
|
|
int opt_no_sub = 0;
|
|
|
|
if (argc)
|
|
{ argc--; argv++; }
|
|
while (argc && last_argc != argc )
|
|
{
|
|
last_argc = argc;
|
|
if (!strcmp (*argv, "--"))
|
|
{
|
|
argc--; argv++;
|
|
break;
|
|
}
|
|
else if (!strcmp (*argv, "--help"))
|
|
{
|
|
fputs ("usage: " PGM " [FILE]\n"
|
|
"Options:\n"
|
|
" --verbose Print timings etc.\n"
|
|
" --debug Flyswatter\n"
|
|
" --filter Filter mboxes from input lines\n"
|
|
" --no-sub Ignore '+'-sub-addresses\n"
|
|
, stdout);
|
|
exit (0);
|
|
}
|
|
else if (!strcmp (*argv, "--verbose"))
|
|
{
|
|
verbose++;
|
|
argc--; argv++;
|
|
}
|
|
else if (!strcmp (*argv, "--debug"))
|
|
{
|
|
verbose += 2;
|
|
debug++;
|
|
argc--; argv++;
|
|
}
|
|
else if (!strcmp (*argv, "--filter"))
|
|
{
|
|
opt_filter = 1;
|
|
argc--; argv++;
|
|
}
|
|
else if (!strcmp (*argv, "--no-sub"))
|
|
{
|
|
opt_no_sub = 1;
|
|
argc--; argv++;
|
|
}
|
|
else if (!strncmp (*argv, "--", 2))
|
|
{
|
|
fprintf (stderr, PGM ": unknown option '%s'\n", *argv);
|
|
exit (1);
|
|
}
|
|
}
|
|
|
|
if (opt_filter)
|
|
run_filter (opt_no_sub);
|
|
else
|
|
{
|
|
run_mbox_test ();
|
|
run_mbox_no_sub_test ();
|
|
run_dns_test ();
|
|
}
|
|
|
|
return 0;
|
|
}
|