VirtualBox

source: vbox/trunk/src/VBox/Runtime/r0drv/os2/thread-r0drv-os2.cpp@ 19920

Last change on this file since 19920 was 19920, checked in by vboxsync, 16 years ago

iprt/os2: Implemented RTThreadPreempt*.

  • Property svn:eol-style set to native
  • Property svn:keywords set to Id
File size: 3.4 KB
Line 
1/* $Id: thread-r0drv-os2.cpp 19920 2009-05-22 17:14:11Z vboxsync $ */
2/** @file
3 * IPRT - Threads (Part 1), Ring-0 Driver, OS/2.
4 */
5
6/*
7 * Copyright (c) 2007 knut st. osmundsen <bird-src-spam@anduin.net>
8 *
9 * Permission is hereby granted, free of charge, to any person
10 * obtaining a copy of this software and associated documentation
11 * files (the "Software"), to deal in the Software without
12 * restriction, including without limitation the rights to use,
13 * copy, modify, merge, publish, distribute, sublicense, and/or sell
14 * copies of the Software, and to permit persons to whom the
15 * Software is furnished to do so, subject to the following
16 * conditions:
17 *
18 * The above copyright notice and this permission notice shall be
19 * included in all copies or substantial portions of the Software.
20 *
21 * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND,
22 * EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES
23 * OF MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND
24 * NONINFRINGEMENT. IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT
25 * HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY,
26 * WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING
27 * FROM, OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR
28 * OTHER DEALINGS IN THE SOFTWARE.
29 */
30
31/*******************************************************************************
32* Header Files *
33*******************************************************************************/
34#include "the-os2-kernel.h"
35
36#include <iprt/thread.h>
37#include <iprt/err.h>
38#include <iprt/assert.h>
39#include "internal/thread.h"
40
41
42RTDECL(RTNATIVETHREAD) RTThreadNativeSelf(void)
43{
44 PLINFOSEG pLIS = (PLINFOSEG)RTR0Os2Virt2Flat(g_fpLIS);
45 AssertReturn(pLIS, NIL_RTNATIVETHREAD);
46 return pLIS->tidCurrent | (pLIS->pidCurrent << 16);
47}
48
49
50RTDECL(int) RTThreadSleep(unsigned cMillies)
51{
52 int rc = KernBlock((ULONG)RTThreadSleep,
53 cMillies == RT_INDEFINITE_WAIT ? SEM_INDEFINITE_WAIT : cMillies,
54 0, NULL, NULL);
55 switch (rc)
56 {
57 case NO_ERROR:
58 return VINF_SUCCESS;
59 case ERROR_TIMEOUT:
60 return VERR_TIMEOUT;
61 case ERROR_INTERRUPT:
62 return VERR_INTERRUPTED;
63 default:
64 AssertMsgFailed(("%d\n", rc));
65 return VERR_NO_TRANSLATION;
66 }
67}
68
69
70RTDECL(bool) RTThreadYield(void)
71{
72 /** @todo implement me (requires a devhelp) */
73 return false;
74}
75
76
77RTDECL(bool) RTThreadPreemptIsEnabled(RTTHREAD hThread)
78{
79 Assert(hThread == NIL_RTTHREAD);
80 return false;
81}
82
83
84RTDECL(bool) RTThreadPreemptIsPending(RTTHREAD hThread)
85{
86 Assert(hThread == NIL_RTTHREAD);
87
88 union
89 {
90 RTFAR16 fp;
91 uint8_t fResched;
92 } u;
93 int rc = RTR0Os2DHQueryDOSVar(DHGETDOSV_YIELDFLAG, 0, &u.fp);
94 AssertReturn(rc == 0, false);
95 if (u.fResched)
96 return true;
97
98 /** @todo Check if DHGETDOSV_YIELDFLAG includes TCYIELDFLAG. */
99 rc = RTR0Os2DHQueryDOSVar(DHGETDOSV_TCYIELDFLAG, 0, &u.fp);
100 AssertReturn(rc == 0, false);
101 if (u.fResched)
102 return true;
103 return false;
104}
105
106
107RTDECL(void) RTThreadPreemptDisable(PRTTHREADPREEMPTSTATE pState)
108{
109 AssertPtr(pState);
110 Assert(pState->uchDummy != 42);
111 pState->uchDummy = 42;
112 /* Nothing to do here as OS/2 doesn't preempt kernel threads. */
113}
114
115
116RTDECL(void) RTThreadPreemptRestore(PRTTHREADPREEMPTSTATE pState)
117{
118 AssertPtr(pState);
119 Assert(pState->uchDummy == 42);
120 pState->uchDummy = 0;
121}
122
Note: See TracBrowser for help on using the repository browser.

© 2024 Oracle Support Privacy / Do Not Sell My Info Terms of Use Trademark Policy Automated Access Etiquette