mirror of
https://github.com/reactos/reactos.git
synced 2025-08-06 00:32:57 +00:00
Resuscitate OS/2 subsystem from revision 24496.
svn path=/trunk/; revision=65459
This commit is contained in:
parent
ace5ce5329
commit
9f2787eb32
36 changed files with 15524 additions and 0 deletions
58
rossubsys/os2/lib/doscalls/run/process.cpp
Normal file
58
rossubsys/os2/lib/doscalls/run/process.cpp
Normal file
|
@ -0,0 +1,58 @@
|
|||
/* $Id$
|
||||
*/
|
||||
/*
|
||||
*
|
||||
* COPYRIGHT: See COPYING in the top level directory
|
||||
* PROJECT: ReactOS OS/2 sub system
|
||||
* PART: doscalls.dll
|
||||
* FILE: process.cpp
|
||||
* CONTAINS: process and thread related CP-functions.
|
||||
* PURPOSE: Kernelservices for OS/2 apps
|
||||
* PROGRAMMER: Robert K. nonvolatil@yahoo.de
|
||||
* REVISION HISTORY:
|
||||
* 13-03-2002 Created
|
||||
* 25-07-2002 Work to make it compile
|
||||
*/
|
||||
|
||||
|
||||
//#if defined (INCL_DOS)
|
||||
#define INCL_DOSPROCESS
|
||||
#define INCL_DOSERRORS
|
||||
#include "ros2.h"
|
||||
|
||||
|
||||
APIRET STDCALL DosSleep(ULONG msec)
|
||||
{
|
||||
NT::NTSTATUS stat;
|
||||
NT::TIME Interv;
|
||||
Interv.QuadPart= -(10000 * msec);
|
||||
stat = NT::NtDelayExecution( TRUE, &Interv );
|
||||
return 0;
|
||||
}
|
||||
|
||||
|
||||
/* $Id$ */
|
||||
/* Terminates the current thread or the current Process.
|
||||
Decission is made by action
|
||||
FIXME: move this code to OS2.EXE */
|
||||
VOID APIENTRY DosExit(ULONG action, ULONG result)
|
||||
{
|
||||
// decide what to do
|
||||
if( action == EXIT_THREAD)
|
||||
{
|
||||
NT::NtTerminateThread( NULL, result );
|
||||
}
|
||||
else // EXIT_PROCESS
|
||||
{
|
||||
NT::NtTerminateProcess( NULL, result );
|
||||
}
|
||||
}
|
||||
|
||||
|
||||
APIRET STDCALL DosCreateThread(PTID ptid, PFNTHREAD pfn,
|
||||
ULONG param, ULONG flag, ULONG cbStack)
|
||||
{
|
||||
return ERROR_CALL_NOT_IMPLEMENTED;
|
||||
}
|
||||
|
||||
/* EOF */
|
Loading…
Add table
Add a link
Reference in a new issue