mirrors/Odin
1
0
Fork 0
mirror of https://github.com/odin-lang/Odin.git synced 2026-04-13 18:15:49 +00:00
Code Issues Packages Projects Releases Wiki Activity

Merge pull request #6338 from brunodeangelis/brda/cursors-bindings

Browse Source 
add bindings to allow custom hardware cursors
This commit is contained in:
Jeroen van Rijn
2026-02-27 14:12:26 +01:00
committed by GitHub
parent 275ffa1a0e e65dcd64b8
commit c63e310359
9 changed files with 119 additions and 28 deletions
Download Patch File Download Diff File Expand all files Collapse all files

82
core/sys/darwin/Foundation/NSBitmapImageRep.odin
View File

@@ -1,42 +1,72 @@
package objc_Foundation
import "base:intrinsics"
@(objc_class="NSBitmapImageRep")
BitmapImageRep :: struct { using _: Object }
BitmapInteger :: distinct UInteger
BitmapFormatFlag :: enum BitmapInteger {
AlphaFirst = 0,
AlphaNonpremultiplied = 1,
FloatingPointSamples = 2,
SixteenBitLittleEndian = 8,
ThirtyTwoBitLittleEndian = 9,
SixteenBitBigEndian = 10,
ThirtyTwoBitBigEndian = 11,
}
BitmapFormatFlags :: bit_set[BitmapFormatFlag; BitmapInteger]
@(objc_type=BitmapImageRep, objc_name="alloc", objc_is_class_method=true)
BitmapImageRep_alloc :: proc "c" () -> ^BitmapImageRep {
return msgSend(^BitmapImageRep, BitmapImageRep, "alloc")
}
@(objc_type=BitmapImageRep, objc_name="initWithBitmapDataPlanes")
BitmapImageRep_initWithBitmapDataPlanes :: proc "c" (
self: ^BitmapImageRep,
BitmapImageRep_initWithBitmapDataPlanes_legacy :: proc "c" (
self: ^BitmapImageRep,
bitmapDataPlanes: ^^u8,
pixelsWide: Integer,
pixelsHigh: Integer,
bitsPerSample: Integer,
pixelsWide: Integer,
pixelsHigh: Integer,
bitsPerSample: Integer,
samplesPerPixel: Integer,
hasAlpha: bool,
isPlanar: bool,
colorSpaceName: ^String,
bytesPerRow: Integer,
bitsPerPixel: Integer) -> ^BitmapImageRep {
return msgSend(^BitmapImageRep,
self,
hasAlpha: bool,
isPlanar: bool,
colorSpaceName: ^String,
bytesPerRow: Integer,
bitsPerPixel: Integer,
) -> ^BitmapImageRep {
return msgSend(
^BitmapImageRep, self,
"initWithBitmapDataPlanes:pixelsWide:pixelsHigh:bitsPerSample:samplesPerPixel:hasAlpha:isPlanar:colorSpaceName:bytesPerRow:bitsPerPixel:",
bitmapDataPlanes,
pixelsWide,
pixelsHigh,
bitsPerSample,
samplesPerPixel,
hasAlpha,
isPlanar,
colorSpaceName,
bytesPerRow,
bitsPerPixel)
bitmapDataPlanes, pixelsWide, pixelsHigh, bitsPerSample, samplesPerPixel,
hasAlpha, isPlanar, colorSpaceName, bytesPerRow, bitsPerPixel,
)
}
BitmapImageRep_initWithBitmapDataPlanes_bitmapFormat :: proc "c" (
self: ^BitmapImageRep,
bitmapDataPlanes: ^^u8,
pixelsWide: Integer,
pixelsHigh: Integer,
bitsPerSample: Integer,
samplesPerPixel: Integer,
hasAlpha: bool,
isPlanar: bool,
colorSpaceName: ^String,
bitmapFormat: BitmapFormatFlags,
bytesPerRow: Integer,
bitsPerPixel: Integer,
) -> ^BitmapImageRep {
return msgSend(
^BitmapImageRep, self,
"initWithBitmapDataPlanes:pixelsWide:pixelsHigh:bitsPerSample:samplesPerPixel:hasAlpha:isPlanar:colorSpaceName:bitmapFormat:bytesPerRow:bitsPerPixel:",
bitmapDataPlanes, pixelsWide, pixelsHigh, bitsPerSample, samplesPerPixel,
hasAlpha, isPlanar, colorSpaceName, bitmapFormat, bytesPerRow, bitsPerPixel,
)
}
@(objc_type=BitmapImageRep, objc_name="initWithBitmapDataPlanes")
BitmapImageRep_initWithBitmapDataPlanes :: proc{
BitmapImageRep_initWithBitmapDataPlanes_legacy,
BitmapImageRep_initWithBitmapDataPlanes_bitmapFormat,
}
@(objc_type=BitmapImageRep, objc_name="bitmapData")

9
core/sys/darwin/Foundation/NSColor.odin
View File

@@ -1,5 +1,7 @@
package objc_Foundation
foreign import "system:Foundation.framework"
@(objc_class="NSColorSpace")
ColorSpace :: struct {using _: Object}
@@ -146,4 +148,9 @@ Color_numberOfComponents :: proc "c" (self: ^Color) -> Integer {
@(objc_type=Color, objc_name="getComponents")
Color_getComponents :: proc "c" (self: ^Color, components: [^]Float) {
msgSend(nil, self, "getComponents:", components)
}
}
@(link_prefix="NS", default_calling_convention="c")
foreign Foundation {
DeviceRGBColorSpace: ^String
}

8
core/sys/darwin/Foundation/NSCursor.odin
View File

@@ -3,6 +3,14 @@ package objc_Foundation
@(objc_class="NSCursor")
Cursor :: struct {using _: Object}
@(objc_type=Cursor, objc_name="alloc", objc_is_class_method=true)
Cursor_alloc :: proc "c" () -> ^Cursor {
return msgSend(^Cursor, Cursor, "alloc")
}
@(objc_type=Cursor, objc_name="initWithImage")
Cursor_initWithImage :: proc "c" (self: ^Cursor, image: ^Image, hotSpot: Point) -> ^Cursor {
return msgSend(^Cursor, self, "initWithImage:hotSpot:", image, hotSpot)
}
@(objc_type=Cursor, objc_name="hide", objc_is_class_method=true)
Cursor_hide :: proc() {
msgSend(nil, Cursor, "hide")

19
core/sys/darwin/Foundation/NSImage.odin Normal file
View File

@@ -0,0 +1,19 @@
package objc_Foundation
@(objc_class="NSImage")
Image :: struct { using _: Object }
@(objc_type=Image, objc_name="alloc", objc_is_class_method=true)
Image_alloc :: proc "c" () -> ^Image {
return msgSend(^Image, Image, "alloc")
}
@(objc_type=Image, objc_name="initWithSize")
Image_initWithSize :: proc "c" (self: ^Image, size: Size) -> ^Image {
return msgSend(^Image, self, "initWithSize:", size)
}
@(objc_type=Image, objc_name="addRepresentation")
Image_addRepresentation :: proc(self: ^Image, rep: ^ImageRep) {
msgSend(nil, self, "addRepresentation:", rep)
}

4
core/sys/darwin/Foundation/NSImageRep.odin Normal file
View File

@@ -0,0 +1,4 @@
package objc_Foundation
@(objc_class="NSImageRep")
ImageRep :: struct { using _: Object }

8
core/sys/windows/gdi32.odin
View File

@@ -19,6 +19,7 @@ foreign gdi32 {
RestoreDC :: proc(hdc: HDC, nSavedDC: INT) -> BOOL ---
CreateDIBPatternBrush :: proc(h: HGLOBAL, iUsage: UINT) -> HBRUSH ---
CreateBitmap :: proc(nWidth: INT, nHeight: INT, nPlanes: UINT, nBitCount: UINT, lpBits: LPVOID) -> HBITMAP ---
CreateDIBitmap :: proc(hdc: HDC, pbmih: ^BITMAPINFOHEADER, flInit: DWORD, pjBits: VOID, pbmi: ^BITMAPINFO, iUsage: UINT) -> HBITMAP ---
CreateDIBSection :: proc(hdc: HDC, pbmi: ^BITMAPINFO, usage: UINT, ppvBits: ^^VOID, hSection: HANDLE, offset: DWORD) -> HBITMAP ---
StretchDIBits :: proc(hdc: HDC, xDest, yDest, DestWidth, DestHeight, xSrc, ySrc, SrcWidth, SrcHeight: INT, lpBits: VOID, lpbmi: ^BITMAPINFO, iUsage: UINT, rop: DWORD) -> INT ---
@@ -151,6 +152,13 @@ BKMODE :: enum {
OPAQUE = 2,
}
ICONINFO :: struct {
fIcon: BOOL,
xHotspot, yHotspot: DWORD,
hbmMask, hbmColor: HBITMAP,
}
PICONINFO :: ^ICONINFO
ICONINFOEXW :: struct {
cbSize: DWORD,
fIcon: BOOL,

1
core/sys/windows/user32.odin
View File

@@ -116,6 +116,7 @@ foreign user32 {
CreateIcon :: proc(hInstance: HINSTANCE, nWidth, nHeight: INT, cPlanes: BYTE, cBitsPixel: BYTE, lpbANDbits: PBYTE, lpbXORbits: PBYTE) -> HICON ---
CreateIconFromResource :: proc(presbits: PBYTE, dwResSize: DWORD, fIcon: BOOL, dwVer: DWORD) -> HICON ---
CreateIconIndirect :: proc(piconinfo: PICONINFO) -> HICON ---
DestroyIcon :: proc(hIcon: HICON) -> BOOL ---
DrawIcon :: proc(hDC: HDC, X, Y: INT, hIcon: HICON) -> BOOL ---

3
vendor/x11/xlib/xlib_procs.odin vendored
View File

@@ -13,7 +13,8 @@ foreign xcursor {
cursorGetDefaultSize :: proc(display: ^Display) -> i32 ---
cursorLibraryLoadCursor :: proc(display: ^Display, name: cstring) -> Cursor ---
cursorLibraryLoadImage :: proc(name: cstring, theme: cstring, size: i32) -> rawptr ---
cursorImageLoadCursor :: proc(display: ^Display, img: rawptr) -> Cursor ---
cursorImageCreate :: proc(width: i32, height: i32) -> ^CursorImage ---
cursorImageLoadCursor :: proc(display: ^Display, img: ^CursorImage) -> Cursor ---
cursorImageDestroy :: proc(img: rawptr) ---
}

13
vendor/x11/xlib/xlib_types.odin vendored
View File

@@ -2257,3 +2257,16 @@ XIRawEvent :: struct {
raw_values: [^]f64,
}
CursorUInt :: u32
CursorDim :: u32
CursorPixel :: u32
CursorImage :: struct {
version: CursorDim,
size: CursorDim,
width: CursorDim,
height: CursorDim,
xhot: CursorDim,
yhot: CursorDim,
delay: CursorUInt,
pixels: ^CursorPixel, // ARGB
}