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