Initial commit

1 files changed, 177 insertions, 0 deletions

diff --git a/contrib/SDL-3.2.8/src/video/riscos/SDL_riscosevents.c b/contrib/SDL-3.2.8/src/video/riscos/SDL_riscosevents.c
new file mode 100644
index 0000000..367ea47
--- /dev/null
+++ b/contrib/SDL-3.2.8/src/video/riscos/SDL_riscosevents.c
@@ -0,0 +1,177 @@
+/*
+  Simple DirectMedia Layer
+  Copyright (C) 1997-2025 Sam Lantinga <slouken@libsdl.org>
+
+  This software is provided 'as-is', without any express or implied
+  warranty.  In no event will the authors be held liable for any damages
+  arising from the use of this software.
+
+  Permission is granted to anyone to use this software for any purpose,
+  including commercial applications, and to alter it and redistribute it
+  freely, subject to the following restrictions:
+
+  1. The origin of this software must not be misrepresented; you must not
+     claim that you wrote the original software. If you use this software
+     in a product, an acknowledgment in the product documentation would be
+     appreciated but is not required.
+  2. Altered source versions must be plainly marked as such, and must not be
+     misrepresented as being the original software.
+  3. This notice may not be removed or altered from any source distribution.
+*/
+#include "SDL_internal.h"
+
+#ifdef SDL_VIDEO_DRIVER_RISCOS
+
+#include "../../events/SDL_events_c.h"
+
+#include "SDL_riscosvideo.h"
+#include "SDL_riscosevents_c.h"
+#include "scancodes_riscos.h"
+
+#include <kernel.h>
+#include <swis.h>
+
+static SDL_Scancode SDL_RISCOS_translate_keycode(int keycode)
+{
+    SDL_Scancode scancode = SDL_SCANCODE_UNKNOWN;
+
+    if (keycode < SDL_arraysize(riscos_scancode_table)) {
+        scancode = riscos_scancode_table[keycode];
+
+#ifdef DEBUG_SCANCODES
+        if (scancode == SDL_SCANCODE_UNKNOWN) {
+            SDL_Log("The key you just pressed is not recognized by SDL: %d", keycode);
+        }
+#endif
+    }
+
+    return scancode;
+}
+
+void RISCOS_PollKeyboard(SDL_VideoDevice *_this)
+{
+    SDL_VideoData *internal = _this->internal;
+    Uint8 key = 2;
+    int i;
+
+    // Check for key releases
+    for (i = 0; i < RISCOS_MAX_KEYS_PRESSED; i++) {
+        if (internal->key_pressed[i] != 255) {
+            if ((_kernel_osbyte(129, internal->key_pressed[i] ^ 0xff, 0xff) & 0xff) != 255) {
+                SDL_SendKeyboardKey(0, SDL_DEFAULT_KEYBOARD_ID, internal->key_pressed[i], SDL_RISCOS_translate_keycode(internal->key_pressed[i]), false);
+                internal->key_pressed[i] = 255;
+            }
+        }
+    }
+
+    // Check for key presses
+    while (key < 0xff) {
+        key = _kernel_osbyte(121, key + 1, 0) & 0xff;
+        switch (key) {
+        case 255:
+        // Ignore mouse keys
+        case 9:
+        case 10:
+        case 11:
+        // Ignore keys with multiple INKEY codes
+        case 24:
+        case 40:
+        case 71:
+        case 87:
+            break;
+
+        default:
+            SDL_SendKeyboardKey(0, SDL_DEFAULT_KEYBOARD_ID, key, SDL_RISCOS_translate_keycode(key), true);
+
+            // Record the press so we can detect release later.
+            for (i = 0; i < RISCOS_MAX_KEYS_PRESSED; i++) {
+                if (internal->key_pressed[i] == key) {
+                    break;
+                }
+                if (internal->key_pressed[i] == 255) {
+                    internal->key_pressed[i] = key;
+                    break;
+                }
+            }
+        }
+    }
+}
+
+static const Uint8 mouse_button_map[] = {
+    SDL_BUTTON_RIGHT,
+    SDL_BUTTON_MIDDLE,
+    SDL_BUTTON_LEFT,
+    SDL_BUTTON_X1,
+    SDL_BUTTON_X2,
+    SDL_BUTTON_X2 + 1,
+    SDL_BUTTON_X2 + 2,
+    SDL_BUTTON_X2 + 3
+};
+
+void RISCOS_PollMouse(SDL_VideoDevice *_this)
+{
+    SDL_VideoData *internal = _this->internal;
+    SDL_Mouse *mouse = SDL_GetMouse();
+    SDL_Rect rect;
+    _kernel_swi_regs regs;
+    int i, x, y, buttons;
+
+    if (!SDL_GetDisplayBounds(SDL_GetPrimaryDisplay(), &rect)) {
+        return;
+    }
+
+    _kernel_swi(OS_Mouse, &regs, &regs);
+    x = (regs.r[0] >> 1);
+    y = rect.h - (regs.r[1] >> 1);
+    buttons = regs.r[2];
+
+    if (mouse->x != x || mouse->y != y) {
+        SDL_SendMouseMotion(0, mouse->focus, SDL_DEFAULT_MOUSE_ID, false, (float)x, (float)y);
+    }
+
+    if (internal->last_mouse_buttons != buttons) {
+        for (i = 0; i < SDL_arraysize(mouse_button_map); i++) {
+            bool down = ((buttons & (1 << i)) != 0);
+            SDL_SendMouseButton(0, mouse->focus, SDL_DEFAULT_MOUSE_ID, mouse_button_map[i], down);
+        }
+        internal->last_mouse_buttons = buttons;
+    }
+}
+
+bool RISCOS_InitEvents(SDL_VideoDevice *_this)
+{
+    SDL_VideoData *internal = _this->internal;
+    _kernel_swi_regs regs;
+    int i, status;
+
+    for (i = 0; i < RISCOS_MAX_KEYS_PRESSED; i++) {
+        internal->key_pressed[i] = 255;
+    }
+
+    status = (_kernel_osbyte(202, 0, 255) & 0xFF);
+    SDL_ToggleModState(SDL_KMOD_NUM, (status & (1 << 2)) ? false : true);
+    SDL_ToggleModState(SDL_KMOD_CAPS, (status & (1 << 4)) ? false : true);
+    SDL_ToggleModState(SDL_KMOD_SCROLL, (status & (1 << 1)) ? true : false);
+
+    _kernel_swi(OS_Mouse, &regs, &regs);
+    internal->last_mouse_buttons = regs.r[2];
+
+    // Disable escape.
+    _kernel_osbyte(229, 1, 0);
+
+    return true;
+}
+
+void RISCOS_PumpEvents(SDL_VideoDevice *_this)
+{
+    RISCOS_PollMouse(_this);
+    RISCOS_PollKeyboard(_this);
+}
+
+void RISCOS_QuitEvents(SDL_VideoDevice *_this)
+{
+    // Re-enable escape.
+    _kernel_osbyte(229, 0, 0);
+}
+
+#endif // SDL_VIDEO_DRIVER_RISCOS