[p5sagit/p5-mst-13.2.git] / NetWare / nwtinfo.h


/*
 * Copyright © 2001 Novell, Inc. All Rights Reserved.
 *
 * You may distribute under the terms of either the GNU General Public
 * License or the Artistic License, as specified in the README file.
 *
 */

/*
 * FILENAME		:	NWTInfo.h
 * DESCRIPTION	:	Thread-local storage for Perl.
 * Author		:	SGP, HYAK
 * Date			:	January 2001.
 *
 */


#ifndef __NWTInfo_H__
#define __NWTInfo_H__


#include "win32ish.h"		// For "BOOL", "TRUE" and "FALSE"

typedef struct tagThreadInfo
{
	int tid;
	struct tagThreadInfo *next;
	BOOL	m_dontTouchHashLists;
	void*	m_allocList;
}ThreadInfo;


void fnInitializeThreadInfo(void);
BOOL fnTerminateThreadInfo(void);
BOOL fnRegisterWithThreadTable(void);
BOOL fnUnregisterWithThreadTable(void);

ThreadInfo* fnAddThreadInfo(int tid);
BOOL fnRemoveThreadInfo(int tid);
ThreadInfo* fnGetThreadInfo(int tid);

//For storing and retrieving Watcom Hash list address
BOOL fnInsertHashListAddrs(void *addrs, BOOL dontTouchHashList);
BOOL fnGetHashListAddrs(void **addrs, BOOL *dontTouchHashList);

//New TLS to set and get the thread contex - may be redundant,
//or see if the above portion can be removed once this works properly
typedef struct tagThreadCtx
{
	long tid;
	void *tInfo;
	struct tagThreadCtx *next;
}ThreadContext;


long fnInitializeThreadCtx(void);
ThreadContext* fnAddThreadCtx(long lTLSIndex, void *t);
BOOL fnRemoveThreadCtx(long lTLSIndex);
void* fnGetThreadCtx(long lTLSIndex);

#endif	// __NWTInfo_H__
Commit	Line	Data
2986a63f	1
	2	/*
	3	* Copyright © 2001 Novell, Inc. All Rights Reserved.
	4	*
	5	* You may distribute under the terms of either the GNU General Public
	6	* License or the Artistic License, as specified in the README file.
	7	*
	8	*/
	9
	10	/*
	11	* FILENAME : NWTInfo.h
	12	* DESCRIPTION : Thread-local storage for Perl.
	13	* Author : SGP, HYAK
	14	* Date : January 2001.
	15	*
	16	*/
	17
	18
	19
	20	#ifndef __NWTInfo_H__
	21	#define __NWTInfo_H__
	22
	23
	24	#include "win32ish.h" // For "BOOL", "TRUE" and "FALSE"
	25
	26	typedef struct tagThreadInfo
	27	{
	28	int tid;
	29	struct tagThreadInfo *next;
	30	BOOL m_dontTouchHashLists;
	31	void* m_allocList;
	32	}ThreadInfo;
	33
	34
	35	void fnInitializeThreadInfo(void);
	36	BOOL fnTerminateThreadInfo(void);
	37	BOOL fnRegisterWithThreadTable(void);
	38	BOOL fnUnregisterWithThreadTable(void);
	39
	40	ThreadInfo* fnAddThreadInfo(int tid);
	41	BOOL fnRemoveThreadInfo(int tid);
	42	ThreadInfo* fnGetThreadInfo(int tid);
	43
	44	//For storing and retrieving Watcom Hash list address
	45	BOOL fnInsertHashListAddrs(void *addrs, BOOL dontTouchHashList);
	46	BOOL fnGetHashListAddrs(void *addrs, BOOL dontTouchHashList);
	47
	48	//New TLS to set and get the thread contex - may be redundant,
	49	//or see if the above portion can be removed once this works properly
	50	typedef struct tagThreadCtx
	51	{
	52	long tid;
	53	void *tInfo;
	54	struct tagThreadCtx *next;
	55	}ThreadContext;
	56
	57
	58	long fnInitializeThreadCtx(void);
	59	ThreadContext* fnAddThreadCtx(long lTLSIndex, void *t);
	60	BOOL fnRemoveThreadCtx(long lTLSIndex);
	61	void* fnGetThreadCtx(long lTLSIndex);
	62
	63	#endif // __NWTInfo_H__
	64