#include <psyc/uniform.h>
#include <stdlib.h>
#include <stdio.h>
#include <lib.h>

void
testUniform (char *str, int ret)
{
    PsycUniform *uni = malloc(sizeof(PsycUniform));
    memset(uni, 0, sizeof(PsycUniform));
    printf("%s\n", str);
    int r = psyc_uniform_parse(uni, str, strlen(str));

    PP(("[%.*s] : [%.*s] [%.*s] : [%.*s] [%.*s] / "
	"[%.*s] # [%.*s]\n"
	"[%.*s]\n"
	"[%.*s] [%.*s]\n"
	"[%.*s]\n"
	"[%.*s]\n\n",
	(int)PSYC_S2ARG2(uni->scheme),
	(int)PSYC_S2ARG2(uni->slashes),
	(int)PSYC_S2ARG2(uni->host),
	(int)PSYC_S2ARG2(uni->port),
	(int)PSYC_S2ARG2(uni->transport),
	(int)PSYC_S2ARG2(uni->resource),
	(int)PSYC_S2ARG2(uni->channel),
	(int)PSYC_S2ARG2(uni->entity),
	(int)PSYC_S2ARG2(uni->root),
	(int)PSYC_S2ARG2(uni->nick),
	(int)PSYC_S2ARG2(uni->path),
	(int)PSYC_S2ARG2(uni->body)));

    free(uni);
    if (r != ret) {
	fprintf(stderr, "ERROR: psyc_uniform_parse returned %d instead of %d\n",
		r, ret);
	exit(1);
    }
}

int
main ()
{
    testUniform("psyc://foo.tld:4404d/@bar#baz", PSYC_SCHEME_PSYC);
    testUniform("psyc://foo.tld:4404d/#baz", PSYC_SCHEME_PSYC);
    testUniform("psyc://foo:4405/~bar", PSYC_SCHEME_PSYC);
    testUniform("psyc://foo:1234", PSYC_SCHEME_PSYC);
    testUniform("psyc://foo:1234d", PSYC_SCHEME_PSYC);
    testUniform("psyc://foo:-1234", PSYC_SCHEME_PSYC);
    testUniform("psyc://foo:-1234d", PSYC_SCHEME_PSYC);
    testUniform("psyc://foo/", PSYC_SCHEME_PSYC);
    testUniform("psyc://foo", PSYC_SCHEME_PSYC);
    testUniform("psyc://1234567890abcdef:g/~foo", PSYC_SCHEME_PSYC);

    testUniform("xmpp:user@host", PSYC_PARSE_UNIFORM_INVALID_SCHEME);
    testUniform("psyc:host", PSYC_PARSE_UNIFORM_INVALID_SLASHES);
    testUniform("psyc://", PSYC_PARSE_UNIFORM_INVALID_HOST);
    testUniform("psyc://:123/", PSYC_PARSE_UNIFORM_INVALID_HOST);
    testUniform("psyc://host:/~foo", PSYC_PARSE_UNIFORM_INVALID_PORT);
    testUniform("psyc://host:d/~foo", PSYC_PARSE_UNIFORM_INVALID_PORT);
    testUniform("psyc://1234567890abcdef:1g/~foo",
		PSYC_PARSE_UNIFORM_INVALID_TRANSPORT);

    printf("SUCCESS: psyc_uniform_parse passed all tests.\n");
    return 0;
}