added mouse cursor support to macos via macos/window

Author: discordance

src/macos/cursor.rs

@@ -0,0 +1,78 @@
+use cocoa::base::id;
+use objc::{runtime::Sel, msg_send, sel, sel_impl, class};
+
+use crate::MouseCursor;
+
+#[derive(Debug)]
+pub enum Cursor {
+    Native(&'static str),
+    Undocumented(&'static str),
+}
+
+impl From<MouseCursor> for Cursor {
+    fn from(cursor: MouseCursor) -> Self {
+        match cursor {
+            MouseCursor::Default => Cursor::Native("arrowCursor"),
+            MouseCursor::Pointer => Cursor::Native("pointingHandCursor"),
+            MouseCursor::Hand => Cursor::Native("openHandCursor"),
+            MouseCursor::HandGrabbing => Cursor::Native("closedHandCursor"),
+            MouseCursor::Text => Cursor::Native("IBeamCursor"),
+            MouseCursor::VerticalText => Cursor::Native("IBeamCursorForVerticalLayout"),
+            MouseCursor::Copy => Cursor::Native("dragCopyCursor"),
+            MouseCursor::Alias => Cursor::Native("dragLinkCursor"),
+            MouseCursor::NotAllowed | MouseCursor::PtrNotAllowed => {
+                Cursor::Native("operationNotAllowedCursor")
+            }
+            // MouseCursor:: => Cursor::Native("contextualMenuCursor"),
+            MouseCursor::Crosshair => Cursor::Native("crosshairCursor"),
+            MouseCursor::EResize => Cursor::Native("resizeRightCursor"),
+            MouseCursor::NResize => Cursor::Native("resizeUpCursor"),
+            MouseCursor::WResize => Cursor::Native("resizeLeftCursor"),
+            MouseCursor::SResize => Cursor::Native("resizeDownCursor"),
+            MouseCursor::EwResize | MouseCursor::ColResize => Cursor::Native("resizeLeftRightCursor"),
+            MouseCursor::NsResize | MouseCursor::RowResize => Cursor::Native("resizeUpDownCursor"),
+
+            MouseCursor::Help => Cursor::Undocumented("_helpCursor"),
+            MouseCursor::ZoomIn => Cursor::Undocumented("_zoomInCursor"),
+            MouseCursor::ZoomOut => Cursor::Undocumented("_zoomOutCursor"),
+            MouseCursor::NeResize => Cursor::Undocumented("_windowResizeNorthEastCursor"),
+            MouseCursor::NwResize => Cursor::Undocumented("_windowResizeNorthWestCursor"),
+            MouseCursor::SeResize => Cursor::Undocumented("_windowResizeSouthEastCursor"),
+            MouseCursor::SwResize => Cursor::Undocumented("_windowResizeSouthWestCursor"),
+            MouseCursor::NeswResize => Cursor::Undocumented("_windowResizeNorthEastSouthWestCursor"),
+            MouseCursor::NwseResize => Cursor::Undocumented("_windowResizeNorthWestSouthEastCursor"),
+
+            MouseCursor::Working | MouseCursor::PtrWorking => {
+                Cursor::Undocumented("busyButClickableCursor")
+            }
+
+            _ => Cursor::Native("arrowCursor"),
+
+            // MouseCursor::Hidden => todo!(),
+            // MouseCursor::Move => todo!(),
+            // MouseCursor::AllScroll => todo!(),
+            // MouseCursor::Cell => todo!(),
+        }
+    }
+}
+
+impl Cursor {
+    pub unsafe fn load(&self) -> id {
+        match self {
+            Cursor::Native(cursor_name) => {
+                let sel = Sel::register(cursor_name);
+                msg_send![class!(NSCursor), performSelector: sel]
+            }
+            Cursor::Undocumented(cursor_name) => {
+                let class = class!(NSCursor);
+                let sel = Sel::register(cursor_name);
+                let sel = if msg_send![class, respondsToSelector: sel] {
+                    sel
+                } else {
+                    sel!(arrowCursor)
+                };
+                msg_send![class, performSelector: sel]
+            }
+        }
+    }
+}

src/macos/mod.rs

@@ -1,5 +1,6 @@
 mod keyboard;
 mod view;
 mod window;
+mod cursor;
 
 pub use window::*;

src/macos/window.rs

@@ -20,10 +20,11 @@ use objc::{msg_send, runtime::Object, sel, sel_impl};
 use raw_window_handle::{AppKitHandle, HasRawWindowHandle, RawWindowHandle};
 
 use crate::{
-    Event, EventStatus, Size, WindowEvent, WindowHandler, WindowInfo, WindowOpenOptions,
+    Event, EventStatus, Size, MouseCursor, WindowEvent, WindowHandler, WindowInfo, WindowOpenOptions,
     WindowScalePolicy,
 };
 
+use super::cursor::Cursor;
 use super::keyboard::KeyboardState;
 use super::view::{create_view, BASEVIEW_STATE_IVAR};
 
@@ -338,6 +339,18 @@ impl Window {
         }
     }
 
+    pub fn set_mouse_cursor(&self, cursor: MouseCursor) {
+        let native_cursor = Cursor::from(cursor);
+        unsafe {
+            let bounds: NSRect = msg_send![self.ns_view as id, bounds];
+            let cursor = native_cursor.load();
+            let _: () = msg_send![self.ns_view as id,
+                addCursorRect:bounds
+                cursor:cursor
+            ];
+        }
+    }
+
     #[cfg(feature = "opengl")]
     pub fn gl_context(&self) -> Option<&GlContext> {
         self.gl_context.as_ref()

src/window.rs

@@ -5,6 +5,7 @@ use raw_window_handle::{HasRawWindowHandle, RawWindowHandle};
 use crate::event::{Event, EventStatus};
 use crate::window_open_options::WindowOpenOptions;
 use crate::Size;
+use crate::MouseCursor;
 
 #[cfg(target_os = "macos")]
 use crate::macos as platform;
@@ -114,6 +115,11 @@ impl<'a> Window<'a> {
     pub fn resize(&mut self, size: Size) {
         self.window.resize(size);
     }
+    
+    /// Set the cursor to the given cursor type
+    pub fn set_mouse_cursor(&self, cursor: MouseCursor) {
+        self.window.set_mouse_cursor(cursor);
+    }
 
     /// If provided, then an OpenGL context will be created for this window. You'll be able to
     /// access this context through [crate::Window::gl_context].