diff options
Diffstat (limited to 'libmailutils/tests/url-parse.c')
| -rw-r--r-- | libmailutils/tests/url-parse.c | 142 |
1 files changed, 142 insertions, 0 deletions
diff --git a/libmailutils/tests/url-parse.c b/libmailutils/tests/url-parse.c new file mode 100644 index 000000000..3eb3d1cd0 --- /dev/null +++ b/libmailutils/tests/url-parse.c @@ -0,0 +1,142 @@ +/* GNU Mailutils -- a suite of utilities for electronic mail + Copyright (C) 1999, 2000, 2001, 2007, 2009, 2010 Free Software + Foundation, Inc. + + GNU Mailutils 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, or (at your option) + any later version. + + GNU Mailutils 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 GNU Mailutils; if not, write to the Free Software + Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, + MA 02110-1301 USA */ + +#ifdef HAVE_CONFIG_H +# include <config.h> +#endif +#include <stdlib.h> +#include <stdio.h> +#include <string.h> +#include <mailutils/error.h> +#include <mailutils/errno.h> +#include <mailutils/url.h> +#include <mailutils/secret.h> + +#define CAT2(a,b) a ## b + +#define GET_AND_PRINT(field,u,buf,status) \ + status = CAT2(mu_url_sget_,field) (u, &buf); \ + if (status == MU_ERR_NOENT) \ + buf = ""; \ + else if (status) \ + { \ + mu_error ("cannot get %s: %s", #field, mu_strerror (status)); \ + exit (1); \ + } \ + printf (#field " <%s>\n", buf) + +static void +print_fvpairs (mu_url_t url) +{ + size_t fvc, i; + char **fvp; + int rc = mu_url_sget_fvpairs (url, &fvc, &fvp); + if (rc) + { + mu_error ("cannot get F/V pairs: %s", mu_strerror (rc)); + exit (1); + } + if (fvc == 0) + return; + for (i = 0; i < fvc; i++) + printf ("param[%lu] <%s>\n", (unsigned long) i, fvp[i]); +} + +static void +print_query (mu_url_t url) +{ + size_t qargc, i; + char **qargv; + int rc = mu_url_sget_query (url, &qargc, &qargv); + if (rc) + { + mu_error ("cannot get query: %s", mu_strerror (rc)); + exit (1); + } + if (qargc == 0) + return; + for (i = 0; i < qargc; i++) + printf ("query[%lu] <%s>\n", (unsigned long) i, qargv[i]); +} + +int +main () +{ + char str[1024]; + long port = 0; + mu_url_t u = NULL; + + while (fgets (str, sizeof (str), stdin) != NULL) + { + int rc; + const char *buf; + mu_secret_t secret; + + str[strlen (str) - 1] = '\0'; /* chop newline */ + if (strspn (str, " \t") == strlen (str)) + continue; /* skip empty lines */ + if ((rc = mu_url_create (&u, str)) != 0) + { + fprintf (stderr, "mu_url_create %s ERROR: [%d] %s", + str, rc, mu_strerror (rc)); + exit (1); + } + if ((rc = mu_url_parse (u)) != 0) + { + fprintf (stderr, "%s\n", mu_errname (rc)); + continue; + } + + GET_AND_PRINT (scheme, u, buf, rc); + GET_AND_PRINT (user, u, buf, rc); + + rc = mu_url_get_secret (u, &secret); + if (rc == MU_ERR_NOENT) + printf ("passwd <>\n"); + else if (rc) + { + mu_error ("cannot get %s: %s", "passwd", mu_strerror (rc)); + exit (1); + } + else + { + printf ("passwd <%s>\n", mu_secret_password (secret)); + mu_secret_password_unref (secret); + } + + GET_AND_PRINT (auth, u, buf, rc); + GET_AND_PRINT (host, u, buf, rc); + + rc = mu_url_get_port (u, &port); + if (rc) + { + mu_error ("cannot get %s: %s", "port", mu_strerror (rc)); + exit (1); + } + printf ("port %ld\n", port); + + GET_AND_PRINT (path, u, buf, rc); + print_fvpairs (u); + print_query (u); + + mu_url_destroy (&u); + + } + return 0; +} |