| Line | |
|---|
| 1 | /* $Id: OS2KPTDA.c,v 1.1 2000-07-16 22:21:17 bird Exp $
|
|---|
| 2 | *
|
|---|
| 3 | * PTDA access functions.
|
|---|
| 4 | *
|
|---|
| 5 | * Copyright (c) 2000 knut st. osmundsen (knut.stange.osmundsen@pmsc.no)
|
|---|
| 6 | *
|
|---|
| 7 | * Project Odin Software License can be found in LICENSE.TXT
|
|---|
| 8 | *
|
|---|
| 9 | */
|
|---|
| 10 |
|
|---|
| 11 |
|
|---|
| 12 | /*******************************************************************************
|
|---|
| 13 | * Header Files *
|
|---|
| 14 | *******************************************************************************/
|
|---|
| 15 | #include <os2.h>
|
|---|
| 16 | #include <OS2KPTDA.h>
|
|---|
| 17 |
|
|---|
| 18 |
|
|---|
| 19 | /*******************************************************************************
|
|---|
| 20 | * External Data *
|
|---|
| 21 | *******************************************************************************/
|
|---|
| 22 | /*
|
|---|
| 23 | * Requires the following imports:
|
|---|
| 24 | * pPTDACur
|
|---|
| 25 | * ptda_start
|
|---|
| 26 | * ptda_environ
|
|---|
| 27 | */
|
|---|
| 28 | extern ULONG pptda_start;
|
|---|
| 29 | extern ULONG pptda_environ;
|
|---|
| 30 |
|
|---|
| 31 |
|
|---|
| 32 | /**
|
|---|
| 33 | * Gets the ptda_environ PTDA member. This member holds the memory object handle
|
|---|
| 34 | * for the environment block of the processes.
|
|---|
| 35 | * @returns Content of the pPTDA->ptda_environ member.
|
|---|
| 36 | * @param pPTDA PTDA Pointer. (NULL is not allowed!)
|
|---|
| 37 | * @sketch
|
|---|
| 38 | */
|
|---|
| 39 | USHORT ptdaGet_ptda_environ(PPTDA pPTDA)
|
|---|
| 40 | {
|
|---|
| 41 | return *(PUSHORT)(void*)(((char*)(void*)pPTDA) + (pptda_environ - pptda_start));
|
|---|
| 42 | }
|
|---|
| 43 |
|
|---|
Note:
See
TracBrowser
for help on using the repository browser.
