Mercurial > hg > ucx / file revision

/*
 * tests of list implementation
 */

#include <stdio.h>
#include <stdlib.h>

#include "ucx/list.h"
#include "ucx/dlist.h"

struct test1_data {
    int values[3];
    int i;
};

int list_tests_foreach1(void *v, void *custom) {
    UcxDlist *dl = (UcxDlist*)v;
    struct test1_data *tdata = (struct test1_data*)custom;

    tdata->values[tdata->i] = *(int*)dl->data;
    tdata->i++;
}

int list_tests_foreach2(void *v, void *custom) {
    UcxList *dl = (UcxList*)v;
    struct test1_data *tdata = (struct test1_data*)custom;

    tdata->values[tdata->i] = *(int*)dl->data;
    tdata->i++;
}

int dlist_tests() {
    int r = 0;
    int v[8];
    UcxDlist *dl = NULL;
    // build list 0,1,2,3,4,5,6,7
    printf("   Test ucx_dlist_append\n");
    fflush(stdout);
    for(int i=0;i<8;i++) {
        v[i] = i;
        dl = ucx_dlist_append(dl, &v[i]);
    }

    printf("   Test ucx_dlist_get\n");
    fflush(stdout);
    for(int i=0;i<8;i++) {
        UcxDlist *elm = ucx_dlist_get(dl, i);
        if(elm == NULL) {
            fprintf(stderr, "ucx_dlist_get failed: element is NULL\n");
            r--;
        }
        if(elm->data == NULL) {
            fprintf(stderr, "ucx_dlist_get failed: data is NULL\n");
            r--;
        }
        int *data = (int*)elm->data;
        if(*data != i) {
            fprintf(stderr, "ucx_dlist_get failed with index %d\n", i);
            r--;
        }
    }

    printf("   Test ucx_dlist_free\n");
    fflush(stdout);
    ucx_dlist_free(dl);

    dl = NULL;
    // build list 4,0,4
    printf("   Test ucx_dlist_prepend\n");
    dl = ucx_dlist_prepend(dl, &v[0]);
    dl = ucx_dlist_prepend(dl, &v[4]);
    dl = ucx_dlist_append(dl, &v[4]);

    struct test1_data tdata;
    tdata.i = 0;
    ucx_dlist_foreach(dl, list_tests_foreach1, &tdata);

    if(tdata.values[0] != 4 || tdata.values[1] != 0 || tdata.values[2] != 4) {
        fprintf(stderr, "prepend/append test failed\n");
        fprintf(stderr, "content: [%d, %d, %d]\n", tdata.values[0], tdata.values[1], tdata.values[2]);
        r--;
    }

    return r;
}

int list_tests() {
    int r = 0;
    int v[8];
    UcxList *dl = NULL;
    // build list 0,1,2,3,4,5,6,7
    printf("   Test ucx_list_append\n");
    fflush(stdout);
    for(int i=0;i<8;i++) {
        v[i] = i;
        dl = ucx_list_append(dl, &v[i]);
    }

    printf("   Test ucx_list_get\n");
    fflush(stdout);
    for(int i=0;i<8;i++) {
        UcxList *elm = ucx_list_get(dl, i);
        if(elm == NULL) {
            fprintf(stderr, "ucx_list_get failed: element is NULL\n");
            r--;
        }
        if(elm->data == NULL) {
            fprintf(stderr, "ucx_list_get failed: data is NULL\n");
            r--;
        }
        int *data = (int*)elm->data;
        if(*data != i) {
            fprintf(stderr, "ucx_list_get failed with index %d\n", i);
            r--;
        }
    }

    printf("   Test ucx_list_free\n");
    fflush(stdout);
    ucx_list_free(dl);

    dl = NULL;
    // build list 4,0,4
    printf("   Test ucx_list_prepend\n");
    dl = ucx_list_prepend(dl, &v[0]);
    dl = ucx_list_prepend(dl, &v[4]);
    dl = ucx_list_append(dl, &v[4]);

    struct test1_data tdata;
    tdata.i = 0;
    ucx_list_foreach(dl, list_tests_foreach1, &tdata);

    if(tdata.values[0] != 4 || tdata.values[1] != 0 || tdata.values[2] != 4) {
        fprintf(stderr, "prepend/append test failed\n");
        fprintf(stderr, "content: [%d, %d, %d]\n", tdata.values[0], tdata.values[1], tdata.values[2]);
        r--;
    }

    return r;
}