query_compiler.c

#include "compiler.h"
#include <string.h>
#include <stdio.h>
#include <stdlib.h>

int query(toks_t *toks, syn_node_t *tree)
{
	tree->left = malloc(sizeof(syn_node_t));
	tree->right = malloc(sizeof(syn_node_t));
	tree->type = S_QUERY;
	if (body(toks, tree->right) && token(toks, "."))
	{
		tree->left->type = S_HEAD;
		tree->left->left = malloc(sizeof(syn_node_t));
		tree->left->left->type = S_PREDICATE;
		strcpy(tree->left->left->value, "query$~1/1");
		tree->left->left->left = NULL;
		tree->left->left->right = NULL;
		tree->left->right = NULL;
		return 1;
	}
	free(tree->left);
	tree->left = NULL;
	free(tree->right);
	tree->right = NULL;
	return 0;
}

prog_t *compile_query(char *query_str)
{
	compiler_begin();
	var_prefix = 'Q';
	toks_t *toks = toks_init(query_str);
	prog_t *prog = NULL;
	syn_node_t *root = syn_node_init();
	if (query(toks, root)) {
		if (toks->idx > toks->len) {
			printf("panic: query not fully parsed!\n");
			toks_destroy(toks);
			syn_node_destroy(root);
			return NULL;
		}
		prog = syn_node_to_prog(root);
	}

	syn_node_destroy(root);
	toks_destroy(toks);
	compiler_end();
	return prog;
}