apple: move all event stuff into callback system, fix cmake support for apple, add gl/vk examples to cmake

This commit is contained in:
IoI_xD 2026-03-25 17:49:28 -07:00
commit 82999d716a
10 changed files with 456 additions and 318 deletions

View file

@ -1,2 +1,3 @@
Completion:
HeaderInsertion: Never
ClangFormat: Tab

1
.gitignore vendored
View file

@ -16,3 +16,4 @@ examples/*/*.exe
/build
compile_flags.txt
.cache
.DS_Store

View file

@ -15,11 +15,16 @@ option(MW_CLASSIC_THEME "Use classic theme" OFF)
option(MW_BUILD_EXAMPLES "Build examples" OFF)
option(MW_USE_STB_IMAGE "Use stb_image" ON)
option(MW_USE_STB_TRUETYPE "Use stb_truetype" OFF)
option(MW_USE_FREETYPE2 "Use FreeType 2" ON)
option(MW_BUILD_SHARED "Build a shared library" ON)
option(MW_BUILD_STATIC "Build a static library" OFF)
option(MW_INSTALL_HEADERS "Install headers" ON)
if(${CMAKE_SYSTEM_NAME} STREQUAL Darwin)
option(MW_USE_FREETYPE2 "Use FreeType 2" OFF)
else()
option(MW_USE_FREETYPE2 "Use FreeType 2" ON)
endif()
if(${CMAKE_SYSTEM_NAME} STREQUAL Linux)
option(MW_USE_WAYLAND "Enable Wayland backend" ON)
endif()
@ -47,10 +52,13 @@ if(CMAKE_SYSTEM_NAME STREQUAL "NetBSD")
endif()
if(MW_TRY_OPENGL)
check_include_files(GL/gl.h HAVE_GL_GL_H)
if(HAVE_GL_GL_H)
find_package(OpenGL)
if(OpenGL_FOUND)
set(MW_BUILD_OPENGL ON)
list(APPEND SOURCES "${CMAKE_CURRENT_SOURCE_DIR}/src/widget/opengl.c")
list(APPEND SOURCES "${CMAKE_CURRENT_SOURCE_DIR}/src/widget/opengl.c")
if(APPLE)
list(APPEND SOURCES "${CMAKE_CURRENT_SOURCE_DIR}/src/widget/opengl_cocoa.m")
endif()
message(STATUS "OpenGL widget has been enabled")
else()
message(WARNING "OpenGL widget has been disabled")
@ -222,6 +230,14 @@ if(MW_USE_WAYLAND)
endif()
endif()
if(APPLE AND MW_BUILD_OPENGL)
target_compile_definitions(
Mw
PRIVATE
GL_SILENCE_DEPRECATION
)
endif()
target_include_directories(
Mw
PUBLIC

7
configure vendored
View file

@ -38,7 +38,6 @@ require("./pl/utils.pl");
param_set("classic-theme", 0);
param_set("stb-image", 1);
param_set("stb-truetype", 0);
param_set("freetype2", 1);
param_set("xrender", 1);
param_set("opengl", 0);
param_set("vulkan", 0);
@ -46,11 +45,15 @@ param_set("vulkan-string-helper", 1);
param_set("shared", 1);
param_set("static", 1);
param_set("examples", 1);
print($target);
if($target eq "Linux") {
param_set("wayland", 1);
}
if($target ne "Darwin") {
param_set("freetype2", 1);
}
my %features = (
"classic-theme" => "use classic theme",
"stb-image" => "use stb_image, instead use libjpeg/libpng",

View file

@ -1 +1,7 @@
add_subdirectory(basic)
if(${MW_TRY_OPENGL})
add_subdirectory(gldemos)
endif()
if(${MW_TRY_VULKAN})
add_subdirectory(vkdemos)
endif()

View file

@ -6,7 +6,7 @@ file(
foreach(PATH IN LISTS EXAMPLES_BASIC_SOURCES)
get_filename_component(TARGET ${PATH} NAME_WE)
add_executable(${TARGET} ${PATH})
add_executable(${TARGET} WIN32 MACOSX_BUNDLE ${PATH})
target_link_libraries(
${TARGET}
PRIVATE

View file

@ -0,0 +1,27 @@
file(
GLOB
EXAMPLES_GL_SOURCES
*.c
)
find_package(OpenGL)
foreach(PATH IN LISTS EXAMPLES_GL_SOURCES)
get_filename_component(TARGET ${PATH} NAME_WE)
if(${TARGET} STREQUAL "glutlayer")
continue()
endif()
add_executable(${TARGET} WIN32 MACOSX_BUNDLE ${PATH})
target_link_libraries(
${TARGET}
PRIVATE
Mw
OpenGL::GL
)
if(NOT CMAKE_SYSTEM_NAME STREQUAL "Windows")
target_link_libraries(
${TARGET}
PRIVATE
m
)
endif()
endforeach()

View file

@ -0,0 +1,22 @@
file(
GLOB
EXAMPLES_VULKAN_SOURCES
*.c
)
foreach(PATH IN LISTS EXAMPLES_VULKAN_SOURCES)
get_filename_component(TARGET ${PATH} NAME_WE)
add_executable(${TARGET} WIN32 MACOSX_BUNDLE ${PATH})
target_link_libraries(
${TARGET}
PRIVATE
Mw
)
if(NOT CMAKE_SYSTEM_NAME STREQUAL "Windows")
target_link_libraries(
${TARGET}
PRIVATE
m
)
endif()
endforeach()

View file

@ -21,11 +21,17 @@
#import <CoreGraphics/CoreGraphics.h>
#endif
@interface MilskoCocoaApplication : NSApplication {
MwBool doPending;
}
- (MwBool)pending;
@end
// Note: implements NSApplicationDelegate
@interface MilskoCocoaApplicationDelegate : NSObject {
NSApplication* appl;
MilskoCocoaApplication* appl;
}
- (MilskoCocoaApplicationDelegate*)initWithAppl:(NSApplication*)appl;
- (MilskoCocoaApplicationDelegate*)initWithAppl:(MilskoCocoaApplication*)appl;
@end
@interface MilskoCocoaWindow : NSWindow {
@ -80,32 +86,39 @@
@end
@interface MilskoCocoaView : NSView {
NSBitmapImageRep* rep;
NSGraphicsContext* context;
MwBool valid;
CGColorSpaceRef space;
CGDataProviderRef provider;
float width;
float height;
NSBitmapImageRep* rep;
NSGraphicsContext* context;
MwBool valid;
CGColorSpaceRef space;
CGDataProviderRef provider;
NSRect givenRect;
float x;
float y;
float width;
float height;
MwBool _child;
IBOutlet NSViewController* viewController;
}
- (void)initRepAndContextWithWidth:(float)w Height:(float)h;
- (NSGraphicsContext*)context;
- (void)destroy;
- (NSBitmapImageRep*)getRep;
- (void)setChild;
@end
@interface MilskoCocoa : NSObject {
NSApplication* application;
MwBool _forceRender;
MilskoCocoaWindow* window;
NSRect rect;
MilskoCocoaView* view;
MwLL parent;
MilskoFakePointer* handle;
unsigned int strHash;
NSEvent* lastEvent;
MilskoCocoaApplication* application;
MwBool _forceRender;
MwBool _eventsPending;
MilskoCocoaWindow* window;
NSRect rect;
MilskoCocoaView* view;
MwLL parent;
MilskoFakePointer* handle;
unsigned int strHash;
NSEvent* lastEvent;
MilskoCocoaPixmap* cursorPixmap;
NSCursor* cursor;
@ -129,9 +142,6 @@
- (void)setX:(int)x Y:(int)y;
- (void)setW:(int)w H:(int)h;
- (int)pending;
- (void)eventProcess:(NSEvent*)ev;
- (void)handleKeyEvent:(NSEvent*)ev ll:(MwLL)ll;
- (void)handleMouseEvent:(NSEvent*)ev ll:(MwLL)ll;
- (void)getNextEvent;
- (void)setTitle:(const char*)title;
- (void)drawPixmap:(MwLLPixmap)pixmap rect:(MwRect*)rect;
@ -158,6 +168,10 @@
- (MwLL)getParent;
- (NSView*)getView;
- (MilskoCocoaWindow*)getWindow;
- (void)nudge;
- (void)pushCursor;
- (void)popCursor;
- (MilskoFakePointer*)getHandle;
+ (void)eventCanceller:(MilskoCocoa*)this;

View file

@ -1,5 +1,9 @@
#include "Mw/BaseTypes.h"
#include "Mw/LowLevel.h"
#include <Mw/Milsko.h>
#include <objc/objc.h>
#include "../../external/stb_ds.h"
#include "Mw/TypeDefs.h"
#ifdef __clang__
#pragma clang push
@ -22,15 +26,44 @@ static NSPoint pointFlip(NSPoint point) {
}
static NSRect localRectFlip(NSRect originFrame, NSView* view) {
float viewHeight = [view bounds].size.height;
NSRect destinationFrame = NSMakeRect(
originFrame.origin.x,
[view bounds].size.height - (originFrame.origin.y + originFrame.size.height),
originFrame.size.width,
originFrame.size.height);
float viewHeight = [view bounds].size.height;
NSRect destinationFrame =
NSMakeRect(originFrame.origin.x,
[view bounds].size.height -
(originFrame.origin.y + originFrame.size.height),
originFrame.size.width, originFrame.size.height);
return destinationFrame;
}
/* Recursively dispatch a key event to a widget and its children */
static void recursive_dispatch_key(MwLL handle, int* k) {
MwWidget h = (MwWidget)handle->common.user;
MwLLDispatch(handle, key, k);
if(h) {
int i;
for(i = 0; i < arrlen(h->children); i++) {
MwLLDispatch(h->children[i]->lowlevel, key, k);
if(arrlen(h->children[i]->children) > 0) {
recursive_dispatch_key(h->children[i]->lowlevel, k);
}
}
}
};
/* Recursively dispatch a key released event to a widget and its children */
static void recursive_dispatch_key_released(MwLL handle, int* k) {
MwWidget h = (MwWidget)handle->common.user;
MwLLDispatch(handle, key_released, k);
if(h) {
int i;
for(i = 0; i < arrlen(h->children); i++) {
MwLLDispatch(h->children[i]->lowlevel, key_released, k);
if(arrlen(h->children[i]->children) > 0) {
recursive_dispatch_key_released(h->children[i]->lowlevel, k);
}
}
}
};
@implementation MilskoCocoaPixmap
+ (MilskoCocoaPixmap*)newWithWidth:(int)width height:(int)height {
@ -85,6 +118,8 @@ static NSRect localRectFlip(NSRect originFrame, NSView* view) {
[self->image removeRepresentation:self->rep];
[self->image dealloc];
[self->rep dealloc];
self->image = NULL;
self->rep = NULL;
}
- (NSImage*)image {
return self->image;
@ -103,16 +138,18 @@ static NSRect localRectFlip(NSRect originFrame, NSView* view) {
[c retain];
/*
* MacOS doesn't really have a "default" window position, you're actually meant to center the window yourself,
* so if the user passes MwDEFAULT respond appropriately. Also for child windows just have it be 0.
* MacOS doesn't really have a "default" window position, you're actually
* meant to center the window yourself, so if the user passes MwDEFAULT
* respond appropriately. Also for child windows just have it be 0.
*/
if(x == MwDEFAULT) {
x = r ? ([[NSScreen mainScreen] frame].size.width / 2.) - (width / 2.) : 0;
}
if(y == MwDEFAULT) {
y = r ? ([[NSScreen mainScreen] frame].size.height / 2.) - (height / 2.) : 0;
y = r ? ([[NSScreen mainScreen] frame].size.height / 2.) - (height / 2.)
: 0;
}
c->application = [NSApplication sharedApplication];
c->application = [MilskoCocoaApplication sharedApplication];
c->rect = NSMakeRect(x, y, width, height);
if(parent == NULL) {
@ -130,7 +167,6 @@ static NSRect localRectFlip(NSRect originFrame, NSView* view) {
[c->window makeKeyAndOrderFront:c->application];
[c->window makeFirstResponder:c->view];
[c->window setAcceptsMouseMovedEvents:MwTRUE];
c->view = [[MilskoCocoaView alloc] initWithFrame:c->rect];
[c->view retain];
@ -140,29 +176,31 @@ static NSRect localRectFlip(NSRect originFrame, NSView* view) {
[c->application
setActivationPolicy:0 /* NSApplicationActivationPolicyRegular */];
}
[c->application activateIgnoringOtherApps:true];
[c->application activateIgnoringOtherApps:MwTRUE];
[c->application setDelegate:[[MilskoCocoaApplicationDelegate alloc]
initWithAppl:c->application]];
[c->application retain];
[c->view addTrackingRect:c->rect owner:c->view userData:NULL assumeInside:MwFALSE];
} else {
MilskoCocoa* p = parent->cocoa.real;
c->window = p->window;
if(parent) {
MilskoCocoa* topmost = p;
NSRect rect = localRectFlip(c->rect, p->view);
printf("%0.2f %0.2f %0.2f %0.2f\n", c->rect.origin.x, c->rect.origin.y, c->rect.size.width, c->rect.size.height);
c->view = [[MilskoCocoaView alloc] initWithFrame:rect];
[c->view setBounds:c->rect];
} else {
c->view = [[MilskoCocoaView alloc] initWithFrame:c->rect];
}
NSRect rect = localRectFlip(c->rect, p->view);
c->view = [[MilskoCocoaView alloc] initWithFrame:rect];
[c->view setBounds:c->rect];
[c->view retain];
[c->view setNeedsDisplay:TRUE];
[c->view setChild];
[c->view addTrackingRect:c->rect owner:c->view userData:NULL assumeInside:MwFALSE];
[p->view addSubview:c->view];
[p->window setContentView:p->view];
}
[c->window setAcceptsMouseMovedEvents:MwTRUE];
c->handle = [[MilskoFakePointer alloc] initWithFrame:NSMakeRect(0, 0, 1, 1)];
[c->handle retain];
@ -208,11 +246,11 @@ static NSRect localRectFlip(NSRect originFrame, NSView* view) {
NSRectFill(self->view.bounds);
for(i = 0; i < points_count; i++) {
if(i == 0) {
[path moveToPoint:NSMakePoint(points[i].x, _rect.size.height -
points[i].y)];
[path moveToPoint:NSMakePoint(points[i].x,
_rect.size.height - points[i].y)];
} else {
[path lineToPoint:NSMakePoint(points[i].x, _rect.size.height -
points[i].y)];
[path lineToPoint:NSMakePoint(points[i].x,
_rect.size.height - points[i].y)];
}
}
@ -262,6 +300,7 @@ static NSRect localRectFlip(NSRect originFrame, NSView* view) {
frame = localRectFlip(frame, parent->cocoa.real->view);
[self->view setBounds:frame];
}
self->_eventsPending = MwTRUE;
};
- (void)setW:(int)w H:(int)h {
NSRect frame = [self->window frame];
@ -276,23 +315,28 @@ static NSRect localRectFlip(NSRect originFrame, NSView* view) {
} else {
[self->window setFrame:frame display:YES animate:false];
}
self->_eventsPending = MwTRUE;
};
- (int)pending {
NSAutoreleasePool* pool = [[NSAutoreleasePool alloc] init];
NSAutoreleasePool* pool = [[NSAutoreleasePool alloc] init];
MwBool isPending = [self->application pending];
[NSApp runModalSession:self->modalSession];
[pool release];
return 1;
return _forceRender || _eventsPending || isPending;
};
- (void)getNextEvent {
[self eventProcess:self->lastEvent];
MwLL h = [self->handle pointer];
if(_forceRender) {
MwLL h = [self->handle pointer];
MwLLDispatch(h, draw, NULL);
[self->view setNeedsDisplay:true];
_forceRender = MwFALSE;
}
if(_eventsPending) {
MwLLDispatch(h, draw, NULL);
[self->view setNeedsDisplay:true];
_eventsPending = MwFALSE;
}
[self sendClipboardEvent];
if(self->pointerLocked && [self->window isMainWindow] && self->lastEvent) {
@ -306,258 +350,6 @@ static NSRect localRectFlip(NSRect originFrame, NSView* view) {
[self->application updateWindows];
};
- (void)eventProcess:(NSEvent*)ev {
NSAutoreleasePool* pool = [[NSAutoreleasePool alloc] init];
NSWindow* win = [ev window];
MwLL h;
MwBool doSendEvent = MwTRUE;
if(!win) {
[pool release];
return;
}
if([[[win contentView] subviews] count] == 0) {
printf("no subviews on %p\n", win);
[pool release];
return;
} else {
h = [((MilskoFakePointer*)[[[win contentView] subviews]
objectAtIndex:0]) pointer];
}
switch([ev type]) {
case NSLeftMouseDragged:
case NSRightMouseDragged:
case NSOtherMouseDragged:
case NSMouseMoved: {
MwPoint pos;
NSPoint pos_translated = pointFlip([ev locationInWindow]);
pos.x = pos_translated.x;
pos.y = pos_translated.y;
MwLLDispatch(h, move, &pos);
break;
}
case NSLeftMouseDown:
case NSRightMouseDown:
case NSOtherMouseDown:
case NSLeftMouseUp:
case NSRightMouseUp:
case NSOtherMouseUp: {
[self handleMouseEvent:ev ll:h];
break;
}
case NSMouseEntered:
MwLLDispatch(h, focus_in, NULL);
[self->cursor push];
break;
case NSMouseExited:
MwLLDispatch(h, focus_out, NULL);
[self->cursor pop];
break;
case NSKeyDown:
case NSKeyUp: {
[self handleKeyEvent:ev ll:h];
break;
}
case NSCursorUpdate:
[self->cursor set];
break;
case NSScrollWheel:
break;
default:
/* mute bizarre "unknown subtype" errors that flood the console */
break;
};
if(doSendEvent) {
[win sendEvent:ev];
}
[pool release];
}
- (void)handleMouseEvent:(NSEvent*)ev ll:(MwLL)ll {
MwLLMouse mouse;
MwBool isDown = MwTRUE;
NSPoint mousePoint = [ev locationInWindow];
mousePoint.y = [[ev window] frame].size.height - mousePoint.y;
MwLL this = [self->handle pointer];
switch([ev type]) {
case NSLeftMouseUp:
isDown = MwFALSE;
case NSEventTypeLeftMouseDragged:
case NSLeftMouseDown:
mouse.button = MwLLMouseLeft;
break;
case NSRightMouseUp:
isDown = MwFALSE;
case NSRightMouseDown:
case NSEventTypeRightMouseDragged:
mouse.button = MwLLMouseRight;
break;
case NSOtherMouseUp:
isDown = MwFALSE;
case NSOtherMouseDown:
case NSEventTypeOtherMouseDragged:
mouse.button = MwLLMouseMiddle;
break;
default:
break;
}
mouse.point.x = mousePoint.x;
mouse.point.y = mousePoint.y;
printf("%s at %d %d\n", isDown ? "down" : "up", mouse.point.x, mouse.point.y);
if(isDown) {
MwLLDispatch(ll, down, &mouse);
} else {
MwLLDispatch(ll, up, &mouse);
}
}
- (void)handleKeyEvent:(NSEvent*)ev ll:(MwLL)ll {
int ch;
MwLL this = [self->handle pointer];
enum {
kVK_ANSI_A = 0x00,
kVK_ANSI_S = 0x01,
kVK_ANSI_D = 0x02,
kVK_ANSI_F = 0x03,
kVK_ANSI_H = 0x04,
kVK_ANSI_G = 0x05,
kVK_ANSI_Z = 0x06,
kVK_ANSI_X = 0x07,
kVK_ANSI_C = 0x08,
kVK_ANSI_V = 0x09,
kVK_ANSI_B = 0x0B,
kVK_ANSI_Q = 0x0C,
kVK_ANSI_W = 0x0D,
kVK_ANSI_E = 0x0E,
kVK_ANSI_R = 0x0F,
kVK_ANSI_Y = 0x10,
kVK_ANSI_T = 0x11,
kVK_ANSI_1 = 0x12,
kVK_ANSI_2 = 0x13,
kVK_ANSI_3 = 0x14,
kVK_ANSI_4 = 0x15,
kVK_ANSI_6 = 0x16,
kVK_ANSI_5 = 0x17,
kVK_ANSI_Equal = 0x18,
kVK_ANSI_9 = 0x19,
kVK_ANSI_7 = 0x1A,
kVK_ANSI_Minus = 0x1B,
kVK_ANSI_8 = 0x1C,
kVK_ANSI_0 = 0x1D,
kVK_ANSI_RightBracket = 0x1E,
kVK_ANSI_O = 0x1F,
kVK_ANSI_U = 0x20,
kVK_ANSI_LeftBracket = 0x21,
kVK_ANSI_I = 0x22,
kVK_ANSI_P = 0x23,
kVK_ANSI_L = 0x25,
kVK_ANSI_J = 0x26,
kVK_ANSI_Quote = 0x27,
kVK_ANSI_K = 0x28,
kVK_ANSI_Semicolon = 0x29,
kVK_ANSI_Backslash = 0x2A,
kVK_ANSI_Comma = 0x2B,
kVK_ANSI_Slash = 0x2C,
kVK_ANSI_N = 0x2D,
kVK_ANSI_M = 0x2E,
kVK_ANSI_Period = 0x2F,
kVK_ANSI_Grave = 0x32,
kVK_Return = 0x24,
kVK_Space = 0x31,
kVK_Escape = 0x35,
kVK_Shift = 0x38,
kVK_Control = 0x3B,
kVK_RightShift = 0x3C,
kVK_RightControl = 0x3E,
kVK_LeftArrow = 0x7B,
kVK_RightArrow = 0x7C,
kVK_DownArrow = 0x7D,
kVK_UpArrow = 0x7E
};
#define KEY_CASE(x, y) \
case x: \
ch = y; \
break;
switch([ev keyCode]) {
KEY_CASE(kVK_ANSI_A, 'a')
KEY_CASE(kVK_ANSI_B, 'b')
KEY_CASE(kVK_ANSI_C, 'c')
KEY_CASE(kVK_ANSI_D, 'd')
KEY_CASE(kVK_ANSI_E, 'e')
KEY_CASE(kVK_ANSI_F, 'f')
KEY_CASE(kVK_ANSI_G, 'g')
KEY_CASE(kVK_ANSI_H, 'h')
KEY_CASE(kVK_ANSI_I, 'i')
KEY_CASE(kVK_ANSI_J, 'j')
KEY_CASE(kVK_ANSI_K, 'k')
KEY_CASE(kVK_ANSI_L, 'l')
KEY_CASE(kVK_ANSI_M, 'm')
KEY_CASE(kVK_ANSI_N, 'n')
KEY_CASE(kVK_ANSI_O, 'o')
KEY_CASE(kVK_ANSI_P, 'p')
KEY_CASE(kVK_ANSI_Q, 'q')
KEY_CASE(kVK_ANSI_R, 'r')
KEY_CASE(kVK_ANSI_S, 's')
KEY_CASE(kVK_ANSI_T, 't')
KEY_CASE(kVK_ANSI_U, 'u')
KEY_CASE(kVK_ANSI_V, 'v')
KEY_CASE(kVK_ANSI_W, 'w')
KEY_CASE(kVK_ANSI_X, 'x')
KEY_CASE(kVK_ANSI_Y, 'y')
KEY_CASE(kVK_ANSI_Z, 'z')
KEY_CASE(kVK_ANSI_0, '0')
KEY_CASE(kVK_ANSI_1, '1')
KEY_CASE(kVK_ANSI_2, '2')
KEY_CASE(kVK_ANSI_3, '3')
KEY_CASE(kVK_ANSI_4, '4')
KEY_CASE(kVK_ANSI_5, '5')
KEY_CASE(kVK_ANSI_6, '6')
KEY_CASE(kVK_ANSI_7, '7')
KEY_CASE(kVK_ANSI_8, '8')
KEY_CASE(kVK_ANSI_9, '9')
KEY_CASE(kVK_ANSI_Quote, '\"')
KEY_CASE(kVK_ANSI_Grave, '`')
KEY_CASE(kVK_ANSI_Backslash, '/')
KEY_CASE(kVK_ANSI_Comma, ',')
KEY_CASE(kVK_ANSI_Equal, '=')
KEY_CASE(kVK_Escape, MwLLKeyEscape)
KEY_CASE(kVK_ANSI_LeftBracket, '[')
KEY_CASE(kVK_ANSI_Minus, '-')
KEY_CASE(kVK_ANSI_Period, '.')
KEY_CASE(kVK_Return, MwLLKeyEnter)
KEY_CASE(kVK_ANSI_RightBracket, ']')
KEY_CASE(kVK_ANSI_Semicolon, ';')
KEY_CASE(kVK_ANSI_Slash, '\\')
KEY_CASE(kVK_Space, ' ')
KEY_CASE(kVK_Control, MwLLKeyControl)
KEY_CASE(kVK_RightControl, MwLLKeyControl)
KEY_CASE(kVK_Shift, MwLLKeyLeftShift)
KEY_CASE(kVK_RightShift, MwLLKeyRightShift)
KEY_CASE(kVK_DownArrow, MwLLKeyDown)
KEY_CASE(kVK_LeftArrow, MwLLKeyLeft)
KEY_CASE(kVK_RightArrow, MwLLKeyRight)
KEY_CASE(kVK_UpArrow, MwLLKeyUp)
}
switch([ev type]) {
case NSKeyDown:
MwLLDispatch(this, key, &ch);
MwLLDispatch(ll, key, &ch);
break;
case NSKeyUp:
MwLLDispatch(this, key_released, &ch);
MwLLDispatch(ll, key_released, &ch);
break;
default:
break;
}
}
- (void)sendClipboardEvent {
/*NSAutoreleasePool* pool = [[NSAutoreleasePool alloc] init];
NSPasteboard* pasteboard = [NSPasteboard generalPasteboard];
@ -772,14 +564,42 @@ static NSRect localRectFlip(NSRect originFrame, NSView* view) {
return window;
}
- (void)nudge {
self->_eventsPending = MwTRUE;
}
- (void)pushCursor {
[self->cursor push];
}
- (void)popCursor {
[self->cursor pop];
}
- (MilskoFakePointer*)getHandle {
return handle;
}
@end
@implementation MilskoCocoaApplication
- (void)sendEvent:(NSEvent*)event {
self->doPending = MwTRUE;
[super sendEvent:event];
}
- (MwBool)pending {
if(self->doPending) {
self->doPending = MwFALSE;
return MwTRUE;
}
return MwFALSE;
}
@end
@implementation MilskoCocoaView
- (id)initWithFrame:(NSRect)frame {
givenRect = frame;
x = frame.origin.x;
y = frame.origin.y;
width = frame.size.width;
height = frame.size.height;
self = [super initWithFrame:frame];
@ -792,9 +612,15 @@ static NSRect localRectFlip(NSRect originFrame, NSView* view) {
[self initRepAndContextWithWidth:width Height:height];
}
self->_child = MwFALSE;
return self;
}
- (void)setChild {
self->_child = MwTRUE;
}
- (NSGraphicsContext*)context {
return self->context;
}
@ -871,16 +697,238 @@ static NSRect localRectFlip(NSRect originFrame, NSView* view) {
self->height = newSize.height;
}
- (void)displayRect:(NSRect)rect {
(void)rect;
};
- (BOOL)acceptsFirstResponder {
return MwTRUE;
- (BOOL)canBecomeKeyView {
return YES;
}
- (BOOL)performKeyEquivalent:(NSEvent*)event {
(void)event;
return MwTRUE;
- (BOOL)acceptsFirstResponder {
return YES;
}
- (NSView*)hitTest:(NSPoint)aPoint {
if(self->_child) {
return NSPointInRect(aPoint, givenRect) ? self : nil;
} else {
return [super hitTest:aPoint];
}
}
- (void)handleKeyEvent:(NSEvent*)ev ll:(MwLL)ll down:(MwBool)isDown {
int ch;
enum {
kVK_ANSI_A = 0x00,
kVK_ANSI_S = 0x01,
kVK_ANSI_D = 0x02,
kVK_ANSI_F = 0x03,
kVK_ANSI_H = 0x04,
kVK_ANSI_G = 0x05,
kVK_ANSI_Z = 0x06,
kVK_ANSI_X = 0x07,
kVK_ANSI_C = 0x08,
kVK_ANSI_V = 0x09,
kVK_ANSI_B = 0x0B,
kVK_ANSI_Q = 0x0C,
kVK_ANSI_W = 0x0D,
kVK_ANSI_E = 0x0E,
kVK_ANSI_R = 0x0F,
kVK_ANSI_Y = 0x10,
kVK_ANSI_T = 0x11,
kVK_ANSI_1 = 0x12,
kVK_ANSI_2 = 0x13,
kVK_ANSI_3 = 0x14,
kVK_ANSI_4 = 0x15,
kVK_ANSI_6 = 0x16,
kVK_ANSI_5 = 0x17,
kVK_ANSI_Equal = 0x18,
kVK_ANSI_9 = 0x19,
kVK_ANSI_7 = 0x1A,
kVK_ANSI_Minus = 0x1B,
kVK_ANSI_8 = 0x1C,
kVK_ANSI_0 = 0x1D,
kVK_ANSI_RightBracket = 0x1E,
kVK_ANSI_O = 0x1F,
kVK_ANSI_U = 0x20,
kVK_ANSI_LeftBracket = 0x21,
kVK_ANSI_I = 0x22,
kVK_ANSI_P = 0x23,
kVK_ANSI_L = 0x25,
kVK_ANSI_J = 0x26,
kVK_ANSI_Quote = 0x27,
kVK_ANSI_K = 0x28,
kVK_ANSI_Semicolon = 0x29,
kVK_ANSI_Backslash = 0x2A,
kVK_ANSI_Comma = 0x2B,
kVK_ANSI_Slash = 0x2C,
kVK_ANSI_N = 0x2D,
kVK_ANSI_M = 0x2E,
kVK_ANSI_Period = 0x2F,
kVK_ANSI_Grave = 0x32,
kVK_Return = 0x24,
kVK_Space = 0x31,
kVK_Escape = 0x35,
kVK_Shift = 0x38,
kVK_Control = 0x3B,
kVK_RightShift = 0x3C,
kVK_RightControl = 0x3E,
kVK_LeftArrow = 0x7B,
kVK_RightArrow = 0x7C,
kVK_DownArrow = 0x7D,
kVK_UpArrow = 0x7E
};
#define KEY_CASE(x, y) \
case x: \
ch = y; \
break;
switch([ev keyCode]) {
KEY_CASE(kVK_ANSI_A, 'a')
KEY_CASE(kVK_ANSI_B, 'b')
KEY_CASE(kVK_ANSI_C, 'c')
KEY_CASE(kVK_ANSI_D, 'd')
KEY_CASE(kVK_ANSI_E, 'e')
KEY_CASE(kVK_ANSI_F, 'f')
KEY_CASE(kVK_ANSI_G, 'g')
KEY_CASE(kVK_ANSI_H, 'h')
KEY_CASE(kVK_ANSI_I, 'i')
KEY_CASE(kVK_ANSI_J, 'j')
KEY_CASE(kVK_ANSI_K, 'k')
KEY_CASE(kVK_ANSI_L, 'l')
KEY_CASE(kVK_ANSI_M, 'm')
KEY_CASE(kVK_ANSI_N, 'n')
KEY_CASE(kVK_ANSI_O, 'o')
KEY_CASE(kVK_ANSI_P, 'p')
KEY_CASE(kVK_ANSI_Q, 'q')
KEY_CASE(kVK_ANSI_R, 'r')
KEY_CASE(kVK_ANSI_S, 's')
KEY_CASE(kVK_ANSI_T, 't')
KEY_CASE(kVK_ANSI_U, 'u')
KEY_CASE(kVK_ANSI_V, 'v')
KEY_CASE(kVK_ANSI_W, 'w')
KEY_CASE(kVK_ANSI_X, 'x')
KEY_CASE(kVK_ANSI_Y, 'y')
KEY_CASE(kVK_ANSI_Z, 'z')
KEY_CASE(kVK_ANSI_0, '0')
KEY_CASE(kVK_ANSI_1, '1')
KEY_CASE(kVK_ANSI_2, '2')
KEY_CASE(kVK_ANSI_3, '3')
KEY_CASE(kVK_ANSI_4, '4')
KEY_CASE(kVK_ANSI_5, '5')
KEY_CASE(kVK_ANSI_6, '6')
KEY_CASE(kVK_ANSI_7, '7')
KEY_CASE(kVK_ANSI_8, '8')
KEY_CASE(kVK_ANSI_9, '9')
KEY_CASE(kVK_ANSI_Quote, '\"')
KEY_CASE(kVK_ANSI_Grave, '`')
KEY_CASE(kVK_ANSI_Backslash, '/')
KEY_CASE(kVK_ANSI_Comma, ',')
KEY_CASE(kVK_ANSI_Equal, '=')
KEY_CASE(kVK_Escape, MwLLKeyEscape)
KEY_CASE(kVK_ANSI_LeftBracket, '[')
KEY_CASE(kVK_ANSI_Minus, '-')
KEY_CASE(kVK_ANSI_Period, '.')
KEY_CASE(kVK_Return, MwLLKeyEnter)
KEY_CASE(kVK_ANSI_RightBracket, ']')
KEY_CASE(kVK_ANSI_Semicolon, ';')
KEY_CASE(kVK_ANSI_Slash, '\\')
KEY_CASE(kVK_Space, ' ')
KEY_CASE(kVK_Control, MwLLKeyControl)
KEY_CASE(kVK_RightControl, MwLLKeyControl)
KEY_CASE(kVK_Shift, MwLLKeyLeftShift)
KEY_CASE(kVK_RightShift, MwLLKeyRightShift)
KEY_CASE(kVK_DownArrow, MwLLKeyDown)
KEY_CASE(kVK_LeftArrow, MwLLKeyLeft)
KEY_CASE(kVK_RightArrow, MwLLKeyRight)
KEY_CASE(kVK_UpArrow, MwLLKeyUp)
}
if(isDown) {
recursive_dispatch_key(ll, &ch);
} else {
recursive_dispatch_key_released(ll, &ch);
}
[ll->cocoa.real nudge];
}
- (void)mouseEntered:(NSEvent*)ev {
MwLL h = [((MilskoFakePointer*)[[self subviews] objectAtIndex:0]) pointer];
MwLLDispatch(h, focus_in, NULL);
[h->cocoa.real pushCursor];
[super mouseEntered:ev];
}
- (void)mouseExited:(NSEvent*)ev {
MwLL h = [((MilskoFakePointer*)[[self subviews] objectAtIndex:0]) pointer];
MwLLDispatch(h, focus_out, NULL);
[h->cocoa.real popCursor];
[super mouseExited:ev];
}
- (void)keyDown:(NSEvent*)ev {
MwLL h = [((MilskoFakePointer*)[[self subviews] objectAtIndex:0]) pointer];
[self handleKeyEvent:ev ll:h down:MwTRUE];
[super keyDown:ev];
}
- (void)keyUp:(NSEvent*)ev {
MwLL h = [((MilskoFakePointer*)[[self subviews] objectAtIndex:0]) pointer];
[self handleKeyEvent:ev ll:h down:MwFALSE];
[super keyUp:ev];
}
- (void)mouseMoved:(NSEvent*)ev {
MwLLMouse mouse;
NSPoint mousePoint = [ev locationInWindow];
MwLL this = [((MilskoFakePointer*)[[self subviews] objectAtIndex:0]) pointer];
mousePoint.y = [[ev window] frame].size.height - mousePoint.y;
mouse.button = MwLLMouseLeft;
mouse.point.x = mousePoint.x;
mouse.point.y = mousePoint.y;
MwLLDispatch(this, move, &mouse);
[this->cocoa.real nudge];
[super mouseMoved:ev];
}
- (void)mouseDown:(NSEvent*)ev {
MwLLMouse mouse;
NSPoint mousePoint = [ev locationInWindow];
MwLL this = [((MilskoFakePointer*)[[self subviews] objectAtIndex:0]) pointer];
mousePoint.y = [[ev window] frame].size.height - mousePoint.y;
mouse.button = MwLLMouseLeft;
mouse.point.x = mousePoint.x;
mouse.point.y = mousePoint.y;
MwLLDispatch(this, down, &mouse);
[this->cocoa.real nudge];
[super mouseDown:ev];
}
- (void)mouseUp:(NSEvent*)ev {
MwLLMouse mouse;
NSPoint mousePoint = [ev locationInWindow];
MwLL this = [((MilskoFakePointer*)[[self subviews] objectAtIndex:0]) pointer];
mousePoint.y = [[ev window] frame].size.height - mousePoint.y;
mouse.button = MwLLMouseLeft;
mouse.point.x = mousePoint.x;
mouse.point.y = mousePoint.y;
MwLLDispatch(this, up, &mouse);
[this->cocoa.real nudge];
[super mouseUp:ev];
}
- (void)rightMouseDown:(NSEvent*)ev {
MwLLMouse mouse;
NSPoint mousePoint = [ev locationInWindow];
MwLL this = [((MilskoFakePointer*)[[self subviews] objectAtIndex:0]) pointer];
mousePoint.y = [[ev window] frame].size.height - mousePoint.y;
mouse.button = MwLLMouseRight;
mouse.point.x = mousePoint.x;
mouse.point.y = mousePoint.y;
MwLLDispatch(this, down, &mouse);
[this->cocoa.real nudge];
[super rightMouseDown:ev];
}
- (void)rightMouseUp:(NSEvent*)ev {
MwLLMouse mouse;
NSPoint mousePoint = [ev locationInWindow];
MwLL this = [((MilskoFakePointer*)[[self subviews] objectAtIndex:0]) pointer];
mousePoint.y = [[ev window] frame].size.height - mousePoint.y;
mouse.button = MwLLMouseRight;
mouse.point.x = mousePoint.x;
mouse.point.y = mousePoint.y;
MwLLDispatch(this, up, &mouse);
[this->cocoa.real nudge];
[super rightMouseUp:ev];
}
@end