Magellan Linux

Contents of /trunk/mkinitrd-magellan/klibc/usr/dash/var.h

Parent Directory Parent Directory | Revision Log Revision Log


Revision 1122 - (show annotations) (download)
Wed Aug 18 21:11:40 2010 UTC (13 years, 8 months ago) by niro
File MIME type: text/plain
File size: 4884 byte(s)
-updated to klibc-1.5.19
1 /*-
2 * Copyright (c) 1991, 1993
3 * The Regents of the University of California. All rights reserved.
4 * Copyright (c) 1997-2005
5 * Herbert Xu <herbert@gondor.apana.org.au>. All rights reserved.
6 *
7 * This code is derived from software contributed to Berkeley by
8 * Kenneth Almquist.
9 *
10 * Redistribution and use in source and binary forms, with or without
11 * modification, are permitted provided that the following conditions
12 * are met:
13 * 1. Redistributions of source code must retain the above copyright
14 * notice, this list of conditions and the following disclaimer.
15 * 2. Redistributions in binary form must reproduce the above copyright
16 * notice, this list of conditions and the following disclaimer in the
17 * documentation and/or other materials provided with the distribution.
18 * 3. Neither the name of the University nor the names of its contributors
19 * may be used to endorse or promote products derived from this software
20 * without specific prior written permission.
21 *
22 * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
23 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
24 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
25 * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
26 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
27 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
28 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
29 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
30 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
31 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
32 * SUCH DAMAGE.
33 *
34 * @(#)var.h 8.2 (Berkeley) 5/4/95
35 */
36
37 #include <stdint.h>
38
39 /*
40 * Shell variables.
41 */
42
43 /* flags */
44 #define VEXPORT 0x01 /* variable is exported */
45 #define VREADONLY 0x02 /* variable cannot be modified */
46 #define VSTRFIXED 0x04 /* variable struct is statically allocated */
47 #define VTEXTFIXED 0x08 /* text is statically allocated */
48 #define VSTACK 0x10 /* text is allocated on the stack */
49 #define VUNSET 0x20 /* the variable is not set */
50 #define VNOFUNC 0x40 /* don't call the callback function */
51 #define VNOSET 0x80 /* do not set variable - just readonly test */
52 #define VNOSAVE 0x100 /* when text is on the heap before setvareq */
53
54
55 struct var {
56 struct var *next; /* next entry in hash list */
57 int flags; /* flags are defined above */
58 const char *text; /* name=value */
59 void (*func)(const char *);
60 /* function to be called when */
61 /* the variable gets set/unset */
62 };
63
64
65 struct localvar {
66 struct localvar *next; /* next local variable in list */
67 struct var *vp; /* the variable that was made local */
68 int flags; /* saved flags */
69 const char *text; /* saved text */
70 };
71
72
73 extern struct localvar *localvars;
74 extern struct var varinit[];
75
76 #if ATTY
77 #define vatty varinit[0]
78 #define vifs varinit[1]
79 #else
80 #define vifs varinit[0]
81 #endif
82 #define vmail (&vifs)[1]
83 #define vmpath (&vmail)[1]
84 #define vpath (&vmpath)[1]
85 #define vps1 (&vpath)[1]
86 #define vps2 (&vps1)[1]
87 #define vps4 (&vps2)[1]
88 #define voptind (&vps4)[1]
89 #ifndef SMALL
90 #define vterm (&voptind)[1]
91 #define vhistsize (&vterm)[1]
92 #endif
93
94 #ifdef IFS_BROKEN
95 extern const char defifsvar[];
96 #define defifs (defifsvar + 4)
97 #else
98 extern const char defifs[];
99 #endif
100 extern const char defpathvar[];
101 #define defpath (defpathvar + 5)
102
103 /*
104 * The following macros access the values of the above variables.
105 * They have to skip over the name. They return the null string
106 * for unset variables.
107 */
108
109 #define ifsval() (vifs.text + 4)
110 #define ifsset() ((vifs.flags & VUNSET) == 0)
111 #define mailval() (vmail.text + 5)
112 #define mpathval() (vmpath.text + 9)
113 #define pathval() (vpath.text + 5)
114 #define ps1val() (vps1.text + 4)
115 #define ps2val() (vps2.text + 4)
116 #define ps4val() (vps4.text + 4)
117 #define optindval() (voptind.text + 7)
118 #ifndef SMALL
119 #define histsizeval() (vhistsize.text + 9)
120 #define termval() (vterm.text + 5)
121 #endif
122
123 #if ATTY
124 #define attyset() ((vatty.flags & VUNSET) == 0)
125 #endif
126 #define mpathset() ((vmpath.flags & VUNSET) == 0)
127
128 void initvar(void);
129 void setvar(const char *, const char *, int);
130 intmax_t setvarint(const char *, intmax_t, int);
131 void setvareq(char *, int);
132 struct strlist;
133 void listsetvar(struct strlist *, int);
134 char *lookupvar(const char *);
135 intmax_t lookupvarint(const char *);
136 char *bltinlookup(const char *);
137 char **listvars(int, int, char ***);
138 #define environment() listvars(VEXPORT, VUNSET, 0)
139 int showvars(const char *, int, int);
140 int exportcmd(int, char **);
141 int localcmd(int, char **);
142 void poplocalvars(void);
143 int unsetcmd(int, char **);
144 int unsetvar(const char *);
145 int varcmp(const char *, const char *);
146
147 static inline int varequal(const char *a, const char *b) {
148 return !varcmp(a, b);
149 }