1: /* shell.c -- readline utility functions that are normally provided by
2: bash when readline is linked as part of the shell. */
3:
4: /* Copyright (C) 1997-2009 Free Software Foundation, Inc.
5:
6: This file is part of the GNU Readline Library (Readline), a library
7: for reading lines of text with interactive input and history editing.
8:
9: Readline is free software: you can redistribute it and/or modify
10: it under the terms of the GNU General Public License as published by
11: the Free Software Foundation, either version 3 of the License, or
12: (at your option) any later version.
13:
14: Readline is distributed in the hope that it will be useful,
15: but WITHOUT ANY WARRANTY; without even the implied warranty of
16: MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
17: GNU General Public License for more details.
18:
19: You should have received a copy of the GNU General Public License
20: along with Readline. If not, see <http://www.gnu.org/licenses/>.
21: */
22:
23: #define READLINE_LIBRARY
24:
25: #if defined (HAVE_CONFIG_H)
26: # include <config.h>
27: #endif
28:
29: #include <sys/types.h>
30:
31: #if defined (HAVE_UNISTD_H)
32: # include <unistd.h>
33: #endif /* HAVE_UNISTD_H */
34:
35: #if defined (HAVE_STDLIB_H)
36: # include <stdlib.h>
37: #else
38: # include "ansi_stdlib.h"
39: #endif /* HAVE_STDLIB_H */
40:
41: #if defined (HAVE_STRING_H)
42: # include <string.h>
43: #else
44: # include <strings.h>
45: #endif /* !HAVE_STRING_H */
46:
47: #if defined (HAVE_LIMITS_H)
48: # include <limits.h>
49: #endif
50:
51: #if defined (HAVE_FCNTL_H)
52: #include <fcntl.h>
53: #endif
54: #if defined (HAVE_PWD_H)
55: #include <pwd.h>
56: #endif
57:
58: #include <stdio.h>
59:
60: #include "rlstdc.h"
61: #include "rlshell.h"
62: #include "rldefs.h"
63:
64: #include "xmalloc.h"
65:
66: #if defined (HAVE_GETPWUID) && !defined (HAVE_GETPW_DECLS)
67: extern struct passwd *getpwuid PARAMS((uid_t));
68: #endif /* HAVE_GETPWUID && !HAVE_GETPW_DECLS */
69:
70: #ifndef NULL
71: # define NULL 0
72: #endif
73:
74: #ifndef CHAR_BIT
75: # define CHAR_BIT 8
76: #endif
77:
78: /* Nonzero if the integer type T is signed. */
79: #define TYPE_SIGNED(t) (! ((t) 0 < (t) -1))
80:
81: /* Bound on length of the string representing an integer value of type T.
82: Subtract one for the sign bit if T is signed;
83: 302 / 1000 is log10 (2) rounded up;
84: add one for integer division truncation;
85: add one more for a minus sign if t is signed. */
86: #define INT_STRLEN_BOUND(t) \
87: ((sizeof (t) * CHAR_BIT - TYPE_SIGNED (t)) * 302 / 1000 \
88: + 1 + TYPE_SIGNED (t))
89:
90: /* All of these functions are resolved from bash if we are linking readline
91: as part of bash. */
92:
93: /* Does shell-like quoting using single quotes. */
94: char *
95: sh_single_quote (string)
96: char *string;
97: {
98: register int c;
99: char *result, *r, *s;
100:
101: result = (char *)xmalloc (3 + (4 * strlen (string)));
102: r = result;
103: *r++ = '\'';
104:
105: for (s = string; s && (c = *s); s++)
106: {
107: *r++ = c;
108:
109: if (c == '\'')
110: {
111: *r++ = '\\'; /* insert escaped single quote */
112: *r++ = '\'';
113: *r++ = '\''; /* start new quoted string */
114: }
115: }
116:
117: *r++ = '\'';
118: *r = '\0';
119:
120: return (result);
121: }
122:
123: /* Set the environment variables LINES and COLUMNS to lines and cols,
124: respectively. */
125: static char setenv_buf[INT_STRLEN_BOUND (int) + 1];
126: static char putenv_buf1[INT_STRLEN_BOUND (int) + 6 + 1]; /* sizeof("LINES=") == 6 */
127: static char putenv_buf2[INT_STRLEN_BOUND (int) + 8 + 1]; /* sizeof("COLUMNS=") == 8 */
128:
129: void
130: sh_set_lines_and_columns (lines, cols)
131: int lines, cols;
132: {
133: #if defined (HAVE_SETENV)
134: sprintf (setenv_buf, "%d", lines);
135: setenv ("LINES", setenv_buf, 1);
136:
137: sprintf (setenv_buf, "%d", cols);
138: setenv ("COLUMNS", setenv_buf, 1);
139: #else /* !HAVE_SETENV */
140: # if defined (HAVE_PUTENV)
141: sprintf (putenv_buf1, "LINES=%d", lines);
142: putenv (putenv_buf1);
143:
144: sprintf (putenv_buf2, "COLUMNS=%d", cols);
145: putenv (putenv_buf2);
146: # endif /* HAVE_PUTENV */
147: #endif /* !HAVE_SETENV */
148: }
149:
150: char *
151: sh_get_env_value (varname)
152: const char *varname;
153: {
154: return ((char *)getenv (varname));
155: }
156:
157: char *
158: sh_get_home_dir ()
159: {
160: static char *home_dir = (char *)NULL;
161: struct passwd *entry;
162:
163: if (home_dir)
164: return (home_dir);
165:
166: home_dir = (char *)NULL;
167: #if defined (HAVE_GETPWUID)
168: # if defined (__TANDEM)
169: entry = getpwnam (getlogin ());
170: # else
171: entry = getpwuid (getuid ());
172: # endif
173: if (entry)
174: home_dir = savestring (entry->pw_dir);
175: #endif
176:
177: #if defined (HAVE_GETPWENT)
178: endpwent (); /* some systems need this */
179: #endif
180:
181: return (home_dir);
182: }
183:
184: #if !defined (O_NDELAY)
185: # if defined (FNDELAY)
186: # define O_NDELAY FNDELAY
187: # endif
188: #endif
189:
190: int
191: sh_unset_nodelay_mode (fd)
192: int fd;
193: {
194: #if defined (HAVE_FCNTL)
195: int flags, bflags;
196:
197: if ((flags = fcntl (fd, F_GETFL, 0)) < 0)
198: return -1;
199:
200: bflags = 0;
201:
202: #ifdef O_NONBLOCK
203: bflags |= O_NONBLOCK;
204: #endif
205:
206: #ifdef O_NDELAY
207: bflags |= O_NDELAY;
208: #endif
209:
210: if (flags & bflags)
211: {
212: flags &= ~bflags;
213: return (fcntl (fd, F_SETFL, flags));
214: }
215: #endif
216:
217: return 0;
218: }
FreeBSD-CVSweb <freebsd-cvsweb@FreeBSD.org>
![[BACK]](/icons/cvsweb/back.gif){kind=icon}
Return to shell.c CVS log ![[TXT]](/icons/cvsweb/text.gif){kind=icon}
![[DIR]](/icons/cvsweb/dir.gif){kind=icon}
Up to [ELWIX - Embedded LightWeight unIX -] / embedaddon / readline