Raon/main.c at main · RaphGL/Raon · GitHub

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
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
#include "parser.h"
#include <stdio.h>

int main(void) {
   char buf[4096] = { 0 };
   FILE *fd = fopen("./example.raon", "r");
   if (!fd) {
      perror("Failed to open file.");
      return 1;
   }

   fread(buf, 1, sizeof(buf) - 1, fd);
   if (ferror(fd)) {
      perror("Failed to read file.");
      return 2;
   }

   struct vector_of_raon_entry *entries = raon_parse(buf);
   printf("Ret: %p\n", entries);

   for (size_t i = 0; i < vec_len_raon_entry(entries); i++) {
      struct raon_entry entry;
      vec_get_raon_entry(entries, i, &entry);

      if (entry.value.type == raon_value_type_array) {
         switch (entry.field_type) {
         case raon_field_type_string:
            printf("%s: ", entry.str_field);
            break;
         case raon_field_type_int:
            printf("%ld: ", entry.int_field);
            break;
         }

         printf("[ ");
         for (size_t j = 0; j < vec_len_raon_value(entry.value.array_val); j++) {
            struct raon_value val;
            vec_get_raon_value(entry.value.array_val, j, &val);
            switch (val.type) {
            case raon_value_type_int:
               printf("%ld ", val.int_val);
               break;
            case raon_value_type_bool:
               printf(val.bool_val ? "true" : "false");
               break;
            case raon_value_type_string:
               printf("%s", val.str_val);
               break;
            }
         }
         printf("]\n");
      }

      if (entry.value.type == raon_value_type_block) {
         switch (entry.field_type) {
         case raon_field_type_string:
            printf("%s: ", entry.str_field);
            break;
         case raon_field_type_int:
            printf("%ld: ", entry.int_field);
            break;
         }
         printf("{ ");
         for (size_t j = 0; j < vec_len_raon_entry(entry.value.block_val); j++) {
            struct raon_entry val;
            vec_get_raon_entry(entry.value.block_val, j, &val);
            switch (val.field_type) {
            case raon_field_type_int:
               printf("%ld: ", val.int_field);
               break;
            case raon_field_type_string:
               printf("%s: ", val.str_field);
               break;
            }
            switch (val.value.type) {
            case raon_value_type_int:
               printf("%ld ", val.value.int_val);
               break;
            case raon_value_type_bool:
               printf(val.value.bool_val ? "true" : "false");
               break;
            case raon_value_type_string:
               printf("%s", val.value.str_val);
               break;
            }
            printf("\n");
         }
         printf("}\n");
      }
   }
}