Subversion Repositories HelenOS

/*

 * Copyright (c) 2009 Lukas Mejdrech

 * All rights reserved.

 *

 * Redistribution and use in source and binary forms, with or without

 * modification, are permitted provided that the following conditions

 * are met:

 *

 * - Redistributions of source code must retain the above copyright

 *   notice, this list of conditions and the following disclaimer.

 * - 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.

 * - The name of the author may not be used to endorse or promote products

 *   derived from this software without specific prior written permission.

 *

 * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``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 AUTHOR 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.

 */

/** @addtogroup net

 *  @{

 */

/** @file

 */

#include "configuration.h"

#if NET_SELF_TEST

#include <errno.h>

#include <malloc.h>

#include <stdio.h>

#include "include/crc.h"

#include "structures/int_map.h"

#include "structures/char_map.h"

#include "structures/generic_char_map.h"

#include "structures/measured_strings.h"

#include "self_test.h"

#define TEST( name, function_call, result );    {   \

    printf( "\n\t%s", ( name ));                    \

    if(( function_call ) != ( result )){            \

        printf( "\tERROR" );                        \

        error = 1;                                  \

    }else{                                          \

        printf( "\tOK" );                           \

    }                                               \

}

#if NET_SELF_TEST_INT_MAP

    INT_MAP_DECLARE( int_map, int );

    INT_MAP_IMPLEMENT( int_map, int );

#endif

#if NET_SELF_TEST_GENERIC_FIELD

    GENERIC_FIELD_DECLARE( int_field, int )

    GENERIC_FIELD_IMPLEMENT( int_field, int )

#endif

#if NET_SELF_TEST_GENERIC_CHAR_MAP

    GENERIC_CHAR_MAP_DECLARE( int_char_map, int )

    GENERIC_CHAR_MAP_IMPLEMENT( int_char_map, int )

#endif

int self_test( void ){

    int error = 0;

    int * x, * y, * z, * u, * v, * w;

#if NET_SELF_TEST_MEASURED_STRINGS

    measured_string_ref string;

    printf( "\nMeasured strings test" );

    string = measured_string_create_bulk( "I am a measured string!", 0 );

    printf( "\n%x, %s at %x of %d", string, string->value, string->value, string->length );

    printf( "\nOK" );

#endif

#if NET_SELF_TEST_CHAR_MAP

    char_map_t  cm;

    printf( "\nChar map test" );

    TEST( "update ucho 3 einval", char_map_update( & cm, "ucho", 0, 3 ), EINVAL );

    TEST( "initialize", char_map_initialize( & cm ), EOK );

    TEST( "get_value", char_map_get_value( & cm ), CHAR_MAP_NULL );

    TEST( "exclude bla null", char_map_exclude( & cm, "bla", 0 ), CHAR_MAP_NULL );

    TEST( "find bla null", char_map_find( & cm, "bla", 0 ), CHAR_MAP_NULL );

    TEST( "add bla 1 eok", char_map_add( & cm, "bla", 0, 1 ), EOK );

    TEST( "find bla 1", char_map_find( & cm, "bla", 0 ), 1 );

    TEST( "add bla 10 eexists", char_map_add( & cm, "bla", 0, 10 ), EEXISTS );

    TEST( "update bla 2 eok", char_map_update( & cm, "bla", 0, 2 ), EOK );

    TEST( "find bla 2", char_map_find( & cm, "bla", 0 ), 2 );

    TEST( "update ucho 2 eok", char_map_update( & cm, "ucho", 0, 2 ), EOK );

    TEST( "exclude bla 2", char_map_exclude( & cm, "bla", 0 ), 2 );

    TEST( "exclude bla null", char_map_exclude( & cm, "bla", 0 ), CHAR_MAP_NULL );

    TEST( "find ucho 2", char_map_find( & cm, "ucho", 0 ), 2 );

    TEST( "update ucho 3 eok", char_map_update( & cm, "ucho", 0, 3 ), EOK );

    TEST( "find ucho 3", char_map_find( & cm, "ucho", 0 ), 3 );

    TEST( "add blabla 5 eok", char_map_add( & cm, "blabla", 0, 5 ), EOK );

    TEST( "find blabla 5", char_map_find( & cm, "blabla", 0 ), 5 );

    TEST( "add bla 6 eok", char_map_add( & cm, "bla", 0, 6 ), EOK );

    TEST( "find bla 6", char_map_find( & cm, "bla", 0 ), 6 );

    TEST( "exclude bla 6", char_map_exclude( & cm, "bla", 0 ), 6 );

    TEST( "find bla null", char_map_find( & cm, "bla", 0 ), CHAR_MAP_NULL );

    TEST( "find blabla 5", char_map_find( & cm, "blabla", 0 ), 5 );

    TEST( "add auto 7 eok", char_map_add( & cm, "auto", 0, 7 ), EOK );

    TEST( "find auto 7", char_map_find( & cm, "auto", 0 ), 7 );

    TEST( "add kara 8 eok", char_map_add( & cm, "kara", 0, 8 ), EOK );

    TEST( "find kara 8", char_map_find( & cm, "kara", 0 ), 8 );

    TEST( "add nic 9 eok", char_map_add( & cm, "nic", 0, 9 ), EOK );

    TEST( "find nic 9", char_map_find( & cm, "nic", 0 ), 9 );

    TEST( "find blabla 5", char_map_find( & cm, "blabla", 0 ), 5 );

    printf( "\n\tdestroy" );

    char_map_destroy( & cm );

    TEST( "update ucho 3 einval", char_map_update( & cm, "ucho", 0, 3 ), EINVAL );

    printf( "\nOK" );

    if( error ) return EINVAL;

#endif

#if NET_SELF_TEST_INT_MAP

    int_map_t   im;

    x = ( int * ) malloc( sizeof( int ));

    y = ( int * ) malloc( sizeof( int ));

    z = ( int * ) malloc( sizeof( int ));

    u = ( int * ) malloc( sizeof( int ));

    v = ( int * ) malloc( sizeof( int ));

    w = ( int * ) malloc( sizeof( int ));

    im.magic = 0;

    printf( "\nInt map test" );

    TEST( "add 1 x einval", int_map_add( & im, 1, x ), EINVAL );

    TEST( "count -1", int_map_count( & im ), -1 );

    TEST( "initialize", int_map_initialize( & im ), EOK );

    TEST( "count 0", int_map_count( & im ), 0 );

    TEST( "find 1 null", int_map_find( & im, 1 ), NULL );

    TEST( "add 1 x 0", int_map_add( & im, 1, x ), 0 );

    TEST( "find 1 x", int_map_find( & im, 1 ), x );

    int_map_exclude( & im, 1 );

    TEST( "find 1 null", int_map_find( & im, 1 ), NULL );

    TEST( "add 1 y 1", int_map_add( & im, 1, y ), 1 );

    TEST( "find 1 y", int_map_find( & im, 1 ), y );

    TEST( "add 4 z 2", int_map_add( & im, 4, z ), 2 );

    TEST( "get 2 z", int_map_get_index( & im, 2 ), z );

    TEST( "find 4 z", int_map_find( & im, 4 ), z );

    TEST( "find 1 y", int_map_find( & im, 1 ), y );

    TEST( "count 3", int_map_count( & im ), 3 );

    TEST( "add 2 u 3", int_map_add( & im, 2, u ), 3 );

    TEST( "find 2 u", int_map_find( & im, 2 ), u );

    TEST( "add 3 v 4", int_map_add( & im, 3, v ), 4 );

    TEST( "find 3 v", int_map_find( & im, 3 ), v );

    TEST( "get 4 v", int_map_get_index( & im, 4 ), v );

    TEST( "add 6 w 5", int_map_add( & im, 6, w ), 5 );

    TEST( "find 6 w", int_map_find( & im, 6 ), w );

    TEST( "count 6", int_map_count( & im ), 6 );

    int_map_exclude( & im, 1 );

    TEST( "find 1 null", int_map_find( & im, 1 ), NULL );

    TEST( "find 2 u", int_map_find( & im, 2 ), u );

    int_map_exclude( & im, 7 );

    TEST( "find 2 u", int_map_find( & im, 2 ), u );

    TEST( "find 6 w", int_map_find( & im, 6 ), w );

    int_map_exclude_index( & im, 4 );

    TEST( "get 4 null", int_map_get_index( & im, 4 ), NULL );

    TEST( "find 3 null", int_map_find( & im, 3 ), NULL );

    printf( "\n\tdestroy" );

    int_map_destroy( & im );

    TEST( "count -1", int_map_count( & im ), -1 );

    printf( "\nOK" );

    if( error ) return EINVAL;

#endif

#if NET_SELF_TEST_GENERIC_FIELD

    int_field_t gf;

    x = ( int * ) malloc( sizeof( int ));

    y = ( int * ) malloc( sizeof( int ));

    z = ( int * ) malloc( sizeof( int ));

    u = ( int * ) malloc( sizeof( int ));

    v = ( int * ) malloc( sizeof( int ));

    w = ( int * ) malloc( sizeof( int ));

    gf.magic = 0;

    printf( "\nGeneric field test" );

    TEST( "add x einval", int_field_add( & gf, x ), EINVAL );

    TEST( "count -1", int_field_count( & gf ), -1 );

    TEST( "initialize", int_field_initialize( & gf ), EOK );

    TEST( "count 0", int_field_count( & gf ), 0 );

    TEST( "get 1 null", int_field_get_index( & gf, 1 ), NULL );

    TEST( "add x 0", int_field_add( & gf, x ), 0 );

    TEST( "get 0 x", int_field_get_index( & gf, 0 ), x );

    int_field_exclude_index( & gf, 0 );

    TEST( "get 0 null", int_field_get_index( & gf, 0 ), NULL );

    TEST( "add y 1", int_field_add( & gf, y ), 1 );

    TEST( "get 1 y", int_field_get_index( & gf, 1 ), y );

    TEST( "add z 2", int_field_add( & gf, z ), 2 );

    TEST( "get 2 z", int_field_get_index( & gf, 2 ), z );

    TEST( "get 1 y", int_field_get_index( & gf, 1 ), y );

    TEST( "count 3", int_field_count( & gf ), 3 );

    TEST( "add u 3", int_field_add( & gf, u ), 3 );

    TEST( "get 3 u", int_field_get_index( & gf, 3 ), u );

    TEST( "add v 4", int_field_add( & gf, v ), 4 );

    TEST( "get 4 v", int_field_get_index( & gf, 4 ), v );

    TEST( "add w 5", int_field_add( & gf, w ), 5 );

    TEST( "get 5 w", int_field_get_index( & gf, 5 ), w );

    TEST( "count 6", int_field_count( & gf ), 6 );

    int_field_exclude_index( & gf, 1 );

    TEST( "get 1 null", int_field_get_index( & gf, 1 ), NULL );

    TEST( "get 3 u", int_field_get_index( & gf, 3 ), u );

    int_field_exclude_index( & gf, 7 );

    TEST( "get 3 u", int_field_get_index( & gf, 3 ), u );

    TEST( "get 5 w", int_field_get_index( & gf, 5 ), w );

    int_field_exclude_index( & gf, 4 );

    TEST( "get 4 null", int_field_get_index( & gf, 4 ), NULL );

    printf( "\n\tdestroy" );

    int_field_destroy( & gf );

    TEST( "count -1", int_field_count( & gf ), -1 );

    printf( "\nOK" );

    if( error ) return EINVAL;

#endif

#if NET_SELF_TEST_GENERIC_CHAR_MAP

    int_char_map_t  icm;

    x = ( int * ) malloc( sizeof( int ));

    y = ( int * ) malloc( sizeof( int ));

    z = ( int * ) malloc( sizeof( int ));

    u = ( int * ) malloc( sizeof( int ));

    v = ( int * ) malloc( sizeof( int ));

    w = ( int * ) malloc( sizeof( int ));

    icm.magic = 0;

    printf( "\nGeneric char map test" );

    TEST( "add ucho z einval", int_char_map_add( & icm, "ucho", 0, z ), EINVAL );

    TEST( "initialize", int_char_map_initialize( & icm ), EOK );

    printf( "\n\texclude bla null" );

    int_char_map_exclude( & icm, "bla", 0 );

    TEST( "find bla null", int_char_map_find( & icm, "bla", 0 ), NULL );

    TEST( "add bla x eok", int_char_map_add( & icm, "bla", 0, x ), EOK );

    TEST( "find bla x", int_char_map_find( & icm, "bla", 0 ), x );

    TEST( "add bla y eexists", int_char_map_add( & icm, "bla", 0, y ), EEXISTS );

    printf( "\n\texclude bla y" );

    int_char_map_exclude( & icm, "bla", 0 );

    printf( "\n\texclude bla null" );

    int_char_map_exclude( & icm, "bla", 0 );

    TEST( "add blabla v eok", int_char_map_add( & icm, "blabla", 0, v ), EOK );

    TEST( "find blabla v", int_char_map_find( & icm, "blabla", 0 ), v );

    TEST( "add bla w eok", int_char_map_add( & icm, "bla", 0, w ), EOK );

    TEST( "find bla w", int_char_map_find( & icm, "bla", 0 ), w );

    printf( "\n\texclude bla" );

    int_char_map_exclude( & icm, "bla", 0 );

    TEST( "find bla null", int_char_map_find( & icm, "bla", 0 ), NULL );

    TEST( "find blabla v", int_char_map_find( & icm, "blabla", 0 ), v );

    TEST( "add auto u eok", int_char_map_add( & icm, "auto", 0, u ), EOK );

    TEST( "find auto u", int_char_map_find( & icm, "auto", 0 ), u );

    printf( "\n\tdestroy" );

    int_char_map_destroy( & icm );

    TEST( "add ucho z einval", int_char_map_add( & icm, "ucho", 0, z ), EINVAL );

    printf( "\nOK" );

    if( error ) return EINVAL;

#endif

#if NET_SELF_TEST_CRC

    uint32_t    value;

    printf( "\nCRC computation test" );

    value = ~ compute_crc32( ~ 0, "123456789", 8 * 9 );

    TEST( "123456789", value, 0xCBF43926 );

    printf( "\t=> %X", value );

    value = ~ compute_crc32( ~ 0, "1", 8 );

    TEST( "1", value, 0x83DCEFB7 );

    printf( "\t=> %X", value );

    value = ~ compute_crc32( ~ 0, "12", 8 * 2 );

    TEST( "12", value, 0x4F5344CD );

    printf( "\t=> %X", value );

    value = ~ compute_crc32( ~ 0, "123", 8 * 3 );

    TEST( "123", value, 0x884863D2 );

    printf( "\t=> %X", value );

    value = ~ compute_crc32( ~ 0, "1234", 8 * 4 );

    TEST( "1234", value, 0x9BE3E0A3 );

    printf( "\t=> %X", value );

    value = ~ compute_crc32( ~ 0, "12345678", 8 * 8 );

    TEST( "12345678", value, 0x9AE0DAAF );

    printf( "\t=> %X", value );

    value = ~ compute_crc32( ~ 0, "ahoj pane", 8 * 9 );

    TEST( "ahoj pane", value, 0x5FC3D706 );

    printf( "\t=> %X", value );

    if( error ) return EINVAL;

#endif

    return EOK;

}

#endif

/** @}

 */