xref: /titanic_44/usr/src/cmd/sh/stak.h (revision 7c478bd95313f5f23a4c958a745db2134aa03244)
1*7c478bd9Sstevel@tonic-gate /*
2*7c478bd9Sstevel@tonic-gate  * CDDL HEADER START
3*7c478bd9Sstevel@tonic-gate  *
4*7c478bd9Sstevel@tonic-gate  * The contents of this file are subject to the terms of the
5*7c478bd9Sstevel@tonic-gate  * Common Development and Distribution License, Version 1.0 only
6*7c478bd9Sstevel@tonic-gate  * (the "License").  You may not use this file except in compliance
7*7c478bd9Sstevel@tonic-gate  * with the License.
8*7c478bd9Sstevel@tonic-gate  *
9*7c478bd9Sstevel@tonic-gate  * You can obtain a copy of the license at usr/src/OPENSOLARIS.LICENSE
10*7c478bd9Sstevel@tonic-gate  * or http://www.opensolaris.org/os/licensing.
11*7c478bd9Sstevel@tonic-gate  * See the License for the specific language governing permissions
12*7c478bd9Sstevel@tonic-gate  * and limitations under the License.
13*7c478bd9Sstevel@tonic-gate  *
14*7c478bd9Sstevel@tonic-gate  * When distributing Covered Code, include this CDDL HEADER in each
15*7c478bd9Sstevel@tonic-gate  * file and include the License file at usr/src/OPENSOLARIS.LICENSE.
16*7c478bd9Sstevel@tonic-gate  * If applicable, add the following below this CDDL HEADER, with the
17*7c478bd9Sstevel@tonic-gate  * fields enclosed by brackets "[]" replaced with your own identifying
18*7c478bd9Sstevel@tonic-gate  * information: Portions Copyright [yyyy] [name of copyright owner]
19*7c478bd9Sstevel@tonic-gate  *
20*7c478bd9Sstevel@tonic-gate  * CDDL HEADER END
21*7c478bd9Sstevel@tonic-gate  */
22*7c478bd9Sstevel@tonic-gate /*
23*7c478bd9Sstevel@tonic-gate  * Copyright 2004 Sun Microsystems, Inc.  All rights reserved.
24*7c478bd9Sstevel@tonic-gate  * Use is subject to license terms.
25*7c478bd9Sstevel@tonic-gate  */
26*7c478bd9Sstevel@tonic-gate 
27*7c478bd9Sstevel@tonic-gate /*	Copyright (c) 1984, 1986, 1987, 1988, 1989 AT&T	*/
28*7c478bd9Sstevel@tonic-gate /*	  All Rights Reserved  	*/
29*7c478bd9Sstevel@tonic-gate 
30*7c478bd9Sstevel@tonic-gate #pragma ident	"%Z%%M%	%I%	%E% SMI"
31*7c478bd9Sstevel@tonic-gate /*
32*7c478bd9Sstevel@tonic-gate  *	UNIX shell
33*7c478bd9Sstevel@tonic-gate  */
34*7c478bd9Sstevel@tonic-gate 
35*7c478bd9Sstevel@tonic-gate /* To use stack as temporary workspace across
36*7c478bd9Sstevel@tonic-gate  * possible storage allocation (eg name lookup)
37*7c478bd9Sstevel@tonic-gate  * a) get ptr from `relstak'
38*7c478bd9Sstevel@tonic-gate  * b) can now use `pushstak'
39*7c478bd9Sstevel@tonic-gate  * c) then reset with `setstak'
40*7c478bd9Sstevel@tonic-gate  * d) `absstak' gives real address if needed
41*7c478bd9Sstevel@tonic-gate  */
42*7c478bd9Sstevel@tonic-gate #define		relstak()	(staktop-stakbot)
43*7c478bd9Sstevel@tonic-gate #define		absstak(x)	(stakbot+Rcheat(x))
44*7c478bd9Sstevel@tonic-gate #define		setstak(x)	(staktop=absstak(x))
45*7c478bd9Sstevel@tonic-gate #define		pushstak(c)	(*staktop++=(c))
46*7c478bd9Sstevel@tonic-gate #define		zerostak()	(*staktop=0)
47*7c478bd9Sstevel@tonic-gate 
48*7c478bd9Sstevel@tonic-gate /* Used to address an item left on the top of
49*7c478bd9Sstevel@tonic-gate  * the stack (very temporary)
50*7c478bd9Sstevel@tonic-gate  */
51*7c478bd9Sstevel@tonic-gate #define		curstak()	(staktop)
52*7c478bd9Sstevel@tonic-gate 
53*7c478bd9Sstevel@tonic-gate /* `usestak' before `pushstak' then `fixstak'
54*7c478bd9Sstevel@tonic-gate  * These routines are safe against heap
55*7c478bd9Sstevel@tonic-gate  * being allocated.
56*7c478bd9Sstevel@tonic-gate  */
57*7c478bd9Sstevel@tonic-gate #define		usestak()	{locstak();}
58*7c478bd9Sstevel@tonic-gate 
59*7c478bd9Sstevel@tonic-gate /* for local use only since it hands
60*7c478bd9Sstevel@tonic-gate  * out a real address for the stack top
61*7c478bd9Sstevel@tonic-gate  */
62*7c478bd9Sstevel@tonic-gate extern unsigned char		*locstak();
63*7c478bd9Sstevel@tonic-gate 
64*7c478bd9Sstevel@tonic-gate /* Will allocate the item being used and return its
65*7c478bd9Sstevel@tonic-gate  * address (safe now).
66*7c478bd9Sstevel@tonic-gate  */
67*7c478bd9Sstevel@tonic-gate #define		fixstak()	endstak(staktop)
68*7c478bd9Sstevel@tonic-gate 
69*7c478bd9Sstevel@tonic-gate /* For use after `locstak' to hand back
70*7c478bd9Sstevel@tonic-gate  * new stack top and then allocate item
71*7c478bd9Sstevel@tonic-gate  */
72*7c478bd9Sstevel@tonic-gate extern unsigned char		*endstak();
73*7c478bd9Sstevel@tonic-gate 
74*7c478bd9Sstevel@tonic-gate /* Copy a string onto the stack and
75*7c478bd9Sstevel@tonic-gate  * allocate the space.
76*7c478bd9Sstevel@tonic-gate  */
77*7c478bd9Sstevel@tonic-gate extern unsigned char		*cpystak();
78*7c478bd9Sstevel@tonic-gate 
79*7c478bd9Sstevel@tonic-gate /* Copy a string onto the stack, checking for stack overflow
80*7c478bd9Sstevel@tonic-gate  * as the copy is done.  Same calling sequence as "movstr".
81*7c478bd9Sstevel@tonic-gate  */
82*7c478bd9Sstevel@tonic-gate extern unsigned char		*movstrstak();
83*7c478bd9Sstevel@tonic-gate 
84*7c478bd9Sstevel@tonic-gate /* Move bytes onto the stack, checking for stack overflow
85*7c478bd9Sstevel@tonic-gate  * as the copy is done.  Same calling sequence as the C
86*7c478bd9Sstevel@tonic-gate  * library routine "memcpy".
87*7c478bd9Sstevel@tonic-gate  */
88*7c478bd9Sstevel@tonic-gate extern unsigned char		*memcpystak();
89*7c478bd9Sstevel@tonic-gate 
90*7c478bd9Sstevel@tonic-gate /* Allocate given ammount of stack space */
91*7c478bd9Sstevel@tonic-gate extern unsigned char		*getstak();
92*7c478bd9Sstevel@tonic-gate 
93*7c478bd9Sstevel@tonic-gate /* Grow the data segment to include a given location */
94*7c478bd9Sstevel@tonic-gate extern void		growstak();
95*7c478bd9Sstevel@tonic-gate 
96*7c478bd9Sstevel@tonic-gate /* A chain of ptrs of stack blocks that
97*7c478bd9Sstevel@tonic-gate  * have become covered by heap allocation.
98*7c478bd9Sstevel@tonic-gate  * `tdystak' will return them to the heap.
99*7c478bd9Sstevel@tonic-gate  */
100*7c478bd9Sstevel@tonic-gate extern struct blk	*stakbsy;
101*7c478bd9Sstevel@tonic-gate 
102*7c478bd9Sstevel@tonic-gate /* Base of the entire stack */
103*7c478bd9Sstevel@tonic-gate extern unsigned char		*stakbas;
104*7c478bd9Sstevel@tonic-gate 
105*7c478bd9Sstevel@tonic-gate /* Top of entire stack */
106*7c478bd9Sstevel@tonic-gate extern unsigned char		*brkend;
107*7c478bd9Sstevel@tonic-gate 
108*7c478bd9Sstevel@tonic-gate /* Base of current item */
109*7c478bd9Sstevel@tonic-gate extern unsigned char		*stakbot;
110*7c478bd9Sstevel@tonic-gate 
111*7c478bd9Sstevel@tonic-gate /* Top of current item */
112*7c478bd9Sstevel@tonic-gate extern unsigned char		*staktop;
113*7c478bd9Sstevel@tonic-gate 
114*7c478bd9Sstevel@tonic-gate /* Used with tdystak */
115*7c478bd9Sstevel@tonic-gate extern unsigned char		*savstak();
116