mirror of
https://git.tartarus.org/simon/putty.git
synced 2025-01-10 18:07:59 +00:00
c4eebb49a9
This doesn't include any mkfiles.pl glue, and is missing one or two other fixes. The terminal emulator is kind of working, though, as, I believe, is the store module. Everything else is yet to be done. [originally from svn r2226]
545 lines
13 KiB
C
545 lines
13 KiB
C
/* $Id: mac.c,v 1.1 2002/11/19 02:13:46 ben Exp $ */
|
|
/*
|
|
* Copyright (c) 1999 Ben Harris
|
|
* All rights reserved.
|
|
*
|
|
* Permission is hereby granted, free of charge, to any person
|
|
* obtaining a copy of this software and associated documentation
|
|
* files (the "Software"), to deal in the Software without
|
|
* restriction, including without limitation the rights to use,
|
|
* copy, modify, merge, publish, distribute, sublicense, and/or
|
|
* sell copies of the Software, and to permit persons to whom the
|
|
* Software is furnished to do so, subject to the following
|
|
* conditions:
|
|
*
|
|
* The above copyright notice and this permission notice shall be
|
|
* included in all copies or substantial portions of the Software.
|
|
*
|
|
* THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND,
|
|
* EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF
|
|
* MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND
|
|
* NONINFRINGEMENT. IN NO EVENT SHALL THE AUTHORS BE LIABLE FOR
|
|
* ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN AN ACTION OF
|
|
* CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN
|
|
* CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE
|
|
* SOFTWARE.
|
|
*/
|
|
/*
|
|
* mac.c -- miscellaneous Mac-specific routines
|
|
*/
|
|
|
|
#include <MacTypes.h>
|
|
#include <Quickdraw.h>
|
|
#include <Fonts.h>
|
|
#include <MacWindows.h>
|
|
#include <Menus.h>
|
|
#include <TextEdit.h>
|
|
#include <Appearance.h>
|
|
#include <CodeFragments.h>
|
|
#include <Dialogs.h>
|
|
#include <Devices.h>
|
|
#include <DiskInit.h>
|
|
#include <Gestalt.h>
|
|
#include <Resources.h>
|
|
#include <Threads.h>
|
|
#include <ToolUtils.h>
|
|
|
|
#include <assert.h>
|
|
#include <limits.h>
|
|
#include <stdarg.h>
|
|
#include <stdlib.h> /* putty.h needs size_t */
|
|
#include <stdio.h> /* for vsprintf */
|
|
|
|
#define PUTTY_DO_GLOBALS
|
|
|
|
#include "macresid.h"
|
|
#include "putty.h"
|
|
#include "mac.h"
|
|
|
|
QDGlobals qd;
|
|
|
|
static int cold = 1;
|
|
struct mac_gestalts mac_gestalts;
|
|
|
|
static void mac_startup(void);
|
|
static void mac_eventloop(void);
|
|
#pragma noreturn (mac_eventloop)
|
|
static void mac_event(EventRecord *);
|
|
static void mac_contentclick(WindowPtr, EventRecord *);
|
|
static void mac_growwindow(WindowPtr, EventRecord *);
|
|
static void mac_activatewindow(WindowPtr, EventRecord *);
|
|
static void mac_activateabout(WindowPtr, EventRecord *);
|
|
static void mac_updatewindow(WindowPtr);
|
|
static void mac_keypress(EventRecord *);
|
|
static int mac_windowtype(WindowPtr);
|
|
static void mac_menucommand(long);
|
|
static void mac_openabout(void);
|
|
static void mac_adjustcursor(RgnHandle);
|
|
static void mac_adjustmenus(void);
|
|
static void mac_closewindow(WindowPtr);
|
|
static void mac_zoomwindow(WindowPtr, short);
|
|
static void mac_shutdown(void);
|
|
#pragma noreturn (mac_shutdown)
|
|
|
|
struct mac_windows {
|
|
WindowPtr about;
|
|
WindowPtr licence;
|
|
};
|
|
|
|
struct mac_windows windows;
|
|
|
|
int main (int argc, char **argv) {
|
|
|
|
mac_startup();
|
|
mac_eventloop();
|
|
}
|
|
|
|
#pragma noreturn (main)
|
|
|
|
static void mac_startup(void) {
|
|
Handle menuBar;
|
|
|
|
/* Init Memory Manager */
|
|
MaxApplZone();
|
|
/* Init QuickDraw */
|
|
InitGraf(&qd.thePort);
|
|
/* Init Font Manager */
|
|
InitFonts();
|
|
/* Init Window Manager */
|
|
InitWindows();
|
|
/* Init Menu Manager */
|
|
InitMenus();
|
|
/* Init TextEdit */
|
|
TEInit();
|
|
/* Init Dialog Manager */
|
|
InitDialogs(nil);
|
|
cold = 0;
|
|
|
|
/* Check for the Thread Manager. Bail out if it's not there. */
|
|
if (Gestalt(gestaltThreadMgrAttr, &mac_gestalts.thdsattr) != noErr ||
|
|
!(mac_gestalts.thdsattr & (1 << gestaltThreadMgrPresent)) ||
|
|
&NewThread == kUnresolvedCFragSymbolAddress)
|
|
fatalbox("PuTTY requires the Thread Manager in order to operate. "
|
|
"The Thread Manager can be obtained from Apple Software "
|
|
"Updates.");
|
|
/* Find out if we've got Color Quickdraw */
|
|
if (Gestalt(gestaltQuickdrawVersion, &mac_gestalts.qdvers) != noErr)
|
|
mac_gestalts.qdvers = gestaltOriginalQD;
|
|
/* ... and the Appearance Manager? */
|
|
if (Gestalt(gestaltAppearanceVersion, &mac_gestalts.apprvers) != noErr)
|
|
if (Gestalt(gestaltAppearanceAttr, NULL) == noErr)
|
|
mac_gestalts.apprvers = 0x0100;
|
|
else
|
|
mac_gestalts.apprvers = 0;
|
|
#if TARGET_RT_MAC_CFM
|
|
/* Paranoia: Did we manage to pull in AppearanceLib? */
|
|
if (&RegisterAppearanceClient == kUnresolvedCFragSymbolAddress)
|
|
mac_gestalts.apprvers = 0;
|
|
#endif
|
|
/* Mac OS 8.5 Control Manager (proportional scrollbars)? */
|
|
if (Gestalt(gestaltControlMgrAttr, &mac_gestalts.cntlattr) != noErr)
|
|
mac_gestalts.cntlattr = 0;
|
|
/* Mac OS 8.5 Window Manager? */
|
|
if (Gestalt(gestaltWindowMgrAttr, &mac_gestalts.windattr) != noErr)
|
|
mac_gestalts.windattr = 0;
|
|
|
|
/* We've been tested with the Appearance Manager */
|
|
if (mac_gestalts.apprvers != 0)
|
|
RegisterAppearanceClient();
|
|
|
|
menuBar = GetNewMBar(128);
|
|
if (menuBar == NULL)
|
|
fatalbox("Unable to create menu bar.");
|
|
SetMenuBar(menuBar);
|
|
AppendResMenu(GetMenuHandle(mApple), 'DRVR');
|
|
mac_adjustmenus();
|
|
DrawMenuBar();
|
|
InitCursor();
|
|
windows.about = NULL;
|
|
windows.licence = NULL;
|
|
|
|
init_ucs();
|
|
}
|
|
|
|
static void mac_eventloop(void) {
|
|
Boolean gotevent;
|
|
EventRecord event;
|
|
RgnHandle cursrgn;
|
|
|
|
cursrgn = NewRgn();
|
|
for (;;) {
|
|
mac_adjustcursor(cursrgn);
|
|
gotevent = WaitNextEvent(everyEvent, &event, LONG_MAX, cursrgn);
|
|
mac_adjustcursor(cursrgn);
|
|
if (gotevent)
|
|
mac_event(&event);
|
|
YieldToAnyThread();
|
|
}
|
|
DisposeRgn(cursrgn);
|
|
}
|
|
|
|
static void mac_event(EventRecord *event) {
|
|
short part;
|
|
WindowPtr window;
|
|
Point pt;
|
|
|
|
switch (event->what) {
|
|
case mouseDown:
|
|
part = FindWindow(event->where, &window);
|
|
switch (part) {
|
|
case inMenuBar:
|
|
mac_adjustmenus();
|
|
mac_menucommand(MenuSelect(event->where));
|
|
break;
|
|
case inSysWindow:
|
|
SystemClick(event, window);
|
|
break;
|
|
case inContent:
|
|
if (window != FrontWindow())
|
|
/* XXX: check for movable modal dboxes? */
|
|
SelectWindow(window);
|
|
else
|
|
mac_contentclick(window, event);
|
|
break;
|
|
case inGoAway:
|
|
if (TrackGoAway(window, event->where))
|
|
mac_closewindow(window);
|
|
break;
|
|
case inDrag:
|
|
/* XXX: moveable modal check? */
|
|
DragWindow(window, event->where, &qd.screenBits.bounds);
|
|
break;
|
|
case inGrow:
|
|
mac_growwindow(window, event);
|
|
break;
|
|
case inZoomIn:
|
|
case inZoomOut:
|
|
if (TrackBox(window, event->where, part))
|
|
mac_zoomwindow(window, part);
|
|
break;
|
|
}
|
|
break;
|
|
case keyDown:
|
|
case autoKey:
|
|
mac_keypress(event);
|
|
break;
|
|
case activateEvt:
|
|
mac_activatewindow((WindowPtr)event->message, event);
|
|
break;
|
|
case updateEvt:
|
|
mac_updatewindow((WindowPtr)event->message);
|
|
break;
|
|
case diskEvt:
|
|
if (HiWord(event->message) != noErr) {
|
|
SetPt(&pt, 120, 120);
|
|
DIBadMount(pt, event->message);
|
|
}
|
|
break;
|
|
}
|
|
}
|
|
|
|
static void mac_contentclick(WindowPtr window, EventRecord *event) {
|
|
short item;
|
|
|
|
switch (mac_windowtype(window)) {
|
|
case wTerminal:
|
|
mac_clickterm(window, event);
|
|
break;
|
|
case wAbout:
|
|
if (DialogSelect(event, &(DialogPtr)window, &item))
|
|
switch (item) {
|
|
case wiAboutLicence:
|
|
/* XXX: Do something */
|
|
break;
|
|
}
|
|
break;
|
|
}
|
|
}
|
|
|
|
static void mac_growwindow(WindowPtr window, EventRecord *event) {
|
|
|
|
switch (mac_windowtype(window)) {
|
|
case wTerminal:
|
|
mac_growterm(window, event);
|
|
}
|
|
}
|
|
|
|
static void mac_activatewindow(WindowPtr window, EventRecord *event) {
|
|
int active;
|
|
|
|
active = (event->modifiers & activeFlag) != 0;
|
|
mac_adjustmenus();
|
|
switch (mac_windowtype(window)) {
|
|
case wTerminal:
|
|
mac_activateterm(window, active);
|
|
break;
|
|
case wAbout:
|
|
mac_activateabout(window, event);
|
|
break;
|
|
}
|
|
}
|
|
|
|
static void mac_activateabout(WindowPtr window, EventRecord *event) {
|
|
DialogItemType itemtype;
|
|
Handle itemhandle;
|
|
short item;
|
|
Rect itemrect;
|
|
int active;
|
|
|
|
active = (event->modifiers & activeFlag) != 0;
|
|
GetDialogItem(window, wiAboutLicence, &itemtype, &itemhandle, &itemrect);
|
|
HiliteControl((ControlHandle)itemhandle, active ? 0 : 255);
|
|
DialogSelect(event, &window, &item);
|
|
}
|
|
|
|
static void mac_updatewindow(WindowPtr window) {
|
|
|
|
switch (mac_windowtype(window)) {
|
|
case wTerminal:
|
|
mac_updateterm(window);
|
|
break;
|
|
case wAbout:
|
|
BeginUpdate(window);
|
|
UpdateDialog(window, window->visRgn);
|
|
EndUpdate(window);
|
|
break;
|
|
case wLicence:
|
|
/* Do something */
|
|
break;
|
|
}
|
|
}
|
|
|
|
/*
|
|
* Work out what kind of window we're dealing with.
|
|
* Concept shamelessly nicked from SurfWriter.
|
|
*/
|
|
static int mac_windowtype(WindowPtr window) {
|
|
int kind;
|
|
|
|
if (window == NULL)
|
|
return wNone;
|
|
kind = ((WindowPeek)window)->windowKind;
|
|
if (kind < 0)
|
|
return wDA;
|
|
if (GetWVariant(window) == zoomDocProc)
|
|
return wTerminal;
|
|
return GetWRefCon(window);
|
|
}
|
|
|
|
/*
|
|
* Handle a key press
|
|
*/
|
|
static void mac_keypress(EventRecord *event) {
|
|
WindowPtr window;
|
|
|
|
window = FrontWindow();
|
|
/*
|
|
* Check for a command-key combination, but ignore it if it counts
|
|
* as a meta-key combination and we're in a terminal window.
|
|
*/
|
|
if (event->what == keyDown && (event->modifiers & cmdKey) /*&&
|
|
!((event->modifiers & cfg.meta_modifiers) == cfg.meta_modifiers &&
|
|
mac_windowtype(window) == wTerminal)*/) {
|
|
mac_adjustmenus();
|
|
mac_menucommand(MenuKey(event->message & charCodeMask));
|
|
} else {
|
|
switch (mac_windowtype(window)) {
|
|
case wTerminal:
|
|
mac_keyterm(window, event);
|
|
break;
|
|
}
|
|
}
|
|
}
|
|
|
|
static void mac_menucommand(long result) {
|
|
short menu, item;
|
|
Str255 da;
|
|
WindowPtr window;
|
|
|
|
menu = HiWord(result);
|
|
item = LoWord(result);
|
|
window = FrontWindow();
|
|
/* Things which do the same whatever window we're in. */
|
|
switch (menu) {
|
|
case mApple:
|
|
switch (item) {
|
|
case iAbout:
|
|
mac_openabout();
|
|
goto done;
|
|
default:
|
|
GetMenuItemText(GetMenuHandle(mApple), item, da);
|
|
OpenDeskAcc(da);
|
|
goto done;
|
|
}
|
|
break;
|
|
case mFile:
|
|
switch (item) {
|
|
case iNew:
|
|
mac_newsession();
|
|
goto done;
|
|
case iClose:
|
|
mac_closewindow(window);
|
|
goto done;
|
|
case iQuit:
|
|
mac_shutdown();
|
|
goto done;
|
|
}
|
|
break;
|
|
}
|
|
/* If we get here, handling is up to window-specific code. */
|
|
switch (mac_windowtype(window)) {
|
|
case wTerminal:
|
|
mac_menuterm(window, menu, item);
|
|
break;
|
|
}
|
|
done:
|
|
HiliteMenu(0);
|
|
}
|
|
|
|
static void mac_openabout(void) {
|
|
DialogItemType itemtype;
|
|
Handle item;
|
|
VersRecHndl vers;
|
|
Rect box;
|
|
StringPtr longvers;
|
|
|
|
if (windows.about)
|
|
SelectWindow(windows.about);
|
|
else {
|
|
windows.about = GetNewDialog(wAbout, NULL, (WindowPtr)-1);
|
|
/* XXX check we're using the right resource file? */
|
|
vers = (VersRecHndl)GetResource('vers', 1);
|
|
assert(vers != NULL && *vers != NULL);
|
|
longvers = (*vers)->shortVersion + (*vers)->shortVersion[0] + 1;
|
|
GetDialogItem(windows.about, wiAboutVersion, &itemtype, &item, &box);
|
|
assert(itemtype & kStaticTextDialogItem);
|
|
SetDialogItemText(item, longvers);
|
|
ShowWindow(windows.about);
|
|
}
|
|
}
|
|
|
|
static void mac_closewindow(WindowPtr window) {
|
|
|
|
switch (mac_windowtype(window)) {
|
|
case wDA:
|
|
CloseDeskAcc(((WindowPeek)window)->windowKind);
|
|
break;
|
|
case wTerminal:
|
|
/* FIXME: end session and stuff */
|
|
break;
|
|
case wAbout:
|
|
windows.about = NULL;
|
|
CloseWindow(window);
|
|
break;
|
|
default:
|
|
CloseWindow(window);
|
|
break;
|
|
}
|
|
}
|
|
|
|
static void mac_zoomwindow(WindowPtr window, short part) {
|
|
|
|
/* FIXME: do something */
|
|
}
|
|
|
|
/*
|
|
* Make the menus look right before the user gets to see them.
|
|
*/
|
|
static void mac_adjustmenus(void) {
|
|
WindowPtr window;
|
|
MenuHandle menu;
|
|
|
|
window = FrontWindow();
|
|
menu = GetMenuHandle(mApple);
|
|
EnableItem(menu, 0);
|
|
EnableItem(menu, iAbout);
|
|
|
|
menu = GetMenuHandle(mFile);
|
|
EnableItem(menu, 0);
|
|
EnableItem(menu, iNew);
|
|
if (window != NULL)
|
|
EnableItem(menu, iClose);
|
|
else
|
|
DisableItem(menu, iClose);
|
|
EnableItem(menu, iQuit);
|
|
|
|
switch (mac_windowtype(window)) {
|
|
case wTerminal:
|
|
mac_adjusttermmenus(window);
|
|
break;
|
|
default:
|
|
menu = GetMenuHandle(mEdit);
|
|
DisableItem(menu, 0);
|
|
break;
|
|
}
|
|
DrawMenuBar();
|
|
}
|
|
|
|
/*
|
|
* Make sure the right cursor's being displayed.
|
|
*/
|
|
static void mac_adjustcursor(RgnHandle cursrgn) {
|
|
Point mouse;
|
|
WindowPtr window, front;
|
|
short part;
|
|
|
|
GetMouse(&mouse);
|
|
LocalToGlobal(&mouse);
|
|
part = FindWindow(mouse, &window);
|
|
front = FrontWindow();
|
|
if (part != inContent || window == NULL || window != front) {
|
|
/* Cursor isn't in the front window, so switch to arrow */
|
|
SetCursor(&qd.arrow);
|
|
SetRectRgn(cursrgn, SHRT_MIN, SHRT_MIN, SHRT_MAX, SHRT_MAX);
|
|
if (front != NULL)
|
|
DiffRgn(cursrgn, front->visRgn, cursrgn);
|
|
} else {
|
|
switch (mac_windowtype(window)) {
|
|
case wTerminal:
|
|
mac_adjusttermcursor(window, mouse, cursrgn);
|
|
break;
|
|
default:
|
|
SetCursor(&qd.arrow);
|
|
CopyRgn(window->visRgn, cursrgn);
|
|
break;
|
|
}
|
|
}
|
|
}
|
|
|
|
static void mac_shutdown(void) {
|
|
|
|
exit(0);
|
|
}
|
|
|
|
void fatalbox(char *fmt, ...) {
|
|
va_list ap;
|
|
Str255 stuff;
|
|
|
|
va_start(ap, fmt);
|
|
/* We'd like stuff to be a Pascal string */
|
|
stuff[0] = vsprintf((char *)(&stuff[1]), fmt, ap);
|
|
va_end(ap);
|
|
ParamText(stuff, NULL, NULL, NULL);
|
|
StopAlert(128, nil);
|
|
exit(1);
|
|
}
|
|
|
|
void modalfatalbox(char *fmt, ...) {
|
|
va_list ap;
|
|
Str255 stuff;
|
|
|
|
va_start(ap, fmt);
|
|
/* We'd like stuff to be a Pascal string */
|
|
stuff[0] = vsprintf((char *)(&stuff[1]), fmt, ap);
|
|
va_end(ap);
|
|
ParamText(stuff, NULL, NULL, NULL);
|
|
StopAlert(128, nil);
|
|
exit(1);
|
|
}
|
|
|
|
/*
|
|
* Local Variables:
|
|
* c-file-style: "simon"
|
|
* End:
|
|
*/
|