/*

 * testURI.c : a small tester program for XML input.

 *

 * See Copyright for the status of this software.

 *

 * daniel@veillard.com

 */

#include "libxml.h"

#include <string.h>

#include <stdio.h>

#include <stdarg.h>

#include <libxml/xmlmemory.h>

#include <libxml/uri.h>

#include <libxml/globals.h>

static const char *base = NULL;

static int escape = 0;

static int debug = 0;

static void handleURI(const char *str) {

    int ret;

    xmlURIPtr uri;

    xmlChar *res = NULL, *parsed = NULL;

    uri = xmlCreateURI();

    if (base == NULL) {

	ret = xmlParseURIReference(uri, str);

	if (ret != 0)

	    printf("%s : error %d\n", str, ret);

	else {

	    if (debug) {

	        if (uri->scheme) printf("scheme: %s\n", uri->scheme);

	        if (uri->opaque) printf("opaque: %s\n", uri->opaque);

	        if (uri->authority) printf("authority: %s\n", uri->authority);

	        if (uri->server) printf("server: %s\n", uri->server);

	        if (uri->user) printf("user: %s\n", uri->user);

	        if (uri->port != 0) printf("port: %d\n", uri->port);

	        if (uri->path) printf("path: %s\n", uri->path);

	        if (uri->query) printf("query: %s\n", uri->query);

	        if (uri->fragment) printf("fragment: %s\n", uri->fragment);

	        if (uri->query_raw) printf("query_raw: %s\n", uri->query_raw);

	        if (uri->cleanup != 0) printf("cleanup\n");

	    }

	    xmlNormalizeURIPath(uri->path);

	    if (escape != 0) {

		parsed = xmlSaveUri(uri);

		res = xmlURIEscape(parsed);

		printf("%s\n", (char *) res);

	    } else {

		xmlPrintURI(stdout, uri);

		printf("\n");

	    }

	}

    } else {

	res = xmlBuildURI((xmlChar *)str, (xmlChar *) base);

	if (res != NULL) {

	    printf("%s\n", (char *) res);

	}

	else

	    printf("::ERROR::\n");

    }

    if (res != NULL)

	xmlFree(res);

    if (parsed != NULL)

	xmlFree(parsed);

    xmlFreeURI(uri);

}

int main(int argc, char **argv) {

    int i, arg = 1;

    if ((argc > arg) && (argv[arg] != NULL) &&

	((!strcmp(argv[arg], "-base")) || (!strcmp(argv[arg], "--base")))) {

	arg++;

	base = argv[arg];

	if (base != NULL)

	    arg++;

    }

    if ((argc > arg) && (argv[arg] != NULL) &&

	((!strcmp(argv[arg], "-escape")) || (!strcmp(argv[arg], "--escape")))) {

	arg++;

	escape++;

    }

    if ((argc > arg) && (argv[arg] != NULL) &&

	((!strcmp(argv[arg], "-debug")) || (!strcmp(argv[arg], "--debug")))) {

	arg++;

	debug++;

    }

    if (argv[arg] == NULL) {

	char str[1024];

        while (1) {

	    /*

	     * read one line in string buffer.

	     */

	    if (fgets (&str[0], sizeof (str) - 1, stdin) == NULL)

	       break;

	    /*

	     * remove the ending spaces

	     */

	    i = strlen(str);

	    while ((i > 0) &&

		   ((str[i - 1] == '\n') || (str[i - 1] == '\r') ||

		    (str[i - 1] == ' ') || (str[i - 1] == '\t'))) {

		i--;

		str[i] = 0;

	    }

	    handleURI(str);

        }

    } else {

	while (argv[arg] != NULL) {

	    handleURI(argv[arg]);

	    arg++;

	}

    }

    xmlMemoryDump();

    return(0);

}