webdice/js-api.c

#include "emscripten.h"
#include <string.h>
#include <stdlib.h>
#include <time.h>
#include <math.h>
#include "expression.h"
#include "parser.tab.h"
#include "lex.yy.h"

EM_JS(void, console_print, (const char* str), {
		console.log(UTF8ToString(str));
})

EM_JS(void, output_print, (const char* str), {
		var div = document.getElementById('output');
		div.innerHTML = UTF8ToString(str) + div.innerHTML;
})

int yyerror(void* scanner, void* lvalp, char* str){
	console_print(str);
	return 0;
}

void EMSCRIPTEN_KEEPALIVE webdice(char* str){
	union expression* root = NULL;
	struct expression_result result;
	int length;
	char* in_block;
	char* out_block;
	static char seeded = 0;

	if (!seeded){
		seeded = 1;
		srand(time(NULL));
	}

	in_block = (char*) malloc((2 + strlen(str)) * sizeof(char));
	sprintf(in_block,"%s\n",str);

	yyscan_t scanner;
	yylex_init(&scanner);
	yy_scan_string (in_block, scanner);

	yyparse((void*) scanner, &root);
	if(root != NULL){
		result = resolve(root);
		length = strlen(result.text) + 4 * ceill(10 + log10l(result.max)) + 100;
		out_block = (char*) malloc(length * sizeof(char));
		sprintf(out_block,"<p>%s = <span title=\"min: %Lg, expected: %Lg, max: %Lg\">%Lg</span></p>", result.text, result.min, result.expected, result.max, result.actual);

		output_print(out_block);

		free(out_block);
		free(result.text);
		free_expression(root);
	}else{
		output_print("<p>Error!</p>");
	}
	free(in_block);
	yylex_destroy(scanner);
}