1
0
mirror of https://git.tartarus.org/simon/putty.git synced 2025-07-02 03:52:49 -05:00

Second work-in-progress MacTCP commit. We can now open a connection, but

not transfer any data across it.

[originally from svn r2456]
This commit is contained in:
Ben Harris
2003-01-05 10:52:56 +00:00
parent 907a420878
commit ac85d9b8c9
4 changed files with 311 additions and 19 deletions

View File

@ -1,4 +1,4 @@
/* $Id: mac.c,v 1.17 2003/01/04 12:45:11 ben Exp $ */
/* $Id: mac.c,v 1.18 2003/01/05 10:52:56 ben Exp $ */
/*
* Copyright (c) 1999 Ben Harris
* All rights reserved.
@ -167,6 +167,8 @@ static void mac_startup(void) {
DisposeHandle((Handle)ti);
}
mactcp_init();
/* We've been tested with the Appearance Manager */
if (mac_gestalts.apprvers != 0)
RegisterAppearanceClient();
@ -182,6 +184,9 @@ static void mac_startup(void) {
windows.about = NULL;
windows.licence = NULL;
default_protocol = DEFAULT_PROTOCOL;
default_port = DEFAULT_PORT;
{
short vol;
long dirid;
@ -597,6 +602,7 @@ static void mac_shutdown(void) {
if (mac_gestalts.encvvers != 0)
TerminateUnicodeConverter();
#endif
mactcp_shutdown();
exit(0);
}
@ -626,6 +632,20 @@ void modalfatalbox(char *fmt, ...) {
exit(1);
}
/* This should only kill the current session, not the whole application. */
void connection_fatal(void *fontend, 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, NULL);
exit(1);
}
/*
* Local Variables:
* c-file-style: "simon"