/* Mouse and pen input on a CPU surface. */
#include <yasl/yasl.h>
#include <yasl/cpu.h>
#include <string.h>

int main(int argc, char **argv)
{
    bool smoke = argc == 2 && !strcmp(argv[1], "--smoke-test");
    yasl_surface *s = yasl_surface_create(&(struct yasl_surface_options){.title="YASL input", .width=640, .height=480, .type=YASL_SURFACE_CPU, .flags=0});
    if (!s) return 1;
    double px = -100, py = -100, pressure = 0;
    bool dirty = false;
    int frames = 0, result = 1;
    yasl_event e;
    for (;;) {
        int n = yasl_wait_event(&e, smoke ? 20 : -1);
        if (n < 0) break;
        if (e.type == YASL_EVENT_CLOSE || e.type == YASL_EVENT_QUIT ||
            (e.type == YASL_EVENT_KEY && e.key.key == YASL_KEY_ESCAPE)) { result = 0; break; }
        if (e.type == YASL_EVENT_POINTER) {
            px = e.pointer.x; py = e.pointer.y;
            pressure = (e.pointer.buttons & YASL_BUTTON_BIT(YASL_BUTTON_PRIMARY)) ? 0.5 : 0;
            dirty = true;
        }
        if (e.type == YASL_EVENT_PEN) {
            px = e.pen.x; py = e.pen.y;
            pressure = (e.pen.axes_valid & YASL_PEN_PRESSURE) ? e.pen.pressure : 0;
            dirty = true;
        }
        if (e.type == YASL_EVENT_REFRESH) dirty = true;
        if (dirty) {
            struct yasl_cpu_buffer buffer;
            int acquired = yasl_cpu_acquire(s, &buffer);
            int w = buffer.width, h = buffer.height;
            uint32_t *pixels = acquired == 0 ? buffer.pixels : NULL;
            if (!pixels) break;
            double scale = yasl_surface_get_scale(s), radius = (8 + pressure * 48) * scale;
            for (int y = 0; y < h; y++) {
                for (int x = 0; x < w; x++) {
                    double dx = x - px * scale, dy = y - py * scale;
                    pixels[(size_t)y * w + x] = dx * dx + dy * dy < radius * radius ? 0xffffc060u : 0xff203040u;
                }
            }
            if ((yasl_cpu_present(s, &buffer) < 0)) break;
            dirty = false;
            frames++;
        }
        if (smoke && frames && n == 0) { result = 0; break; }
    }
    yasl_shutdown();
    return result;
}