Unify core and runner events into struct yasl_event

The core input queue and the yasl_run() runner each had their own event
type, and the runner translated one into the other. Both now share
struct yasl_event in <yasl/yasl.h>: yasl_surface_poll_event() returns the
same events the app event callback receives, so the runner forwards them
unchanged.

Pointer input becomes POINTER_DOWN/UP/MOTION/SCROLL/LEAVE with a named
yasl_pointer_button and a motion delta computed in the input queue. TEXT,
PASTE and DROP share one text payload, scale changes fold into
WINDOW_RESIZE, and every event carries a monotonic time_ns.
yasl_surface_set_mouse_mode() is replaced by
yasl_surface_set_pointer_mode(); no backend implements relative mode yet.

The export check now only counts YASL_API declarations, so function
pointer fields returning enum yasl_app_result are not mistaken for
exports.

Co-Authored-By: Claude Opus 5.5 <noreply@anthropic.com>

1 files changed, 31 insertions, 166 deletions

diff --git a/src/common/app.c b/src/common/app.c
index e1148f9..9ec1f6a 100644
--- a/src/common/app.c
+++ b/src/common/app.c
@@ -9,7 +9,7 @@
 
 struct user_event_node {
     struct yasl_surface *surface;
-    uint32_t type;
+    uint32_t code;
     void *payload;
     size_t size;
     struct user_event_node *next;
@@ -21,10 +21,6 @@ struct app_surface {
     struct yasl_surface *surface;
     struct app_runner *runner;
     yasl_pacing_mode pacing;
-    yasl_mouse_mode mouse_mode;
-    struct yasl_vector2i last_mouse_pos;
-    bool has_last_mouse_pos;
-    struct yasl_vector2i last_size;
     uint32_t last_scale_120;
     uint64_t frame_index;
     bool presented;
@@ -45,6 +41,13 @@ struct app_runner {
     struct user_event_node *user_event_tail;
 };
 
+/* Deliver one event to the application; a QUIT result stops the runner. */
+static void emit(struct app_runner *ar, const struct yasl_event *ev)
+{
+    if (ar->desc->event && ar->desc->event(ar->desc->userdata, ev) == YASL_APP_QUIT)
+        ar->running = false;
+}
+
 static void app_runner_surface_draw(struct yasl_surface *s, struct yasl_frame *frame, void *ud)
 {
     struct app_surface *as = ud;
@@ -88,35 +91,17 @@ static void app_runner_surface_configure(struct yasl_surface *s, struct yasl_geo
     if (!ar || !ar->desc || !ar->desc->event)
         return;
 
-    bool scale_changed = (as->last_scale_120 != geom.scale_120 && as->last_scale_120 != 0);
-    as->last_scale_120 = geom.scale_120;
-    as->last_size = geom.size;
-
-    if (scale_changed) {
-        struct yasl_event ev = {
-            .surface = s,
-            .type = YASL_EVENT_WINDOW_SCALE_CHANGED,
-            .scale = {
-                .scale_120 = geom.scale_120,
-                .size = geom.size,
-            },
-        };
-        if (ar->desc->event(ar->desc->userdata, &ev) == YASL_APP_QUIT)
-            ar->running = false;
-        if (!as->surface)
-            return;
-    }
-
     struct yasl_event ev = {
-        .surface = s,
         .type = YASL_EVENT_WINDOW_RESIZE,
+        .surface = s,
+        .time_ns = yasl_loop_now_ns(),
         .resize = {
-            .size = geom.size,
-            .scale_120 = geom.scale_120,
+            .geometry = geom,
+            .scale_changed = as->last_scale_120 && as->last_scale_120 != geom.scale_120,
         },
     };
-    if (ar->desc->event(ar->desc->userdata, &ev) == YASL_APP_QUIT)
-        ar->running = false;
+    as->last_scale_120 = geom.scale_120;
+    emit(ar, &ev);
 
     if (as->surface)
         yasl_surface_schedule_redraw(s);
@@ -129,13 +114,11 @@ static void app_runner_surface_close(struct yasl_surface *s, void *ud)
     if (!ar || !ar->desc || !ar->desc->event)
         return;
 
-    struct yasl_event ev = {
+    emit(ar, &(struct yasl_event){
+        .type = YASL_EVENT_WINDOW_CLOSE,
         .surface = s,
-        .type = YASL_EVENT_WINDOW_CLOSE_REQUEST,
-    };
-    if (ar->desc->event(ar->desc->userdata, &ev) == YASL_APP_QUIT) {
-        ar->running = false;
-    }
+        .time_ns = yasl_loop_now_ns(),
+    });
 }
 
 void app_runner_register_surface(void *runner, struct yasl_surface *s)
@@ -150,9 +133,7 @@ void app_runner_register_surface(void *runner, struct yasl_surface *s)
     as->surface = s;
     as->runner = ar;
     as->pacing = YASL_PACING_ON_DEMAND;
-    as->mouse_mode = YASL_MOUSE_NORMAL;
     as->last_scale_120 = s->scale_120;
-    as->last_size = s->size;
     s->app_surface = as;
 
     as->next = ar->surfaces;
@@ -237,21 +218,8 @@ void yasl_surface_request_frame(struct yasl_surface *s)
     }
 }
 
-void yasl_surface_set_mouse_mode(struct yasl_surface *s, yasl_mouse_mode mode)
-{
-    if (!s || !s->app_surface)
-        return;
-    struct app_surface *as = s->app_surface;
-    as->mouse_mode = mode;
-    if (mode == YASL_MOUSE_NORMAL) {
-        yasl_surface_set_cursor(s, YASL_CURSOR_ARROW);
-    } else {
-        yasl_surface_set_cursor(s, YASL_CURSOR_HIDDEN);
-    }
-}
-
 bool yasl_post_event(struct yasl_display *d, struct yasl_surface *s,
-                     uint32_t user_type, void *payload, size_t size)
+                     uint32_t code, void *payload, size_t size)
 {
     if (!d || !d->app_runner)
         return false;
@@ -261,7 +229,7 @@ bool yasl_post_event(struct yasl_display *d, struct yasl_surface *s,
     if (!node)
         return false;
     node->surface = s;
-    node->type = user_type;
+    node->code = code;
     node->payload = payload;
     node->size = size;
     node->next = NULL;
@@ -322,19 +290,12 @@ static void app_runner_dispatch_user_events(struct app_runner *ar)
 
     while (node && ar->running) {
         struct user_event_node *next = node->next;
-        if (ar->desc->event) {
-            struct yasl_event ev = {
-                .surface = node->surface,
-                .type = YASL_EVENT_USER,
-                .user = {
-                    .type = node->type,
-                    .payload = node->payload,
-                    .size = node->size,
-                },
-            };
-            if (ar->desc->event(ar->desc->userdata, &ev) == YASL_APP_QUIT)
-                ar->running = false;
-        }
+        emit(ar, &(struct yasl_event){
+            .type = YASL_EVENT_USER,
+            .surface = node->surface,
+            .time_ns = yasl_loop_now_ns(),
+            .user = {.code = node->code, .payload = node->payload, .size = node->size},
+        });
         free(node);
         node = next;
     }
@@ -348,107 +309,11 @@ static void app_runner_dispatch_user_events(struct app_runner *ar)
 static void app_runner_dispatch_input_events(struct app_runner *ar)
 {
     for (struct app_surface *as = ar->surfaces; as && ar->running; as = as->next) {
-        struct yasl_input_event ie;
-        while (as->surface && yasl_surface_input_poll(as->surface, &ie) &&
-               ar->running) {
-            if (!ar->desc->event)
-                continue;
-
-            struct yasl_event ev = {0};
-            ev.surface = ie.surface ? ie.surface : as->surface;
-
-            switch (ie.kind) {
-            case YASL_INPUT_KEY:
-                ev.type = YASL_EVENT_KEY;
-                ev.key.key = ie.key.key;
-                ev.key.action = ie.key.action;
-                ev.key.mods = ie.key.mods;
-                ev.key.codepoint = ie.key.codepoint;
-                ev.key.shifted = ie.key.shifted;
-                ev.key.native_code = ie.key.native_code;
-                ev.key.repeat = (ie.key.action == YASL_KEY_REPEAT);
-                if (ar->desc->event(ar->desc->userdata, &ev) == YASL_APP_QUIT)
-                    ar->running = false;
-                break;
-            case YASL_INPUT_TEXT:
-                ev.type = YASL_EVENT_TEXT;
-                ev.text.text = ie.text.text;
-                ev.text.len = ie.text.len;
-                if (ar->desc->event(ar->desc->userdata, &ev) == YASL_APP_QUIT)
-                    ar->running = false;
-                break;
-            case YASL_INPUT_MOUSE:
-                if (ie.mouse.kind == YASL_PTR_PRESS || ie.mouse.kind == YASL_PTR_RELEASE) {
-                    ev.type = YASL_EVENT_MOUSE_BUTTON;
-                    ev.mouse_button.pos = ie.mouse.pos;
-                    ev.mouse_button.device = ie.mouse.device;
-                    ev.mouse_button.button = ie.mouse.button;
-                    ev.mouse_button.pressed = (ie.mouse.kind == YASL_PTR_PRESS);
-                    ev.mouse_button.mods = ie.mouse.mods;
-                    ev.mouse_button.pen = ie.mouse.pen;
-                    as->last_mouse_pos = ie.mouse.pos;
-                    as->has_last_mouse_pos = true;
-                    if (ar->desc->event(ar->desc->userdata, &ev) == YASL_APP_QUIT)
-                        ar->running = false;
-                } else if (ie.mouse.kind == YASL_PTR_MOTION) {
-                    ev.type = YASL_EVENT_MOUSE_MOTION;
-                    ev.mouse_motion.pos = ie.mouse.pos;
-                    ev.mouse_motion.device = ie.mouse.device;
-                    if (as->has_last_mouse_pos) {
-                        ev.mouse_motion.delta.x = ie.mouse.pos.x - as->last_mouse_pos.x;
-                        ev.mouse_motion.delta.y = ie.mouse.pos.y - as->last_mouse_pos.y;
-                    } else {
-                        ev.mouse_motion.delta = (struct yasl_vector2i){0, 0};
-                    }
-                    ev.mouse_motion.mods = ie.mouse.mods;
-                    ev.mouse_motion.pen = ie.mouse.pen;
-                    as->last_mouse_pos = ie.mouse.pos;
-                    as->has_last_mouse_pos = true;
-                    if (ar->desc->event(ar->desc->userdata, &ev) == YASL_APP_QUIT)
-                        ar->running = false;
-                } else if (ie.mouse.kind == YASL_PTR_SCROLL) {
-                    ev.type = YASL_EVENT_MOUSE_SCROLL;
-                    ev.mouse_scroll.pos = ie.mouse.pos;
-                    ev.mouse_scroll.scroll = ie.mouse.scroll;
-                    ev.mouse_scroll.mods = ie.mouse.mods;
-                    if (ar->desc->event(ar->desc->userdata, &ev) == YASL_APP_QUIT)
-                        ar->running = false;
-                } else if (ie.mouse.kind == YASL_PTR_LEAVE) {
-                    ev.type = YASL_EVENT_MOUSE_LEAVE;
-                    as->has_last_mouse_pos = false;
-                    if (ar->desc->event(ar->desc->userdata, &ev) == YASL_APP_QUIT)
-                        ar->running = false;
-                }
-                break;
-            case YASL_INPUT_FOCUS:
-                ev.type = YASL_EVENT_WINDOW_FOCUS;
-                ev.focus.focused = ie.focus.focused;
-                if (ar->desc->event(ar->desc->userdata, &ev) == YASL_APP_QUIT)
-                    ar->running = false;
-                break;
-            case YASL_INPUT_PASTE:
-                ev.type = YASL_EVENT_PASTE;
-                ev.paste.text = ie.paste.text;
-                ev.paste.len = ie.paste.len;
-                if (ar->desc->event(ar->desc->userdata, &ev) == YASL_APP_QUIT)
-                    ar->running = false;
-                break;
-            case YASL_INPUT_DROP_FILES:
-                ev.type = YASL_EVENT_DROP_FILES;
-                ev.drop_files.files = ie.drop_files.files;
-                ev.drop_files.len = ie.drop_files.len;
-                if (ar->desc->event(ar->desc->userdata, &ev) == YASL_APP_QUIT)
-                    ar->running = false;
-                break;
-            case YASL_INPUT_RESET:
-                as->has_last_mouse_pos = false;
-                ev.type = YASL_EVENT_INPUT_RESET;
-                if (ar->desc->event(ar->desc->userdata, &ev) == YASL_APP_QUIT)
-                    ar->running = false;
-                break;
-            default:
-                break;
-            }
+        struct yasl_event ev;
+        while (ar->running && as->surface && yasl_surface_poll_event(as->surface, &ev)) {
+            if (!ev.surface)
+                ev.surface = as->surface;
+            emit(ar, &ev);
         }
     }
 }