48 lines
970 B
C
48 lines
970 B
C
|
#include "master.h"
|
||
|
|
|
||
|
|
s64 current_millis(void)
|
||
|
|
{
|
||
|
|
FILETIME t;
|
||
|
|
GetSystemTimeAsFileTime(&t);
|
||
|
|
return (((s64)t.dwLowDateTime | (s64)t.dwHighDateTime<<32)
|
||
|
|
- EPOCH_OFFSET) / 10000;
|
||
|
|
}
|
||
|
|
|
||
|
|
void primitive_cwd(void)
|
||
|
|
{
|
||
|
|
F_CHAR buf[MAX_PATH + 4];
|
||
|
|
|
||
|
|
if(!GetCurrentDirectory(MAX_PATH + 4, buf))
|
||
|
|
io_error();
|
||
|
|
|
||
|
|
box_u16_string(buf);
|
||
|
|
}
|
||
|
|
|
||
|
|
void primitive_cd(void)
|
||
|
|
{
|
||
|
|
SetCurrentDirectory(unbox_u16_string());
|
||
|
|
}
|
||
|
|
|
||
|
|
void seh_call(void (*func)(), exception_handler_t *handler)
|
||
|
|
{
|
||
|
|
exception_record_t record;
|
||
|
|
asm volatile("mov %%fs:0, %0" : "=r" (record.next_handler));
|
||
|
|
asm volatile("mov %0, %%fs:0" : : "r" (&record));
|
||
|
|
record.handler_func = handler;
|
||
|
|
func();
|
||
|
|
asm volatile("mov %0, %%fs:0" : "=r" (record.next_handler));
|
||
|
|
}
|
||
|
|
|
||
|
|
long exception_handler(PEXCEPTION_RECORD rec, void *frame, void *ctx, void *dispatch)
|
||
|
|
{
|
||
|
|
memory_protection_error(
|
||
|
|
rec->ExceptionInformation[1],
|
||
|
|
native_stack_pointer());
|
||
|
|
return -1; /* unreachable */
|
||
|
|
}
|
||
|
|
|
||
|
|
void run_toplevel(void)
|
||
|
|
{
|
||
|
|
seh_call(run, exception_handler);
|
||
|
|
}
|