OSSP CVS Repository

ossp-pkg/sio/al_test.c 1.1

---

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

#include "al.h"

#define S(s) s, strlen(s)

al_rc_t printchunk(al_chunk_t *alc, void *u)
{
    printf("C: %8p = %8p + %d\n",
        alc,
        al_chunk_ptr(alc, 0),
        al_chunk_len(alc));

    return AL_OK;
}

#define DUMP(tag,al) do {\
printf("+DUMP(%s)\n",tag);\
al_traverse_cb(al, 0, al_bytes(al), AL_FORWARD, printchunk, NULL);\
printf("-DUMP(%s)\n\n",tag);\
} while (0)

int main()
{
    al_t *al, *al2;
    char buf[10000];
    size_t n;
    char baf[] = "Mittendrin\n";
    int i;

    al_create(&al);
    al_create(&al2);

    al_append_bytes(al, S("Hello world\n"));
    al_attach_buffer(al, S(baf));

    for (i=0; i<500; ++i)
        al_append_bytes(al, S("Huhu world\n"));

    al_append_bytes(al, S("Hello world\n"));


    DUMP("ALL",al);
#if 1
    al_splice(al, 102, 200, al2);
#else
    al_splice(al, 102, 200, NULL);
#endif
    DUMP("SPLICED",al);
    DUMP("BUFFER",al2);

    printf("RESULT\n");
    n = al_bytes(al);
    if (n > 10000) n = 10000;
    al_flatten(al, 0, n, buf);
    fwrite(">>", 2, 1, stdout);
    fwrite(buf, n, 1, stdout);
    fwrite("<<", 2, 1, stdout);

    printf("BUFFER\n");
    n = al_bytes(al2);
    if (n > 10000) n = 10000;
    al_flatten(al2, 0, n, buf);
    fwrite(">>", 2, 1, stdout);
    fwrite(buf, n, 1, stdout);
    fwrite("<<", 2, 1, stdout);


    al_destroy(al2);
    al_destroy(al);


    return 0;
}

---