summaryrefslogtreecommitdiff
path: root/src/frontend/node.c
diff options
context:
space:
mode:
Diffstat (limited to 'src/frontend/node.c')
-rw-r--r--src/frontend/node.c84
1 files changed, 84 insertions, 0 deletions
diff --git a/src/frontend/node.c b/src/frontend/node.c
new file mode 100644
index 0000000..344b48a
--- /dev/null
+++ b/src/frontend/node.c
@@ -0,0 +1,84 @@
+#include "node.h"
+#include <stddef.h>
+#include <stdlib.h>
+#include <string.h>
+#include <stdio.h>
+
+const char* node_types[] = {"prog", "func", "stmt", "expr", "const"};
+const char* node_ops[] = {"not", "neg", "plus", "minus", "mult", "div", "mod"};
+
+Node *create_node(enum node_type type) {
+ Node *node = malloc(sizeof(Node));
+ node->type = type;
+ node->children = NULL;
+ node->num_children = 0;
+ return node;
+}
+
+Node *create_function(char *name) {
+ Node *node = malloc(sizeof(Node));
+ node->type = FUNC;
+ node->field.name = name;
+ node->children = NULL;
+ node->num_children = 0;
+ return node;
+}
+
+Node *create_expr(enum node_op op) {
+ Node *node = malloc(sizeof(Node));
+ node->type = EXPR;
+ node->field.op = op;
+ node->children = NULL;
+ node->num_children = 0;
+ return node;
+}
+
+Node *create_const(int val) {
+ Node *node = malloc(sizeof(Node));
+ node->type = CONST;
+ node->field.val = val;
+ node->children = NULL;
+ node->num_children = 0;
+ return node;
+}
+
+void add_child(Node *parent, Node *child) {
+ size_t new_size = sizeof(Node*) * (parent->num_children + 1);
+ parent->children = realloc(parent->children, new_size);
+
+ parent->children[parent->num_children] = child;
+ parent->num_children++;
+}
+
+void free_node(Node *node) {
+ for (size_t i = 0; i < node->num_children; ++i) {
+ free_node(node->children[i]);
+ }
+ if (node->type == FUNC)
+ free(node->field.name);
+
+ free(node->children);
+ free(node);
+}
+
+void *print_node(Node *node, int indent) {
+ if (node == NULL) {
+ return;
+ }
+
+ for (int i = 0; i < indent; ++i)
+ printf(" ");
+
+ printf("type: %s", node_types[node->type]);
+ if (node->type == FUNC)
+ printf(", name: \"%s\"", node->field.name);
+ if (node->type == EXPR)
+ printf(", op: %s", node_ops[node->field.op]);
+ if (node->type == CONST)
+ printf(", val: %d", node->field.val);
+ printf("\n");
+
+ for (size_t i = 0; i < node->num_children; ++i) {
+ print_node(node->children[i], indent + 1);
+ }
+}