Initial commit of OpenSPARC T2 architecture model.

[OpenSPARC-T2-SAM] / obp / obp / os / unix / wrapper.h

/*
* ========== Copyright Header Begin ==========================================
*
* Hypervisor Software File: wrapper.h
* 
* Copyright (c) 2006 Sun Microsystems, Inc. All Rights Reserved.
* 
*  - Do no alter or remove copyright notices
* 
*  - Redistribution and use of this software in source and binary forms, with 
*    or without modification, are permitted provided that the following 
*    conditions are met: 
* 
*  - Redistribution of source code must retain the above copyright notice, 
*    this list of conditions and the following disclaimer.
* 
*  - Redistribution in binary form must reproduce the above copyright notice,
*    this list of conditions and the following disclaimer in the
*    documentation and/or other materials provided with the distribution. 
* 
*    Neither the name of Sun Microsystems, Inc. or the names of contributors 
* may be used to endorse or promote products derived from this software 
* without specific prior written permission. 
* 
*     This software is provided "AS IS," without a warranty of any kind. 
* ALL EXPRESS OR IMPLIED CONDITIONS, REPRESENTATIONS AND WARRANTIES, 
* INCLUDING ANY IMPLIED WARRANTY OF MERCHANTABILITY, FITNESS FOR A 
* PARTICULAR PURPOSE OR NON-INFRINGEMENT, ARE HEREBY EXCLUDED. SUN 
* MICROSYSTEMS, INC. ("SUN") AND ITS LICENSORS SHALL NOT BE LIABLE FOR 
* ANY DAMAGES SUFFERED BY LICENSEE AS A RESULT OF USING, MODIFYING OR 
* DISTRIBUTING THIS SOFTWARE OR ITS DERIVATIVES. IN NO EVENT WILL SUN 
* OR ITS LICENSORS BE LIABLE FOR ANY LOST REVENUE, PROFIT OR DATA, OR 
* FOR DIRECT, INDIRECT, SPECIAL, CONSEQUENTIAL, INCIDENTAL OR PUNITIVE 
* DAMAGES, HOWEVER CAUSED AND REGARDLESS OF THE THEORY OF LIABILITY, 
* ARISING OUT OF THE USE OF OR INABILITY TO USE THIS SOFTWARE, EVEN IF 
* SUN HAS BEEN ADVISED OF THE POSSIBILITY OF SUCH DAMAGES.
* 
* You acknowledge that this software is not designed, licensed or
* intended for use in the design, construction, operation or maintenance of
* any nuclear facility. 
* 
* ========== Copyright Header End ============================================
*/
/*
 * @(#)wrapper.h 1.1 01/05/18
 * Copyright 2001 Sun Microsystems, Inc.  All Rights Reserved
 */

#ifndef	_WRAPPER_H_
#define	_WRAPPER_H_

#define	DEF_FPATH ".:/usr/lib:/usr/local/lib/forth"
#define	DEF_PATH  ".:/usr/bin:/usr/local/bin"
#define	DEF_EXE "forth.dic"		/* Default Forth image file */
#ifndef DEF_DICT
#define	DEF_DICT  (256*1024L)		/* Default dictionary growth space */
#endif /* DEF_DICT */

#define	DICT_ORIGIN_ALIGNMENT	(0x8000)
#define	DICT_SIZE_ALIGNMENT	(0x100)
#define	DICT_HEADER_SIZE	(0x20)

#define	ROUNDUP(n, alignment)  \
	((unsigned long)n + (alignment-1) & ~(alignment-1))

typedef struct HEADER_T {
	uint32_t h_magic;
	uint32_t h_tlen;
	uint32_t h_dlen;
	uint32_t h_blen;
	uint32_t h_slen;
	uint32_t h_entry;
	uint32_t h_trlen;
	uint32_t h_drlen;
} header_t;

typedef struct INCLUDE_FILE_T {
	struct INCLUDE_FILE_T *next;
	char	*name;
	int	linenum;
	FILE	*fd;
} include_file_t;

typedef long *fstackp;

#define	PUSH(m, s)	*(--s) = (long)(m)
#define	POP(s)		*(s++)

char *expand_name(char *name);
char *sccs_name(char *name);
int isobsolete(char *name);
char *sccs_get(char *name);

int t_init(void);
int t_rows(void);
int t_cols(void);
void t_op(int);

#endif