scheduler/thread.c

   1 /*
   2  * Win32 threads
   3  *
   4  * Copyright 1996 Alexandre Julliard
   5  */
   6
   7 #include "config.h"
   8
   9 #include <assert.h>
  10 #include <fcntl.h>
  11 #include <sys/types.h>
  12 #ifdef HAVE_SYS_MMAN_H
  13 #include <sys/mman.h>
  14 #endif
  15 #include <unistd.h>
  16 #include "wine/winbase16.h"
  17 #include "wine/port.h"
  18 #include "thread.h"
  19 #include "task.h"
  20 #include "module.h"
  21 #include "winerror.h"
  22 #include "heap.h"
  23 #include "selectors.h"
  24 #include "winnt.h"
  25 #include "server.h"
  26 #include "services.h"
  27 #include "stackframe.h"
  28 #include "builtin16.h"
  29 #include "debugtools.h"
  30 #include "winnls.h"
  31
  32 DEFAULT_DEBUG_CHANNEL(thread);
  33 DECLARE_DEBUG_CHANNEL(relay);
  34
  35 /* TEB of the initial thread */
  36 static TEB initial_teb;
  37
  38 extern struct _PDB current_process;
  39
  40 /***********************************************************************
  41  *           THREAD_IsWin16
  42  */
  43 BOOL THREAD_IsWin16( TEB *teb )
  44 {
  45     return !teb || !(teb->tibflags & TEBF_WIN32);
  46 }
  47
  48 /***********************************************************************
  49  *           THREAD_IdToTEB
  50  *
  51  * Convert a thread id to a TEB, making sure it is valid.
  52  */
  53 TEB *THREAD_IdToTEB( DWORD id )
  54 {
  55     TEB *ret = NULL;
  56
  57     if (!id || id == GetCurrentThreadId()) return NtCurrentTeb();
  58
  59     SERVER_START_REQ( get_thread_info )
  60     {
  61         req->handle = 0;
  62         req->tid_in = (void *)id;
  63         if (!SERVER_CALL()) ret = req->teb;
  64     }
  65     SERVER_END_REQ;
  66
  67     if (!ret)
  68     {
  69         /* Allow task handles to be used; convert to main thread */
  70         if ( IsTask16( id ) )
  71         {
  72             TDB *pTask = TASK_GetPtr( id );
  73             if (pTask) return pTask->teb;
  74         }
  75         SetLastError( ERROR_INVALID_PARAMETER );
  76     }
  77     return ret;
  78 }
  79
  80
  81 /***********************************************************************
  82  *           THREAD_InitTEB
  83  *
  84  * Initialization of a newly created TEB.
  85  */
  86 static BOOL THREAD_InitTEB( TEB *teb )
  87 {
  88     teb->except    = (void *)~0UL;
  89     teb->self      = teb;
  90     teb->tibflags  = TEBF_WIN32;
  91     teb->tls_ptr   = teb->tls_array;
  92     teb->exit_code = STILL_ACTIVE;
  93     teb->request_fd = -1;
  94     teb->reply_fd   = -1;
  95     teb->wait_fd[0] = -1;
  96     teb->wait_fd[1] = -1;
  97     teb->stack_top  = (void *)~0UL;
  98     teb->StaticUnicodeString.MaximumLength = sizeof(teb->StaticUnicodeBuffer);
  99     teb->StaticUnicodeString.Buffer = (PWSTR)teb->StaticUnicodeBuffer;
 100     teb->teb_sel = SELECTOR_AllocBlock( teb, 0x1000, WINE_LDT_FLAGS_DATA|WINE_LDT_FLAGS_32BIT );
 101     return (teb->teb_sel != 0);
 102 }
 103
 104
 105 /***********************************************************************
 106  *           THREAD_FreeTEB
 107  *
 108  * Free data structures associated with a thread.
 109  * Must be called from the context of another thread.
 110  */
 111 static void CALLBACK THREAD_FreeTEB( TEB *teb )
 112 {
 113     TRACE("(%p) called\n", teb );
 114     if (teb->cleanup) SERVICE_Delete( teb->cleanup );
 115
 116     /* Free the associated memory */
 117
 118     close( teb->request_fd );
 119     close( teb->reply_fd );
 120     close( teb->wait_fd[0] );
 121     close( teb->wait_fd[1] );
 122     if (teb->stack_sel) FreeSelector16( teb->stack_sel );
 123     FreeSelector16( teb->teb_sel );
 124     if (teb->buffer) munmap( (void *)teb->buffer, teb->buffer_size );
 125     if (teb->debug_info) HeapFree( GetProcessHeap(), 0, teb->debug_info );
 126     VirtualFree( teb->stack_base, 0, MEM_RELEASE );
 127 }
 128
 129
 130 /***********************************************************************
 131  *           THREAD_InitStack
 132  *
 133  * Allocate the stack of a thread.
 134  */
 135 TEB *THREAD_InitStack( TEB *teb, DWORD stack_size )
 136 {
 137     DWORD old_prot, total_size;
 138     DWORD page_size = getpagesize();
 139     void *base;
 140
 141     /* Allocate the stack */
 142
 143     if (stack_size >= 16*1024*1024)
 144         WARN("Thread stack size is %ld MB.\n",stack_size/1024/1024);
 145
 146     /* if size is smaller than default, get stack size from parent */
 147     if (stack_size < 1024 * 1024)
 148     {
 149         if (teb)
 150             stack_size = 1024 * 1024;  /* no parent */
 151         else
 152             stack_size = ((char *)NtCurrentTeb()->stack_top - (char *)NtCurrentTeb()->stack_base
 153                           - SIGNAL_STACK_SIZE - 3 * page_size);
 154     }
 155
 156     /* FIXME: some Wine functions use a lot of stack, so we add 64Kb here */
 157     stack_size += 64 * 1024;
 158
 159     /* Memory layout in allocated block:
 160      *
 161      *   size                 contents
 162      * 1 page              NOACCESS guard page
 163      * SIGNAL_STACK_SIZE   signal stack
 164      * 1 page              NOACCESS guard page
 165      * 1 page              PAGE_GUARD guard page
 166      * stack_size          normal stack
 167      * 64Kb                16-bit stack (optional)
 168      * 1 page              TEB (except for initial thread)
 169      */
 170
 171     stack_size = (stack_size + (page_size - 1)) & ~(page_size - 1);
 172     total_size = stack_size + SIGNAL_STACK_SIZE + 3 * page_size;
 173     total_size += 0x10000; /* 16-bit stack */
 174     if (!teb) total_size += page_size;
 175
 176     if (!(base = VirtualAlloc( NULL, total_size, MEM_COMMIT, PAGE_EXECUTE_READWRITE )))
 177         return NULL;
 178
 179     if (!teb)
 180     {
 181         teb = (TEB *)((char *)base + total_size - page_size);
 182         if (!THREAD_InitTEB( teb ))
 183         {
 184             VirtualFree( base, 0, MEM_RELEASE );
 185             return NULL;
 186         }
 187     }
 188
 189     teb->stack_low    = base;
 190     teb->stack_base   = base;
 191     teb->signal_stack = (char *)base + page_size;
 192     teb->stack_top    = (char *)base + 3 * page_size + SIGNAL_STACK_SIZE + stack_size;
 193
 194     /* Setup guard pages */
 195
 196     VirtualProtect( base, 1, PAGE_NOACCESS, &old_prot );
 197     VirtualProtect( (char *)teb->signal_stack + SIGNAL_STACK_SIZE, 1, PAGE_NOACCESS, &old_prot );
 198     VirtualProtect( (char *)teb->signal_stack + SIGNAL_STACK_SIZE + page_size, 1,
 199                     PAGE_EXECUTE_READWRITE | PAGE_GUARD, &old_prot );
 200
 201     /* Allocate the 16-bit stack selector */
 202
 203     teb->stack_sel = SELECTOR_AllocBlock( teb->stack_top, 0x10000, WINE_LDT_FLAGS_DATA );
 204     if (!teb->stack_sel) goto error;
 205     teb->cur_stack = MAKESEGPTR( teb->stack_sel, 0x10000 - sizeof(STACK16FRAME) );
 206
 207     return teb;
 208
 209 error:
 210     THREAD_FreeTEB( teb );
 211     return NULL;
 212 }
 213
 214
 215 /***********************************************************************
 216  *           thread_errno_location
 217  *
 218  * Get the per-thread errno location.
 219  */
 220 static int *thread_errno_location(void)
 221 {
 222     return &NtCurrentTeb()->thread_errno;
 223 }
 224
 225 /***********************************************************************
 226  *           thread_h_errno_location
 227  *
 228  * Get the per-thread h_errno location.
 229  */
 230 static int *thread_h_errno_location(void)
 231 {
 232     return &NtCurrentTeb()->thread_h_errno;
 233 }
 234
 235 /***********************************************************************
 236  *           THREAD_Init
 237  *
 238  * Setup the initial thread.
 239  *
 240  * NOTES: The first allocated TEB on NT is at 0x7ffde000.
 241  */
 242 void THREAD_Init(void)
 243 {
 244     if (!initial_teb.self)  /* do it only once */
 245     {
 246         THREAD_InitTEB( &initial_teb );
 247         assert( initial_teb.teb_sel );
 248         initial_teb.process = &current_process;
 249         SYSDEPS_SetCurThread( &initial_teb );
 250         wine_errno_location = thread_errno_location;
 251         wine_h_errno_location = thread_h_errno_location;
 252     }
 253 }
 254
 255 DECL_GLOBAL_CONSTRUCTOR(thread_init) { THREAD_Init(); }
 256
 257
 258 /***********************************************************************
 259  *           THREAD_Start
 260  *
 261  * Start execution of a newly created thread. Does not return.
 262  */
 263 static void THREAD_Start(void)
 264 {
 265     HANDLE cleanup_object;
 266     LPTHREAD_START_ROUTINE func = (LPTHREAD_START_ROUTINE)NtCurrentTeb()->entry_point;
 267
 268     /* install cleanup handler */
 269     if (DuplicateHandle( GetCurrentProcess(), GetCurrentThread(),
 270                          GetCurrentProcess(), &cleanup_object,
 271                          0, FALSE, DUPLICATE_SAME_ACCESS ))
 272         NtCurrentTeb()->cleanup = SERVICE_AddObject( cleanup_object, (PAPCFUNC)THREAD_FreeTEB,
 273                                                      (ULONG_PTR)NtCurrentTeb() );
 274
 275     TRACE_(relay)("Starting thread %08lx\n", GetCurrentThreadId());
 276
 277     PROCESS_CallUserSignalProc( USIG_THREAD_INIT, 0 );
 278     PE_InitTls();
 279     MODULE_DllThreadAttach( NULL );
 280     ExitThread( func( NtCurrentTeb()->entry_arg ) );
 281 }
 282
 283
 284 /***********************************************************************
 285  *           CreateThread   (KERNEL32.@)
 286  */
 287 HANDLE WINAPI CreateThread( SECURITY_ATTRIBUTES *sa, DWORD stack,
 288                             LPTHREAD_START_ROUTINE start, LPVOID param,
 289                             DWORD flags, LPDWORD id )
 290 {
 291     HANDLE handle = 0;
 292     TEB *teb;
 293     void *tid = 0;
 294     int request_pipe[2];
 295
 296     if (pipe( request_pipe ) == -1)
 297     {
 298         SetLastError( ERROR_TOO_MANY_OPEN_FILES );
 299         return 0;
 300     }
 301     fcntl( request_pipe[1], F_SETFD, 1 ); /* set close on exec flag */
 302     wine_server_send_fd( request_pipe[0] );
 303
 304     SERVER_START_REQ( new_thread )
 305     {
 306         req->suspend    = ((flags & CREATE_SUSPENDED) != 0);
 307         req->inherit    = (sa && (sa->nLength>=sizeof(*sa)) && sa->bInheritHandle);
 308         req->request_fd = request_pipe[0];
 309         if (!SERVER_CALL_ERR())
 310         {
 311             handle = req->handle;
 312             tid = req->tid;
 313         }
 314         close( request_pipe[0] );
 315     }
 316     SERVER_END_REQ;
 317
 318     if (!handle || !(teb = THREAD_InitStack( NULL, stack )))
 319     {
 320         close( request_pipe[1] );
 321         return 0;
 322     }
 323
 324     teb->process     = NtCurrentTeb()->process;
 325     teb->tid         = tid;
 326     teb->request_fd  = request_pipe[1];
 327     teb->entry_point = start;
 328     teb->entry_arg   = param;
 329     teb->startup     = THREAD_Start;
 330     teb->htask16     = GetCurrentTask();
 331
 332     if (id) *id = (DWORD)tid;
 333     if (SYSDEPS_SpawnThread( teb ) == -1)
 334     {
 335         CloseHandle( handle );
 336         THREAD_FreeTEB( teb );
 337         return 0;
 338     }
 339     return handle;
 340 }
 341
 342 /***********************************************************************
 343  *           CreateThread16   (KERNEL.441)
 344  */
 345 static DWORD CALLBACK THREAD_StartThread16( LPVOID threadArgs )
 346 {
 347     FARPROC16 start = ((FARPROC16 *)threadArgs)[0];
 348     DWORD     param = ((DWORD *)threadArgs)[1];
 349     HeapFree( GetProcessHeap(), 0, threadArgs );
 350
 351     ((LPDWORD)CURRENT_STACK16)[-1] = param;
 352     return wine_call_to_16_long( start, sizeof(DWORD) );
 353 }
 354 HANDLE WINAPI CreateThread16( SECURITY_ATTRIBUTES *sa, DWORD stack,
 355                               FARPROC16 start, SEGPTR param,
 356                               DWORD flags, LPDWORD id )
 357 {
 358     DWORD *threadArgs = HeapAlloc( GetProcessHeap(), 0, 2*sizeof(DWORD) );
 359     if (!threadArgs) return INVALID_HANDLE_VALUE;
 360     threadArgs[0] = (DWORD)start;
 361     threadArgs[1] = (DWORD)param;
 362
 363     return CreateThread( sa, stack, THREAD_StartThread16, threadArgs, flags, id );
 364 }
 365
 366
 367 /***********************************************************************
 368  * ExitThread [KERNEL32.215]  Ends a thread
 369  *
 370  * RETURNS
 371  *    None
 372  */
 373 void WINAPI ExitThread( DWORD code ) /* [in] Exit code for this thread */
 374 {
 375     BOOL last;
 376     SERVER_START_REQ( terminate_thread )
 377     {
 378         /* send the exit code to the server */
 379         req->handle    = GetCurrentThread();
 380         req->exit_code = code;
 381         SERVER_CALL();
 382         last = req->last;
 383     }
 384     SERVER_END_REQ;
 385
 386     if (last)
 387     {
 388         MODULE_DllProcessDetach( TRUE, (LPVOID)1 );
 389         exit( code );
 390     }
 391     else
 392     {
 393         MODULE_DllThreadDetach( NULL );
 394         if (!(NtCurrentTeb()->tibflags & TEBF_WIN32)) TASK_ExitTask();
 395         SYSDEPS_ExitThread( code );
 396     }
 397 }
 398
 399
 400 /***********************************************************************
 401  * SetThreadContext [KERNEL32.670]  Sets context of thread.
 402  *
 403  * RETURNS
 404  *    Success: TRUE
 405  *    Failure: FALSE
 406  */
 407 BOOL WINAPI SetThreadContext( HANDLE handle,           /* [in]  Handle to thread with context */
 408                               const CONTEXT *context ) /* [in] Address of context structure */
 409 {
 410     BOOL ret;
 411     SERVER_START_VAR_REQ( set_thread_context, sizeof(*context) )
 412     {
 413         req->handle = handle;
 414         req->flags = context->ContextFlags;
 415         memcpy( server_data_ptr(req), context, sizeof(*context) );
 416         ret = !SERVER_CALL_ERR();
 417     }
 418     SERVER_END_VAR_REQ;
 419     return ret;
 420 }
 421
 422
 423 /***********************************************************************
 424  * GetThreadContext [KERNEL32.@]  Retrieves context of thread.
 425  *
 426  * RETURNS
 427  *    Success: TRUE
 428  *    Failure: FALSE
 429  */
 430 BOOL WINAPI GetThreadContext( HANDLE handle,     /* [in]  Handle to thread with context */
 431                               CONTEXT *context ) /* [out] Address of context structure */
 432 {
 433     BOOL ret;
 434     SERVER_START_VAR_REQ( get_thread_context, sizeof(*context) )
 435     {
 436         req->handle = handle;
 437         req->flags = context->ContextFlags;
 438         memcpy( server_data_ptr(req), context, sizeof(*context) );
 439         if ((ret = !SERVER_CALL_ERR()))
 440             memcpy( context, server_data_ptr(req), sizeof(*context) );
 441     }
 442     SERVER_END_VAR_REQ;
 443     return ret;
 444 }
 445
 446
 447 /**********************************************************************
 448  * GetThreadPriority [KERNEL32.@]  Returns priority for thread.
 449  *
 450  * RETURNS
 451  *    Success: Thread's priority level.
 452  *    Failure: THREAD_PRIORITY_ERROR_RETURN
 453  */
 454 INT WINAPI GetThreadPriority(
 455     HANDLE hthread) /* [in] Handle to thread */
 456 {
 457     INT ret = THREAD_PRIORITY_ERROR_RETURN;
 458     SERVER_START_REQ( get_thread_info )
 459     {
 460         req->handle = hthread;
 461         req->tid_in = 0;
 462         if (!SERVER_CALL_ERR()) ret = req->priority;
 463     }
 464     SERVER_END_REQ;
 465     return ret;
 466 }
 467
 468
 469 /**********************************************************************
 470  * SetThreadPriority [KERNEL32.@]  Sets priority for thread.
 471  *
 472  * RETURNS
 473  *    Success: TRUE
 474  *    Failure: FALSE
 475  */
 476 BOOL WINAPI SetThreadPriority(
 477     HANDLE hthread, /* [in] Handle to thread */
 478     INT priority)   /* [in] Thread priority level */
 479 {
 480     BOOL ret;
 481     SERVER_START_REQ( set_thread_info )
 482     {
 483         req->handle   = hthread;
 484         req->priority = priority;
 485         req->mask     = SET_THREAD_INFO_PRIORITY;
 486         ret = !SERVER_CALL_ERR();
 487     }
 488     SERVER_END_REQ;
 489     return ret;
 490 }
 491
 492
 493 /**********************************************************************
 494  * GetThreadPriorityBoost [KERNEL32.877]  Returns priority boost for thread.
 495  *
 496  * Always reports that priority boost is disabled.
 497  *
 498  * RETURNS
 499  *    Success: TRUE.
 500  *    Failure: FALSE
 501  */
 502 BOOL WINAPI GetThreadPriorityBoost(
 503     HANDLE hthread, /* [in] Handle to thread */
 504     PBOOL pstate)   /* [out] pointer to var that receives the boost state */
 505 {
 506     if (pstate) *pstate = FALSE;
 507     return NO_ERROR;
 508 }
 509
 510
 511 /**********************************************************************
 512  * SetThreadPriorityBoost [KERNEL32.893]  Sets priority boost for thread.
 513  *
 514  * Priority boost is not implemented. Thsi function always returns
 515  * FALSE and sets last error to ERROR_CALL_NOT_IMPLEMENTED
 516  *
 517  * RETURNS
 518  *    Always returns FALSE to indicate a failure
 519  */
 520 BOOL WINAPI SetThreadPriorityBoost(
 521     HANDLE hthread, /* [in] Handle to thread */
 522     BOOL disable)   /* [in] TRUE to disable priority boost */
 523 {
 524     SetLastError(ERROR_CALL_NOT_IMPLEMENTED);
 525     return FALSE;
 526 }
 527
 528
 529 /**********************************************************************
 530  *           SetThreadAffinityMask   (KERNEL32.669)
 531  */
 532 DWORD WINAPI SetThreadAffinityMask( HANDLE hThread, DWORD dwThreadAffinityMask )
 533 {
 534     DWORD ret;
 535     SERVER_START_REQ( set_thread_info )
 536     {
 537         req->handle   = hThread;
 538         req->affinity = dwThreadAffinityMask;
 539         req->mask     = SET_THREAD_INFO_AFFINITY;
 540         ret = !SERVER_CALL_ERR();
 541         /* FIXME: should return previous value */
 542     }
 543     SERVER_END_REQ;
 544     return ret;
 545 }
 546
 547
 548 /**********************************************************************
 549  * TerminateThread [KERNEL32.685]  Terminates a thread
 550  *
 551  * RETURNS
 552  *    Success: TRUE
 553  *    Failure: FALSE
 554  */
 555 BOOL WINAPI TerminateThread( HANDLE handle,    /* [in] Handle to thread */
 556                              DWORD exit_code)  /* [in] Exit code for thread */
 557 {
 558     NTSTATUS status = NtTerminateThread( handle, exit_code );
 559     if (status) SetLastError( RtlNtStatusToDosError(status) );
 560     return !status;
 561 }
 562
 563
 564 /**********************************************************************
 565  *              GetExitCodeThread (KERNEL32.@)
 566  *              GetExitCodeThread (WIN32S16.13)
 567  *
 568  * Gets termination status of thread.
 569  *
 570  * RETURNS
 571  *    Success: TRUE
 572  *    Failure: FALSE
 573  */
 574 BOOL WINAPI GetExitCodeThread(
 575     HANDLE hthread, /* [in]  Handle to thread */
 576     LPDWORD exitcode) /* [out] Address to receive termination status */
 577 {
 578     BOOL ret;
 579     SERVER_START_REQ( get_thread_info )
 580     {
 581         req->handle = hthread;
 582         req->tid_in = 0;
 583         ret = !SERVER_CALL_ERR();
 584         if (ret && exitcode) *exitcode = req->exit_code;
 585     }
 586     SERVER_END_REQ;
 587     return ret;
 588 }
 589
 590
 591 /**********************************************************************
 592  * ResumeThread [KERNEL32.587]  Resumes a thread.
 593  *
 594  * Decrements a thread's suspend count.  When count is zero, the
 595  * execution of the thread is resumed.
 596  *
 597  * RETURNS
 598  *    Success: Previous suspend count
 599  *    Failure: 0xFFFFFFFF
 600  *    Already running: 0
 601  */
 602 DWORD WINAPI ResumeThread(
 603     HANDLE hthread) /* [in] Identifies thread to restart */
 604 {
 605     DWORD ret = 0xffffffff;
 606     SERVER_START_REQ( resume_thread )
 607     {
 608         req->handle = hthread;
 609         if (!SERVER_CALL_ERR()) ret = req->count;
 610     }
 611     SERVER_END_REQ;
 612     return ret;
 613 }
 614
 615
 616 /**********************************************************************
 617  * SuspendThread [KERNEL32.681]  Suspends a thread.
 618  *
 619  * RETURNS
 620  *    Success: Previous suspend count
 621  *    Failure: 0xFFFFFFFF
 622  */
 623 DWORD WINAPI SuspendThread(
 624     HANDLE hthread) /* [in] Handle to the thread */
 625 {
 626     DWORD ret = 0xffffffff;
 627     SERVER_START_REQ( suspend_thread )
 628     {
 629         req->handle = hthread;
 630         if (!SERVER_CALL_ERR()) ret = req->count;
 631     }
 632     SERVER_END_REQ;
 633     return ret;
 634 }
 635
 636
 637 /***********************************************************************
 638  *              QueueUserAPC  (KERNEL32.566)
 639  */
 640 DWORD WINAPI QueueUserAPC( PAPCFUNC func, HANDLE hthread, ULONG_PTR data )
 641 {
 642     DWORD ret;
 643     SERVER_START_REQ( queue_apc )
 644     {
 645         req->handle = hthread;
 646         req->user   = 1;
 647         req->func   = func;
 648         req->param  = (void *)data;
 649         ret = !SERVER_CALL_ERR();
 650     }
 651     SERVER_END_REQ;
 652     return ret;
 653 }
 654
 655
 656 /**********************************************************************
 657  * GetThreadTimes [KERNEL32.@]  Obtains timing information.
 658  *
 659  * NOTES
 660  *    What are the fields where these values are stored?
 661  *
 662  * RETURNS
 663  *    Success: TRUE
 664  *    Failure: FALSE
 665  */
 666 BOOL WINAPI GetThreadTimes(
 667     HANDLE thread,         /* [in]  Specifies the thread of interest */
 668     LPFILETIME creationtime, /* [out] When the thread was created */
 669     LPFILETIME exittime,     /* [out] When the thread was destroyed */
 670     LPFILETIME kerneltime,   /* [out] Time thread spent in kernel mode */
 671     LPFILETIME usertime)     /* [out] Time thread spent in user mode */
 672 {
 673     FIXME("(0x%08x): stub\n",thread);
 674     SetLastError(ERROR_CALL_NOT_IMPLEMENTED);
 675     return FALSE;
 676 }
 677
 678
 679 /**********************************************************************
 680  * VWin32_BoostThreadGroup [KERNEL.535]
 681  */
 682 VOID WINAPI VWin32_BoostThreadGroup( DWORD threadId, INT boost )
 683 {
 684     FIXME("(0x%08lx,%d): stub\n", threadId, boost);
 685 }
 686
 687 /**********************************************************************
 688  * VWin32_BoostThreadStatic [KERNEL.536]
 689  */
 690 VOID WINAPI VWin32_BoostThreadStatic( DWORD threadId, INT boost )
 691 {
 692     FIXME("(0x%08lx,%d): stub\n", threadId, boost);
 693 }
 694
 695
 696 /***********************************************************************
 697  *           GetThreadLocale    (KERNEL32.@)
 698  */
 699 LCID WINAPI GetThreadLocale(void)
 700 {
 701     LCID ret = NtCurrentTeb()->CurrentLocale;
 702     if (!ret) NtCurrentTeb()->CurrentLocale = ret = GetUserDefaultLCID();
 703     return ret;
 704 }
 705
 706
 707 /**********************************************************************
 708  * SetThreadLocale [KERNEL32.671]  Sets the calling threads current locale.
 709  *
 710  * RETURNS
 711  *    Success: TRUE
 712  *    Failure: FALSE
 713  *
 714  * FIXME
 715  *  check if lcid is a valid cp
 716  */
 717 BOOL WINAPI SetThreadLocale(
 718     LCID lcid)     /* [in] Locale identifier */
 719 {
 720     switch (lcid)
 721     {
 722       case LOCALE_SYSTEM_DEFAULT:
 723         lcid = GetSystemDefaultLCID();
 724         break;
 725       case LOCALE_USER_DEFAULT:
 726       case LOCALE_NEUTRAL:
 727         lcid = GetUserDefaultLCID();
 728         break;
 729     }
 730     NtCurrentTeb()->CurrentLocale = lcid;
 731     return TRUE;
 732 }
 733
 734
 735 /***********************************************************************
 736  * GetCurrentThread [KERNEL32.@]  Gets pseudohandle for current thread
 737  *
 738  * RETURNS
 739  *    Pseudohandle for the current thread
 740  */
 741 #undef GetCurrentThread
 742 HANDLE WINAPI GetCurrentThread(void)
 743 {
 744     return 0xfffffffe;
 745 }
 746
 747
 748 /***********************************************************************
 749  * ProcessIdToSessionId   (KERNEL32.@)
 750  * This function is available on Terminal Server 4SP4 and Windows 2000
 751  */
 752 BOOL WINAPI ProcessIdToSessionId( DWORD procid, DWORD *sessionid_ptr )
 753 {
 754         /* According to MSDN, if the calling process is not in a terminal
 755          * services environment, then the sessionid returned is zero.
 756          */
 757         *sessionid_ptr = 0;
 758         return TRUE;
 759 }
 760
 761 /***********************************************************************
 762  * SetThreadExecutionState (KERNEL32.@)
 763  *
 764  * Informs the system that activity is taking place for
 765  * power management purposes.
 766  */
 767 EXECUTION_STATE WINAPI SetThreadExecutionState(EXECUTION_STATE flags)
 768 {
 769     FIXME("(%ld): stub\n", flags);
 770     return 0;
 771 }
 772
 773
 774 #ifdef __i386__
 775
 776 /* void WINAPI SetLastError( DWORD error ); */
 777 __ASM_GLOBAL_FUNC( SetLastError,
 778                    "movl 4(%esp),%eax\n\t"
 779                    ".byte 0x64\n\t"
 780                    "movl %eax,0x60\n\t"
 781                    "ret $4" );
 782
 783 /* DWORD WINAPI GetLastError(void); */
 784 __ASM_GLOBAL_FUNC( GetLastError, ".byte 0x64\n\tmovl 0x60,%eax\n\tret" );
 785
 786 /* DWORD WINAPI GetCurrentProcessId(void) */
 787 __ASM_GLOBAL_FUNC( GetCurrentProcessId, ".byte 0x64\n\tmovl 0x20,%eax\n\tret" );
 788
 789 /* DWORD WINAPI GetCurrentThreadId(void) */
 790 __ASM_GLOBAL_FUNC( GetCurrentThreadId, ".byte 0x64\n\tmovl 0x24,%eax\n\tret" );
 791
 792 #else  /* __i386__ */
 793
 794 /**********************************************************************
 795  *              SetLastError (KERNEL.147)
 796  *              SetLastError (KERNEL32.@)
 797  *
 798  * Sets the last-error code.
 799  */
 800 void WINAPI SetLastError( DWORD error ) /* [in] Per-thread error code */
 801 {
 802     NtCurrentTeb()->last_error = error;
 803 }
 804
 805 /**********************************************************************
 806  *              GetLastError (KERNEL.10)
 807  *              GetLastError (KERNEL32.@)
 808  *              GetLastError (WIN32S16.10)
 809  *
 810  * Returns last-error code.
 811  */
 812 DWORD WINAPI GetLastError(void)
 813 {
 814     return NtCurrentTeb()->last_error;
 815 }
 816
 817 /***********************************************************************
 818  *              GetCurrentProcessId (KERNEL.471)
 819  *              GetCurrentProcessId (KERNEL32.@)
 820  *
 821  * Returns process identifier.
 822  */
 823 DWORD WINAPI GetCurrentProcessId(void)
 824 {
 825     return (DWORD)NtCurrentTeb()->pid;
 826 }
 827
 828 /***********************************************************************
 829  *              GetCurrentThreadId (KERNEL.462)
 830  *              GetCurrentThreadId (KERNEL32.@)
 831  *
 832  * Returns thread identifier.
 833  */
 834 DWORD WINAPI GetCurrentThreadId(void)
 835 {
 836     return (DWORD)NtCurrentTeb()->tid;
 837 }
 838
 839 #endif  /* __i386__ */