blob: 91787a66bddc0cab92a7c1bf5f00332563bbda0e (
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
71
72
73
74
75
|
import unittest
from crowbar_reference_compiler import parse_header, parse_implementation, scan
class TestParsing(unittest.TestCase):
def test_basic(self):
print(parse_header(scan("int x();")))
def test_scdoc_str(self):
# adapted from https://git.sr.ht/~sircmpwn/scdoc/tree/master/include/str.h
print(parse_header(scan(r"""
include "stdint.h";
struct str {
char *str;
typedef size_t len;
typedef size_t size;
};
struct str *str_create();
void str_free(struct str *str);
void str_reset(struct str *str);
int str_append_ch(struct str *str, typedef uint32_t ch);
""")))
# adapted from https://git.sr.ht/~sircmpwn/scdoc/tree/master/src/string.c
print(parse_implementation(scan(r"""
include "stdlib.h";
include "stdint.h";
include "str.h";
include "unicode.h";
int ensure_capacity(struct str *str, typedef size_t len) {
if (len + 1 >= str->size) {
char *new = realloc(str->str, str->size * 2);
if (!new) {
return 0;
}
str->str = new;
str->size *= 2;
}
return 1;
}
struct str *str_create() {
struct str *str = calloc(1, sizeof(struct str));
str->str = malloc(16);
str->size = 16;
str->len = 0;
str->str[0] = '\0';
return str;
}
void str_free(struct str *str) {
if (!str) {
return;
}
free(str->str);
free(str);
}
int str_append_ch(struct str *str, typedef uint32_t ch) {
int size = utf8_chsize(ch);
if (size <= 0) {
return -1;
}
if (!ensure_capacity(str, str->len + size)) {
return -1;
}
utf8_encode(&str->str[str->len], ch);
str->len += size;
str->str[str->len] = '\0';
return size;
}
""")))
|
