sdl-ios-xcode: src/video/quartz/SDL

annotate src/video/quartz/SDL_QuartzWM.m @ 3984:b74530a1dad6 SDL-1.2

Better fix for bug 419

author	Sam Lantinga <slouken@libsdl.org>
date	Thu, 28 Jun 2007 05:35:50 +0000
parents	2780f547f5e7
children	c121d94672cb 0c76e6d1c3d6

rev	line source
47 45b1c4303f87 Added initial support for Quartz video (thanks Darrell!) Sam Lantinga <slouken@lokigames.com> parents: diff changeset	1 /*
45b1c4303f87 Added initial support for Quartz video (thanks Darrell!) Sam Lantinga <slouken@lokigames.com> parents: diff changeset	2 SDL - Simple DirectMedia Layer
761 c5b2b6d2d1fe Date: Wed, 31 Dec 2003 21:55:30 +0100 Sam Lantinga <slouken@libsdl.org> parents: 683 diff changeset	3 Copyright (C) 1997-2003 Sam Lantinga
47 45b1c4303f87 Added initial support for Quartz video (thanks Darrell!) Sam Lantinga <slouken@lokigames.com> parents: diff changeset	4
45b1c4303f87 Added initial support for Quartz video (thanks Darrell!) Sam Lantinga <slouken@lokigames.com> parents: diff changeset	5 This library is free software; you can redistribute it and/or
45b1c4303f87 Added initial support for Quartz video (thanks Darrell!) Sam Lantinga <slouken@lokigames.com> parents: diff changeset	6 modify it under the terms of the GNU Library General Public
45b1c4303f87 Added initial support for Quartz video (thanks Darrell!) Sam Lantinga <slouken@lokigames.com> parents: diff changeset	7 License as published by the Free Software Foundation; either
45b1c4303f87 Added initial support for Quartz video (thanks Darrell!) Sam Lantinga <slouken@lokigames.com> parents: diff changeset	8 version 2 of the License, or (at your option) any later version.
45b1c4303f87 Added initial support for Quartz video (thanks Darrell!) Sam Lantinga <slouken@lokigames.com> parents: diff changeset	9
45b1c4303f87 Added initial support for Quartz video (thanks Darrell!) Sam Lantinga <slouken@lokigames.com> parents: diff changeset	10 This library is distributed in the hope that it will be useful,
45b1c4303f87 Added initial support for Quartz video (thanks Darrell!) Sam Lantinga <slouken@lokigames.com> parents: diff changeset	11 but WITHOUT ANY WARRANTY; without even the implied warranty of
45b1c4303f87 Added initial support for Quartz video (thanks Darrell!) Sam Lantinga <slouken@lokigames.com> parents: diff changeset	12 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
45b1c4303f87 Added initial support for Quartz video (thanks Darrell!) Sam Lantinga <slouken@lokigames.com> parents: diff changeset	13 Library General Public License for more details.
45b1c4303f87 Added initial support for Quartz video (thanks Darrell!) Sam Lantinga <slouken@lokigames.com> parents: diff changeset	14
45b1c4303f87 Added initial support for Quartz video (thanks Darrell!) Sam Lantinga <slouken@lokigames.com> parents: diff changeset	15 You should have received a copy of the GNU Library General Public
45b1c4303f87 Added initial support for Quartz video (thanks Darrell!) Sam Lantinga <slouken@lokigames.com> parents: diff changeset	16 License along with this library; if not, write to the Free
45b1c4303f87 Added initial support for Quartz video (thanks Darrell!) Sam Lantinga <slouken@lokigames.com> parents: diff changeset	17 Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
45b1c4303f87 Added initial support for Quartz video (thanks Darrell!) Sam Lantinga <slouken@lokigames.com> parents: diff changeset	18
45b1c4303f87 Added initial support for Quartz video (thanks Darrell!) Sam Lantinga <slouken@lokigames.com> parents: diff changeset	19 Sam Lantinga
252 e8157fcb3114 Updated the source with the correct e-mail address Sam Lantinga <slouken@libsdl.org> parents: 168 diff changeset	20 slouken@libsdl.org
47 45b1c4303f87 Added initial support for Quartz video (thanks Darrell!) Sam Lantinga <slouken@lokigames.com> parents: diff changeset	21 */
1403 376665398b25 Catch the C++ and Objective C sources too... Sam Lantinga <slouken@libsdl.org> parents: 1207 diff changeset	22 #include "SDL_config.h"
47 45b1c4303f87 Added initial support for Quartz video (thanks Darrell!) Sam Lantinga <slouken@lokigames.com> parents: diff changeset	23
761 c5b2b6d2d1fe Date: Wed, 31 Dec 2003 21:55:30 +0100 Sam Lantinga <slouken@libsdl.org> parents: 683 diff changeset	24 #include "SDL_QuartzVideo.h"
c5b2b6d2d1fe Date: Wed, 31 Dec 2003 21:55:30 +0100 Sam Lantinga <slouken@libsdl.org> parents: 683 diff changeset	25
563 04dcaf3da918 Massive Quartz input enhancements from Darrell Walisser. His email: Ryan C. Gordon <icculus@icculus.org> parents: 501 diff changeset	26
47 45b1c4303f87 Added initial support for Quartz video (thanks Darrell!) Sam Lantinga <slouken@lokigames.com> parents: diff changeset	27 struct WMcursor {
1883 2780f547f5e7 Fix for bug #240 Sam Lantinga <slouken@libsdl.org> parents: 1812 diff changeset	28 NSCursor *nscursor;
47 45b1c4303f87 Added initial support for Quartz video (thanks Darrell!) Sam Lantinga <slouken@lokigames.com> parents: diff changeset	29 };
45b1c4303f87 Added initial support for Quartz video (thanks Darrell!) Sam Lantinga <slouken@lokigames.com> parents: diff changeset	30
761 c5b2b6d2d1fe Date: Wed, 31 Dec 2003 21:55:30 +0100 Sam Lantinga <slouken@libsdl.org> parents: 683 diff changeset	31 void QZ_FreeWMCursor (_THIS, WMcursor *cursor) {
47 45b1c4303f87 Added initial support for Quartz video (thanks Darrell!) Sam Lantinga <slouken@lokigames.com> parents: diff changeset	32
1883 2780f547f5e7 Fix for bug #240 Sam Lantinga <slouken@libsdl.org> parents: 1812 diff changeset	33 if ( cursor != NULL ) {
2780f547f5e7 Fix for bug #240 Sam Lantinga <slouken@libsdl.org> parents: 1812 diff changeset	34 [ cursor->nscursor release ];
47 45b1c4303f87 Added initial support for Quartz video (thanks Darrell!) Sam Lantinga <slouken@lokigames.com> parents: diff changeset	35 free (cursor);
1883 2780f547f5e7 Fix for bug #240 Sam Lantinga <slouken@libsdl.org> parents: 1812 diff changeset	36 }
47 45b1c4303f87 Added initial support for Quartz video (thanks Darrell!) Sam Lantinga <slouken@lokigames.com> parents: diff changeset	37 }
45b1c4303f87 Added initial support for Quartz video (thanks Darrell!) Sam Lantinga <slouken@lokigames.com> parents: diff changeset	38
761 c5b2b6d2d1fe Date: Wed, 31 Dec 2003 21:55:30 +0100 Sam Lantinga <slouken@libsdl.org> parents: 683 diff changeset	39 WMcursor* QZ_CreateWMCursor (_THIS, Uint8 data, Uint8 mask,
390 19e73568a75c Date: Sat, 1 Jun 2002 17:56:45 -0500 Sam Lantinga <slouken@libsdl.org> parents: 324 diff changeset	40 int w, int h, int hot_x, int hot_y) {
19e73568a75c Date: Sat, 1 Jun 2002 17:56:45 -0500 Sam Lantinga <slouken@libsdl.org> parents: 324 diff changeset	41 WMcursor *cursor;
1883 2780f547f5e7 Fix for bug #240 Sam Lantinga <slouken@libsdl.org> parents: 1812 diff changeset	42 NSBitmapImageRep *imgrep;
2780f547f5e7 Fix for bug #240 Sam Lantinga <slouken@libsdl.org> parents: 1812 diff changeset	43 NSImage *img;
2780f547f5e7 Fix for bug #240 Sam Lantinga <slouken@libsdl.org> parents: 1812 diff changeset	44 unsigned char *planes[5];
2780f547f5e7 Fix for bug #240 Sam Lantinga <slouken@libsdl.org> parents: 1812 diff changeset	45 int i;
2780f547f5e7 Fix for bug #240 Sam Lantinga <slouken@libsdl.org> parents: 1812 diff changeset	46 NSAutoreleasePool *pool;
2780f547f5e7 Fix for bug #240 Sam Lantinga <slouken@libsdl.org> parents: 1812 diff changeset	47
2780f547f5e7 Fix for bug #240 Sam Lantinga <slouken@libsdl.org> parents: 1812 diff changeset	48 pool = [ [ NSAutoreleasePool alloc ] init ];
2780f547f5e7 Fix for bug #240 Sam Lantinga <slouken@libsdl.org> parents: 1812 diff changeset	49
390 19e73568a75c Date: Sat, 1 Jun 2002 17:56:45 -0500 Sam Lantinga <slouken@libsdl.org> parents: 324 diff changeset	50 /* Allocate the cursor memory */
1756 eed7a3f396ce Using the SDL C runtime functions Sam Lantinga <slouken@libsdl.org> parents: 1629 diff changeset	51 cursor = (WMcursor *)SDL_malloc(sizeof(WMcursor));
1883 2780f547f5e7 Fix for bug #240 Sam Lantinga <slouken@libsdl.org> parents: 1812 diff changeset	52 if (cursor == NULL) goto outOfMemory;
168 e92aa316c517 Added Max's patches for building MacOS X apps on command line Sam Lantinga <slouken@libsdl.org> parents: 158 diff changeset	53
1883 2780f547f5e7 Fix for bug #240 Sam Lantinga <slouken@libsdl.org> parents: 1812 diff changeset	54 /* create the image representation and get the pointers to its storage */
2780f547f5e7 Fix for bug #240 Sam Lantinga <slouken@libsdl.org> parents: 1812 diff changeset	55 imgrep = [ [ [ NSBitmapImageRep alloc ] initWithBitmapDataPlanes: NULL pixelsWide: w pixelsHigh: h bitsPerSample: 1 samplesPerPixel: 2 hasAlpha: YES isPlanar: YES colorSpaceName: NSDeviceBlackColorSpace bytesPerRow: (w+7)/8 bitsPerPixel: 0 ] autorelease ];
2780f547f5e7 Fix for bug #240 Sam Lantinga <slouken@libsdl.org> parents: 1812 diff changeset	56 if (imgrep == nil) goto outOfMemory;
2780f547f5e7 Fix for bug #240 Sam Lantinga <slouken@libsdl.org> parents: 1812 diff changeset	57 [ imgrep getBitmapDataPlanes: planes ];
168 e92aa316c517 Added Max's patches for building MacOS X apps on command line Sam Lantinga <slouken@libsdl.org> parents: 158 diff changeset	58
1883 2780f547f5e7 Fix for bug #240 Sam Lantinga <slouken@libsdl.org> parents: 1812 diff changeset	59 /* copy data and mask, extending the mask to all black pixels because the inversion effect doesn't work with Cocoa's alpha-blended cursors */
2780f547f5e7 Fix for bug #240 Sam Lantinga <slouken@libsdl.org> parents: 1812 diff changeset	60 for (i = 0; i < (w+7)/8*h; i++) {
2780f547f5e7 Fix for bug #240 Sam Lantinga <slouken@libsdl.org> parents: 1812 diff changeset	61 planes[0][i] = data[i];
2780f547f5e7 Fix for bug #240 Sam Lantinga <slouken@libsdl.org> parents: 1812 diff changeset	62 planes[1][i] = mask[i] \| data[i];
2780f547f5e7 Fix for bug #240 Sam Lantinga <slouken@libsdl.org> parents: 1812 diff changeset	63 }
168 e92aa316c517 Added Max's patches for building MacOS X apps on command line Sam Lantinga <slouken@libsdl.org> parents: 158 diff changeset	64
1883 2780f547f5e7 Fix for bug #240 Sam Lantinga <slouken@libsdl.org> parents: 1812 diff changeset	65 /* create image and cursor */
2780f547f5e7 Fix for bug #240 Sam Lantinga <slouken@libsdl.org> parents: 1812 diff changeset	66 img = [ [ [ NSImage alloc ] initWithSize: NSMakeSize(w, h) ] autorelease ];
2780f547f5e7 Fix for bug #240 Sam Lantinga <slouken@libsdl.org> parents: 1812 diff changeset	67 if (img == nil) goto outOfMemory;
2780f547f5e7 Fix for bug #240 Sam Lantinga <slouken@libsdl.org> parents: 1812 diff changeset	68 [ img addRepresentation: imgrep ];
2780f547f5e7 Fix for bug #240 Sam Lantinga <slouken@libsdl.org> parents: 1812 diff changeset	69 if (system_version < 0x1030) { /* on 10.2, cursors must be 1616 /
2780f547f5e7 Fix for bug #240 Sam Lantinga <slouken@libsdl.org> parents: 1812 diff changeset	70 if (w > 16 \|\| h > 16) { /* too big: scale it down */
2780f547f5e7 Fix for bug #240 Sam Lantinga <slouken@libsdl.org> parents: 1812 diff changeset	71 [ img setScalesWhenResized: YES ];
2780f547f5e7 Fix for bug #240 Sam Lantinga <slouken@libsdl.org> parents: 1812 diff changeset	72 hot_x = hot_x*16/w;
2780f547f5e7 Fix for bug #240 Sam Lantinga <slouken@libsdl.org> parents: 1812 diff changeset	73 hot_y = hot_y*16/h;
2780f547f5e7 Fix for bug #240 Sam Lantinga <slouken@libsdl.org> parents: 1812 diff changeset	74 }
2780f547f5e7 Fix for bug #240 Sam Lantinga <slouken@libsdl.org> parents: 1812 diff changeset	75 else { /* too small (or just right): extend it (from the bottom left corner, so hot_y must be adjusted) */
2780f547f5e7 Fix for bug #240 Sam Lantinga <slouken@libsdl.org> parents: 1812 diff changeset	76 hot_y += 16 - h;
2780f547f5e7 Fix for bug #240 Sam Lantinga <slouken@libsdl.org> parents: 1812 diff changeset	77 }
2780f547f5e7 Fix for bug #240 Sam Lantinga <slouken@libsdl.org> parents: 1812 diff changeset	78 [ img setSize: NSMakeSize(16, 16) ];
390 19e73568a75c Date: Sat, 1 Jun 2002 17:56:45 -0500 Sam Lantinga <slouken@libsdl.org> parents: 324 diff changeset	79 }
1883 2780f547f5e7 Fix for bug #240 Sam Lantinga <slouken@libsdl.org> parents: 1812 diff changeset	80 cursor->nscursor = [ [ NSCursor alloc ] initWithImage: img hotSpot: NSMakePoint(hot_x, hot_y) ];
2780f547f5e7 Fix for bug #240 Sam Lantinga <slouken@libsdl.org> parents: 1812 diff changeset	81 if (cursor->nscursor == nil) goto outOfMemory;
390 19e73568a75c Date: Sat, 1 Jun 2002 17:56:45 -0500 Sam Lantinga <slouken@libsdl.org> parents: 324 diff changeset	82
1883 2780f547f5e7 Fix for bug #240 Sam Lantinga <slouken@libsdl.org> parents: 1812 diff changeset	83 [ pool release ];
168 e92aa316c517 Added Max's patches for building MacOS X apps on command line Sam Lantinga <slouken@libsdl.org> parents: 158 diff changeset	84 return(cursor);
1883 2780f547f5e7 Fix for bug #240 Sam Lantinga <slouken@libsdl.org> parents: 1812 diff changeset	85
2780f547f5e7 Fix for bug #240 Sam Lantinga <slouken@libsdl.org> parents: 1812 diff changeset	86 outOfMemory:
2780f547f5e7 Fix for bug #240 Sam Lantinga <slouken@libsdl.org> parents: 1812 diff changeset	87 [ pool release ];
2780f547f5e7 Fix for bug #240 Sam Lantinga <slouken@libsdl.org> parents: 1812 diff changeset	88 if (cursor != NULL) SDL_free(cursor);
2780f547f5e7 Fix for bug #240 Sam Lantinga <slouken@libsdl.org> parents: 1812 diff changeset	89 SDL_OutOfMemory();
2780f547f5e7 Fix for bug #240 Sam Lantinga <slouken@libsdl.org> parents: 1812 diff changeset	90 return(NULL);
47 45b1c4303f87 Added initial support for Quartz video (thanks Darrell!) Sam Lantinga <slouken@lokigames.com> parents: diff changeset	91 }
45b1c4303f87 Added initial support for Quartz video (thanks Darrell!) Sam Lantinga <slouken@lokigames.com> parents: diff changeset	92
761 c5b2b6d2d1fe Date: Wed, 31 Dec 2003 21:55:30 +0100 Sam Lantinga <slouken@libsdl.org> parents: 683 diff changeset	93 void QZ_ShowMouse (_THIS) {
c5b2b6d2d1fe Date: Wed, 31 Dec 2003 21:55:30 +0100 Sam Lantinga <slouken@libsdl.org> parents: 683 diff changeset	94 if (!cursor_visible) {
c5b2b6d2d1fe Date: Wed, 31 Dec 2003 21:55:30 +0100 Sam Lantinga <slouken@libsdl.org> parents: 683 diff changeset	95 [ NSCursor unhide ];
c5b2b6d2d1fe Date: Wed, 31 Dec 2003 21:55:30 +0100 Sam Lantinga <slouken@libsdl.org> parents: 683 diff changeset	96 cursor_visible = YES;
c5b2b6d2d1fe Date: Wed, 31 Dec 2003 21:55:30 +0100 Sam Lantinga <slouken@libsdl.org> parents: 683 diff changeset	97 }
c5b2b6d2d1fe Date: Wed, 31 Dec 2003 21:55:30 +0100 Sam Lantinga <slouken@libsdl.org> parents: 683 diff changeset	98 }
c5b2b6d2d1fe Date: Wed, 31 Dec 2003 21:55:30 +0100 Sam Lantinga <slouken@libsdl.org> parents: 683 diff changeset	99
c5b2b6d2d1fe Date: Wed, 31 Dec 2003 21:55:30 +0100 Sam Lantinga <slouken@libsdl.org> parents: 683 diff changeset	100 void QZ_HideMouse (_THIS) {
1629 ef4a796e7f24 Fixed bug #55 Sam Lantinga <slouken@libsdl.org> parents: 1403 diff changeset	101 if ((SDL_GetAppState() & SDL_APPMOUSEFOCUS) && cursor_visible) {
761 c5b2b6d2d1fe Date: Wed, 31 Dec 2003 21:55:30 +0100 Sam Lantinga <slouken@libsdl.org> parents: 683 diff changeset	102 [ NSCursor hide ];
c5b2b6d2d1fe Date: Wed, 31 Dec 2003 21:55:30 +0100 Sam Lantinga <slouken@libsdl.org> parents: 683 diff changeset	103 cursor_visible = NO;
c5b2b6d2d1fe Date: Wed, 31 Dec 2003 21:55:30 +0100 Sam Lantinga <slouken@libsdl.org> parents: 683 diff changeset	104 }
c5b2b6d2d1fe Date: Wed, 31 Dec 2003 21:55:30 +0100 Sam Lantinga <slouken@libsdl.org> parents: 683 diff changeset	105 }
c5b2b6d2d1fe Date: Wed, 31 Dec 2003 21:55:30 +0100 Sam Lantinga <slouken@libsdl.org> parents: 683 diff changeset	106
779 68c8da837fc0 Date: Tue, 6 Jan 2004 21:54:02 +0100 Sam Lantinga <slouken@libsdl.org> parents: 761 diff changeset	107 BOOL QZ_IsMouseInWindow (_THIS) {
1629 ef4a796e7f24 Fixed bug #55 Sam Lantinga <slouken@libsdl.org> parents: 1403 diff changeset	108 if (qz_window == nil) return YES; /fullscreen/
1192 54aa9aa32327 To: sdl@libsdl.org Ryan C. Gordon <icculus@icculus.org> parents: 983 diff changeset	109 else {
54aa9aa32327 To: sdl@libsdl.org Ryan C. Gordon <icculus@icculus.org> parents: 983 diff changeset	110 NSPoint p = [ qz_window mouseLocationOutsideOfEventStream ];
54aa9aa32327 To: sdl@libsdl.org Ryan C. Gordon <icculus@icculus.org> parents: 983 diff changeset	111 p.y -= 1.0f; /* Apparently y goes from 1 to h, not from 0 to h-1 (i.e. the "location of the mouse" seems to be defined as "the location of the top left corner of the mouse pointer's hot pixel" */
54aa9aa32327 To: sdl@libsdl.org Ryan C. Gordon <icculus@icculus.org> parents: 983 diff changeset	112 return NSPointInRect(p, [ window_view frame ]);
54aa9aa32327 To: sdl@libsdl.org Ryan C. Gordon <icculus@icculus.org> parents: 983 diff changeset	113 }
779 68c8da837fc0 Date: Tue, 6 Jan 2004 21:54:02 +0100 Sam Lantinga <slouken@libsdl.org> parents: 761 diff changeset	114 }
68c8da837fc0 Date: Tue, 6 Jan 2004 21:54:02 +0100 Sam Lantinga <slouken@libsdl.org> parents: 761 diff changeset	115
761 c5b2b6d2d1fe Date: Wed, 31 Dec 2003 21:55:30 +0100 Sam Lantinga <slouken@libsdl.org> parents: 683 diff changeset	116 int QZ_ShowWMCursor (_THIS, WMcursor *cursor) {
47 45b1c4303f87 Added initial support for Quartz video (thanks Darrell!) Sam Lantinga <slouken@lokigames.com> parents: diff changeset	117
45b1c4303f87 Added initial support for Quartz video (thanks Darrell!) Sam Lantinga <slouken@lokigames.com> parents: diff changeset	118 if ( cursor == NULL) {
761 c5b2b6d2d1fe Date: Wed, 31 Dec 2003 21:55:30 +0100 Sam Lantinga <slouken@libsdl.org> parents: 683 diff changeset	119 if ( cursor_should_be_visible ) {
c5b2b6d2d1fe Date: Wed, 31 Dec 2003 21:55:30 +0100 Sam Lantinga <slouken@libsdl.org> parents: 683 diff changeset	120 QZ_HideMouse (this);
c5b2b6d2d1fe Date: Wed, 31 Dec 2003 21:55:30 +0100 Sam Lantinga <slouken@libsdl.org> parents: 683 diff changeset	121 cursor_should_be_visible = NO;
563 04dcaf3da918 Massive Quartz input enhancements from Darrell Walisser. His email: Ryan C. Gordon <icculus@icculus.org> parents: 501 diff changeset	122 QZ_ChangeGrabState (this, QZ_HIDECURSOR);
47 45b1c4303f87 Added initial support for Quartz video (thanks Darrell!) Sam Lantinga <slouken@lokigames.com> parents: diff changeset	123 }
45b1c4303f87 Added initial support for Quartz video (thanks Darrell!) Sam Lantinga <slouken@lokigames.com> parents: diff changeset	124 }
45b1c4303f87 Added initial support for Quartz video (thanks Darrell!) Sam Lantinga <slouken@lokigames.com> parents: diff changeset	125 else {
1883 2780f547f5e7 Fix for bug #240 Sam Lantinga <slouken@libsdl.org> parents: 1812 diff changeset	126 [ cursor->nscursor set ];
761 c5b2b6d2d1fe Date: Wed, 31 Dec 2003 21:55:30 +0100 Sam Lantinga <slouken@libsdl.org> parents: 683 diff changeset	127 if ( ! cursor_should_be_visible ) {
c5b2b6d2d1fe Date: Wed, 31 Dec 2003 21:55:30 +0100 Sam Lantinga <slouken@libsdl.org> parents: 683 diff changeset	128 QZ_ShowMouse (this);
c5b2b6d2d1fe Date: Wed, 31 Dec 2003 21:55:30 +0100 Sam Lantinga <slouken@libsdl.org> parents: 683 diff changeset	129 cursor_should_be_visible = YES;
563 04dcaf3da918 Massive Quartz input enhancements from Darrell Walisser. His email: Ryan C. Gordon <icculus@icculus.org> parents: 501 diff changeset	130 QZ_ChangeGrabState (this, QZ_SHOWCURSOR);
47 45b1c4303f87 Added initial support for Quartz video (thanks Darrell!) Sam Lantinga <slouken@lokigames.com> parents: diff changeset	131 }
45b1c4303f87 Added initial support for Quartz video (thanks Darrell!) Sam Lantinga <slouken@lokigames.com> parents: diff changeset	132 }
45b1c4303f87 Added initial support for Quartz video (thanks Darrell!) Sam Lantinga <slouken@lokigames.com> parents: diff changeset	133
45b1c4303f87 Added initial support for Quartz video (thanks Darrell!) Sam Lantinga <slouken@lokigames.com> parents: diff changeset	134 return 1;
45b1c4303f87 Added initial support for Quartz video (thanks Darrell!) Sam Lantinga <slouken@lokigames.com> parents: diff changeset	135 }
45b1c4303f87 Added initial support for Quartz video (thanks Darrell!) Sam Lantinga <slouken@lokigames.com> parents: diff changeset	136
501 74262d2647ca Lots of cleanups by Darrell, added the ability to resize Cocoa windows. Sam Lantinga <slouken@libsdl.org> parents: 390 diff changeset	137 /*
74262d2647ca Lots of cleanups by Darrell, added the ability to resize Cocoa windows. Sam Lantinga <slouken@libsdl.org> parents: 390 diff changeset	138 Coordinate conversion functions, for convenience
74262d2647ca Lots of cleanups by Darrell, added the ability to resize Cocoa windows. Sam Lantinga <slouken@libsdl.org> parents: 390 diff changeset	139 Cocoa sets the origin at the lower left corner of the window/screen
74262d2647ca Lots of cleanups by Darrell, added the ability to resize Cocoa windows. Sam Lantinga <slouken@libsdl.org> parents: 390 diff changeset	140 SDL, CoreGraphics/WindowServer, and QuickDraw use the origin at the upper left corner
74262d2647ca Lots of cleanups by Darrell, added the ability to resize Cocoa windows. Sam Lantinga <slouken@libsdl.org> parents: 390 diff changeset	141 The routines were written so they could be called before SetVideoMode() has finished;
74262d2647ca Lots of cleanups by Darrell, added the ability to resize Cocoa windows. Sam Lantinga <slouken@libsdl.org> parents: 390 diff changeset	142 this might have limited usefulness at the moment, but the extra cost is trivial.
74262d2647ca Lots of cleanups by Darrell, added the ability to resize Cocoa windows. Sam Lantinga <slouken@libsdl.org> parents: 390 diff changeset	143 */
272 d1447a846d80 Date: Sat, 19 Jan 2002 17:24:32 -0500 (EST) Sam Lantinga <slouken@libsdl.org> parents: 269 diff changeset	144
d1447a846d80 Date: Sat, 19 Jan 2002 17:24:32 -0500 (EST) Sam Lantinga <slouken@libsdl.org> parents: 269 diff changeset	145 /* Convert Cocoa screen coordinate to Cocoa window coordinate */
761 c5b2b6d2d1fe Date: Wed, 31 Dec 2003 21:55:30 +0100 Sam Lantinga <slouken@libsdl.org> parents: 683 diff changeset	146 void QZ_PrivateGlobalToLocal (_THIS, NSPoint *p) {
47 45b1c4303f87 Added initial support for Quartz video (thanks Darrell!) Sam Lantinga <slouken@lokigames.com> parents: diff changeset	147
272 d1447a846d80 Date: Sat, 19 Jan 2002 17:24:32 -0500 (EST) Sam Lantinga <slouken@libsdl.org> parents: 269 diff changeset	148 p = [ qz_window convertScreenToBase:p ];
d1447a846d80 Date: Sat, 19 Jan 2002 17:24:32 -0500 (EST) Sam Lantinga <slouken@libsdl.org> parents: 269 diff changeset	149 }
d1447a846d80 Date: Sat, 19 Jan 2002 17:24:32 -0500 (EST) Sam Lantinga <slouken@libsdl.org> parents: 269 diff changeset	150
d1447a846d80 Date: Sat, 19 Jan 2002 17:24:32 -0500 (EST) Sam Lantinga <slouken@libsdl.org> parents: 269 diff changeset	151
d1447a846d80 Date: Sat, 19 Jan 2002 17:24:32 -0500 (EST) Sam Lantinga <slouken@libsdl.org> parents: 269 diff changeset	152 /* Convert Cocoa window coordinate to Cocoa screen coordinate */
761 c5b2b6d2d1fe Date: Wed, 31 Dec 2003 21:55:30 +0100 Sam Lantinga <slouken@libsdl.org> parents: 683 diff changeset	153 void QZ_PrivateLocalToGlobal (_THIS, NSPoint *p) {
272 d1447a846d80 Date: Sat, 19 Jan 2002 17:24:32 -0500 (EST) Sam Lantinga <slouken@libsdl.org> parents: 269 diff changeset	154
d1447a846d80 Date: Sat, 19 Jan 2002 17:24:32 -0500 (EST) Sam Lantinga <slouken@libsdl.org> parents: 269 diff changeset	155 p = [ qz_window convertBaseToScreen:p ];
d1447a846d80 Date: Sat, 19 Jan 2002 17:24:32 -0500 (EST) Sam Lantinga <slouken@libsdl.org> parents: 269 diff changeset	156 }
d1447a846d80 Date: Sat, 19 Jan 2002 17:24:32 -0500 (EST) Sam Lantinga <slouken@libsdl.org> parents: 269 diff changeset	157
d1447a846d80 Date: Sat, 19 Jan 2002 17:24:32 -0500 (EST) Sam Lantinga <slouken@libsdl.org> parents: 269 diff changeset	158 /* Convert SDL coordinate to Cocoa coordinate */
761 c5b2b6d2d1fe Date: Wed, 31 Dec 2003 21:55:30 +0100 Sam Lantinga <slouken@libsdl.org> parents: 683 diff changeset	159 void QZ_PrivateSDLToCocoa (_THIS, NSPoint *p) {
272 d1447a846d80 Date: Sat, 19 Jan 2002 17:24:32 -0500 (EST) Sam Lantinga <slouken@libsdl.org> parents: 269 diff changeset	160
d1447a846d80 Date: Sat, 19 Jan 2002 17:24:32 -0500 (EST) Sam Lantinga <slouken@libsdl.org> parents: 269 diff changeset	161 if ( CGDisplayIsCaptured (display_id) ) { /* capture signals fullscreen */
d1447a846d80 Date: Sat, 19 Jan 2002 17:24:32 -0500 (EST) Sam Lantinga <slouken@libsdl.org> parents: 269 diff changeset	162
876 9e84d106ec19 (Said Max Horn on the SDL mailing list...) Ryan C. Gordon <icculus@icculus.org> parents: 779 diff changeset	163 p->y = CGDisplayPixelsHigh (display_id) - p->y;
272 d1447a846d80 Date: Sat, 19 Jan 2002 17:24:32 -0500 (EST) Sam Lantinga <slouken@libsdl.org> parents: 269 diff changeset	164 }
d1447a846d80 Date: Sat, 19 Jan 2002 17:24:32 -0500 (EST) Sam Lantinga <slouken@libsdl.org> parents: 269 diff changeset	165 else {
934 af585d6efec8 Date: Thu, 17 Jun 2004 11:38:51 -0700 (PDT) Sam Lantinga <slouken@libsdl.org> parents: 876 diff changeset	166
af585d6efec8 Date: Thu, 17 Jun 2004 11:38:51 -0700 (PDT) Sam Lantinga <slouken@libsdl.org> parents: 876 diff changeset	167 p = [ window_view convertPoint:p toView: nil ];
1192 54aa9aa32327 To: sdl@libsdl.org Ryan C. Gordon <icculus@icculus.org> parents: 983 diff changeset	168
54aa9aa32327 To: sdl@libsdl.org Ryan C. Gordon <icculus@icculus.org> parents: 983 diff changeset	169 /* We need a workaround in OpenGL mode */
54aa9aa32327 To: sdl@libsdl.org Ryan C. Gordon <icculus@icculus.org> parents: 983 diff changeset	170 if ( SDL_VideoSurface->flags & SDL_OPENGL ) {
54aa9aa32327 To: sdl@libsdl.org Ryan C. Gordon <icculus@icculus.org> parents: 983 diff changeset	171 p->y = [window_view frame].size.height - p->y;
54aa9aa32327 To: sdl@libsdl.org Ryan C. Gordon <icculus@icculus.org> parents: 983 diff changeset	172 }
272 d1447a846d80 Date: Sat, 19 Jan 2002 17:24:32 -0500 (EST) Sam Lantinga <slouken@libsdl.org> parents: 269 diff changeset	173 }
d1447a846d80 Date: Sat, 19 Jan 2002 17:24:32 -0500 (EST) Sam Lantinga <slouken@libsdl.org> parents: 269 diff changeset	174 }
d1447a846d80 Date: Sat, 19 Jan 2002 17:24:32 -0500 (EST) Sam Lantinga <slouken@libsdl.org> parents: 269 diff changeset	175
d1447a846d80 Date: Sat, 19 Jan 2002 17:24:32 -0500 (EST) Sam Lantinga <slouken@libsdl.org> parents: 269 diff changeset	176 /* Convert Cocoa coordinate to SDL coordinate */
761 c5b2b6d2d1fe Date: Wed, 31 Dec 2003 21:55:30 +0100 Sam Lantinga <slouken@libsdl.org> parents: 683 diff changeset	177 void QZ_PrivateCocoaToSDL (_THIS, NSPoint *p) {
272 d1447a846d80 Date: Sat, 19 Jan 2002 17:24:32 -0500 (EST) Sam Lantinga <slouken@libsdl.org> parents: 269 diff changeset	178
683 5d2f027b3349 Date: Sat, 9 Aug 2003 20:14:06 -0400 Sam Lantinga <slouken@libsdl.org> parents: 615 diff changeset	179 if ( CGDisplayIsCaptured (display_id) ) { /* capture signals fullscreen */
5d2f027b3349 Date: Sat, 9 Aug 2003 20:14:06 -0400 Sam Lantinga <slouken@libsdl.org> parents: 615 diff changeset	180
876 9e84d106ec19 (Said Max Horn on the SDL mailing list...) Ryan C. Gordon <icculus@icculus.org> parents: 779 diff changeset	181 p->y = CGDisplayPixelsHigh (display_id) - p->y;
683 5d2f027b3349 Date: Sat, 9 Aug 2003 20:14:06 -0400 Sam Lantinga <slouken@libsdl.org> parents: 615 diff changeset	182 }
5d2f027b3349 Date: Sat, 9 Aug 2003 20:14:06 -0400 Sam Lantinga <slouken@libsdl.org> parents: 615 diff changeset	183 else {
934 af585d6efec8 Date: Thu, 17 Jun 2004 11:38:51 -0700 (PDT) Sam Lantinga <slouken@libsdl.org> parents: 876 diff changeset	184
af585d6efec8 Date: Thu, 17 Jun 2004 11:38:51 -0700 (PDT) Sam Lantinga <slouken@libsdl.org> parents: 876 diff changeset	185 p = [ window_view convertPoint:p fromView: nil ];
683 5d2f027b3349 Date: Sat, 9 Aug 2003 20:14:06 -0400 Sam Lantinga <slouken@libsdl.org> parents: 615 diff changeset	186
983 7f08bd66f1ca Date: Fri, 19 Nov 2004 06:23:53 -0800 (PST) Sam Lantinga <slouken@libsdl.org> parents: 952 diff changeset	187 /* We need a workaround in OpenGL mode */
1629 ef4a796e7f24 Fixed bug #55 Sam Lantinga <slouken@libsdl.org> parents: 1403 diff changeset	188 if ( SDL_VideoSurface != NULL && (SDL_VideoSurface->flags & SDL_OPENGL) ) {
1192 54aa9aa32327 To: sdl@libsdl.org Ryan C. Gordon <icculus@icculus.org> parents: 983 diff changeset	189 p->y = [window_view frame].size.height - p->y;
952 6f5c8bd997aa Hum. Sam Lantinga <slouken@libsdl.org> parents: 951 diff changeset	190 }
683 5d2f027b3349 Date: Sat, 9 Aug 2003 20:14:06 -0400 Sam Lantinga <slouken@libsdl.org> parents: 615 diff changeset	191 }
272 d1447a846d80 Date: Sat, 19 Jan 2002 17:24:32 -0500 (EST) Sam Lantinga <slouken@libsdl.org> parents: 269 diff changeset	192 }
d1447a846d80 Date: Sat, 19 Jan 2002 17:24:32 -0500 (EST) Sam Lantinga <slouken@libsdl.org> parents: 269 diff changeset	193
d1447a846d80 Date: Sat, 19 Jan 2002 17:24:32 -0500 (EST) Sam Lantinga <slouken@libsdl.org> parents: 269 diff changeset	194 /* Convert SDL coordinate to window server (CoreGraphics) coordinate */
761 c5b2b6d2d1fe Date: Wed, 31 Dec 2003 21:55:30 +0100 Sam Lantinga <slouken@libsdl.org> parents: 683 diff changeset	195 CGPoint QZ_PrivateSDLToCG (_THIS, NSPoint *p) {
272 d1447a846d80 Date: Sat, 19 Jan 2002 17:24:32 -0500 (EST) Sam Lantinga <slouken@libsdl.org> parents: 269 diff changeset	196
d1447a846d80 Date: Sat, 19 Jan 2002 17:24:32 -0500 (EST) Sam Lantinga <slouken@libsdl.org> parents: 269 diff changeset	197 CGPoint cgp;
d1447a846d80 Date: Sat, 19 Jan 2002 17:24:32 -0500 (EST) Sam Lantinga <slouken@libsdl.org> parents: 269 diff changeset	198
d1447a846d80 Date: Sat, 19 Jan 2002 17:24:32 -0500 (EST) Sam Lantinga <slouken@libsdl.org> parents: 269 diff changeset	199 if ( ! CGDisplayIsCaptured (display_id) ) { /* not captured => not fullscreen => local coord */
d1447a846d80 Date: Sat, 19 Jan 2002 17:24:32 -0500 (EST) Sam Lantinga <slouken@libsdl.org> parents: 269 diff changeset	200
d1447a846d80 Date: Sat, 19 Jan 2002 17:24:32 -0500 (EST) Sam Lantinga <slouken@libsdl.org> parents: 269 diff changeset	201 int height;
d1447a846d80 Date: Sat, 19 Jan 2002 17:24:32 -0500 (EST) Sam Lantinga <slouken@libsdl.org> parents: 269 diff changeset	202
d1447a846d80 Date: Sat, 19 Jan 2002 17:24:32 -0500 (EST) Sam Lantinga <slouken@libsdl.org> parents: 269 diff changeset	203 QZ_PrivateSDLToCocoa (this, p);
d1447a846d80 Date: Sat, 19 Jan 2002 17:24:32 -0500 (EST) Sam Lantinga <slouken@libsdl.org> parents: 269 diff changeset	204 QZ_PrivateLocalToGlobal (this, p);
d1447a846d80 Date: Sat, 19 Jan 2002 17:24:32 -0500 (EST) Sam Lantinga <slouken@libsdl.org> parents: 269 diff changeset	205
d1447a846d80 Date: Sat, 19 Jan 2002 17:24:32 -0500 (EST) Sam Lantinga <slouken@libsdl.org> parents: 269 diff changeset	206 height = CGDisplayPixelsHigh (display_id);
d1447a846d80 Date: Sat, 19 Jan 2002 17:24:32 -0500 (EST) Sam Lantinga <slouken@libsdl.org> parents: 269 diff changeset	207 p->y = height - p->y;
d1447a846d80 Date: Sat, 19 Jan 2002 17:24:32 -0500 (EST) Sam Lantinga <slouken@libsdl.org> parents: 269 diff changeset	208 }
d1447a846d80 Date: Sat, 19 Jan 2002 17:24:32 -0500 (EST) Sam Lantinga <slouken@libsdl.org> parents: 269 diff changeset	209
d1447a846d80 Date: Sat, 19 Jan 2002 17:24:32 -0500 (EST) Sam Lantinga <slouken@libsdl.org> parents: 269 diff changeset	210 cgp.x = p->x;
d1447a846d80 Date: Sat, 19 Jan 2002 17:24:32 -0500 (EST) Sam Lantinga <slouken@libsdl.org> parents: 269 diff changeset	211 cgp.y = p->y;
d1447a846d80 Date: Sat, 19 Jan 2002 17:24:32 -0500 (EST) Sam Lantinga <slouken@libsdl.org> parents: 269 diff changeset	212
d1447a846d80 Date: Sat, 19 Jan 2002 17:24:32 -0500 (EST) Sam Lantinga <slouken@libsdl.org> parents: 269 diff changeset	213 return cgp;
d1447a846d80 Date: Sat, 19 Jan 2002 17:24:32 -0500 (EST) Sam Lantinga <slouken@libsdl.org> parents: 269 diff changeset	214 }
d1447a846d80 Date: Sat, 19 Jan 2002 17:24:32 -0500 (EST) Sam Lantinga <slouken@libsdl.org> parents: 269 diff changeset	215
683 5d2f027b3349 Date: Sat, 9 Aug 2003 20:14:06 -0400 Sam Lantinga <slouken@libsdl.org> parents: 615 diff changeset	216 #if 0 /* Dead code */
272 d1447a846d80 Date: Sat, 19 Jan 2002 17:24:32 -0500 (EST) Sam Lantinga <slouken@libsdl.org> parents: 269 diff changeset	217 /* Convert window server (CoreGraphics) coordinate to SDL coordinate */
761 c5b2b6d2d1fe Date: Wed, 31 Dec 2003 21:55:30 +0100 Sam Lantinga <slouken@libsdl.org> parents: 683 diff changeset	218 void QZ_PrivateCGToSDL (_THIS, NSPoint *p) {
272 d1447a846d80 Date: Sat, 19 Jan 2002 17:24:32 -0500 (EST) Sam Lantinga <slouken@libsdl.org> parents: 269 diff changeset	219
d1447a846d80 Date: Sat, 19 Jan 2002 17:24:32 -0500 (EST) Sam Lantinga <slouken@libsdl.org> parents: 269 diff changeset	220 if ( ! CGDisplayIsCaptured (display_id) ) { /* not captured => not fullscreen => local coord */
d1447a846d80 Date: Sat, 19 Jan 2002 17:24:32 -0500 (EST) Sam Lantinga <slouken@libsdl.org> parents: 269 diff changeset	221
d1447a846d80 Date: Sat, 19 Jan 2002 17:24:32 -0500 (EST) Sam Lantinga <slouken@libsdl.org> parents: 269 diff changeset	222 int height;
d1447a846d80 Date: Sat, 19 Jan 2002 17:24:32 -0500 (EST) Sam Lantinga <slouken@libsdl.org> parents: 269 diff changeset	223
d1447a846d80 Date: Sat, 19 Jan 2002 17:24:32 -0500 (EST) Sam Lantinga <slouken@libsdl.org> parents: 269 diff changeset	224 /* Convert CG Global to Cocoa Global */
d1447a846d80 Date: Sat, 19 Jan 2002 17:24:32 -0500 (EST) Sam Lantinga <slouken@libsdl.org> parents: 269 diff changeset	225 height = CGDisplayPixelsHigh (display_id);
d1447a846d80 Date: Sat, 19 Jan 2002 17:24:32 -0500 (EST) Sam Lantinga <slouken@libsdl.org> parents: 269 diff changeset	226 p->y = height - p->y;
d1447a846d80 Date: Sat, 19 Jan 2002 17:24:32 -0500 (EST) Sam Lantinga <slouken@libsdl.org> parents: 269 diff changeset	227
d1447a846d80 Date: Sat, 19 Jan 2002 17:24:32 -0500 (EST) Sam Lantinga <slouken@libsdl.org> parents: 269 diff changeset	228 QZ_PrivateGlobalToLocal (this, p);
d1447a846d80 Date: Sat, 19 Jan 2002 17:24:32 -0500 (EST) Sam Lantinga <slouken@libsdl.org> parents: 269 diff changeset	229 QZ_PrivateCocoaToSDL (this, p);
47 45b1c4303f87 Added initial support for Quartz video (thanks Darrell!) Sam Lantinga <slouken@lokigames.com> parents: diff changeset	230 }
45b1c4303f87 Added initial support for Quartz video (thanks Darrell!) Sam Lantinga <slouken@lokigames.com> parents: diff changeset	231 }
683 5d2f027b3349 Date: Sat, 9 Aug 2003 20:14:06 -0400 Sam Lantinga <slouken@libsdl.org> parents: 615 diff changeset	232 #endif /* Dead code */
47 45b1c4303f87 Added initial support for Quartz video (thanks Darrell!) Sam Lantinga <slouken@lokigames.com> parents: diff changeset	233
761 c5b2b6d2d1fe Date: Wed, 31 Dec 2003 21:55:30 +0100 Sam Lantinga <slouken@libsdl.org> parents: 683 diff changeset	234 void QZ_PrivateWarpCursor (_THIS, int x, int y) {
272 d1447a846d80 Date: Sat, 19 Jan 2002 17:24:32 -0500 (EST) Sam Lantinga <slouken@libsdl.org> parents: 269 diff changeset	235
d1447a846d80 Date: Sat, 19 Jan 2002 17:24:32 -0500 (EST) Sam Lantinga <slouken@libsdl.org> parents: 269 diff changeset	236 NSPoint p;
d1447a846d80 Date: Sat, 19 Jan 2002 17:24:32 -0500 (EST) Sam Lantinga <slouken@libsdl.org> parents: 269 diff changeset	237 CGPoint cgp;
47 45b1c4303f87 Added initial support for Quartz video (thanks Darrell!) Sam Lantinga <slouken@lokigames.com> parents: diff changeset	238
272 d1447a846d80 Date: Sat, 19 Jan 2002 17:24:32 -0500 (EST) Sam Lantinga <slouken@libsdl.org> parents: 269 diff changeset	239 p = NSMakePoint (x, y);
563 04dcaf3da918 Massive Quartz input enhancements from Darrell Walisser. His email: Ryan C. Gordon <icculus@icculus.org> parents: 501 diff changeset	240 cgp = QZ_PrivateSDLToCG (this, &p);
04dcaf3da918 Massive Quartz input enhancements from Darrell Walisser. His email: Ryan C. Gordon <icculus@icculus.org> parents: 501 diff changeset	241
04dcaf3da918 Massive Quartz input enhancements from Darrell Walisser. His email: Ryan C. Gordon <icculus@icculus.org> parents: 501 diff changeset	242 /* this is the magic call that fixes cursor "freezing" after warp */
04dcaf3da918 Massive Quartz input enhancements from Darrell Walisser. His email: Ryan C. Gordon <icculus@icculus.org> parents: 501 diff changeset	243 CGSetLocalEventsSuppressionInterval (0.0);
04dcaf3da918 Massive Quartz input enhancements from Darrell Walisser. His email: Ryan C. Gordon <icculus@icculus.org> parents: 501 diff changeset	244 CGWarpMouseCursorPosition (cgp);
272 d1447a846d80 Date: Sat, 19 Jan 2002 17:24:32 -0500 (EST) Sam Lantinga <slouken@libsdl.org> parents: 269 diff changeset	245 }
d1447a846d80 Date: Sat, 19 Jan 2002 17:24:32 -0500 (EST) Sam Lantinga <slouken@libsdl.org> parents: 269 diff changeset	246
761 c5b2b6d2d1fe Date: Wed, 31 Dec 2003 21:55:30 +0100 Sam Lantinga <slouken@libsdl.org> parents: 683 diff changeset	247 void QZ_WarpWMCursor (_THIS, Uint16 x, Uint16 y) {
272 d1447a846d80 Date: Sat, 19 Jan 2002 17:24:32 -0500 (EST) Sam Lantinga <slouken@libsdl.org> parents: 269 diff changeset	248
47 45b1c4303f87 Added initial support for Quartz video (thanks Darrell!) Sam Lantinga <slouken@lokigames.com> parents: diff changeset	249 /* Only allow warping when in foreground */
761 c5b2b6d2d1fe Date: Wed, 31 Dec 2003 21:55:30 +0100 Sam Lantinga <slouken@libsdl.org> parents: 683 diff changeset	250 if ( ! [ NSApp isActive ] )
47 45b1c4303f87 Added initial support for Quartz video (thanks Darrell!) Sam Lantinga <slouken@lokigames.com> parents: diff changeset	251 return;
45b1c4303f87 Added initial support for Quartz video (thanks Darrell!) Sam Lantinga <slouken@lokigames.com> parents: diff changeset	252
45b1c4303f87 Added initial support for Quartz video (thanks Darrell!) Sam Lantinga <slouken@lokigames.com> parents: diff changeset	253 /* Do the actual warp */
1207 c9ec00d3e8bc To: sdl@libsdl.org Ryan C. Gordon <icculus@icculus.org> parents: 1192 diff changeset	254 if (grab_state != QZ_INVISIBLE_GRAB) QZ_PrivateWarpCursor (this, x, y);
563 04dcaf3da918 Massive Quartz input enhancements from Darrell Walisser. His email: Ryan C. Gordon <icculus@icculus.org> parents: 501 diff changeset	255
04dcaf3da918 Massive Quartz input enhancements from Darrell Walisser. His email: Ryan C. Gordon <icculus@icculus.org> parents: 501 diff changeset	256 /* Generate the mouse moved event */
04dcaf3da918 Massive Quartz input enhancements from Darrell Walisser. His email: Ryan C. Gordon <icculus@icculus.org> parents: 501 diff changeset	257 SDL_PrivateMouseMotion (0, 0, x, y);
47 45b1c4303f87 Added initial support for Quartz video (thanks Darrell!) Sam Lantinga <slouken@lokigames.com> parents: diff changeset	258 }
45b1c4303f87 Added initial support for Quartz video (thanks Darrell!) Sam Lantinga <slouken@lokigames.com> parents: diff changeset	259
761 c5b2b6d2d1fe Date: Wed, 31 Dec 2003 21:55:30 +0100 Sam Lantinga <slouken@libsdl.org> parents: 683 diff changeset	260 void QZ_MoveWMCursor (_THIS, int x, int y) { }
c5b2b6d2d1fe Date: Wed, 31 Dec 2003 21:55:30 +0100 Sam Lantinga <slouken@libsdl.org> parents: 683 diff changeset	261 void QZ_CheckMouseMode (_THIS) { }
47 45b1c4303f87 Added initial support for Quartz video (thanks Darrell!) Sam Lantinga <slouken@lokigames.com> parents: diff changeset	262
761 c5b2b6d2d1fe Date: Wed, 31 Dec 2003 21:55:30 +0100 Sam Lantinga <slouken@libsdl.org> parents: 683 diff changeset	263 void QZ_SetCaption (_THIS, const char title, const char icon) {
47 45b1c4303f87 Added initial support for Quartz video (thanks Darrell!) Sam Lantinga <slouken@lokigames.com> parents: diff changeset	264
158 4382c38dfbee Date: Tue, 21 Aug 2001 03:50:01 +0200 Sam Lantinga <slouken@libsdl.org> parents: 58 diff changeset	265 if ( qz_window != nil ) {
58 bd6b0a910a65 * Removed fullscreen menu option from the "Window" menu Sam Lantinga <slouken@lokigames.com> parents: 47 diff changeset	266 NSString *string;
bd6b0a910a65 * Removed fullscreen menu option from the "Window" menu Sam Lantinga <slouken@lokigames.com> parents: 47 diff changeset	267 if ( title != NULL ) {
951 121f56c1277d Date: Sun, 29 Aug 2004 20:55:54 +0200 Sam Lantinga <slouken@libsdl.org> parents: 934 diff changeset	268 string = [ [ NSString alloc ] initWithUTF8String:title ];
158 4382c38dfbee Date: Tue, 21 Aug 2001 03:50:01 +0200 Sam Lantinga <slouken@libsdl.org> parents: 58 diff changeset	269 [ qz_window setTitle:string ];
58 bd6b0a910a65 * Removed fullscreen menu option from the "Window" menu Sam Lantinga <slouken@lokigames.com> parents: 47 diff changeset	270 [ string release ];
bd6b0a910a65 * Removed fullscreen menu option from the "Window" menu Sam Lantinga <slouken@lokigames.com> parents: 47 diff changeset	271 }
bd6b0a910a65 * Removed fullscreen menu option from the "Window" menu Sam Lantinga <slouken@lokigames.com> parents: 47 diff changeset	272 if ( icon != NULL ) {
951 121f56c1277d Date: Sun, 29 Aug 2004 20:55:54 +0200 Sam Lantinga <slouken@libsdl.org> parents: 934 diff changeset	273 string = [ [ NSString alloc ] initWithUTF8String:icon ];
158 4382c38dfbee Date: Tue, 21 Aug 2001 03:50:01 +0200 Sam Lantinga <slouken@libsdl.org> parents: 58 diff changeset	274 [ qz_window setMiniwindowTitle:string ];
58 bd6b0a910a65 * Removed fullscreen menu option from the "Window" menu Sam Lantinga <slouken@lokigames.com> parents: 47 diff changeset	275 [ string release ];
bd6b0a910a65 * Removed fullscreen menu option from the "Window" menu Sam Lantinga <slouken@lokigames.com> parents: 47 diff changeset	276 }
bd6b0a910a65 * Removed fullscreen menu option from the "Window" menu Sam Lantinga <slouken@lokigames.com> parents: 47 diff changeset	277 }
47 45b1c4303f87 Added initial support for Quartz video (thanks Darrell!) Sam Lantinga <slouken@lokigames.com> parents: diff changeset	278 }
45b1c4303f87 Added initial support for Quartz video (thanks Darrell!) Sam Lantinga <slouken@lokigames.com> parents: diff changeset	279
761 c5b2b6d2d1fe Date: Wed, 31 Dec 2003 21:55:30 +0100 Sam Lantinga <slouken@libsdl.org> parents: 683 diff changeset	280 void QZ_SetIcon (_THIS, SDL_Surface icon, Uint8 mask)
269 4125b9859c71 Added Quartz version of SDL_SetIcon() for MacOS X (thanks Bob) Sam Lantinga <slouken@libsdl.org> parents: 252 diff changeset	281 {
501 74262d2647ca Lots of cleanups by Darrell, added the ability to resize Cocoa windows. Sam Lantinga <slouken@libsdl.org> parents: 390 diff changeset	282 NSBitmapImageRep *imgrep;
74262d2647ca Lots of cleanups by Darrell, added the ability to resize Cocoa windows. Sam Lantinga <slouken@libsdl.org> parents: 390 diff changeset	283 NSImage *img;
74262d2647ca Lots of cleanups by Darrell, added the ability to resize Cocoa windows. Sam Lantinga <slouken@libsdl.org> parents: 390 diff changeset	284 SDL_Surface *mergedSurface;
74262d2647ca Lots of cleanups by Darrell, added the ability to resize Cocoa windows. Sam Lantinga <slouken@libsdl.org> parents: 390 diff changeset	285 NSAutoreleasePool *pool;
1812 9c882e94b545 Fixed bug #208 Sam Lantinga <slouken@libsdl.org> parents: 1756 diff changeset	286 Uint8 *pixels;
9c882e94b545 Fixed bug #208 Sam Lantinga <slouken@libsdl.org> parents: 1756 diff changeset	287 SDL_bool iconSrcAlpha;
9c882e94b545 Fixed bug #208 Sam Lantinga <slouken@libsdl.org> parents: 1756 diff changeset	288 Uint8 iconAlphaValue;
9c882e94b545 Fixed bug #208 Sam Lantinga <slouken@libsdl.org> parents: 1756 diff changeset	289 int i, j, maskPitch, index;
501 74262d2647ca Lots of cleanups by Darrell, added the ability to resize Cocoa windows. Sam Lantinga <slouken@libsdl.org> parents: 390 diff changeset	290
74262d2647ca Lots of cleanups by Darrell, added the ability to resize Cocoa windows. Sam Lantinga <slouken@libsdl.org> parents: 390 diff changeset	291 pool = [ [ NSAutoreleasePool alloc ] init ];
1812 9c882e94b545 Fixed bug #208 Sam Lantinga <slouken@libsdl.org> parents: 1756 diff changeset	292
9c882e94b545 Fixed bug #208 Sam Lantinga <slouken@libsdl.org> parents: 1756 diff changeset	293 imgrep = [ [ [ NSBitmapImageRep alloc ] initWithBitmapDataPlanes: NULL pixelsWide: icon->w pixelsHigh: icon->h bitsPerSample: 8 samplesPerPixel: 4 hasAlpha: YES isPlanar: NO colorSpaceName: NSDeviceRGBColorSpace bytesPerRow: 4*icon->w bitsPerPixel: 32 ] autorelease ];
9c882e94b545 Fixed bug #208 Sam Lantinga <slouken@libsdl.org> parents: 1756 diff changeset	294 if (imgrep == nil) goto freePool;
9c882e94b545 Fixed bug #208 Sam Lantinga <slouken@libsdl.org> parents: 1756 diff changeset	295 pixels = [ imgrep bitmapData ];
9c882e94b545 Fixed bug #208 Sam Lantinga <slouken@libsdl.org> parents: 1756 diff changeset	296 SDL_memset(pixels, 0, 4icon->wicon->h); /* make the background, which will survive in colorkeyed areas, completely transparent */
501 74262d2647ca Lots of cleanups by Darrell, added the ability to resize Cocoa windows. Sam Lantinga <slouken@libsdl.org> parents: 390 diff changeset	297
1812 9c882e94b545 Fixed bug #208 Sam Lantinga <slouken@libsdl.org> parents: 1756 diff changeset	298 #if SDL_BYTEORDER == SDL_BIG_ENDIAN
9c882e94b545 Fixed bug #208 Sam Lantinga <slouken@libsdl.org> parents: 1756 diff changeset	299 #define BYTEORDER_DEPENDENT_RGBA_MASKS 0xFF000000, 0x00FF0000, 0x0000FF00, 0x000000FF
9c882e94b545 Fixed bug #208 Sam Lantinga <slouken@libsdl.org> parents: 1756 diff changeset	300 #else
9c882e94b545 Fixed bug #208 Sam Lantinga <slouken@libsdl.org> parents: 1756 diff changeset	301 #define BYTEORDER_DEPENDENT_RGBA_MASKS 0x000000FF, 0x0000FF00, 0x00FF0000, 0xFF000000
9c882e94b545 Fixed bug #208 Sam Lantinga <slouken@libsdl.org> parents: 1756 diff changeset	302 #endif
9c882e94b545 Fixed bug #208 Sam Lantinga <slouken@libsdl.org> parents: 1756 diff changeset	303 mergedSurface = SDL_CreateRGBSurfaceFrom(pixels, icon->w, icon->h, 32, 4*icon->w, BYTEORDER_DEPENDENT_RGBA_MASKS);
9c882e94b545 Fixed bug #208 Sam Lantinga <slouken@libsdl.org> parents: 1756 diff changeset	304 if (mergedSurface == NULL) goto freePool;
501 74262d2647ca Lots of cleanups by Darrell, added the ability to resize Cocoa windows. Sam Lantinga <slouken@libsdl.org> parents: 390 diff changeset	305
1812 9c882e94b545 Fixed bug #208 Sam Lantinga <slouken@libsdl.org> parents: 1756 diff changeset	306 /* blit, with temporarily cleared SRCALPHA flag because we want to copy, not alpha-blend */
9c882e94b545 Fixed bug #208 Sam Lantinga <slouken@libsdl.org> parents: 1756 diff changeset	307 iconSrcAlpha = ((icon->flags & SDL_SRCALPHA) != 0);
9c882e94b545 Fixed bug #208 Sam Lantinga <slouken@libsdl.org> parents: 1756 diff changeset	308 iconAlphaValue = icon->format->alpha;
9c882e94b545 Fixed bug #208 Sam Lantinga <slouken@libsdl.org> parents: 1756 diff changeset	309 SDL_SetAlpha(icon, 0, 255);
9c882e94b545 Fixed bug #208 Sam Lantinga <slouken@libsdl.org> parents: 1756 diff changeset	310 SDL_BlitSurface(icon, NULL, mergedSurface, NULL);
9c882e94b545 Fixed bug #208 Sam Lantinga <slouken@libsdl.org> parents: 1756 diff changeset	311 if (iconSrcAlpha) SDL_SetAlpha(icon, SDL_SRCALPHA, iconAlphaValue);
592 1970e458070d Fixed crash in SDL_SetIcon() under Quartz (thanks Darrell!) Sam Lantinga <slouken@libsdl.org> parents: 563 diff changeset	312
1812 9c882e94b545 Fixed bug #208 Sam Lantinga <slouken@libsdl.org> parents: 1756 diff changeset	313 SDL_FreeSurface(mergedSurface);
501 74262d2647ca Lots of cleanups by Darrell, added the ability to resize Cocoa windows. Sam Lantinga <slouken@libsdl.org> parents: 390 diff changeset	314
1812 9c882e94b545 Fixed bug #208 Sam Lantinga <slouken@libsdl.org> parents: 1756 diff changeset	315 /* apply mask, source alpha, and premultiply color values by alpha */
9c882e94b545 Fixed bug #208 Sam Lantinga <slouken@libsdl.org> parents: 1756 diff changeset	316 maskPitch = (icon->w+7)/8;
9c882e94b545 Fixed bug #208 Sam Lantinga <slouken@libsdl.org> parents: 1756 diff changeset	317 for (i = 0; i < icon->h; i++) {
9c882e94b545 Fixed bug #208 Sam Lantinga <slouken@libsdl.org> parents: 1756 diff changeset	318 for (j = 0; j < icon->w; j++) {
9c882e94b545 Fixed bug #208 Sam Lantinga <slouken@libsdl.org> parents: 1756 diff changeset	319 index = i4icon->w + j*4;
9c882e94b545 Fixed bug #208 Sam Lantinga <slouken@libsdl.org> parents: 1756 diff changeset	320 if (!(mask[i*maskPitch + j/8] & (128 >> j%8))) {
9c882e94b545 Fixed bug #208 Sam Lantinga <slouken@libsdl.org> parents: 1756 diff changeset	321 pixels[index + 3] = 0;
9c882e94b545 Fixed bug #208 Sam Lantinga <slouken@libsdl.org> parents: 1756 diff changeset	322 }
9c882e94b545 Fixed bug #208 Sam Lantinga <slouken@libsdl.org> parents: 1756 diff changeset	323 else {
9c882e94b545 Fixed bug #208 Sam Lantinga <slouken@libsdl.org> parents: 1756 diff changeset	324 if (iconSrcAlpha) {
9c882e94b545 Fixed bug #208 Sam Lantinga <slouken@libsdl.org> parents: 1756 diff changeset	325 if (icon->format->Amask == 0) pixels[index + 3] = icon->format->alpha;
9c882e94b545 Fixed bug #208 Sam Lantinga <slouken@libsdl.org> parents: 1756 diff changeset	326 }
9c882e94b545 Fixed bug #208 Sam Lantinga <slouken@libsdl.org> parents: 1756 diff changeset	327 else {
9c882e94b545 Fixed bug #208 Sam Lantinga <slouken@libsdl.org> parents: 1756 diff changeset	328 pixels[index + 3] = 255;
9c882e94b545 Fixed bug #208 Sam Lantinga <slouken@libsdl.org> parents: 1756 diff changeset	329 }
9c882e94b545 Fixed bug #208 Sam Lantinga <slouken@libsdl.org> parents: 1756 diff changeset	330 }
9c882e94b545 Fixed bug #208 Sam Lantinga <slouken@libsdl.org> parents: 1756 diff changeset	331 if (pixels[index + 3] < 255) {
9c882e94b545 Fixed bug #208 Sam Lantinga <slouken@libsdl.org> parents: 1756 diff changeset	332 pixels[index + 0] = (Uint16)pixels[index + 0]*pixels[index + 3]/255;
9c882e94b545 Fixed bug #208 Sam Lantinga <slouken@libsdl.org> parents: 1756 diff changeset	333 pixels[index + 1] = (Uint16)pixels[index + 1]*pixels[index + 3]/255;
9c882e94b545 Fixed bug #208 Sam Lantinga <slouken@libsdl.org> parents: 1756 diff changeset	334 pixels[index + 2] = (Uint16)pixels[index + 2]*pixels[index + 3]/255;
592 1970e458070d Fixed crash in SDL_SetIcon() under Quartz (thanks Darrell!) Sam Lantinga <slouken@libsdl.org> parents: 563 diff changeset	335 }
1970e458070d Fixed crash in SDL_SetIcon() under Quartz (thanks Darrell!) Sam Lantinga <slouken@libsdl.org> parents: 563 diff changeset	336 }
501 74262d2647ca Lots of cleanups by Darrell, added the ability to resize Cocoa windows. Sam Lantinga <slouken@libsdl.org> parents: 390 diff changeset	337 }
74262d2647ca Lots of cleanups by Darrell, added the ability to resize Cocoa windows. Sam Lantinga <slouken@libsdl.org> parents: 390 diff changeset	338
1812 9c882e94b545 Fixed bug #208 Sam Lantinga <slouken@libsdl.org> parents: 1756 diff changeset	339 img = [ [ [ NSImage alloc ] initWithSize: NSMakeSize(icon->w, icon->h) ] autorelease ];
9c882e94b545 Fixed bug #208 Sam Lantinga <slouken@libsdl.org> parents: 1756 diff changeset	340 if (img == nil) goto freePool;
501 74262d2647ca Lots of cleanups by Darrell, added the ability to resize Cocoa windows. Sam Lantinga <slouken@libsdl.org> parents: 390 diff changeset	341 [ img addRepresentation: imgrep ];
74262d2647ca Lots of cleanups by Darrell, added the ability to resize Cocoa windows. Sam Lantinga <slouken@libsdl.org> parents: 390 diff changeset	342 [ NSApp setApplicationIconImage:img ];
74262d2647ca Lots of cleanups by Darrell, added the ability to resize Cocoa windows. Sam Lantinga <slouken@libsdl.org> parents: 390 diff changeset	343
269 4125b9859c71 Added Quartz version of SDL_SetIcon() for MacOS X (thanks Bob) Sam Lantinga <slouken@libsdl.org> parents: 252 diff changeset	344 freePool:
1812 9c882e94b545 Fixed bug #208 Sam Lantinga <slouken@libsdl.org> parents: 1756 diff changeset	345 [ pool release ];
47 45b1c4303f87 Added initial support for Quartz video (thanks Darrell!) Sam Lantinga <slouken@lokigames.com> parents: diff changeset	346 }
45b1c4303f87 Added initial support for Quartz video (thanks Darrell!) Sam Lantinga <slouken@lokigames.com> parents: diff changeset	347
761 c5b2b6d2d1fe Date: Wed, 31 Dec 2003 21:55:30 +0100 Sam Lantinga <slouken@libsdl.org> parents: 683 diff changeset	348 int QZ_IconifyWindow (_THIS) {
47 45b1c4303f87 Added initial support for Quartz video (thanks Darrell!) Sam Lantinga <slouken@lokigames.com> parents: diff changeset	349
158 4382c38dfbee Date: Tue, 21 Aug 2001 03:50:01 +0200 Sam Lantinga <slouken@libsdl.org> parents: 58 diff changeset	350 if ( ! [ qz_window isMiniaturized ] ) {
4382c38dfbee Date: Tue, 21 Aug 2001 03:50:01 +0200 Sam Lantinga <slouken@libsdl.org> parents: 58 diff changeset	351 [ qz_window miniaturize:nil ];
47 45b1c4303f87 Added initial support for Quartz video (thanks Darrell!) Sam Lantinga <slouken@lokigames.com> parents: diff changeset	352 return 1;
45b1c4303f87 Added initial support for Quartz video (thanks Darrell!) Sam Lantinga <slouken@lokigames.com> parents: diff changeset	353 }
45b1c4303f87 Added initial support for Quartz video (thanks Darrell!) Sam Lantinga <slouken@lokigames.com> parents: diff changeset	354 else {
501 74262d2647ca Lots of cleanups by Darrell, added the ability to resize Cocoa windows. Sam Lantinga <slouken@libsdl.org> parents: 390 diff changeset	355 SDL_SetError ("window already iconified");
47 45b1c4303f87 Added initial support for Quartz video (thanks Darrell!) Sam Lantinga <slouken@lokigames.com> parents: diff changeset	356 return 0;
45b1c4303f87 Added initial support for Quartz video (thanks Darrell!) Sam Lantinga <slouken@lokigames.com> parents: diff changeset	357 }
45b1c4303f87 Added initial support for Quartz video (thanks Darrell!) Sam Lantinga <slouken@lokigames.com> parents: diff changeset	358 }
45b1c4303f87 Added initial support for Quartz video (thanks Darrell!) Sam Lantinga <slouken@lokigames.com> parents: diff changeset	359
45b1c4303f87 Added initial support for Quartz video (thanks Darrell!) Sam Lantinga <slouken@lokigames.com> parents: diff changeset	360 /*
761 c5b2b6d2d1fe Date: Wed, 31 Dec 2003 21:55:30 +0100 Sam Lantinga <slouken@libsdl.org> parents: 683 diff changeset	361 int QZ_GetWMInfo (_THIS, SDL_SysWMinfo *info) {
158 4382c38dfbee Date: Tue, 21 Aug 2001 03:50:01 +0200 Sam Lantinga <slouken@libsdl.org> parents: 58 diff changeset	362 info->nsWindowPtr = qz_window;
47 45b1c4303f87 Added initial support for Quartz video (thanks Darrell!) Sam Lantinga <slouken@lokigames.com> parents: diff changeset	363 return 0;
45b1c4303f87 Added initial support for Quartz video (thanks Darrell!) Sam Lantinga <slouken@lokigames.com> parents: diff changeset	364 }*/
45b1c4303f87 Added initial support for Quartz video (thanks Darrell!) Sam Lantinga <slouken@lokigames.com> parents: diff changeset	365
761 c5b2b6d2d1fe Date: Wed, 31 Dec 2003 21:55:30 +0100 Sam Lantinga <slouken@libsdl.org> parents: 683 diff changeset	366 void QZ_ChangeGrabState (_THIS, int action) {
563 04dcaf3da918 Massive Quartz input enhancements from Darrell Walisser. His email: Ryan C. Gordon <icculus@icculus.org> parents: 501 diff changeset	367
04dcaf3da918 Massive Quartz input enhancements from Darrell Walisser. His email: Ryan C. Gordon <icculus@icculus.org> parents: 501 diff changeset	368 /*
04dcaf3da918 Massive Quartz input enhancements from Darrell Walisser. His email: Ryan C. Gordon <icculus@icculus.org> parents: 501 diff changeset	369 Figure out what the next state should be based on the action.
04dcaf3da918 Massive Quartz input enhancements from Darrell Walisser. His email: Ryan C. Gordon <icculus@icculus.org> parents: 501 diff changeset	370 Ignore actions that can't change the current state.
04dcaf3da918 Massive Quartz input enhancements from Darrell Walisser. His email: Ryan C. Gordon <icculus@icculus.org> parents: 501 diff changeset	371 */
04dcaf3da918 Massive Quartz input enhancements from Darrell Walisser. His email: Ryan C. Gordon <icculus@icculus.org> parents: 501 diff changeset	372 if ( grab_state == QZ_UNGRABBED ) {
04dcaf3da918 Massive Quartz input enhancements from Darrell Walisser. His email: Ryan C. Gordon <icculus@icculus.org> parents: 501 diff changeset	373 if ( action == QZ_ENABLE_GRAB ) {
761 c5b2b6d2d1fe Date: Wed, 31 Dec 2003 21:55:30 +0100 Sam Lantinga <slouken@libsdl.org> parents: 683 diff changeset	374 if ( cursor_should_be_visible )
563 04dcaf3da918 Massive Quartz input enhancements from Darrell Walisser. His email: Ryan C. Gordon <icculus@icculus.org> parents: 501 diff changeset	375 grab_state = QZ_VISIBLE_GRAB;
04dcaf3da918 Massive Quartz input enhancements from Darrell Walisser. His email: Ryan C. Gordon <icculus@icculus.org> parents: 501 diff changeset	376 else
04dcaf3da918 Massive Quartz input enhancements from Darrell Walisser. His email: Ryan C. Gordon <icculus@icculus.org> parents: 501 diff changeset	377 grab_state = QZ_INVISIBLE_GRAB;
04dcaf3da918 Massive Quartz input enhancements from Darrell Walisser. His email: Ryan C. Gordon <icculus@icculus.org> parents: 501 diff changeset	378 }
04dcaf3da918 Massive Quartz input enhancements from Darrell Walisser. His email: Ryan C. Gordon <icculus@icculus.org> parents: 501 diff changeset	379 }
04dcaf3da918 Massive Quartz input enhancements from Darrell Walisser. His email: Ryan C. Gordon <icculus@icculus.org> parents: 501 diff changeset	380 else if ( grab_state == QZ_VISIBLE_GRAB ) {
04dcaf3da918 Massive Quartz input enhancements from Darrell Walisser. His email: Ryan C. Gordon <icculus@icculus.org> parents: 501 diff changeset	381 if ( action == QZ_DISABLE_GRAB )
04dcaf3da918 Massive Quartz input enhancements from Darrell Walisser. His email: Ryan C. Gordon <icculus@icculus.org> parents: 501 diff changeset	382 grab_state = QZ_UNGRABBED;
04dcaf3da918 Massive Quartz input enhancements from Darrell Walisser. His email: Ryan C. Gordon <icculus@icculus.org> parents: 501 diff changeset	383 else if ( action == QZ_HIDECURSOR )
04dcaf3da918 Massive Quartz input enhancements from Darrell Walisser. His email: Ryan C. Gordon <icculus@icculus.org> parents: 501 diff changeset	384 grab_state = QZ_INVISIBLE_GRAB;
04dcaf3da918 Massive Quartz input enhancements from Darrell Walisser. His email: Ryan C. Gordon <icculus@icculus.org> parents: 501 diff changeset	385 }
04dcaf3da918 Massive Quartz input enhancements from Darrell Walisser. His email: Ryan C. Gordon <icculus@icculus.org> parents: 501 diff changeset	386 else {
04dcaf3da918 Massive Quartz input enhancements from Darrell Walisser. His email: Ryan C. Gordon <icculus@icculus.org> parents: 501 diff changeset	387 assert( grab_state == QZ_INVISIBLE_GRAB );
04dcaf3da918 Massive Quartz input enhancements from Darrell Walisser. His email: Ryan C. Gordon <icculus@icculus.org> parents: 501 diff changeset	388
04dcaf3da918 Massive Quartz input enhancements from Darrell Walisser. His email: Ryan C. Gordon <icculus@icculus.org> parents: 501 diff changeset	389 if ( action == QZ_DISABLE_GRAB )
04dcaf3da918 Massive Quartz input enhancements from Darrell Walisser. His email: Ryan C. Gordon <icculus@icculus.org> parents: 501 diff changeset	390 grab_state = QZ_UNGRABBED;
04dcaf3da918 Massive Quartz input enhancements from Darrell Walisser. His email: Ryan C. Gordon <icculus@icculus.org> parents: 501 diff changeset	391 else if ( action == QZ_SHOWCURSOR )
04dcaf3da918 Massive Quartz input enhancements from Darrell Walisser. His email: Ryan C. Gordon <icculus@icculus.org> parents: 501 diff changeset	392 grab_state = QZ_VISIBLE_GRAB;
04dcaf3da918 Massive Quartz input enhancements from Darrell Walisser. His email: Ryan C. Gordon <icculus@icculus.org> parents: 501 diff changeset	393 }
04dcaf3da918 Massive Quartz input enhancements from Darrell Walisser. His email: Ryan C. Gordon <icculus@icculus.org> parents: 501 diff changeset	394
04dcaf3da918 Massive Quartz input enhancements from Darrell Walisser. His email: Ryan C. Gordon <icculus@icculus.org> parents: 501 diff changeset	395 /* now apply the new state */
04dcaf3da918 Massive Quartz input enhancements from Darrell Walisser. His email: Ryan C. Gordon <icculus@icculus.org> parents: 501 diff changeset	396 if (grab_state == QZ_UNGRABBED) {
04dcaf3da918 Massive Quartz input enhancements from Darrell Walisser. His email: Ryan C. Gordon <icculus@icculus.org> parents: 501 diff changeset	397
04dcaf3da918 Massive Quartz input enhancements from Darrell Walisser. His email: Ryan C. Gordon <icculus@icculus.org> parents: 501 diff changeset	398 CGAssociateMouseAndMouseCursorPosition (1);
04dcaf3da918 Massive Quartz input enhancements from Darrell Walisser. His email: Ryan C. Gordon <icculus@icculus.org> parents: 501 diff changeset	399 }
04dcaf3da918 Massive Quartz input enhancements from Darrell Walisser. His email: Ryan C. Gordon <icculus@icculus.org> parents: 501 diff changeset	400 else if (grab_state == QZ_VISIBLE_GRAB) {
04dcaf3da918 Massive Quartz input enhancements from Darrell Walisser. His email: Ryan C. Gordon <icculus@icculus.org> parents: 501 diff changeset	401
04dcaf3da918 Massive Quartz input enhancements from Darrell Walisser. His email: Ryan C. Gordon <icculus@icculus.org> parents: 501 diff changeset	402 CGAssociateMouseAndMouseCursorPosition (1);
04dcaf3da918 Massive Quartz input enhancements from Darrell Walisser. His email: Ryan C. Gordon <icculus@icculus.org> parents: 501 diff changeset	403 }
04dcaf3da918 Massive Quartz input enhancements from Darrell Walisser. His email: Ryan C. Gordon <icculus@icculus.org> parents: 501 diff changeset	404 else {
04dcaf3da918 Massive Quartz input enhancements from Darrell Walisser. His email: Ryan C. Gordon <icculus@icculus.org> parents: 501 diff changeset	405 assert( grab_state == QZ_INVISIBLE_GRAB );
04dcaf3da918 Massive Quartz input enhancements from Darrell Walisser. His email: Ryan C. Gordon <icculus@icculus.org> parents: 501 diff changeset	406
04dcaf3da918 Massive Quartz input enhancements from Darrell Walisser. His email: Ryan C. Gordon <icculus@icculus.org> parents: 501 diff changeset	407 QZ_PrivateWarpCursor (this, SDL_VideoSurface->w / 2, SDL_VideoSurface->h / 2);
04dcaf3da918 Massive Quartz input enhancements from Darrell Walisser. His email: Ryan C. Gordon <icculus@icculus.org> parents: 501 diff changeset	408 CGAssociateMouseAndMouseCursorPosition (0);
04dcaf3da918 Massive Quartz input enhancements from Darrell Walisser. His email: Ryan C. Gordon <icculus@icculus.org> parents: 501 diff changeset	409 }
04dcaf3da918 Massive Quartz input enhancements from Darrell Walisser. His email: Ryan C. Gordon <icculus@icculus.org> parents: 501 diff changeset	410 }
04dcaf3da918 Massive Quartz input enhancements from Darrell Walisser. His email: Ryan C. Gordon <icculus@icculus.org> parents: 501 diff changeset	411
761 c5b2b6d2d1fe Date: Wed, 31 Dec 2003 21:55:30 +0100 Sam Lantinga <slouken@libsdl.org> parents: 683 diff changeset	412 SDL_GrabMode QZ_GrabInput (_THIS, SDL_GrabMode grab_mode) {
47 45b1c4303f87 Added initial support for Quartz video (thanks Darrell!) Sam Lantinga <slouken@lokigames.com> parents: diff changeset	413
563 04dcaf3da918 Massive Quartz input enhancements from Darrell Walisser. His email: Ryan C. Gordon <icculus@icculus.org> parents: 501 diff changeset	414 int doGrab = grab_mode & SDL_GRAB_ON;
04dcaf3da918 Massive Quartz input enhancements from Darrell Walisser. His email: Ryan C. Gordon <icculus@icculus.org> parents: 501 diff changeset	415 /int fullscreen = grab_mode & SDL_GRAB_FULLSCREEN;/
04dcaf3da918 Massive Quartz input enhancements from Darrell Walisser. His email: Ryan C. Gordon <icculus@icculus.org> parents: 501 diff changeset	416
04dcaf3da918 Massive Quartz input enhancements from Darrell Walisser. His email: Ryan C. Gordon <icculus@icculus.org> parents: 501 diff changeset	417 if ( this->screen == NULL ) {
04dcaf3da918 Massive Quartz input enhancements from Darrell Walisser. His email: Ryan C. Gordon <icculus@icculus.org> parents: 501 diff changeset	418 SDL_SetError ("QZ_GrabInput: screen is NULL");
04dcaf3da918 Massive Quartz input enhancements from Darrell Walisser. His email: Ryan C. Gordon <icculus@icculus.org> parents: 501 diff changeset	419 return SDL_GRAB_OFF;
47 45b1c4303f87 Added initial support for Quartz video (thanks Darrell!) Sam Lantinga <slouken@lokigames.com> parents: diff changeset	420 }
45b1c4303f87 Added initial support for Quartz video (thanks Darrell!) Sam Lantinga <slouken@lokigames.com> parents: diff changeset	421
563 04dcaf3da918 Massive Quartz input enhancements from Darrell Walisser. His email: Ryan C. Gordon <icculus@icculus.org> parents: 501 diff changeset	422 if ( ! video_set ) {
04dcaf3da918 Massive Quartz input enhancements from Darrell Walisser. His email: Ryan C. Gordon <icculus@icculus.org> parents: 501 diff changeset	423 /SDL_SetError ("QZ_GrabInput: video is not set, grab will take effect on mode switch"); /
04dcaf3da918 Massive Quartz input enhancements from Darrell Walisser. His email: Ryan C. Gordon <icculus@icculus.org> parents: 501 diff changeset	424 current_grab_mode = grab_mode;
04dcaf3da918 Massive Quartz input enhancements from Darrell Walisser. His email: Ryan C. Gordon <icculus@icculus.org> parents: 501 diff changeset	425 return grab_mode; /* Will be set later on mode switch */
04dcaf3da918 Massive Quartz input enhancements from Darrell Walisser. His email: Ryan C. Gordon <icculus@icculus.org> parents: 501 diff changeset	426 }
04dcaf3da918 Massive Quartz input enhancements from Darrell Walisser. His email: Ryan C. Gordon <icculus@icculus.org> parents: 501 diff changeset	427
04dcaf3da918 Massive Quartz input enhancements from Darrell Walisser. His email: Ryan C. Gordon <icculus@icculus.org> parents: 501 diff changeset	428 if ( grab_mode != SDL_GRAB_QUERY ) {
04dcaf3da918 Massive Quartz input enhancements from Darrell Walisser. His email: Ryan C. Gordon <icculus@icculus.org> parents: 501 diff changeset	429 if ( doGrab )
04dcaf3da918 Massive Quartz input enhancements from Darrell Walisser. His email: Ryan C. Gordon <icculus@icculus.org> parents: 501 diff changeset	430 QZ_ChangeGrabState (this, QZ_ENABLE_GRAB);
04dcaf3da918 Massive Quartz input enhancements from Darrell Walisser. His email: Ryan C. Gordon <icculus@icculus.org> parents: 501 diff changeset	431 else
04dcaf3da918 Massive Quartz input enhancements from Darrell Walisser. His email: Ryan C. Gordon <icculus@icculus.org> parents: 501 diff changeset	432 QZ_ChangeGrabState (this, QZ_DISABLE_GRAB);
04dcaf3da918 Massive Quartz input enhancements from Darrell Walisser. His email: Ryan C. Gordon <icculus@icculus.org> parents: 501 diff changeset	433
04dcaf3da918 Massive Quartz input enhancements from Darrell Walisser. His email: Ryan C. Gordon <icculus@icculus.org> parents: 501 diff changeset	434 current_grab_mode = doGrab ? SDL_GRAB_ON : SDL_GRAB_OFF;
04dcaf3da918 Massive Quartz input enhancements from Darrell Walisser. His email: Ryan C. Gordon <icculus@icculus.org> parents: 501 diff changeset	435 }
04dcaf3da918 Massive Quartz input enhancements from Darrell Walisser. His email: Ryan C. Gordon <icculus@icculus.org> parents: 501 diff changeset	436
501 74262d2647ca Lots of cleanups by Darrell, added the ability to resize Cocoa windows. Sam Lantinga <slouken@libsdl.org> parents: 390 diff changeset	437 return current_grab_mode;
47 45b1c4303f87 Added initial support for Quartz video (thanks Darrell!) Sam Lantinga <slouken@lokigames.com> parents: diff changeset	438 }

Mercurial > sdl-ios-xcode

annotate src/video/quartz/SDL_QuartzWM.m @ 3984:b74530a1dad6 SDL-1.2