Function fxRunBundle

xs/tools/xst.c:304–375

}

int fxRunBundle(const char* path)
{
	int error = 0;
	FILE* file = C_NULL;
	char* buffer = C_NULL;
	size_t size = 0;
	char resolved[C_PATH_MAX];

	if (!c_realpath(path, resolved)) {
		fprintf(stderr, "file not found: %s\n", path);
		return 1;
	}
	file = fopen(resolved, "r");
	if (!file) {
		fprintf(stderr, "can't open file: %s\n", resolved);
		return 1;
	}
	fseek(file, 0, SEEK_END);
	size = ftell(file);
	fseek(file, 0, SEEK_SET);
	buffer = c_malloc(size + 1);
	if (!buffer) {
		fclose(file);
		fprintf(stderr, "not enough memory\n");
		return 1;
	}
	if (size != fread(buffer, 1, size, file)) {
		fclose(file);
		c_free(buffer);
		fprintf(stderr, "can't read file: %s\n", resolved);
		return 1;
	}
	buffer[size] = 0;
	fclose(file);

	xsCreation _creation = {
		16 * 1024 * 1024, 	/* initialChunkSize */
		16 * 1024 * 1024, 	/* incrementalChunkSize */
		1 * 1024 * 1024, 	/* initialHeapCount */
		1 * 1024 * 1024, 	/* incrementalHeapCount */
		256 * 1024, 		/* stackCount */
		1024, 				/* initialKeyCount */
		1024,				/* incrementalKeyCount */
		1993, 				/* nameModulo */
		127, 				/* symbolModulo */
		64 * 1024,			/* parserBufferSize */
		1993,				/* parserTableModulo */
	};
	xsMachine* machine = xsCreateMachine(&_creation, "xst", NULL);
	xsBeginMetering(machine, NULL, 0);
	{
	xsBeginHost(machine);
	{
		xsVars(1);
		xsTry {
			fxBuildAgent(machine);
			fxBuildFuzz(machine);
			xsVar(0) = xsUndefined;