]> git.saurik.com Git - wxWidgets.git/blob - utils/Install/sfxzip/globals.c
This is how wxPlotWindow would look like with the
[wxWidgets.git] / utils / Install / sfxzip / globals.c
1 /*---------------------------------------------------------------------------
2
3 globals.c
4
5 Routines to allocate and initialize globals, with or without threads.
6
7 Contents: registerGlobalPointer()
8 deregisterGlobalPointer()
9 getGlobalPointer()
10 globalsCtor()
11
12 ---------------------------------------------------------------------------*/
13
14
15 #define UNZIP_INTERNAL
16 #include "unzip.h"
17
18 #ifndef FUNZIP
19 /* initialization of sigs is completed at runtime so unzip(sfx) executable
20 * won't look like a zipfile
21 */
22 char central_hdr_sig[4] = {0, 0, 0x01, 0x02};
23 char local_hdr_sig[4] = {0, 0, 0x03, 0x04};
24 char end_central_sig[4] = {0, 0, 0x05, 0x06};
25 /* extern char extd_local_sig[4] = {0, 0, 0x07, 0x08}; NOT USED YET */
26
27 ZCONST char *fnames[2] = {"*", NULL}; /* default filenames vector */
28 #endif
29
30
31 #ifndef REENTRANT
32 Uz_Globs G;
33 #else /* REENTRANT */
34
35 # ifndef USETHREADID
36 Uz_Globs *GG;
37 # else /* USETHREADID */
38 # define THREADID_ENTRIES 0x40
39
40 int lastScan;
41 Uz_Globs *threadPtrTable[THREADID_ENTRIES];
42 ulg threadIdTable [THREADID_ENTRIES] = {
43 0,0,0,0, 0,0,0,0, 0,0,0,0, 0,0,0,0,
44 0,0,0,0, 0,0,0,0, 0,0,0,0, 0,0,0,0, /* Make sure there are */
45 0,0,0,0, 0,0,0,0, 0,0,0,0, 0,0,0,0, /* THREADID_ENTRIES 0s */
46 0,0,0,0, 0,0,0,0, 0,0,0,0, 0,0,0,0
47 };
48
49 static ZCONST char Far TooManyThreads[] =
50 "error: more than %d simultaneous threads.\n\
51 Some threads are probably not calling DESTROYTHREAD()\n";
52 static ZCONST char Far EntryNotFound[] =
53 "error: couldn't find global pointer in table.\n\
54 Maybe somebody accidentally called DESTROYTHREAD() twice.\n";
55 static ZCONST char Far GlobalPointerMismatch[] =
56 "error: global pointer in table does not match pointer passed as\
57 parameter\n";
58
59 static void registerGlobalPointer OF((__GPRO));
60
61
62
63 static void registerGlobalPointer(__G)
64 __GDEF
65 {
66 int scan=0;
67 ulg tid = GetThreadId();
68
69 while (threadIdTable[scan] && scan < THREADID_ENTRIES)
70 scan++;
71
72 if (scan == THREADID_ENTRIES) {
73 ZCONST char *tooMany = LoadFarString(TooManyThreads);
74 Info(slide, 0x421, ((char *)slide, tooMany, THREADID_ENTRIES));
75 free(pG);
76 EXIT(PK_MEM); /* essentially memory error before we've started */
77 }
78
79 threadIdTable [scan] = tid;
80 threadPtrTable[scan] = pG;
81 lastScan = scan;
82 }
83
84
85
86 void deregisterGlobalPointer(__G)
87 __GDEF
88 {
89 int scan=0;
90 ulg tid = GetThreadId();
91
92
93 while (threadIdTable[scan] != tid && scan < THREADID_ENTRIES)
94 scan++;
95
96 /*---------------------------------------------------------------------------
97 There are two things we can do if we can't find the entry: ignore it or
98 scream. The most likely reason for it not to be here is the user calling
99 this routine twice. Since this could cause BIG problems if any globals
100 are accessed after the first call, we'd better scream.
101 ---------------------------------------------------------------------------*/
102
103 if (scan == THREADID_ENTRIES || threadPtrTable[scan] != pG) {
104 ZCONST char *noEntry;
105 if (scan == THREADID_ENTRIES)
106 noEntry = LoadFarString(EntryNotFound);
107 else
108 noEntry = LoadFarString(GlobalPointerMismatch);
109 Info(slide, 0x421, ((char *)slide, noEntry));
110 EXIT(PK_WARN); /* programming error, but after we're all done */
111 }
112
113 threadIdTable [scan] = 0;
114 lastScan = scan;
115 free(threadPtrTable[scan]);
116 }
117
118
119
120 Uz_Globs *getGlobalPointer()
121 {
122 int scan=0;
123 ulg tid = GetThreadId();
124
125 while (threadIdTable[scan] != tid && scan < THREADID_ENTRIES)
126 scan++;
127
128 /*---------------------------------------------------------------------------
129 There are two things we can do if we can't find the entry: ignore it or
130 scream. The most likely reason for it not to be here is the user calling
131 this routine twice. Since this could cause BIG problems if any globals
132 are accessed after the first call, we'd better scream.
133 ---------------------------------------------------------------------------*/
134
135 if (scan == THREADID_ENTRIES) {
136 ZCONST char *noEntry = LoadFarString(EntryNotFound);
137 fprintf(stderr, noEntry); /* can't use Info w/o a global pointer */
138 EXIT(PK_ERR); /* programming error while still working */
139 }
140
141 return threadPtrTable[scan];
142 }
143
144 # endif /* ?USETHREADID */
145 #endif /* ?REENTRANT */
146
147
148
149 Uz_Globs *globalsCtor()
150 {
151 #ifdef REENTRANT
152 Uz_Globs *pG = (Uz_Globs *)malloc(sizeof(Uz_Globs));
153
154 if (!pG)
155 return (Uz_Globs *)NULL;
156 #endif /* REENTRANT */
157
158 /* for REENTRANT version, G is defined as (*pG) */
159
160 memzero(&G, sizeof(Uz_Globs));
161
162 #ifndef FUNZIP
163 #ifdef CMS_MVS
164 uO.aflag=1;
165 uO.C_flag=1;
166 #endif
167
168 uO.lflag=(-1);
169 G.wildzipfn = "";
170 G.pfnames = (char **)fnames;
171 G.pxnames = (char **)&fnames[1];
172 G.pInfo = G.info;
173 G.sol = TRUE; /* at start of line */
174
175 G.message = UzpMessagePrnt;
176 G.input = UzpInput; /* not used by anyone at the moment... */
177 #if defined(WINDLL) || defined(MACOS)
178 G.mpause = NULL; /* has scrollbars: no need for pausing */
179 #else
180 G.mpause = UzpMorePause;
181 #endif
182 G.decr_passwd = UzpPassword;
183 #endif /* !FUNZIP */
184
185 #if (!defined(DOS_FLX_H68_OS2_W32) && !defined(AMIGA) && !defined(RISCOS))
186 #if (!defined(MACOS) && !defined(ATARI) && !defined(VMS))
187 G.echofd = -1;
188 #endif /* !(MACOS || ATARI || VMS) */
189 #endif /* !(DOS_FLX_H68_OS2_W32 || AMIGA || RISCOS) */
190
191 #ifdef SYSTEM_SPECIFIC_CTOR
192 SYSTEM_SPECIFIC_CTOR(__G);
193 #endif
194
195 #ifdef REENTRANT
196 #ifdef USETHREADID
197 registerGlobalPointer(__G);
198 #else
199 GG = &G;
200 #endif /* ?USETHREADID */
201 #endif /* REENTRANT */
202
203 return &G;
204 }