pam_unix.c revision 1.2 1 /* $NetBSD: pam_unix.c,v 1.2 2004/12/12 08:17:56 christos Exp $ */
2
3 /*-
4 * Copyright 1998 Juniper Networks, Inc.
5 * All rights reserved.
6 * Copyright (c) 2002-2003 Networks Associates Technology, Inc.
7 * All rights reserved.
8 *
9 * Portions of this software was developed for the FreeBSD Project by
10 * ThinkSec AS and NAI Labs, the Security Research Division of Network
11 * Associates, Inc. under DARPA/SPAWAR contract N66001-01-C-8035
12 * ("CBOSS"), as part of the DARPA CHATS research program.
13 *
14 * Redistribution and use in source and binary forms, with or without
15 * modification, are permitted provided that the following conditions
16 * are met:
17 * 1. Redistributions of source code must retain the above copyright
18 * notice, this list of conditions and the following disclaimer.
19 * 2. Redistributions in binary form must reproduce the above copyright
20 * notice, this list of conditions and the following disclaimer in the
21 * documentation and/or other materials provided with the distribution.
22 * 3. The name of the author may not be used to endorse or promote
23 * products derived from this software without specific prior written
24 * permission.
25 *
26 * THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND CONTRIBUTORS ``AS IS'' AND
27 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
28 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
29 * ARE DISCLAIMED. IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE
30 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
31 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
32 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
33 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
34 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
35 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
36 * SUCH DAMAGE.
37 */
38
39 #include <sys/cdefs.h>
40 #ifdef __FreeBSD__
41 __FBSDID("$FreeBSD: src/lib/libpam/modules/pam_unix/pam_unix.c,v 1.49 2004/02/10 10:13:21 des Exp $");
42 #else
43 __RCSID("$NetBSD: pam_unix.c,v 1.2 2004/12/12 08:17:56 christos Exp $");
44 #endif
45
46
47 #include <sys/types.h>
48
49 #include <ctype.h>
50 #include <errno.h>
51 #include <fcntl.h>
52 #include <pwd.h>
53 #include <grp.h>
54 #include <limits.h>
55 #include <stdlib.h>
56 #include <string.h>
57 #include <stdio.h>
58 #include <login_cap.h>
59 #include <time.h>
60 #include <tzfile.h>
61 #include <unistd.h>
62
63 #include <util.h>
64
65 #ifdef YP
66 #include <rpc/rpc.h>
67 #include <rpcsvc/ypclnt.h>
68 #include <rpcsvc/yppasswd.h>
69 #endif
70
71 #define PAM_SM_AUTH
72 #define PAM_SM_ACCOUNT
73 #define PAM_SM_PASSWORD
74
75 #include <security/pam_appl.h>
76 #include <security/pam_modules.h>
77 #include <security/pam_mod_misc.h>
78
79 /*
80 * authentication management
81 */
82 PAM_EXTERN int
83 /*ARGSUSED*/
84 pam_sm_authenticate(pam_handle_t *pamh, int flags __unused,
85 int argc __unused, const char *argv[] __unused)
86 {
87 login_cap_t *lc;
88 struct passwd *pwd;
89 int retval;
90 const char *pass, *user, *realpw;
91
92 if (openpam_get_option(pamh, PAM_OPT_AUTH_AS_SELF)) {
93 pwd = getpwnam(getlogin());
94 } else {
95 retval = pam_get_user(pamh, &user, NULL);
96 if (retval != PAM_SUCCESS)
97 return (retval);
98 PAM_LOG("Got user: %s", user);
99 pwd = getpwnam(user);
100 }
101
102 if (pwd != NULL) {
103 PAM_LOG("Doing real authentication");
104 realpw = pwd->pw_passwd;
105 if (realpw[0] == '\0') {
106 if (!(flags & PAM_DISALLOW_NULL_AUTHTOK) &&
107 openpam_get_option(pamh, PAM_OPT_NULLOK))
108 return (PAM_SUCCESS);
109 realpw = "*";
110 }
111 lc = login_getpwclass(pwd);
112 } else {
113 PAM_LOG("Doing dummy authentication");
114 realpw = "*";
115 lc = login_getclass(NULL);
116 }
117 retval = pam_get_authtok(pamh, PAM_AUTHTOK, &pass, NULL);
118 login_close(lc);
119 if (retval != PAM_SUCCESS)
120 return (retval);
121 PAM_LOG("Got password");
122 if (strcmp(crypt(pass, realpw), realpw) == 0)
123 return (PAM_SUCCESS);
124
125 PAM_VERBOSE_ERROR("UNIX authentication refused");
126 return (PAM_AUTH_ERR);
127 }
128
129 PAM_EXTERN int
130 /*ARGSUSED*/
131 pam_sm_setcred(pam_handle_t *pamh __unused, int flags __unused,
132 int argc __unused, const char *argv[] __unused)
133 {
134
135 return (PAM_SUCCESS);
136 }
137
138 /*
139 * account management
140 */
141 PAM_EXTERN int
142 /*ARGSUSED*/
143 pam_sm_acct_mgmt(pam_handle_t *pamh, int flags __unused,
144 int argc __unused, const char *argv[] __unused)
145 {
146 struct passwd *pwd;
147 struct timeval now;
148 login_cap_t *lc;
149 time_t warntime;
150 int retval;
151 const char *user;
152
153 retval = pam_get_user(pamh, &user, NULL);
154 if (retval != PAM_SUCCESS)
155 return (retval);
156
157 if (user == NULL || (pwd = getpwnam(user)) == NULL)
158 return (PAM_SERVICE_ERR);
159
160 PAM_LOG("Got user: %s", user);
161
162 if (*pwd->pw_passwd == '\0' &&
163 (flags & PAM_DISALLOW_NULL_AUTHTOK) != 0)
164 return (PAM_NEW_AUTHTOK_REQD);
165
166 lc = login_getpwclass(pwd);
167 if (lc == NULL) {
168 PAM_LOG("Unable to get login class for user %s", user);
169 return (PAM_SERVICE_ERR);
170 }
171
172 PAM_LOG("Got login_cap");
173
174 if (pwd->pw_change || pwd->pw_expire)
175 (void) gettimeofday(&now, NULL);
176
177 warntime = (time_t)login_getcaptime(lc, "password-warn",
178 (quad_t)(_PASSWORD_WARNDAYS * SECSPERDAY),
179 (quad_t)(_PASSWORD_WARNDAYS * SECSPERDAY));
180
181 /*
182 * Check pw_expire before pw_change - no point in letting the
183 * user change the password on an expired account.
184 */
185
186 if (pwd->pw_expire) {
187 if (now.tv_sec >= pwd->pw_expire) {
188 login_close(lc);
189 return (PAM_ACCT_EXPIRED);
190 } else if (pwd->pw_expire - now.tv_sec < warntime &&
191 (flags & PAM_SILENT) == 0) {
192 pam_error(pamh, "Warning: your account expires on %s",
193 ctime(&pwd->pw_expire));
194 }
195 }
196
197 if (pwd->pw_change) {
198 /* XXX How to handle _PASSWORD_CHGNOW? --thorpej */
199 if (now.tv_sec >= pwd->pw_change) {
200 login_close(lc);
201 return (PAM_NEW_AUTHTOK_REQD);
202 } else if (pwd->pw_change - now.tv_sec < warntime &&
203 (flags & PAM_SILENT) == 0) {
204 pam_error(pamh, "Warning: your password expires on %s",
205 ctime(&pwd->pw_change));
206 }
207 }
208
209 login_close(lc);
210
211 return (PAM_SUCCESS);
212 }
213
214 static int pwd_gensalt(char *, int, struct passwd *, char);
215
216 #ifdef YP
217 /*
218 * yp_check_user:
219 *
220 * Helper function; check that a user exists in the NIS
221 * password map.
222 */
223 static int
224 yp_check_user(const char *domain, const char *user)
225 {
226 char *val;
227 int reason, vallen;
228
229 val = NULL;
230 reason = yp_match(domain, "passwd.byname", user, (int)strlen(user),
231 &val, &vallen);
232 if (reason != 0) {
233 if (val != NULL)
234 free(val);
235 return (0);
236 }
237 free(val);
238 return (1);
239 }
240
241 static int
242 /*ARGSUSED*/
243 yp_set_password(pam_handle_t *pamh, struct passwd *opwd,
244 struct passwd *pwd, const char *old_pass, const char *domain)
245 {
246 char *master;
247 int r, rpcport, status;
248 struct yppasswd yppwd;
249 CLIENT *client;
250 uid_t uid;
251 int retval = PAM_SERVICE_ERR;
252 struct timeval tv;
253
254 /*
255 * Find the master for the passwd map; it should be running
256 * rpc.yppasswdd.
257 */
258 if ((r = yp_master(domain, "passwd.byname", &master)) != 0) {
259 pam_error(pamh, "Can't find master NIS server. Reason: %s",
260 yperr_string(r));
261 return (PAM_SERVICE_ERR);
262 }
263
264 /*
265 * Ask the portmapper for the port of rpc.yppasswdd.
266 */
267 if ((rpcport = getrpcport(master, YPPASSWDPROG,
268 YPPASSWDPROC_UPDATE, IPPROTO_UDP)) == 0) {
269 pam_error(pamh,
270 "Master NIS server not runing yppasswd daemon.\n\t"
271 "Can't change NIS password.");
272 return (PAM_SERVICE_ERR);
273 }
274
275 /*
276 * Be sure the port is privileged.
277 */
278 if (rpcport >= IPPORT_RESERVED) {
279 pam_error(pamh, "yppasswd daemon is on an invalid port.");
280 return (PAM_SERVICE_ERR);
281 }
282
283 uid = getuid();
284 if (uid != 0 && uid != pwd->pw_uid) {
285 pam_error(pamh, "You may only change your own password: %s",
286 strerror(EACCES));
287 return (PAM_SERVICE_ERR);
288 }
289
290 /*
291 * Fill in the yppasswd structure for yppasswdd.
292 */
293 memset(&yppwd, 0, sizeof(yppwd));
294 if ((yppwd.newpw.pw_passwd = strdup(pwd->pw_passwd)) == NULL)
295 goto malloc_failure;
296 if ((yppwd.newpw.pw_name = strdup(pwd->pw_name)) == NULL)
297 goto malloc_failure;
298 yppwd.newpw.pw_uid = pwd->pw_uid;
299 yppwd.newpw.pw_gid = pwd->pw_gid;
300 if ((yppwd.newpw.pw_gecos = strdup(pwd->pw_gecos)) == NULL)
301 goto malloc_failure;
302 if ((yppwd.newpw.pw_dir = strdup(pwd->pw_dir)) == NULL)
303 goto malloc_failure;
304 if ((yppwd.newpw.pw_shell = strdup(pwd->pw_shell)) == NULL)
305 goto malloc_failure;
306
307 client = clnt_create(master, YPPASSWDPROG, YPPASSWDVERS, "udp");
308 if (client == NULL) {
309 pam_error(pamh, "Can't contact yppasswdd on %s: Reason: %s",
310 master, yperr_string(YPERR_YPBIND));
311 goto out;
312 }
313
314 client->cl_auth = authunix_create_default();
315 tv.tv_sec = 2;
316 tv.tv_usec = 0;
317 r = clnt_call(client, YPPASSWDPROC_UPDATE,
318 xdr_yppasswd, &yppwd, xdr_int, &status, tv);
319 if (r)
320 pam_error(pamh, "RPC to yppasswdd failed.");
321 else if (status)
322 pam_error(pamh, "Couldn't change NIS password.");
323 else {
324 pam_info(pamh, "The NIS password has been changed on %s, "
325 "the master NIS passwd server.", master);
326 retval = PAM_SUCCESS;
327 }
328
329 out:
330 if (yppwd.newpw.pw_passwd != NULL)
331 free(yppwd.newpw.pw_passwd);
332 if (yppwd.newpw.pw_name != NULL)
333 free(yppwd.newpw.pw_name);
334 if (yppwd.newpw.pw_gecos != NULL)
335 free(yppwd.newpw.pw_gecos);
336 if (yppwd.newpw.pw_dir != NULL)
337 free(yppwd.newpw.pw_dir);
338 if (yppwd.newpw.pw_shell != NULL)
339 free(yppwd.newpw.pw_shell);
340 return (retval);
341
342 malloc_failure:
343 pam_error(pamh, "memory allocation failure");
344 goto out;
345 }
346 #endif /* YP */
347
348 static int
349 local_set_password(pam_handle_t *pamh, struct passwd *opwd,
350 struct passwd *pwd)
351 {
352 char errbuf[200];
353 int tfd, pfd;
354
355 pw_init();
356 tfd = pw_lock(0);
357 if (tfd < 0) {
358 pam_error(pamh, "The password file is busy, waiting...");
359 tfd = pw_lock(10);
360 if (tfd < 0) {
361 pam_error(pamh, "The password file is still busy, "
362 "try again later.");
363 return (PAM_SERVICE_ERR);
364 }
365 }
366
367 pfd = open(_PATH_MASTERPASSWD, O_RDONLY, 0);
368 if (pfd < 0) {
369 pam_error(pamh, "%s: %s", _PATH_MASTERPASSWD, strerror(errno));
370 pw_abort();
371 return (PAM_SERVICE_ERR);
372 }
373
374 if (pw_copyx(pfd, tfd, pwd, opwd, errbuf, sizeof(errbuf)) == 0) {
375 pam_error(pamh, "Unable to update password entry: %s",
376 errbuf);
377 pw_abort();
378 return (PAM_SERVICE_ERR);
379 }
380
381 if (pw_mkdb(pwd->pw_name, opwd->pw_change == pwd->pw_change) < 0) {
382 pam_error(pamh, "Unable to rebuild local password database.");
383 pw_abort();
384 return (PAM_SERVICE_ERR);
385 }
386
387 return (PAM_SUCCESS);
388 }
389
390 /*
391 * password management
392 *
393 * standard Unix and NIS password changing
394 */
395 PAM_EXTERN int
396 /*ARGSUSED*/
397 pam_sm_chauthtok(pam_handle_t *pamh, int flags,
398 int argc __unused, const char *argv[] __unused)
399 {
400 struct passwd *pwd, old_pwd;
401 login_cap_t *lc;
402 const char *user, *passwd_db, *new_pass, *old_pass, *p;
403 int retval, tries, min_pw_len = 0, pw_expiry = 0;
404 char salt[_PASSWORD_LEN+1];
405 #ifdef YP
406 char *domain;
407 int r;
408 #endif
409
410 if (openpam_get_option(pamh, PAM_OPT_AUTH_AS_SELF))
411 pwd = getpwnam(getlogin());
412 else {
413 retval = pam_get_user(pamh, &user, NULL);
414 if (retval != PAM_SUCCESS)
415 return (retval);
416 pwd = getpwnam(user);
417 }
418
419 if (pwd == NULL)
420 return (PAM_AUTHTOK_RECOVERY_ERR);
421
422 old_pwd = *pwd;
423
424 PAM_LOG("Got user: %s", user);
425
426 /*
427 * Determine which password type we're going to change, and
428 * remember it.
429 *
430 * NOTE: domain does not need to be freed; its storage is
431 * allocated statically in libc.
432 */
433 passwd_db = openpam_get_option(pamh, "passwd_db");
434 if (passwd_db == NULL) {
435 #ifdef YP
436 /* Prefer YP, if configured. */
437 if (_yp_check(NULL)) {
438 /* If _yp_check() succeeded, then this must. */
439 if ((r = yp_get_default_domain(&domain)) != 0) {
440 pam_error(pamh,
441 "Unable to get NIS domain, reason: %s",
442 yperr_string(r));
443 return (PAM_SERVICE_ERR);
444 }
445 if (yp_check_user(domain, user))
446 passwd_db = "nis";
447 }
448 #endif
449 /* Otherwise we always use local files. */
450 if (passwd_db == NULL) {
451 /* XXX Any validation to do here? */
452 passwd_db = "files";
453 }
454
455 if (passwd_db == NULL) {
456 pam_error(pamh, "Unable to determine Unix password DB");
457 return (PAM_SERVICE_ERR);
458 } else if ((retval = openpam_set_option(pamh, "passwd_db",
459 passwd_db)) != PAM_SUCCESS) {
460 return (retval);
461 }
462 } else {
463 /* Check to see if the specified password DB is usable. */
464 #ifdef YP
465 if (strcmp(passwd_db, "nis") == 0) {
466 if (_yp_check(NULL) == 0) {
467 pam_error(pamh, "NIS not in use.");
468 return (PAM_SERVICE_ERR);
469 }
470 if ((r = yp_get_default_domain(&domain)) != 0) {
471 pam_error(pamh,
472 "Unable to get NIS domain, reason: %s",
473 yperr_string(r));
474 return (PAM_SERVICE_ERR);
475 }
476 if (yp_check_user(domain, user) == 0) {
477 pam_error(pamh,
478 "User %s does not exist in NIS.", user);
479 return (PAM_USER_UNKNOWN);
480 }
481 goto known_passwd_db;
482 }
483 #endif
484 if (strcmp(passwd_db, "files") == 0) {
485 /* XXX Any validation to do here? */
486 goto known_passwd_db;
487 }
488 pam_error(pamh, "Unknown Unix password DB: %s", passwd_db);
489 return (PAM_SERVICE_ERR);
490 }
491 known_passwd_db:
492
493 if (flags & PAM_PRELIM_CHECK) {
494 PAM_LOG("PRELIM round");
495
496 if (strcmp(passwd_db, "files") == 0) {
497 if (getuid() == 0) {
498 /* Root doesn't need the old password. */
499 return (pam_set_item(pamh, PAM_OLDAUTHTOK, ""));
500 }
501 }
502
503 if (pwd->pw_passwd[0] == '\0') {
504 /*
505 * No password case.
506 * XXX Are we giviing too much away by not prompting
507 * XXX for a password?
508 * XXX Check PAM_DISALLOW_NULL_AUTHTOK
509 */
510 return (pam_set_item(pamh, PAM_OLDAUTHTOK, ""));
511 } else {
512 retval = pam_get_authtok(pamh, PAM_OLDAUTHTOK,
513 &old_pass, NULL);
514 if (retval != PAM_SUCCESS)
515 return (retval);
516 if (strcmp(crypt(old_pass, pwd->pw_passwd),
517 pwd->pw_passwd) != 0)
518 return (PAM_PERM_DENIED);
519 return (PAM_SUCCESS);
520 }
521 }
522
523 if (flags & PAM_UPDATE_AUTHTOK) {
524 PAM_LOG("UPDATE round");
525
526 if ((lc = login_getclass(pwd->pw_class)) != NULL) {
527 min_pw_len = (int) login_getcapnum(lc,
528 "minpasswordlen", (quad_t)0, (quad_t)0);
529 pw_expiry = (int) login_getcapnum(lc,
530 "passwordtime", (quad_t)0, (quad_t)0);
531 login_close(lc);
532 }
533
534 retval = pam_get_authtok(pamh, PAM_OLDAUTHTOK, &old_pass, NULL);
535 if (retval != PAM_SUCCESS)
536 return (retval);
537
538 /* Get the new password. */
539 for (tries = 0;;) {
540 retval = pam_get_authtok(pamh, PAM_AUTHTOK, &new_pass,
541 NULL);
542 if (retval == PAM_TRY_AGAIN) {
543 pam_error(pamh,
544 "Mismatch; try again, EOF to quit.");
545 continue;
546 }
547 if (retval != PAM_SUCCESS) {
548 PAM_VERBOSE_ERROR("Unable to get new password");
549 return (retval);
550 }
551 /* Successfully got new password. */
552 if (new_pass[0] == '\0') {
553 pam_info(pamh, "Password unchanged.");
554 return (PAM_SUCCESS);
555 }
556 if (min_pw_len > 0 && strlen(new_pass) < min_pw_len) {
557 pam_error(pamh, "Password is too short.");
558 continue;
559 }
560 if (strlen(new_pass) <= 5 && ++tries < 2) {
561 pam_error(pamh,
562 "Please enter a longer password.");
563 continue;
564 }
565 for (p = new_pass; *p && islower((unsigned char)*p); ++p);
566 if (!*p && ++tries < 2) {
567 pam_error(pamh,
568 "Please don't use an all-lower case "
569 "password.\nUnusual capitalization, "
570 "control characters or digits are "
571 "suggested.");
572 continue;
573 }
574 /* Password is OK. */
575 break;
576 }
577
578 if (pwd_gensalt(salt, _PASSWORD_LEN, pwd,
579 #ifdef YP
580 strcmp(passwd_db, "nis") == 0 ? 'y' :
581 #endif
582 'l') == 0) {
583 pam_error(pamh, "Couldn't generate salt.");
584 return (PAM_SERVICE_ERR);
585 }
586
587 pwd->pw_passwd = crypt(new_pass, salt);
588 pwd->pw_change = pw_expiry ? pw_expiry + time(NULL) : 0;
589
590 retval = PAM_SERVICE_ERR;
591 if (strcmp(passwd_db, "files") == 0)
592 retval = local_set_password(pamh, &old_pwd, pwd);
593 #ifdef YP
594 if (strcmp(passwd_db, "nis") == 0)
595 retval = yp_set_password(pamh, &old_pwd, pwd, old_pass,
596 domain);
597 #endif
598 return (retval);
599 }
600
601 PAM_LOG("Illegal flags argument");
602 return (PAM_ABORT);
603 }
604
605 PAM_MODULE_ENTRY("pam_unix");
606
607 /*
608 * Copyright 1997 Niels Provos <provos (at) physnet.uni-hamburg.de>
609 * All rights reserved.
610 *
611 * Redistribution and use in source and binary forms, with or without
612 * modification, are permitted provided that the following conditions
613 * are met:
614 * 1. Redistributions of source code must retain the above copyright
615 * notice, this list of conditions and the following disclaimer.
616 * 2. Redistributions in binary form must reproduce the above copyright
617 * notice, this list of conditions and the following disclaimer in the
618 * documentation and/or other materials provided with the distribution.
619 * 3. All advertising materials mentioning features or use of this software
620 * must display the following acknowledgement:
621 * This product includes software developed by Niels Provos.
622 * 4. The name of the author may not be used to endorse or promote products
623 * derived from this software without specific prior written permission.
624 *
625 * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
626 * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
627 * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
628 * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,
629 * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
630 * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
631 * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
632 * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
633 * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF
634 * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
635 */
636
637 static const unsigned char itoa64[] = /* 0 ... 63 => ascii - 64 */
638 "./0123456789ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyz";
639
640 static void
641 to64(char *s, uint32_t v, int n)
642 {
643
644
645 while (--n >= 0) {
646 *s++ = itoa64[v & 0x3f];
647 v >>= 6;
648 }
649 }
650
651 static int
652 pwd_gensalt(char *salt, int max, struct passwd *pwd, char type)
653 {
654 char option[LINE_MAX], *next, *now, grpkey[LINE_MAX];
655 const char *cipher;
656 int rounds;
657 struct group *grp;
658
659 *salt = '\0';
660
661 switch (type) {
662 case 'y':
663 cipher = "ypcipher";
664 break;
665 case 'l':
666 default:
667 cipher = "localcipher";
668 break;
669 }
670
671 pw_getconf(option, sizeof(option), pwd->pw_name, cipher);
672
673 /* Try to find an entry for the group */
674 if (*option == 0) {
675 if ((grp = getgrgid(pwd->pw_gid)) != NULL) {
676 snprintf(grpkey, sizeof(grpkey), ":%s", grp->gr_name);
677 pw_getconf(option, sizeof(option), grpkey, cipher);
678 }
679 if (*option == 0)
680 pw_getconf(option, sizeof(option), "default", cipher);
681 }
682
683 next = option;
684 now = strsep(&next, ",");
685 if (strcmp(now, "old") == 0) {
686 if (max < 3)
687 return (0);
688 to64(&salt[0], arc4random(), 2);
689 salt[2] = '\0';
690 } else if (strcmp(now, "newsalt") == 0) {
691 rounds = atol(next);
692 if (max < 10)
693 return (0);
694 /* Check rounds, 24 bit is max */
695 if (rounds < 7250)
696 rounds = 7250;
697 else if (rounds > 0xffffff)
698 rounds = 0xffffff;
699 salt[0] = _PASSWORD_EFMT1;
700 to64(&salt[1], (u_int32_t)rounds, 4);
701 to64(&salt[5], arc4random(), 4);
702 salt[9] = '\0';
703 } else if (strcmp(now, "md5") == 0) {
704 if (max < 13) /* $1$8salt$\0 */
705 return (0);
706 salt[0] = _PASSWORD_NONDES;
707 salt[1] = '1';
708 salt[2] = '$';
709 to64(&salt[3], arc4random(), 4);
710 to64(&salt[7], arc4random(), 4);
711 salt[11] = '$';
712 salt[12] = '\0';
713 } else if (strcmp(now, "blowfish") == 0) {
714 rounds = atoi(next);
715 if (rounds < 4)
716 rounds = 4;
717 strlcpy(salt, bcrypt_gensalt(rounds), (size_t)max);
718 } else {
719 strlcpy(salt, ":", (size_t)max);
720 #if 0
721 /* XXX pam_error()? */
722 warnx("Unknown option %s.", now);
723 #endif
724 }
725
726 return (1);
727 }
728