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