Commit | Line | Data |
---|---|---|
d60d9f65 SS |
1 | /* shell.c -- readline utility functions that are normally provided by |
2 | bash when readline is linked as part of the shell. */ | |
3 | ||
cc88a640 | 4 | /* Copyright (C) 1997-2009 Free Software Foundation, Inc. |
d60d9f65 | 5 | |
cc88a640 JK |
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. | |
d60d9f65 | 8 | |
cc88a640 JK |
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 | |
d60d9f65 SS |
12 | (at your option) any later version. |
13 | ||
cc88a640 JK |
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 | |
d60d9f65 SS |
17 | GNU General Public License for more details. |
18 | ||
cc88a640 JK |
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 | ||
d60d9f65 SS |
23 | #define READLINE_LIBRARY |
24 | ||
25 | #if defined (HAVE_CONFIG_H) | |
26 | # include <config.h> | |
27 | #endif | |
28 | ||
c862e87b JM |
29 | #include <sys/types.h> |
30 | ||
d60d9f65 | 31 | #if defined (HAVE_UNISTD_H) |
d60d9f65 SS |
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 | ||
9255ee31 EZ |
47 | #if defined (HAVE_LIMITS_H) |
48 | # include <limits.h> | |
49 | #endif | |
50 | ||
5bdf8622 | 51 | #if defined (HAVE_FCNTL_H) |
1b17e766 | 52 | #include <fcntl.h> |
5bdf8622 DJ |
53 | #endif |
54 | #if defined (HAVE_PWD_H) | |
c862e87b | 55 | #include <pwd.h> |
430b7832 | 56 | #endif |
d60d9f65 | 57 | |
1b17e766 EZ |
58 | #include <stdio.h> |
59 | ||
9255ee31 | 60 | #include "rlstdc.h" |
1b17e766 | 61 | #include "rlshell.h" |
775e241e TT |
62 | #include "rldefs.h" |
63 | ||
1b17e766 EZ |
64 | #include "xmalloc.h" |
65 | ||
5bdf8622 | 66 | #if defined (HAVE_GETPWUID) && !defined (HAVE_GETPW_DECLS) |
9255ee31 | 67 | extern struct passwd *getpwuid PARAMS((uid_t)); |
5bdf8622 | 68 | #endif /* HAVE_GETPWUID && !HAVE_GETPW_DECLS */ |
d60d9f65 | 69 | |
1b17e766 EZ |
70 | #ifndef NULL |
71 | # define NULL 0 | |
72 | #endif | |
d60d9f65 | 73 | |
9255ee31 EZ |
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 | ||
c862e87b JM |
90 | /* All of these functions are resolved from bash if we are linking readline |
91 | as part of bash. */ | |
d60d9f65 SS |
92 | |
93 | /* Does shell-like quoting using single quotes. */ | |
94 | char * | |
9255ee31 | 95 | sh_single_quote (string) |
d60d9f65 SS |
96 | char *string; |
97 | { | |
98 | register int c; | |
99 | char *result, *r, *s; | |
100 | ||
1b17e766 | 101 | result = (char *)xmalloc (3 + (4 * strlen (string))); |
d60d9f65 SS |
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. */ | |
775e241e TT |
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 | ||
d60d9f65 | 129 | void |
9255ee31 | 130 | sh_set_lines_and_columns (lines, cols) |
d60d9f65 SS |
131 | int lines, cols; |
132 | { | |
5836a818 | 133 | #if defined (HAVE_SETENV) |
775e241e TT |
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); | |
5bdf8622 DJ |
139 | #else /* !HAVE_SETENV */ |
140 | # if defined (HAVE_PUTENV) | |
775e241e TT |
141 | sprintf (putenv_buf1, "LINES=%d", lines); |
142 | putenv (putenv_buf1); | |
5bdf8622 | 143 | |
775e241e TT |
144 | sprintf (putenv_buf2, "COLUMNS=%d", cols); |
145 | putenv (putenv_buf2); | |
5bdf8622 DJ |
146 | # endif /* HAVE_PUTENV */ |
147 | #endif /* !HAVE_SETENV */ | |
d60d9f65 SS |
148 | } |
149 | ||
150 | char * | |
9255ee31 EZ |
151 | sh_get_env_value (varname) |
152 | const char *varname; | |
d60d9f65 SS |
153 | { |
154 | return ((char *)getenv (varname)); | |
155 | } | |
156 | ||
d60d9f65 | 157 | char * |
9255ee31 | 158 | sh_get_home_dir () |
d60d9f65 | 159 | { |
775e241e | 160 | static char *home_dir = (char *)NULL; |
c862e87b JM |
161 | struct passwd *entry; |
162 | ||
775e241e TT |
163 | if (home_dir) |
164 | return (home_dir); | |
165 | ||
c862e87b | 166 | home_dir = (char *)NULL; |
5bdf8622 | 167 | #if defined (HAVE_GETPWUID) |
775e241e TT |
168 | # if defined (__TANDEM) |
169 | entry = getpwnam (getlogin ()); | |
170 | # else | |
c862e87b | 171 | entry = getpwuid (getuid ()); |
775e241e | 172 | # endif |
c862e87b | 173 | if (entry) |
775e241e TT |
174 | home_dir = savestring (entry->pw_dir); |
175 | #endif | |
176 | ||
177 | #if defined (HAVE_GETPWENT) | |
178 | endpwent (); /* some systems need this */ | |
430b7832 | 179 | #endif |
775e241e | 180 | |
c862e87b JM |
181 | return (home_dir); |
182 | } | |
1b17e766 EZ |
183 | |
184 | #if !defined (O_NDELAY) | |
185 | # if defined (FNDELAY) | |
186 | # define O_NDELAY FNDELAY | |
187 | # endif | |
188 | #endif | |
189 | ||
190 | int | |
9255ee31 | 191 | sh_unset_nodelay_mode (fd) |
1b17e766 EZ |
192 | int fd; |
193 | { | |
5bdf8622 | 194 | #if defined (HAVE_FCNTL) |
1b17e766 EZ |
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 | } | |
430b7832 | 215 | #endif |
1b17e766 EZ |
216 | |
217 | return 0; | |
218 | } |