factor/vm/os-unix.hpp

#include <unistd.h>
#include <sys/param.h>
#include <dirent.h>
#include <sys/mman.h>
#include <sys/types.h>
#include <sys/stat.h>
#include <unistd.h>
#include <sys/time.h>
#include <dlfcn.h>
#include <signal.h>
#include <pthread.h>

namespace factor
{

typedef char vm_char;
typedef char symbol_char;

#define STRING_LITERAL(string) string

#define SSCANF sscanf
#define STRCMP strcmp
#define STRNCMP strncmp
#define STRDUP strdup
#define SNPRINTF snprintf

#define FTELL ftello
#define FSEEK fseeko

#define CELL_HEX_FORMAT "%lx"

#define OPEN_READ(path) fopen(path,"rb")
#define OPEN_WRITE(path) fopen(path,"wb")
#define MOVE_FILE(path1,path2) \
do {\
	int ret = 0;\
	do {\
		ret = rename((path1),(path2));\
	} while(ret < 0 && errno == EINTR);\
	if(ret < 0)\
		general_error(ERROR_IO,tag_fixnum(errno),false_object,NULL);\
}while(0)

#define print_native_string(string) print_string(string)

typedef pthread_t THREADHANDLE;

THREADHANDLE start_thread(void *(*start_routine)(void *),void *args);
inline static THREADHANDLE thread_id() { return pthread_self(); }

void unix_init_signals();
void signal_handler(int signal, siginfo_t* siginfo, void* uap);
void dump_stack_signal(int signal, siginfo_t* siginfo, void* uap);

u64 system_micros();
u64 nano_count();
void sleep_nanos(u64 nsec);

void init_platform_globals();

void register_vm_with_thread(factor_vm *vm);
factor_vm *tls_vm();
void open_console();

}