blob: dc331340a31b80dd29334467975641e42fadaf03 [file] [log] [blame]
Jack Jansen2d1306b2000-04-07 09:10:49 +00001/*
2 * Generated with the GUSIConfig application and then hand-modified by jack.
3 */
4
5#define GUSI_SOURCE
6#include <GUSIConfig.h>
7#include <sys/cdefs.h>
Jack Jansenee081042000-04-21 23:53:37 +00008#include <Resources.h>
Jack Jansen2d1306b2000-04-07 09:10:49 +00009
10#include "Python.h"
11#include "macglue.h"
Jack Jansenee081042000-04-21 23:53:37 +000012#include "pythonresources.h"
Jack Jansen2d1306b2000-04-07 09:10:49 +000013
14static void
15PyMac_GUSISpin(bool wait)
16{
17 static Boolean inForeground = true;
18 int maxsleep = 6; /* 6 ticks is "normal" sleeptime */
19
20 if (PyMac_ConsoleIsDead) return;
21
22 if ( !wait )
23 maxsleep = 0;
24
25 PyMac_DoYield(maxsleep, 0); /* XXXX or is it safe to call python here? */
26}
27
28
29/* Declarations of Socket Factories */
30
31__BEGIN_DECLS
32void GUSIwithInetSockets();
33void GUSIwithLocalSockets();
34void GUSIwithMTInetSockets();
35void GUSIwithMTTcpSockets();
36void GUSIwithMTUdpSockets();
37void GUSIwithOTInetSockets();
38void GUSIwithOTTcpSockets();
39void GUSIwithOTUdpSockets();
40void GUSIwithPPCSockets();
41void GUSISetupFactories();
42__END_DECLS
43
44/* Configure Socket Factories */
45
46void GUSISetupFactories()
47{
48#ifdef GUSISetupFactories_BeginHook
49 GUSISetupFactories_BeginHook
50#endif
Jack Jansen9cfce182000-05-10 15:15:54 +000051// GUSIwithInetSockets();
52 GUSIwithMTInetSockets();
Jack Jansen2d1306b2000-04-07 09:10:49 +000053#ifdef GUSISetupFactories_EndHook
54 GUSISetupFactories_EndHook
55#endif
56}
57
58/* Declarations of File Devices */
59
60__BEGIN_DECLS
61void GUSIwithDConSockets();
62void GUSIwithNullSockets();
63void GUSISetupDevices();
64__END_DECLS
65
66/* Configure File Devices */
67
68void GUSISetupDevices()
69{
70#ifdef GUSISetupDevices_BeginHook
71 GUSISetupDevices_BeginHook
72#endif
73#ifdef GUSISetupDevices_EndHook
74 GUSISetupDevices_EndHook
75#endif
76}
77
78#ifndef __cplusplus
79#error GUSISetupConfig() needs to be written in C++
80#endif
81
82GUSIConfiguration::FileSuffix sSuffices[] = {
83 "", '????', '????'
84};
Jack Jansen2d1306b2000-04-07 09:10:49 +000085extern "C" void GUSISetupConfig()
86{
Jack Jansenee081042000-04-21 23:53:37 +000087 Handle h;
88 short oldrh, prefrh = -1;
89 short resource_id = GUSIConfiguration::kNoResource;
90
91 oldrh = CurResFile();
92
93 /* Try override from the application resource fork */
94 UseResFile(PyMac_AppRefNum);
95 h = Get1Resource('GU\267I', GUSIOPTIONSOVERRIDE_ID);
96 if ( h ) {
97 resource_id = GUSIOPTIONSOVERRIDE_ID;
98 } else {
99 /* Next try normal resource from preference file */
100 prefrh = PyMac_OpenPrefFile();
101 h = Get1Resource('GU\267I', GUSIOPTIONS_ID);
102 if ( h ) {
103 resource_id = GUSIOPTIONS_ID;
104 } else {
105 /* Finally try normal resource from application */
106 if ( prefrh != -1 ) {
107 CloseResFile(prefrh);
108 prefrh = -1;
109 }
110 resource_id = GUSIOPTIONS_ID;
111 }
112 }
Jack Jansen2d1306b2000-04-07 09:10:49 +0000113
Jack Jansenee081042000-04-21 23:53:37 +0000114 /* Now we have the right resource file topmost and the id. Init GUSI. */
115 GUSIConfiguration * config =
116 GUSIConfiguration::CreateInstance(resource_id);
117
118 /* Finally restore the old resource file */
119 if ( prefrh != -1) CloseResFile(prefrh);
120 UseResFile(oldrh);
121
122 config->ConfigureDefaultTypeCreator('ttxt', 'TEXT');
Jack Jansen2d1306b2000-04-07 09:10:49 +0000123 config->ConfigureSuffices(
124 sizeof(sSuffices)/sizeof(GUSIConfiguration::FileSuffix)-1, sSuffices);
125 config->ConfigureAutoInitGraf(false);
126 config->ConfigureAutoSpin(false);
127 config->ConfigureHandleAppleEvents(false);
128 config->ConfigureSigInt(false);
129 config->ConfigureSigPipe(true);
130
131 GUSISetHook(GUSI_SpinHook, (GUSIHook)PyMac_GUSISpin);
132
133}
134
135/**************** END GUSI CONFIGURATION *************************/