Oops.
[people/mcb30/busybox.git] / libpwdgrp / shadow.c
1 /* vi: set sw=4 ts=4: */
2 /*
3  * Copyright 1989 - 1994, Julianne Frances Haugh 
4  *                      <jockgrrl@austin.rr.com>, <jfh@austin.ibm.com>
5  * All rights reserved.
6  *
7  * Redistribution and use in source and binary forms, with or without
8  * modification, are permitted provided that the following conditions
9  * are met:
10  * 1. Redistributions of source code must retain the above copyright
11  *    notice, this list of conditions and the following disclaimer.
12  * 2. Redistributions in binary form must reproduce the above copyright
13  *    notice, this list of conditions and the following disclaimer in the
14  *    documentation and/or other materials provided with the distribution.
15  * 3. Neither the name of Julianne F. Haugh nor the names of its contributors
16  *    may be used to endorse or promote products derived from this software
17  *    without specific prior written permission.
18  *
19  * THIS SOFTWARE IS PROVIDED BY JULIE HAUGH AND CONTRIBUTORS ``AS IS'' AND
20  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
21  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
22  * ARE DISCLAIMED.  IN NO EVENT SHALL JULIE HAUGH OR CONTRIBUTORS BE LIABLE
23  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
24  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
25  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
26  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
27  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
28  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
29  * SUCH DAMAGE.
30  */
31
32 /* TODO:  fgetspent_r.c  getspent_r.c  getspnam_r.c sgetspent_r.c 
33  *                lckpwdf  ulckpwdf 
34  */
35
36 #include <stdio.h>
37 #include <stdlib.h>
38 #include <string.h>
39 #include <unistd.h>
40
41 #include "busybox.h"
42 #include "shadow_.h"
43
44 static FILE *shadow;
45 static char spwbuf[BUFSIZ];
46 static struct spwd spwd;
47
48 #define FIELDS  9
49 #define OFIELDS 5
50
51 /* setspent - initialize access to shadow text and DBM files */
52 void setspent(void)
53 {
54         if (shadow) {
55                 rewind(shadow);
56         } else {
57                 shadow = bb_xfopen(SHADOW_FILE, "r");
58         }
59 }
60
61 /* endspent - terminate access to shadow text and DBM files */
62 void endspent(void)
63 {
64         if (shadow)
65                 (void) fclose(shadow);
66         shadow = (FILE *) 0;
67 }
68
69 /* getspent - get a (struct spwd *) from the current shadow file */
70 struct spwd *getspent(void)
71 {
72         if (!shadow)
73                 setspent();
74         return (fgetspent(shadow));
75 }
76
77 /* getspnam - get a shadow entry by name */
78 struct spwd *getspnam(const char *name)
79 {
80         struct spwd *sp;
81
82         if (!name || !strlen(name))
83                 return NULL;
84
85         setspent();
86         while ((sp = getspent()) != NULL) {
87                 if (strcmp(name, sp->sp_namp) == 0)
88                         break;
89         }
90         endspent();
91         return (sp);
92 }
93
94
95 /* sgetspent - convert string in shadow file format to (struct spwd *) */
96 /* returns NULL on error */
97 struct spwd *sgetspent(const char *string)
98 {
99         char *fields[FIELDS];
100         char *cp;
101         char *cpp;
102         int i;
103
104         /*
105          * Copy string to local buffer.  It has to be tokenized and we
106          * have to do that to our private copy.
107          */
108
109         if (strlen(string) >= sizeof spwbuf)
110                 /* return 0; */
111                 return NULL;
112         strcpy(spwbuf, string);
113
114         if ((cp = strrchr(spwbuf, '\n')))
115                 *cp = '\0';
116
117         /*
118          * Tokenize the string into colon separated fields.  Allow up to
119          * FIELDS different fields.
120          */
121
122         for (cp = spwbuf, i = 0; *cp && i < FIELDS; i++) {
123                 fields[i] = cp;
124                 while (*cp && *cp != ':')
125                         cp++;
126
127                 if (*cp)
128                         *cp++ = '\0';
129         }
130
131         /*
132          * It is acceptable for the last SVR4 field to be blank.  This
133          * results in the loop being terminated early.  In which case,
134          * we just make the last field be blank and be done with it.
135          */
136
137         if (i == (FIELDS - 1))
138                 fields[i++] = cp;
139
140         if ((cp && *cp) || (i != FIELDS && i != OFIELDS))
141                 /* return 0; */
142                 return NULL;
143
144         /*
145          * Start populating the structure.  The fields are all in
146          * static storage, as is the structure we pass back.  If we
147          * ever see a name with '+' as the first character, we try
148          * to turn on NIS processing.
149          */
150
151         spwd.sp_namp = fields[0];
152         spwd.sp_pwdp = fields[1];
153
154         /*
155          * Get the last changed date.  For all of the integer fields,
156          * we check for proper format.  It is an error to have an
157          * incorrectly formatted number, unless we are using NIS.
158          */
159
160         if ((spwd.sp_lstchg = strtol(fields[2], &cpp, 10)) == 0 && *cpp) {
161                 /* return 0; */
162                 return NULL;
163         } else if (fields[2][0] == '\0')
164                 spwd.sp_lstchg = -1;
165
166         /*
167          * Get the minimum period between password changes.
168          */
169
170         if ((spwd.sp_min = strtol(fields[3], &cpp, 10)) == 0 && *cpp) {
171                 /* return 0; */
172                 return NULL;
173         } else if (fields[3][0] == '\0')
174                 spwd.sp_min = -1;
175
176         /*
177          * Get the maximum number of days a password is valid.
178          */
179
180         if ((spwd.sp_max = strtol(fields[4], &cpp, 10)) == 0 && *cpp) {
181                 /* return 0; */
182                 return NULL;
183         } else if (fields[4][0] == '\0')
184                 spwd.sp_max = -1;
185
186         /*
187          * If there are only OFIELDS fields (this is a SVR3.2 /etc/shadow
188          * formatted file), initialize the other field members to -1.
189          */
190
191         if (i == OFIELDS) {
192                 spwd.sp_warn = spwd.sp_inact = spwd.sp_expire = spwd.sp_flag = -1;
193
194                 return &spwd;
195         }
196
197         /*
198          * The rest of the fields are mandatory for SVR4, but optional
199          * for anything else.  However, if one is present the others
200          * must be as well.
201          */
202
203         /*
204          * Get the number of days of password expiry warning.
205          */
206
207         if ((spwd.sp_warn = strtol(fields[5], &cpp, 10)) == 0 && *cpp) {
208                 /* return 0; */
209                 return NULL;
210         } else if (fields[5][0] == '\0')
211                 spwd.sp_warn = -1;
212
213         /*
214          * Get the number of days of inactivity before an account is
215          * disabled.
216          */
217
218         if ((spwd.sp_inact = strtol(fields[6], &cpp, 10)) == 0 && *cpp) {
219                 /* return 0; */
220                 return NULL;
221         } else if (fields[6][0] == '\0')
222                 spwd.sp_inact = -1;
223
224         /*
225          * Get the number of days after the epoch before the account is
226          * set to expire.
227          */
228
229         if ((spwd.sp_expire = strtol(fields[7], &cpp, 10)) == 0 && *cpp) {
230                 /* return 0; */
231                 return NULL;
232         } else if (fields[7][0] == '\0')
233                 spwd.sp_expire = -1;
234
235         /*
236          * This field is reserved for future use.  But it isn't supposed
237          * to have anything other than a valid integer in it.
238          */
239
240         if ((spwd.sp_flag = strtol(fields[8], &cpp, 10)) == 0 && *cpp) {
241                 /* return 0; */
242                 return NULL;
243         } else if (fields[8][0] == '\0')
244                 spwd.sp_flag = -1;
245
246         return (&spwd);
247 }
248
249 /* fgetspent - get an entry from an /etc/shadow formatted stream */
250 struct spwd *fgetspent(FILE *fp)
251 {
252         char buf[BUFSIZ];
253         char *cp;
254
255         if (!fp)
256                 /* return (0); */
257                 return NULL;
258
259         if (fgets(buf, sizeof buf, fp) != (char *) 0) {
260                 if ((cp = strchr(buf, '\n')))
261                         *cp = '\0';
262                 return (sgetspent(buf));
263         }
264         /* return 0; */
265         return NULL;
266 }
267
268 /*
269  * putspent - put a (struct spwd *) into the (FILE *) you provide.
270  * 
271  *      this was described in shadow_.h but not implemented, so here
272  *      I go.  -beppu
273  *
274  */
275 int putspent(const struct spwd *sp, FILE *fp)
276 {
277         int ret;
278
279         /* seek to end */
280         ret = fseek(fp, 0, SEEK_END);
281         if (ret == -1) {
282                 /* return -1; */
283                 return 1;
284         }
285
286         /* powered by fprintf */
287         fprintf(fp, "%s:%s:%ld:%ld:%ld:%ld:%ld:%ld:%s\n", sp->sp_namp,  /* login name */
288                         sp->sp_pwdp,            /* encrypted password */
289                         sp->sp_lstchg,          /* date of last change */
290                         sp->sp_min,                     /* minimum number of days between changes */
291                         sp->sp_max,                     /* maximum number of days between changes */
292                         sp->sp_warn,            /* number of days of warning before password expires */
293                         sp->sp_inact,           /* number of days after password expires until 
294                                                                    the account becomes unusable */
295                         sp->sp_expire,          /* days since 1/1/70 until account expires */
296                         "");
297         return 0;
298 }
299
300