?  search:
summary | log | graphiclog1 | graphiclog2 | commit | commitdiff | tree | refs | edit | fork
blame | history | raw | HEAD
ntdll: Don't use a real guard page at the bottom of the stack.
[wine/multimedia.git] / dlls / ntdll / thread.c
blob9896703aaa29cc5da1017bf9b0b11cf25128f9a8
1 /*
2 * NT threads support
3 *
4 * Copyright 1996, 2003 Alexandre Julliard
5 *
6 * This library is free software; you can redistribute it and/or
7 * modify it under the terms of the GNU Lesser General Public
8 * License as published by the Free Software Foundation; either
9 * version 2.1 of the License, or (at your option) any later version.
10 *
11 * This library is distributed in the hope that it will be useful,
12 * but WITHOUT ANY WARRANTY; without even the implied warranty of
13 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
14 * Lesser General Public License for more details.
15 *
16 * You should have received a copy of the GNU Lesser General Public
17 * License along with this library; if not, write to the Free Software
18 * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
19 */
20
21 #include "config.h"
22 #include "wine/port.h"
23
24 #include <sys/types.h>
25 #ifdef HAVE_SYS_MMAN_H
26 #include <sys/mman.h>
27 #endif
28 #ifdef HAVE_SYS_TIMES_H
29 #include <sys/times.h>
30 #endif
31
32 #define NONAMELESSUNION
33 #include "ntstatus.h"
34 #define WIN32_NO_STATUS
35 #include "thread.h"
36 #include "winternl.h"
37 #include "wine/library.h"
38 #include "wine/server.h"
39 #include "wine/pthread.h"
40 #include "wine/debug.h"
41 #include "ntdll_misc.h"
42
43 WINE_DEFAULT_DEBUG_CHANNEL(thread);
44
45 /* info passed to a starting thread */
46 struct startup_info
47 {
48 struct wine_pthread_thread_info pthread_info;
49 PRTL_THREAD_START_ROUTINE entry_point;
50 void *entry_arg;
51 };
52
53 static PEB peb;
54 static PEB_LDR_DATA ldr;
55 static RTL_USER_PROCESS_PARAMETERS params; /* default parameters if no parent */
56 static WCHAR current_dir[MAX_NT_PATH_LENGTH];
57 static RTL_BITMAP tls_bitmap;
58 static RTL_BITMAP tls_expansion_bitmap;
59 static LIST_ENTRY tls_links;
60 static size_t sigstack_total_size;
61
62 struct wine_pthread_functions pthread_functions = { NULL };
63
64 /***********************************************************************
65 * init_teb
66 */
67 static inline NTSTATUS init_teb( TEB *teb )
68 {
69 struct ntdll_thread_data *thread_data = (struct ntdll_thread_data *)teb->SystemReserved2;
70
71 teb->Tib.ExceptionList = (void *)~0UL;
72 teb->Tib.StackBase = (void *)~0UL;
73 teb->Tib.Self = &teb->Tib;
74 teb->Peb = &peb;
75 teb->StaticUnicodeString.Buffer = teb->StaticUnicodeBuffer;
76 teb->StaticUnicodeString.MaximumLength = sizeof(teb->StaticUnicodeBuffer);
77
78 if (!(thread_data->teb_sel = wine_ldt_alloc_fs())) return STATUS_TOO_MANY_THREADS;
79 thread_data->request_fd = -1;
80 thread_data->reply_fd = -1;
81 thread_data->wait_fd[0] = -1;
82 thread_data->wait_fd[1] = -1;
83
84 return STATUS_SUCCESS;
85 }
86
87
88 /***********************************************************************
89 * free_teb
90 */
91 static inline void free_teb( TEB *teb )
92 {
93 SIZE_T size = 0;
94 void *addr = teb;
95 struct ntdll_thread_data *thread_data = (struct ntdll_thread_data *)teb->SystemReserved2;
96
97 NtFreeVirtualMemory( NtCurrentProcess(), &addr, &size, MEM_RELEASE );
98 wine_ldt_free_fs( thread_data->teb_sel );
99 munmap( teb, sigstack_total_size );
100 }
101
102
103 /***********************************************************************
104 * thread_init
105 *
106 * Setup the initial thread.
107 *
108 * NOTES: The first allocated TEB on NT is at 0x7ffde000.
109 */
110 void thread_init(void)
111 {
112 TEB *teb;
113 void *addr;
114 SIZE_T info_size;
115 struct ntdll_thread_data *thread_data;
116 struct wine_pthread_thread_info thread_info;
117 static struct debug_info debug_info; /* debug info for initial thread */
118
119 peb.NumberOfProcessors = 1;
120 peb.ProcessParameters = &params;
121 peb.TlsBitmap = &tls_bitmap;
122 peb.TlsExpansionBitmap = &tls_expansion_bitmap;
123 peb.LdrData = &ldr;
124 params.CurrentDirectory.DosPath.Buffer = current_dir;
125 params.CurrentDirectory.DosPath.MaximumLength = sizeof(current_dir);
126 params.wShowWindow = 1; /* SW_SHOWNORMAL */
127 RtlInitializeBitMap( &tls_bitmap, peb.TlsBitmapBits, sizeof(peb.TlsBitmapBits) * 8 );
128 RtlInitializeBitMap( &tls_expansion_bitmap, peb.TlsExpansionBitmapBits,
129 sizeof(peb.TlsExpansionBitmapBits) * 8 );
130 InitializeListHead( &ldr.InLoadOrderModuleList );
131 InitializeListHead( &ldr.InMemoryOrderModuleList );
132 InitializeListHead( &ldr.InInitializationOrderModuleList );
133 InitializeListHead( &tls_links );
134
135 sigstack_total_size = get_signal_stack_total_size();
136 thread_info.teb_size = sigstack_total_size;
137 VIRTUAL_alloc_teb( &addr, thread_info.teb_size, TRUE );
138 teb = addr;
139 init_teb( teb );
140 thread_data = (struct ntdll_thread_data *)teb->SystemReserved2;
141 thread_data->debug_info = &debug_info;
142 InsertHeadList( &tls_links, &teb->TlsLinks );
143
144 thread_info.stack_base = NULL;
145 thread_info.stack_size = 0;
146 thread_info.teb_base = teb;
147 thread_info.teb_sel = thread_data->teb_sel;
148 wine_pthread_get_functions( &pthread_functions, sizeof(pthread_functions) );
149 pthread_functions.init_current_teb( &thread_info );
150 pthread_functions.init_thread( &thread_info );
151
152 debug_info.str_pos = debug_info.strings;
153 debug_info.out_pos = debug_info.output;
154 debug_init();
155
156 /* setup the server connection */
157 server_init_process();
158 info_size = server_init_thread( thread_info.pid, thread_info.tid, NULL );
159
160 /* create the process heap */
161 if (!(peb.ProcessHeap = RtlCreateHeap( HEAP_GROWABLE, NULL, 0, 0, NULL, NULL )))
162 {
163 MESSAGE( "wine: failed to create the process heap\n" );
164 exit(1);
165 }
166
167 /* allocate user parameters */
168 if (info_size)
169 {
170 RTL_USER_PROCESS_PARAMETERS *params = NULL;
171
172 if (NtAllocateVirtualMemory( NtCurrentProcess(), (void **)&params, 0, &info_size,
173 MEM_COMMIT, PAGE_READWRITE ) == STATUS_SUCCESS)
174 {
175 params->AllocationSize = info_size;
176 NtCurrentTeb()->Peb->ProcessParameters = params;
177 }
178 }
179 else
180 {
181 /* This is wine specific: we have no parent (we're started from unix)
182 * so, create a simple console with bare handles to unix stdio
183 */
184 wine_server_fd_to_handle( 0, GENERIC_READ|SYNCHRONIZE, OBJ_INHERIT, &params.hStdInput );
185 wine_server_fd_to_handle( 1, GENERIC_WRITE|SYNCHRONIZE, OBJ_INHERIT, &params.hStdOutput );
186 wine_server_fd_to_handle( 2, GENERIC_WRITE|SYNCHRONIZE, OBJ_INHERIT, &params.hStdError );
187 }
188 }
189
190
191 /***********************************************************************
192 * start_thread
193 *
194 * Startup routine for a newly created thread.
195 */
196 static void start_thread( struct wine_pthread_thread_info *info )
197 {
198 TEB *teb = info->teb_base;
199 struct ntdll_thread_data *thread_data = (struct ntdll_thread_data *)teb->SystemReserved2;
200 struct startup_info *startup_info = (struct startup_info *)info;
201 PRTL_THREAD_START_ROUTINE func = startup_info->entry_point;
202 void *arg = startup_info->entry_arg;
203 struct debug_info debug_info;
204 SIZE_T size, page_size = getpagesize();
205
206 debug_info.str_pos = debug_info.strings;
207 debug_info.out_pos = debug_info.output;
208 thread_data->debug_info = &debug_info;
209
210 pthread_functions.init_current_teb( info );
211 SIGNAL_Init();
212 server_init_thread( info->pid, info->tid, func );
213 pthread_functions.init_thread( info );
214
215 /* allocate a memory view for the stack */
216 size = info->stack_size;
217 teb->DeallocationStack = info->stack_base;
218 NtAllocateVirtualMemory( NtCurrentProcess(), &teb->DeallocationStack, 0,
219 &size, MEM_SYSTEM, PAGE_READWRITE );
220 /* limit is lower than base since the stack grows down */
221 teb->Tib.StackBase = (char *)info->stack_base + info->stack_size;
222 teb->Tib.StackLimit = (char *)info->stack_base + page_size;
223
224 /* setup the guard page */
225 size = page_size;
226 NtProtectVirtualMemory( NtCurrentProcess(), &teb->DeallocationStack, &size, PAGE_NOACCESS, NULL );
227 RtlFreeHeap( GetProcessHeap(), 0, info );
228
229 RtlAcquirePebLock();
230 InsertHeadList( &tls_links, &teb->TlsLinks );
231 RtlReleasePebLock();
232
233 func( arg );
234 }
235
236
237 /***********************************************************************
238 * RtlCreateUserThread (NTDLL.@)
239 */
240 NTSTATUS WINAPI RtlCreateUserThread( HANDLE process, const SECURITY_DESCRIPTOR *descr,
241 BOOLEAN suspended, PVOID stack_addr,
242 SIZE_T stack_reserve, SIZE_T stack_commit,
243 PRTL_THREAD_START_ROUTINE start, void *param,
244 HANDLE *handle_ptr, CLIENT_ID *id )
245 {
246 struct ntdll_thread_data *thread_data = NULL;
247 struct startup_info *info = NULL;
248 void *addr;
249 HANDLE handle = 0;
250 TEB *teb;
251 DWORD tid = 0;
252 int request_pipe[2];
253 NTSTATUS status;
254 SIZE_T page_size = getpagesize();
255
256 if( ! is_current_process( process ) )
257 {
258 ERR("Unsupported on other process\n");
259 return STATUS_ACCESS_DENIED;
260 }
261
262 if (pipe( request_pipe ) == -1) return STATUS_TOO_MANY_OPENED_FILES;
263 fcntl( request_pipe[1], F_SETFD, 1 ); /* set close on exec flag */
264 wine_server_send_fd( request_pipe[0] );
265
266 SERVER_START_REQ( new_thread )
267 {
268 req->access = THREAD_ALL_ACCESS;
269 req->attributes = 0; /* FIXME */
270 req->suspend = suspended;
271 req->request_fd = request_pipe[0];
272 if (!(status = wine_server_call( req )))
273 {
274 handle = reply->handle;
275 tid = reply->tid;
276 }
277 close( request_pipe[0] );
278 }
279 SERVER_END_REQ;
280
281 if (status) goto error;
282
283 if (!(info = RtlAllocateHeap( GetProcessHeap(), 0, sizeof(*info) )))
284 {
285 status = STATUS_NO_MEMORY;
286 goto error;
287 }
288
289 info->pthread_info.teb_size = sigstack_total_size;
290 if ((status = VIRTUAL_alloc_teb( &addr, info->pthread_info.teb_size, FALSE ))) goto error;
291 teb = addr;
292 if ((status = init_teb( teb ))) goto error;
293
294 teb->ClientId.UniqueProcess = (HANDLE)GetCurrentProcessId();
295 teb->ClientId.UniqueThread = (HANDLE)tid;
296
297 thread_data = (struct ntdll_thread_data *)teb->SystemReserved2;
298 thread_data->request_fd = request_pipe[1];
299
300 info->pthread_info.teb_base = teb;
301 info->pthread_info.teb_sel = thread_data->teb_sel;
302
303 if (!stack_reserve || !stack_commit)
304 {
305 IMAGE_NT_HEADERS *nt = RtlImageNtHeader( NtCurrentTeb()->Peb->ImageBaseAddress );
306 if (!stack_reserve) stack_reserve = nt->OptionalHeader.SizeOfStackReserve;
307 if (!stack_commit) stack_commit = nt->OptionalHeader.SizeOfStackCommit;
308 }
309 if (stack_reserve < stack_commit) stack_reserve = stack_commit;
310 stack_reserve += page_size; /* for the guard page */
311 stack_reserve = (stack_reserve + 0xffff) & ~0xffff; /* round to 64K boundary */
312 if (stack_reserve < 1024 * 1024) stack_reserve = 1024 * 1024; /* Xlib needs a large stack */
313
314 info->pthread_info.stack_base = NULL;
315 info->pthread_info.stack_size = stack_reserve;
316 info->pthread_info.entry = start_thread;
317 info->entry_point = start;
318 info->entry_arg = param;
319
320 if (pthread_functions.create_thread( &info->pthread_info ) == -1)
321 {
322 status = STATUS_NO_MEMORY;
323 goto error;
324 }
325
326 if (id) id->UniqueThread = (HANDLE)tid;
327 if (handle_ptr) *handle_ptr = handle;
328 else NtClose( handle );
329
330 return STATUS_SUCCESS;
331
332 error:
333 if (thread_data) wine_ldt_free_fs( thread_data->teb_sel );
334 if (addr)
335 {
336 SIZE_T size = 0;
337 NtFreeVirtualMemory( NtCurrentProcess(), &addr, &size, MEM_RELEASE );
338 }
339 if (info) RtlFreeHeap( GetProcessHeap(), 0, info );
340 if (handle) NtClose( handle );
341 close( request_pipe[1] );
342 return status;
343 }
344
345
346 /***********************************************************************
347 * RtlExitUserThread (NTDLL.@)
348 */
349 void WINAPI RtlExitUserThread( ULONG status )
350 {
351 LdrShutdownThread();
352 server_exit_thread( status );
353 }
354
355
356 /***********************************************************************
357 * NtOpenThread (NTDLL.@)
358 * ZwOpenThread (NTDLL.@)
359 */
360 NTSTATUS WINAPI NtOpenThread( HANDLE *handle, ACCESS_MASK access,
361 const OBJECT_ATTRIBUTES *attr, const CLIENT_ID *id )
362 {
363 NTSTATUS ret;
364
365 SERVER_START_REQ( open_thread )
366 {
367 req->tid = (thread_id_t)id->UniqueThread;
368 req->access = access;
369 req->attributes = attr ? attr->Attributes : 0;
370 ret = wine_server_call( req );
371 *handle = reply->handle;
372 }
373 SERVER_END_REQ;
374 return ret;
375 }
376
377
378 /******************************************************************************
379 * NtSuspendThread (NTDLL.@)
380 * ZwSuspendThread (NTDLL.@)
381 */
382 NTSTATUS WINAPI NtSuspendThread( HANDLE handle, PULONG count )
383 {
384 NTSTATUS ret;
385
386 SERVER_START_REQ( suspend_thread )
387 {
388 req->handle = handle;
389 if (!(ret = wine_server_call( req ))) *count = reply->count;
390 }
391 SERVER_END_REQ;
392 return ret;
393 }
394
395
396 /******************************************************************************
397 * NtResumeThread (NTDLL.@)
398 * ZwResumeThread (NTDLL.@)
399 */
400 NTSTATUS WINAPI NtResumeThread( HANDLE handle, PULONG count )
401 {
402 NTSTATUS ret;
403
404 SERVER_START_REQ( resume_thread )
405 {
406 req->handle = handle;
407 if (!(ret = wine_server_call( req ))) *count = reply->count;
408 }
409 SERVER_END_REQ;
410 return ret;
411 }
412
413
414 /******************************************************************************
415 * NtAlertResumeThread (NTDLL.@)
416 * ZwAlertResumeThread (NTDLL.@)
417 */
418 NTSTATUS WINAPI NtAlertResumeThread( HANDLE handle, PULONG count )
419 {
420 FIXME( "stub: should alert thread %p\n", handle );
421 return NtResumeThread( handle, count );
422 }
423
424
425 /******************************************************************************
426 * NtAlertThread (NTDLL.@)
427 * ZwAlertThread (NTDLL.@)
428 */
429 NTSTATUS WINAPI NtAlertThread( HANDLE handle )
430 {
431 FIXME( "stub: %p\n", handle );
432 return STATUS_NOT_IMPLEMENTED;
433 }
434
435
436 /******************************************************************************
437 * NtTerminateThread (NTDLL.@)
438 * ZwTerminateThread (NTDLL.@)
439 */
440 NTSTATUS WINAPI NtTerminateThread( HANDLE handle, LONG exit_code )
441 {
442 NTSTATUS ret;
443 BOOL self, last;
444
445 SERVER_START_REQ( terminate_thread )
446 {
447 req->handle = handle;
448 req->exit_code = exit_code;
449 ret = wine_server_call( req );
450 self = !ret && reply->self;
451 last = reply->last;
452 }
453 SERVER_END_REQ;
454
455 if (self)
456 {
457 if (last) exit( exit_code );
458 else server_abort_thread( exit_code );
459 }
460 return ret;
461 }
462
463
464 /******************************************************************************
465 * NtQueueApcThread (NTDLL.@)
466 */
467 NTSTATUS WINAPI NtQueueApcThread( HANDLE handle, PNTAPCFUNC func, ULONG_PTR arg1,
468 ULONG_PTR arg2, ULONG_PTR arg3 )
469 {
470 NTSTATUS ret;
471 SERVER_START_REQ( queue_apc )
472 {
473 req->handle = handle;
474 req->user = 1;
475 req->func = func;
476 req->arg1 = (void *)arg1;
477 req->arg2 = (void *)arg2;
478 req->arg3 = (void *)arg3;
479 ret = wine_server_call( req );
480 }
481 SERVER_END_REQ;
482 return ret;
483 }
484
485
486 /***********************************************************************
487 * NtSetContextThread (NTDLL.@)
488 * ZwSetContextThread (NTDLL.@)
489 */
490 NTSTATUS WINAPI NtSetContextThread( HANDLE handle, const CONTEXT *context )
491 {
492 NTSTATUS ret;
493 DWORD dummy, i;
494
495 SERVER_START_REQ( set_thread_context )
496 {
497 req->handle = handle;
498 req->flags = context->ContextFlags;
499 req->suspend = 0;
500 wine_server_add_data( req, context, sizeof(*context) );
501 ret = wine_server_call( req );
502 }
503 SERVER_END_REQ;
504
505 if (ret == STATUS_PENDING)
506 {
507 if (NtSuspendThread( handle, &dummy ) == STATUS_SUCCESS)
508 {
509 for (i = 0; i < 100; i++)
510 {
511 SERVER_START_REQ( set_thread_context )
512 {
513 req->handle = handle;
514 req->flags = context->ContextFlags;
515 req->suspend = 0;
516 wine_server_add_data( req, context, sizeof(*context) );
517 ret = wine_server_call( req );
518 }
519 SERVER_END_REQ;
520 if (ret != STATUS_PENDING) break;
521 NtYieldExecution();
522 }
523 NtResumeThread( handle, &dummy );
524 }
525 }
526
527 if (ret == STATUS_PENDING) ret = STATUS_ACCESS_DENIED;
528 return ret;
529 }
530
531
532 /* copy a context structure according to the flags */
533 static inline void copy_context( CONTEXT *to, const CONTEXT *from, DWORD flags )
534 {
535 #ifdef __i386__
536 flags &= ~CONTEXT_i386; /* get rid of CPU id */
537 if (flags & CONTEXT_INTEGER)
538 {
539 to->Eax = from->Eax;
540 to->Ebx = from->Ebx;
541 to->Ecx = from->Ecx;
542 to->Edx = from->Edx;
543 to->Esi = from->Esi;
544 to->Edi = from->Edi;
545 }
546 if (flags & CONTEXT_CONTROL)
547 {
548 to->Ebp = from->Ebp;
549 to->Esp = from->Esp;
550 to->Eip = from->Eip;
551 to->SegCs = from->SegCs;
552 to->SegSs = from->SegSs;
553 to->EFlags = from->EFlags;
554 }
555 if (flags & CONTEXT_SEGMENTS)
556 {
557 to->SegDs = from->SegDs;
558 to->SegEs = from->SegEs;
559 to->SegFs = from->SegFs;
560 to->SegGs = from->SegGs;
561 }
562 if (flags & CONTEXT_DEBUG_REGISTERS)
563 {
564 to->Dr0 = from->Dr0;
565 to->Dr1 = from->Dr1;
566 to->Dr2 = from->Dr2;
567 to->Dr3 = from->Dr3;
568 to->Dr6 = from->Dr6;
569 to->Dr7 = from->Dr7;
570 }
571 if (flags & CONTEXT_FLOATING_POINT)
572 {
573 to->FloatSave = from->FloatSave;
574 }
575 #elif defined(__x86_64__)
576 flags &= ~CONTEXT_AMD64; /* get rid of CPU id */
577 if (flags & CONTEXT_CONTROL)
578 {
579 to->Rbp = from->Rbp;
580 to->Rip = from->Rip;
581 to->Rsp = from->Rsp;
582 to->SegCs = from->SegCs;
583 to->SegSs = from->SegSs;
584 to->EFlags = from->EFlags;
585 to->MxCsr = from->MxCsr;
586 }
587 if (flags & CONTEXT_INTEGER)
588 {
589 to->Rax = from->Rax;
590 to->Rcx = from->Rcx;
591 to->Rdx = from->Rdx;
592 to->Rbx = from->Rbx;
593 to->Rsi = from->Rsi;
594 to->Rdi = from->Rdi;
595 to->R8 = from->R8;
596 to->R9 = from->R9;
597 to->R10 = from->R10;
598 to->R11 = from->R11;
599 to->R12 = from->R12;
600 to->R13 = from->R13;
601 to->R14 = from->R14;
602 to->R15 = from->R15;
603 }
604 if (flags & CONTEXT_SEGMENTS)
605 {
606 to->SegDs = from->SegDs;
607 to->SegEs = from->SegEs;
608 to->SegFs = from->SegFs;
609 to->SegGs = from->SegGs;
610 }
611 if (flags & CONTEXT_FLOATING_POINT)
612 {
613 to->u.FltSave = from->u.FltSave;
614 }
615 if (flags & CONTEXT_DEBUG_REGISTERS)
616 {
617 to->Dr0 = from->Dr0;
618 to->Dr1 = from->Dr1;
619 to->Dr2 = from->Dr2;
620 to->Dr3 = from->Dr3;
621 to->Dr6 = from->Dr6;
622 to->Dr7 = from->Dr7;
623 }
624 #elif defined(__sparc__)
625 flags &= ~CONTEXT_SPARC; /* get rid of CPU id */
626 if (flags & CONTEXT_CONTROL)
627 {
628 to->psr = from->psr;
629 to->pc = from->pc;
630 to->npc = from->npc;
631 to->y = from->y;
632 to->wim = from->wim;
633 to->tbr = from->tbr;
634 }
635 if (flags & CONTEXT_INTEGER)
636 {
637 to->g0 = from->g0;
638 to->g1 = from->g1;
639 to->g2 = from->g2;
640 to->g3 = from->g3;
641 to->g4 = from->g4;
642 to->g5 = from->g5;
643 to->g6 = from->g6;
644 to->g7 = from->g7;
645 to->o0 = from->o0;
646 to->o1 = from->o1;
647 to->o2 = from->o2;
648 to->o3 = from->o3;
649 to->o4 = from->o4;
650 to->o5 = from->o5;
651 to->o6 = from->o6;
652 to->o7 = from->o7;
653 to->l0 = from->l0;
654 to->l1 = from->l1;
655 to->l2 = from->l2;
656 to->l3 = from->l3;
657 to->l4 = from->l4;
658 to->l5 = from->l5;
659 to->l6 = from->l6;
660 to->l7 = from->l7;
661 to->i0 = from->i0;
662 to->i1 = from->i1;
663 to->i2 = from->i2;
664 to->i3 = from->i3;
665 to->i4 = from->i4;
666 to->i5 = from->i5;
667 to->i6 = from->i6;
668 to->i7 = from->i7;
669 }
670 if (flags & CONTEXT_FLOATING_POINT)
671 {
672 /* FIXME */
673 }
674 #elif defined(__powerpc__)
675 /* Has no CPU id */
676 if (flags & CONTEXT_CONTROL)
677 {
678 to->Msr = from->Msr;
679 to->Ctr = from->Ctr;
680 to->Iar = from->Iar;
681 }
682 if (flags & CONTEXT_INTEGER)
683 {
684 to->Gpr0 = from->Gpr0;
685 to->Gpr1 = from->Gpr1;
686 to->Gpr2 = from->Gpr2;
687 to->Gpr3 = from->Gpr3;
688 to->Gpr4 = from->Gpr4;
689 to->Gpr5 = from->Gpr5;
690 to->Gpr6 = from->Gpr6;
691 to->Gpr7 = from->Gpr7;
692 to->Gpr8 = from->Gpr8;
693 to->Gpr9 = from->Gpr9;
694 to->Gpr10 = from->Gpr10;
695 to->Gpr11 = from->Gpr11;
696 to->Gpr12 = from->Gpr12;
697 to->Gpr13 = from->Gpr13;
698 to->Gpr14 = from->Gpr14;
699 to->Gpr15 = from->Gpr15;
700 to->Gpr16 = from->Gpr16;
701 to->Gpr17 = from->Gpr17;
702 to->Gpr18 = from->Gpr18;
703 to->Gpr19 = from->Gpr19;
704 to->Gpr20 = from->Gpr20;
705 to->Gpr21 = from->Gpr21;
706 to->Gpr22 = from->Gpr22;
707 to->Gpr23 = from->Gpr23;
708 to->Gpr24 = from->Gpr24;
709 to->Gpr25 = from->Gpr25;
710 to->Gpr26 = from->Gpr26;
711 to->Gpr27 = from->Gpr27;
712 to->Gpr28 = from->Gpr28;
713 to->Gpr29 = from->Gpr29;
714 to->Gpr30 = from->Gpr30;
715 to->Gpr31 = from->Gpr31;
716 to->Xer = from->Xer;
717 to->Cr = from->Cr;
718 }
719 if (flags & CONTEXT_FLOATING_POINT)
720 {
721 to->Fpr0 = from->Fpr0;
722 to->Fpr1 = from->Fpr1;
723 to->Fpr2 = from->Fpr2;
724 to->Fpr3 = from->Fpr3;
725 to->Fpr4 = from->Fpr4;
726 to->Fpr5 = from->Fpr5;
727 to->Fpr6 = from->Fpr6;
728 to->Fpr7 = from->Fpr7;
729 to->Fpr8 = from->Fpr8;
730 to->Fpr9 = from->Fpr9;
731 to->Fpr10 = from->Fpr10;
732 to->Fpr11 = from->Fpr11;
733 to->Fpr12 = from->Fpr12;
734 to->Fpr13 = from->Fpr13;
735 to->Fpr14 = from->Fpr14;
736 to->Fpr15 = from->Fpr15;
737 to->Fpr16 = from->Fpr16;
738 to->Fpr17 = from->Fpr17;
739 to->Fpr18 = from->Fpr18;
740 to->Fpr19 = from->Fpr19;
741 to->Fpr20 = from->Fpr20;
742 to->Fpr21 = from->Fpr21;
743 to->Fpr22 = from->Fpr22;
744 to->Fpr23 = from->Fpr23;
745 to->Fpr24 = from->Fpr24;
746 to->Fpr25 = from->Fpr25;
747 to->Fpr26 = from->Fpr26;
748 to->Fpr27 = from->Fpr27;
749 to->Fpr28 = from->Fpr28;
750 to->Fpr29 = from->Fpr29;
751 to->Fpr30 = from->Fpr30;
752 to->Fpr31 = from->Fpr31;
753 to->Fpscr = from->Fpscr;
754 }
755 #else
756 #error You must implement context copying for your CPU
757 #endif
758 }
759
760
761 /***********************************************************************
762 * NtGetContextThread (NTDLL.@)
763 * ZwGetContextThread (NTDLL.@)
764 */
765 NTSTATUS WINAPI NtGetContextThread( HANDLE handle, CONTEXT *context )
766 {
767 NTSTATUS ret;
768 CONTEXT ctx;
769 DWORD dummy, i;
770
771 SERVER_START_REQ( get_thread_context )
772 {
773 req->handle = handle;
774 req->flags = context->ContextFlags;
775 req->suspend = 0;
776 wine_server_set_reply( req, &ctx, sizeof(ctx) );
777 ret = wine_server_call( req );
778 }
779 SERVER_END_REQ;
780
781 if (ret == STATUS_PENDING)
782 {
783 if (NtSuspendThread( handle, &dummy ) == STATUS_SUCCESS)
784 {
785 for (i = 0; i < 100; i++)
786 {
787 SERVER_START_REQ( get_thread_context )
788 {
789 req->handle = handle;
790 req->flags = context->ContextFlags;
791 req->suspend = 0;
792 wine_server_set_reply( req, &ctx, sizeof(ctx) );
793 ret = wine_server_call( req );
794 }
795 SERVER_END_REQ;
796 if (ret != STATUS_PENDING) break;
797 NtYieldExecution();
798 }
799 NtResumeThread( handle, &dummy );
800 }
801 }
802
803 if (ret == STATUS_SUCCESS) copy_context( context, &ctx, context->ContextFlags );
804 else if (ret == STATUS_PENDING) ret = STATUS_ACCESS_DENIED;
805 return ret;
806 }
807
808
809 /******************************************************************************
810 * NtQueryInformationThread (NTDLL.@)
811 * ZwQueryInformationThread (NTDLL.@)
812 */
813 NTSTATUS WINAPI NtQueryInformationThread( HANDLE handle, THREADINFOCLASS class,
814 void *data, ULONG length, ULONG *ret_len )
815 {
816 NTSTATUS status;
817
818 switch(class)
819 {
820 case ThreadBasicInformation:
821 {
822 THREAD_BASIC_INFORMATION info;
823
824 SERVER_START_REQ( get_thread_info )
825 {
826 req->handle = handle;
827 req->tid_in = 0;
828 if (!(status = wine_server_call( req )))
829 {
830 info.ExitStatus = reply->exit_code;
831 info.TebBaseAddress = reply->teb;
832 info.ClientId.UniqueProcess = (HANDLE)reply->pid;
833 info.ClientId.UniqueThread = (HANDLE)reply->tid;
834 info.AffinityMask = reply->affinity;
835 info.Priority = reply->priority;
836 info.BasePriority = reply->priority; /* FIXME */
837 }
838 }
839 SERVER_END_REQ;
840 if (status == STATUS_SUCCESS)
841 {
842 if (data) memcpy( data, &info, min( length, sizeof(info) ));
843 if (ret_len) *ret_len = min( length, sizeof(info) );
844 }
845 }
846 return status;
847 case ThreadTimes:
848 {
849 KERNEL_USER_TIMES kusrt;
850 /* We need to do a server call to get the creation time or exit time */
851 /* This works on any thread */
852 SERVER_START_REQ( get_thread_info )
853 {
854 req->handle = handle;
855 req->tid_in = 0;
856 status = wine_server_call( req );
857 if (status == STATUS_SUCCESS)
858 {
859 RtlSecondsSince1970ToTime( reply->creation_time, &kusrt.CreateTime );
860 RtlSecondsSince1970ToTime( reply->exit_time, &kusrt.ExitTime );
861 }
862 }
863 SERVER_END_REQ;
864 if (status == STATUS_SUCCESS)
865 {
866 /* We call times(2) for kernel time or user time */
867 /* We can only (portably) do this for the current thread */
868 if (handle == GetCurrentThread())
869 {
870 struct tms time_buf;
871 long clocks_per_sec = sysconf(_SC_CLK_TCK);
872
873 times(&time_buf);
874 kusrt.KernelTime.QuadPart = (ULONGLONG)time_buf.tms_stime * 10000000 / clocks_per_sec;
875 kusrt.UserTime.QuadPart = (ULONGLONG)time_buf.tms_utime * 10000000 / clocks_per_sec;
876 }
877 else
878 {
879 kusrt.KernelTime.QuadPart = 0;
880 kusrt.UserTime.QuadPart = 0;
881 FIXME("Cannot get kerneltime or usertime of other threads\n");
882 }
883 if (data) memcpy( data, &kusrt, min( length, sizeof(kusrt) ));
884 if (ret_len) *ret_len = min( length, sizeof(kusrt) );
885 }
886 }
887 return status;
888 case ThreadPriority:
889 case ThreadBasePriority:
890 case ThreadAffinityMask:
891 case ThreadImpersonationToken:
892 case ThreadDescriptorTableEntry:
893 case ThreadEnableAlignmentFaultFixup:
894 case ThreadEventPair_Reusable:
895 case ThreadQuerySetWin32StartAddress:
896 case ThreadZeroTlsCell:
897 case ThreadPerformanceCount:
898 case ThreadAmILastThread:
899 case ThreadIdealProcessor:
900 case ThreadPriorityBoost:
901 case ThreadSetTlsArrayAddress:
902 case ThreadIsIoPending:
903 default:
904 FIXME( "info class %d not supported yet\n", class );
905 return STATUS_NOT_IMPLEMENTED;
906 }
907 }
908
909
910 /******************************************************************************
911 * NtSetInformationThread (NTDLL.@)
912 * ZwSetInformationThread (NTDLL.@)
913 */
914 NTSTATUS WINAPI NtSetInformationThread( HANDLE handle, THREADINFOCLASS class,
915 LPCVOID data, ULONG length )
916 {
917 NTSTATUS status;
918 switch(class)
919 {
920 case ThreadZeroTlsCell:
921 if (handle == GetCurrentThread())
922 {
923 LIST_ENTRY *entry;
924 DWORD index;
925
926 if (length != sizeof(DWORD)) return STATUS_INVALID_PARAMETER;
927 index = *(const DWORD *)data;
928 if (index < TLS_MINIMUM_AVAILABLE)
929 {
930 RtlAcquirePebLock();
931 for (entry = tls_links.Flink; entry != &tls_links; entry = entry->Flink)
932 {
933 TEB *teb = CONTAINING_RECORD(entry, TEB, TlsLinks);
934 teb->TlsSlots[index] = 0;
935 }
936 RtlReleasePebLock();
937 }
938 else
939 {
940 index -= TLS_MINIMUM_AVAILABLE;
941 if (index >= 8 * sizeof(NtCurrentTeb()->Peb->TlsExpansionBitmapBits))
942 return STATUS_INVALID_PARAMETER;
943 RtlAcquirePebLock();
944 for (entry = tls_links.Flink; entry != &tls_links; entry = entry->Flink)
945 {
946 TEB *teb = CONTAINING_RECORD(entry, TEB, TlsLinks);
947 if (teb->TlsExpansionSlots) teb->TlsExpansionSlots[index] = 0;
948 }
949 RtlReleasePebLock();
950 }
951 return STATUS_SUCCESS;
952 }
953 FIXME( "ZeroTlsCell not supported on other threads\n" );
954 return STATUS_NOT_IMPLEMENTED;
955
956 case ThreadImpersonationToken:
957 {
958 const HANDLE *phToken = data;
959 if (length != sizeof(HANDLE)) return STATUS_INVALID_PARAMETER;
960 TRACE("Setting ThreadImpersonationToken handle to %p\n", *phToken );
961 SERVER_START_REQ( set_thread_info )
962 {
963 req->handle = handle;
964 req->token = *phToken;
965 req->mask = SET_THREAD_INFO_TOKEN;
966 status = wine_server_call( req );
967 }
968 SERVER_END_REQ;
969 }
970 return status;
971 case ThreadBasePriority:
972 {
973 const DWORD *pprio = data;
974 if (length != sizeof(DWORD)) return STATUS_INVALID_PARAMETER;
975 SERVER_START_REQ( set_thread_info )
976 {
977 req->handle = handle;
978 req->priority = *pprio;
979 req->mask = SET_THREAD_INFO_PRIORITY;
980 status = wine_server_call( req );
981 }
982 SERVER_END_REQ;
983 }
984 return status;
985 case ThreadBasicInformation:
986 case ThreadTimes:
987 case ThreadPriority:
988 case ThreadAffinityMask:
989 case ThreadDescriptorTableEntry:
990 case ThreadEnableAlignmentFaultFixup:
991 case ThreadEventPair_Reusable:
992 case ThreadQuerySetWin32StartAddress:
993 case ThreadPerformanceCount:
994 case ThreadAmILastThread:
995 case ThreadIdealProcessor:
996 case ThreadPriorityBoost:
997 case ThreadSetTlsArrayAddress:
998 case ThreadIsIoPending:
999 default:
1000 FIXME( "info class %d not supported yet\n", class );
1001 return STATUS_NOT_IMPLEMENTED;
1002 }
1003 }
1004
1005
1006 /**********************************************************************
1007 * NtCurrentTeb (NTDLL.@)
1008 */
1009 #if defined(__i386__) && defined(__GNUC__)
1010
1011 __ASM_GLOBAL_FUNC( NtCurrentTeb, ".byte 0x64\n\tmovl 0x18,%eax\n\tret" );
1012
1013 #elif defined(__i386__) && defined(_MSC_VER)
1014
1015 /* Nothing needs to be done. MS C "magically" exports the inline version from winnt.h */
1016
1017 #else
1018
1019 /**********************************************************************/
1020
1021 TEB * WINAPI NtCurrentTeb(void)
1022 {
1023 return pthread_functions.get_current_teb();
1024 }
1025
1026 #endif /* __i386__ */
Maarten's multimedia branch