xref: /illumos-gate/usr/src/cmd/sh/stak.h (revision 2a8bcb4e)
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 /*
31*7c478bd9Sstevel@tonic-gate  *	UNIX shell
32*7c478bd9Sstevel@tonic-gate  */
33*7c478bd9Sstevel@tonic-gate 
34*7c478bd9Sstevel@tonic-gate /* To use stack as temporary workspace across
35*7c478bd9Sstevel@tonic-gate  * possible storage allocation (eg name lookup)
36*7c478bd9Sstevel@tonic-gate  * a) get ptr from `relstak'
37*7c478bd9Sstevel@tonic-gate  * b) can now use `pushstak'
38*7c478bd9Sstevel@tonic-gate  * c) then reset with `setstak'
39*7c478bd9Sstevel@tonic-gate  * d) `absstak' gives real address if needed
40*7c478bd9Sstevel@tonic-gate  */
41*7c478bd9Sstevel@tonic-gate #define		relstak()	(staktop-stakbot)
42*7c478bd9Sstevel@tonic-gate #define		absstak(x)	(stakbot+Rcheat(x))
43*7c478bd9Sstevel@tonic-gate #define		setstak(x)	(staktop=absstak(x))
44*7c478bd9Sstevel@tonic-gate #define		pushstak(c)	(*staktop++=(c))
45*7c478bd9Sstevel@tonic-gate #define		zerostak()	(*staktop=0)
46*7c478bd9Sstevel@tonic-gate 
47*7c478bd9Sstevel@tonic-gate /* Used to address an item left on the top of
48*7c478bd9Sstevel@tonic-gate  * the stack (very temporary)
49*7c478bd9Sstevel@tonic-gate  */
50*7c478bd9Sstevel@tonic-gate #define		curstak()	(staktop)
51*7c478bd9Sstevel@tonic-gate 
52*7c478bd9Sstevel@tonic-gate /* `usestak' before `pushstak' then `fixstak'
53*7c478bd9Sstevel@tonic-gate  * These routines are safe against heap
54*7c478bd9Sstevel@tonic-gate  * being allocated.
55*7c478bd9Sstevel@tonic-gate  */
56*7c478bd9Sstevel@tonic-gate #define		usestak()	{locstak();}
57*7c478bd9Sstevel@tonic-gate 
58*7c478bd9Sstevel@tonic-gate /* for local use only since it hands
59*7c478bd9Sstevel@tonic-gate  * out a real address for the stack top
60*7c478bd9Sstevel@tonic-gate  */
61*7c478bd9Sstevel@tonic-gate extern unsigned char		*locstak();
62*7c478bd9Sstevel@tonic-gate 
63*7c478bd9Sstevel@tonic-gate /* Will allocate the item being used and return its
64*7c478bd9Sstevel@tonic-gate  * address (safe now).
65*7c478bd9Sstevel@tonic-gate  */
66*7c478bd9Sstevel@tonic-gate #define		fixstak()	endstak(staktop)
67*7c478bd9Sstevel@tonic-gate 
68*7c478bd9Sstevel@tonic-gate /* For use after `locstak' to hand back
69*7c478bd9Sstevel@tonic-gate  * new stack top and then allocate item
70*7c478bd9Sstevel@tonic-gate  */
71*7c478bd9Sstevel@tonic-gate extern unsigned char		*endstak();
72*7c478bd9Sstevel@tonic-gate 
73*7c478bd9Sstevel@tonic-gate /* Copy a string onto the stack and
74*7c478bd9Sstevel@tonic-gate  * allocate the space.
75*7c478bd9Sstevel@tonic-gate  */
76*7c478bd9Sstevel@tonic-gate extern unsigned char		*cpystak();
77*7c478bd9Sstevel@tonic-gate 
78*7c478bd9Sstevel@tonic-gate /* Copy a string onto the stack, checking for stack overflow
79*7c478bd9Sstevel@tonic-gate  * as the copy is done.  Same calling sequence as "movstr".
80*7c478bd9Sstevel@tonic-gate  */
81*7c478bd9Sstevel@tonic-gate extern unsigned char		*movstrstak();
82*7c478bd9Sstevel@tonic-gate 
83*7c478bd9Sstevel@tonic-gate /* Move bytes onto the stack, checking for stack overflow
84*7c478bd9Sstevel@tonic-gate  * as the copy is done.  Same calling sequence as the C
85*7c478bd9Sstevel@tonic-gate  * library routine "memcpy".
86*7c478bd9Sstevel@tonic-gate  */
87*7c478bd9Sstevel@tonic-gate extern unsigned char		*memcpystak();
88*7c478bd9Sstevel@tonic-gate 
89*7c478bd9Sstevel@tonic-gate /* Allocate given ammount of stack space */
90*7c478bd9Sstevel@tonic-gate extern unsigned char		*getstak();
91*7c478bd9Sstevel@tonic-gate 
92*7c478bd9Sstevel@tonic-gate /* Grow the data segment to include a given location */
93*7c478bd9Sstevel@tonic-gate extern void		growstak();
94*7c478bd9Sstevel@tonic-gate 
95*7c478bd9Sstevel@tonic-gate /* A chain of ptrs of stack blocks that
96*7c478bd9Sstevel@tonic-gate  * have become covered by heap allocation.
97*7c478bd9Sstevel@tonic-gate  * `tdystak' will return them to the heap.
98*7c478bd9Sstevel@tonic-gate  */
99*7c478bd9Sstevel@tonic-gate extern struct blk	*stakbsy;
100*7c478bd9Sstevel@tonic-gate 
101*7c478bd9Sstevel@tonic-gate /* Base of the entire stack */
102*7c478bd9Sstevel@tonic-gate extern unsigned char		*stakbas;
103*7c478bd9Sstevel@tonic-gate 
104*7c478bd9Sstevel@tonic-gate /* Top of entire stack */
105*7c478bd9Sstevel@tonic-gate extern unsigned char		*brkend;
106*7c478bd9Sstevel@tonic-gate 
107*7c478bd9Sstevel@tonic-gate /* Base of current item */
108*7c478bd9Sstevel@tonic-gate extern unsigned char		*stakbot;
109*7c478bd9Sstevel@tonic-gate 
110*7c478bd9Sstevel@tonic-gate /* Top of current item */
111*7c478bd9Sstevel@tonic-gate extern unsigned char		*staktop;
112*7c478bd9Sstevel@tonic-gate 
113*7c478bd9Sstevel@tonic-gate /* Used with tdystak */
114*7c478bd9Sstevel@tonic-gate extern unsigned char		*savstak();
115