nhyatt/putty-source
1
0
Fork 0
mirror of https://git.tartarus.org/simon/putty.git synced 2025-07-12 08:43:53 -05:00
Code Issues Projects Releases Wiki Activity

Add Apple Event handlers for 'aevt'/'oapp', 'aevt'/'odoc' and 'aevt'/'pdoc'.

Browse Source 
None of them does anything useful yet (though the odoc one tries to).

[originally from svn r2700]
This commit is contained in:
Ben Harris
2003-01-23 22:57:43 +00:00
parent 5b79eedce2
commit 596f6e9787
3 changed files with 116 additions and 18 deletions
Download Patch File Download Diff File Expand all files Collapse all files

112
mac/macdlg.c
View File

@ -1,4 +1,4 @@
/* $Id: macdlg.c,v 1.5 2003/01/18 20:52:59 ben Exp $ */
/* $Id: macdlg.c,v 1.6 2003/01/23 22:57:43 ben Exp $ */
/*
* Copyright (c) 2002 Ben Harris
* All rights reserved.
@ -30,6 +30,8 @@
*/
#include <MacTypes.h>
#include <AEDataModel.h>
#include <AppleEvents.h>
#include <Dialogs.h>
#include <Resources.h>
#include <StandardFile.h>
@ -60,30 +62,35 @@ void mac_newsession(void)
ShowWindow(s->settings_window);
}
void mac_opensession(void) {
static OSErr mac_opensessionfrom(FSSpec *fss)
{
FInfo fi;
Session *s;
StandardFileReply sfr;
static const OSType sftypes[] = { 'Sess', 0, 0, 0 };
void *sesshandle;
int i;
OSErr err;
s = smalloc(sizeof(*s));
memset(s, 0, sizeof(*s));
StandardGetFile(NULL, 1, sftypes, &sfr);
if (!sfr.sfGood) goto fail;
sesshandle = open_settings_r_fsp(&sfr.sfFile);
if (sesshandle == NULL) goto fail;
load_open_settings(sesshandle, TRUE, &s->cfg);
close_settings_r(sesshandle);
if (sfr.sfFlags & kIsStationery)
err = FSpGetFInfo(fss, &fi);
if (err != noErr) return err;
if (fi.fdFlags & kIsStationery)
s->hasfile = FALSE;
else {
s->hasfile = TRUE;
s->savefile = sfr.sfFile;
s->savefile = *fss;
}
sesshandle = open_settings_r_fsp(fss);
if (sesshandle == NULL) {
/* XXX need a way to pass up an error number */
err = -9999;
goto fail;
}
load_open_settings(sesshandle, TRUE, &s->cfg);
close_settings_r(sesshandle);
/*
* Select protocol. This is farmed out into a table in a
* separate file to enable an ssh-free variant.
@ -98,11 +105,22 @@ void mac_opensession(void) {
fatalbox("Unsupported protocol number found");
}
mac_startsession(s);
return;
return noErr;
fail:
sfree(s);
return;
return err;
}
void mac_opensession(void) {
StandardFileReply sfr;
static const OSType sftypes[] = { 'Sess', 0, 0, 0 };
StandardGetFile(NULL, 1, sftypes, &sfr);
if (!sfr.sfGood) return;
mac_opensessionfrom(&sfr.sfFile);
/* XXX handle error */
}
void mac_savesession(void)
@ -139,6 +157,70 @@ void mac_savesessionas(void)
s->savefile = sfr.sfFile;
}
pascal OSErr mac_aevt_oapp(const AppleEvent *req, AppleEvent *reply,
long refcon)
{
DescType type;
Size size;
if (AEGetAttributePtr(req, keyMissedKeywordAttr, typeWildCard,
&type, NULL, 0, &size) == noErr)
return errAEParamMissed;
/* XXX we should do something here. */
return noErr;
}
pascal OSErr mac_aevt_odoc(const AppleEvent *req, AppleEvent *reply,
long refcon)
{
DescType type;
AEKeyword keywd;
Size size;
AEDescList docs = { typeNull, NULL };
OSErr err;
long ndocs, i;
FSSpec fss;
err = AEGetParamDesc(req, keyDirectObject, typeAEList, &docs);
if (err != noErr) goto out;
if (AEGetAttributePtr(req, keyMissedKeywordAttr, typeWildCard,
&type, NULL, 0, &size) == noErr) {
err = errAEParamMissed;
goto out;
}
err = AECountItems(&docs, &ndocs);
if (err != noErr) goto out;
for (i = 0; i < ndocs; i++) {
err = AEGetNthPtr(&docs, i, typeFSS, &keywd, &type, &fss, sizeof(fss),
&size);
if (err != noErr) goto out;
err = mac_opensessionfrom(&fss);
if (err != noErr) goto out;
}
out:
AEDisposeDesc(&docs);
return err;
}
pascal OSErr mac_aevt_pdoc(const AppleEvent *req, AppleEvent *reply,
long refcon)
{
DescType type;
Size size;
if (AEGetAttributePtr(req, keyMissedKeywordAttr, typeWildCard,
&type, NULL, 0, &size) == noErr)
return errAEParamMissed;
/* We can't meaningfully do anything here. */
return errAEEventNotHandled;
}
void mac_activatedlg(WindowPtr window, EventRecord *event)
{
DialogItemType itemtype;