ossp-pkg/sio/al_test.c
1.5
#include <stdlib.h>
#include <stdio.h>
#include <string.h>
#include <ctype.h>
#include "al.h"
#define S(s) s, strlen(s)
const char *fill(char *p, int n)
{
static char buf[4 * 80 + 1];
int k;
k=0;
while (n > 0 && k < sizeof(buf)-5) {
if (isprint(*p)) {
buf[k] = *p;
k += 1;
} else {
sprintf(buf+k,"<%2.2x>",*p);
k += 4;
}
++p;
--n;
}
buf[k] = '\0';
return (const char *)buf;
}
al_rc_t printchunk(al_chunk_t *alc, void *u)
{
size_t len, pre, post;
len = al_chunk_len(alc);
pre = 20; if (pre > len) pre = len;
post = 20; if (post > len-pre) post = len-pre;
printf("C: %08lx + %-6d = ",
(long)al_chunk_ptr(alc, 0),
al_chunk_len(alc));
fputs(fill(al_chunk_ptr(alc,0),pre), stdout);
if (post > 0) {
fputs(" .. ", stdout);
fputs(fill(al_chunk_ptr(alc,len-post),post), stdout);
}
fputs("\n", stdout);
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)
void print(const char *tag, al_t *al)
{
char *buf;
size_t n, len;
n = al_bytes(al);
buf = (char *)malloc(n);
if (buf == NULL) abort();
al_flatten(al, 0, n, buf, &len);
printf("%s = %d of %d\n",tag,len,n);
fwrite(">>", 2, 1, stdout);
fwrite(buf, len, 1, stdout);
fwrite("<<", 2, 1, stdout);
printf("\n\n");
free(buf);
}
void checklen(const char *tag, al_t *al)
{
al_tx_t *tx;
al_chunk_t *cur;
size_t total, total2;
total = 0;
al_txalloc(al, &tx);
al_traverse(al, 0, -1, AL_FORWARD, tx);
while (al_traverse_next(al, tx, &cur) == AL_OK)
total += al_chunk_len(cur);
al_txfree(al, tx);
total2 = al_bytes(al);
if (total != total2)
printf("ERROR: al_bytes(%s=%p): count %d != sum %d\n",
tag,al,total,total2);
}
int main()
{
al_rc_t rc;
al_t *al, *al2, *al3, *al4;
char baf[] = "Mittendrin\n";
int i;
al_create(&al);
al_create(&al2);
al_create(&al3);
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"));
al_append_bytes(al3, S("HUHU WORLD\n"));
DUMP("DATA",al);
DUMP("BUFFER",al2);
DUMP("REPLACEMENT", al3);
rc = al_splice(al, al_bytes(al)-500, 500, al3, al2);
printf("splice result: %d (%s)\n\n",rc,al_error(rc));
checklen("SPLICED",al);
checklen("BUFFER",al2);
checklen("REPLACEMENT",al3);
al_create(&al4);
rc = al_copy(al, al_bytes(al)-42, 38, al4);
printf("copy result: %d (%s)\n\n",rc,al_error(rc));
DUMP("SPLICED",al);
print("SPLICED", al);
DUMP("BUFFER",al2);
print("BUFFER", al2);
DUMP("REPLACEMENT", al3);
print("REPLACEMENT", al3);
printf("free REPLACEMENT\n");
fflush(stdout);
al_destroy(al3);
printf("free BUFFER\n");
fflush(stdout);
al_destroy(al2);
printf("free SPLICED\n");
fflush(stdout);
al_destroy(al);
DUMP("COPY", al4);
print("COPY", al4);
printf("free COPY\n");
fflush(stdout);
al_destroy(al4);
return 0;
}