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

Go to the documentation of this file.

/*
 * Author: MA Hartman
 * Date: apr 12, 2007
 * 
 * Function:
 * Test program for libbiosphere.
 * 
 * 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 <biosphere_lib.h>
#include <type.h>

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


int main(int argc, char *argv[])
{
        int exit_code = 0;
        apr_pool_t *mp;
        bs_definition *def, *cpy;
        bs_data_type *dt1, *dt2;
        bs_message_part *part1, *part2;
        bs_message *msg1, *msg2;
        bs_port_type *pt;
        bs_operation *op;
        bs_port *port;
        bs_service *svc;
        
        apr_initialize();
        apr_pool_create(&mp, NULL);

        /* Set up definition: */
        def = new_bs_definition(mp, "definition", 4, 2, 1, 1);
        dt1 = new_bs_data_type(mp, "data_type1");
        dt2 = new_bs_data_type(mp, "data_type2");
        def->data_types[0] = dt1;
        def->data_types[1] = dt2;
        
        part1 = new_bs_message_part(mp, "part1", dt1);
        part2 = new_bs_message_part(mp, "part2", dt2);
        msg1 = new_bs_message(mp, "message1", 2);
        msg1->parts[0] = part1;
        msg1->parts[1] = part2;
        def->messages[0] = msg1;
        
        dt1 = new_bs_data_type(mp, "data_type3");
        dt2 = new_bs_data_type(mp, "data_type4");
        def->data_types[2] = dt1;
        def->data_types[3] = dt2;
        part1 = new_bs_message_part(mp, "part3", dt1);
        part2 = new_bs_message_part(mp, "part4", dt2);
        msg2 = new_bs_message(mp, "message2", 2);
        msg2->parts[0] = part1;
        msg2->parts[1] = part2;
        def->messages[1] = msg2;
        
        op = new_bs_operation(mp, "operation1", msg1, msg2, NULL);
        pt = new_bs_port_type(mp, "port_type1", 1);
        pt->operations[0] = op;
        def->port_types[0] = pt;
        port = new_bs_port(mp, "port1", pt);
        svc = new_bs_service(mp, "service1", 1);
        svc->ports[0] = port;
        def->services[0] = svc;
        
        /* Make a copy: */
        cpy = copy_bs_definition(def);
        
        /* Check if it's correct: */
        if (cpy->num_data_types != 4) exit_code = 1;
        else if (cpy->num_messages != 2) exit_code = 2;
        else if (cpy->num_port_types != 1) exit_code = 3;
        else if (cpy->num_services != 1) exit_code = 4;
        else if (apr_strnatcmp(cpy->data_types[0]->name, "data_type1") != 0) exit_code = 5;
        else if (apr_strnatcmp(cpy->data_types[1]->name, "data_type2") != 0) exit_code = 6;
        else if (apr_strnatcmp(cpy->data_types[2]->name, "data_type3") != 0) exit_code = 7;
        else if (apr_strnatcmp(cpy->data_types[3]->name, "data_type4") != 0) exit_code = 8;
        else if (apr_strnatcmp(cpy->messages[0]->name, "message1") != 0) exit_code = 9;
        else if (apr_strnatcmp(cpy->messages[0]->parts[0]->name, "part1") != 0) exit_code = 10;
        else if (apr_strnatcmp(cpy->messages[0]->parts[1]->name, "part2") != 0) exit_code = 11;
        else if (apr_strnatcmp(cpy->messages[1]->name, "message2") != 0) exit_code = 12;
        else if (apr_strnatcmp(cpy->messages[1]->parts[0]->name, "part3") != 0) exit_code = 13;
        else if (apr_strnatcmp(cpy->messages[1]->parts[1]->name, "part4") != 0) exit_code = 14;
        else if (apr_strnatcmp(cpy->port_types[0]->name, "port_type1") != 0) exit_code = 15;
        else if (apr_strnatcmp(cpy->port_types[0]->operations[0]->name, "operation1") != 0) exit_code = 16;
        else if (apr_strnatcmp(cpy->port_types[0]->operations[0]->input->name, "message1") != 0) exit_code = 17;
        else if (apr_strnatcmp(cpy->port_types[0]->operations[0]->output->name, "message2") != 0) exit_code = 18;
        else if (apr_strnatcmp(cpy->services[0]->name, "service1") != 0) exit_code = 19;
        else if (apr_strnatcmp(cpy->services[0]->ports[0]->name, "port1") != 0) exit_code = 20;
        else if (apr_strnatcmp(cpy->services[0]->ports[0]->port_type->name, "port_type1") != 0) exit_code = 21;
        
        delete_bs_definition(cpy);
        apr_pool_destroy(mp);
        apr_terminate();
        return exit_code;
}

---