gui.window

import gui.window
import mem

func paint(w: window.Window, frame: int):
    size := w.Size()
    width := size.physical_width
    height := size.physical_height
    pixels := mem.AllocateZeroed(((width * height) * 4) as u64) as u32*
    defer mem.Free(pixels as void*)
    shade := (frame * 40) as u32
    repeat width * height in i:
        pixels[i] = (0xFF000000 as u32) | (shade << 8)
    end
    w.PresentAll(pixels as void*, width, height, width * 4)
end

func main:
    window.SetManualClock(true)
    w := window.Open(window.Options { title = "Clock", width = 64.0, height = 48.0, headless = true })
    tick := window.SetTimer(500, true)
    mut frames := 0
    until w.IsOpen():
        e := window.Wait(-1)
        switch e.kind:
            window.EventKind.RedrawRequested:
                paint(w, frames)
                frames++
                println "frame", frames, "at", window.Clock(), "ms"
                break
            end
            window.EventKind.Timer:
                w.RequestRedraw()
                if frames == 3:
                    window.Inject(window.Event { kind = window.EventKind.CloseRequested, window = w.id })
                end
                break
            end
            window.EventKind.CloseRequested:
                println "closing"
                window.ClearTimer(tick)
                w.Close()
                break
            end
            else:
                break
            end
        end
    end
    println "presented", w.PresentCount(), "frames"
end

import gui.window

func main:
    window.SetManualClock(true)
    w := window.Open(window.Options { width = 300.0, height = 200.0, headless = true, visible = false })
    window.Inject(window.Event { kind = window.EventKind.PointerDown, window = w.id, x = 40.0, y = 30.0, button = window.MouseButton.Left })
    window.Advance(120)
    window.Inject(window.Event { kind = window.EventKind.PointerDown, window = w.id, x = 41.0, y = 30.0, button = window.MouseButton.Left })
    window.Inject(window.Event { kind = window.EventKind.KeyDown, window = w.id, key = window.Key.A, code = 38 })
    window.Inject(window.Event { kind = window.EventKind.TextInput, window = w.id, text = "a" })
    window.Inject(window.Event { kind = window.EventKind.ImePreedit, window = w.id, text = "سل", cursor = 4 })
    window.Inject(window.Event { kind = window.EventKind.ImeCommit, window = w.id, text = "سلام" })
    mut e := window.Poll()
    until e.kind != window.EventKind.None:
        switch e.kind:
            window.EventKind.PointerDown:
                println "click", e.clicks, "at", e.x, e.y
                break
            end
            window.EventKind.KeyDown:
                println "key A:", e.key == window.Key.A
                break
            end
            window.EventKind.TextInput, window.EventKind.ImeCommit:
                println "insert", e.text
                break
            end
            window.EventKind.ImePreedit:
                println "composing", e.text, "caret at byte", e.cursor
                break
            end
            else:
                break
            end
        end
        e = window.Poll()
    end
    w.SetImeRect(40.0, 30.0, 2.0, 18.0)
    println "candidate window goes to", w.ImeRect()
end

import gui.window
import mem

func main:
    w := window.Open(window.Options { width = 100.0, height = 50.0, headless = true, scale = 1.5, visible = false })
    size := w.Size()
    println "logical", size.width, size.height, "physical", size.physical_width, size.physical_height
    window.Inject(window.Event { kind = window.EventKind.ScaleChanged, window = w.id, scale = 2.0 })
    e := window.Poll()
    println "new scale", e.scale, "logical", e.width, e.height, "physical", e.physical_width, e.physical_height
    window.Inject(window.Event { kind = window.EventKind.Resized, window = w.id, physical_width = 300, physical_height = 100 })
    r := window.Poll()
    println "resized to", r.width, r.height
    width := r.physical_width
    height := r.physical_height
    pixels := mem.AllocateZeroed(((width * height) * 4) as u64) as u32*
    defer mem.Free(pixels as void*)
    w.PresentAll(pixels as void*, width, height, width * 4)
    mut damage := Vector {} as Vector<window.Rect>
    defer damage.free()
    damage.push(window.Rect { x = 10, y = 10, width = 20, height = 8 })
    damage.push(window.Rect { x = 290, y = 90, width = 50, height = 50 })
    w.Present(pixels as void*, width, height, width * 4, damage)
    println "copied", w.LastDamageCount(), "rects inside", w.LastDamage()
end

import gui.window
import mem

func main:
    window.SetManualClock(true)
    w := window.Open(window.Options { width = 2.0, height = 2.0, headless = true, visible = false })
    pixels := mem.AllocateZeroed(16 as u64) as u32*
    defer mem.Free(pixels as void*)
    pixels[0] = 0xFFFF0000 as u32
    pixels[3] = 0x80000080 as u32
    w.PresentAll(pixels as void*, 2, 2, 8)
    println "top left red:", w.PixelAt(0, 0) == (0xFFFF0000 as u32)
    println "bottom right half blue:", w.PixelAt(1, 1) == (0x80000080 as u32)
    timer := window.SetTimer(1000, false)
    mut e := window.Wait(-1)
    until e.kind != window.EventKind.Timer:
        println "skipped event", e.kind as int
        e = window.Wait(-1)
    end
    println "timer", e.timer == timer, "after", window.Clock(), "ms of test time"
    w.Close()
end