diff options
| author | Miro Jurisic <meeroh@mit.edu> | 1999-05-27 20:48:41 +0000 |
|---|---|---|
| committer | Miro Jurisic <meeroh@mit.edu> | 1999-05-27 20:48:41 +0000 |
| commit | bcbbc106a28254cb10acdb88a3d0c90e1799d184 (patch) | |
| tree | 5fae5eb322a14ad4f471e57864194ba7d9542ae7 /src/mac/SAP | |
| parent | 0e6789171f43dd5c029aa76eb61050a51c8da9d4 (diff) | |
Removed metric buttload of old Mac crap that hasn't been used for years
git-svn-id: svn://anonsvn.mit.edu/krb5/trunk@11480 dc483132-0cff-0310-8789-dd5450dbe970
Diffstat (limited to 'src/mac/SAP')
| -rw-r--r-- | src/mac/SAP/ChangeLog | 18 | ||||
| -rw-r--r-- | src/mac/SAP/GSSforSAP.r | 114 | ||||
| -rw-r--r-- | src/mac/SAP/macSAPglue.c | 86 |
3 files changed, 0 insertions, 218 deletions
diff --git a/src/mac/SAP/ChangeLog b/src/mac/SAP/ChangeLog deleted file mode 100644 index c1fc92c4f..000000000 --- a/src/mac/SAP/ChangeLog +++ /dev/null @@ -1,18 +0,0 @@ -Fri Dec 20 12:35:32 1996 Marshall Vale <mjv@mit.edu> - - * GSSforSAP.r: Moved resources for the timebomb out to Rez - format for easier CVSing - * macSAPglue.c (__initializeSAPglue): Added new conditions to the - timebomb code so that it can identify individual applications - and not just fail globally. - -Tue Dec 17 13:53:36 1996 Theodore Y. Ts'o <tytso@mit.edu> - - * GSSforSAP.r: Fix expire time in the text resource to be June 1, - 1997. - -Fri Dec 13 14:58:20 1996 Theodore Y. Ts'o <tytso@mit.edu> - - * macSAPglue.c (__initializeSAPglue): Change the timebomb date to - be June 1, 1997. - diff --git a/src/mac/SAP/GSSforSAP.r b/src/mac/SAP/GSSforSAP.r deleted file mode 100644 index 1a3865ae8..000000000 --- a/src/mac/SAP/GSSforSAP.r +++ /dev/null @@ -1,114 +0,0 @@ -#include "Types.r" - -resource 'DITL' (135, nonpurgeable) { - { /* array DITLarray: 2 elements */ - /* [1] */ - {96, 292, 116, 360}, - Button { - enabled, - "OK" - }, - /* [2] */ - {16, 64, 84, 360}, - StaticText { - disabled, - "This version of the SAP client has expir" - "ed. Please consult: http://web.mit.edu/r" - "eeng/www/saphelp/ for instructions on ob" - "taining a new version." - } - } -}; - -resource 'DITL' (136, nonpurgeable) { - { /* array DITLarray: 2 elements */ - /* [1] */ - {116, 300, 136, 368}, - Button { - enabled, - "OK" - }, - /* [2] */ - {16, 64, 100, 360}, - StaticText { - disabled, - "This version of the SAP client will expi" - "re on January 15, 1997. Please consult: " - "http://web.mit.edu/reeng/www/saphelp/ fo" - "r instructions on obtaining a new versio" - "n when it is available." - } - } -}; - -data 'DLGX' (135) { - $"0743 6869 6361 676F 0000 0000 0000 0000" /* .Chicago........ */ - $"0000 0000 0000 0000 0000 0000 0000 0000" /* ................ */ - $"0000 0000 0000 0000 0000 0000 0000 0000" /* ................ */ - $"0000 0000 0000 0000 0000 0000 0000 0000" /* ................ */ - $"000C 0000 0000 0001 0004 0004 0000 0000" /* ................ */ - $"0002 0000 0000 0000 0000 0000 0000 0006" /* ................ */ - $"0000 0000 0000 0000 0000" /* .......... */ -}; - -data 'DLGX' (136) { - $"0743 6869 6361 676F 0000 0000 0000 0000" /* .Chicago........ */ - $"0000 0000 0000 0000 0000 0000 0000 0000" /* ................ */ - $"0000 0000 0000 0000 0000 0000 0000 0000" /* ................ */ - $"0000 0000 0000 0000 0000 0000 0000 0000" /* ................ */ - $"000C 0000 0000 0001 0004 0004 0000 0000" /* ................ */ - $"0002 0000 0000 0000 0000 0000 0000 0006" /* ................ */ - $"0000 0000 0000 0000 0000" /* .......... */ -}; - -data 'ictb' (136) { - $"0000 0000 0000 0000" /* ........ */ -}; - -resource 'ALRT' (135, nonpurgeable) { - {383, 390, 511, 770}, - 135, - { /* array: 4 elements */ - /* [1] */ - OK, visible, sound1, - /* [2] */ - OK, visible, sound1, - /* [3] */ - OK, visible, sound1, - /* [4] */ - OK, visible, sound1 - }, - alertPositionParentWindowScreen -}; - -resource 'ALRT' (136, nonpurgeable) { - {383, 390, 531, 774}, - 136, - { /* array: 4 elements */ - /* [1] */ - OK, visible, sound1, - /* [2] */ - OK, visible, sound1, - /* [3] */ - OK, visible, sound1, - /* [4] */ - OK, visible, sound1 - }, - alertPositionParentWindowScreen -}; - -resource 'actb' (136) { - { /* array ColorSpec: 5 elements */ - /* [1] */ - wContentColor, 65535, 65535, 65535, - /* [2] */ - wFrameColor, 0, 0, 0, - /* [3] */ - wTextColor, 0, 0, 0, - /* [4] */ - wHiliteColor, 0, 0, 0, - /* [5] */ - wTitleBarColor, 65535, 65535, 65535 - } -}; - diff --git a/src/mac/SAP/macSAPglue.c b/src/mac/SAP/macSAPglue.c deleted file mode 100644 index 11d3ff720..000000000 --- a/src/mac/SAP/macSAPglue.c +++ /dev/null @@ -1,86 +0,0 @@ -#include <CodeFragments.h> -#include <Processes.h> - -#define TBALERTID 135 -#define TB30ALERTID 136 - -OSErr __initializeSAPglue(InitBlockPtr ibp); - -OSErr __initializeSAPglue(InitBlockPtr ibp) -{ - OSErr err = noErr; - short fileRefNum, theCurrentRes; - DateTimeRec goalTimeBomb; - long currentTime, goalTimeBombInSecs; - ProcessSerialNumber thePSN; - ProcessInfoRec thePIR; - - /* Do normal init of the shared library */ - __initialize(); - - /* Start our hack by saving the current resource ref*/ - - theCurrentRes = CurResFile(); - - if (ibp->fragLocator.where == kDataForkCFragLocator) - { - fileRefNum = FSpOpenResFile(ibp->fragLocator.u.onDisk.fileSpec, fsRdPerm); - - if ( fileRefNum == -1 ) - err = ResError(); - } - - /* We assume that the current process is the one calling us. Good bet */ - err = GetCurrentProcess( &thePSN ); - - if ( err == noErr ) - { - GetProcessInformation( &thePSN, &thePIR ); - - if ( thePIR.processType == 'APPL' ) - { - switch ( thePIR.processSignature ) - { - /* Here we case off each application based on its type code */ - case 'MIDA': - /* This is SAP (supposedly) */ - - goalTimeBomb.year = 1997; - goalTimeBomb.month = 6; - goalTimeBomb.day = 1; - goalTimeBomb.hour = 0; /* Let's use midnight for simplicity */ - goalTimeBomb.minute = 0; - goalTimeBomb.second = 0; - - DateToSeconds( &goalTimeBomb, &goalTimeBombInSecs ); - - GetDateTime(¤tTime); - - if ( (goalTimeBombInSecs - currentTime) <= 0 ) - { - StopAlert(TBALERTID, NULL); - /* if we just reported an error, then the SAP client would continue running. We - don't want that so instead we'll just call ExitToShell and hope it doesn't - leave anything hangin. If we just wanted the error, report non-zero */ - //err = -1; - ExitToShell(); - } - else - if ( (goalTimeBombInSecs - currentTime) < 1209600 ) - { /* num seconds in 14 days */ - NoteAlert(TB30ALERTID, NULL); - } - break; - default: - break; - } - } - } - if ( fileRefNum != -1 ) - CloseResFile( fileRefNum ); - - UseResFile( theCurrentRes ); - - return err; -} - |
