package sectr

import "base:runtime"
import "core:fmt"
import "core:mem"
import "core:mem/virtual"
import "core:os"

import rl "vendor:raylib"

memory : Memory

memory_chunk_size      :: 2 * Gigabyte
memory_persistent_size :: 128 * Megabyte
memory_trans_temp_size :: (memory_chunk_size - memory_persistent_size ) / 2

Memory :: struct {
	live       : virtual.Arena,
	snapshot   : []u8,
	persistent : ^ TrackedAllocator,
	transient  : ^ TrackedAllocator,
	temp       : ^ TrackedAllocator,

	replay : ReplayState,
	logger : Logger,
}

State :: struct {
	input_data : [2] InputState,

	input_prev : ^ InputState,
	input      : ^ InputState,

	debug  : DebugData,

	project : Project,

	screen_width  : i32,
	screen_height : i32,

	monitor_id         : i32,
	monitor_refresh_hz : i32,

	engine_refresh_hz     : i32,
	engine_refresh_target : i32,

	font_rec_mono_semicasual_reg : Font,
	default_font                 : Font,
}

Project :: struct {
	// TODO(Ed) : Support multiple workspaces
	workspace : Workspace
}

Workspace :: struct {

}

get_state :: proc() -> (^ State) {
	return cast( ^ State ) raw_data( memory.persistent.backing.data )
}

DebugData :: struct {
	square_size : i32,
	square_pos  : rl.Vector2,

	draw_debug_text_y : f32,

	mouse_vis : b32,
	mouse_pos : vec2,
}

DebugActions :: struct {
	pause_renderer : b32,

	load_auto_snapshot : b32,
	record_replay      : b32,
	play_replay        : b32,

	show_mouse_pos : b32,
}

poll_debug_actions :: proc( actions : ^ DebugActions, input : ^ InputState )
{
	using actions
	using input

	base_replay_bind := keyboard.right_alt.ended_down && pressed( keyboard.L)
	record_replay     = base_replay_bind &&   keyboard.right_shift.ended_down
	play_replay       = base_replay_bind && ! keyboard.right_shift.ended_down

	show_mouse_pos = keyboard.right_alt.ended_down && pressed(keyboard.M)
}

save_snapshot :: proc( snapshot : [^]u8 ) {
	state := get_state() 

	// state.font_rec_mono_semicasual_reg
	// state.default_font

	live_ptr := cast( ^ rawptr ) memory.live.curr_block.base
	mem.copy_non_overlapping( & snapshot[0], live_ptr, memory_chunk_size )
}

load_snapshot :: proc( snapshot : [^]u8 ) {
	live_ptr := cast( ^ rawptr ) memory.live.curr_block.base
	mem.copy_non_overlapping( live_ptr, snapshot, memory_chunk_size )
}

ReplayMode :: enum {
	Off,
	Record,
	Playback,
}

ReplayState :: struct {
	loop_active : b32,
	mode        : ReplayMode,
	active_file : os.Handle
}

replay_recording_begin :: proc( path : string )
{
	if file_exists( path ) {
		result := os.remove( path )
		verify( result != os.ERROR_NONE, "Failed to delete replay file before beginning a new one" )
	}

	replay_file, open_error := os.open( path, os.O_RDWR | os.O_CREATE )
	verify( open_error != os.ERROR_NONE, "Failed to create or open the replay file" )

	os.seek( replay_file, 0, 0 )

	replay := & memory.replay
	replay.active_file = replay_file
	replay.mode        = ReplayMode.Record
}

replay_recording_end :: proc() {
	replay := & memory.replay
	replay.mode = ReplayMode.Off

	os.seek( replay.active_file, 0, 0 )
	os.close( replay.active_file )
}

replay_playback_begin :: proc( path : string )
{
	verify( ! file_exists( path ), "Failed to find replay file" )

	replay_file, open_error := os.open( path, os.O_RDWR | os.O_CREATE )
	verify( open_error != os.ERROR_NONE, "Failed to create or open the replay file" )

	os.seek( replay_file, 0, 0 )

	replay := & memory.replay
	replay.active_file = replay_file
	replay.mode        = ReplayMode.Playback
}

replay_playback_end :: proc() {
	input  := get_state().input
	replay := & memory.replay
	replay.mode = ReplayMode.Off
	os.seek( replay.active_file, 0, 0 )
	os.close( replay.active_file )
}