xref: /freebsd/crypto/heimdal/lib/roken/getusershell.c (revision 1e413cf93298b5b97441a21d9a50fdcd0ee9945e)
1 /*
2  * Copyright (c) 1985, 1993
3  *	The Regents of the University of California.  All rights reserved.
4  *
5  * Redistribution and use in source and binary forms, with or without
6  * modification, are permitted provided that the following conditions
7  * are met:
8  * 1. Redistributions of source code must retain the above copyright
9  *    notice, this list of conditions and the following disclaimer.
10  * 2. Redistributions in binary form must reproduce the above copyright
11  *    notice, this list of conditions and the following disclaimer in the
12  *    documentation and/or other materials provided with the distribution.
13  * 3. All advertising materials mentioning features or use of this software
14  *    must display the following acknowledgement:
15  *	This product includes software developed by the University of
16  *	California, Berkeley and its contributors.
17  * 4. Neither the name of the University nor the names of its contributors
18  *    may be used to endorse or promote products derived from this software
19  *    without specific prior written permission.
20  *
21  * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
22  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
23  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
24  * ARE DISCLAIMED.  IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
25  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
26  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
27  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
28  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
29  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
30  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
31  * SUCH DAMAGE.
32  */
33 
34 #ifdef HAVE_CONFIG_H
35 #include <config.h>
36 #endif
37 
38 RCSID("$Id: getusershell.c,v 1.10 2000/05/22 09:11:59 joda Exp $");
39 
40 #ifndef HAVE_GETUSERSHELL
41 
42 #include <stdio.h>
43 #include <stdlib.h>
44 #include <string.h>
45 #ifdef HAVE_PATHS_H
46 #include <paths.h>
47 #endif
48 #ifdef HAVE_SYS_TYPES_H
49 #include <sys/types.h>
50 #endif
51 #ifdef HAVE_SYS_STAT_H
52 #include <sys/stat.h>
53 #endif
54 #ifdef HAVE_SYS_PARAM_H
55 #include <sys/param.h>
56 #endif
57 
58 #ifdef HAVE_USERSEC_H
59 struct aud_rec;
60 #include <usersec.h>
61 #endif
62 #ifdef HAVE_USERCONF_H
63 #include <userconf.h>
64 #endif
65 
66 #ifndef _PATH_SHELLS
67 #define _PATH_SHELLS "/etc/shells"
68 #endif
69 
70 #ifndef _PATH_BSHELL
71 #define _PATH_BSHELL "/bin/sh"
72 #endif
73 
74 #ifndef _PATH_CSHELL
75 #define _PATH_CSHELL "/bin/csh"
76 #endif
77 
78 /*
79  * Local shells should NOT be added here.  They should be added in
80  * /etc/shells.
81  */
82 
83 static char *okshells[] = { _PATH_BSHELL, _PATH_CSHELL, NULL };
84 static char **curshell, **shells, *strings;
85 static char **initshells (void);
86 
87 /*
88  * Get a list of shells from _PATH_SHELLS, if it exists.
89  */
90 char *
91 getusershell()
92 {
93     char *ret;
94 
95     if (curshell == NULL)
96 	curshell = initshells();
97     ret = *curshell;
98     if (ret != NULL)
99 	curshell++;
100     return (ret);
101 }
102 
103 void
104 endusershell()
105 {
106     if (shells != NULL)
107 	free(shells);
108     shells = NULL;
109     if (strings != NULL)
110 	free(strings);
111     strings = NULL;
112     curshell = NULL;
113 }
114 
115 void
116 setusershell()
117 {
118     curshell = initshells();
119 }
120 
121 static char **
122 initshells()
123 {
124     char **sp, *cp;
125 #ifdef HAVE_GETCONFATTR
126     char *tmp;
127     int nsh;
128 #else
129     FILE *fp;
130 #endif
131     struct stat statb;
132 
133     free(shells);
134     shells = NULL;
135     free(strings);
136     strings = NULL;
137 #ifdef HAVE_GETCONFATTR
138     if(getconfattr(SC_SYS_LOGIN, SC_SHELLS, &tmp, SEC_LIST) != 0)
139 	return okshells;
140 
141     for(cp = tmp, nsh = 0; *cp; cp += strlen(cp) + 1, nsh++);
142 
143     shells = calloc(nsh + 1, sizeof(*shells));
144     if(shells == NULL)
145 	return okshells;
146 
147     strings = malloc(cp - tmp);
148     if(strings == NULL) {
149 	free(shells);
150 	shells = NULL;
151 	return okshells;
152     }
153     memcpy(strings, tmp, cp - tmp);
154     for(sp = shells, cp = strings; *cp; cp += strlen(cp) + 1, sp++)
155 	*sp = cp;
156 #else
157     if ((fp = fopen(_PATH_SHELLS, "r")) == NULL)
158 	return (okshells);
159     if (fstat(fileno(fp), &statb) == -1) {
160 	fclose(fp);
161 	return (okshells);
162     }
163     if ((strings = malloc((u_int)statb.st_size)) == NULL) {
164 	fclose(fp);
165 	return (okshells);
166     }
167     shells = calloc((unsigned)statb.st_size / 3, sizeof (char *));
168     if (shells == NULL) {
169 	fclose(fp);
170 	free(strings);
171 	strings = NULL;
172 	return (okshells);
173     }
174     sp = shells;
175     cp = strings;
176     while (fgets(cp, MaxPathLen + 1, fp) != NULL) {
177 	while (*cp != '#' && *cp != '/' && *cp != '\0')
178 	    cp++;
179 	if (*cp == '#' || *cp == '\0')
180 	    continue;
181 	*sp++ = cp;
182 	while (!isspace(*cp) && *cp != '#' && *cp != '\0')
183 	    cp++;
184 	*cp++ = '\0';
185     }
186     fclose(fp);
187 #endif
188     *sp = NULL;
189     return (shells);
190 }
191 #endif /* HAVE_GETUSERSHELL */
192