mirror of
git://git.psyc.eu/libpsyc
synced 2024-08-15 03:19:02 +00:00
255 lines
7.4 KiB
C
255 lines
7.4 KiB
C
/*
|
|
This file is part of libpsyc.
|
|
Copyright (C) 2011,2012 Carlo v. Loesch, Gabor X Toth, Mathias L. Baumann,
|
|
and other contributing authors.
|
|
|
|
libpsyc is free software: you can redistribute it and/or modify it under the
|
|
terms of the GNU Affero General Public License as published by the Free
|
|
Software Foundation, either version 3 of the License, or (at your option) any
|
|
later version. As a special exception, libpsyc is distributed with additional
|
|
permissions to link libpsyc libraries with non-AGPL works.
|
|
|
|
libpsyc is distributed in the hope that it will be useful, but WITHOUT
|
|
ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS
|
|
FOR A PARTICULAR PURPOSE. See the GNU Affero General Public License for more
|
|
details.
|
|
|
|
You should have received a copy of the GNU Affero General Public License and
|
|
the linking exception along with libpsyc in a COPYING file.
|
|
*/
|
|
|
|
#include <stdio.h>
|
|
#include <stdlib.h>
|
|
#include <sys/time.h>
|
|
|
|
#include <lib.h>
|
|
#include <psyc/parse.h>
|
|
#include <psyc/render.h>
|
|
#include <psyc/syntax.h>
|
|
|
|
#define NELEMS 100
|
|
|
|
int
|
|
main (int argc, char **argv)
|
|
{
|
|
uint8_t verbose = argc > 1;
|
|
int i, k, n, ret;
|
|
|
|
PsycParseListState listState;
|
|
PsycList list_text, list_bin;
|
|
PsycElem elems_text[NELEMS], elems_bin[NELEMS];
|
|
PsycString type, value;
|
|
char buf_text[NELEMS * 200], buf_bin[NELEMS * 200], *elems[NELEMS], **elems2 = NULL;
|
|
|
|
struct timeval start, end;
|
|
|
|
char *text = "1234567890abcdefghijklmnopqrstuvwxyz-._ "
|
|
"1234567890abcdefghijklmnopqrstuvwxyz-._ "
|
|
"1234567890abcdefghijklmnopqrstuvwxyz-._ "
|
|
"1234567890";
|
|
char *bin = "1234567890|abcdefghijklmnopqrstuvwxyz|_\n"
|
|
"1234567890|abcdefghijklmnopqrstuvwxyz|_\n"
|
|
"1234567890|abcdefghijklmnopqrstuvwxyz|_\n"
|
|
"1234567890";
|
|
|
|
for (i=0; i<NELEMS; i++)
|
|
elems_text[i] = PSYC_ELEM_V(text, strlen(text));
|
|
for (i=0; i<NELEMS; i++)
|
|
elems_bin[i] = PSYC_ELEM_V(bin, strlen(bin));
|
|
|
|
psyc_list_init(&list_text, elems_text, PSYC_NUM_ELEM(elems_text),
|
|
PSYC_LIST_NO_LENGTH);
|
|
psyc_list_init(&list_bin, elems_bin, PSYC_NUM_ELEM(elems_bin),
|
|
PSYC_LIST_CHECK_LENGTH);
|
|
|
|
psyc_render_list(&list_text, buf_text, sizeof(buf_text));
|
|
psyc_render_list(&list_bin, buf_bin, sizeof(buf_bin));
|
|
|
|
printf("list_text: %ld\n%.*s\n",
|
|
list_text.length, (int)list_text.length, buf_text);
|
|
printf("list_bin: %ld\n%.*s\n",
|
|
list_bin.length, (int)list_bin.length, buf_bin);
|
|
|
|
#if 1
|
|
printf("parsing text list to elems[]\n");
|
|
gettimeofday(&start, NULL);
|
|
for (n = 0; n < NELEMS; n++) {
|
|
psyc_parse_list_state_init(&listState);
|
|
psyc_parse_list_buffer_set(&listState, buf_text, list_text.length);
|
|
i = 0;
|
|
do {
|
|
ret = psyc_parse_list(&listState, &type, &value);
|
|
switch (ret) {
|
|
case PSYC_PARSE_LIST_END:
|
|
ret = 0;
|
|
case PSYC_PARSE_LIST_ELEM:
|
|
if (verbose)
|
|
printf("|%ld:%.*s %.*s...\n", value.length,
|
|
(int)type.length, type.data, 10, value.data);
|
|
//elems[i] = malloc(elem.length);
|
|
//memcpy(&elems[i++], elem.data, elem.length);
|
|
break;
|
|
default:
|
|
printf("# Error while parsing list: %i\n", ret);
|
|
ret = -1;
|
|
}
|
|
} while (ret > 0);
|
|
}
|
|
gettimeofday(&end, NULL);
|
|
// printf("%ld ms\n", (end.tv_sec * 1000000 + end.tv_usec
|
|
// - start.tv_sec * 1000000 - start.tv_usec) / 1000);
|
|
printf("%ld us\n", (end.tv_sec * 1000000 + end.tv_usec
|
|
- start.tv_sec * 1000000 - start.tv_usec));
|
|
#endif
|
|
|
|
#if 1
|
|
printf("parsing binary list to elems[]\n");
|
|
gettimeofday(&start, NULL);
|
|
for (n = 0; n < NELEMS; n++) {
|
|
psyc_parse_list_state_init(&listState);
|
|
psyc_parse_list_buffer_set(&listState, buf_bin, list_bin.length);
|
|
i = 0;
|
|
do {
|
|
ret = psyc_parse_list(&listState, &elem);
|
|
switch (ret) {
|
|
case PSYC_PARSE_LIST_END:
|
|
ret = 0;
|
|
case PSYC_PARSE_LIST_ELEM:
|
|
//if (verbose) printf("|%.*s\n", (int)elem.length, elem.data);
|
|
if (verbose) printf("|%d: %.*s... (%ld)\n", i, 10, elem.data, elem.length);
|
|
elems[i] = malloc(elem.length);
|
|
memcpy(elems[i++], elem.data, elem.length);
|
|
break;
|
|
default:
|
|
printf("# Error while parsing list: %i\n", ret);
|
|
ret = -1;
|
|
}
|
|
} while (ret > 0);
|
|
}
|
|
gettimeofday(&end, NULL);
|
|
// printf("%ld ms\n", (end.tv_sec * 1000000 + end.tv_usec
|
|
// - start.tv_sec * 1000000 - start.tv_usec));
|
|
printf("%ld us\n", (end.tv_sec * 1000000 + end.tv_usec
|
|
- start.tv_sec * 1000000 - start.tv_usec));
|
|
#endif
|
|
|
|
#if 1
|
|
printf("parsing binary list to elems2[] with realloc\n");
|
|
gettimeofday(&start, NULL);
|
|
for (n = 0; n < NELEMS; n++) {
|
|
psyc_parse_list_state_init(&listState);
|
|
psyc_parse_list_buffer_set(&listState, buf_bin, list_bin.length);
|
|
i = 0;
|
|
do {
|
|
ret = psyc_parse_list(&listState, &elem);
|
|
switch (ret) {
|
|
case PSYC_PARSE_LIST_END:
|
|
ret = 0;
|
|
case PSYC_PARSE_LIST_ELEM:
|
|
if (elems2)
|
|
elems2 = realloc(elems2, (i+1) * sizeof(char*));
|
|
else
|
|
elems2 = malloc((i+1) * sizeof(char*));
|
|
|
|
elems2[i] = malloc(elem.length);
|
|
memcpy(elems2[i++], elem.data, elem.length);
|
|
break;
|
|
default:
|
|
printf("# Error while parsing list: %i\n", ret);
|
|
ret = -1;
|
|
}
|
|
} while (ret > 0);
|
|
}
|
|
gettimeofday(&end, NULL);
|
|
// printf("%ld ms\n", (end.tv_sec * 1000000 + end.tv_usec
|
|
// - start.tv_sec * 1000000 - start.tv_usec));
|
|
printf("%ld us\n", (end.tv_sec * 1000000 + end.tv_usec
|
|
- start.tv_sec * 1000000 - start.tv_usec));
|
|
#endif
|
|
|
|
#if 1
|
|
printf("parsing binary list to elems2[] with malloc\n");
|
|
gettimeofday(&start, NULL);
|
|
for (n = 0; n < NELEMS; n++) {
|
|
psyc_parse_list_state_init(&listState);
|
|
psyc_parse_list_buffer_set(&listState, buf_bin, list_bin.length);
|
|
i = 0;
|
|
do {
|
|
ret = psyc_parse_list(&listState, &elem);
|
|
switch (ret) {
|
|
case PSYC_PARSE_LIST_END:
|
|
ret = 0;
|
|
case PSYC_PARSE_LIST_ELEM:
|
|
/*
|
|
if (elems2)
|
|
elems2 = realloc(elems2, (i+1) * sizeof(char*));
|
|
else
|
|
elems2 = malloc((i+1) * sizeof(char*));
|
|
*/
|
|
elems2 = malloc(sizeof(char*));
|
|
elems2[i] = malloc(elem.length);
|
|
memcpy(elems2[i], elem.data, elem.length);
|
|
break;
|
|
default:
|
|
printf("# Error while parsing list: %i\n", ret);
|
|
ret = -1;
|
|
}
|
|
} while (ret > 0);
|
|
}
|
|
gettimeofday(&end, NULL);
|
|
// printf("%ld ms\n", (end.tv_sec * 1000000 + end.tv_usec
|
|
// - start.tv_sec * 1000000 - start.tv_usec));
|
|
printf("%ld us\n", (end.tv_sec * 1000000 + end.tv_usec
|
|
- start.tv_sec * 1000000 - start.tv_usec));
|
|
#endif
|
|
|
|
#if 1
|
|
printf("parsing binary list to elems2[] with double-parsing\n");
|
|
gettimeofday(&start, NULL);
|
|
for (n = 0; n < NELEMS; n++) {
|
|
psyc_parse_list_state_init(&listState);
|
|
psyc_parse_list_buffer_set(&listState, buf_bin, list_bin.length);
|
|
i = 0;
|
|
k = 0;
|
|
|
|
do {
|
|
ret = psyc_parse_list(&listState, &elem);
|
|
switch (ret) {
|
|
case PSYC_PARSE_LIST_END:
|
|
ret = 0;
|
|
case PSYC_PARSE_LIST_ELEM:
|
|
k++;
|
|
break;
|
|
default:
|
|
printf("# Error while parsing list: %i\n", ret);
|
|
ret = -1;
|
|
}
|
|
} while (ret > 0);
|
|
|
|
elems2 = malloc(k * sizeof(char*));
|
|
psyc_parse_list_buffer_set(&listState, buf_bin, list_bin.length);
|
|
|
|
do {
|
|
ret = psyc_parse_list(&listState, &elem);
|
|
switch (ret) {
|
|
case PSYC_PARSE_LIST_END:
|
|
ret = 0;
|
|
case PSYC_PARSE_LIST_ELEM:
|
|
elems2[i] = malloc(elem.length);
|
|
memcpy(elems2[i++], elem.data, elem.length);
|
|
break;
|
|
default:
|
|
printf("# Error while parsing list: %i\n", ret);
|
|
ret = -1;
|
|
}
|
|
} while (ret > 0);
|
|
}
|
|
gettimeofday(&end, NULL);
|
|
// printf("%ld ms\n", (end.tv_sec * 1000000 + end.tv_usec
|
|
// - start.tv_sec * 1000000 - start.tv_usec));
|
|
printf("%ld us\n", (end.tv_sec * 1000000 + end.tv_usec
|
|
- start.tv_sec * 1000000 - start.tv_usec));
|
|
#endif
|
|
|
|
return 0;
|
|
}
|