Mercurial > mplayer.hg
annotate loader/win32.c @ 2665:e8d949b1bc5d
dump h263 frame headers from vivo
author | arpi |
---|---|
date | Sun, 04 Nov 2001 00:00:38 +0000 |
parents | 958d10763c34 |
children | a9b786102a77 |
rev | line source |
---|---|
1 | 1 /*********************************************************** |
2 | |
3 Win32 emulation code. Functions that emulate | |
4 responses from corresponding Win32 API calls. | |
2651
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
5 Since we are not going to be able to load |
1 | 6 virtually any DLL, we can only implement this |
7 much, adding needed functions with each new codec. | |
2651
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
8 |
128 | 9 Basic principle of implementation: it's not good |
10 for DLL to know too much about its environment. | |
1 | 11 |
12 ************************************************************/ | |
13 | |
2069 | 14 #include "config.h" |
1 | 15 |
2069 | 16 #include "wine/winbase.h" |
17 #include "wine/winreg.h" | |
18 #include "wine/winnt.h" | |
19 #include "wine/winerror.h" | |
20 #include "wine/debugtools.h" | |
21 #include "wine/module.h" | |
2139 | 22 |
23 #include <stdio.h> | |
1 | 24 #include "win32.h" |
2069 | 25 |
2139 | 26 #include "registry.h" |
27 #include "loader.h" | |
28 #include "com.h" | |
29 | |
2069 | 30 #include <stdlib.h> |
2651
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
31 #include <assert.h> |
2139 | 32 #include <stdarg.h> |
2069 | 33 #include <ctype.h> |
1 | 34 #include <pthread.h> |
128 | 35 #include <errno.h> |
1 | 36 #ifdef HAVE_MALLOC_H |
37 #include <malloc.h> | |
38 #endif | |
39 #include <time.h> | |
2651
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
40 #include <math.h> |
128 | 41 #include <unistd.h> |
42 #include <fcntl.h> | |
1 | 43 #include <sys/types.h> |
44 #include <sys/time.h> | |
45 #include <sys/timeb.h> | |
2069 | 46 #ifdef HAVE_KSTAT |
1307
d8c1b0b38edc
Add prototypes to wine/loader stuff, so that we can catch __stdcall function
jkeil
parents:
1096
diff
changeset
|
47 #include <kstat.h> |
d8c1b0b38edc
Add prototypes to wine/loader stuff, so that we can catch __stdcall function
jkeil
parents:
1096
diff
changeset
|
48 #endif |
1 | 49 |
2651
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
50 int vsscanf( const char *str, const char *format, va_list ap); |
1416 | 51 |
2651
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
52 char* def_path = WIN32_PATH; |
128 | 53 |
1923
40084ad62591
do_cpuid stored the results of the cpuid instruction in the wrong place
jkeil
parents:
1679
diff
changeset
|
54 static void do_cpuid(unsigned int ax, unsigned int *regs) |
128 | 55 { |
2069 | 56 __asm__ __volatile__( |
57 "pushl %%ebx; pushl %%ecx; pushl %%edx;" | |
58 ".byte 0x0f, 0xa2;" | |
59 "movl %%eax, (%2);" | |
60 "movl %%ebx, 4(%2);" | |
61 "movl %%ecx, 8(%2);" | |
62 "movl %%edx, 12(%2);" | |
63 "popl %%edx; popl %%ecx; popl %%ebx;" | |
64 : "=a" (ax) | |
65 : "0" (ax), "S" (regs) | |
66 ); | |
128 | 67 } |
68 static unsigned int c_localcount_tsc() | |
1 | 69 { |
70 int a; | |
71 __asm__ __volatile__("rdtsc\n\t" | |
72 :"=a"(a) | |
73 : | |
74 :"edx"); | |
75 return a; | |
76 } | |
128 | 77 static void c_longcount_tsc(long long* z) |
1 | 78 { |
79 __asm__ __volatile__( | |
80 "pushl %%ebx\n\t" | |
81 "movl %%eax, %%ebx\n\t" | |
82 "rdtsc\n\t" | |
83 "movl %%eax, 0(%%ebx)\n\t" | |
84 "movl %%edx, 4(%%ebx)\n\t" | |
85 "popl %%ebx\n\t" | |
86 ::"a"(z)); | |
2651
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
87 } |
128 | 88 static unsigned int c_localcount_notsc() |
1 | 89 { |
90 struct timeval tv; | |
91 unsigned limit=~0; | |
92 limit/=1000000; | |
93 gettimeofday(&tv, 0); | |
94 return limit*tv.tv_usec; | |
95 } | |
128 | 96 static void c_longcount_notsc(long long* z) |
1 | 97 { |
98 struct timeval tv; | |
99 unsigned long long result; | |
100 unsigned limit=~0; | |
101 if(!z)return; | |
102 limit/=1000000; | |
103 gettimeofday(&tv, 0); | |
104 result=tv.tv_sec; | |
105 result<<=32; | |
106 result+=limit*tv.tv_usec; | |
107 *z=result; | |
108 } | |
1307
d8c1b0b38edc
Add prototypes to wine/loader stuff, so that we can catch __stdcall function
jkeil
parents:
1096
diff
changeset
|
109 static unsigned int localcount_stub(void); |
2069 | 110 static void longcount_stub(long long*); |
128 | 111 static unsigned int (*localcount)()=localcount_stub; |
112 static void (*longcount)(long long*)=longcount_stub; | |
1 | 113 |
2651
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
114 static pthread_mutex_t memmut; |
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
115 |
1307
d8c1b0b38edc
Add prototypes to wine/loader stuff, so that we can catch __stdcall function
jkeil
parents:
1096
diff
changeset
|
116 static unsigned int localcount_stub(void) |
128 | 117 { |
118 unsigned int regs[4]; | |
1923
40084ad62591
do_cpuid stored the results of the cpuid instruction in the wrong place
jkeil
parents:
1679
diff
changeset
|
119 do_cpuid(1, regs); |
2651
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
120 if ((regs[3] & 0x00000010) != 0) |
128 | 121 { |
122 localcount=c_localcount_tsc; | |
123 longcount=c_longcount_tsc; | |
2651
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
124 } |
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
125 else |
128 | 126 { |
127 localcount=c_localcount_notsc; | |
128 longcount=c_longcount_notsc; | |
129 } | |
130 return localcount(); | |
131 } | |
132 static void longcount_stub(long long* z) | |
1 | 133 { |
128 | 134 unsigned int regs[4]; |
1923
40084ad62591
do_cpuid stored the results of the cpuid instruction in the wrong place
jkeil
parents:
1679
diff
changeset
|
135 do_cpuid(1, regs); |
2651
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
136 if ((regs[3] & 0x00000010) != 0) |
128 | 137 { |
138 localcount=c_localcount_tsc; | |
139 longcount=c_longcount_tsc; | |
2651
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
140 } |
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
141 else |
128 | 142 { |
143 localcount=c_localcount_notsc; | |
144 longcount=c_longcount_notsc; | |
145 } | |
146 longcount(z); | |
147 } | |
148 | |
2069 | 149 int LOADER_DEBUG=1; // active only if compiled with -DDETAILED_OUT |
1307
d8c1b0b38edc
Add prototypes to wine/loader stuff, so that we can catch __stdcall function
jkeil
parents:
1096
diff
changeset
|
150 static inline void dbgprintf(char* fmt, ...) |
128 | 151 { |
235 | 152 #ifdef DETAILED_OUT |
128 | 153 if(LOADER_DEBUG) |
154 { | |
155 FILE* f; | |
156 va_list va; | |
157 va_start(va, fmt); | |
158 f=fopen("./log", "a"); | |
159 vprintf(fmt, va); | |
160 if(f) | |
161 { | |
162 vfprintf(f, fmt, va); | |
163 fsync(fileno(f)); | |
164 fclose(f); | |
165 } | |
166 va_end(va); | |
167 } | |
235 | 168 #endif |
2651
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
169 } |
1 | 170 char export_names[500][30]={ |
171 "name1", | |
172 //"name2", | |
173 //"name3" | |
174 }; | |
175 //#define min(x,y) ((x)<(y)?(x):(y)) | |
176 | |
2651
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
177 void destroy_event(void* event); |
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
178 |
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
179 static unsigned char* heap=NULL; |
1 | 180 static int heap_counter=0; |
2069 | 181 static void test_heap(void) |
1 | 182 { |
2651
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
183 int offset=0; |
1 | 184 if(heap==0) |
185 return; | |
186 while(offset<heap_counter) | |
187 { | |
188 if(*(int*)(heap+offset)!=0x433476) | |
189 { | |
190 printf("Heap corruption at address %d\n", offset); | |
191 return; | |
192 } | |
193 offset+=8+*(int*)(heap+offset+4); | |
194 } | |
195 for(;offset<min(offset+1000, 20000000); offset++) | |
196 if(heap[offset]!=0xCC) | |
197 { | |
198 printf("Free heap corruption at address %d\n", offset); | |
2651
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
199 } |
1 | 200 } |
201 #undef MEMORY_DEBUG | |
202 | |
203 #ifdef MEMORY_DEBUG | |
204 | |
205 void* my_mreq(int size, int to_zero) | |
206 { | |
207 static int test=0; | |
208 test++; | |
209 if(test%10==0)printf("Memory: %d bytes allocated\n", heap_counter); | |
210 // test_heap(); | |
211 if(heap==NULL) | |
212 { | |
213 heap=malloc(20000000); | |
214 memset(heap, 0xCC,20000000); | |
215 } | |
216 if(heap==0) | |
217 { | |
218 printf("No enough memory\n"); | |
219 return 0; | |
2651
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
220 } |
1 | 221 if(heap_counter+size>20000000) |
222 { | |
223 printf("No enough memory\n"); | |
224 return 0; | |
2651
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
225 } |
1 | 226 *(int*)(heap+heap_counter)=0x433476; |
227 heap_counter+=4; | |
228 *(int*)(heap+heap_counter)=size; | |
229 heap_counter+=4; | |
230 printf("Allocated %d bytes of memory: sys %d, user %d-%d\n", size, heap_counter-8, heap_counter, heap_counter+size); | |
231 if(to_zero) | |
2651
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
232 memset(heap+heap_counter, 0, size); |
1543 | 233 else |
2139 | 234 memset(heap+heap_counter, 0xcc, size); // make crash reproducable |
1 | 235 heap_counter+=size; |
2651
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
236 return heap+heap_counter-size; |
1 | 237 } |
2069 | 238 int my_release(char* memory) |
1 | 239 { |
240 // test_heap(); | |
241 if(memory==NULL) | |
242 { | |
243 printf("ERROR: free(0)\n"); | |
244 return 0; | |
2651
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
245 } |
1 | 246 if(*(int*)(memory-8)!=0x433476) |
247 { | |
248 printf("MEMORY CORRUPTION !!!!!!!!!!!!!!!!!!!\n"); | |
249 return 0; | |
250 } | |
251 printf("Freed %d bytes of memory\n", *(int*)(memory-4)); | |
252 // memset(memory-8, *(int*)(memory-4), 0xCC); | |
253 return 0; | |
2651
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
254 } |
1 | 255 |
256 #else | |
128 | 257 #define GARBAGE |
2651
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
258 typedef struct alloc_header_t alloc_header; |
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
259 struct alloc_header_t |
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
260 { |
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
261 // let's keep allocated data 16 byte aligned |
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
262 alloc_header* prev; |
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
263 alloc_header* next; |
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
264 long deadbeef; |
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
265 long size; |
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
266 long type; |
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
267 long reserved1; |
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
268 long reserved2; |
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
269 long reserved3; |
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
270 }; |
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
271 |
128 | 272 #ifdef GARBAGE |
2651
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
273 static alloc_header* last_alloc = NULL; |
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
274 static int alccnt = 0; |
128 | 275 #endif |
276 | |
2651
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
277 #define AREATYPE_CLIENT 0 |
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
278 #define AREATYPE_EVENT 1 |
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
279 #define AREATYPE_MUTEX 2 |
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
280 #define AREATYPE_COND 3 |
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
281 |
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
282 void* mreq_private(int size, int to_zero, int type); |
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
283 void* mreq_private(int size, int to_zero, int type) |
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
284 { |
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
285 alloc_header* header; |
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
286 if (to_zero) |
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
287 header=calloc(size + sizeof(alloc_header), 1); |
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
288 else |
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
289 header=malloc(size + sizeof(alloc_header)); |
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
290 #ifdef GARBAGE |
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
291 if (!last_alloc) |
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
292 { |
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
293 pthread_mutex_init(&memmut, NULL); |
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
294 pthread_mutex_lock(&memmut); |
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
295 } |
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
296 else |
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
297 { |
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
298 pthread_mutex_lock(&memmut); |
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
299 last_alloc->next = header; /* set next */ |
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
300 } |
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
301 |
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
302 header->prev = last_alloc; |
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
303 header->next = 0; |
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
304 last_alloc = header; |
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
305 alccnt++; |
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
306 pthread_mutex_unlock(&memmut); |
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
307 #endif |
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
308 header->deadbeef = 0xdeadbeef; |
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
309 header->size = size; |
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
310 header->type = type; |
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
311 |
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
312 //if (alccnt < 400) printf("MY_REQ: %p\t%d (%d)\n", answer, size, alccnt); |
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
313 return header + 1; |
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
314 } |
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
315 |
1 | 316 void* my_mreq(int size, int to_zero) |
317 { | |
2651
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
318 return mreq_private(size, to_zero, AREATYPE_CLIENT); |
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
319 } |
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
320 |
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
321 |
597 | 322 int my_release(void* memory) |
1 | 323 { |
2651
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
324 alloc_header* header = (alloc_header*) memory - 1; |
128 | 325 #ifdef GARBAGE |
2651
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
326 alloc_header* prevmem; |
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
327 alloc_header* nextmem; |
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
328 if (memory == 0) |
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
329 return 0; |
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
330 |
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
331 pthread_mutex_lock(&memmut); |
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
332 |
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
333 if (header->deadbeef != 0xdeadbeef) |
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
334 { |
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
335 printf("FATAL releasing corrupted memory!\n"); |
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
336 return 0; |
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
337 } |
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
338 |
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
339 switch(header->type) |
128 | 340 { |
2651
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
341 case AREATYPE_EVENT: |
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
342 destroy_event(memory); |
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
343 break; |
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
344 case AREATYPE_COND: |
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
345 pthread_cond_destroy((pthread_cond_t*)memory); |
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
346 break; |
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
347 case AREATYPE_MUTEX: |
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
348 pthread_mutex_destroy((pthread_mutex_t*)memory); |
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
349 break; |
128 | 350 } |
2651
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
351 |
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
352 prevmem = header->prev; |
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
353 nextmem = header->next; |
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
354 |
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
355 if (prevmem) |
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
356 prevmem->next = nextmem; |
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
357 if (nextmem) |
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
358 nextmem->prev = prevmem; |
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
359 |
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
360 if (header == last_alloc) |
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
361 last_alloc = prevmem; |
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
362 |
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
363 alccnt--; |
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
364 |
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
365 if (last_alloc) |
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
366 pthread_mutex_unlock(&memmut); |
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
367 else |
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
368 pthread_mutex_destroy(&memmut); |
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
369 |
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
370 //if (alccnt < 400) printf("MY_RELEASE: %p\t%ld (%d)\n", mem, mem[3], alccnt); |
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
371 #else |
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
372 if (memory == 0) |
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
373 return 0; |
128 | 374 #endif |
2651
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
375 free(header); |
1 | 376 return 0; |
377 } | |
378 #endif | |
2651
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
379 |
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
380 static inline int my_size(void* memory) |
2069 | 381 { |
2651
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
382 return ((alloc_header*)memory)[-1].size; |
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
383 } |
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
384 |
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
385 void* my_realloc(void* memory, int size) |
1 | 386 { |
2651
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
387 void *ans = memory; |
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
388 int osize = my_size(memory); |
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
389 if (memory == NULL) |
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
390 return my_mreq(size, 0); |
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
391 if (osize < size) |
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
392 { |
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
393 ans = my_mreq(size, 0); |
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
394 memcpy(ans, memory, osize); |
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
395 my_release(memory); |
2069 | 396 } |
2651
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
397 return ans; |
2069 | 398 } |
1 | 399 |
400 extern int unk_exp1; | |
401 char extcode[20000];// place for 200 unresolved exports | |
402 int pos=0; | |
403 | |
2069 | 404 int WINAPI ext_unknown() |
1 | 405 { |
406 printf("Unknown func called\n"); | |
407 return 0; | |
2651
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
408 } |
1 | 409 int WINAPI expIsBadWritePtr(void* ptr, unsigned int count) |
410 { | |
128 | 411 int result; |
1 | 412 if(count==0) |
128 | 413 result=0; |
414 else | |
1 | 415 if(ptr==0) |
128 | 416 result=1; |
417 else | |
418 result=0; | |
419 dbgprintf("IsBadWritePtr(0x%x, 0x%x) => %d\n", ptr, count, result); | |
420 return result; | |
1 | 421 } |
422 int WINAPI expIsBadReadPtr(void* ptr, unsigned int count) | |
423 { | |
128 | 424 int result; |
1 | 425 if(count==0) |
128 | 426 result=0; |
427 else | |
1 | 428 if(ptr==0) |
128 | 429 result=1; |
430 else | |
431 result=0; | |
432 dbgprintf("IsBadReadPtr(0x%x, 0x%x) => %d\n", ptr, count, result); | |
433 return result; | |
1 | 434 } |
435 void* CDECL expmalloc(int size) | |
436 { | |
437 //printf("malloc"); | |
438 // return malloc(size); | |
439 void* result=my_mreq(size,0); | |
128 | 440 dbgprintf("malloc(0x%x) => 0x%x\n", size,result); |
1 | 441 if(result==0) |
442 printf("WARNING: malloc() failed\n"); | |
443 return result; | |
444 } | |
445 void CDECL expfree(void* mem) | |
446 { | |
447 // return free(mem); | |
128 | 448 dbgprintf("free(0x%x)\n", mem); |
1 | 449 my_release(mem); |
450 } | |
451 void* CDECL expnew(int size) | |
452 { | |
453 // printf("NEW:: Call from address %08x\n STACK DUMP:\n", *(-1+(int*)&size)); | |
454 // printf("%08x %08x %08x %08x\n", | |
455 // size, *(1+(int*)&size), | |
2651
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
456 // *(2+(int*)&size),*(3+(int*)&size)); |
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
457 void* result = 0; |
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
458 assert(size >= 0); |
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
459 |
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
460 result=my_mreq(size,0); |
128 | 461 dbgprintf("new(0x%x) => 0x%x\n", size, result); |
2651
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
462 if (result==0) |
128 | 463 printf("WARNING: new() failed\n"); |
1 | 464 return result; |
465 | |
2651
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
466 } |
1 | 467 int CDECL expdelete(void* memory) |
468 { | |
128 | 469 dbgprintf("delete(0x%x)\n", memory); |
470 my_release(memory); | |
1 | 471 return 0; |
472 } | |
473 int WINAPI expDisableThreadLibraryCalls(int module) | |
474 { | |
128 | 475 dbgprintf("DisableThreadLibraryCalls(0x%x) => 0\n", module); |
1 | 476 return 0; |
2651
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
477 } |
1 | 478 int CDECL exp_initterm(int v1, int v2) |
479 { | |
128 | 480 dbgprintf("_initterm(0x%x, 0x%x) => 0\n", v1, v2); |
1 | 481 return 0; |
2651
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
482 } |
1 | 483 |
2069 | 484 HMODULE WINAPI expGetDriverModuleHandle(DRVR* pdrv) |
1 | 485 { |
2069 | 486 HMODULE result; |
2651
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
487 if (pdrv==NULL) |
2069 | 488 result=0; |
1307
d8c1b0b38edc
Add prototypes to wine/loader stuff, so that we can catch __stdcall function
jkeil
parents:
1096
diff
changeset
|
489 else |
2069 | 490 result=pdrv->hDriverModule; |
491 dbgprintf("GetDriverModuleHandle(%p) => %p\n", pdrv, result); | |
128 | 492 return result; |
1 | 493 } |
494 | |
2069 | 495 #define MODULE_HANDLE_kernel32 ((HMODULE)0x120) |
496 | |
497 HMODULE WINAPI expGetModuleHandleA(const char* name) | |
1 | 498 { |
499 WINE_MODREF* wm; | |
2069 | 500 HMODULE result; |
128 | 501 if(!name) |
502 result=0; | |
503 else | |
504 { | |
505 wm=MODULE_FindModule(name); | |
506 if(wm==0)result=0; | |
507 else | |
2069 | 508 result=(HMODULE)(wm->module); |
128 | 509 } |
510 if(!result) | |
511 { | |
512 if(strcasecmp(name, "kernel32")==0) | |
2069 | 513 result=MODULE_HANDLE_kernel32; |
2651
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
514 } |
128 | 515 dbgprintf("GetModuleHandleA('%s') => 0x%x\n", name, result); |
516 return result; | |
1 | 517 } |
128 | 518 |
1 | 519 struct th_list_t; |
520 typedef struct th_list_t{ | |
521 int id; | |
522 void* thread; | |
523 struct th_list_t* next; | |
524 struct th_list_t* prev; | |
525 }th_list; | |
526 | |
527 static th_list* list=NULL; | |
528 | |
529 | |
530 | |
531 void* WINAPI expCreateThread(void* pSecAttr, long dwStackSize, void* lpStartAddress, | |
532 void* lpParameter, long dwFlags, long* dwThreadId) | |
533 { | |
534 pthread_t *pth; | |
535 // printf("CreateThread:"); | |
536 pth=my_mreq(sizeof(pthread_t), 0); | |
537 pthread_create(pth, NULL, (void*(*)(void*))lpStartAddress, lpParameter); | |
538 if(dwFlags) | |
128 | 539 printf( "WARNING: CreateThread flags not supported\n"); |
1 | 540 if(dwThreadId) |
541 *dwThreadId=(long)pth; | |
542 if(list==NULL) | |
543 { | |
544 list=my_mreq(sizeof(th_list), 1); | |
545 list->next=list->prev=NULL; | |
546 } | |
547 else | |
548 { | |
549 list->next=my_mreq(sizeof(th_list), 0); | |
550 list->next->prev=list; | |
551 list->next->next=NULL; | |
552 list=list->next; | |
2651
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
553 } |
1 | 554 list->thread=pth; |
128 | 555 dbgprintf("CreateThread(0x%x, 0x%x, 0x%x, 0x%x, 0x%x, 0x%x) => 0x%x\n", |
556 pSecAttr, dwStackSize, lpStartAddress, lpParameter, dwFlags, dwThreadId, pth); | |
1 | 557 return pth; |
558 } | |
559 | |
560 struct mutex_list_t; | |
561 | |
562 struct mutex_list_t | |
563 { | |
128 | 564 char type; |
1 | 565 pthread_mutex_t *pm; |
128 | 566 pthread_cond_t *pc; |
567 char state; | |
568 char reset; | |
2651
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
569 char name[128]; |
128 | 570 int semaphore; |
1 | 571 struct mutex_list_t* next; |
572 struct mutex_list_t* prev; | |
573 }; | |
574 typedef struct mutex_list_t mutex_list; | |
2651
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
575 static mutex_list* mlist=NULL; |
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
576 |
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
577 void destroy_event(void* event) |
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
578 { |
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
579 mutex_list* pp=mlist; |
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
580 // printf("garbage collector: destroy_event(%x)\n", event); |
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
581 while(pp) |
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
582 { |
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
583 if(pp==(mutex_list*)event) |
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
584 { |
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
585 if(pp->next) |
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
586 pp->next->prev=pp->prev; |
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
587 if(pp->prev) |
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
588 pp->prev->next=pp->next; |
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
589 if(mlist==(mutex_list*)event) |
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
590 mlist=mlist->prev; |
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
591 /* |
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
592 pp=mlist; |
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
593 while(pp) |
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
594 { |
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
595 printf("%x => ", pp); |
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
596 pp=pp->prev; |
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
597 } |
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
598 printf("0\n"); |
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
599 */ |
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
600 return; |
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
601 } |
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
602 pp=pp->prev; |
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
603 } |
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
604 } |
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
605 |
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
606 void* WINAPI expCreateEventA(void* pSecAttr, char bManualReset, |
1 | 607 char bInitialState, const char* name) |
608 { | |
609 pthread_mutex_t *pm; | |
128 | 610 pthread_cond_t *pc; |
2651
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
611 /* |
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
612 mutex_list* pp; |
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
613 pp=mlist; |
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
614 while(pp) |
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
615 { |
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
616 printf("%x => ", pp); |
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
617 pp=pp->prev; |
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
618 } |
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
619 printf("0\n"); |
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
620 */ |
1 | 621 if(mlist!=NULL) |
622 { | |
623 mutex_list* pp=mlist; | |
624 if(name!=NULL) | |
625 do | |
626 { | |
128 | 627 if((strcmp(pp->name, name)==0) && (pp->type==0)) |
628 { | |
629 dbgprintf("CreateEventA(0x%x, 0x%x, 0x%x, 0x%x='%s') => 0x%x\n", | |
630 pSecAttr, bManualReset, bInitialState, name, name, pp->pm); | |
1 | 631 return pp->pm; |
128 | 632 } |
2069 | 633 }while((pp=pp->prev) != NULL); |
2651
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
634 } |
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
635 pm=mreq_private(sizeof(pthread_mutex_t), 0, AREATYPE_MUTEX); |
1 | 636 pthread_mutex_init(pm, NULL); |
2651
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
637 pc=mreq_private(sizeof(pthread_cond_t), 0, AREATYPE_COND); |
128 | 638 pthread_cond_init(pc, NULL); |
1 | 639 if(mlist==NULL) |
640 { | |
2651
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
641 mlist=mreq_private(sizeof(mutex_list), 00, AREATYPE_EVENT); |
1 | 642 mlist->next=mlist->prev=NULL; |
643 } | |
644 else | |
645 { | |
2651
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
646 mlist->next=mreq_private(sizeof(mutex_list), 00, AREATYPE_EVENT); |
128 | 647 mlist->next->prev=mlist; |
1 | 648 mlist->next->next=NULL; |
649 mlist=mlist->next; | |
650 } | |
128 | 651 mlist->type=0; /* Type Event */ |
1 | 652 mlist->pm=pm; |
128 | 653 mlist->pc=pc; |
654 mlist->state=bInitialState; | |
655 mlist->reset=bManualReset; | |
2651
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
656 if(name) |
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
657 strncpy(mlist->name, name, 127); |
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
658 else |
1 | 659 mlist->name[0]=0; |
660 if(pm==NULL) | |
661 dbgprintf("ERROR::: CreateEventA failure\n"); | |
128 | 662 /* |
1 | 663 if(bInitialState) |
664 pthread_mutex_lock(pm); | |
128 | 665 */ |
666 if(name) | |
667 dbgprintf("CreateEventA(0x%x, 0x%x, 0x%x, 0x%x='%s') => 0x%x\n", | |
668 pSecAttr, bManualReset, bInitialState, name, name, mlist); | |
669 else | |
670 dbgprintf("CreateEventA(0x%x, 0x%x, 0x%x, NULL) => 0x%x\n", | |
671 pSecAttr, bManualReset, bInitialState, mlist); | |
672 return mlist; | |
2651
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
673 } |
1 | 674 |
675 void* WINAPI expSetEvent(void* event) | |
676 { | |
128 | 677 mutex_list *ml = (mutex_list *)event; |
678 dbgprintf("SetEvent(%x) => 0x1\n", event); | |
679 pthread_mutex_lock(ml->pm); | |
680 if (ml->state == 0) { | |
681 ml->state = 1; | |
682 pthread_cond_signal(ml->pc); | |
683 } | |
684 pthread_mutex_unlock(ml->pm); | |
685 | |
686 return (void *)1; | |
1 | 687 } |
688 void* WINAPI expResetEvent(void* event) | |
689 { | |
128 | 690 mutex_list *ml = (mutex_list *)event; |
691 dbgprintf("ResetEvent(0x%x) => 0x1\n", event); | |
692 pthread_mutex_lock(ml->pm); | |
693 ml->state = 0; | |
2651
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
694 pthread_mutex_unlock(ml->pm); |
128 | 695 |
696 return (void *)1; | |
1 | 697 } |
698 | |
699 void* WINAPI expWaitForSingleObject(void* object, int duration) | |
700 { | |
128 | 701 mutex_list *ml = (mutex_list *)object; |
2069 | 702 // FIXME FIXME FIXME - this value is sometime unititialize !!! |
703 int ret = WAIT_FAILED; | |
128 | 704 mutex_list* pp=mlist; |
2069 | 705 dbgprintf("WaitForSingleObject(0x%x, duration %d) =>\n",object, duration); |
706 | |
718 | 707 // loop below was slightly fixed - its used just for checking if |
708 // this object really exists in our list | |
709 if (!ml) | |
710 return (void*) ret; | |
711 while (pp && (pp->pm != ml->pm)) | |
2069 | 712 pp = pp->prev; |
718 | 713 if (!pp) { |
2069 | 714 dbgprintf("WaitForSingleObject: NotFound\n"); |
715 return (void*)ret; | |
718 | 716 } |
128 | 717 |
718 pthread_mutex_lock(ml->pm); | |
719 | |
720 switch(ml->type) { | |
721 case 0: /* Event */ | |
722 if (duration == 0) { /* Check Only */ | |
723 if (ml->state == 1) ret = WAIT_FAILED; | |
724 else ret = WAIT_OBJECT_0; | |
725 } | |
726 if (duration == -1) { /* INFINITE */ | |
727 if (ml->state == 0) | |
728 pthread_cond_wait(ml->pc,ml->pm); | |
729 if (ml->reset) | |
730 ml->state = 0; | |
731 ret = WAIT_OBJECT_0; | |
732 } | |
733 if (duration > 0) { /* Timed Wait */ | |
734 struct timespec abstime; | |
735 struct timeval now; | |
736 gettimeofday(&now, 0); | |
737 abstime.tv_sec = now.tv_sec + (now.tv_usec+duration)/1000000; | |
738 abstime.tv_nsec = ((now.tv_usec+duration)%1000000)*1000; | |
739 if (ml->state == 0) | |
740 ret=pthread_cond_timedwait(ml->pc,ml->pm,&abstime); | |
741 if (ret == ETIMEDOUT) ret = WAIT_TIMEOUT; | |
742 else ret = WAIT_OBJECT_0; | |
743 if (ml->reset) | |
2651
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
744 ml->state = 0; |
128 | 745 } |
746 break; | |
747 case 1: /* Semaphore */ | |
748 if (duration == 0) { | |
749 if(ml->semaphore==0) ret = WAIT_FAILED; | |
750 else { | |
751 ml->semaphore++; | |
752 ret = WAIT_OBJECT_0; | |
753 } | |
754 } | |
755 if (duration == -1) { | |
756 if (ml->semaphore==0) | |
757 pthread_cond_wait(ml->pc,ml->pm); | |
758 ml->semaphore--; | |
759 } | |
760 break; | |
761 } | |
762 pthread_mutex_unlock(ml->pm); | |
763 | |
764 dbgprintf("WaitForSingleObject(0x%x, %d): 0x%x => 0x%x \n",object,duration,ml,ret); | |
765 return (void *)ret; | |
2651
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
766 } |
1 | 767 |
768 static BYTE PF[64] = {0,}; | |
769 | |
128 | 770 WIN_BOOL WINAPI expIsProcessorFeaturePresent(DWORD v) |
771 { | |
772 WIN_BOOL result; | |
773 if(v>63)result=0; | |
774 else result=PF[v]; | |
775 dbgprintf("IsProcessorFeaturePresent(0x%x) => 0x%x\n", v, result); | |
776 return result; | |
777 } | |
778 | |
779 static void DumpSystemInfo(const SYSTEM_INFO* si) | |
780 { | |
781 dbgprintf(" Processor architecture %d\n", si->u.s.wProcessorArchitecture); | |
782 dbgprintf(" Page size: %d\n", si->dwPageSize); | |
783 dbgprintf(" Minimum app address: %d\n", si->lpMinimumApplicationAddress); | |
784 dbgprintf(" Maximum app address: %d\n", si->lpMaximumApplicationAddress); | |
785 dbgprintf(" Active processor mask: 0x%x\n", si->dwActiveProcessorMask); | |
786 dbgprintf(" Number of processors: %d\n", si->dwNumberOfProcessors); | |
787 dbgprintf(" Processor type: 0x%x\n", si->dwProcessorType); | |
788 dbgprintf(" Allocation granularity: 0x%x\n", si->dwAllocationGranularity); | |
789 dbgprintf(" Processor level: 0x%x\n", si->wProcessorLevel); | |
790 dbgprintf(" Processor revision: 0x%x\n", si->wProcessorRevision); | |
791 } | |
792 | |
1 | 793 void WINAPI expGetSystemInfo(SYSTEM_INFO* si) |
794 { | |
795 /* FIXME: better values for the two entries below... */ | |
796 static int cache = 0; | |
797 static SYSTEM_INFO cachedsi; | |
128 | 798 unsigned int regs[4]; |
2069 | 799 dbgprintf("GetSystemInfo(%p) =>\n", si); |
1 | 800 |
801 if (cache) { | |
802 memcpy(si,&cachedsi,sizeof(*si)); | |
128 | 803 DumpSystemInfo(si); |
1 | 804 return; |
805 } | |
806 memset(PF,0,sizeof(PF)); | |
807 | |
808 cachedsi.u.s.wProcessorArchitecture = PROCESSOR_ARCHITECTURE_INTEL; | |
809 cachedsi.dwPageSize = getpagesize(); | |
810 | |
811 /* FIXME: better values for the two entries below... */ | |
128 | 812 cachedsi.lpMinimumApplicationAddress = (void *)0x00000000; |
1 | 813 cachedsi.lpMaximumApplicationAddress = (void *)0x7FFFFFFF; |
814 cachedsi.dwActiveProcessorMask = 1; | |
815 cachedsi.dwNumberOfProcessors = 1; | |
816 cachedsi.dwProcessorType = PROCESSOR_INTEL_386; | |
817 cachedsi.dwAllocationGranularity = 0x10000; | |
128 | 818 cachedsi.wProcessorLevel = 5; /* pentium */ |
819 cachedsi.wProcessorRevision = 0x0101; | |
2573 | 820 cachedsi.dwNumberOfProcessors = 1; |
821 | |
822 #if 1 | |
823 /* mplayer's way to detect PF's */ | |
824 { | |
825 #include "../cpudetect.h" | |
826 extern CpuCaps gCpuCaps; | |
827 | |
828 if (gCpuCaps.hasMMX) | |
829 PF[PF_MMX_INSTRUCTIONS_AVAILABLE] = TRUE; | |
830 if (gCpuCaps.hasSSE) | |
831 PF[PF_XMMI_INSTRUCTIONS_AVAILABLE] = TRUE; | |
832 if (gCpuCaps.has3DNow) | |
833 PF[PF_AMD3D_INSTRUCTIONS_AVAILABLE] = TRUE; | |
834 } | |
835 #endif | |
1 | 836 |
1038
b36fb1ae4b53
applied solaris8/netbsd/other fixes patch by J«ärgen Keil <jk@tools.de>
arpi_esp
parents:
718
diff
changeset
|
837 #if defined(__FreeBSD__) || defined(__NetBSD__) || defined(__svr4__) |
1923
40084ad62591
do_cpuid stored the results of the cpuid instruction in the wrong place
jkeil
parents:
1679
diff
changeset
|
838 do_cpuid(1, regs); |
1038
b36fb1ae4b53
applied solaris8/netbsd/other fixes patch by J«ärgen Keil <jk@tools.de>
arpi_esp
parents:
718
diff
changeset
|
839 switch ((regs[0] >> 8) & 0xf) { // cpu family |
b36fb1ae4b53
applied solaris8/netbsd/other fixes patch by J«ärgen Keil <jk@tools.de>
arpi_esp
parents:
718
diff
changeset
|
840 case 3: cachedsi.dwProcessorType = PROCESSOR_INTEL_386; |
b36fb1ae4b53
applied solaris8/netbsd/other fixes patch by J«ärgen Keil <jk@tools.de>
arpi_esp
parents:
718
diff
changeset
|
841 cachedsi.wProcessorLevel= 3; |
b36fb1ae4b53
applied solaris8/netbsd/other fixes patch by J«ärgen Keil <jk@tools.de>
arpi_esp
parents:
718
diff
changeset
|
842 break; |
b36fb1ae4b53
applied solaris8/netbsd/other fixes patch by J«ärgen Keil <jk@tools.de>
arpi_esp
parents:
718
diff
changeset
|
843 case 4: cachedsi.dwProcessorType = PROCESSOR_INTEL_486; |
b36fb1ae4b53
applied solaris8/netbsd/other fixes patch by J«ärgen Keil <jk@tools.de>
arpi_esp
parents:
718
diff
changeset
|
844 cachedsi.wProcessorLevel= 4; |
b36fb1ae4b53
applied solaris8/netbsd/other fixes patch by J«ärgen Keil <jk@tools.de>
arpi_esp
parents:
718
diff
changeset
|
845 break; |
b36fb1ae4b53
applied solaris8/netbsd/other fixes patch by J«ärgen Keil <jk@tools.de>
arpi_esp
parents:
718
diff
changeset
|
846 case 5: cachedsi.dwProcessorType = PROCESSOR_INTEL_PENTIUM; |
b36fb1ae4b53
applied solaris8/netbsd/other fixes patch by J«ärgen Keil <jk@tools.de>
arpi_esp
parents:
718
diff
changeset
|
847 cachedsi.wProcessorLevel= 5; |
b36fb1ae4b53
applied solaris8/netbsd/other fixes patch by J«ärgen Keil <jk@tools.de>
arpi_esp
parents:
718
diff
changeset
|
848 break; |
b36fb1ae4b53
applied solaris8/netbsd/other fixes patch by J«ärgen Keil <jk@tools.de>
arpi_esp
parents:
718
diff
changeset
|
849 case 6: cachedsi.dwProcessorType = PROCESSOR_INTEL_PENTIUM; |
b36fb1ae4b53
applied solaris8/netbsd/other fixes patch by J«ärgen Keil <jk@tools.de>
arpi_esp
parents:
718
diff
changeset
|
850 cachedsi.wProcessorLevel= 5; |
b36fb1ae4b53
applied solaris8/netbsd/other fixes patch by J«ärgen Keil <jk@tools.de>
arpi_esp
parents:
718
diff
changeset
|
851 break; |
b36fb1ae4b53
applied solaris8/netbsd/other fixes patch by J«ärgen Keil <jk@tools.de>
arpi_esp
parents:
718
diff
changeset
|
852 default:cachedsi.dwProcessorType = PROCESSOR_INTEL_PENTIUM; |
b36fb1ae4b53
applied solaris8/netbsd/other fixes patch by J«ärgen Keil <jk@tools.de>
arpi_esp
parents:
718
diff
changeset
|
853 cachedsi.wProcessorLevel= 5; |
b36fb1ae4b53
applied solaris8/netbsd/other fixes patch by J«ärgen Keil <jk@tools.de>
arpi_esp
parents:
718
diff
changeset
|
854 break; |
b36fb1ae4b53
applied solaris8/netbsd/other fixes patch by J«ärgen Keil <jk@tools.de>
arpi_esp
parents:
718
diff
changeset
|
855 } |
b36fb1ae4b53
applied solaris8/netbsd/other fixes patch by J«ärgen Keil <jk@tools.de>
arpi_esp
parents:
718
diff
changeset
|
856 cachedsi.wProcessorRevision = regs[0] & 0xf; // stepping |
b36fb1ae4b53
applied solaris8/netbsd/other fixes patch by J«ärgen Keil <jk@tools.de>
arpi_esp
parents:
718
diff
changeset
|
857 if (regs[3] & (1 << 8)) |
b36fb1ae4b53
applied solaris8/netbsd/other fixes patch by J«ärgen Keil <jk@tools.de>
arpi_esp
parents:
718
diff
changeset
|
858 PF[PF_COMPARE_EXCHANGE_DOUBLE] = TRUE; |
b36fb1ae4b53
applied solaris8/netbsd/other fixes patch by J«ärgen Keil <jk@tools.de>
arpi_esp
parents:
718
diff
changeset
|
859 if (regs[3] & (1 << 23)) |
128 | 860 PF[PF_MMX_INSTRUCTIONS_AVAILABLE] = TRUE; |
2573 | 861 if (regs[3] & (1 << 25)) |
862 PF[PF_XMMI_INSTRUCTIONS_AVAILABLE] = TRUE; | |
863 if (regs[3] & (1 << 31)) | |
864 PF[PF_AMD3D_INSTRUCTIONS_AVAILABLE] = TRUE; | |
1 | 865 cachedsi.dwNumberOfProcessors=1; |
866 #else | |
867 { | |
868 char buf[20]; | |
869 char line[200]; | |
870 FILE *f = fopen ("/proc/cpuinfo", "r"); | |
871 | |
872 if (!f) | |
873 return; | |
874 while (fgets(line,200,f)!=NULL) { | |
875 char *s,*value; | |
876 | |
877 /* NOTE: the ':' is the only character we can rely on */ | |
878 if (!(value = strchr(line,':'))) | |
879 continue; | |
880 /* terminate the valuename */ | |
881 *value++ = '\0'; | |
882 /* skip any leading spaces */ | |
883 while (*value==' ') value++; | |
884 if ((s=strchr(value,'\n'))) | |
885 *s='\0'; | |
886 | |
887 /* 2.1 method */ | |
888 if (!lstrncmpiA(line, "cpu family",strlen("cpu family"))) { | |
889 if (isdigit (value[0])) { | |
890 switch (value[0] - '0') { | |
891 case 3: cachedsi.dwProcessorType = PROCESSOR_INTEL_386; | |
892 cachedsi.wProcessorLevel= 3; | |
893 break; | |
894 case 4: cachedsi.dwProcessorType = PROCESSOR_INTEL_486; | |
895 cachedsi.wProcessorLevel= 4; | |
896 break; | |
897 case 5: cachedsi.dwProcessorType = PROCESSOR_INTEL_PENTIUM; | |
898 cachedsi.wProcessorLevel= 5; | |
899 break; | |
900 case 6: cachedsi.dwProcessorType = PROCESSOR_INTEL_PENTIUM; | |
901 cachedsi.wProcessorLevel= 5; | |
902 break; | |
903 default:cachedsi.dwProcessorType = PROCESSOR_INTEL_PENTIUM; | |
904 cachedsi.wProcessorLevel= 5; | |
905 break; | |
906 } | |
907 } | |
908 /* set the CPU type of the current processor */ | |
2069 | 909 sprintf(buf,"CPU %ld",cachedsi.dwProcessorType); |
1 | 910 continue; |
911 } | |
912 /* old 2.0 method */ | |
913 if (!lstrncmpiA(line, "cpu",strlen("cpu"))) { | |
2651
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
914 if ( isdigit (value[0]) && value[1] == '8' && |
1 | 915 value[2] == '6' && value[3] == 0 |
916 ) { | |
917 switch (value[0] - '0') { | |
918 case 3: cachedsi.dwProcessorType = PROCESSOR_INTEL_386; | |
919 cachedsi.wProcessorLevel= 3; | |
920 break; | |
921 case 4: cachedsi.dwProcessorType = PROCESSOR_INTEL_486; | |
922 cachedsi.wProcessorLevel= 4; | |
923 break; | |
924 case 5: cachedsi.dwProcessorType = PROCESSOR_INTEL_PENTIUM; | |
925 cachedsi.wProcessorLevel= 5; | |
926 break; | |
927 case 6: cachedsi.dwProcessorType = PROCESSOR_INTEL_PENTIUM; | |
928 cachedsi.wProcessorLevel= 5; | |
929 break; | |
930 default:cachedsi.dwProcessorType = PROCESSOR_INTEL_PENTIUM; | |
931 cachedsi.wProcessorLevel= 5; | |
932 break; | |
933 } | |
934 } | |
935 /* set the CPU type of the current processor */ | |
2069 | 936 sprintf(buf,"CPU %ld",cachedsi.dwProcessorType); |
1 | 937 continue; |
938 } | |
939 if (!lstrncmpiA(line,"fdiv_bug",strlen("fdiv_bug"))) { | |
940 if (!lstrncmpiA(value,"yes",3)) | |
941 PF[PF_FLOATING_POINT_PRECISION_ERRATA] = TRUE; | |
942 | |
943 continue; | |
944 } | |
945 if (!lstrncmpiA(line,"fpu",strlen("fpu"))) { | |
946 if (!lstrncmpiA(value,"no",2)) | |
947 PF[PF_FLOATING_POINT_EMULATED] = TRUE; | |
948 | |
949 continue; | |
950 } | |
951 if (!lstrncmpiA(line,"processor",strlen("processor"))) { | |
952 /* processor number counts up...*/ | |
953 int x; | |
954 | |
955 if (sscanf(value,"%d",&x)) | |
956 if (x+1>cachedsi.dwNumberOfProcessors) | |
957 cachedsi.dwNumberOfProcessors=x+1; | |
958 | |
959 /* Create a new processor subkey on a multiprocessor | |
960 * system | |
961 */ | |
2069 | 962 sprintf(buf,"%d",x); |
1 | 963 } |
964 if (!lstrncmpiA(line,"stepping",strlen("stepping"))) { | |
965 int x; | |
966 | |
967 if (sscanf(value,"%d",&x)) | |
968 cachedsi.wProcessorRevision = x; | |
969 } | |
2651
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
970 if |
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
971 ( (!lstrncmpiA(line,"flags",strlen("flags"))) |
128 | 972 || (!lstrncmpiA(line,"features",strlen("features"))) ) |
973 { | |
1 | 974 if (strstr(value,"cx8")) |
975 PF[PF_COMPARE_EXCHANGE_DOUBLE] = TRUE; | |
976 if (strstr(value,"mmx")) | |
977 PF[PF_MMX_INSTRUCTIONS_AVAILABLE] = TRUE; | |
2573 | 978 if (strstr(value,"tsc")) |
979 PF[PF_RDTSC_INSTRUCTION_AVAILABLE] = TRUE; | |
980 if (strstr(value,"xmm")) | |
981 PF[PF_XMMI_INSTRUCTIONS_AVAILABLE] = TRUE; | |
982 if (strstr(value,"3dnow")) | |
983 PF[PF_AMD3D_INSTRUCTIONS_AVAILABLE] = TRUE; | |
1 | 984 } |
985 } | |
986 fclose (f); | |
128 | 987 /* |
988 * ad hoc fix for smp machines. | |
989 * some problems on WaitForSingleObject,CreateEvent,SetEvent | |
990 * CreateThread ...etc.. | |
991 * | |
992 */ | |
993 cachedsi.dwNumberOfProcessors=1; | |
1 | 994 } |
995 #endif /* __FreeBSD__ */ | |
2069 | 996 cache = 1; |
1 | 997 memcpy(si,&cachedsi,sizeof(*si)); |
128 | 998 DumpSystemInfo(si); |
1 | 999 } |
1000 | |
1001 long WINAPI expGetVersion() | |
1002 { | |
128 | 1003 dbgprintf("GetVersion() => 0xC0000004\n"); |
1004 return 0xC0000004;//Windows 95 | |
2651
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
1005 } |
1 | 1006 |
1007 HANDLE WINAPI expHeapCreate(long flags, long init_size, long max_size) | |
1008 { | |
1009 // printf("HeapCreate:"); | |
128 | 1010 HANDLE result; |
1 | 1011 if(init_size==0) |
128 | 1012 result=(HANDLE)my_mreq(0x110000, 0); |
1 | 1013 else |
128 | 1014 result=(HANDLE)my_mreq(init_size, 0); |
2651
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
1015 dbgprintf("HeapCreate(flags 0x%x, initial size %d, maximum size %d) => 0x%x\n", flags, init_size, max_size, result); |
128 | 1016 return result; |
2651
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
1017 } |
1 | 1018 void* WINAPI expHeapAlloc(HANDLE heap, int flags, int size) |
1019 { | |
1020 void* z; | |
1021 // printf("HeapAlloc:"); | |
128 | 1022 /** |
1023 Morgan's m3jpeg32.dll v. 2.0 encoder expects that request for | |
1024 HeapAlloc returns area larger than size argument :-/ | |
1025 **/ | |
2651
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
1026 z=my_mreq(((size+4095)/4096)*4096, flags&8); |
1 | 1027 // z=HeapAlloc(heap,flags,size); |
1028 if(z==0) | |
1029 printf("HeapAlloc failure\n"); | |
2651
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
1030 dbgprintf("HeapAlloc(heap 0x%x, flags 0x%x, size 0x%x) => 0x%x\n", heap, flags, size, z); |
1 | 1031 return z; |
1032 } | |
1033 long WINAPI expHeapDestroy(void* heap) | |
1034 { | |
2651
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
1035 dbgprintf("HeapDestroy(heap 0x%x) => 1\n", heap); |
1 | 1036 my_release(heap); |
1037 return 1; | |
1038 } | |
1039 | |
1040 long WINAPI expHeapFree(int arg1, int arg2, void* ptr) | |
1041 { | |
128 | 1042 dbgprintf("HeapFree(0x%x, 0x%x, pointer 0x%x) => 1\n", arg1, arg2, ptr); |
1 | 1043 my_release(ptr); |
1044 return 1; | |
2651
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
1045 } |
1 | 1046 long WINAPI expHeapSize(int heap, int flags, void* pointer) |
1047 { | |
128 | 1048 long result=my_size(pointer); |
1049 dbgprintf("HeapSize(heap 0x%x, flags 0x%x, pointer 0x%x) => %d\n", heap, flags, pointer, result); | |
1050 return result; | |
2651
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
1051 } |
2069 | 1052 void* WINAPI expHeapReAlloc(HANDLE heap,int flags,void *lpMem,int size) |
1053 { | |
2651
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
1054 long orgsize; |
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
1055 void *newp; |
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
1056 orgsize = my_size(lpMem); |
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
1057 dbgprintf("HeapReAlloc() Size %ld org %d\n",orgsize,size); |
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
1058 return my_realloc(lpMem, size); |
2069 | 1059 } |
1 | 1060 long WINAPI expGetProcessHeap(void) |
1061 { | |
128 | 1062 dbgprintf("GetProcessHeap() => 1\n"); |
1 | 1063 return 1; |
2651
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
1064 } |
1 | 1065 void* WINAPI expVirtualAlloc(void* v1, long v2, long v3, long v4) |
1066 { | |
1067 void* z; | |
1068 z=VirtualAlloc(v1, v2, v3, v4); | |
1069 if(z==0) | |
1070 printf("VirtualAlloc failure\n"); | |
128 | 1071 dbgprintf("VirtualAlloc(0x%x, %d, %d, %d) => 0x%x \n",v1,v2,v3,v4, z); |
1 | 1072 return z; |
1073 } | |
1074 int WINAPI expVirtualFree(void* v1, int v2, int v3) | |
1075 { | |
128 | 1076 int result=VirtualFree(v1,v2,v3); |
1077 dbgprintf("VirtualFree(0x%x, %d, %d) => %d\n",v1,v2,v3, result); | |
1078 return result; | |
1 | 1079 } |
2579 | 1080 |
1081 /* -- critical sections -- */ | |
1 | 1082 struct CRITSECT |
1083 { | |
1084 pthread_t id; | |
1085 pthread_mutex_t mutex; | |
1086 int locked; | |
1087 }; | |
2069 | 1088 |
2579 | 1089 /* we're building a table of critical sections. cs_win pointer uses the DLL |
1090 cs_unix is the real structure, we're using cs_win only to identifying cs_unix */ | |
1091 struct critsecs_list_t | |
1092 { | |
1093 CRITICAL_SECTION *cs_win; | |
1094 struct CRITSECT *cs_unix; | |
1095 }; | |
1096 | |
1097 #define CRITSECS_LIST_MAX 20 | |
1098 static struct critsecs_list_t critsecs_list[CRITSECS_LIST_MAX]; | |
1099 | |
1100 int critsecs_get_pos(CRITICAL_SECTION *cs_win) | |
1101 { | |
1102 int i; | |
1103 | |
1104 for (i=0; i < CRITSECS_LIST_MAX; i++) | |
1105 if (critsecs_list[i].cs_win == cs_win) | |
1106 return(i); | |
1107 return(-1); | |
1108 } | |
1109 | |
1110 int critsecs_get_unused(void) | |
1111 { | |
1112 int i; | |
1113 | |
1114 for (i=0; i < CRITSECS_LIST_MAX; i++) | |
1115 if (critsecs_list[i].cs_win == NULL) | |
1116 return(i); | |
1117 return(-1); | |
1118 } | |
1119 | |
1120 #if 0 | |
1121 #define critsecs_get_unix(cs_win) (critsecs_list[critsecs_get_pos(cs_win)].cs_win) | |
1122 #else | |
1123 struct CRITSECT *critsecs_get_unix(CRITICAL_SECTION *cs_win) | |
1124 { | |
1125 int i; | |
1126 | |
1127 for (i=0; i < CRITSECS_LIST_MAX; i++) | |
1128 if (critsecs_list[i].cs_win == cs_win) | |
1129 return(critsecs_list[i].cs_unix); | |
1130 return(NULL); | |
1131 } | |
1132 #endif | |
1133 | |
1134 #define CRITSECS_NEWTYPE 1 | |
1135 | |
1 | 1136 void WINAPI expInitializeCriticalSection(CRITICAL_SECTION* c) |
1137 { | |
128 | 1138 dbgprintf("InitializeCriticalSection(0x%x)\n", c); |
1 | 1139 /* if(sizeof(pthread_mutex_t)>sizeof(CRITICAL_SECTION)) |
1140 { | |
1141 printf(" ERROR:::: sizeof(pthread_mutex_t) is %d, expected <=%d!\n", | |
1142 sizeof(pthread_mutex_t), sizeof(CRITICAL_SECTION)); | |
1143 return; | |
1144 }*/ | |
1145 /* pthread_mutex_init((pthread_mutex_t*)c, NULL); */ | |
2579 | 1146 #ifdef CRITSECS_NEWTYPE |
1147 { | |
1148 struct CRITSECT *cs; | |
1149 int i = critsecs_get_unused(); | |
1150 | |
1151 if (i < 0) | |
1152 { | |
1153 printf("InitializeCriticalSection(%p) - no more space in list\n", c); | |
1154 return; | |
1155 } | |
1156 cs = malloc(sizeof(struct CRITSECT)); | |
1157 pthread_mutex_init(&cs->mutex, NULL); | |
1158 cs->locked = 0; | |
1159 critsecs_list[i].cs_win = c; | |
1160 critsecs_list[i].cs_unix = cs; | |
1161 dbgprintf("InitializeCriticalSection -> itemno=%d, cs_win=%p, cs_unix=%p\n", | |
1162 i, c, cs); | |
1163 } | |
1164 #else | |
1165 { | |
1166 struct CRITSECT cs; | |
1167 pthread_mutex_init(&cs.mutex, NULL); | |
1 | 1168 cs.locked=0; |
1169 *(void**)c=malloc(sizeof cs); | |
1170 memcpy(*(void**)c, &cs, sizeof cs); | |
2579 | 1171 } |
1172 #endif | |
1 | 1173 return; |
2579 | 1174 } |
1175 | |
1 | 1176 void WINAPI expEnterCriticalSection(CRITICAL_SECTION* c) |
1177 { | |
2579 | 1178 #ifdef CRITSECS_NEWTYPE |
1179 struct CRITSECT* cs = critsecs_get_unix(c); | |
1180 #else | |
128 | 1181 struct CRITSECT* cs=*(struct CRITSECT**)c; |
2579 | 1182 #endif |
128 | 1183 dbgprintf("EnterCriticalSection(0x%x)\n",c); |
2069 | 1184 if (!cs) |
1185 { | |
1186 expInitializeCriticalSection(c); | |
2579 | 1187 #ifdef CRITSECS_NEWTYPE |
1188 cs=critsecs_get_unix(c); | |
1189 #else | |
2069 | 1190 cs=*(struct CRITSECT**)c; |
2579 | 1191 #endif |
2069 | 1192 printf("Win32 Warning: Accessed uninitialized Critical Section (%p)!\n", c); |
1193 } | |
1 | 1194 // cs.id=pthread_self(); |
1195 if(cs->locked) | |
1196 if(cs->id==pthread_self()) | |
1197 return; | |
1198 pthread_mutex_lock(&(cs->mutex)); | |
1199 cs->locked=1; | |
1200 cs->id=pthread_self(); | |
1201 return; | |
2651
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
1202 } |
1 | 1203 void WINAPI expLeaveCriticalSection(CRITICAL_SECTION* c) |
1204 { | |
2579 | 1205 #ifdef CRITSECS_NEWTYPE |
1206 struct CRITSECT* cs = critsecs_get_unix(c); | |
1207 #else | |
128 | 1208 struct CRITSECT* cs=*(struct CRITSECT**)c; |
2579 | 1209 #endif |
128 | 1210 // struct CRITSECT* cs=(struct CRITSECT*)c; |
1211 dbgprintf("LeaveCriticalSection(0x%x)\n",c); | |
2069 | 1212 if (!cs) |
1213 { | |
1214 printf("Win32 Warning: Leaving noninitialized Critical Section %p!!\n", c); | |
1215 return; | |
1216 } | |
1 | 1217 cs->locked=0; |
1218 pthread_mutex_unlock(&(cs->mutex)); | |
1219 return; | |
1220 } | |
1221 void WINAPI expDeleteCriticalSection(CRITICAL_SECTION *c) | |
1222 { | |
2579 | 1223 #ifdef CRITSECS_NEWTYPE |
1224 struct CRITSECT* cs = critsecs_get_unix(c); | |
1225 #else | |
128 | 1226 struct CRITSECT* cs=*(struct CRITSECT**)c; |
2579 | 1227 #endif |
128 | 1228 // struct CRITSECT* cs=(struct CRITSECT*)c; |
1229 dbgprintf("DeleteCriticalSection(0x%x)\n",c); | |
1230 pthread_mutex_destroy(&(cs->mutex)); | |
2579 | 1231 // free(cs); |
1232 #ifdef CRITSECS_NEWTYPE | |
1233 { | |
1234 int i = critsecs_get_pos(c); | |
1235 | |
1236 if (i < 0) | |
1237 { | |
1238 printf("DeleteCriticalSection(%p) error (critsec not found)\n", c); | |
1239 return; | |
1240 } | |
1241 | |
1242 critsecs_list[i].cs_win = NULL; | |
1243 free(critsecs_list[i].cs_unix); | |
1244 critsecs_list[i].cs_unix = NULL; | |
1245 dbgprintf("DeleteCriticalSection -> itemno=%d\n", i); | |
1246 } | |
1247 #endif | |
1 | 1248 return; |
1249 } | |
1250 int WINAPI expGetCurrentThreadId() | |
1251 { | |
128 | 1252 dbgprintf("GetCurrentThreadId() => %d\n", getpid()); |
1253 return getpid(); | |
2651
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
1254 } |
128 | 1255 int WINAPI expGetCurrentProcess() |
1256 { | |
1257 dbgprintf("GetCurrentProcess() => %d\n", getpid()); | |
1 | 1258 return getpid(); |
2651
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
1259 } |
1307
d8c1b0b38edc
Add prototypes to wine/loader stuff, so that we can catch __stdcall function
jkeil
parents:
1096
diff
changeset
|
1260 |
2069 | 1261 struct tls_s { |
1 | 1262 void* value; |
1263 int used; | |
1264 struct tls_s* prev; | |
1265 struct tls_s* next; | |
1307
d8c1b0b38edc
Add prototypes to wine/loader stuff, so that we can catch __stdcall function
jkeil
parents:
1096
diff
changeset
|
1266 }; |
2069 | 1267 |
2651
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
1268 tls_t* g_tls=NULL; |
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
1269 |
1 | 1270 void* WINAPI expTlsAlloc() |
1271 { | |
1272 if(g_tls==NULL) | |
1273 { | |
1274 g_tls=my_mreq(sizeof(tls_t), 0); | |
1275 g_tls->next=g_tls->prev=NULL; | |
1276 } | |
1277 else | |
1278 { | |
1279 g_tls->next=my_mreq(sizeof(tls_t), 0); | |
1280 g_tls->next->prev=g_tls; | |
1281 g_tls->next->next=NULL; | |
1282 g_tls=g_tls->next; | |
1283 } | |
128 | 1284 dbgprintf("TlsAlloc() => 0x%x\n", g_tls); |
2069 | 1285 g_tls->value=0; /* XXX For Divx.dll */ |
2651
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
1286 return g_tls; |
1 | 1287 } |
1288 | |
1289 int WINAPI expTlsSetValue(tls_t* index, void* value) | |
1290 { | |
128 | 1291 int result; |
1 | 1292 if(index==0) |
128 | 1293 result=0; |
1294 else | |
1295 { | |
1296 index->value=value; | |
1297 result=1; | |
1298 } | |
1299 dbgprintf("TlsSetValue(index 0x%x, value 0x%x) => %d \n", index, value, result ); | |
1300 return result; | |
1 | 1301 } |
1302 void* WINAPI expTlsGetValue(tls_t* index) | |
1303 { | |
128 | 1304 void* result; |
1 | 1305 if(index==0) |
128 | 1306 result=0; |
1307 else | |
2651
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
1308 result=index->value; |
128 | 1309 dbgprintf("TlsGetValue(index 0x%x) => 0x%x\n", index, result); |
1310 return result; | |
1 | 1311 } |
1312 int WINAPI expTlsFree(tls_t* index) | |
1313 { | |
128 | 1314 int result; |
1 | 1315 if(index==0) |
128 | 1316 result=0; |
1317 else | |
1318 { | |
1319 if(index->next) | |
1320 index->next->prev=index->prev; | |
1321 if(index->prev) | |
1322 index->prev->next=index->next; | |
1323 my_release((void*)index); | |
1324 result=1; | |
1325 } | |
1326 dbgprintf("TlsFree(index 0x%x) => %d\n", index, result); | |
1327 return result; | |
2651
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
1328 } |
1 | 1329 void* WINAPI expLocalAlloc(int flags, int size) |
1330 { | |
1331 void* z; | |
1332 if(flags&GMEM_ZEROINIT) | |
1333 z=my_mreq(size, 1); | |
1334 else | |
1335 z=my_mreq(size, 0); | |
1336 if(z==0) | |
1337 printf("LocalAlloc() failed\n"); | |
128 | 1338 dbgprintf("LocalAlloc(%d, flags 0x%x) => 0x%x\n", size, flags, z); |
1 | 1339 return z; |
2651
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
1340 } |
2069 | 1341 |
1342 void* WINAPI expLocalReAlloc(int handle,int size, int flags) | |
1343 { | |
1344 void *newpointer; | |
1345 int oldsize; | |
1346 | |
1347 newpointer=NULL; | |
1348 if (flags & LMEM_MODIFY) { | |
1349 dbgprintf("LocalReAlloc MODIFY\n"); | |
1350 return (void *)handle; | |
1351 } | |
1352 oldsize = my_size((void *)handle); | |
2651
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
1353 newpointer = my_realloc((void *)handle,size); |
2069 | 1354 dbgprintf("LocalReAlloc(%x %d(old %d), flags 0x%x) => 0x%x\n", handle,size,oldsize, flags,newpointer); |
1355 | |
1356 return newpointer; | |
1357 } | |
1358 | |
1 | 1359 void* WINAPI expLocalLock(void* z) |
1360 { | |
128 | 1361 dbgprintf("LocalLock(0x%x) => 0x%x\n", z, z); |
1 | 1362 return z; |
2651
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
1363 } |
128 | 1364 |
1 | 1365 void* WINAPI expGlobalAlloc(int flags, int size) |
1366 { | |
1367 void* z; | |
2651
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
1368 dbgprintf("GlobalAlloc(%d, flags 0x%X)\n", size, flags); |
1 | 1369 if(flags&GMEM_ZEROINIT) |
2651
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
1370 z=my_mreq(size, 1); |
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
1371 //z=calloc(size, 1); |
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
1372 else |
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
1373 z=my_mreq(size, 0); |
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
1374 //z=malloc(size); |
1 | 1375 if(z==0) |
128 | 1376 printf("GlobalAlloc() failed\n"); |
1377 dbgprintf("GlobalAlloc(%d, flags 0x%x) => 0x%x\n", size, flags, z); | |
1 | 1378 return z; |
2651
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
1379 } |
1 | 1380 void* WINAPI expGlobalLock(void* z) |
1381 { | |
128 | 1382 dbgprintf("GlobalLock(0x%x) => 0x%x\n", z, z); |
1 | 1383 return z; |
2651
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
1384 } |
1 | 1385 int WINAPI expLoadStringA(long instance, long id, void* buf, long size) |
1386 { | |
128 | 1387 int result=LoadStringA(instance, id, buf, size); |
1388 // if(buf) | |
1389 dbgprintf("LoadStringA(instance 0x%x, id 0x%x, buffer 0x%x, size %d) => %d ( %s )\n", | |
1390 instance, id, buf, size, result, buf); | |
1391 // else | |
1392 // dbgprintf("LoadStringA(instance 0x%x, id 0x%x, buffer 0x%x, size %d) => %d\n", | |
2651
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
1393 // instance, id, buf, size, result); |
128 | 1394 return result; |
2651
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
1395 } |
1 | 1396 |
128 | 1397 long WINAPI expMultiByteToWideChar(long v1, long v2, char* s1, long siz1, short* s2, int siz2) |
1 | 1398 { |
1399 #warning FIXME | |
128 | 1400 int i; |
1401 int result; | |
1 | 1402 if(s2==0) |
128 | 1403 result=1; |
1404 else | |
1405 { | |
2651
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
1406 if(siz1>siz2/2)siz1=siz2/2; |
128 | 1407 for(i=1; i<=siz1; i++) |
1408 { | |
1409 *s2=*s1; | |
1410 if(!*s1)break; | |
1411 s2++; | |
1412 s1++; | |
1413 } | |
1414 result=i; | |
1415 } | |
1416 if(s1) | |
2651
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
1417 dbgprintf("MultiByteToWideChar(codepage %d, flags 0x%x, string 0x%x='%s'," |
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
1418 "size %d, dest buffer 0x%x, dest size %d) => %d\n", |
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
1419 v1, v2, s1, s1, siz1, s2, siz2, result); |
128 | 1420 else |
2651
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
1421 dbgprintf("MultiByteToWideChar(codepage %d, flags 0x%x, string NULL," |
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
1422 "size %d, dest buffer 0x%x, dest size %d) =>\n", |
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
1423 v1, v2, siz1, s2, siz2, result); |
128 | 1424 return result; |
1425 } | |
1426 static void wch_print(const short* str) | |
1427 { | |
1428 dbgprintf(" src: "); | |
1429 while(*str)dbgprintf("%c", *str++); | |
1430 dbgprintf("\n"); | |
1 | 1431 } |
1432 long WINAPI expWideCharToMultiByte(long v1, long v2, short* s1, long siz1, char* s2, int siz2, char* c3, int* siz3) | |
1433 { | |
1434 int result; | |
128 | 1435 dbgprintf("WideCharToMultiByte(codepage %d, flags 0x%x, src 0x%x, src size %d, " |
1436 "dest 0x%x, dest size %d, defch 0x%x, used_defch 0x%x)", v1, v2, s1, siz1, s2, siz2, c3, siz3); | |
1 | 1437 result=WideCharToMultiByte(v1, v2, s1, siz1, s2, siz2, c3, siz3); |
1438 dbgprintf("=> %d\n", result); | |
2069 | 1439 //if(s1)wch_print(s1); |
128 | 1440 if(s2)dbgprintf(" dest: %s\n", s2); |
1 | 1441 return result; |
1442 } | |
1443 long WINAPI expGetVersionExA(OSVERSIONINFOA* c) | |
1444 { | |
128 | 1445 dbgprintf("GetVersionExA(0x%x) => 1\n"); |
1446 c->dwOSVersionInfoSize=sizeof(*c); | |
1 | 1447 c->dwMajorVersion=4; |
128 | 1448 c->dwMinorVersion=0; |
1449 c->dwBuildNumber=0x4000457; | |
2069 | 1450 #if 0 |
1451 // leave it here for testing win9x-only codecs | |
1 | 1452 c->dwPlatformId=VER_PLATFORM_WIN32_WINDOWS; |
128 | 1453 strcpy(c->szCSDVersion, " B"); |
2069 | 1454 #else |
1455 c->dwPlatformId=VER_PLATFORM_WIN32_NT; // let's not make DLL assume that it can read CR* registers | |
1456 strcpy(c->szCSDVersion, "Service Pack 3"); | |
1457 #endif | |
128 | 1458 dbgprintf(" Major version: 4\n Minor version: 0\n Build number: 0x4000457\n" |
2069 | 1459 " Platform Id: VER_PLATFORM_WIN32_NT\n Version string: 'Service Pack 3'\n"); |
1 | 1460 return 1; |
2651
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
1461 } |
1 | 1462 HANDLE WINAPI expCreateSemaphoreA(char* v1, long init_count, long max_count, char* name) |
1463 { | |
128 | 1464 pthread_mutex_t *pm; |
1465 pthread_cond_t *pc; | |
2651
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
1466 mutex_list* pp; |
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
1467 /* |
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
1468 printf("CreateSemaphoreA(%p = %s)\n", name, (name ? name : "<null>")); |
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
1469 pp=mlist; |
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
1470 while(pp) |
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
1471 { |
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
1472 printf("%p => ", pp); |
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
1473 pp=pp->prev; |
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
1474 } |
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
1475 printf("0\n"); |
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
1476 */ |
128 | 1477 if(mlist!=NULL) |
1 | 1478 { |
128 | 1479 mutex_list* pp=mlist; |
1480 if(name!=NULL) | |
1481 do | |
1482 { | |
1483 if((strcmp(pp->name, name)==0) && (pp->type==1)) | |
1484 { | |
1485 dbgprintf("CreateSemaphoreA(0x%x, init_count %d, max_count %d, name 0x%x='%s') => 0x%x", | |
1486 v1, init_count, max_count, name, name, mlist); | |
1487 return (HANDLE)mlist; | |
1488 } | |
2069 | 1489 }while((pp=pp->prev) != NULL); |
2651
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
1490 } |
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
1491 pm=mreq_private(sizeof(pthread_mutex_t), 0, AREATYPE_MUTEX); |
128 | 1492 pthread_mutex_init(pm, NULL); |
2651
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
1493 pc=mreq_private(sizeof(pthread_cond_t), 0, AREATYPE_COND); |
128 | 1494 pthread_cond_init(pc, NULL); |
1495 if(mlist==NULL) | |
1496 { | |
2651
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
1497 mlist=mreq_private(sizeof(mutex_list), 00, AREATYPE_EVENT); |
128 | 1498 mlist->next=mlist->prev=NULL; |
1499 } | |
1500 else | |
1 | 1501 { |
2651
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
1502 mlist->next=mreq_private(sizeof(mutex_list), 00, AREATYPE_EVENT); |
128 | 1503 mlist->next->prev=mlist; |
1504 mlist->next->next=NULL; | |
1505 mlist=mlist->next; | |
2651
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
1506 // printf("new semaphore %p\n", mlist); |
1 | 1507 } |
128 | 1508 mlist->type=1; /* Type Semaphore */ |
1509 mlist->pm=pm; | |
1510 mlist->pc=pc; | |
1511 mlist->state=0; | |
1512 mlist->reset=0; | |
1513 mlist->semaphore=init_count; | |
1514 if(name!=NULL) | |
1515 strncpy(mlist->name, name, 64); | |
1516 else | |
1517 mlist->name[0]=0; | |
1518 if(pm==NULL) | |
1519 dbgprintf("ERROR::: CreateSemaphoreA failure\n"); | |
1520 if(name) | |
1521 dbgprintf("CreateSemaphoreA(0x%x, init_count %d, max_count %d, name 0x%x='%s') => 0x%x", | |
1522 v1, init_count, max_count, name, name, mlist); | |
1523 else | |
1524 dbgprintf("CreateSemaphoreA(0x%x, init_count %d, max_count %d, name 0) => 0x%x", | |
1525 v1, init_count, max_count, mlist); | |
1526 return (HANDLE)mlist; | |
1 | 1527 } |
2651
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
1528 |
1 | 1529 long WINAPI expReleaseSemaphore(long hsem, long increment, long* prev_count) |
1530 { | |
2651
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
1531 // The state of a semaphore object is signaled when its count |
1 | 1532 // is greater than zero and nonsignaled when its count is equal to zero |
1533 // Each time a waiting thread is released because of the semaphore's signaled | |
2651
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
1534 // state, the count of the semaphore is decreased by one. |
128 | 1535 mutex_list *ml = (mutex_list *)hsem; |
1 | 1536 |
128 | 1537 pthread_mutex_lock(ml->pm); |
1538 if (prev_count != 0) *prev_count = ml->semaphore; | |
1539 if (ml->semaphore == 0) pthread_cond_signal(ml->pc); | |
1540 ml->semaphore += increment; | |
1541 pthread_mutex_unlock(ml->pm); | |
1542 dbgprintf("ReleaseSemaphore(semaphore 0x%x, increment %d, prev_count 0x%x) => 1\n", | |
1543 hsem, increment, prev_count); | |
1544 return 1; | |
1 | 1545 } |
1546 | |
1547 | |
1548 long WINAPI expRegOpenKeyExA(long key, const char* subkey, long reserved, long access, int* newkey) | |
1549 { | |
128 | 1550 long result=RegOpenKeyExA(key, subkey, reserved, access, newkey); |
1551 dbgprintf("RegOpenKeyExA(key 0x%x, subkey %s, reserved %d, access 0x%x, pnewkey 0x%x) => %d\n", | |
1552 key, subkey, reserved, access, newkey, result); | |
1553 if(newkey)dbgprintf(" New key: 0x%x\n", *newkey); | |
1554 return result; | |
2651
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
1555 } |
1 | 1556 long WINAPI expRegCloseKey(long key) |
1557 { | |
128 | 1558 long result=RegCloseKey(key); |
1559 dbgprintf("RegCloseKey(0x%x) => %d\n", key, result); | |
1560 return result; | |
2651
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
1561 } |
1 | 1562 long WINAPI expRegQueryValueExA(long key, const char* value, int* reserved, int* type, int* data, int* count) |
1563 { | |
128 | 1564 long result=RegQueryValueExA(key, value, reserved, type, data, count); |
1565 dbgprintf("RegQueryValueExA(key 0x%x, value %s, reserved 0x%x, data 0x%x, count 0x%x)" | |
1566 " => 0x%x\n", key, value, reserved, data, count, result); | |
1567 if(data && count)dbgprintf(" read %d bytes: '%s'\n", *count, data); | |
1568 return result; | |
2651
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
1569 } |
1 | 1570 long WINAPI expRegCreateKeyExA(long key, const char* name, long reserved, |
1571 void* classs, long options, long security, | |
2651
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
1572 void* sec_attr, int* newkey, int* status) |
1 | 1573 { |
128 | 1574 long result=RegCreateKeyExA(key, name, reserved, classs, options, security, sec_attr, newkey, status); |
1575 dbgprintf("RegCreateKeyExA(key 0x%x, name 0x%x='%s', reserved=0x%x," | |
1576 " 0x%x, 0x%x, 0x%x, newkey=0x%x, status=0x%x) => %d\n", | |
1577 key, name, name, reserved, classs, options, security, sec_attr, newkey, status, result); | |
1578 if(!result && newkey) dbgprintf(" New key: 0x%x\n", *newkey); | |
1579 if(!result && status) dbgprintf(" New key status: 0x%x\n", *status); | |
1580 return result; | |
1 | 1581 } |
1582 long WINAPI expRegSetValueExA(long key, const char* name, long v1, long v2, void* data, long size) | |
1583 { | |
128 | 1584 long result=RegSetValueExA(key, name, v1, v2, data, size); |
2651
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
1585 dbgprintf("RegSetValueExA(key 0x%x, name '%s', 0x%x, 0x%x, data 0x%x -> 0x%x '%s', size=%d) => %d", |
128 | 1586 key, name, v1, v2, data, *(int*)data, data, size, result); |
1587 return result; | |
2651
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
1588 } |
1 | 1589 |
1590 long WINAPI expRegOpenKeyA ( | |
1591 long hKey, | |
1592 LPCSTR lpSubKey, | |
1593 int* phkResult | |
1594 ){ | |
128 | 1595 long result=RegOpenKeyExA(hKey, lpSubKey, 0, 0, phkResult); |
1596 dbgprintf("RegOpenKeyExA(key 0x%x, subkey '%s', 0x%x) => %d\n", | |
1597 hKey, lpSubKey, phkResult, result); | |
1598 if(!result && phkResult) dbgprintf(" New key: 0x%x\n", *phkResult); | |
1599 return result; | |
1 | 1600 } |
1601 | |
2069 | 1602 DWORD WINAPI expRegEnumValueA(HKEY hkey, DWORD index, LPSTR value, LPDWORD val_count, |
1603 LPDWORD reserved, LPDWORD type, LPBYTE data, LPDWORD count) | |
1604 { | |
1605 return RegEnumValueA(hkey, index, value, val_count, | |
1606 reserved, type, data, count); | |
1607 } | |
1608 | |
1 | 1609 long WINAPI expQueryPerformanceCounter(long long* z) |
1610 { | |
1611 longcount(z); | |
128 | 1612 dbgprintf("QueryPerformanceCounter(0x%x) => 1 ( %Ld )\n", z, *z); |
2651
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
1613 return 1; |
1 | 1614 } |
1615 | |
1307
d8c1b0b38edc
Add prototypes to wine/loader stuff, so that we can catch __stdcall function
jkeil
parents:
1096
diff
changeset
|
1616 /* |
d8c1b0b38edc
Add prototypes to wine/loader stuff, so that we can catch __stdcall function
jkeil
parents:
1096
diff
changeset
|
1617 * return CPU clock (in kHz), using linux's /proc filesystem (/proc/cpuinfo) |
d8c1b0b38edc
Add prototypes to wine/loader stuff, so that we can catch __stdcall function
jkeil
parents:
1096
diff
changeset
|
1618 */ |
d8c1b0b38edc
Add prototypes to wine/loader stuff, so that we can catch __stdcall function
jkeil
parents:
1096
diff
changeset
|
1619 static double linux_cpuinfo_freq() |
d8c1b0b38edc
Add prototypes to wine/loader stuff, so that we can catch __stdcall function
jkeil
parents:
1096
diff
changeset
|
1620 { |
d8c1b0b38edc
Add prototypes to wine/loader stuff, so that we can catch __stdcall function
jkeil
parents:
1096
diff
changeset
|
1621 double freq=-1; |
d8c1b0b38edc
Add prototypes to wine/loader stuff, so that we can catch __stdcall function
jkeil
parents:
1096
diff
changeset
|
1622 FILE *f; |
d8c1b0b38edc
Add prototypes to wine/loader stuff, so that we can catch __stdcall function
jkeil
parents:
1096
diff
changeset
|
1623 char line[200]; |
d8c1b0b38edc
Add prototypes to wine/loader stuff, so that we can catch __stdcall function
jkeil
parents:
1096
diff
changeset
|
1624 char *s,*value; |
2651
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
1625 |
1307
d8c1b0b38edc
Add prototypes to wine/loader stuff, so that we can catch __stdcall function
jkeil
parents:
1096
diff
changeset
|
1626 f = fopen ("/proc/cpuinfo", "r"); |
d8c1b0b38edc
Add prototypes to wine/loader stuff, so that we can catch __stdcall function
jkeil
parents:
1096
diff
changeset
|
1627 if (f != NULL) { |
d8c1b0b38edc
Add prototypes to wine/loader stuff, so that we can catch __stdcall function
jkeil
parents:
1096
diff
changeset
|
1628 while (fgets(line,sizeof(line),f)!=NULL) { |
d8c1b0b38edc
Add prototypes to wine/loader stuff, so that we can catch __stdcall function
jkeil
parents:
1096
diff
changeset
|
1629 /* NOTE: the ':' is the only character we can rely on */ |
d8c1b0b38edc
Add prototypes to wine/loader stuff, so that we can catch __stdcall function
jkeil
parents:
1096
diff
changeset
|
1630 if (!(value = strchr(line,':'))) |
d8c1b0b38edc
Add prototypes to wine/loader stuff, so that we can catch __stdcall function
jkeil
parents:
1096
diff
changeset
|
1631 continue; |
d8c1b0b38edc
Add prototypes to wine/loader stuff, so that we can catch __stdcall function
jkeil
parents:
1096
diff
changeset
|
1632 /* terminate the valuename */ |
d8c1b0b38edc
Add prototypes to wine/loader stuff, so that we can catch __stdcall function
jkeil
parents:
1096
diff
changeset
|
1633 *value++ = '\0'; |
d8c1b0b38edc
Add prototypes to wine/loader stuff, so that we can catch __stdcall function
jkeil
parents:
1096
diff
changeset
|
1634 /* skip any leading spaces */ |
d8c1b0b38edc
Add prototypes to wine/loader stuff, so that we can catch __stdcall function
jkeil
parents:
1096
diff
changeset
|
1635 while (*value==' ') value++; |
d8c1b0b38edc
Add prototypes to wine/loader stuff, so that we can catch __stdcall function
jkeil
parents:
1096
diff
changeset
|
1636 if ((s=strchr(value,'\n'))) |
d8c1b0b38edc
Add prototypes to wine/loader stuff, so that we can catch __stdcall function
jkeil
parents:
1096
diff
changeset
|
1637 *s='\0'; |
d8c1b0b38edc
Add prototypes to wine/loader stuff, so that we can catch __stdcall function
jkeil
parents:
1096
diff
changeset
|
1638 |
d8c1b0b38edc
Add prototypes to wine/loader stuff, so that we can catch __stdcall function
jkeil
parents:
1096
diff
changeset
|
1639 if (!strncasecmp(line, "cpu MHz",strlen("cpu MHz")) |
d8c1b0b38edc
Add prototypes to wine/loader stuff, so that we can catch __stdcall function
jkeil
parents:
1096
diff
changeset
|
1640 && sscanf(value, "%lf", &freq) == 1) { |
d8c1b0b38edc
Add prototypes to wine/loader stuff, so that we can catch __stdcall function
jkeil
parents:
1096
diff
changeset
|
1641 freq*=1000; |
d8c1b0b38edc
Add prototypes to wine/loader stuff, so that we can catch __stdcall function
jkeil
parents:
1096
diff
changeset
|
1642 break; |
2651
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
1643 } |
1307
d8c1b0b38edc
Add prototypes to wine/loader stuff, so that we can catch __stdcall function
jkeil
parents:
1096
diff
changeset
|
1644 } |
d8c1b0b38edc
Add prototypes to wine/loader stuff, so that we can catch __stdcall function
jkeil
parents:
1096
diff
changeset
|
1645 fclose(f); |
d8c1b0b38edc
Add prototypes to wine/loader stuff, so that we can catch __stdcall function
jkeil
parents:
1096
diff
changeset
|
1646 } |
d8c1b0b38edc
Add prototypes to wine/loader stuff, so that we can catch __stdcall function
jkeil
parents:
1096
diff
changeset
|
1647 return freq; |
d8c1b0b38edc
Add prototypes to wine/loader stuff, so that we can catch __stdcall function
jkeil
parents:
1096
diff
changeset
|
1648 } |
d8c1b0b38edc
Add prototypes to wine/loader stuff, so that we can catch __stdcall function
jkeil
parents:
1096
diff
changeset
|
1649 |
d8c1b0b38edc
Add prototypes to wine/loader stuff, so that we can catch __stdcall function
jkeil
parents:
1096
diff
changeset
|
1650 |
d8c1b0b38edc
Add prototypes to wine/loader stuff, so that we can catch __stdcall function
jkeil
parents:
1096
diff
changeset
|
1651 static double |
d8c1b0b38edc
Add prototypes to wine/loader stuff, so that we can catch __stdcall function
jkeil
parents:
1096
diff
changeset
|
1652 solaris_kstat_freq() |
d8c1b0b38edc
Add prototypes to wine/loader stuff, so that we can catch __stdcall function
jkeil
parents:
1096
diff
changeset
|
1653 { |
1679
73c8f54305b1
Add a few ifdefs, so that the code compiles on old solaris releases (2.6 and 7)
jkeil
parents:
1543
diff
changeset
|
1654 #if defined(HAVE_LIBKSTAT) && defined(KSTAT_DATA_INT32) |
1307
d8c1b0b38edc
Add prototypes to wine/loader stuff, so that we can catch __stdcall function
jkeil
parents:
1096
diff
changeset
|
1655 /* |
d8c1b0b38edc
Add prototypes to wine/loader stuff, so that we can catch __stdcall function
jkeil
parents:
1096
diff
changeset
|
1656 * try to extract the CPU speed from the solaris kernel's kstat data |
d8c1b0b38edc
Add prototypes to wine/loader stuff, so that we can catch __stdcall function
jkeil
parents:
1096
diff
changeset
|
1657 */ |
d8c1b0b38edc
Add prototypes to wine/loader stuff, so that we can catch __stdcall function
jkeil
parents:
1096
diff
changeset
|
1658 kstat_ctl_t *kc; |
d8c1b0b38edc
Add prototypes to wine/loader stuff, so that we can catch __stdcall function
jkeil
parents:
1096
diff
changeset
|
1659 kstat_t *ksp; |
d8c1b0b38edc
Add prototypes to wine/loader stuff, so that we can catch __stdcall function
jkeil
parents:
1096
diff
changeset
|
1660 kstat_named_t *kdata; |
d8c1b0b38edc
Add prototypes to wine/loader stuff, so that we can catch __stdcall function
jkeil
parents:
1096
diff
changeset
|
1661 int mhz = 0; |
d8c1b0b38edc
Add prototypes to wine/loader stuff, so that we can catch __stdcall function
jkeil
parents:
1096
diff
changeset
|
1662 |
d8c1b0b38edc
Add prototypes to wine/loader stuff, so that we can catch __stdcall function
jkeil
parents:
1096
diff
changeset
|
1663 kc = kstat_open(); |
d8c1b0b38edc
Add prototypes to wine/loader stuff, so that we can catch __stdcall function
jkeil
parents:
1096
diff
changeset
|
1664 if (kc != NULL) |
d8c1b0b38edc
Add prototypes to wine/loader stuff, so that we can catch __stdcall function
jkeil
parents:
1096
diff
changeset
|
1665 { |
d8c1b0b38edc
Add prototypes to wine/loader stuff, so that we can catch __stdcall function
jkeil
parents:
1096
diff
changeset
|
1666 ksp = kstat_lookup(kc, "cpu_info", 0, "cpu_info0"); |
d8c1b0b38edc
Add prototypes to wine/loader stuff, so that we can catch __stdcall function
jkeil
parents:
1096
diff
changeset
|
1667 |
d8c1b0b38edc
Add prototypes to wine/loader stuff, so that we can catch __stdcall function
jkeil
parents:
1096
diff
changeset
|
1668 /* kstat found and name/value pairs? */ |
d8c1b0b38edc
Add prototypes to wine/loader stuff, so that we can catch __stdcall function
jkeil
parents:
1096
diff
changeset
|
1669 if (ksp != NULL && ksp->ks_type == KSTAT_TYPE_NAMED) |
d8c1b0b38edc
Add prototypes to wine/loader stuff, so that we can catch __stdcall function
jkeil
parents:
1096
diff
changeset
|
1670 { |
d8c1b0b38edc
Add prototypes to wine/loader stuff, so that we can catch __stdcall function
jkeil
parents:
1096
diff
changeset
|
1671 /* read the kstat data from the kernel */ |
d8c1b0b38edc
Add prototypes to wine/loader stuff, so that we can catch __stdcall function
jkeil
parents:
1096
diff
changeset
|
1672 if (kstat_read(kc, ksp, NULL) != -1) |
d8c1b0b38edc
Add prototypes to wine/loader stuff, so that we can catch __stdcall function
jkeil
parents:
1096
diff
changeset
|
1673 { |
d8c1b0b38edc
Add prototypes to wine/loader stuff, so that we can catch __stdcall function
jkeil
parents:
1096
diff
changeset
|
1674 /* |
d8c1b0b38edc
Add prototypes to wine/loader stuff, so that we can catch __stdcall function
jkeil
parents:
1096
diff
changeset
|
1675 * lookup desired "clock_MHz" entry, check the expected |
d8c1b0b38edc
Add prototypes to wine/loader stuff, so that we can catch __stdcall function
jkeil
parents:
1096
diff
changeset
|
1676 * data type |
d8c1b0b38edc
Add prototypes to wine/loader stuff, so that we can catch __stdcall function
jkeil
parents:
1096
diff
changeset
|
1677 */ |
d8c1b0b38edc
Add prototypes to wine/loader stuff, so that we can catch __stdcall function
jkeil
parents:
1096
diff
changeset
|
1678 kdata = (kstat_named_t *)kstat_data_lookup(ksp, "clock_MHz"); |
d8c1b0b38edc
Add prototypes to wine/loader stuff, so that we can catch __stdcall function
jkeil
parents:
1096
diff
changeset
|
1679 if (kdata != NULL && kdata->data_type == KSTAT_DATA_INT32) |
d8c1b0b38edc
Add prototypes to wine/loader stuff, so that we can catch __stdcall function
jkeil
parents:
1096
diff
changeset
|
1680 mhz = kdata->value.i32; |
d8c1b0b38edc
Add prototypes to wine/loader stuff, so that we can catch __stdcall function
jkeil
parents:
1096
diff
changeset
|
1681 } |
d8c1b0b38edc
Add prototypes to wine/loader stuff, so that we can catch __stdcall function
jkeil
parents:
1096
diff
changeset
|
1682 } |
d8c1b0b38edc
Add prototypes to wine/loader stuff, so that we can catch __stdcall function
jkeil
parents:
1096
diff
changeset
|
1683 kstat_close(kc); |
d8c1b0b38edc
Add prototypes to wine/loader stuff, so that we can catch __stdcall function
jkeil
parents:
1096
diff
changeset
|
1684 } |
d8c1b0b38edc
Add prototypes to wine/loader stuff, so that we can catch __stdcall function
jkeil
parents:
1096
diff
changeset
|
1685 |
d8c1b0b38edc
Add prototypes to wine/loader stuff, so that we can catch __stdcall function
jkeil
parents:
1096
diff
changeset
|
1686 if (mhz > 0) |
d8c1b0b38edc
Add prototypes to wine/loader stuff, so that we can catch __stdcall function
jkeil
parents:
1096
diff
changeset
|
1687 return mhz * 1000.; |
d8c1b0b38edc
Add prototypes to wine/loader stuff, so that we can catch __stdcall function
jkeil
parents:
1096
diff
changeset
|
1688 #endif /* HAVE_LIBKSTAT */ |
d8c1b0b38edc
Add prototypes to wine/loader stuff, so that we can catch __stdcall function
jkeil
parents:
1096
diff
changeset
|
1689 return -1; // kstat stuff is not available, CPU freq is unknown |
d8c1b0b38edc
Add prototypes to wine/loader stuff, so that we can catch __stdcall function
jkeil
parents:
1096
diff
changeset
|
1690 } |
d8c1b0b38edc
Add prototypes to wine/loader stuff, so that we can catch __stdcall function
jkeil
parents:
1096
diff
changeset
|
1691 |
d8c1b0b38edc
Add prototypes to wine/loader stuff, so that we can catch __stdcall function
jkeil
parents:
1096
diff
changeset
|
1692 /* |
d8c1b0b38edc
Add prototypes to wine/loader stuff, so that we can catch __stdcall function
jkeil
parents:
1096
diff
changeset
|
1693 * Measure CPU freq using the pentium's time stamp counter register (TSC) |
d8c1b0b38edc
Add prototypes to wine/loader stuff, so that we can catch __stdcall function
jkeil
parents:
1096
diff
changeset
|
1694 */ |
d8c1b0b38edc
Add prototypes to wine/loader stuff, so that we can catch __stdcall function
jkeil
parents:
1096
diff
changeset
|
1695 static double tsc_freq() |
1 | 1696 { |
128 | 1697 static double ofreq=0.0; |
1698 int i; | |
1 | 1699 int x,y; |
128 | 1700 i=time(NULL); |
1701 if (ofreq != 0.0) return ofreq; | |
1 | 1702 while(i==time(NULL)); |
1703 x=localcount(); | |
1704 i++; | |
1705 while(i==time(NULL)); | |
1706 y=localcount(); | |
128 | 1707 ofreq = (double)(y-x)/1000.; |
1708 return ofreq; | |
1 | 1709 } |
1307
d8c1b0b38edc
Add prototypes to wine/loader stuff, so that we can catch __stdcall function
jkeil
parents:
1096
diff
changeset
|
1710 |
1 | 1711 static double CPU_Freq() |
1712 { | |
1307
d8c1b0b38edc
Add prototypes to wine/loader stuff, so that we can catch __stdcall function
jkeil
parents:
1096
diff
changeset
|
1713 double freq; |
2651
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
1714 |
1307
d8c1b0b38edc
Add prototypes to wine/loader stuff, so that we can catch __stdcall function
jkeil
parents:
1096
diff
changeset
|
1715 if ((freq = linux_cpuinfo_freq()) > 0) |
d8c1b0b38edc
Add prototypes to wine/loader stuff, so that we can catch __stdcall function
jkeil
parents:
1096
diff
changeset
|
1716 return freq; |
1 | 1717 |
1307
d8c1b0b38edc
Add prototypes to wine/loader stuff, so that we can catch __stdcall function
jkeil
parents:
1096
diff
changeset
|
1718 if ((freq = solaris_kstat_freq()) > 0) |
1 | 1719 return freq; |
1307
d8c1b0b38edc
Add prototypes to wine/loader stuff, so that we can catch __stdcall function
jkeil
parents:
1096
diff
changeset
|
1720 |
2651
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
1721 return tsc_freq(); |
1 | 1722 } |
1723 | |
1724 long WINAPI expQueryPerformanceFrequency(long long* z) | |
1725 { | |
1726 *z=(long long)CPU_Freq(); | |
128 | 1727 dbgprintf("QueryPerformanceFrequency(0x%x) => 1 ( %Ld )\n", z, *z); |
2651
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
1728 return 1; |
1 | 1729 } |
1730 long WINAPI exptimeGetTime() | |
1731 { | |
1732 struct timeval t; | |
128 | 1733 long result; |
1 | 1734 gettimeofday(&t, 0); |
128 | 1735 result=1000*t.tv_sec+t.tv_usec/1000; |
1736 dbgprintf("timeGetTime() => %d\n", result); | |
1737 return result; | |
1 | 1738 } |
1739 void* WINAPI expLocalHandle(void* v) | |
1740 { | |
128 | 1741 dbgprintf("LocalHandle(0x%x) => 0x%x\n", v, v); |
1 | 1742 return v; |
2651
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
1743 } |
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
1744 |
1 | 1745 void* WINAPI expGlobalHandle(void* v) |
1746 { | |
128 | 1747 dbgprintf("GlobalHandle(0x%x) => 0x%x\n", v, v); |
1 | 1748 return v; |
2651
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
1749 } |
1 | 1750 int WINAPI expGlobalUnlock(void* v) |
1751 { | |
128 | 1752 dbgprintf("GlobalUnlock(0x%x) => 1\n", v); |
1 | 1753 return 1; |
1754 } | |
1755 void* WINAPI expGlobalFree(void* v) | |
1756 { | |
128 | 1757 dbgprintf("GlobalFree(0x%x) => 0\n", v); |
2651
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
1758 my_release(v); |
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
1759 //free(v); |
1 | 1760 return 0; |
128 | 1761 } |
2651
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
1762 |
128 | 1763 void* WINAPI expGlobalReAlloc(void* v, int size, int flags) |
1764 { | |
2651
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
1765 void* result=my_realloc(v, size); |
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
1766 //void* result=realloc(v, size); |
128 | 1767 dbgprintf("GlobalReAlloc(0x%x, size %d, flags 0x%x) => 0x%x\n", v,size,flags,result); |
1768 return result; | |
1769 } | |
1 | 1770 |
1771 int WINAPI expLocalUnlock(void* v) | |
1772 { | |
128 | 1773 dbgprintf("LocalUnlock(0x%x) => 1\n", v); |
1 | 1774 return 1; |
1775 } | |
128 | 1776 // |
1 | 1777 void* WINAPI expLocalFree(void* v) |
1778 { | |
128 | 1779 dbgprintf("LocalFree(0x%x) => 0\n", v); |
1 | 1780 my_release(v); |
1781 return 0; | |
2651
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
1782 } |
1 | 1783 HRSRC WINAPI expFindResourceA(HMODULE module, char* name, char* type) |
1784 { | |
128 | 1785 HRSRC result=FindResourceA(module, name, type); |
1786 dbgprintf("FindResourceA(module 0x%x, name 0x%x, type 0x%x) => 0x%x\n", module, name, type, result); | |
1787 return result; | |
1 | 1788 } |
128 | 1789 extern HRSRC WINAPI LoadResource(HMODULE, HRSRC); |
1 | 1790 HGLOBAL WINAPI expLoadResource(HMODULE module, HRSRC res) |
1791 { | |
128 | 1792 HGLOBAL result=LoadResource(module, res); |
1793 dbgprintf("LoadResource(module 0x%x, resource 0x%x) => 0x%x\n", module, res, result); | |
1794 return result; | |
1 | 1795 } |
1796 void* WINAPI expLockResource(long res) | |
1797 { | |
128 | 1798 void* result=LockResource(res); |
1799 dbgprintf("LockResource(0x%x) => 0x%x\n", res, result); | |
1800 return result; | |
2651
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
1801 } |
1 | 1802 int WINAPI expFreeResource(long res) |
1803 { | |
128 | 1804 int result=FreeResource(res); |
1805 dbgprintf("FreeResource(0x%x) => %d\n", res, result); | |
1806 return result; | |
2651
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
1807 } |
1 | 1808 //bool fun(HANDLE) |
1809 //!0 on success | |
1810 int WINAPI expCloseHandle(long v1) | |
1811 { | |
128 | 1812 dbgprintf("CloseHandle(0x%x) => 1\n", v1); |
1 | 1813 return 1; |
2651
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
1814 } |
1 | 1815 |
1816 const char* WINAPI expGetCommandLineA() | |
1817 { | |
128 | 1818 dbgprintf("GetCommandLineA() => \"c:\\aviplay.exe\"\n"); |
1 | 1819 return "c:\\aviplay.exe"; |
1820 } | |
128 | 1821 static short envs[]={'p', 'a', 't', 'h', ' ', 'c', ':', '\\', 0, 0}; |
1 | 1822 LPWSTR WINAPI expGetEnvironmentStringsW() |
1823 { | |
128 | 1824 dbgprintf("GetEnvironmentStringsW() => 0\n", envs); |
1825 return 0; | |
1 | 1826 } |
121 | 1827 void * WINAPI expRtlZeroMemory(void *p, size_t len) |
1828 { | |
1829 void* result=memset(p,0,len); | |
1830 dbgprintf("RtlZeroMemory(0x%x, len %d) => 0x%x\n",p,len,result); | |
1831 return result; | |
1832 } | |
1833 void * WINAPI expRtlMoveMemory(void *dst, void *src, size_t len) | |
1834 { | |
1835 void* result=memmove(dst,src,len); | |
1836 dbgprintf("RtlMoveMemory (dest 0x%x, src 0x%x, len %d) => 0x%x\n",dst,src,len,result); | |
1837 return result; | |
1838 } | |
1839 | |
1840 void * WINAPI expRtlFillMemory(void *p, int ch, size_t len) | |
1841 { | |
1842 void* result=memset(p,ch,len); | |
1843 dbgprintf("RtlFillMemory(0x%x, char 0x%x, len %d) => 0x%x\n",p,ch,len,result); | |
1844 return result; | |
1845 } | |
1 | 1846 int WINAPI expFreeEnvironmentStringsW(short* strings) |
1847 { | |
128 | 1848 dbgprintf("FreeEnvironmentStringsW(0x%x) => 1\n", strings); |
1 | 1849 return 1; |
1850 } | |
128 | 1851 int WINAPI expFreeEnvironmentStringsA(char* strings) |
1852 { | |
1853 dbgprintf("FreeEnvironmentStringsA(0x%x) => 1\n", strings); | |
1854 return 1; | |
1855 } | |
1856 static const char ch_envs[]= | |
1857 "__MSVCRT_HEAP_SELECT=__GLOBAL_HEAP_SELECTED,1\r\n" | |
1858 "PATH=C:\\;C:\\windows\\;C:\\windows\\system\r\n"; | |
1 | 1859 LPCSTR WINAPI expGetEnvironmentStrings() |
1860 { | |
128 | 1861 dbgprintf("GetEnvironmentStrings() => 0x%x\n", ch_envs); |
1862 return (LPCSTR)ch_envs; | |
1863 // dbgprintf("GetEnvironmentStrings() => 0\n"); | |
1864 // return 0; | |
1 | 1865 } |
1866 | |
1867 int WINAPI expGetStartupInfoA(STARTUPINFOA *s) | |
1868 { | |
2651
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
1869 int i; |
128 | 1870 dbgprintf("GetStartupInfoA(0x%x) => 1\n"); |
1 | 1871 memset(s, 0, sizeof(*s)); |
1872 s->cb=sizeof(*s); | |
128 | 1873 // s->lpReserved="Reserved"; |
1874 // s->lpDesktop="Desktop"; | |
1875 // s->lpTitle="Title"; | |
1876 // s->dwX=s->dwY=0; | |
1877 // s->dwXSize=s->dwYSize=200; | |
1878 s->dwFlags=s->wShowWindow=1; | |
1879 // s->hStdInput=s->hStdOutput=s->hStdError=0x1234; | |
1880 dbgprintf(" cb=%d\n", s->cb); | |
1881 dbgprintf(" lpReserved='%s'\n", s->lpReserved); | |
1882 dbgprintf(" lpDesktop='%s'\n", s->lpDesktop); | |
1883 dbgprintf(" lpTitle='%s'\n", s->lpTitle); | |
1884 dbgprintf(" dwX=%d dwY=%d dwXSize=%d dwYSize=%d\n", | |
1885 s->dwX, s->dwY, s->dwXSize, s->dwYSize); | |
1886 dbgprintf(" dwXCountChars=%d dwYCountChars=%d dwFillAttribute=%d\n", | |
1887 s->dwXCountChars, s->dwYCountChars, s->dwFillAttribute); | |
1888 dbgprintf(" dwFlags=0x%x wShowWindow=0x%x cbReserved2=0x%x\n", | |
1889 s->dwFlags, s->wShowWindow, s->cbReserved2); | |
1890 dbgprintf(" lpReserved2=0x%x hStdInput=0x%x hStdOutput=0x%x hStdError=0x%x\n", | |
1891 s->lpReserved2, s->hStdInput, s->hStdOutput, s->hStdError); | |
1 | 1892 return 1; |
2651
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
1893 } |
1 | 1894 |
1895 int WINAPI expGetStdHandle(int z) | |
1896 { | |
128 | 1897 dbgprintf("GetStdHandle(0x%x) => 0x%x\n", z+0x1234); |
1898 return z+0x1234; | |
1 | 1899 } |
1900 int WINAPI expGetFileType(int handle) | |
1901 { | |
128 | 1902 dbgprintf("GetFileType(0x%x) => 0x3 = pipe\n", handle); |
1903 return 0x3; | |
1 | 1904 } |
1905 int WINAPI expSetHandleCount(int count) | |
1906 { | |
128 | 1907 dbgprintf("SetHandleCount(0x%x) => 1\n", count); |
2651
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
1908 return 1; |
1 | 1909 } |
1910 int WINAPI expGetACP() | |
1911 { | |
128 | 1912 dbgprintf("GetACP() => 0\n"); |
2651
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
1913 return 0; |
1 | 1914 } |
1915 extern WINE_MODREF *MODULE32_LookupHMODULE(HMODULE m); | |
1916 int WINAPI expGetModuleFileNameA(int module, char* s, int len) | |
1917 { | |
1918 WINE_MODREF *mr; | |
128 | 1919 int result; |
1 | 1920 // printf("File name of module %X requested\n", module); |
1921 if(s==0) | |
128 | 1922 result=0; |
1923 else | |
1 | 1924 if(len<35) |
128 | 1925 result=0; |
1926 else | |
1 | 1927 { |
128 | 1928 result=1; |
1929 strcpy(s, "c:\\windows\\system\\"); | |
1930 mr=MODULE32_LookupHMODULE(module); | |
1931 if(mr==0)//oops | |
1932 strcat(s, "aviplay.dll"); | |
1933 else | |
1934 if(strrchr(mr->filename, '/')==NULL) | |
1935 strcat(s, mr->filename); | |
1936 else | |
1937 strcat(s, strrchr(mr->filename, '/')+1); | |
1938 } | |
1939 if(!s) | |
1940 dbgprintf("GetModuleFileNameA(0x%x, 0x%x, %d) => %d\n", | |
1941 module, s, len, result); | |
1 | 1942 else |
128 | 1943 dbgprintf("GetModuleFileNameA(0x%x, 0x%x, %d) => %d ( '%s' )", |
2651
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
1944 module, s, len, result, s); |
128 | 1945 return result; |
2651
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
1946 } |
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
1947 |
1 | 1948 int WINAPI expSetUnhandledExceptionFilter(void* filter) |
1949 { | |
128 | 1950 dbgprintf("SetUnhandledExceptionFilter(0x%x) => 1\n", filter); |
1 | 1951 return 1;//unsupported and probably won't ever be supported |
2651
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
1952 } |
2069 | 1953 |
1 | 1954 int WINAPI expLoadLibraryA(char* name) |
1955 { | |
2069 | 1956 int result = 0; |
713 | 1957 char* lastbc; |
2069 | 1958 int i; |
713 | 1959 if (!name) |
1960 return -1; | |
1961 // we skip to the last backslash | |
1962 // this is effectively eliminating weird characters in | |
1963 // the text output windows | |
2069 | 1964 |
713 | 1965 lastbc = strrchr(name, '\\'); |
1966 if (lastbc) | |
1967 { | |
1968 int i; | |
1969 lastbc++; | |
1970 for (i = 0; 1 ;i++) | |
1971 { | |
1972 name[i] = *lastbc++; | |
1973 if (!name[i]) | |
1974 break; | |
1975 } | |
1976 } | |
2069 | 1977 if(strncmp(name, "c:\\windows\\", 11)==0) name += 11; |
1416 | 1978 if(strncmp(name, ".\\", 2)==0) name += 2; |
2069 | 1979 |
1980 dbgprintf("Entering LoadLibraryA(%s)\n", name); | |
2651
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
1981 // PIMJ is loading kernel32.dll |
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
1982 if (strcasecmp(name, "kernel32.dll") == 1) |
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
1983 return (int) LookupExternal(name, 0); |
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
1984 |
2069 | 1985 result=LoadLibraryA(name); |
1986 dbgprintf("Returned LoadLibraryA(0x%x='%s'), def_path=%s => 0x%x\n", name, name, def_path, result); | |
1987 | |
128 | 1988 return result; |
2069 | 1989 } |
1 | 1990 int WINAPI expFreeLibrary(int module) |
1991 { | |
128 | 1992 int result=FreeLibrary(module); |
1993 dbgprintf("FreeLibrary(0x%x) => %d\n", module, result); | |
1994 return result; | |
2651
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
1995 } |
1 | 1996 void* WINAPI expGetProcAddress(HMODULE mod, char* name) |
1997 { | |
2069 | 1998 void* result; |
1999 if(mod!=MODULE_HANDLE_kernel32) | |
128 | 2000 result=GetProcAddress(mod, name); |
2001 else | |
2002 result=LookupExternalByName("kernel32.dll", name); | |
2003 dbgprintf("GetProcAddress(0x%x, '%s') => 0x%x\n", mod, name, result); | |
2004 return result; | |
2069 | 2005 } |
1 | 2006 |
2007 long WINAPI expCreateFileMappingA(int hFile, void* lpAttr, | |
2008 long flProtect, long dwMaxHigh, long dwMaxLow, const char* name) | |
2009 { | |
128 | 2010 long result=CreateFileMappingA(hFile, lpAttr, flProtect, dwMaxHigh, dwMaxLow, name); |
2011 if(!name) | |
2651
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
2012 dbgprintf("CreateFileMappingA(file 0x%x, lpAttr 0x%x," |
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
2013 "flProtect 0x%x, dwMaxHigh 0x%x, dwMaxLow 0x%x, name 0) => %d\n", |
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
2014 hFile, lpAttr, flProtect, dwMaxHigh, dwMaxLow, result); |
128 | 2015 else |
2651
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
2016 dbgprintf("CreateFileMappingA(file 0x%x, lpAttr 0x%x," |
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
2017 "flProtect 0x%x, dwMaxHigh 0x%x, dwMaxLow 0x%x, name 0x%x='%s') => %d\n", |
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
2018 hFile, lpAttr, flProtect, dwMaxHigh, dwMaxLow, name, name, result); |
128 | 2019 return result; |
2651
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
2020 } |
1 | 2021 |
2022 long WINAPI expOpenFileMappingA(long hFile, long hz, const char* name) | |
2023 { | |
128 | 2024 long result=OpenFileMappingA(hFile, hz, name); |
2025 if(!name) | |
2026 dbgprintf("OpenFileMappingA(0x%x, 0x%x, 0) => %d\n", | |
2027 hFile, hz, result); | |
2028 else | |
2029 dbgprintf("OpenFileMappingA(0x%x, 0x%x, 0x%x='%s') => %d\n", | |
2030 hFile, hz, name, name, result); | |
2031 return result; | |
1 | 2032 } |
2033 | |
2034 void* WINAPI expMapViewOfFile(HANDLE file, DWORD mode, DWORD offHigh, DWORD offLow, DWORD size) | |
2035 { | |
128 | 2036 dbgprintf("MapViewOfFile(0x%x, 0x%x, 0x%x, 0x%x, size %d) => 0x%x\n", |
2037 file,mode,offHigh,offLow,size,(char*)file+offLow); | |
1 | 2038 return (char*)file+offLow; |
2039 } | |
2040 | |
2041 void* WINAPI expUnmapViewOfFile(void* view) | |
2042 { | |
128 | 2043 dbgprintf("UnmapViewOfFile(0x%x) => 0\n", view); |
1 | 2044 return 0; |
2045 } | |
2046 | |
2047 void* WINAPI expSleep(int time) | |
2048 { | |
2069 | 2049 // extern int avm_usleep(int); |
128 | 2050 dbgprintf("Sleep(%d) => 0\n", time); |
2069 | 2051 // avm_usleep(time); |
1 | 2052 usleep(time); |
2053 return 0; | |
2054 } | |
2055 // why does IV32 codec want to call this? I don't know ... | |
2056 void* WINAPI expCreateCompatibleDC(int hdc) | |
2057 { | |
128 | 2058 dbgprintf("CreateCompatibleDC(%d) => 0x81\n", hdc); |
2059 return (void*)0x81; | |
1 | 2060 } |
2061 | |
2062 int WINAPI expGetDeviceCaps(int hdc, int unk) | |
2063 { | |
128 | 2064 dbgprintf("GetDeviceCaps(0x%x, %d) => 0\n", hdc, unk); |
1 | 2065 return 0; |
2066 } | |
2067 | |
2068 WIN_BOOL WINAPI expDeleteDC(int hdc) | |
2069 { | |
128 | 2070 dbgprintf("DeleteDC(0x%x) => 0\n", hdc); |
1 | 2071 return 0; |
2072 } | |
2073 | |
2074 int expwsprintfA(char* string, char* format, ...) | |
2075 { | |
2076 va_list va; | |
128 | 2077 int result; |
1 | 2078 va_start(va, format); |
128 | 2079 result=vsprintf(string, format, va); |
2080 dbgprintf("wsprintfA(0x%x, '%s', ...) => %d\n", string, format, result); | |
2081 va_end(va); | |
2082 return result; | |
1 | 2083 } |
2084 | |
2085 int WINAPI expGetPrivateProfileIntA(const char* appname, const char* keyname, int default_value, const char* filename) | |
2086 { | |
2087 int size=255; | |
2088 char buffer[256]; | |
2089 char* fullname; | |
2090 int result; | |
2651
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
2091 |
1 | 2092 buffer[255]=0; |
128 | 2093 if(!(appname && keyname && filename) ) |
2094 { | |
2095 dbgprintf("GetPrivateProfileIntA('%s', '%s', %d, '%s') => %d\n", appname, keyname, default_value, filename, default_value ); | |
2096 return default_value; | |
2097 } | |
1 | 2098 fullname=(char*)malloc(50+strlen(appname)+strlen(keyname)+strlen(filename)); |
2099 strcpy(fullname, "Software\\IniFileMapping\\"); | |
2100 strcat(fullname, appname); | |
2101 strcat(fullname, "\\"); | |
2102 strcat(fullname, keyname); | |
2103 strcat(fullname, "\\"); | |
2104 strcat(fullname, filename); | |
2105 result=RegQueryValueExA(HKEY_LOCAL_MACHINE, fullname, NULL, NULL, (int*)buffer, &size); | |
2106 if((size>=0)&&(size<256)) | |
2107 buffer[size]=0; | |
2108 // printf("GetPrivateProfileIntA(%s, %s, %s) -> %s\n", appname, keyname, filename, buffer); | |
2651
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
2109 free(fullname); |
1 | 2110 if(result) |
128 | 2111 result=default_value; |
1 | 2112 else |
128 | 2113 result=atoi(buffer); |
2114 dbgprintf("GetPrivateProfileIntA('%s', '%s', %d, '%s') => %d\n", appname, keyname, default_value, filename, result); | |
2115 return result; | |
1 | 2116 } |
128 | 2117 int WINAPI expGetProfileIntA(const char* appname, const char* keyname, int default_value) |
2118 { | |
2119 dbgprintf("GetProfileIntA -> "); | |
2120 // dbgprintf("GetProfileIntA(%s, %s, %d)\n", appname, keyname, default_value); | |
2651
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
2121 return expGetPrivateProfileIntA(appname, keyname, default_value, "default"); |
128 | 2122 } |
2123 | |
1 | 2124 int WINAPI expGetPrivateProfileStringA(const char* appname, const char* keyname, |
2125 const char* def_val, char* dest, unsigned int len, const char* filename) | |
2126 { | |
2127 int result; | |
2128 int size; | |
2129 char* fullname; | |
128 | 2130 dbgprintf("GetPrivateProfileStringA('%s', '%s', def_val '%s', 0x%x, 0x%x, '%s')", appname, keyname, def_val, dest, len, filename ); |
1 | 2131 if(!(appname && keyname && filename) ) return 0; |
2132 fullname=(char*)malloc(50+strlen(appname)+strlen(keyname)+strlen(filename)); | |
2133 strcpy(fullname, "Software\\IniFileMapping\\"); | |
2134 strcat(fullname, appname); | |
2135 strcat(fullname, "\\"); | |
2136 strcat(fullname, keyname); | |
2137 strcat(fullname, "\\"); | |
2138 strcat(fullname, filename); | |
2139 size=len; | |
2140 result=RegQueryValueExA(HKEY_LOCAL_MACHINE, fullname, NULL, NULL, (int*)dest, &size); | |
2141 // printf("GetPrivateProfileStringA(%s, %s, %s, %X, %X, %s)\n", appname, keyname, def_val, dest, len, filename ); | |
2651
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
2142 free(fullname); |
128 | 2143 if(result) |
2144 { | |
2145 strncpy(dest, def_val, size); | |
2146 if (strlen(def_val)< size) size = strlen(def_val); | |
2147 } | |
2148 dbgprintf(" => %d ( '%s' )\n", size, dest); | |
1 | 2149 return size; |
2150 } | |
2151 int WINAPI expWritePrivateProfileStringA(const char* appname, const char* keyname, | |
2152 const char* string, const char* filename) | |
2153 { | |
2154 int size=256; | |
2155 char* fullname; | |
128 | 2156 dbgprintf("WritePrivateProfileStringA('%s', '%s', '%s', '%s')", appname, keyname, string, filename ); |
2651
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
2157 if(!(appname && keyname && filename) ) |
128 | 2158 { |
2159 dbgprintf(" => -1\n"); | |
2651
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
2160 return -1; |
128 | 2161 } |
1 | 2162 fullname=(char*)malloc(50+strlen(appname)+strlen(keyname)+strlen(filename)); |
2163 strcpy(fullname, "Software\\IniFileMapping\\"); | |
2164 strcat(fullname, appname); | |
2165 strcat(fullname, "\\"); | |
2166 strcat(fullname, keyname); | |
2167 strcat(fullname, "\\"); | |
2168 strcat(fullname, filename); | |
2169 RegSetValueExA(HKEY_LOCAL_MACHINE, fullname, 0, REG_SZ, (int*)string, strlen(string)); | |
2170 // printf("RegSetValueExA(%s,%d)\n", string, strlen(string)); | |
2171 // printf("WritePrivateProfileStringA(%s, %s, %s, %s)\n", appname, keyname, string, filename ); | |
2651
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
2172 free(fullname); |
128 | 2173 dbgprintf(" => 0\n"); |
1 | 2174 return 0; |
2175 } | |
2139 | 2176 int expsprintf(char* str, const char* format, ...) |
2177 { | |
2178 va_list args; | |
2179 int r; | |
2180 dbgprintf("sprintf(%s, %s)\n", str, format); | |
2181 va_start(args, format); | |
2182 r = vsprintf(str, format, args); | |
2183 va_end(args); | |
2184 return r; | |
2185 } | |
2186 int expsscanf(const char* str, const char* format, ...) | |
2187 { | |
2188 va_list args; | |
2189 int r; | |
2190 dbgprintf("sscanf(%s, %s)\n", str, format); | |
2191 va_start(args, format); | |
2192 r = vsscanf(str, format, args); | |
2193 va_end(args); | |
2194 return r; | |
2195 } | |
2196 void* expfopen(const char* path, const char* mode) | |
2197 { | |
2198 printf("fopen: \"%s\" mode:%s\n", path, mode); | |
2199 //return fopen(path, mode); | |
2651
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
2200 return fdopen(0, mode); // everything on screen |
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
2201 } |
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
2202 int expfprintf(void* stream, const char* format, ...) |
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
2203 { |
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
2204 va_list args; |
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
2205 int r = 0; |
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
2206 #if 1 |
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
2207 va_start(args, format); |
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
2208 r = vfprintf((FILE*) stream, format, args); |
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
2209 va_end(args); |
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
2210 #endif |
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
2211 return r; |
2139 | 2212 } |
2651
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
2213 |
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
2214 int expprintf(const char* format, ...) |
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
2215 { |
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
2216 va_list args; |
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
2217 int r; |
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
2218 va_start(args, format); |
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
2219 r = vprintf(format, args); |
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
2220 va_end(args); |
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
2221 return r; |
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
2222 } |
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
2223 |
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
2224 void* expwcscpy(WCHAR* dst, const WCHAR* src) |
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
2225 { |
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
2226 WCHAR* p = dst; |
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
2227 while ((*p++ = *src++)) |
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
2228 ; |
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
2229 return dst; |
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
2230 } |
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
2231 |
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
2232 |
1 | 2233 unsigned int _GetPrivateProfileIntA(const char* appname, const char* keyname, INT default_value, const char* filename) |
2234 { | |
2235 return expGetPrivateProfileIntA(appname, keyname, default_value, filename); | |
2236 } | |
2237 int _GetPrivateProfileStringA(const char* appname, const char* keyname, | |
2238 const char* def_val, char* dest, unsigned int len, const char* filename) | |
2239 { | |
2240 return expGetPrivateProfileStringA(appname, keyname, def_val, dest, len, filename); | |
2241 } | |
2242 int _WritePrivateProfileStringA(const char* appname, const char* keyname, | |
2243 const char* string, const char* filename) | |
2244 { | |
2245 return expWritePrivateProfileStringA(appname, keyname, string, filename); | |
2246 } | |
2247 | |
2248 | |
2651
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
2249 |
1 | 2250 int WINAPI expDefDriverProc(int _private, int id, int msg, int arg1, int arg2) |
2251 { | |
128 | 2252 dbgprintf("DefDriverProc(0x%x, 0x%x, 0x%x, 0x%x, 0x%x) => 0\n", _private, id, msg, arg1, arg2); |
1 | 2253 return 0; |
2651
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
2254 } |
1 | 2255 |
2256 int WINAPI expSizeofResource(int v1, int v2) | |
2257 { | |
128 | 2258 int result=SizeofResource(v1, v2); |
2259 dbgprintf("SizeofResource(0x%x, 0x%x) => %d\n", v1, v2, result); | |
2260 return result; | |
2651
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
2261 } |
1 | 2262 |
2263 int WINAPI expGetLastError() | |
2264 { | |
128 | 2265 int result=GetLastError(); |
2266 dbgprintf("GetLastError() => 0x%x\n", result); | |
2267 return result; | |
1 | 2268 } |
2269 | |
2270 void WINAPI expSetLastError(int error) | |
2271 { | |
128 | 2272 dbgprintf("SetLastError(0x%x)\n", error); |
1 | 2273 SetLastError(error); |
2651
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
2274 } |
1 | 2275 |
2276 char* expstrrchr(char* string, int value) | |
2277 { | |
128 | 2278 char* result=strrchr(string, value); |
2279 if(result) | |
2280 dbgprintf("strrchr(0x%x='%s', %d) => 0x%x='%s'", string, string, value, result, result); | |
2651
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
2281 else |
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
2282 dbgprintf("strrchr(0x%x='%s', %d) => 0", string, string, value); |
128 | 2283 return result; |
2651
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
2284 } |
1 | 2285 |
2286 char* expstrchr(char* string, int value) | |
2287 { | |
128 | 2288 char* result=strchr(string, value); |
2289 if(result) | |
2290 dbgprintf("strchr(0x%x='%s', %d) => 0x%x='%s'", string, string, value, result, result); | |
2651
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
2291 else |
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
2292 dbgprintf("strchr(0x%x='%s', %d) => 0", string, string, value); |
128 | 2293 return result; |
2651
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
2294 } |
128 | 2295 int expstrlen(char* str) |
2296 { | |
2297 int result=strlen(str); | |
2298 dbgprintf("strlen(0x%x='%s') => %d\n", str, str, result); | |
2651
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
2299 return result; |
128 | 2300 } |
2651
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
2301 int expstrcpy(char* str1, const char* str2) |
128 | 2302 { |
713 | 2303 int result= (int) strcpy(str1, str2); |
2304 dbgprintf("strcpy(0x%x, 0x%x='%s') => %d\n", str1, str2, str2, result); | |
128 | 2305 return result; |
2306 } | |
2307 int expstrcmp(const char* str1, const char* str2) | |
2308 { | |
2309 int result=strcmp(str1, str2); | |
2310 dbgprintf("strcmp(0x%x='%s', 0x%x='%s') => %d\n", str1, str1, str2, str2, result); | |
2311 return result; | |
2312 } | |
2651
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
2313 int expstrcat(char* str1, const char* str2) |
128 | 2314 { |
713 | 2315 int result= (int) strcat(str1, str2); |
2316 dbgprintf("strcat(0x%x='%s', 0x%x='%s') => %d\n", str1, str1, str2, str2, result); | |
2651
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
2317 return result; |
128 | 2318 } |
713 | 2319 int expisalnum(int c) |
128 | 2320 { |
713 | 2321 int result= (int) isalnum(c); |
2322 dbgprintf("isalnum(0x%x='%c' => %d\n", c, c, result); | |
2651
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
2323 return result; |
713 | 2324 } |
2651
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
2325 int expmemmove(void* dest, void* src, int n) |
713 | 2326 { |
2327 int result= (int) memmove(dest, src, n); | |
2328 dbgprintf("memmove(0x%x, 0x%x, %d) => %d\n", dest, src, n, result); | |
2329 return result; | |
128 | 2330 } |
2651
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
2331 int expmemcmp(void* dest, void* src, int n) |
128 | 2332 { |
2333 int result=memcmp(dest, src, n); | |
2334 dbgprintf("memcmp(0x%x, 0x%x, %d) => %d\n", dest, src, n, result); | |
2335 return result; | |
2336 } | |
2651
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
2337 void *expmemcpy(void* dest, void* src, int n) |
130 | 2338 { |
597 | 2339 void *result=memcpy(dest, src, n); |
2340 dbgprintf("memcpy(0x%x, 0x%x, %d) => %p\n", dest, src, n, result); | |
130 | 2341 return result; |
2342 } | |
128 | 2343 time_t exptime(time_t* t) |
2344 { | |
2345 time_t result=time(t); | |
2346 dbgprintf("time(0x%x) => %d\n", t, result); | |
2347 return result; | |
2348 } | |
2349 | |
2651
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
2350 int exprand(void) |
2139 | 2351 { |
2352 return rand(); | |
2353 } | |
2354 | |
2651
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
2355 double explog10(double x) |
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
2356 { |
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
2357 return log10(x); |
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
2358 } |
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
2359 |
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
2360 double expcos(double x) |
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
2361 { |
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
2362 return cos(x); |
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
2363 } |
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
2364 |
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
2365 double exppow(double x, double y) |
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
2366 { |
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
2367 return pow(x, y); |
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
2368 } |
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
2369 |
2139 | 2370 void expsrand(int seed) |
2371 { | |
2372 srand(seed); | |
2373 } | |
2374 | |
2375 int exp_ftol(float f) | |
2376 { | |
2377 return (int)(f+.5); | |
2378 } | |
2379 | |
128 | 2380 int WINAPI expStringFromGUID2(GUID* guid, char* str, int cbMax) |
2381 { | |
2069 | 2382 int result=snprintf(str, cbMax, "%.8x-%.4x-%.4x-%.2x%.2x%.2x%.2x%.2x%.2x%.2x%.2x", |
2383 guid->f1, guid->f2, guid->f3, | |
2384 (unsigned char)guid->f4[0], (unsigned char)guid->f4[1], | |
2385 (unsigned char)guid->f4[2], (unsigned char)guid->f4[3], | |
2386 (unsigned char)guid->f4[4], (unsigned char)guid->f4[5], | |
2387 (unsigned char)guid->f4[6], (unsigned char)guid->f4[7]); | |
128 | 2388 dbgprintf("StringFromGUID2(0x%x, 0x%x='%s', %d) => %d\n", guid, str, str, cbMax, result); |
2389 return result; | |
2390 } | |
2391 | |
1 | 2392 |
2393 int WINAPI expGetFileVersionInfoSizeA(const char* name, int* lpHandle) | |
2394 { | |
128 | 2395 dbgprintf("GetFileVersionInfoSizeA(0x%x='%s', 0x%X) => 0\n", name, name, lpHandle); |
1 | 2396 return 0; |
2651
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
2397 } |
1 | 2398 |
2399 int WINAPI expIsBadStringPtrW(const short* string, int nchars) | |
2400 { | |
128 | 2401 int result; |
2402 if(string==0)result=1; else result=0; | |
2403 dbgprintf("IsBadStringPtrW(0x%x, %d) => %d", string, nchars, result); | |
2404 if(string)wch_print(string); | |
2405 return result; | |
2651
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
2406 } |
1 | 2407 extern long WINAPI InterlockedExchangeAdd( long* dest, long incr ) |
2408 { | |
2409 long ret; | |
2410 __asm__ __volatile__( "lock; xaddl %0,(%1)" | |
2411 : "=r" (ret) : "r" (dest), "0" (incr) : "memory" ); | |
2412 return ret; | |
2413 } | |
2414 | |
2415 extern long WINAPI expInterlockedIncrement( long* dest ) | |
2416 { | |
128 | 2417 long result=InterlockedExchangeAdd( dest, 1 ) + 1; |
2418 dbgprintf("InterlockedIncrement(0x%x => %d) => %d\n", dest, *dest, result); | |
2419 return result; | |
1 | 2420 } |
2421 extern long WINAPI expInterlockedDecrement( long* dest ) | |
2422 { | |
128 | 2423 long result=InterlockedExchangeAdd( dest, -1 ) - 1; |
2424 dbgprintf("InterlockedDecrement(0x%x => %d) => %d\n", dest, *dest, result); | |
2425 return result; | |
1 | 2426 } |
2427 | |
2428 extern void WINAPI expOutputDebugStringA( const char* string ) | |
2429 { | |
128 | 2430 dbgprintf("OutputDebugStringA(0x%x='%s')\n", string); |
1 | 2431 fprintf(stderr, "DEBUG: %s\n", string); |
2651
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
2432 } |
1 | 2433 |
2434 int WINAPI expGetDC(int hwnd) | |
2435 { | |
128 | 2436 dbgprintf("GetDC(0x%x) => 0\n", hwnd); |
1 | 2437 return 0; |
2438 } | |
2439 | |
2440 int WINAPI expGetDesktopWindow() | |
2441 { | |
128 | 2442 dbgprintf("GetDesktopWindow() => 0\n"); |
1 | 2443 return 0; |
2444 } | |
2651
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
2445 |
1 | 2446 int WINAPI expReleaseDC(int hwnd, int hdc) |
2447 { | |
128 | 2448 dbgprintf("ReleaseDC(0x%x, 0x%x) => 0\n", hwnd, hdc); |
2449 return 0; | |
2651
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
2450 } |
128 | 2451 static int cursor[100]; |
2452 | |
2453 int WINAPI expLoadCursorA(int handle,LPCSTR name) | |
2454 { | |
2455 dbgprintf("LoadCursorA(%d, 0x%x='%s') => 0x%x\n", handle, name, (int)&cursor[0]); | |
2456 return (int)&cursor[0]; | |
2457 } | |
2458 int WINAPI expSetCursor(void *cursor) | |
2459 { | |
2460 dbgprintf("SetCursor(0x%x) => 0x%x\n", cursor, cursor); | |
2461 return (int)cursor; | |
2462 } | |
2069 | 2463 int WINAPI expGetCursorPos(void *cursor) |
2464 { | |
2465 dbgprintf("GetCursorPos(0x%x) => 0x%x\n", cursor, cursor); | |
2466 return 1; | |
2467 } | |
2468 int WINAPI expRegisterWindowMessageA(char *message) | |
2469 { | |
2470 dbgprintf("RegisterWindowMessageA(%s)\n", message); | |
2471 return 1; | |
2472 } | |
2473 int WINAPI expGetProcessVersion(int pid) | |
2474 { | |
2475 dbgprintf("GetProcessVersion(%d)\n", pid); | |
2476 return 1; | |
2477 } | |
2478 int WINAPI expGetCurrentThread(void) | |
2479 { | |
2480 dbgprintf("GetCurrentThread()\n"); | |
2481 return 1; | |
2482 } | |
2483 int WINAPI expGetOEMCP(void) | |
2484 { | |
2485 dbgprintf("GetOEMCP()\n"); | |
2486 return 1; | |
2487 } | |
2488 int WINAPI expGetCPInfo(int cp,void *info) | |
2489 { | |
2490 dbgprintf("GetCPInfo()\n"); | |
2491 return 0; | |
2492 } | |
2493 int WINAPI expGetSystemMetrics(int index) | |
2494 { | |
2495 dbgprintf("GetSystemMetrics(%d)\n", index); | |
2496 return 1; | |
2497 } | |
2498 int WINAPI expGetSysColor(int index) | |
2499 { | |
2500 dbgprintf("GetSysColor(%d)\n", index); | |
2501 return 1; | |
2502 } | |
2503 int WINAPI expGetSysColorBrush(int index) | |
2504 { | |
2505 dbgprintf("GetSysColorBrush(%d)\n", index); | |
2506 return 1; | |
2507 } | |
2508 | |
2509 | |
2510 | |
128 | 2511 int WINAPI expGetSystemPaletteEntries(int hdc, int iStartIndex, int nEntries, void* lppe) |
2512 { | |
2513 dbgprintf("GetSystemPaletteEntries(0x%x, 0x%x, 0x%x, 0x%x) => 0\n", | |
2514 hdc, iStartIndex, nEntries, lppe); | |
1 | 2515 return 0; |
2651
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
2516 } |
1 | 2517 |
2518 /* | |
2519 typedef struct _TIME_ZONE_INFORMATION { | |
2520 long Bias; | |
2521 char StandardName[32]; | |
2522 SYSTEMTIME StandardDate; | |
2523 long StandardBias; | |
2524 char DaylightName[32]; | |
2525 SYSTEMTIME DaylightDate; | |
2526 long DaylightBias; | |
2651
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
2527 } TIME_ZONE_INFORMATION, *LPTIME_ZONE_INFORMATION; |
1 | 2528 */ |
2529 | |
2530 int WINAPI expGetTimeZoneInformation(LPTIME_ZONE_INFORMATION lpTimeZoneInformation) | |
2531 { | |
128 | 2532 const short name[]={'C', 'e', 'n', 't', 'r', 'a', 'l', ' ', 'S', 't', 'a', |
2533 'n', 'd', 'a', 'r', 'd', ' ', 'T', 'i', 'm', 'e', 0}; | |
2534 const short pname[]={'C', 'e', 'n', 't', 'r', 'a', 'l', ' ', 'D', 'a', 'y', | |
2535 'l', 'i', 'g', 'h', 't', ' ', 'T', 'i', 'm', 'e', 0}; | |
2536 dbgprintf("GetTimeZoneInformation(0x%x) => TIME_ZONE_ID_STANDARD\n"); | |
1 | 2537 memset(lpTimeZoneInformation, 0, sizeof(TIME_ZONE_INFORMATION)); |
128 | 2538 lpTimeZoneInformation->Bias=360;//GMT-6 |
2539 memcpy(lpTimeZoneInformation->StandardName, name, sizeof(name)); | |
2540 lpTimeZoneInformation->StandardDate.wMonth=10; | |
2541 lpTimeZoneInformation->StandardDate.wDay=5; | |
2542 lpTimeZoneInformation->StandardDate.wHour=2; | |
2543 lpTimeZoneInformation->StandardBias=0; | |
2544 memcpy(lpTimeZoneInformation->DaylightName, pname, sizeof(pname)); | |
2545 lpTimeZoneInformation->DaylightDate.wMonth=4; | |
2546 lpTimeZoneInformation->DaylightDate.wDay=1; | |
2547 lpTimeZoneInformation->DaylightDate.wHour=2; | |
2548 lpTimeZoneInformation->DaylightBias=-60; | |
2549 return TIME_ZONE_ID_STANDARD; | |
2651
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
2550 } |
1 | 2551 |
2552 void WINAPI expGetLocalTime(SYSTEMTIME* systime) | |
2553 { | |
2554 time_t local_time; | |
2555 struct tm *local_tm; | |
2556 struct timeval tv; | |
2651
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
2557 |
128 | 2558 dbgprintf("GetLocalTime(0x%x)\n"); |
1 | 2559 gettimeofday(&tv, NULL); |
2560 local_time=tv.tv_sec; | |
2561 local_tm=localtime(&local_time); | |
2651
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
2562 |
1 | 2563 systime->wYear = local_tm->tm_year + 1900; |
2564 systime->wMonth = local_tm->tm_mon + 1; | |
2565 systime->wDayOfWeek = local_tm->tm_wday; | |
2566 systime->wDay = local_tm->tm_mday; | |
2567 systime->wHour = local_tm->tm_hour; | |
2568 systime->wMinute = local_tm->tm_min; | |
2569 systime->wSecond = local_tm->tm_sec; | |
2570 systime->wMilliseconds = (tv.tv_usec / 1000) % 1000; | |
128 | 2571 dbgprintf(" Year: %d\n Month: %d\n Day of week: %d\n" |
2572 " Day: %d\n Hour: %d\n Minute: %d\n Second: %d\n" | |
2573 " Milliseconds: %d\n", | |
2574 systime->wYear, systime->wMonth, systime->wDayOfWeek, systime->wDay, | |
2575 systime->wHour, systime->wMinute, systime->wSecond, systime->wMilliseconds); | |
1 | 2576 } |
2577 | |
2578 int WINAPI expGetSystemTime(SYSTEMTIME* systime) | |
2579 { | |
2580 time_t local_time; | |
2581 struct tm *local_tm; | |
2582 struct timeval tv; | |
2651
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
2583 |
128 | 2584 dbgprintf("GetSystemTime(0x%x)\n", systime); |
1 | 2585 gettimeofday(&tv, NULL); |
2586 local_time=tv.tv_sec; | |
2587 local_tm=gmtime(&local_time); | |
2651
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
2588 |
1 | 2589 systime->wYear = local_tm->tm_year + 1900; |
2590 systime->wMonth = local_tm->tm_mon + 1; | |
2591 systime->wDayOfWeek = local_tm->tm_wday; | |
2592 systime->wDay = local_tm->tm_mday; | |
2593 systime->wHour = local_tm->tm_hour; | |
2594 systime->wMinute = local_tm->tm_min; | |
2595 systime->wSecond = local_tm->tm_sec; | |
2596 systime->wMilliseconds = (tv.tv_usec / 1000) % 1000; | |
128 | 2597 dbgprintf(" Year: %d\n Month: %d\n Day of week: %d\n" |
2598 " Day: %d\n Hour: %d\n Minute: %d\n Second: %d\n" | |
2599 " Milliseconds: %d\n", | |
2600 systime->wYear, systime->wMonth, systime->wDayOfWeek, systime->wDay, | |
2601 systime->wHour, systime->wMinute, systime->wSecond, systime->wMilliseconds); | |
2069 | 2602 return 0; |
1 | 2603 } |
2604 | |
2605 int WINAPI expGetEnvironmentVariableA(const char* name, char* field, int size) | |
2606 { | |
128 | 2607 char *p; |
2608 // printf("%s %x %x\n", name, field, size); | |
1 | 2609 if(field)field[0]=0; |
128 | 2610 /* |
2611 p = getenv(name); | |
2612 if (p) strncpy(field,p,size); | |
2613 */ | |
2614 if (strcmp(name,"__MSVCRT_HEAP_SELECT")==0) | |
2615 strcpy(field,"__GLOBAL_HEAP_SELECTED,1"); | |
2616 dbgprintf("GetEnvironmentVariableA(0x%x='%s', 0x%x, %d) => %d\n", name, name, field, size, strlen(field)); | |
2617 return strlen(field); | |
2618 } | |
2619 | |
2620 void* WINAPI expCoTaskMemAlloc(ULONG cb) | |
2621 { | |
2622 return my_mreq(cb, 0); | |
2623 } | |
2624 void WINAPI expCoTaskMemFree(void* cb) | |
2625 { | |
2626 my_release(cb); | |
2627 } | |
2628 | |
2629 void* CoTaskMemAlloc(ULONG cb){return expCoTaskMemAlloc(cb);} | |
2630 void CoTaskMemFree(void* cb){expCoTaskMemFree(cb);} | |
2631 | |
2632 struct COM_OBJECT_INFO | |
2633 { | |
2634 GUID clsid; | |
2635 long (*GetClassObject) (GUID* clsid, GUID* iid, void** ppv); | |
2636 }; | |
2637 | |
2638 static struct COM_OBJECT_INFO* com_object_table=0; | |
2639 static int com_object_size=0; | |
2640 int RegisterComClass(GUID* clsid, GETCLASSOBJECT gcs) | |
2641 { | |
2069 | 2642 if(!clsid || !gcs) |
2643 return -1; | |
128 | 2644 com_object_table=realloc(com_object_table, sizeof(struct COM_OBJECT_INFO)*(++com_object_size)); |
2651
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
2645 com_object_table[com_object_size-1].clsid=*clsid; |
128 | 2646 com_object_table[com_object_size-1].GetClassObject=gcs; |
2651
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
2647 return 0; |
128 | 2648 } |
2649 | |
2069 | 2650 int UnregisterComClass(GUID* clsid, GETCLASSOBJECT gcs) |
2651 { | |
2652 int found = 0; | |
2653 int i = 0; | |
2654 if(!clsid || !gcs) | |
2655 return -1; | |
2656 | |
2657 if (com_object_table == 0) | |
2658 printf("Warning: UnregisterComClass() called without any registered class\n"); | |
2659 while (i < com_object_size) | |
2660 { | |
2661 if (found && i > 0) | |
2662 { | |
2663 memcpy(&com_object_table[i - 1].clsid, | |
2664 &com_object_table[i].clsid, sizeof(GUID)); | |
2665 com_object_table[i - 1].GetClassObject = | |
2666 com_object_table[i].GetClassObject; | |
2667 } | |
2668 else if (memcmp(&com_object_table[i].clsid, clsid, sizeof(GUID)) == 0 | |
2669 && com_object_table[i].GetClassObject == gcs) | |
2670 { | |
2671 found++; | |
2672 } | |
2673 i++; | |
2674 } | |
2675 if (found) | |
2676 { | |
2677 if (--com_object_size == 0) | |
2678 { | |
2679 free(com_object_table); | |
2680 com_object_table = 0; | |
2681 } | |
2682 } | |
2683 return 0; | |
2684 } | |
2685 | |
2686 | |
128 | 2687 GUID IID_IUnknown={0x00000000, 0x0000, 0x0000, |
2688 {0xc0, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x46}}; | |
2689 GUID IID_IClassFactory={0x00000001, 0x0000, 0x0000, | |
2651
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
2690 {0xc0, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x46}}; |
128 | 2691 |
2692 long WINAPI expCoCreateInstance(GUID* rclsid, struct IUnknown* pUnkOuter, | |
2693 long dwClsContext, GUID* riid, void** ppv) | |
2694 { | |
2695 int i; | |
2696 struct COM_OBJECT_INFO* ci=0; | |
2697 for(i=0; i<com_object_size; i++) | |
2698 if(!memcmp(rclsid, &com_object_table[i].clsid, sizeof(GUID))) | |
2699 ci=&com_object_table[i]; | |
2700 if(!ci)return 0x80040154; | |
2701 // in 'real' world we should mess with IClassFactory here | |
2702 i=ci->GetClassObject(rclsid, riid, ppv); | |
2703 return i; | |
2651
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
2704 } |
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
2705 |
128 | 2706 long CoCreateInstance(GUID* rclsid, struct IUnknown* pUnkOuter, |
2707 long dwClsContext, GUID* riid, void** ppv) | |
2708 { | |
2709 return expCoCreateInstance(rclsid, pUnkOuter, dwClsContext, riid, ppv); | |
2710 } | |
2711 | |
2712 int WINAPI | |
2713 expIsRectEmpty( | |
2714 CONST RECT *lprc) | |
2715 { | |
2716 dbgprintf("IsRectEmpty(0x%x)"); | |
2717 if((!lprc) || (lprc->right==lprc->left) || (lprc->top==lprc->bottom)) | |
2718 { | |
2719 dbgprintf(" => TRUE\n"); | |
2720 return TRUE; | |
2721 } | |
2722 dbgprintf(" => FALSE\n"); | |
2723 return FALSE; | |
2724 } | |
2725 | |
2726 int _adjust_fdiv=0; //what's this? | |
2727 | |
2728 | |
2729 | |
2730 | |
2731 unsigned int WINAPI expGetTempPathA(unsigned int len, char* path) | |
2732 { | |
2733 dbgprintf("GetTempPathA(%d, 0x%x)", len, path); | |
2734 if(len<5) | |
2735 { | |
2736 dbgprintf(" => 0\n"); | |
2737 return 0; | |
2738 } | |
2739 strcpy(path, "/tmp"); | |
2740 dbgprintf(" => 5 ( '/tmp' )\n"); | |
2741 return 5; | |
2742 } | |
2743 /* | |
2744 FYI: | |
2745 typedef struct | |
2746 { | |
2747 DWORD dwFileAttributes; | |
2748 FILETIME ftCreationTime; | |
2749 FILETIME ftLastAccessTime; | |
2750 FILETIME ftLastWriteTime; | |
2751 DWORD nFileSizeHigh; | |
2752 DWORD nFileSizeLow; | |
2753 DWORD dwReserved0; | |
2754 DWORD dwReserved1; | |
2755 CHAR cFileName[260]; | |
2756 CHAR cAlternateFileName[14]; | |
2757 } WIN32_FIND_DATAA, *LPWIN32_FIND_DATAA; | |
2758 */ | |
2759 | |
2760 HANDLE WINAPI expFindFirstFileA(LPCSTR s, LPWIN32_FIND_DATAA lpfd) | |
2761 { | |
2762 dbgprintf("FindFirstFileA(0x%x='%s', 0x%x) => 0\n", s, s, lpfd); | |
2763 strcpy(lpfd->cFileName, "msms001.vwp"); | |
2764 strcpy(lpfd->cAlternateFileName, "msms001.vwp"); | |
2765 return (HANDLE)0; | |
2766 } | |
2767 WIN_BOOL WINAPI expFindNextFileA(HANDLE h,LPWIN32_FIND_DATAA p) | |
2768 { | |
2769 dbgprintf("FindNextFileA(0x%x, 0x%x) => 0\n", h, p); | |
1 | 2770 return 0; |
2771 } | |
128 | 2772 WIN_BOOL WINAPI expFindClose(HANDLE h) |
2773 { | |
2774 dbgprintf("FindClose(0x%x) => 0\n", h); | |
2775 return 0; | |
2776 } | |
2777 UINT WINAPI expSetErrorMode(UINT i) | |
2778 { | |
2779 dbgprintf("SetErrorMode(%d) => 0\n", i); | |
2780 return 0; | |
2781 } | |
2782 UINT WINAPI expGetWindowsDirectoryA(LPSTR s,UINT c) | |
2783 { | |
2784 char windir[]="c:\\windows"; | |
2785 int result; | |
2786 strncpy(s, windir, c); | |
2787 result=1+((c<strlen(windir))?c:strlen(windir)); | |
2788 dbgprintf("GetWindowsDirectoryA(0x%x, %d) => %d\n", s, c, result); | |
2789 return result; | |
2790 } | |
2791 | |
2792 WIN_BOOL WINAPI expDeleteFileA(LPCSTR s) | |
2793 { | |
2794 dbgprintf("DeleteFileA(0x%x='%s') => 0\n", s, s); | |
2795 return 0; | |
2796 } | |
2797 WIN_BOOL WINAPI expFileTimeToLocalFileTime(const FILETIME* cpf, LPFILETIME pf) | |
2798 { | |
2799 dbgprintf("FileTimeToLocalFileTime(0x%x, 0x%x) => 0\n", cpf, pf); | |
2800 return 0; | |
2801 } | |
2802 | |
2803 UINT WINAPI expGetTempFileNameA(LPCSTR cs1,LPCSTR cs2,UINT i,LPSTR ps) | |
2804 { | |
2805 char mask[16]="/tmp/AP_XXXXXX"; | |
2806 int result; | |
2807 dbgprintf("GetTempFileNameA(0x%x='%s', 0x%x='%s', %d, 0x%x)", cs1, cs1, cs2, cs2, i, ps); | |
2808 if(i && i<10) | |
2651
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
2809 { |
128 | 2810 dbgprintf(" => -1\n"); |
2811 return -1; | |
2812 } | |
2813 result=mkstemp(mask); | |
2814 sprintf(ps, "AP%d", result); | |
2815 dbgprintf(" => %d\n", strlen(ps)); | |
2816 return strlen(ps); | |
2817 } | |
2818 // | |
2819 // This func might need proper implementation if we want AngelPotion codec. | |
2820 // They try to open APmpeg4v1.apl with it. | |
2821 // DLL will close opened file with CloseHandle(). | |
2822 // | |
2823 HANDLE WINAPI expCreateFileA(LPCSTR cs1,DWORD i1,DWORD i2, | |
2824 LPSECURITY_ATTRIBUTES p1, DWORD i3,DWORD i4,HANDLE i5) | |
2825 { | |
2826 dbgprintf("CreateFileA(0x%x='%s', %d, %d, 0x%x, %d, %d, 0x%x)\n", cs1, cs1, i1, | |
2827 i2, p1, i3, i4, i5); | |
2828 if((!cs1) || (strlen(cs1)<2))return -1; | |
2829 if(strncmp(cs1, "AP", 2)) | |
2830 { | |
2831 int result; | |
2832 char* tmp=(char*)malloc(strlen(def_path)+50); | |
2833 strcpy(tmp, def_path); | |
2834 strcat(tmp, "/"); | |
2835 strcat(tmp, "APmpg4v1.apl"); | |
2836 result=open(tmp, O_RDONLY); | |
2837 free(tmp); | |
2838 return result; | |
2839 }; | |
2651
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
2840 return atoi(cs1+2); |
128 | 2841 } |
2842 static char sysdir[]="."; | |
2651
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
2843 LPCSTR WINAPI expGetSystemDirectoryA() |
128 | 2844 { |
2845 dbgprintf("GetSystemDirectoryA() => 0x%x='%s'\n", sysdir, sysdir); | |
2846 return sysdir; | |
2847 } | |
2848 WIN_BOOL WINAPI expReadFile(HANDLE h,LPVOID pv,DWORD size,LPDWORD rd,LPOVERLAPPED unused) | |
2849 { | |
2850 int result; | |
2851 dbgprintf("ReadFile(%d, 0x%x, %d -> 0x%x)\n", h, pv, size, rd); | |
2852 result=read(h, pv, size); | |
2853 if(rd)*rd=result; | |
2854 if(!result)return 0; | |
2855 return 1; | |
2856 } | |
2857 | |
2858 WIN_BOOL WINAPI expWriteFile(HANDLE h,LPCVOID pv,DWORD size,LPDWORD wr,LPOVERLAPPED unused) | |
2859 { | |
2860 int result; | |
2861 dbgprintf("WriteFile(%d, 0x%x, %d -> 0x%x)\n", h, pv, size, wr); | |
2862 if(h==1234)h=1; | |
2863 result=write(h, pv, size); | |
2864 if(wr)*wr=result; | |
2865 if(!result)return 0; | |
2866 return 1; | |
2867 } | |
2868 DWORD WINAPI expSetFilePointer(HANDLE h, LONG val, LPLONG ext, DWORD whence) | |
2869 { | |
2870 int wh; | |
2871 dbgprintf("SetFilePointer(%d, %d, 0x%x, %d)\n", h, val, ext, whence); | |
2872 //why would DLL want temporary file with >2Gb size? | |
2873 switch(whence) | |
2874 { | |
2875 case FILE_BEGIN: | |
2876 wh=SEEK_SET;break; | |
2877 case FILE_END: | |
2878 wh=SEEK_END;break; | |
2879 case FILE_CURRENT: | |
2880 wh=SEEK_CUR;break; | |
2881 default: | |
2882 return -1; | |
2883 } | |
2884 return lseek(h, val, wh); | |
2885 } | |
2886 | |
2887 HDRVR WINAPI expOpenDriverA(LPCSTR szDriverName, LPCSTR szSectionName, | |
2888 LPARAM lParam2) | |
2889 { | |
2890 dbgprintf("OpenDriverA(0x%x='%s', 0x%x='%s', 0x%x) => -1\n", szDriverName, szDriverName, szSectionName, szSectionName, lParam2); | |
2651
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
2891 return -1; |
128 | 2892 } |
2893 HDRVR WINAPI expOpenDriver(LPCSTR szDriverName, LPCSTR szSectionName, | |
2894 LPARAM lParam2) | |
2895 { | |
2896 dbgprintf("OpenDriver(0x%x='%s', 0x%x='%s', 0x%x) => -1\n", szDriverName, szDriverName, szSectionName, szSectionName, lParam2); | |
2651
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
2897 return -1; |
128 | 2898 } |
1 | 2899 |
2900 | |
128 | 2901 WIN_BOOL |
2902 WINAPI | |
2903 expGetProcessAffinityMask( | |
2904 HANDLE hProcess, | |
2905 LPDWORD lpProcessAffinityMask, | |
2906 LPDWORD lpSystemAffinityMask | |
2907 ) | |
2908 { | |
2909 dbgprintf("GetProcessAffinityMask(0x%x, 0x%x, 0x%x) => 1\n", | |
2910 hProcess, lpProcessAffinityMask, lpSystemAffinityMask); | |
2911 if(lpProcessAffinityMask)*lpProcessAffinityMask=1; | |
2912 if(lpSystemAffinityMask)*lpSystemAffinityMask=1; | |
2913 return 1; | |
1 | 2914 } |
2915 | |
713 | 2916 int WINAPI expMulDiv(int nNumber, int nNumerator, int nDenominator) |
2917 { | |
2918 static const long long max_int=0x7FFFFFFFLL; | |
2919 static const long long min_int=-0x80000000LL; | |
2920 long long tmp=(long long)nNumber*(long long)nNumerator; | |
2921 if(!nDenominator)return 1; | |
2922 tmp/=nDenominator; | |
2923 if(tmp<min_int) return 1; | |
2924 if(tmp>max_int) return 1; | |
2925 return (int)tmp; | |
2926 } | |
2927 | |
2928 LONG WINAPI explstrcmpiA(const char* str1, const char* str2) | |
2929 { | |
2930 LONG result=strcasecmp(str1, str2); | |
2931 dbgprintf("strcmpi(0x%x='%s', 0x%x='%s') => %d\n", str1, str1, str2, str2, result); | |
2932 return result; | |
2933 } | |
2934 | |
2935 LONG WINAPI explstrlenA(const char* str1) | |
2936 { | |
2937 LONG result=strlen(str1); | |
2938 dbgprintf("strlen(0x%x='%s') => %d\n", str1, str1, result); | |
2939 return result; | |
2940 } | |
2941 | |
2942 LONG WINAPI explstrcpyA(char* str1, const char* str2) | |
2943 { | |
2944 int result= (int) strcpy(str1, str2); | |
2945 dbgprintf("strcpy(0x%x, 0x%x='%s') => %d\n", str1, str2, str2, result); | |
2946 return result; | |
2947 } | |
2069 | 2948 LONG WINAPI explstrcpynA(char* str1, const char* str2,int len) |
2949 { | |
2950 int result; | |
2951 if (strlen(str2)>len) | |
2952 result = (int) strncpy(str1, str2,len); | |
2953 else | |
2954 result = (int) strcpy(str1,str2); | |
2955 dbgprintf("strncpy(0x%x, 0x%x='%s' len %d strlen %d) => %x\n", str1, str2, str2,len, strlen(str2),result); | |
2956 return result; | |
2957 } | |
2958 LONG WINAPI explstrcatA(char* str1, const char* str2) | |
2959 { | |
2960 int result= (int) strcat(str1, str2); | |
2961 dbgprintf("strcat(0x%x, 0x%x='%s') => %d\n", str1, str2, str2, result); | |
2962 return result; | |
2963 } | |
2964 | |
128 | 2965 |
497 | 2966 LONG WINAPI expInterlockedExchange(long *dest, long l) |
2967 { | |
2968 long retval; | |
2969 retval = *dest; | |
2970 *dest = l; | |
2971 return retval; | |
2972 } | |
2973 | |
2651
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
2974 void WINAPI expInitCommonControls(void) |
1543 | 2975 { |
2069 | 2976 printf("InitCommonControls called!\n"); |
2977 return; | |
1543 | 2978 } |
2979 | |
2396 | 2980 HRESULT WINAPI expCoCreateFreeThreadedMarshaler(void *pUnkOuter, void **ppUnkInner) |
2981 { | |
2982 printf("CoCreateFreeThreadedMarshaler(%p, %p) called!\n", | |
2983 pUnkOuter, ppUnkInner); | |
2984 return E_FAIL; | |
2985 // return S_OK; | |
2986 } | |
2987 | |
1 | 2988 struct exports |
2989 { | |
2990 char name[64]; | |
2991 int id; | |
2992 void* func; | |
2993 }; | |
2651
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
2994 struct libs |
1 | 2995 { |
2996 char name[64]; | |
2997 int length; | |
2998 struct exports* exps; | |
2999 }; | |
3000 | |
3001 #define FF(X,Y) \ | |
3002 {#X, Y, (void*)exp##X}, | |
3003 | |
3004 struct exports exp_kernel32[]={ | |
3005 FF(IsBadWritePtr, 357) | |
3006 FF(IsBadReadPtr, 354) | |
3007 FF(IsBadStringPtrW, -1) | |
3008 FF(DisableThreadLibraryCalls, -1) | |
3009 FF(CreateThread, -1) | |
3010 FF(CreateEventA, -1) | |
3011 FF(SetEvent, -1) | |
3012 FF(ResetEvent, -1) | |
3013 FF(WaitForSingleObject, -1) | |
3014 FF(GetSystemInfo, -1) | |
3015 FF(GetVersion, 332) | |
3016 FF(HeapCreate, 461) | |
3017 FF(HeapAlloc, -1) | |
3018 FF(HeapDestroy, -1) | |
3019 FF(HeapFree, -1) | |
3020 FF(HeapSize, -1) | |
2069 | 3021 FF(HeapReAlloc,-1) |
1 | 3022 FF(GetProcessHeap, -1) |
3023 FF(VirtualAlloc, -1) | |
3024 FF(VirtualFree, -1) | |
2651
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
3025 FF(InitializeCriticalSection, -1) |
1 | 3026 FF(EnterCriticalSection, -1) |
2651
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
3027 FF(LeaveCriticalSection, -1) |
1 | 3028 FF(DeleteCriticalSection, -1) |
3029 FF(TlsAlloc, -1) | |
3030 FF(TlsFree, -1) | |
3031 FF(TlsGetValue, -1) | |
3032 FF(TlsSetValue, -1) | |
3033 FF(GetCurrentThreadId, -1) | |
128 | 3034 FF(GetCurrentProcess, -1) |
2651
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
3035 FF(LocalAlloc, -1) |
2069 | 3036 FF(LocalReAlloc,-1) |
1 | 3037 FF(LocalLock, -1) |
3038 FF(GlobalAlloc, -1) | |
128 | 3039 FF(GlobalReAlloc, -1) |
1 | 3040 FF(GlobalLock, -1) |
3041 FF(MultiByteToWideChar, 427) | |
3042 FF(WideCharToMultiByte, -1) | |
3043 FF(GetVersionExA, -1) | |
3044 FF(CreateSemaphoreA, -1) | |
3045 FF(QueryPerformanceCounter, -1) | |
3046 FF(QueryPerformanceFrequency, -1) | |
3047 FF(LocalHandle, -1) | |
3048 FF(LocalUnlock, -1) | |
3049 FF(LocalFree, -1) | |
3050 FF(GlobalHandle, -1) | |
3051 FF(GlobalUnlock, -1) | |
3052 FF(GlobalFree, -1) | |
3053 FF(LoadResource, -1) | |
2651
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
3054 FF(ReleaseSemaphore, -1) |
1 | 3055 FF(FindResourceA, -1) |
3056 FF(LockResource, -1) | |
3057 FF(FreeResource, -1) | |
3058 FF(SizeofResource, -1) | |
3059 FF(CloseHandle, -1) | |
3060 FF(GetCommandLineA, -1) | |
3061 FF(GetEnvironmentStringsW, -1) | |
3062 FF(FreeEnvironmentStringsW, -1) | |
128 | 3063 FF(FreeEnvironmentStringsA, -1) |
2651
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
3064 FF(GetEnvironmentStrings, -1) |
1 | 3065 FF(GetStartupInfoA, -1) |
3066 FF(GetStdHandle, -1) | |
3067 FF(GetFileType, -1) | |
3068 FF(SetHandleCount, -1) | |
3069 FF(GetACP, -1) | |
3070 FF(GetModuleFileNameA, -1) | |
3071 FF(SetUnhandledExceptionFilter, -1) | |
3072 FF(LoadLibraryA, -1) | |
3073 FF(GetProcAddress, -1) | |
3074 FF(FreeLibrary, -1) | |
3075 FF(CreateFileMappingA, -1) | |
3076 FF(OpenFileMappingA, -1) | |
3077 FF(MapViewOfFile, -1) | |
3078 FF(UnmapViewOfFile, -1) | |
3079 FF(Sleep, -1) | |
3080 FF(GetModuleHandleA, -1) | |
128 | 3081 FF(GetProfileIntA, -1) |
1 | 3082 FF(GetPrivateProfileIntA, -1) |
3083 FF(GetPrivateProfileStringA, -1) | |
3084 FF(WritePrivateProfileStringA, -1) | |
3085 FF(GetLastError, -1) | |
3086 FF(SetLastError, -1) | |
3087 FF(InterlockedIncrement, -1) | |
3088 FF(InterlockedDecrement, -1) | |
3089 FF(GetTimeZoneInformation, -1) | |
3090 FF(OutputDebugStringA, -1) | |
3091 FF(GetLocalTime, -1) | |
3092 FF(GetSystemTime, -1) | |
3093 FF(GetEnvironmentVariableA, -1) | |
121 | 3094 FF(RtlZeroMemory,-1) |
3095 FF(RtlMoveMemory,-1) | |
3096 FF(RtlFillMemory,-1) | |
128 | 3097 FF(GetTempPathA,-1) |
3098 FF(FindFirstFileA,-1) | |
3099 FF(FindNextFileA,-1) | |
3100 FF(FindClose,-1) | |
3101 FF(FileTimeToLocalFileTime,-1) | |
3102 FF(DeleteFileA,-1) | |
3103 FF(ReadFile,-1) | |
3104 FF(WriteFile,-1) | |
3105 FF(SetFilePointer,-1) | |
3106 FF(GetTempFileNameA,-1) | |
3107 FF(CreateFileA,-1) | |
3108 FF(GetSystemDirectoryA,-1) | |
3109 FF(GetWindowsDirectoryA,-1) | |
3110 FF(SetErrorMode, -1) | |
3111 FF(IsProcessorFeaturePresent, -1) | |
3112 FF(GetProcessAffinityMask, -1) | |
497 | 3113 FF(InterlockedExchange, -1) |
3114 FF(MulDiv, -1) | |
713 | 3115 FF(lstrcmpiA, -1) |
3116 FF(lstrlenA, -1) | |
3117 FF(lstrcpyA, -1) | |
2069 | 3118 FF(lstrcatA, -1) |
2651
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
3119 FF(lstrcpynA,-1) |
2069 | 3120 FF(GetProcessVersion,-1) |
3121 FF(GetCurrentThread,-1) | |
3122 FF(GetOEMCP,-1) | |
3123 FF(GetCPInfo,-1) | |
1 | 3124 }; |
3125 | |
3126 struct exports exp_msvcrt[]={ | |
3127 FF(malloc, -1) | |
3128 FF(_initterm, -1) | |
3129 FF(free, -1) | |
3130 {"??3@YAXPAX@Z", -1, expdelete}, | |
3131 {"??2@YAPAXI@Z", -1, expnew}, | |
128 | 3132 {"_adjust_fdiv", -1, (void*)&_adjust_fdiv}, |
1 | 3133 FF(strrchr, -1) |
3134 FF(strchr, -1) | |
128 | 3135 FF(strlen, -1) |
3136 FF(strcpy, -1) | |
3137 FF(strcmp, -1) | |
3138 FF(strcat, -1) | |
713 | 3139 FF(isalnum, -1) |
128 | 3140 FF(memmove, -1) |
3141 FF(memcmp, -1) | |
3142 FF(time, -1) | |
2139 | 3143 FF(_ftol,-1) |
3144 FF(rand, -1) | |
2651
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
3145 FF(log10, -1) |
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
3146 FF(pow, -1) |
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
3147 FF(cos, -1) |
2139 | 3148 FF(srand, -1) |
3149 FF(sprintf,-1) | |
3150 FF(sscanf,-1) | |
3151 FF(fopen,-1) | |
2651
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
3152 FF(fprintf,-1) |
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
3153 FF(printf,-1) |
1 | 3154 }; |
3155 struct exports exp_winmm[]={ | |
3156 FF(GetDriverModuleHandle, -1) | |
3157 FF(timeGetTime, -1) | |
3158 FF(DefDriverProc, -1) | |
128 | 3159 FF(OpenDriverA, -1) |
1 | 3160 FF(OpenDriver, -1) |
3161 }; | |
3162 struct exports exp_user32[]={ | |
3163 FF(LoadStringA, -1) | |
3164 FF(wsprintfA, -1) | |
3165 FF(GetDC, -1) | |
3166 FF(GetDesktopWindow, -1) | |
3167 FF(ReleaseDC, -1) | |
128 | 3168 FF(IsRectEmpty, -1) |
3169 FF(LoadCursorA,-1) | |
3170 FF(SetCursor,-1) | |
2069 | 3171 FF(GetCursorPos,-1) |
3172 FF(GetCursorPos,-1) | |
3173 FF(RegisterWindowMessageA,-1) | |
3174 FF(GetSystemMetrics,-1) | |
3175 FF(GetSysColor,-1) | |
3176 FF(GetSysColorBrush,-1) | |
1 | 3177 }; |
3178 struct exports exp_advapi32[]={ | |
3179 FF(RegOpenKeyA, -1) | |
3180 FF(RegOpenKeyExA, -1) | |
3181 FF(RegCreateKeyExA, -1) | |
3182 FF(RegQueryValueExA, -1) | |
3183 FF(RegSetValueExA, -1) | |
3184 FF(RegCloseKey, -1) | |
2069 | 3185 FF(RegEnumValueA, -1) |
1 | 3186 }; |
3187 struct exports exp_gdi32[]={ | |
3188 FF(CreateCompatibleDC, -1) | |
3189 FF(GetDeviceCaps, -1) | |
3190 FF(DeleteDC, -1) | |
3191 FF(GetSystemPaletteEntries, -1) | |
3192 }; | |
3193 struct exports exp_version[]={ | |
3194 FF(GetFileVersionInfoSizeA, -1) | |
3195 }; | |
128 | 3196 struct exports exp_ole32[]={ |
3197 FF(CoTaskMemAlloc, -1) | |
3198 FF(CoTaskMemFree, -1) | |
3199 FF(CoCreateInstance, -1) | |
3200 FF(StringFromGUID2, -1) | |
2396 | 3201 FF(CoCreateFreeThreadedMarshaler,-1) |
128 | 3202 }; |
130 | 3203 struct exports exp_crtdll[]={ |
3204 FF(memcpy, -1) | |
2651
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
3205 FF(wcscpy, -1) |
130 | 3206 }; |
2069 | 3207 struct exports exp_comctl32[]={ |
3208 FF(StringFromGUID2, -1) | |
3209 FF(InitCommonControls, 17) | |
3210 }; | |
1 | 3211 #define LL(X) \ |
3212 {#X".dll", sizeof(exp_##X)/sizeof(struct exports), exp_##X}, | |
3213 | |
3214 struct libs libraries[]={ | |
3215 LL(kernel32) | |
3216 LL(msvcrt) | |
3217 LL(winmm) | |
3218 LL(user32) | |
3219 LL(advapi32) | |
3220 LL(gdi32) | |
3221 LL(version) | |
128 | 3222 LL(ole32) |
130 | 3223 LL(crtdll) |
2069 | 3224 LL(comctl32) |
1 | 3225 }; |
3226 | |
2069 | 3227 |
1 | 3228 void* LookupExternal(const char* library, int ordinal) |
3229 { | |
3230 char* answ; | |
3231 int i,j; | |
3232 if(library==0) | |
3233 { | |
3234 printf("ERROR: library=0\n"); | |
3235 return (void*)ext_unknown; | |
3236 } | |
3237 // printf("%x %x\n", &unk_exp1, &unk_exp2); | |
3238 | |
3239 for(i=0; i<sizeof(libraries)/sizeof(struct libs); i++) | |
3240 { | |
3241 if(strcasecmp(library, libraries[i].name)) | |
3242 continue; | |
3243 for(j=0; j<libraries[i].length; j++) | |
3244 { | |
3245 if(ordinal!=libraries[i].exps[j].id) | |
3246 continue; | |
2651
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
3247 //printf("Hit: 0x%p\n", libraries[i].exps[j].func); |
1 | 3248 return libraries[i].exps[j].func; |
3249 } | |
3250 } | |
2651
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
3251 printf("External func %s:%d\n", library, ordinal); |
1 | 3252 if(pos>150)return 0; |
3253 answ=(char*)extcode+pos*0x64; | |
3254 memcpy(answ, &unk_exp1, 0x64); | |
3255 *(int*)(answ+9)=pos; | |
3256 *(int*)(answ+47)-=((int)answ-(int)&unk_exp1); | |
3257 sprintf(export_names[pos], "%s:%d", library, ordinal); | |
2651
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
3258 pos++; |
1 | 3259 return (void*)answ; |
2651
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
3260 } |
1 | 3261 |
3262 void* LookupExternalByName(const char* library, const char* name) | |
3263 { | |
3264 char* answ; | |
3265 int i,j; | |
3266 // return (void*)ext_unknown; | |
3267 if(library==0) | |
3268 { | |
3269 printf("ERROR: library=0\n"); | |
3270 return (void*)ext_unknown; | |
3271 } | |
3272 if(name==0) | |
3273 { | |
3274 printf("ERROR: name=0\n"); | |
3275 return (void*)ext_unknown; | |
3276 } | |
2651
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
3277 //printf("External func %s:%s\n", library, name); |
1 | 3278 for(i=0; i<sizeof(libraries)/sizeof(struct libs); i++) |
3279 { | |
3280 if(strcasecmp(library, libraries[i].name)) | |
3281 continue; | |
3282 for(j=0; j<libraries[i].length; j++) | |
3283 { | |
3284 if(strcmp(name, libraries[i].exps[j].name)) | |
3285 continue; | |
3286 // printf("Hit: 0x%08X\n", libraries[i].exps[j].func); | |
3287 return libraries[i].exps[j].func; | |
3288 } | |
3289 } | |
128 | 3290 // printf("%s %s\n", library, name); |
3291 if(pos>150)return 0; | |
1 | 3292 strcpy(export_names[pos], name); |
3293 answ=(char*)extcode+pos*0x64; | |
3294 memcpy(answ, &unk_exp1, 0x64); | |
3295 *(int*)(answ+9)=pos; | |
3296 *(int*)(answ+47)-=((int)answ-(int)&unk_exp1); | |
3297 pos++; | |
3298 return (void*)answ; | |
3299 // memcpy(extcode, &unk_exp1, 0x64); | |
3300 // *(int*)(extcode+52)-=((int)extcode-(int)&unk_exp1); | |
3301 // return (void*)extcode; | |
3302 // printf("Unknown func %s:%s\n", library, name); | |
3303 // return (void*)ext_unknown; | |
3304 } | |
3305 | |
2069 | 3306 void my_garbagecollection(void) |
128 | 3307 { |
3308 #ifdef GARBAGE | |
2651
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
3309 int unfree = 0, unfreecnt = 0; |
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
3310 |
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
3311 while (last_alloc) |
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
3312 { |
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
3313 alloc_header* mem = last_alloc + 1; |
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
3314 unfree += my_size(mem); |
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
3315 unfreecnt++; |
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
3316 my_release(mem); |
128 | 3317 } |
2651
958d10763c34
partially synced with avifile... (TODO: migrate to new registry.c and driver.c)
arpi
parents:
2579
diff
changeset
|
3318 printf("Total Unfree %d bytes cnt %d [%p,%d]\n",unfree, unfreecnt, last_alloc, alccnt); |
128 | 3319 #endif |
3320 } |