1
0
mirror of https://git.tartarus.org/simon/putty.git synced 2025-03-21 22:28:37 -05:00

Add minimal Apple Event support -- we handle the 'aevt'/'quit' event.

[originally from svn r2668]
This commit is contained in:
Ben Harris 2003-01-20 22:55:08 +00:00
parent 3e09c5afa1
commit 85334a8317
2 changed files with 28 additions and 6 deletions

View File

@ -1,4 +1,4 @@
/* $Id: mac.c,v 1.33 2003/01/18 20:09:21 ben Exp $ */ /* $Id: mac.c,v 1.34 2003/01/20 22:55:08 ben Exp $ */
/* /*
* Copyright (c) 1999 Ben Harris * Copyright (c) 1999 Ben Harris
* All rights reserved. * All rights reserved.
@ -29,6 +29,8 @@
*/ */
#include <MacTypes.h> #include <MacTypes.h>
#include <AEDataModel.h>
#include <AppleEvents.h>
#include <Quickdraw.h> #include <Quickdraw.h>
#include <Fonts.h> #include <Fonts.h>
#include <MacWindows.h> #include <MacWindows.h>
@ -65,6 +67,7 @@ QDGlobals qd;
Session *sesslist; Session *sesslist;
static int cold = 1; static int cold = 1;
static int borednow = FALSE;
struct mac_gestalts mac_gestalts; struct mac_gestalts mac_gestalts;
static void mac_startup(void); static void mac_startup(void);
@ -86,8 +89,8 @@ static void mac_adjustcursor(RgnHandle);
static void mac_adjustmenus(void); static void mac_adjustmenus(void);
static void mac_closewindow(WindowPtr); static void mac_closewindow(WindowPtr);
static void mac_zoomwindow(WindowPtr, short); static void mac_zoomwindow(WindowPtr, short);
static void mac_shutdown(void);
#pragma noreturn (cleanup_exit) #pragma noreturn (cleanup_exit)
static pascal OSErr mac_aevt_quit(const AppleEvent *, AppleEvent *, long);
struct mac_windows { struct mac_windows {
WindowPtr about; WindowPtr about;
@ -169,10 +172,12 @@ static void mac_startup(void) {
mac_gestalts.uncvattr = (*ti)->tecUnicodeConverterFeatures; mac_gestalts.uncvattr = (*ti)->tecUnicodeConverterFeatures;
DisposeHandle((Handle)ti); DisposeHandle((Handle)ti);
} }
/* OpenTransport? */
#if 0 /* OpenTransport? */
if (Gestalt(gestaltOpenTpt, &mac_gestalts.otptattr) != noErr || if (Gestalt(gestaltOpenTpt, &mac_gestalts.otptattr) != noErr ||
(mac_gestalts.otptattr & gestaltOpenTptTCPPresentMask) == 0 || (mac_gestalts.otptattr & gestaltOpenTptTCPPresentMask) == 0 ||
ot_init() != noErr) ot_init() != noErr)
#endif
mac_gestalts.otptattr = 0; mac_gestalts.otptattr = 0;
if (mac_gestalts.otptattr == 0) { if (mac_gestalts.otptattr == 0) {
/* MacTCP? */ /* MacTCP? */
@ -224,6 +229,10 @@ static void mac_startup(void) {
LMSetCurDirStore(dirid); LMSetCurDirStore(dirid);
} }
} }
/* Install Apple Event handlers. */
AEInstallEventHandler(kCoreEventClass, kAEQuitApplication,
NewAEEventHandlerUPP(&mac_aevt_quit), 0, FALSE);
} }
static void mac_eventloop(void) { static void mac_eventloop(void) {
@ -238,6 +247,8 @@ static void mac_eventloop(void) {
mac_adjustcursor(cursrgn); mac_adjustcursor(cursrgn);
if (gotevent) if (gotevent)
mac_event(&event); mac_event(&event);
if (borednow)
cleanup_exit(0);
if (mac_gestalts.mtcpvers != 0) if (mac_gestalts.mtcpvers != 0)
mactcp_poll(); mactcp_poll();
if (mac_gestalts.otptattr != 0) if (mac_gestalts.otptattr != 0)
@ -304,6 +315,9 @@ static void mac_event(EventRecord *event) {
DIBadMount(pt, event->message); DIBadMount(pt, event->message);
} }
break; break;
case kHighLevelEvent:
AEProcessAppleEvent(event); /* errors? */
break;
} }
} }
@ -637,6 +651,14 @@ static void mac_adjustcursor(RgnHandle cursrgn) {
} }
} }
static pascal OSErr mac_aevt_quit(const AppleEvent *req, AppleEvent *reply,
long refcon)
{
borednow = 1;
return noErr;
}
void cleanup_exit(int status) void cleanup_exit(int status)
{ {

View File

@ -1,4 +1,4 @@
/* $Id: mac_res.r,v 1.20 2003/01/18 17:24:21 ben Exp $ */ /* $Id: mac_res.r,v 1.21 2003/01/20 22:55:08 ben Exp $ */
/* /*
* Copyright (c) 1999, 2002 Ben Harris * Copyright (c) 1999, 2002 Ben Harris
* All rights reserved. * All rights reserved.
@ -69,8 +69,8 @@ resource 'SIZE' (-1) {
dontGetFrontClicks, dontGetFrontClicks,
ignoreAppDiedEvents, ignoreAppDiedEvents,
is32BitCompatible, is32BitCompatible,
notHighLevelEventAware, isHighLevelEventAware,
onlyLocalHLEvents, localandRemoteHLEvents,
isStationeryAware, isStationeryAware,
dontUseTextEditServices, dontUseTextEditServices,
reserved, reserved,