external/bsd/ntp/dist/lib/isc/win32/thread.c

   1 /*      $NetBSD$        */
   2
   3 /*
   4  * Copyright (C) 2004, 2005, 2007  Internet Systems Consortium, Inc. ("ISC")
   5  * Copyright (C) 1998-2001  Internet Software Consortium.
   6  *
   7  * Permission to use, copy, modify, and/or distribute this software for any
   8  * purpose with or without fee is hereby granted, provided that the above
   9  * copyright notice and this permission notice appear in all copies.
  10  *
  11  * THE SOFTWARE IS PROVIDED "AS IS" AND ISC DISCLAIMS ALL WARRANTIES WITH
  12  * REGARD TO THIS SOFTWARE INCLUDING ALL IMPLIED WARRANTIES OF MERCHANTABILITY
  13  * AND FITNESS.  IN NO EVENT SHALL ISC BE LIABLE FOR ANY SPECIAL, DIRECT,
  14  * INDIRECT, OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES WHATSOEVER RESULTING FROM
  15  * LOSS OF USE, DATA OR PROFITS, WHETHER IN AN ACTION OF CONTRACT, NEGLIGENCE
  16  * OR OTHER TORTIOUS ACTION, ARISING OUT OF OR IN CONNECTION WITH THE USE OR
  17  * PERFORMANCE OF THIS SOFTWARE.
  18  */
  19
  20 /* Id: thread.c,v 1.24 2007/06/19 23:47:19 tbox Exp */
  21
  22 #include <config.h>
  23
  24 #include <process.h>
  25
  26 #include <isc/thread.h>
  27
  28 isc_result_t
  29 isc_thread_create(isc_threadfunc_t start, isc_threadarg_t arg,
  30                   isc_thread_t *threadp)
  31 {
  32         isc_thread_t thread;
  33         unsigned int id;
  34
  35         thread = (isc_thread_t)_beginthreadex(NULL, 0, start, arg, 0, &id);
  36         if (thread == NULL) {
  37                 /* XXX */
  38                 return (ISC_R_UNEXPECTED);
  39         }
  40
  41         *threadp = thread;
  42
  43         return (ISC_R_SUCCESS);
  44 }
  45
  46 isc_result_t
  47 isc_thread_join(isc_thread_t thread, isc_threadresult_t *rp) {
  48         DWORD result;
  49         DWORD threadrc;
  50
  51         result = WaitForSingleObject(thread, INFINITE);
  52         if (result != WAIT_OBJECT_0) {
  53                 /* XXX */
  54                 return (ISC_R_UNEXPECTED);
  55         }
  56         if (rp != NULL) {
  57                 if(!GetExitCodeThread(thread, &threadrc)) {
  58                         /* XXX */
  59                         return (ISC_R_UNEXPECTED);
  60                 }
  61                 *rp = threadrc;
  62         }
  63         (void)CloseHandle(thread);
  64
  65         return (ISC_R_SUCCESS);
  66 }
  67
  68 void
  69 isc_thread_setconcurrency(unsigned int level) {
  70         /*
  71          * This is unnecessary on Win32 systems, but is here so that the
  72          * call exists
  73          */
  74 }
  75
  76 void *
  77 isc_thread_key_getspecific(isc_thread_key_t key) {
  78         return(TlsGetValue(key));
  79 }
  80
  81 int
  82 isc_thread_key_setspecific(isc_thread_key_t key, void *value) {
  83         return (TlsSetValue(key, value) ? 0 : GetLastError());
  84 }
  85
  86 int
  87 isc_thread_key_create(isc_thread_key_t *key, void (*func)(void *)) {
  88         *key = TlsAlloc();
  89
  90         return ((*key != -1) ? 0 : GetLastError());
  91 }
  92
  93 int
  94 isc_thread_key_delete(isc_thread_key_t key) {
  95         return (TlsFree(key) ? 0 : GetLastError());
  96 }