15821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)/* -*- Mode: C++; tab-width: 4; indent-tabs-mode: nil; c-basic-offset: 2 -*- */
25821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)/*
35821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) * The contents of this file are subject to the Mozilla Public
45821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) * License Version 1.1 (the "License"); you may not use this file
55821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) * except in compliance with the License. You may obtain a copy of
65821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) * the License at http://www.mozilla.org/MPL/
75821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) *
85821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) * Software distributed under the License is distributed on an "AS
95821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) * IS" basis, WITHOUT WARRANTY OF ANY KIND, either express or
105821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) * implied. See the License for the specific language governing
115821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) * rights and limitations under the License.
125821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) *
135821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) * The Original Code is the Netscape Portable Runtime (NSPR).
145821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) *
155821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) * The Initial Developer of the Original Code is Netscape
165821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) * Communications Corporation.  Portions created by Netscape are
175821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) * Copyright (C) 1998-2000 Netscape Communications Corporation.  All
185821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) * Rights Reserved.
195821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) *
205821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) * Contributor(s):
215821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) *
225821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) * Alternatively, the contents of this file may be used under the
235821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) * terms of the GNU General Public License Version 2 or later (the
245821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) * "GPL"), in which case the provisions of the GPL are applicable
255821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) * instead of those above.  If you wish to allow use of your
265821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) * version of this file only under the terms of the GPL and not to
275821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) * allow others to use your version of this file under the MPL,
285821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) * indicate your decision by deleting the provisions above and
295821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) * replace them with the notice and other provisions required by
305821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) * the GPL.  If you do not delete the provisions above, a recipient
315821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) * may use your version of this file under either the MPL or the
325821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) * GPL.
335821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) */
345821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)
355821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)/*
365821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** This is the OpenVMS machine dependant configuration file. It is based
375821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** on the OSF/1 machine dependant file.
385821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)*/
395821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)
405821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)#ifndef nspr_openvms_defs_h___
415821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)#define nspr_openvms_defs_h___
425821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)
435821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)/*
445821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) * Internal configuration macros
455821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) */
465821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)
475821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)#define PR_LINKER_ARCH	"OpenVMS"
485821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)#define _PR_SI_SYSNAME	"OpenVMS"
495821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)#ifdef __alpha
505821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)#define _PR_SI_ARCHITECTURE "alpha"
515821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)#else
525821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)#define _PR_SI_ARCHITECTURE "vax"
535821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)#endif
545821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)#define PR_DLL_SUFFIX		".so"
555821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)
565821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)#define _PR_VMBASE		0x30000000
575821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)#define _PR_STACK_VMBASE	0x50000000
585821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)#define _MD_DEFAULT_STACK_SIZE	131072L
595821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)#define _MD_MINIMUM_STACK_SIZE	131072L
605821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)
615821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)/*
625821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** This is not defined on OpenVMS. I believe its only used in GC code, and
635821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** isn't that only used in Java? Anyway, for now, let's keep the compiler
645821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** happy.
655821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)*/
665821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)#define SA_RESTART 0
675821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)
685821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)/*
695821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** OpenVMS doesn't have these in socket.h.
705821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** Does in later versions!
715821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)*/
725821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)#if 0
735821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)struct ip_mreq {
745821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)    struct in_addr  imr_multiaddr;      /* IP multicast address of group */
755821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)    struct in_addr  imr_interface;      /* local IP address of interface */
765821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)};
775821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)#endif
785821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)
795821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)/*
805821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) * OSF1 needs the MAP_FIXED flag to ensure that mmap returns a pointer
815821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) * with the upper 32 bits zero.  This is because Java sticks a pointer
825821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) * into an int.
835821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) */
845821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)#define _MD_MMAP_FLAGS          MAP_PRIVATE|MAP_FIXED
855821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)
865821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)#undef  HAVE_STACK_GROWING_UP
875821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)#undef 	HAVE_WEAK_IO_SYMBOLS
885821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)#undef 	HAVE_WEAK_MALLOC_SYMBOLS
895821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)#undef  HAVE_BSD_FLOCK
905821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)
915821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)#define NEED_TIME_R
925821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)
935821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)#define HAVE_DLL
945821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)#define USE_DLFCN
955821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)
965821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)#define _PR_POLL_AVAILABLE
975821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)#define _PR_USE_POLL
985821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)#define _PR_STAT_HAS_ONLY_ST_ATIME
995821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)#define _PR_NO_LARGE_FILES
1005821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)#define _PR_STRICT_ADDR_LEN
1015821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)
1025821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)/* IPv6 support */
1035821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)#ifdef _SOCKADDR_LEN
1045821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)#define _PR_HAVE_SOCKADDR_LEN
1055821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)#endif
1065821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)#define _PR_HAVE_GETIPNODEBYNAME
1075821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)#define _PR_HAVE_GETIPNODEBYADDR
1085821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)#define _PR_HAVE_GETADDRINFO
1095821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)#define _PR_INET6_PROBE
1105821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)#ifdef _PR_INET6
1115821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)#define _PR_HAVE_INET_NTOP
1125821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)#else
1135821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)#define AF_INET6 26
1145821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)#ifndef AI_CANONNAME
1155821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)#define AI_CANONNAME 0x00000002
1165821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)struct addrinfo {
1175821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)    int ai_flags;
1185821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)    int ai_family;
1195821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)    int ai_socktype;
1205821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)    int ai_protocol;
1215821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)    size_t ai_addrlen;
1225821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)    char *ai_canonname;
1235821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)    struct sockaddr *ai_addr;
1245821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)    struct addrinfo *ai_next;
1255821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)};
1265821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)#endif
1275821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)#define AI_V4MAPPED 0x00000010
1285821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)#define AI_ALL      0x00000008
1295821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)#define AI_ADDRCONFIG 0x00000020
1305821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)#endif
1315821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)
1325821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)#define _PR_HAVE_MD_SOCKADDR_IN6
1335821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)/* if we have a quadword field defined in the structure, then its length */
1345821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)/* will be a multiple of 8, and connect() won't accept 32 (it wants 28) */
1355821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)struct _md_in6_addr {
1365821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)    union {
1375821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)        PRUint8  _S6_u8[16];
1385821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)        PRUint16 _S6_u16[8];
1395821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)        PRUint32 _S6_u32[4];
1405821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)    } _S6_un;
1415821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)};
1425821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)struct _md_sockaddr_in6 {
1435821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)    PRUint16 sin6_family;
1445821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)    PRUint16 sin6_port;
1455821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)    PRUint32 sin6_flowinfo;
1465821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)    struct _md_in6_addr sin6_addr;
1475821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)    PRUint32 sin6_scope_id;
1485821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)};
1495821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)
1505821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)#undef  USE_SETJMP
1515821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)
1525821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)#include <setjmp.h>
1535821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)
1545821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)/*
1555821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) * A jmp_buf is actually a struct sigcontext.  The sc_sp field of
1565821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) * struct sigcontext is the stack pointer.
1575821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) */
1585821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)#define _MD_GET_SP(_t) (((struct sigcontext *) (_t)->md.context)->sc_sp)
1595821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)#define PR_NUM_GCREGS _JBLEN
1605821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)#define CONTEXT(_th) ((_th)->md.context)
1615821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)
1625821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)/*
1635821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** I am ifdef'ing these out because that's the way they are in FT.
1645821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)*/
1655821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)#ifndef __VMS
1665821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)
1675821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)/*
1685821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** Initialize a thread context to run "_main()" when started
1695821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)*/
1705821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)#define _MD_INIT_CONTEXT(_thread, _sp, _main, status)	      \
1715821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles){									  \
1725821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)        *status = PR_TRUE;              \
1735821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)    if (setjmp(CONTEXT(_thread))) {				\
1745821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)	(*_main)();						\
1755821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)    }								\
1765821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)    _MD_GET_SP(_thread) = (long) ((_sp) - 64);			\
1775821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)    _MD_GET_SP(_thread) &= ~15;					\
1785821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)}
1795821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)
1805821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)#define _MD_SWITCH_CONTEXT(_thread)  \
1815821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)    if (!setjmp(CONTEXT(_thread))) { \
1825821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)	(_thread)->md.errcode = errno;  \
1835821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)	_PR_Schedule();		     \
1845821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)    }
1855821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)
1865821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)/*
1875821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** Restore a thread context, saved by _MD_SWITCH_CONTEXT
1885821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)*/
1895821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)#define _MD_RESTORE_CONTEXT(_thread) \
1905821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles){				     \
1915821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)    errno = (_thread)->md.errcode;     \
1925821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)    _MD_SET_CURRENT_THREAD(_thread);	\
1935821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)    longjmp(CONTEXT(_thread), 1);    \
1945821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)}
1955821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)
1965821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)#endif /* __VMS */
1975821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)
1985821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)/* Machine-dependent (MD) data structures */
1995821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)
2005821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)struct _MDThread {
2015821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)    jmp_buf context;
2025821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)    int id;
2035821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)    int errcode;
2045821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)};
2055821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)
2065821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)struct _MDThreadStack {
2075821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)    PRInt8 notused;
2085821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)};
2095821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)
2105821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)struct _MDLock {
2115821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)    PRInt8 notused;
2125821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)};
2135821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)
2145821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)struct _MDSemaphore {
2155821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)    PRInt8 notused;
2165821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)};
2175821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)
2185821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)struct _MDCVar {
2195821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)    PRInt8 notused;
2205821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)};
2215821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)
2225821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)struct _MDSegment {
2235821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)    PRInt8 notused;
2245821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)};
2255821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)
2265821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)/*
2275821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) * md-specific cpu structure field
2285821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) */
2295821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)#define _PR_MD_MAX_OSFD FD_SETSIZE
2305821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)
2315821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)struct _MDCPU_Unix {
2325821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)    PRCList ioQ;
2335821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)    PRUint32 ioq_timeout;
2345821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)    PRInt32 ioq_max_osfd;
2355821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)    PRInt32 ioq_osfd_cnt;
2365821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)#ifndef _PR_USE_POLL
2375821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)    fd_set fd_read_set, fd_write_set, fd_exception_set;
2385821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)    PRInt16 fd_read_cnt[_PR_MD_MAX_OSFD],fd_write_cnt[_PR_MD_MAX_OSFD],
2395821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)                              fd_exception_cnt[_PR_MD_MAX_OSFD];
2405821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)#else
2415821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)      struct pollfd *ioq_pollfds;
2425821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)      int ioq_pollfds_size;
2435821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)#endif        /* _PR_USE_POLL */
2445821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)};
2455821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)
2465821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)#define _PR_IOQ(_cpu)                 ((_cpu)->md.md_unix.ioQ)
2475821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)#define _PR_ADD_TO_IOQ(_pq, _cpu) PR_APPEND_LINK(&_pq.links, &_PR_IOQ(_cpu))
2485821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)#define _PR_FD_READ_SET(_cpu)         ((_cpu)->md.md_unix.fd_read_set)
2495821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)#define _PR_FD_READ_CNT(_cpu)         ((_cpu)->md.md_unix.fd_read_cnt)
2505821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)#define _PR_FD_WRITE_SET(_cpu)                ((_cpu)->md.md_unix.fd_write_set)
2515821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)#define _PR_FD_WRITE_CNT(_cpu)                ((_cpu)->md.md_unix.fd_write_cnt)
2525821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)#define _PR_FD_EXCEPTION_SET(_cpu)    ((_cpu)->md.md_unix.fd_exception_set)
2535821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)#define _PR_FD_EXCEPTION_CNT(_cpu)    ((_cpu)->md.md_unix.fd_exception_cnt)
2545821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)#define _PR_IOQ_TIMEOUT(_cpu)         ((_cpu)->md.md_unix.ioq_timeout)
2555821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)#define _PR_IOQ_MAX_OSFD(_cpu)                ((_cpu)->md.md_unix.ioq_max_osfd)
2565821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)#define _PR_IOQ_OSFD_CNT(_cpu)                ((_cpu)->md.md_unix.ioq_osfd_cnt)
2575821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)#define _PR_IOQ_POLLFDS(_cpu)         ((_cpu)->md.md_unix.ioq_pollfds)
2585821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)#define _PR_IOQ_POLLFDS_SIZE(_cpu)    ((_cpu)->md.md_unix.ioq_pollfds_size)
2595821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)
2605821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)#define _PR_IOQ_MIN_POLLFDS_SIZE(_cpu)        32
2615821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)
2625821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)struct _MDCPU {
2635821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)	struct _MDCPU_Unix md_unix;
2645821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)};
2655821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)
2665821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)#ifndef _PR_PTHREADS
2675821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)#define _MD_INIT_LOCKS()
2685821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)#endif
2695821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)#define _MD_NEW_LOCK(lock) PR_SUCCESS
2705821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)#define _MD_FREE_LOCK(lock)
2715821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)#define _MD_LOCK(lock)
2725821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)#define _MD_UNLOCK(lock)
2735821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)#define _MD_INIT_IO()
2745821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)#define _MD_IOQ_LOCK()
2755821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)#define _MD_IOQ_UNLOCK()
2765821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)
2775821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)/*
2785821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) * The following are copied from _sunos.h, _aix.h.  This means
2795821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) * some of them should probably be moved into _unixos.h.  But
2805821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) * _irix.h seems to be quite different in regard to these macros.
2815821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) */
2825821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)#define _MD_GET_INTERVAL                  _PR_UNIX_GetInterval
2835821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)extern PRIntervalTime _PR_UNIX_GetInterval(void);
2845821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)#define _MD_INTERVAL_PER_SEC              _PR_UNIX_TicksPerSecond
2855821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)extern PRIntervalTime _PR_UNIX_TicksPerSecond(void);
2865821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)
2875821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)#define _MD_EARLY_INIT		_MD_EarlyInit
2885821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)void _MD_EarlyInit(void);
2895821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)#define _MD_FINAL_INIT		_PR_UnixInit
2905821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)#define _MD_INIT_RUNNING_CPU(cpu) _MD_unix_init_running_cpu(cpu)
2915821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)#define _MD_INIT_THREAD         _MD_InitializeThread
2925821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)#ifdef _VMS_NOT_YET
2935821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)NSPR_API(void) _PR_InitThreads(
2945821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)  PRThreadType type, PRThreadPriority priority, PRUintn maxPTDs);
2955821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)#endif
2965821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)#define _MD_EXIT_THREAD(thread)
2975821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)#define	_MD_SUSPEND_THREAD(thread)
2985821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)#define	_MD_RESUME_THREAD(thread)
2995821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)#define _MD_CLEAN_THREAD(_thread)
3005821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)
3015821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)/* The following defines unwrapped versions of select() and poll(). */
3025821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)extern int __select (int, fd_set *, fd_set *, fd_set *, struct timeval *);
3035821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)#define _MD_SELECT              __select
3045821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)
3055821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)#ifndef __VMS
3065821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)#define _MD_POLL __poll
3075821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)extern int __poll(struct pollfd filedes[], unsigned int nfds, int timeout);
3085821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)#endif
3095821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)
3105821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)#ifdef __VMS
3115821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)NSPR_API(void) _PR_InitCPUs(void);
3125821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)NSPR_API(void) _PR_MD_START_INTERRUPTS(void);
3135821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)#endif
3145821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)
3155821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)/*
3165821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) * Atomic operations
3175821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) */
3185821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)#include <machine/builtins.h>
3195821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)#define _PR_HAVE_ATOMIC_OPS
3205821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)#define _MD_INIT_ATOMIC()
3215821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)#define _MD_ATOMIC_ADD(ptr,val) (__ATOMIC_ADD_LONG(ptr,val) + val)
3225821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)#define _MD_ATOMIC_INCREMENT(val) (__ATOMIC_INCREMENT_LONG(val) + 1)
3235821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)#define _MD_ATOMIC_DECREMENT(val) (__ATOMIC_DECREMENT_LONG(val) - 1)
3245821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)#define _MD_ATOMIC_SET(val, newval) __ATOMIC_EXCH_LONG(val, newval)
3255821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)
3265821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)extern int thread_suspend(PRThread *thr_id);
3275821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)extern int thread_resume(PRThread *thr_id);
3285821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)
3295821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)#endif /* nspr_openvms_defs_h___ */
330