/Users/maurits/Documents/studie/afstuderen/biosphere/tests/test_xml.c

Go to the documentation of this file.

/*
 * Author: MA Hartman
 * Date: mar 8, 2007
 * 
 * Function:
 * XML translation testing program.
 * 
 * License information:
 * 
 * Copyright (c) 2006 Maurits Hartman
 *
 * Permission is hereby granted, free of charge, to any person
 * obtaining a copy of this software and associated documentation
 * files (the "Software"), to deal in the Software without
 * restriction, including without limitation the rights to use,
 * copy, modify, merge, publish, distribute, sublicense, and/or sell
 * copies of the Software, and to permit persons to whom the
 * Software is furnished to do so, subject to the following
 * conditions:
 * 
 * The above copyright notice and this permission notice shall be
 * included in all copies or substantial portions of the Software.
 * 
 * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND,
 * EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES
 * OF MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND
 * NONINFRINGEMENT. IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT
 * HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY,
 * WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING
 * FROM, OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR
 * OTHER DEALINGS IN THE SOFTWARE.
 * 
 */

#include <xml.h>
#include <type.h>

#include <apr_pools.h>
#include <apr_strings.h>
#include <string.h>
#include <stdio.h>


static void create_request(bs_service_request **req, apr_pool_t *mp)
{
        char *bindata = "this is just random binary data.";
        bs_byte uuid[] = "XXXXXXXXXXXXXXXX";
        char *data2 = "1234567";
        char *data3 = "This is just custom data!";
        bs_service_request *r = NULL;
        bs_message_instance *mi = NULL;
        bs_data_type *t1, *t2, *t3;
        bs_part_instance *p1, *p2, *p3;
        
        t1 = new_bs_data_type(mp, "bs_string");
        t2 = new_bs_data_type(mp, "bs_uint32");
        t3 = new_bs_data_type(mp, "bs_custom");
        p1 = new_bs_part_instance(mp, "part1", t1, bindata, strlen(bindata));
        p2 = new_bs_part_instance(mp, "part2", t2, data2, strlen(data2));
        p3 = new_bs_part_instance(mp, "part3", t3, data3, strlen(data3));
        mi = new_bs_message_instance(mp, "message", 3);
        mi->parts[0] = p1;
        mi->parts[1] = p2;
        mi->parts[2] = p3;
        r = new_bs_service_request(mp, uuid, "test1",
                        "test2", "test3", mi);
        *req = r;
}


int main(int argc, char *argv[])
{
        apr_pool_t *mp;
        bs_status rv;
        bs_service_request *req, *req2;
        char *buf;
        bs_uint64 size;
        unsigned type;
        
        apr_initialize();
        apr_pool_create(&mp, NULL);
        create_request(&req, mp);
        
        /* Parse to XML */
        rv = xlate_request_to_xml(&buf, &size, req, mp);
        if (rv != BS_OK) return 1;
        
        /* Translate back to format: */
        rv = xlate_from_xml(buf, size, (void **) &req2, &type, mp);
        if (rv != BS_OK || type != SERVICE_REQUEST_FROM_XML) return 2;
        
        /* Compare: */
        if (apr_strnatcmp(req->service, req2->service) != 0) return 3;
        if (apr_strnatcmp(req->port, req2->port) != 0) return 4;
        if (apr_strnatcmp(req->operation, req2->operation) != 0) return 5;
        if (apr_strnatcmp(req->operation, req2->operation) != 0) return 5;
        if (apr_strnatcmp(req->input->name, req2->input->name) != 0) return 6;
        if (req->input->num_parts != req2->input->num_parts) return 7;
        
        if (apr_strnatcmp(req->input->parts[0]->name, req2->input->parts[0]->name) != 0) return 8;
        if (apr_strnatcmp(req->input->parts[1]->name, req2->input->parts[1]->name) != 0) return 9;
        if (apr_strnatcmp(req->input->parts[2]->name, req2->input->parts[2]->name) != 0) return 10;
        
        if (apr_strnatcmp(req->input->parts[0]->type->name, req2->input->parts[0]->type->name) != 0) return 11;
        if (apr_strnatcmp(req->input->parts[1]->type->name, req2->input->parts[1]->type->name) != 0) return 12;
        if (apr_strnatcmp(req->input->parts[2]->type->name, req2->input->parts[2]->type->name) != 0) return 13;
        
        if (apr_strnatcmp(req->input->parts[0]->data, req2->input->parts[0]->data) != 0) return 14;
        if (apr_strnatcmp(req->input->parts[1]->data, req2->input->parts[1]->data) != 0) return 15;
        if (apr_strnatcmp(req->input->parts[2]->data, req2->input->parts[2]->data) != 0) return 16;
        
        if (req->input->parts[0]->size != req2->input->parts[0]->size) return 17;
        if (req->input->parts[1]->size != req2->input->parts[1]->size) return 18;
        if (req->input->parts[2]->size != req2->input->parts[2]->size) return 19;
        
        
        apr_pool_destroy(mp);
        apr_terminate();
        return 0;       
}

---