import sokol
import sokol.sapp
import sokol.gfx
import sokol.sgl
import sokol.sfons
import fontstash
import os
import time
import filepath

#define FONS_USE_FREETYPE 1

struct AppState {
mut:
	pass_action C.sg_pass_action
	fons &C.FONScontext
	font_normal int
}

fn main() {
	mut color_action := sg_color_attachment_action {
		action: C.SG_ACTION_CLEAR
	}
	color_action.val[0] = 0.3
	color_action.val[1] = 0.3
	color_action.val[2] = 0.32
	color_action.val[3] = 1.0

	mut pass_action := sg_pass_action{}
	pass_action.colors[0] = color_action

	state := &AppState{
		pass_action: pass_action
		fons: &C.FONScontext(0)
	}

	desc := sapp_desc{
		user_data: state
		init_userdata_cb: init
		frame_userdata_cb: frame
		window_title: 'V Metal/GL Text Rendering'.str
	}
	sapp.run(&desc)
}

fn init(user_data voidptr) {
	mut state := &AppState(user_data)

	// dont actually alocate this on the heap in real life
	gfx.setup(&sg_desc {
		mtl_device: C.sapp_metal_get_device()
		mtl_renderpass_descriptor_cb: sapp_metal_get_renderpass_descriptor
		mtl_drawable_cb: sapp_metal_get_drawable
		d3d11_device: sapp_d3d11_get_device()
		d3d11_device_context: sapp_d3d11_get_device_context()
		d3d11_render_target_view_cb: sapp_d3d11_get_render_target_view
		d3d11_depth_stencil_view_cb: sapp_d3d11_get_depth_stencil_view
	})

	s := &C.sgl_desc_t{}
	C.sgl_setup(s)

    state.fons = C.sfons_create(512, 512, 1)

	//mut font_path := cfg.font_path
	//if font_path == '' {
		mut font_path := 'RobotoMono-Regular.ttf'
	//}
	if !os.exists(font_path) {
		exe_path := os.executable()
		exe_dir := filepath.basedir(exe_path)
		font_path = filepath.basedir(exe_dir) + '/tetris/$font_path'
		println(font_path)
	}
	if !os.exists(font_path) {
		println('failed to load $font_path')
		return
	}

	if bytes := os.read_bytes(font_path) {
		println('loaded font: $bytes.len')
		state.font_normal = C.fonsAddFontMem(state.fons, "sans", bytes.data, bytes.len, false)
	}
}

fn frame(user_data voidptr) {
	t:=time.ticks()
	mut state := &AppState(user_data)

	state.render_font()

	gfx.begin_default_pass(&state.pass_action, sapp_width(), sapp_height())
	sgl.draw()
	gfx.end_pass()
	gfx.commit()
	//println(time.ticks()-t)
}

fn (state &AppState) render_font() {
	mut sx := 0.0
	mut sy := 0.0
	mut dx := 0.0
	mut dy := 0.0
	lh := 0.0
    white := C.sfons_rgba(255, 255, 255, 255)
    black := C.sfons_rgba(0, 0, 0, 255)
    brown := C.sfons_rgba(192, 128, 0, 128)
    blue := C.sfons_rgba(0, 192, 255, 255)
    state.fons.clear_state()

	sgl.defaults()
    sgl.matrix_mode_projection()
    sgl.ortho(0.0, f32(C.sapp_width()), f32(C.sapp_height()), 0.0, -1.0, 1.0)

	sx = 0
	sy = 50
    dx = sx
	dy = sy

	state.fons.set_font(state.font_normal)
	state.fons.set_size(100.0)
	ascender := 0.0
	descender := 0.0
	state.fons.vert_metrics(&ascender, &descender, &lh)
	dx = sx
	dy += lh
	C.fonsSetColor(state.fons, white)
	dx = C.fonsDrawText(state.fons, dx, dy, c'The  新 quick ', C.NULL)

	fonsSetFont(state.fons, state.font_normal)
	fonsSetSize(state.fons, 48.0)
	fonsSetColor(state.fons, brown)
	dx = fonsDrawText(state.fons, dx, dy, c"brown ", C.NULL)

	fonsSetFont(state.fons, state.font_normal)
	fonsSetSize(state.fons, 24.0)
	fonsSetColor(state.fons, white)
	dx = fonsDrawText(state.fons, dx, dy, c"fox ", C.NULL)

	dx = sx
	dy += lh * 1.2
	fonsSetSize(state.fons, 20.0)
	fonsSetFont(state.fons, state.font_normal)
	fonsSetColor(state.fons, blue)
	fonsDrawText(state.fons, dx, dy, c"Now is the time for all good men to come to the aid of the party.", C.NULL)

	dx = 300
	dy = 350
	fonsSetAlign(state.fons, C.FONS_ALIGN_LEFT | C.FONS_ALIGN_BASELINE)
	fonsSetSize(state.fons, 60.0)
	fonsSetFont(state.fons, state.font_normal)
	fonsSetColor(state.fons, white)
	fonsSetSpacing(state.fons, 5.0)
	fonsSetBlur(state.fons, 6.0)
	fonsDrawText(state.fons, dx, dy, c"Blurry...", C.NULL)

	dx = 300
	dy += 50.0
	fonsSetSize(state.fons, 28.0)
	fonsSetFont(state.fons, state.font_normal)
	fonsSetColor(state.fons, white)
	fonsSetSpacing(state.fons, 0.0)
	fonsSetBlur(state.fons, 3.0)
	fonsDrawText(state.fons, dx,dy + 2, c"DROP SHADOW", C.NULL)
	fonsSetColor(state.fons, black)
	fonsSetBlur(state.fons, 0)
	fonsDrawText(state.fons, dx,dy, c"DROP SHADOW", C.NULL)

	fonsSetSize(state.fons, 18.0)
	fonsSetFont(state.fons, state.font_normal)
	fonsSetColor(state.fons, white)
	dx = 50
	dy = 350
	line(dx-10,dy,dx+250,dy)
	C.fonsSetAlign(state.fons, C.FONS_ALIGN_LEFT | C.FONS_ALIGN_TOP)
	dx = C.fonsDrawText(state.fons, dx,dy, c"Top",C.NULL)
	dx += 10
	C.fonsSetAlign(state.fons, C.FONS_ALIGN_LEFT | C.FONS_ALIGN_MIDDLE)
	dx = C.fonsDrawText(state.fons, dx,dy, c"Middle",C.NULL)
	dx += 10
	C.fonsSetAlign(state.fons, C.FONS_ALIGN_LEFT | C.FONS_ALIGN_BASELINE)
	dx = C.fonsDrawText(state.fons, dx,dy, c"Baseline",C.NULL)
	dx += 10
	C.fonsSetAlign(state.fons, C.FONS_ALIGN_LEFT | C.FONS_ALIGN_BOTTOM)
	C.fonsDrawText(state.fons, dx,dy, c"Bottom",C.NULL)
	dx = 150
	dy = 400
	line(dx,dy-30,dx,dy+80.0)
	C.fonsSetAlign(state.fons, C.FONS_ALIGN_LEFT | C.FONS_ALIGN_BASELINE)
	C.fonsDrawText(state.fons, dx,dy, c"Left",C.NULL)
	dy += 30
	C.fonsSetAlign(state.fons, C.FONS_ALIGN_CENTER | C.FONS_ALIGN_BASELINE)
	C.fonsDrawText(state.fons, dx,dy, c"Center",C.NULL)
	dy += 30
	C.fonsSetAlign(state.fons, C.FONS_ALIGN_RIGHT | C.FONS_ALIGN_BASELINE)
	C.fonsDrawText(state.fons, dx,dy, c"Right",C.NULL)

	C.sfons_flush(state.fons)
}

fn line(sx f32, sy f32, ex f32, ey f32) {
    sgl.begin_lines()
    sgl.c4b(255, 255, 0, 128)
    sgl.v2f(sx, sy)
    sgl.v2f(ex, ey)
    sgl.end()
}