#include "plat.h"
#include "config.h"

#ifdef plat_posix
#define _POSIX_SOURCE
#define _GNU_SOURCE
#include <stdarg.h>
#include <stdio.h>
#include <unistd.h>
#include <stdlib.h>
#include <dirent.h>
#include <string.h>

extern int fileno(FILE*);

void print(const char* fmt, ...) {
	va_list args;
	va_start(args, fmt);
	vfprintf(stdout, fmt, args);
	va_end(args);
}

void print_err(const char* fmt, ...) {
	va_list args;
	va_start(args, fmt);

	if (isatty(fileno(stderr))) {
		fprintf(stderr, "\033[31;31m");
	}

	vfprintf(stderr, fmt, args);

	if (isatty(fileno(stderr))) {
		fprintf(stderr, "\033[0m");
	}

	va_end(args);
}

void print_war(const char* fmt, ...) {
	va_list args;
	va_start(args, fmt);

	if (isatty(fileno(stderr))) {
		fprintf(stderr, "\033[31;35m");
	}

	vfprintf(stderr, fmt, args);

	if (isatty(fileno(stderr))) {
		fprintf(stderr, "\033[0m");
	}

	va_end(args);
}

void pbreak(Error code) {
#if defined(DEBUG) && defined(plat_x86)
	__asm__("int3;");
	(void)code;
#else
	exit(code);
#endif
}

void iter_dir(const char* path, Dir_Iter fn, void* u) {
	struct dirent* de;
	int l;
	DIR* di;
	char buf[256];
	char* p;
	di = opendir(path);
	if (!di) return;
	strcpy(buf, path);
	l = strlen(buf);
	if (!l) return;
	if (buf[l - 1] != '/') {
		strcat(buf, "/");
		l++;
	}
	p = buf + l;
	while ((de = readdir(di))) {
		if (de->d_name[0] == '.')
			continue;
		strcpy(p, de->d_name);
		if (de->d_type == DT_DIR)
			iter_dir(buf, fn, u);
		else
			fn(u, buf);
	}
	closedir(di);
}

extern int prog_main(void*);

int main() {
	int r;
	void* mem;
	mem = malloc(memory_size);
	r = prog_main(mem);
	free(mem);
	return r;
}

#endif