Home | History | Annotate | Line # | Download | only in login
login_pam.c revision 1.2
      1  1.2  christos /*     $NetBSD: login_pam.c,v 1.2 2005/02/01 17:57:16 christos Exp $       */
      2  1.1      manu 
      3  1.1      manu /*-
      4  1.1      manu  * Copyright (c) 1980, 1987, 1988, 1991, 1993, 1994
      5  1.1      manu  *	The Regents of the University of California.  All rights reserved.
      6  1.1      manu  *
      7  1.1      manu  * Redistribution and use in source and binary forms, with or without
      8  1.1      manu  * modification, are permitted provided that the following conditions
      9  1.1      manu  * are met:
     10  1.1      manu  * 1. Redistributions of source code must retain the above copyright
     11  1.1      manu  *    notice, this list of conditions and the following disclaimer.
     12  1.1      manu  * 2. Redistributions in binary form must reproduce the above copyright
     13  1.1      manu  *    notice, this list of conditions and the following disclaimer in the
     14  1.1      manu  *    documentation and/or other materials provided with the distribution.
     15  1.1      manu  * 3. Neither the name of the University nor the names of its contributors
     16  1.1      manu  *    may be used to endorse or promote products derived from this software
     17  1.1      manu  *    without specific prior written permission.
     18  1.1      manu  *
     19  1.1      manu  * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
     20  1.1      manu  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
     21  1.1      manu  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
     22  1.1      manu  * ARE DISCLAIMED.  IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
     23  1.1      manu  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
     24  1.1      manu  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
     25  1.1      manu  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
     26  1.1      manu  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
     27  1.1      manu  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
     28  1.1      manu  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
     29  1.1      manu  * SUCH DAMAGE.
     30  1.1      manu  */
     31  1.1      manu 
     32  1.1      manu #include <sys/cdefs.h>
     33  1.1      manu #ifndef lint
     34  1.1      manu __COPYRIGHT(
     35  1.1      manu "@(#) Copyright (c) 1980, 1987, 1988, 1991, 1993, 1994\n\
     36  1.1      manu 	The Regents of the University of California.  All rights reserved.\n");
     37  1.1      manu #endif /* not lint */
     38  1.1      manu 
     39  1.1      manu #ifndef lint
     40  1.1      manu #if 0
     41  1.1      manu static char sccsid[] = "@(#)login.c	8.4 (Berkeley) 4/2/94";
     42  1.1      manu #endif
     43  1.2  christos __RCSID("$NetBSD: login_pam.c,v 1.2 2005/02/01 17:57:16 christos Exp $");
     44  1.1      manu #endif /* not lint */
     45  1.1      manu 
     46  1.1      manu /*
     47  1.1      manu  * login [ name ]
     48  1.1      manu  * login -h hostname	(for telnetd, etc.)
     49  1.1      manu  * login -f name	(for pre-authenticated login: datakit, xterm, etc.)
     50  1.1      manu  */
     51  1.1      manu 
     52  1.1      manu #include <sys/param.h>
     53  1.1      manu #include <sys/stat.h>
     54  1.1      manu #include <sys/time.h>
     55  1.1      manu #include <sys/resource.h>
     56  1.1      manu #include <sys/file.h>
     57  1.1      manu #include <sys/wait.h>
     58  1.1      manu #include <sys/socket.h>
     59  1.1      manu 
     60  1.1      manu #include <err.h>
     61  1.1      manu #include <errno.h>
     62  1.1      manu #include <grp.h>
     63  1.1      manu #include <pwd.h>
     64  1.1      manu #include <setjmp.h>
     65  1.1      manu #include <signal.h>
     66  1.1      manu #include <stdio.h>
     67  1.1      manu #include <stdlib.h>
     68  1.1      manu #include <string.h>
     69  1.1      manu #include <syslog.h>
     70  1.1      manu #include <time.h>
     71  1.1      manu #include <ttyent.h>
     72  1.1      manu #include <tzfile.h>
     73  1.1      manu #include <unistd.h>
     74  1.1      manu #include <util.h>
     75  1.1      manu #include <login_cap.h>
     76  1.1      manu #include <vis.h>
     77  1.1      manu 
     78  1.1      manu #include <security/pam_appl.h>
     79  1.1      manu #include <security/openpam.h>
     80  1.1      manu 
     81  1.1      manu #include "pathnames.h"
     82  1.1      manu 
     83  1.1      manu void	 badlogin (char *);
     84  1.1      manu static void	 update_db (int);
     85  1.1      manu void	 getloginname (void);
     86  1.1      manu int	 main (int, char *[]);
     87  1.1      manu void	 motd (char *);
     88  1.1      manu int	 rootterm (char *);
     89  1.1      manu void	 sigint (int);
     90  1.1      manu void	 sleepexit (int);
     91  1.1      manu const	 char *stypeof (const char *);
     92  1.1      manu void	 timedout (int);
     93  1.1      manu void	 decode_ss (const char *);
     94  1.1      manu void	 usage (void);
     95  1.1      manu 
     96  1.1      manu static struct pam_conv pamc = { openpam_ttyconv, NULL };
     97  1.1      manu 
     98  1.1      manu #define	TTYGRPNAME	"tty"		/* name of group to own ttys */
     99  1.1      manu 
    100  1.1      manu #define DEFAULT_BACKOFF 3
    101  1.1      manu #define DEFAULT_RETRIES 10
    102  1.1      manu 
    103  1.1      manu /*
    104  1.1      manu  * This bounds the time given to login.  Not a define so it can
    105  1.1      manu  * be patched on machines where it's too small.
    106  1.1      manu  */
    107  1.1      manu u_int	timeout = 300;
    108  1.1      manu 
    109  1.1      manu struct	passwd *pwd;
    110  1.1      manu int	failures, have_ss;
    111  1.1      manu char	term[64], *envinit[1], *hostname, *username, *tty, *nested;
    112  1.1      manu struct timeval now;
    113  1.1      manu struct sockaddr_storage ss;
    114  1.1      manu 
    115  1.1      manu extern const char copyrightstr[];
    116  1.1      manu 
    117  1.1      manu int
    118  1.1      manu main(int argc, char *argv[])
    119  1.1      manu {
    120  1.1      manu 	extern char **environ;
    121  1.1      manu 	struct stat st;
    122  1.1      manu 	int ask, ch, cnt, fflag, hflag, pflag, sflag, quietlog, rootlogin;
    123  1.1      manu 	int auth_passed;
    124  1.1      manu 	int Fflag;
    125  1.1      manu 	uid_t uid, saved_uid;
    126  1.1      manu 	gid_t saved_gid, saved_gids[NGROUPS_MAX];
    127  1.1      manu 	int nsaved_gids;
    128  1.1      manu 	char *domain, *p, *ttyn, *pwprompt;
    129  1.1      manu 	char tbuf[MAXPATHLEN + 2], tname[sizeof(_PATH_TTY) + 10];
    130  1.1      manu 	char localhost[MAXHOSTNAMELEN + 1];
    131  1.1      manu 	int need_chpass, require_chpass;
    132  1.1      manu 	int login_retries = DEFAULT_RETRIES,
    133  1.1      manu 	    login_backoff = DEFAULT_BACKOFF;
    134  1.1      manu 	char *shell = NULL;
    135  1.1      manu 	login_cap_t *lc = NULL;
    136  1.1      manu 	pam_handle_t *pamh = NULL;
    137  1.1      manu 	int pam_err;
    138  1.1      manu 	void *oint;
    139  1.1      manu 	void *oabrt;
    140  1.1      manu 	const void *newuser;
    141  1.1      manu 	int pam_silent = PAM_SILENT;
    142  1.1      manu 	pid_t xpid, pid;
    143  1.1      manu 	int status;
    144  1.1      manu 	char *saved_term;
    145  1.1      manu 	char **pamenv;
    146  1.1      manu 
    147  1.1      manu 	tbuf[0] = '\0';
    148  1.1      manu 	pwprompt = NULL;
    149  1.1      manu 	nested = NULL;
    150  1.1      manu 	need_chpass = require_chpass = 0;
    151  1.1      manu 
    152  1.1      manu 	(void)signal(SIGALRM, timedout);
    153  1.1      manu 	(void)alarm(timeout);
    154  1.1      manu 	(void)signal(SIGQUIT, SIG_IGN);
    155  1.1      manu 	(void)signal(SIGINT, SIG_IGN);
    156  1.1      manu 	(void)setpriority(PRIO_PROCESS, 0, 0);
    157  1.1      manu 
    158  1.1      manu 	openlog("login", 0, LOG_AUTH);
    159  1.1      manu 
    160  1.1      manu 	/*
    161  1.1      manu 	 * -p is used by getty to tell login not to destroy the environment
    162  1.1      manu 	 * -f is used to skip a second login authentication
    163  1.1      manu 	 * -h is used by other servers to pass the name of the remote host to
    164  1.1      manu 	 *    login so that it may be placed in utmp/utmpx and wtmp/wtmpx
    165  1.1      manu 	 * -a in addition to -h, a server my supply -a to pass the actual
    166  1.1      manu 	 *    server address.
    167  1.1      manu 	 * -s is used to force use of S/Key or equivalent.
    168  1.1      manu 	 */
    169  1.1      manu 	domain = NULL;
    170  1.1      manu 	if (gethostname(localhost, sizeof(localhost)) < 0)
    171  1.1      manu 		syslog(LOG_ERR, "couldn't get local hostname: %m");
    172  1.1      manu 	else
    173  1.1      manu 		domain = strchr(localhost, '.');
    174  1.1      manu 	localhost[sizeof(localhost) - 1] = '\0';
    175  1.1      manu 
    176  1.1      manu 	Fflag = fflag = hflag = pflag = sflag = 0;
    177  1.1      manu 	have_ss = 0;
    178  1.1      manu 	uid = getuid();
    179  1.1      manu 	while ((ch = getopt(argc, argv, "a:Ffh:ps")) != -1)
    180  1.1      manu 		switch (ch) {
    181  1.1      manu 		case 'a':
    182  1.1      manu 			if (uid)
    183  1.1      manu 				errx(1, "-a option: %s", strerror(EPERM));
    184  1.1      manu 			decode_ss(optarg);
    185  1.1      manu 			break;
    186  1.1      manu 		case 'F':
    187  1.1      manu 			Fflag = 1;
    188  1.1      manu 			/* FALLTHROUGH */
    189  1.1      manu 		case 'f':
    190  1.1      manu 			fflag = 1;
    191  1.1      manu 			break;
    192  1.1      manu 		case 'h':
    193  1.1      manu 			if (uid)
    194  1.1      manu 				errx(1, "-h option: %s", strerror(EPERM));
    195  1.1      manu 			hflag = 1;
    196  1.1      manu 			if (domain && (p = strchr(optarg, '.')) != NULL &&
    197  1.1      manu 			    strcasecmp(p, domain) == 0)
    198  1.1      manu 				*p = '\0';
    199  1.1      manu 			hostname = optarg;
    200  1.1      manu 			break;
    201  1.1      manu 		case 'p':
    202  1.1      manu 			pflag = 1;
    203  1.1      manu 			break;
    204  1.1      manu 		case 's':
    205  1.1      manu 			sflag = 1;
    206  1.1      manu 			break;
    207  1.1      manu 		default:
    208  1.1      manu 		case '?':
    209  1.1      manu 			usage();
    210  1.1      manu 			break;
    211  1.1      manu 		}
    212  1.1      manu 	argc -= optind;
    213  1.1      manu 	argv += optind;
    214  1.1      manu 
    215  1.1      manu 	if (*argv) {
    216  1.1      manu 		username = *argv;
    217  1.1      manu 		ask = 0;
    218  1.1      manu 	} else
    219  1.1      manu 		ask = 1;
    220  1.1      manu 
    221  1.1      manu 	for (cnt = getdtablesize(); cnt > 2; cnt--)
    222  1.1      manu 		(void)close(cnt);
    223  1.1      manu 
    224  1.1      manu 	ttyn = ttyname(STDIN_FILENO);
    225  1.1      manu 	if (ttyn == NULL || *ttyn == '\0') {
    226  1.1      manu 		(void)snprintf(tname, sizeof(tname), "%s??", _PATH_TTY);
    227  1.1      manu 		ttyn = tname;
    228  1.1      manu 	}
    229  1.1      manu 	if ((tty = strrchr(ttyn, '/')) != NULL)
    230  1.1      manu 		++tty;
    231  1.1      manu 	else
    232  1.1      manu 		tty = ttyn;
    233  1.1      manu 
    234  1.1      manu 	if (issetugid()) {
    235  1.1      manu 		nested = strdup(user_from_uid(getuid(), 0));
    236  1.1      manu 		if (nested == NULL) {
    237  1.1      manu                 	syslog(LOG_ERR, "strdup: %m");
    238  1.1      manu                 	sleepexit(1);
    239  1.1      manu 		}
    240  1.1      manu 	}
    241  1.1      manu 
    242  1.1      manu 	/* Get "login-retries" and "login-backoff" from default class */
    243  1.1      manu 	if ((lc = login_getclass(NULL)) != NULL) {
    244  1.1      manu 		login_retries = (int)login_getcapnum(lc, "login-retries",
    245  1.1      manu 		    DEFAULT_RETRIES, DEFAULT_RETRIES);
    246  1.1      manu 		login_backoff = (int)login_getcapnum(lc, "login-backoff",
    247  1.1      manu 		    DEFAULT_BACKOFF, DEFAULT_BACKOFF);
    248  1.1      manu 		login_close(lc);
    249  1.1      manu 		lc = NULL;
    250  1.1      manu 	}
    251  1.1      manu 
    252  1.1      manu 
    253  1.1      manu 	for (cnt = 0;; ask = 1) {
    254  1.1      manu 		if (ask) {
    255  1.1      manu 			fflag = 0;
    256  1.1      manu 			getloginname();
    257  1.1      manu 		}
    258  1.1      manu 		rootlogin = 0;
    259  1.1      manu 		auth_passed = 0;
    260  1.1      manu 		if (strlen(username) > MAXLOGNAME)
    261  1.1      manu 			username[MAXLOGNAME] = '\0';
    262  1.1      manu 
    263  1.1      manu 		/*
    264  1.1      manu 		 * Note if trying multiple user names; log failures for
    265  1.1      manu 		 * previous user name, but don't bother logging one failure
    266  1.1      manu 		 * for nonexistent name (mistyped username).
    267  1.1      manu 		 */
    268  1.1      manu 		if (failures && strcmp(tbuf, username)) {
    269  1.1      manu 			if (failures > (pwd ? 0 : 1))
    270  1.1      manu 				badlogin(tbuf);
    271  1.1      manu 			failures = 0;
    272  1.1      manu 		}
    273  1.1      manu 
    274  1.1      manu #define PAM_END(msg) do { 						\
    275  1.1      manu 	syslog(LOG_ERR, "%s: %s", msg, pam_strerror(pamh, pam_err)); 	\
    276  1.1      manu 	warnx("%s: %s", msg, pam_strerror(pamh, pam_err));		\
    277  1.1      manu 	pam_end(pamh, pam_err);						\
    278  1.1      manu 	sleepexit(1); 							\
    279  1.1      manu } while (/*CONSTCOND*/0)
    280  1.1      manu 
    281  1.1      manu 		pam_err = pam_start("login", username, &pamc, &pamh);
    282  1.1      manu 		if (pam_err != PAM_SUCCESS) {
    283  1.1      manu 			if (pamh != NULL)
    284  1.1      manu 				PAM_END("pam_start");
    285  1.1      manu 			/* Things went really bad... */
    286  1.1      manu 			syslog(LOG_ERR, "pam_start failed: %s",
    287  1.1      manu 			    pam_strerror(pamh, pam_err));
    288  1.1      manu 			errx(1, "pam_start failed");
    289  1.1      manu 		}
    290  1.1      manu 
    291  1.1      manu #define PAM_SET_ITEM(item, var)	do {					\
    292  1.1      manu 	pam_err = pam_set_item(pamh, (item), (var));			\
    293  1.1      manu 	if (pam_err != PAM_SUCCESS)					\
    294  1.1      manu 		PAM_END("pam_set_item(" # item ")");			\
    295  1.1      manu } while (/*CONSTCOND*/0)
    296  1.1      manu 
    297  1.1      manu 		/*
    298  1.1      manu 		 * Fill hostname and tty
    299  1.1      manu 		 */
    300  1.1      manu 		PAM_SET_ITEM(PAM_RHOST, hostname);
    301  1.1      manu 		PAM_SET_ITEM(PAM_TTY, tty);
    302  1.2  christos 		if (have_ss)
    303  1.2  christos 			PAM_SET_ITEM(PAM_SOCKADDR, &ss);
    304  1.1      manu 
    305  1.1      manu 		pwd = getpwnam(username);
    306  1.1      manu 
    307  1.1      manu 		/*
    308  1.1      manu 		 * Establish the class now, before we might goto
    309  1.1      manu 		 * within the next block. pwd can be NULL since it
    310  1.1      manu 		 * falls back to the "default" class if it is.
    311  1.1      manu 		 */
    312  1.1      manu 		lc = login_getclass(pwd ? pwd->pw_class : NULL);
    313  1.1      manu 
    314  1.1      manu 		/*
    315  1.1      manu 		 * if we have a valid account name, and it doesn't have a
    316  1.1      manu 		 * password, or the -f option was specified and the caller
    317  1.1      manu 		 * is root or the caller isn't changing their uid, don't
    318  1.1      manu 		 * authenticate.
    319  1.1      manu 		 */
    320  1.1      manu 		if (pwd) {
    321  1.1      manu 			if (pwd->pw_uid == 0)
    322  1.1      manu 				rootlogin = 1;
    323  1.1      manu 
    324  1.1      manu 			if (fflag && (uid == 0 || uid == pwd->pw_uid)) {
    325  1.1      manu 				/* already authenticated */
    326  1.1      manu 				auth_passed = 1;
    327  1.1      manu 				goto skip_auth;
    328  1.1      manu 			}
    329  1.1      manu 		}
    330  1.1      manu 
    331  1.1      manu 		(void)setpriority(PRIO_PROCESS, 0, -4);
    332  1.1      manu 
    333  1.1      manu 		switch(pam_err = pam_authenticate(pamh, pam_silent)) {
    334  1.1      manu 		case PAM_SUCCESS:
    335  1.1      manu 			/*
    336  1.1      manu 			 * PAM can change the user, refresh
    337  1.1      manu 			 * username, pwd, and lc.
    338  1.1      manu 			 */
    339  1.1      manu 			pam_err = pam_get_item(pamh, PAM_USER, &newuser);
    340  1.1      manu 			if (pam_err != PAM_SUCCESS)
    341  1.1      manu 				PAM_END("pam_get_item(PAM_USER)");
    342  1.1      manu 
    343  1.1      manu 			username = (char *)newuser;
    344  1.1      manu 			pwd = getpwnam(username);
    345  1.1      manu 			lc = login_getpwclass(pwd);
    346  1.1      manu 			auth_passed = 1;
    347  1.1      manu 
    348  1.1      manu 			switch (pam_err = pam_acct_mgmt(pamh, pam_silent)) {
    349  1.1      manu 			case PAM_SUCCESS:
    350  1.1      manu 				break;
    351  1.1      manu 
    352  1.1      manu 			case PAM_NEW_AUTHTOK_REQD:
    353  1.1      manu 				pam_err = pam_chauthtok(pamh,
    354  1.1      manu 				    pam_silent|PAM_CHANGE_EXPIRED_AUTHTOK);
    355  1.1      manu 
    356  1.1      manu 				if (pam_err != PAM_SUCCESS)
    357  1.1      manu 					PAM_END("pam_chauthtok");
    358  1.1      manu 				break;
    359  1.1      manu 
    360  1.1      manu 			default:
    361  1.1      manu 				PAM_END("pam_acct_mgmt");
    362  1.1      manu 				break;
    363  1.1      manu 			}
    364  1.1      manu 			break;
    365  1.1      manu 
    366  1.1      manu 		case PAM_AUTH_ERR:
    367  1.1      manu 		case PAM_USER_UNKNOWN:
    368  1.1      manu 		case PAM_MAXTRIES:
    369  1.1      manu 			auth_passed = 0;
    370  1.1      manu 			break;
    371  1.1      manu 
    372  1.1      manu 		default:
    373  1.1      manu 			PAM_END("pam_authenticate");
    374  1.1      manu 			break;
    375  1.1      manu 		}
    376  1.1      manu 
    377  1.1      manu 		(void)setpriority(PRIO_PROCESS, 0, 0);
    378  1.1      manu 
    379  1.1      manu skip_auth:
    380  1.1      manu 		/*
    381  1.1      manu 		 * If the user exists and authentication passed,
    382  1.1      manu 		 * get out of the loop and login the user.
    383  1.1      manu 		 */
    384  1.1      manu 		if (pwd && auth_passed)
    385  1.1      manu 			break;
    386  1.1      manu 
    387  1.1      manu 		(void)printf("Login incorrect\n");
    388  1.1      manu 		failures++;
    389  1.1      manu 		cnt++;
    390  1.1      manu 		/* we allow 10 tries, but after 3 we start backing off */
    391  1.1      manu 		if (cnt > login_backoff) {
    392  1.1      manu 			if (cnt >= login_retries) {
    393  1.1      manu 				badlogin(username);
    394  1.1      manu 				pam_end(pamh, PAM_SUCCESS);
    395  1.1      manu 				sleepexit(1);
    396  1.1      manu 			}
    397  1.1      manu 			sleep((u_int)((cnt - 3) * 5));
    398  1.1      manu 		}
    399  1.1      manu 	}
    400  1.1      manu 
    401  1.1      manu 	/* committed to login -- turn off timeout */
    402  1.1      manu 	(void)alarm((u_int)0);
    403  1.1      manu 
    404  1.1      manu 	endpwent();
    405  1.1      manu 
    406  1.1      manu         quietlog = login_getcapbool(lc, "hushlogin", 0);
    407  1.1      manu 
    408  1.1      manu 	/*
    409  1.1      manu 	 * Temporarily give up special privileges so we can change
    410  1.1      manu 	 * into NFS-mounted homes that are exported for non-root
    411  1.1      manu 	 * access and have mode 7x0
    412  1.1      manu 	 */
    413  1.1      manu 	saved_uid = geteuid();
    414  1.1      manu 	saved_gid = getegid();
    415  1.1      manu 	nsaved_gids = getgroups(NGROUPS_MAX, saved_gids);
    416  1.1      manu 
    417  1.1      manu 	(void)setegid(pwd->pw_gid);
    418  1.1      manu 	initgroups(username, pwd->pw_gid);
    419  1.1      manu 	(void)seteuid(pwd->pw_uid);
    420  1.1      manu 
    421  1.1      manu 	if (chdir(pwd->pw_dir) != 0) {
    422  1.1      manu                 if (login_getcapbool(lc, "requirehome", 0)) {
    423  1.1      manu 			(void)printf("Home directory %s required\n",
    424  1.1      manu 			    pwd->pw_dir);
    425  1.1      manu 			pam_end(pamh, PAM_SUCCESS);
    426  1.1      manu                         exit(1);
    427  1.1      manu 		}
    428  1.1      manu 
    429  1.1      manu 		(void)printf("No home directory %s!\n", pwd->pw_dir);
    430  1.1      manu 		if (chdir("/")) {
    431  1.1      manu 			pam_end(pamh, PAM_SUCCESS);
    432  1.1      manu 			exit(0);
    433  1.1      manu 		}
    434  1.1      manu 		pwd->pw_dir = "/";
    435  1.1      manu 		(void)printf("Logging in with home = \"/\".\n");
    436  1.1      manu 	}
    437  1.1      manu 
    438  1.1      manu 	if (!quietlog) {
    439  1.1      manu 		quietlog = access(_PATH_HUSHLOGIN, F_OK) == 0;
    440  1.1      manu 		pam_silent = 0;
    441  1.1      manu 	}
    442  1.1      manu 
    443  1.1      manu 	/* regain special privileges */
    444  1.1      manu 	setegid(saved_gid);
    445  1.1      manu 	setgroups(nsaved_gids, saved_gids);
    446  1.1      manu 	seteuid(saved_uid);
    447  1.1      manu 
    448  1.1      manu 	/* Nothing else left to fail -- really log in. */
    449  1.1      manu         update_db(quietlog);
    450  1.1      manu 
    451  1.1      manu 	if (nested == NULL && setusercontext(lc, pwd, pwd->pw_uid,
    452  1.1      manu 	    LOGIN_SETLOGIN) != 0) {
    453  1.1      manu 		syslog(LOG_ERR, "setusercontext failed");
    454  1.1      manu 		pam_end(pamh, PAM_SUCCESS);
    455  1.1      manu 		exit(1);
    456  1.1      manu 	}
    457  1.1      manu 
    458  1.1      manu 	if (tty[sizeof("tty")-1] == 'd')
    459  1.1      manu 		syslog(LOG_INFO, "DIALUP %s, %s", tty, pwd->pw_name);
    460  1.1      manu 
    461  1.1      manu 	/* If fflag is on, assume caller/authenticator has logged root login. */
    462  1.1      manu 	if (rootlogin && fflag == 0) {
    463  1.1      manu 		if (hostname)
    464  1.1      manu 			syslog(LOG_NOTICE, "ROOT LOGIN (%s) ON %s FROM %s",
    465  1.1      manu 			    username, tty, hostname);
    466  1.1      manu 		else
    467  1.1      manu 			syslog(LOG_NOTICE, "ROOT LOGIN (%s) ON %s",
    468  1.1      manu 			    username, tty);
    469  1.1      manu 	}
    470  1.1      manu 
    471  1.1      manu 	/*
    472  1.1      manu 	 * Establish groups
    473  1.1      manu 	 */
    474  1.1      manu 	if (setusercontext(lc, pwd, pwd->pw_uid, LOGIN_SETGROUP) != 0) {
    475  1.1      manu 		syslog(LOG_ERR, "setusercontext failed");
    476  1.1      manu 		pam_end(pamh, PAM_SUCCESS);
    477  1.1      manu 		exit(1);
    478  1.1      manu 	}
    479  1.1      manu 
    480  1.1      manu 	pam_err = pam_setcred(pamh, pam_silent|PAM_ESTABLISH_CRED);
    481  1.1      manu 	if (pam_err != PAM_SUCCESS)
    482  1.1      manu 		PAM_END("pam_setcred");
    483  1.1      manu 
    484  1.1      manu 	pam_err = pam_open_session(pamh, pam_silent);
    485  1.1      manu 	if (pam_err != PAM_SUCCESS)
    486  1.1      manu 		PAM_END("pam_open_session");
    487  1.1      manu 
    488  1.1      manu 	/*
    489  1.1      manu 	 * Fork because we need to call pam_closesession as root.
    490  1.1      manu 	 * Make sure signals cannot kill the parent.
    491  1.1      manu 	 * This is copied from crontab(8), which has to
    492  1.1      manu          * cope with a similar situation.
    493  1.1      manu 	 */
    494  1.1      manu 	oint = signal(SIGINT, SIG_IGN);
    495  1.1      manu 	oabrt = signal(SIGABRT, SIG_IGN);
    496  1.1      manu 
    497  1.1      manu 	switch(pid = fork()) {
    498  1.1      manu 	case -1:
    499  1.1      manu 		pam_err = pam_close_session(pamh, 0);
    500  1.1      manu 		if (pam_err != PAM_SUCCESS) {
    501  1.1      manu 			syslog(LOG_ERR, "pam_close_session: %s",
    502  1.1      manu 			    pam_strerror(pamh, pam_err));
    503  1.1      manu 			warnx("pam_close_session: %s",
    504  1.1      manu 			    pam_strerror(pamh, pam_err));
    505  1.1      manu 		}
    506  1.1      manu 		syslog(LOG_ERR, "fork failed: %m");
    507  1.1      manu 		warn("fork failed");
    508  1.1      manu 		pam_end(pamh, pam_err);
    509  1.1      manu 		exit(1);
    510  1.1      manu 		break;
    511  1.1      manu 
    512  1.1      manu 	case 0: /* Child */
    513  1.1      manu 		break;
    514  1.1      manu 
    515  1.1      manu 	default:
    516  1.1      manu 		/*
    517  1.1      manu 		 * Parent: wait for the child to terminate
    518  1.1      manu 		 * and call pam_close_session.
    519  1.1      manu 		 */
    520  1.1      manu 		if ((xpid = wait(&status)) != pid) {
    521  1.1      manu 			pam_err = pam_close_session(pamh, 0);
    522  1.1      manu 			if (pam_err != PAM_SUCCESS) {
    523  1.1      manu 				syslog(LOG_ERR,
    524  1.1      manu 				    "pam_close_session: %s",
    525  1.1      manu 				    pam_strerror(pamh, pam_err));
    526  1.1      manu 				warnx("pam_close_session: %s",
    527  1.1      manu 				    pam_strerror(pamh, pam_err));
    528  1.1      manu 			}
    529  1.1      manu 			pam_end(pamh, pam_err);
    530  1.1      manu 			warnx("wrong PID: %d != %d", pid, xpid);
    531  1.1      manu 			exit(1);
    532  1.1      manu 		}
    533  1.1      manu 
    534  1.1      manu 		(void)signal(SIGINT, oint);
    535  1.1      manu 		(void)signal(SIGABRT, oabrt);
    536  1.1      manu 		if ((pam_err = pam_close_session(pamh, 0)) != PAM_SUCCESS) {
    537  1.1      manu 			syslog(LOG_ERR, "pam_close_session: %s",
    538  1.1      manu 			    pam_strerror(pamh, pam_err));
    539  1.1      manu 			warnx("pam_close_session: %s",
    540  1.1      manu 			    pam_strerror(pamh, pam_err));
    541  1.1      manu 		}
    542  1.1      manu 		pam_end(pamh, PAM_SUCCESS);
    543  1.1      manu 		exit(0);
    544  1.1      manu 		break;
    545  1.1      manu 	}
    546  1.1      manu 
    547  1.1      manu 	/*
    548  1.1      manu 	 * The child: starting here, we don't have to care about
    549  1.1      manu 	 * handling PAM issues if we exit, the parent will do the
    550  1.1      manu 	 * job when we exit.
    551  1.1      manu          *
    552  1.1      manu 	 * Destroy environment unless user has requested its preservation.
    553  1.1      manu 	 * Try to preserve TERM anyway.
    554  1.1      manu 	 */
    555  1.1      manu 	saved_term = getenv("TERM");
    556  1.1      manu 	if (!pflag) {
    557  1.1      manu 		environ = envinit;
    558  1.1      manu 		if (saved_term)
    559  1.1      manu 			setenv("TERM", saved_term, 0);
    560  1.1      manu 	}
    561  1.1      manu 
    562  1.1      manu 	if (*pwd->pw_shell == '\0')
    563  1.1      manu 		pwd->pw_shell = _PATH_BSHELL;
    564  1.1      manu 
    565  1.1      manu 	shell = login_getcapstr(lc, "shell", pwd->pw_shell, pwd->pw_shell);
    566  1.1      manu 	if (*shell == '\0')
    567  1.1      manu 		shell = pwd->pw_shell;
    568  1.1      manu 
    569  1.1      manu 	if ((pwd->pw_shell = strdup(shell)) == NULL) {
    570  1.1      manu 		syslog(LOG_ERR, "Cannot alloc mem");
    571  1.1      manu 		exit(1);
    572  1.1      manu 	}
    573  1.1      manu 
    574  1.1      manu 	(void)setenv("HOME", pwd->pw_dir, 1);
    575  1.1      manu 	(void)setenv("SHELL", pwd->pw_shell, 1);
    576  1.1      manu 	if (term[0] == '\0') {
    577  1.1      manu 		char *tt = (char *)stypeof(tty);
    578  1.1      manu 
    579  1.1      manu 		if (tt == NULL)
    580  1.1      manu 			tt = login_getcapstr(lc, "term", NULL, NULL);
    581  1.1      manu 
    582  1.1      manu 		/* unknown term -> "su" */
    583  1.1      manu 		(void)strlcpy(term, tt != NULL ? tt : "su", sizeof(term));
    584  1.1      manu 	}
    585  1.1      manu 	(void)setenv("TERM", term, 0);
    586  1.1      manu 	(void)setenv("LOGNAME", pwd->pw_name, 1);
    587  1.1      manu 	(void)setenv("USER", pwd->pw_name, 1);
    588  1.1      manu 
    589  1.1      manu 	/*
    590  1.1      manu 	 * Add PAM environement
    591  1.1      manu 	 */
    592  1.1      manu 	if ((pamenv = pam_getenvlist(pamh)) != NULL) {
    593  1.1      manu 		char **envitem;
    594  1.1      manu 
    595  1.1      manu 		for (envitem = pamenv; *envitem; envitem++) {
    596  1.1      manu 			putenv(*envitem);
    597  1.1      manu 			free(*envitem);
    598  1.1      manu 		}
    599  1.1      manu 
    600  1.1      manu 		free(pamenv);
    601  1.1      manu 	}
    602  1.1      manu 
    603  1.1      manu 	/* This drops root privs */
    604  1.1      manu 	if (setusercontext(lc, pwd, pwd->pw_uid,
    605  1.1      manu 	    (LOGIN_SETALL & ~LOGIN_SETLOGIN)) != 0) {
    606  1.1      manu 		syslog(LOG_ERR, "setusercontext failed");
    607  1.1      manu 		exit(1);
    608  1.1      manu 	}
    609  1.1      manu 
    610  1.1      manu 	if (!quietlog) {
    611  1.1      manu 		char *fname;
    612  1.1      manu 
    613  1.1      manu 		fname = login_getcapstr(lc, "copyright", NULL, NULL);
    614  1.1      manu 		if (fname != NULL && access(fname, F_OK) == 0)
    615  1.1      manu 			motd(fname);
    616  1.1      manu 		else
    617  1.1      manu 			(void)printf("%s", copyrightstr);
    618  1.1      manu 
    619  1.1      manu                 fname = login_getcapstr(lc, "welcome", NULL, NULL);
    620  1.1      manu                 if (fname == NULL || access(fname, F_OK) != 0)
    621  1.1      manu                         fname = _PATH_MOTDFILE;
    622  1.1      manu                 motd(fname);
    623  1.1      manu 
    624  1.1      manu 		(void)snprintf(tbuf,
    625  1.1      manu 		    sizeof(tbuf), "%s/%s", _PATH_MAILDIR, pwd->pw_name);
    626  1.1      manu 		if (stat(tbuf, &st) == 0 && st.st_size != 0)
    627  1.1      manu 			(void)printf("You have %smail.\n",
    628  1.1      manu 			    (st.st_mtime > st.st_atime) ? "new " : "");
    629  1.1      manu 	}
    630  1.1      manu 
    631  1.1      manu 	login_close(lc);
    632  1.1      manu 
    633  1.1      manu 	(void)signal(SIGALRM, SIG_DFL);
    634  1.1      manu 	(void)signal(SIGQUIT, SIG_DFL);
    635  1.1      manu 	(void)signal(SIGINT, SIG_DFL);
    636  1.1      manu 	(void)signal(SIGTSTP, SIG_IGN);
    637  1.1      manu 
    638  1.1      manu 	tbuf[0] = '-';
    639  1.1      manu 	(void)strlcpy(tbuf + 1, (p = strrchr(pwd->pw_shell, '/')) ?
    640  1.1      manu 	    p + 1 : pwd->pw_shell, sizeof(tbuf) - 1);
    641  1.1      manu 
    642  1.1      manu 	execlp(pwd->pw_shell, tbuf, 0);
    643  1.1      manu 	err(1, "%s", pwd->pw_shell);
    644  1.1      manu }
    645  1.1      manu 
    646  1.1      manu #define	NBUFSIZ		(MAXLOGNAME + 1)
    647  1.1      manu 
    648  1.1      manu 
    649  1.1      manu void
    650  1.1      manu getloginname(void)
    651  1.1      manu {
    652  1.1      manu 	int ch;
    653  1.1      manu 	char *p;
    654  1.1      manu 	static char nbuf[NBUFSIZ];
    655  1.1      manu 
    656  1.1      manu 	for (;;) {
    657  1.1      manu 		(void)printf("login: ");
    658  1.1      manu 		for (p = nbuf; (ch = getchar()) != '\n'; ) {
    659  1.1      manu 			if (ch == EOF) {
    660  1.1      manu 				badlogin(username);
    661  1.1      manu 				exit(0);
    662  1.1      manu 			}
    663  1.1      manu 			if (p < nbuf + (NBUFSIZ - 1))
    664  1.1      manu 				*p++ = ch;
    665  1.1      manu 		}
    666  1.1      manu 		if (p > nbuf) {
    667  1.1      manu 			if (nbuf[0] == '-')
    668  1.1      manu 				(void)fprintf(stderr,
    669  1.1      manu 				    "login names may not start with '-'.\n");
    670  1.1      manu 			else {
    671  1.1      manu 				*p = '\0';
    672  1.1      manu 				username = nbuf;
    673  1.1      manu 				break;
    674  1.1      manu 			}
    675  1.1      manu 		}
    676  1.1      manu 	}
    677  1.1      manu }
    678  1.1      manu 
    679  1.1      manu int
    680  1.1      manu rootterm(char *ttyn)
    681  1.1      manu {
    682  1.1      manu 	struct ttyent *t;
    683  1.1      manu 
    684  1.1      manu 	return ((t = getttynam(ttyn)) && t->ty_status & TTY_SECURE);
    685  1.1      manu }
    686  1.1      manu 
    687  1.1      manu jmp_buf motdinterrupt;
    688  1.1      manu 
    689  1.1      manu void
    690  1.1      manu motd(char *fname)
    691  1.1      manu {
    692  1.1      manu 	int fd, nchars;
    693  1.1      manu 	sig_t oldint;
    694  1.1      manu 	char tbuf[8192];
    695  1.1      manu 
    696  1.1      manu 	if ((fd = open(fname ? fname : _PATH_MOTDFILE, O_RDONLY, 0)) < 0)
    697  1.1      manu 		return;
    698  1.1      manu 	oldint = signal(SIGINT, sigint);
    699  1.1      manu 	if (setjmp(motdinterrupt) == 0)
    700  1.1      manu 		while ((nchars = read(fd, tbuf, sizeof(tbuf))) > 0)
    701  1.1      manu 			(void)write(fileno(stdout), tbuf, nchars);
    702  1.1      manu 	(void)signal(SIGINT, oldint);
    703  1.1      manu 	(void)close(fd);
    704  1.1      manu }
    705  1.1      manu 
    706  1.1      manu /* ARGSUSED */
    707  1.1      manu void
    708  1.1      manu sigint(int signo)
    709  1.1      manu {
    710  1.1      manu 
    711  1.1      manu 	longjmp(motdinterrupt, 1);
    712  1.1      manu }
    713  1.1      manu 
    714  1.1      manu /* ARGSUSED */
    715  1.1      manu void
    716  1.1      manu timedout(int signo)
    717  1.1      manu {
    718  1.1      manu 
    719  1.1      manu 	(void)fprintf(stderr, "Login timed out after %d seconds\n", timeout);
    720  1.1      manu 	exit(0);
    721  1.1      manu }
    722  1.1      manu 
    723  1.1      manu static void
    724  1.1      manu update_db(int quietlog)
    725  1.1      manu {
    726  1.1      manu 	if (nested != NULL) {
    727  1.1      manu 		if (hostname != NULL)
    728  1.1      manu 			syslog(LOG_NOTICE, "%s to %s on tty %s from %s",
    729  1.1      manu 			    nested, pwd->pw_name, tty, hostname);
    730  1.1      manu 		else
    731  1.1      manu 			syslog(LOG_NOTICE, "%s to %s on tty %s", nested,
    732  1.1      manu 			    pwd->pw_name, tty);
    733  1.1      manu 
    734  1.1      manu 		return;
    735  1.1      manu 	}
    736  1.1      manu 	if (hostname != NULL && have_ss == 0) {
    737  1.1      manu 		socklen_t len = sizeof(ss);
    738  1.1      manu 		(void)getpeername(STDIN_FILENO, (struct sockaddr *)&ss, &len);
    739  1.1      manu 	}
    740  1.1      manu 	(void)gettimeofday(&now, NULL);
    741  1.1      manu }
    742  1.1      manu 
    743  1.1      manu void
    744  1.1      manu badlogin(char *name)
    745  1.1      manu {
    746  1.1      manu 
    747  1.1      manu 	if (failures == 0)
    748  1.1      manu 		return;
    749  1.1      manu 	if (hostname) {
    750  1.1      manu 		syslog(LOG_NOTICE, "%d LOGIN FAILURE%s FROM %s",
    751  1.1      manu 		    failures, failures > 1 ? "S" : "", hostname);
    752  1.1      manu 		syslog(LOG_AUTHPRIV|LOG_NOTICE,
    753  1.1      manu 		    "%d LOGIN FAILURE%s FROM %s, %s",
    754  1.1      manu 		    failures, failures > 1 ? "S" : "", hostname, name);
    755  1.1      manu 	} else {
    756  1.1      manu 		syslog(LOG_NOTICE, "%d LOGIN FAILURE%s ON %s",
    757  1.1      manu 		    failures, failures > 1 ? "S" : "", tty);
    758  1.1      manu 		syslog(LOG_AUTHPRIV|LOG_NOTICE,
    759  1.1      manu 		    "%d LOGIN FAILURE%s ON %s, %s",
    760  1.1      manu 		    failures, failures > 1 ? "S" : "", tty, name);
    761  1.1      manu 	}
    762  1.1      manu }
    763  1.1      manu 
    764  1.1      manu const char *
    765  1.1      manu stypeof(const char *ttyid)
    766  1.1      manu {
    767  1.1      manu 	struct ttyent *t;
    768  1.1      manu 
    769  1.1      manu 	return (ttyid && (t = getttynam(ttyid)) ? t->ty_type : NULL);
    770  1.1      manu }
    771  1.1      manu 
    772  1.1      manu void
    773  1.1      manu sleepexit(int eval)
    774  1.1      manu {
    775  1.1      manu 
    776  1.1      manu 	(void)sleep(5);
    777  1.1      manu 	exit(eval);
    778  1.1      manu }
    779  1.1      manu 
    780  1.1      manu void
    781  1.1      manu decode_ss(const char *arg)
    782  1.1      manu {
    783  1.1      manu 	struct sockaddr_storage *ssp;
    784  1.1      manu 	size_t len = strlen(arg);
    785  1.1      manu 
    786  1.1      manu 	if (len > sizeof(*ssp) * 4 + 1 || len < sizeof(*ssp))
    787  1.1      manu 		errx(1, "Bad argument");
    788  1.1      manu 
    789  1.1      manu 	if ((ssp = malloc(len)) == NULL)
    790  1.1      manu 		err(1, NULL);
    791  1.1      manu 
    792  1.1      manu 	if (strunvis((char *)ssp, arg) != sizeof(*ssp))
    793  1.1      manu 		errx(1, "Decoding error");
    794  1.1      manu 
    795  1.1      manu 	(void)memcpy(&ss, ssp, sizeof(ss));
    796  1.1      manu 	have_ss = 1;
    797  1.1      manu }
    798  1.1      manu 
    799  1.1      manu void
    800  1.1      manu usage(void)
    801  1.1      manu {
    802  1.1      manu 	(void)fprintf(stderr,
    803  1.1      manu 	    "Usage: %s [-Ffps] [-a address] [-h hostname] [username]\n",
    804  1.1      manu 	    getprogname());
    805  1.1      manu 	exit(1);
    806  1.1      manu }
    807