blob: 04b3d9b2c618ee2e7e117e3e4e89a815a446180f (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
|
#include <stdio.h>
union cudl_val_uni {
double num;
char *str;
size_t offset;
};
struct cudl_val {
uint64_t tag;
union cudl_val_uni data;
};
struct cudl_doc {
struct cudl_val *root;
size_t length;
size_t capacity;
char *strings;
};
#define CUDL_TAG_NULL 0
#define CUDL_TAG_ARRAY 1
#define CUDL_GET_TAG(tag) ((tag) >> 56)
#define CUDL_OK 0
#define CUDL_ERR_OUT_OF_MEMORY 1
#define CUDL_ERR_MISSING_VALUE 2
#define BUFFER_LEN 1024
static FILE file;
static char buffer[BUFFER_LEN];
void cudl_debug(struct cudl_doc doc) {
int i;
for (i = 0; i < doc.length; i++) {
switch (CUDL_GET_TAG(doc.root[i].tag)) {
case CUDL_TAG_NULL:
fprintf(stderr, "null\n");
break;
case CUDL_TAG_ARRAY:
fprintf(stderr, "array with %d elements, ending after %d blocks\n", CUDL_GET_LENGTH(doc.root[i].tag), doc.root[i].data.offset);
break;
case default:
fprintf(stderr, "Unknown value\n");
break;
}
}
}
void cudl_deinit_doc(struct cudl_doc doc) {
free(doc.cudl_val);
free(doc.strings);
}
int cudl_parse_from_file(FILE input_file, struct cudl_doc *doc) {
int c;
/* Init doc */
if ((doc->root = malloc(256 * sizeof(struct cudl_val))) == NULL)
return CUDL_ERR_OUT_OF_MEMORY;
if ((doc->strings = malloc(256)) == NULL) {
free(doc->root);
return CUDL_ERR_OUT_OF_MEMORY;
}
if ((c = next_char(file)) == EOF)
return CUDL_ERR_MISSING_VALUE;
}
|
