/*
* DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS HEADER.
*
* Copyright 2020 Olaf Wintermann. All rights reserved.
*
* Redistribution and use in source and binary forms, with or without
* modification, are permitted provided that the following conditions are met:
*
* 1. Redistributions of source code must retain the above copyright
* notice, this list of conditions and the following disclaimer.
*
* 2. Redistributions in binary form must reproduce the above copyright
* notice, this list of conditions and the following disclaimer in the
* documentation and/or other materials provided with the distribution.
*
* THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS"
* AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
* IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
* ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT HOLDER OR CONTRIBUTORS BE
* LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
* CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
* SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
* INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
* CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
* ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
* POSSIBILITY OF SUCH DAMAGE.
*/
#include "xml.h"
#include <stdio.h>
#include <stdlib.h>
#include <libxml/tree.h>
#include "testutils.h"
#include "../public/webdav.h"
#include "../util/writer.h"
#include "../webdav/webdav.h"
#include "../webdav/xml.h"
typedef struct Test1Data {
int beginCounter;
int endCounter;
int elmCounter;
int endElmCounter;
int textErr;
int err;
int endErr;
int nodesWithAttributesCounter;
xmlNode *prev;
} Test1Data;
static int test1_begin(xmlNode *node, void *userdata) {
Test1Data *data = userdata;
data->beginCounter++;
if(node->type == XML_ELEMENT_NODE) {
data->elmCounter++;
const char *name = (const char*)node->name;
if(!strcmp(name, "ignore") || !strcmp(name, "ignore")) {
data->err = 1;
return 1;
}
switch(data->elmCounter) {
case 1: if(strcmp(name, "test")){ data->err = 1; return 1; } break;
case 2: if(strcmp(name, "elm1")) { data->err = 1; return 1; } break;
case 3: if(strcmp(name, "elm2")) { data->err = 1; return 1; } break;
case 4: if(strcmp(name, "c")) { data->err = 1; return 1; } break;
case 5: if(strcmp(name, "a")) { data->err = 1; return 1; } break;
case 6: if(strcmp(name, "d")) { data->err = 1; return 1; } break;
case 7: if(strcmp(name, "e")) { data->err = 1; return 1; } break;
case 8: if(strcmp(name, "b")) { data->err = 1; return 1; } break;
case 9: if(strcmp(name, "x")) { data->err = 1; return 1; } break;
case 10: if(strcmp(name, "z")) { data->err = 1; return 1; } break;
case 11: if(strcmp(name, "nextelm")) { data->err = 1; return 1; } break;
}
} else if(node->type == XML_TEXT_NODE) {
const char *text = (const char*)node->content;
if(!strcmp(text, "teststr")) {
if(strcmp((const char*)data->prev->name, "elm1")) {
data->textErr = 1;
return 1;
}
} else if(!strcmp(text, "hello") || !strcmp(text, "world")) {
if(strcmp((const char*)data->prev->name, "a")) {
data->textErr = 1;
return 1;
}
}
}
if(node->type == XML_ELEMENT_NODE) {
data->prev = node;
}
return 0;
}
static int test1_end(xmlNode *node, void *userdata) {
Test1Data *data = userdata;
data->endCounter++;
if(node->type == XML_ELEMENT_NODE) {
data->endElmCounter++;
const char *name = (const char*)node->name;
if(!strcmp(name, "ignore") || !strcmp(name, "ignore")) {
data->err = 1;
return 1;
}
switch(data->endElmCounter) {
case 1: if(strcmp(name, "elm1")){ data->endErr = 1; return 1; } break;
case 2: if(strcmp(name, "elm2")){ data->endErr = 1; return 1; } break;
case 3: if(strcmp(name, "a")){ data->endErr = 1; return 1; } break;
case 4: if(strcmp(name, "b")){ data->endErr = 1; return 1; } break;
case 5: if(strcmp(name, "e")){ data->endErr = 1; return 1; } break;
case 6: if(strcmp(name, "d")){ data->endErr = 1; return 1; } break;
case 7: if(strcmp(name, "c")){ data->endErr = 1; return 1; } break;
case 8: if(strcmp(name, "z")){ data->endErr = 1; return 1; } break;
case 9: if(strcmp(name, "x")){ data->endErr = 1; return 1; } break;
case 10: if(strcmp(name, "test")){ data->endErr = 1; return 1; } break;
case 11: if(strcmp(name, "nextelm")) { data->endErr = 1; return 1; } break;
}
}
return 0;
}
static int test2_begin(xmlNode *node, void *userdata) {
Test1Data *data = userdata;
data->beginCounter++;
if(node->type == XML_ELEMENT_NODE) {
data->elmCounter++;
if(node->properties) {
data->nodesWithAttributesCounter++;
}
}
return 0;
}
static int test2_end(xmlNode *node, void *userdata) {
Test1Data *data = userdata;
data->endCounter++;
if(node->type == XML_ELEMENT_NODE) {
data->endElmCounter++;
}
return 0;
}
UCX_TEST(test_wsxml_iterator) {
Session *sn = testutil_session();
UCX_TEST_BEGIN;
xmlDoc *doc = xmlReadMemory(
XML_TESTDATA1, strlen(XML_TESTDATA1), NULL, NULL, 0);
xmlDoc *doc2 = xmlReadMemory(
XML_TESTDATA2, strlen(XML_TESTDATA2), NULL, NULL, 0);
xmlDoc *doc6 = xmlReadMemory(
XML_TESTDATA6, strlen(XML_TESTDATA6), NULL, NULL, 0);
UCX_TEST_ASSERT(doc, "doc is NULL");
UCX_TEST_ASSERT(doc2, "doc2 is NULL");
UCX_TEST_ASSERT(doc6, "doc6 is NULL");
xmlNode *root = xmlDocGetRootElement(doc);
// Test 1: iterate over complete document
Test1Data testdata;
ZERO(&testdata, sizeof(Test1Data));
int ret = wsxml_iterator(sn->pool, root, test1_begin, test1_end, &testdata);
UCX_TEST_ASSERT(ret == 0, "wsxml_iterator failed");
UCX_TEST_ASSERT(!testdata.err, "wrong element order (begin)");
UCX_TEST_ASSERT(!testdata.endErr, "wrong element order (end)");
UCX_TEST_ASSERT(!testdata.textErr, "text order error");
UCX_TEST_ASSERT(testdata.beginCounter == testdata.endCounter, "begin/end counter not equal");
// Test 2: iterate over sub-document
ZERO(&testdata, sizeof(Test1Data));
xmlNode *root2 = xmlDocGetRootElement(doc2);
xmlNode *sub = root2->children->children;
ret = wsxml_iterator(sn->pool, sub, test1_begin, test1_end, &testdata);
UCX_TEST_ASSERT(ret == 0, "test2: wsxml_iterator failed");
UCX_TEST_ASSERT(!testdata.err, "test2: wrong element order (begin)");
UCX_TEST_ASSERT(!testdata.endErr, "test2: wrong element order (end)");
UCX_TEST_ASSERT(!testdata.textErr, "test2: text order error");
UCX_TEST_ASSERT(testdata.beginCounter == testdata.endCounter, "test2: begin/end counter not equal");
// Test 3: iterate over document with all kinds of node types
xmlNode *root6 = xmlDocGetRootElement(doc6);
ZERO(&testdata, sizeof(Test1Data));
ret = wsxml_iterator(sn->pool, root6, test2_begin, test2_end, &testdata);
UCX_TEST_ASSERT(ret == 0, "test3: wsxml_iterator failed");
UCX_TEST_ASSERT(testdata.elmCounter == testdata.endElmCounter, "test3: begin/end counter not equal");
UCX_TEST_ASSERT(testdata.elmCounter == 12, "test3: wrong elm counter");
UCX_TEST_ASSERT(testdata.nodesWithAttributesCounter == 5, "test3: wrong entity ref counter");
xmlFreeDoc(doc);
xmlFreeDoc(doc2);
xmlFreeDoc(doc6);
UCX_TEST_END;
testutil_destroy_session(sn);
}
// checks if the namespace list contains the test namespaces x1, x2, x3 and x4
static void check_ns_list(WebdavNSList *list, int *x1, int *x2, int *x3, int *x4) {
*x1 = 0;
*x2 = 0;
*x3 = 0;
*x4 = 0;
WebdavNSList *elm = list;
while(elm) {
if(!strcmp((const char*)elm->namespace->prefix, "x1") &&
!strcmp((const char*)elm->namespace->href, "http://example.com/ns1/"))
{
*x1 = 1;
} else if(!strcmp((const char*)elm->namespace->prefix, "x2") &&
!strcmp((const char*)elm->namespace->href, "http://example.com/ns2/"))
{
*x2 = 1;
} else if(!strcmp((const char*)elm->namespace->prefix, "x3") &&
!strcmp((const char*)elm->namespace->href, "http://example.com/ns_0/"))
{
*x3 = 1;
} else if(!strcmp((const char*)elm->namespace->prefix, "x4") &&
!strcmp((const char*)elm->namespace->href, "http://example.com/ns_0/"))
{
*x4 = 1;
}
elm = elm->next;
}
}
UCX_TEST(test_wsxml_get_required_namespaces) {
Session *sn = testutil_session();
UCX_TEST_BEGIN;
xmlDoc *doc3 = xmlReadMemory(
XML_TESTDATA3, strlen(XML_TESTDATA3), NULL, NULL, 0);
xmlDoc *doc4 = xmlReadMemory(
XML_TESTDATA4, strlen(XML_TESTDATA4), NULL, NULL, 0);
xmlDoc *doc5 = xmlReadMemory(
XML_TESTDATA5, strlen(XML_TESTDATA5), NULL, NULL, 0);
xmlNode *node0 = xmlDocGetRootElement(doc3);
xmlNode *node1 = xmlDocGetRootElement(doc3)->children;
xmlNode *node2 = xmlDocGetRootElement(doc4)->children;
xmlNode *node3 = xmlDocGetRootElement(doc5)->children;
UCX_TEST_ASSERT(doc3, "doc3 is NULL");
UCX_TEST_ASSERT(doc4, "doc4 is NULL");
UCX_TEST_ASSERT(doc5, "doc5 is NULL");
int err0, err1, err2, err3;
int x1 = 0;
int x2 = 0;
int x3 = 0;
int x4 = 0;
WebdavNSList *elm = NULL;
// Test 0:
WebdavNSList *ns0 = wsxml_get_required_namespaces(sn->pool, node0, &err0);
UCX_TEST_ASSERT(!err0, "ns0 failed");
UCX_TEST_ASSERT(!ns0, "ns0: nsdefs should be ignored");
WebdavNSList *ns1 = wsxml_get_required_namespaces(sn->pool, node1, &err1);
check_ns_list(ns1, &x1, &x2, &x3, &x4);
UCX_TEST_ASSERT(!err1, "ns1 failed");
UCX_TEST_ASSERT(ns1, "ns1: no list");
UCX_TEST_ASSERT(x1, "ns1: x1 missing");
UCX_TEST_ASSERT(x2, "ns1: x2 missing");
UCX_TEST_ASSERT(x3, "ns1: x3 missing");
UCX_TEST_ASSERT(x4, "ns1: x4 missing");
WebdavNSList *ns2 = wsxml_get_required_namespaces(sn->pool, node2, &err2);
check_ns_list(ns2, &x1, &x2, &x3, &x4);
UCX_TEST_ASSERT(!err2, "ns2 failed");
UCX_TEST_ASSERT(ns2, "ns2: no list");
UCX_TEST_ASSERT(x1, "ns2: x1 missing");
UCX_TEST_ASSERT(x2, "ns2: x2 missing");
UCX_TEST_ASSERT(!x3, "ns2: x3");
UCX_TEST_ASSERT(!x4, "ns2: x4");
WebdavNSList *ns3 = wsxml_get_required_namespaces(sn->pool, node3, &err3);
check_ns_list(ns3, &x1, &x2, &x3, &x4);
UCX_TEST_ASSERT(!err3, "ns3 failed");
UCX_TEST_ASSERT(ns3, "ns3: no list");
UCX_TEST_ASSERT(x1, "ns3: x1 missing");
UCX_TEST_ASSERT(x2, "ns3: x2 missing");
UCX_TEST_ASSERT(!x3, "ns3: x3");
UCX_TEST_ASSERT(!x4, "ns3: x4");
xmlFreeDoc(doc3);
xmlFreeDoc(doc4);
xmlFreeDoc(doc5);
UCX_TEST_END;
testutil_destroy_session(sn);
}
UCX_TEST(test_wsxml_write_nodes) {
Session *sn = testutil_session();
TestIOStream *st = testutil_iostream(2048, TRUE);
UCX_TEST_BEGIN;
xmlDoc *doc = xmlReadMemory(
XML_TESTDATA6, strlen(XML_TESTDATA6), NULL, NULL, 0);
UCX_TEST_ASSERT(doc, "xml parser error");
xmlNode *root = xmlDocGetRootElement(doc);
Writer writer;
char buffer[1024];
writer_init(&writer, st, buffer, 1024);
int err = wsxml_write_nodes(sn->pool, &writer, NULL, root);
writer_flush(&writer);
UCX_TEST_ASSERT(err == 0, "wsxml_write_nodes error");
UCX_TEST_ASSERT(st->buf->pos > 0, "buffer is empty");
//printf("\n\n");
//printf("%.*s\n", (int)st->buf->size, st->buf->space);
//printf("\n\n");
xmlDoc *genDoc = xmlReadMemory(
st->buf->space, st->buf->size, NULL, NULL, 0);
UCX_TEST_ASSERT(genDoc, "generated doc is not valid xml");
xmlFreeDoc(doc);
xmlFreeDoc(genDoc);
UCX_TEST_END;
testutil_iostream_destroy(st);
testutil_destroy_session(sn);
}
UCX_TEST(test_wsxml_nslist2string) {
Session *sn = testutil_session();
UCX_TEST_BEGIN;
WSNamespace ns1;
WSNamespace ns2;
WSNamespace ns3;
memset(&ns1, 0, sizeof(WSNamespace));
memset(&ns2, 0, sizeof(WSNamespace));
memset(&ns3, 0, sizeof(WSNamespace));
ns1.prefix = (const xmlChar*)"x";
ns1.href = (const xmlChar*)"ns1";
ns2.prefix = (const xmlChar*)"y";
ns2.href = (const xmlChar*)"ns2";
ns3.prefix = (const xmlChar*)"z";
ns3.href = (const xmlChar*)"ns3";
WebdavNSList elm1 = { &ns1, NULL, NULL };
WebdavNSList elm2 = { &ns2, NULL, NULL };
WebdavNSList elm3 = { &ns3, NULL, NULL };
// single elm test
char *str1 = wsxml_nslist2string(sn->pool, &elm1);
UCX_TEST_ASSERT(str1, "str1 is null");
UCX_TEST_ASSERT(!strcmp(str1, "x:ns1"), "str1: wrong content");
// 2 elm test
elm1.next = &elm2;
char *str2 = wsxml_nslist2string(sn->pool, &elm1);
UCX_TEST_ASSERT(str2, "str2 is null");
UCX_TEST_ASSERT(!strcmp(str2, "x:ns1\ny:ns2"), "str2: wrong content");
// 3 elm test
elm2.next = &elm3;
char *str3 = wsxml_nslist2string(sn->pool, &elm1);
UCX_TEST_ASSERT(str3, "str3 is null");
UCX_TEST_ASSERT(!strcmp(str3, "x:ns1\ny:ns2\nz:ns3"), "str3: wrong content");
// empty prefix test
ns1.prefix = NULL;
char *str4 = wsxml_nslist2string(sn->pool, &elm1);
UCX_TEST_ASSERT(str4, "str3 is null");
UCX_TEST_ASSERT(!strcmp(str4, ":ns1\ny:ns2\nz:ns3"), "str4: wrong content");
UCX_TEST_END;
testutil_destroy_session(sn);
}
UCX_TEST(test_wsxml_string2nslist) {
Session *sn = testutil_session();
UCX_TEST_BEGIN;
// empty list
WebdavNSList *list1 = wsxml_string2nslist(sn->pool, "");
UCX_TEST_ASSERT(!list1, "list1 should be NULL");
// 1 elm list
WebdavNSList *list2 = wsxml_string2nslist(sn->pool, "x:ns1");
UCX_TEST_ASSERT(list2, "list2 is NULL");
UCX_TEST_ASSERT(list2->namespace, "list2 namespace is NULL");
UCX_TEST_ASSERT(!strcmp((const char*)list2->namespace->prefix, "x"), "list2: wrong prefix");
UCX_TEST_ASSERT(!strcmp((const char*)list2->namespace->href, "ns1"), "list2: wrong href");
// 2 elm list
WebdavNSList *list3 = wsxml_string2nslist(sn->pool, "x:ns1\ny:ns2");
UCX_TEST_ASSERT(list3, "list3 is NULL");
UCX_TEST_ASSERT(list3->namespace, "list3 namespace is NULL");
UCX_TEST_ASSERT(!strcmp((const char*)list3->namespace->prefix, "x"), "list3: wrong prefix");
UCX_TEST_ASSERT(!strcmp((const char*)list3->namespace->href, "ns1"), "list3: wrong href");
UCX_TEST_ASSERT(list3->next, "list3 elm2 is NULL");
UCX_TEST_ASSERT(list3->next->namespace, "list3 namespace 2 is NULL");
UCX_TEST_ASSERT(!strcmp((const char*)list3->namespace->prefix, "x"), "list3: elm2 wrong prefix");
UCX_TEST_ASSERT(!strcmp((const char*)list3->namespace->href, "ns1"), "list3: elm2 wrong href");
// empty prefix
WebdavNSList *list4 = wsxml_string2nslist(sn->pool, ":x\ny:ns2");
UCX_TEST_ASSERT(list4, "list4 is NULL");
UCX_TEST_ASSERT(list4->namespace, "list4 namespace is NULL");
UCX_TEST_ASSERT(!list4->namespace->prefix, "list4 elm1 prefix should be NULL");
UCX_TEST_ASSERT(!strcmp((const char*)list3->namespace->href, "ns1"), "list3: wrong href");
UCX_TEST_END;
testutil_destroy_session(sn);
}