BSD 4_4_Lite1 release
[unix-history] / usr / src / usr.bin / login / login.c
index 40268a2..ef75733 100644 (file)
@@ -1,23 +1,48 @@
 /*-
 /*-
- * Copyright (c) 1980, 1987, 1988, 1991 The Regents of the University
- * of California.  All rights reserved.
+ * Copyright (c) 1980, 1987, 1988, 1991, 1993, 1994
+ *     The Regents of the University of California.  All rights reserved.
  *
  *
- * %sccs.include.redist.c%
+ * Redistribution and use in source and binary forms, with or without
+ * modification, are permitted provided that the following conditions
+ * are met:
+ * 1. Redistributions of source code must retain the above copyright
+ *    notice, this list of conditions and the following disclaimer.
+ * 2. Redistributions in binary form must reproduce the above copyright
+ *    notice, this list of conditions and the following disclaimer in the
+ *    documentation and/or other materials provided with the distribution.
+ * 3. All advertising materials mentioning features or use of this software
+ *    must display the following acknowledgement:
+ *     This product includes software developed by the University of
+ *     California, Berkeley and its contributors.
+ * 4. Neither the name of the University nor the names of its contributors
+ *    may be used to endorse or promote products derived from this software
+ *    without specific prior written permission.
+ *
+ * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
+ * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
+ * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
+ * ARE DISCLAIMED.  IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
+ * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
+ * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
+ * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
+ * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
+ * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
+ * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
+ * SUCH DAMAGE.
  */
 
 #ifndef lint
  */
 
 #ifndef lint
-char copyright[] =
-"@(#) Copyright (c) 1980, 1987, 1988, 1991 The Regents of the University of California.\n\
- All rights reserved.\n";
+static char copyright[] =
+"@(#) Copyright (c) 1980, 1987, 1988, 1991, 1993, 1994\n\
      The Regents of the University of California.  All rights reserved.\n";
 #endif /* not lint */
 
 #ifndef lint
 #endif /* not lint */
 
 #ifndef lint
-static char sccsid[] = "@(#)login.c    5.79 (Berkeley) %G%";
+static char sccsid[] = "@(#)login.c    8.4 (Berkeley) 4/2/94";
 #endif /* not lint */
 
 /*
  * login [ name ]
 #endif /* not lint */
 
 /*
  * login [ name ]
- * login -r hostname   (for rlogind)
  * login -h hostname   (for telnetd, etc.)
  * login -f name       (for pre-authenticated login: datakit, xterm, etc.)
  */
  * login -h hostname   (for telnetd, etc.)
  * login -f name       (for pre-authenticated login: datakit, xterm, etc.)
  */
@@ -28,19 +53,21 @@ static char sccsid[] = "@(#)login.c 5.79 (Berkeley) %G%";
 #include <sys/resource.h>
 #include <sys/file.h>
 
 #include <sys/resource.h>
 #include <sys/file.h>
 
-#include <signal.h>
-#include <ttyent.h>
-#include <syslog.h>
-#include <setjmp.h>
-#include <tzfile.h>
-#include <utmp.h>
+#include <err.h>
 #include <errno.h>
 #include <grp.h>
 #include <pwd.h>
 #include <errno.h>
 #include <grp.h>
 #include <pwd.h>
-#include <unistd.h>
+#include <setjmp.h>
+#include <signal.h>
 #include <stdio.h>
 #include <stdlib.h>
 #include <string.h>
 #include <stdio.h>
 #include <stdlib.h>
 #include <string.h>
+#include <syslog.h>
+#include <ttyent.h>
+#include <tzfile.h>
+#include <unistd.h>
+#include <utmp.h>
+
 #include "pathnames.h"
 
 void    badlogin __P((char *));
 #include "pathnames.h"
 
 void    badlogin __P((char *));
@@ -57,13 +84,15 @@ void         timedout __P((int));
 int     klogin __P((struct passwd *, char *, char *, char *));
 #endif
 
 int     klogin __P((struct passwd *, char *, char *, char *));
 #endif
 
+extern void login __P((struct utmp *));
+
 #define        TTYGRPNAME      "tty"           /* name of group to own ttys */
 
 /*
  * This bounds the time given to login.  Not a define so it can
  * be patched on machines where it's too small.
  */
 #define        TTYGRPNAME      "tty"           /* name of group to own ttys */
 
 /*
  * This bounds the time given to login.  Not a define so it can
  * be patched on machines where it's too small.
  */
-int    timeout = 300;
+u_int  timeout = 300;
 
 #ifdef KERBEROS
 int    notickets = 1;
 
 #ifdef KERBEROS
 int    notickets = 1;
@@ -77,28 +106,23 @@ int        failures;
 char   term[64], *envinit[1], *hostname, *username, *tty;
 
 int
 char   term[64], *envinit[1], *hostname, *username, *tty;
 
 int
-char *months[] =
-       { "Jan", "Feb", "Mar", "Apr", "May", "Jun", "Jul", "Aug",
-         "Sep", "Oct", "Nov", "Dec" };
-
 main(argc, argv)
        int argc;
        char *argv[];
 {
        extern char **environ;
 main(argc, argv)
        int argc;
        char *argv[];
 {
        extern char **environ;
-       register int ch;
-       register char *p;
        struct group *gr;
        struct stat st;
        struct timeval tp;
        struct utmp utmp;
        struct group *gr;
        struct stat st;
        struct timeval tp;
        struct utmp utmp;
-       int ask, cnt, fflag, hflag, pflag, quietlog, rootlogin, rval, uid;
-       char *domain, *salt, *ttyn;
+       int ask, ch, cnt, fflag, hflag, pflag, quietlog, rootlogin, rval;
+       uid_t uid;
+       char *domain, *p, *salt, *ttyn;
        char tbuf[MAXPATHLEN + 2], tname[sizeof(_PATH_TTY) + 10];
        char localhost[MAXHOSTNAMELEN];
 
        (void)signal(SIGALRM, timedout);
        char tbuf[MAXPATHLEN + 2], tname[sizeof(_PATH_TTY) + 10];
        char localhost[MAXHOSTNAMELEN];
 
        (void)signal(SIGALRM, timedout);
-       (void)alarm((u_int)timeout);
+       (void)alarm(timeout);
        (void)signal(SIGQUIT, SIG_IGN);
        (void)signal(SIGINT, SIG_IGN);
        (void)setpriority(PRIO_PROCESS, 0, 0);
        (void)signal(SIGQUIT, SIG_IGN);
        (void)signal(SIGINT, SIG_IGN);
        (void)setpriority(PRIO_PROCESS, 0, 0);
@@ -107,7 +131,6 @@ main(argc, argv)
 
        /*
         * -p is used by getty to tell login not to destroy the environment
 
        /*
         * -p is used by getty to tell login not to destroy the environment
-        * -r is used by rlogind to cause the autologin protocol;
         * -f is used to skip a second login authentication
         * -h is used by other servers to pass the name of the remote
         *    host to login so that it may be placed in utmp and wtmp
         * -f is used to skip a second login authentication
         * -h is used by other servers to pass the name of the remote
         *    host to login so that it may be placed in utmp and wtmp
@@ -116,33 +139,20 @@ main(argc, argv)
        if (gethostname(localhost, sizeof(localhost)) < 0)
                syslog(LOG_ERR, "couldn't get local hostname: %m");
        else
        if (gethostname(localhost, sizeof(localhost)) < 0)
                syslog(LOG_ERR, "couldn't get local hostname: %m");
        else
-               domain = index(localhost, '.');
+               domain = strchr(localhost, '.');
 
 
-       fflag = hflag = pflag = rflag = 0;
+       fflag = hflag = pflag = 0;
        uid = getuid();
        uid = getuid();
-       while ((ch = getopt(argc, argv, "fh:pr:")) != EOF)
+       while ((ch = getopt(argc, argv, "fh:p")) != EOF)
                switch (ch) {
                case 'f':
                switch (ch) {
                case 'f':
-                       if (rflag) {
-                               fprintf(stderr,
-                                   "login: only one of -r and -f allowed.\n");
-                               exit(1);
-                       }
                        fflag = 1;
                        break;
                case 'h':
                        fflag = 1;
                        break;
                case 'h':
-                       if (uid) {
-                               (void)fprintf(stderr,
-                                   "login: -h option: %s\n", strerror(EPERM));
-                               exit(1);
-                       }
-                       if (rflag) {
-                               fprintf(stderr,
-                                   "login: only one of -r and -h allowed.\n");
-                               exit(1);
-                       }
+                       if (uid)
+                               errx(1, "-h option: %s", strerror(EPERM));
                        hflag = 1;
                        hflag = 1;
-                       if (domain && (p = index(optarg, '.')) &&
+                       if (domain && (p = strchr(optarg, '.')) &&
                            strcasecmp(p, domain) == 0)
                                *p = 0;
                        hostname = optarg;
                            strcasecmp(p, domain) == 0)
                                *p = 0;
                        hostname = optarg;
@@ -150,29 +160,6 @@ main(argc, argv)
                case 'p':
                        pflag = 1;
                        break;
                case 'p':
                        pflag = 1;
                        break;
-               case 'r':
-                       if (hflag || fflag) {
-                               fprintf(stderr,
-                                   "login: -f and -h not allowed with -r.\n");
-                               exit(1);
-                       }
-                       if (getuid()) {
-                               fprintf(stderr,
-                                   "login: -r for super-user only.\n");
-                               exit(1);
-                       }
-                       /* "-r hostname" must be last args */
-                       if (optind != argc) {
-                               fprintf(stderr, "Syntax error.\n");
-                               exit(1);
-                       }
-                       rflag = 1;
-                       passwd_req = (doremotelogin(optarg) == -1);
-                       if (domain && (p = index(optarg, '.')) &&
-                           !strcmp(p, domain))
-                               *p = '\0';
-                       hostname = optarg;
-                       break;
                case '?':
                default:
                        if (!uid)
                case '?':
                default:
                        if (!uid)
@@ -189,8 +176,6 @@ main(argc, argv)
                ask = 0;
        } else
                ask = 1;
                ask = 0;
        } else
                ask = 1;
-       if (rflag)
-               ask = 0;
 
        for (cnt = getdtablesize(); cnt > 2; cnt--)
                (void)close(cnt);
 
        for (cnt = getdtablesize(); cnt > 2; cnt--)
                (void)close(cnt);
@@ -200,7 +185,7 @@ main(argc, argv)
                (void)snprintf(tname, sizeof(tname), "%s??", _PATH_TTY);
                ttyn = tname;
        }
                (void)snprintf(tname, sizeof(tname), "%s??", _PATH_TTY);
                ttyn = tname;
        }
-       if (tty = rindex(ttyn, '/'))
+       if (tty = strrchr(ttyn, '/'))
                ++tty;
        else
                tty = ttyn;
                ++tty;
        else
                tty = ttyn;
@@ -212,7 +197,7 @@ main(argc, argv)
                }
                rootlogin = 0;
 #ifdef KERBEROS
                }
                rootlogin = 0;
 #ifdef KERBEROS
-               if ((instance = index(username, '.')) != NULL) {
+               if ((instance = strchr(username, '.')) != NULL) {
                        if (strncmp(instance, ".root", 5) == 0)
                                rootlogin = 1;
                        *instance++ = '\0';
                        if (strncmp(instance, ".root", 5) == 0)
                                rootlogin = 1;
                        *instance++ = '\0';
@@ -259,6 +244,8 @@ main(argc, argv)
                if (pwd) {
 #ifdef KERBEROS
                        rval = klogin(pwd, instance, localhost, p);
                if (pwd) {
 #ifdef KERBEROS
                        rval = klogin(pwd, instance, localhost, p);
+                       if (rval != 0 && rootlogin && pwd->pw_uid != 0)
+                               rootlogin = 0;
                        if (rval == 0)
                                authok = 1;
                        else if (rval == 1)
                        if (rval == 0)
                                authok = 1;
                        else if (rval == 1)
@@ -267,7 +254,7 @@ main(argc, argv)
                        rval = strcmp(crypt(p, salt), pwd->pw_passwd);
 #endif
                }
                        rval = strcmp(crypt(p, salt), pwd->pw_passwd);
 #endif
                }
-               bzero(p, strlen(p));
+               memset(p, 0, strlen(p));
 
                (void)setpriority(PRIO_PROCESS, 0, 0);
 
 
                (void)setpriority(PRIO_PROCESS, 0, 0);
 
@@ -324,29 +311,8 @@ main(argc, argv)
                pwd->pw_dir = "/";
                (void)printf("Logging in with home = \"/\".\n");
        }
                pwd->pw_dir = "/";
                (void)printf("Logging in with home = \"/\".\n");
        }
-#define        TWOWEEKS        (14*24*60*60)
-       if (pwd->pw_change || pwd->pw_expire)
-               (void)gettimeofday(&tp, (struct timezone *)NULL);
-       if (pwd->pw_change)
-               if (tp.tv_sec >= pwd->pw_change) {
-                       printf("Sorry -- your password has expired.\n");
-                       sleepexit(1);
-               }
-               else if (tp.tv_sec - pwd->pw_change < TWOWEEKS) {
-                       ttp = localtime(&pwd->pw_change);
-                       printf("Warning: your password expires on %s %d, 19%d\n",
-                           months[ttp->tm_mon], ttp->tm_mday, ttp->tm_year);
-               }
-       if (pwd->pw_expire)
-               if (tp.tv_sec >= pwd->pw_expire) {
-                       printf("Sorry -- your account has expired.\n");
-                       sleepexit(1);
-               }
-               else if (tp.tv_sec - pwd->pw_expire < TWOWEEKS) {
-                       ttp = localtime(&pwd->pw_expire);
-                       printf("Warning: your account expires on %s %d, 19%d\n",
-                           months[ttp->tm_mon], ttp->tm_mday, ttp->tm_year);
-               }
+
+       quietlog = access(_PATH_HUSHLOGIN, F_OK) == 0;
 
        if (pwd->pw_change || pwd->pw_expire)
                (void)gettimeofday(&tp, (struct timezone *)NULL);
 
        if (pwd->pw_change || pwd->pw_expire)
                (void)gettimeofday(&tp, (struct timezone *)NULL);
@@ -368,7 +334,7 @@ main(argc, argv)
                            ctime(&pwd->pw_expire));
 
        /* Nothing else left to fail -- really log in. */
                            ctime(&pwd->pw_expire));
 
        /* Nothing else left to fail -- really log in. */
-       bzero((void *)&utmp, sizeof(utmp));
+       memset((void *)&utmp, 0, sizeof(utmp));
        (void)time(&utmp.ut_time);
        (void)strncpy(utmp.ut_name, username, sizeof(utmp.ut_name));
        if (hostname)
        (void)time(&utmp.ut_time);
        (void)strncpy(utmp.ut_name, username, sizeof(utmp.ut_name));
        if (hostname)
@@ -421,7 +387,7 @@ main(argc, argv)
 
        if (!quietlog) {
                (void)printf("%s\n\t%s  %s\n\n",
 
        if (!quietlog) {
                (void)printf("%s\n\t%s  %s\n\n",
-                   "Copyright (c) 1980, 1983, 1986, 1988, 1990, 1991, 1993",
+           "Copyright (c) 1980, 1983, 1986, 1988, 1990, 1991, 1993, 1994",
                    "The Regents of the University of California. ",
                    "All rights reserved.");
                motd();
                    "The Regents of the University of California. ",
                    "All rights reserved.");
                motd();
@@ -438,7 +404,7 @@ main(argc, argv)
        (void)signal(SIGTSTP, SIG_IGN);
 
        tbuf[0] = '-';
        (void)signal(SIGTSTP, SIG_IGN);
 
        tbuf[0] = '-';
-       (void)strcpy(tbuf + 1, (p = rindex(pwd->pw_shell, '/')) ?
+       (void)strcpy(tbuf + 1, (p = strrchr(pwd->pw_shell, '/')) ?
            p + 1 : pwd->pw_shell);
 
        if (setlogin(pwd->pw_name) < 0)
            p + 1 : pwd->pw_shell);
 
        if (setlogin(pwd->pw_name) < 0)
@@ -451,8 +417,7 @@ main(argc, argv)
                (void) setuid(pwd->pw_uid);
 
        execlp(pwd->pw_shell, tbuf, 0);
                (void) setuid(pwd->pw_uid);
 
        execlp(pwd->pw_shell, tbuf, 0);
-       (void)fprintf(stderr, "%s: %s\n", pwd->pw_shell, strerror(errno));
-       exit(1);
+       err(1, "%s", pwd->pw_shell);
 }
 
 #ifdef KERBEROS
 }
 
 #ifdef KERBEROS
@@ -464,8 +429,8 @@ main(argc, argv)
 void
 getloginname()
 {
 void
 getloginname()
 {
-       register int ch;
-       register char *p;
+       int ch;
+       char *p;
        static char nbuf[NBUFSIZ];
 
        for (;;) {
        static char nbuf[NBUFSIZ];
 
        for (;;) {
@@ -496,7 +461,7 @@ rootterm(ttyn)
 {
        struct ttyent *t;
 
 {
        struct ttyent *t;
 
-       return((t = getttynam(ttyn)) && t->ty_status & TTY_SECURE);
+       return ((t = getttynam(ttyn)) && t->ty_status & TTY_SECURE);
 }
 
 jmp_buf motdinterrupt;
 }
 
 jmp_buf motdinterrupt;
@@ -504,7 +469,7 @@ jmp_buf motdinterrupt;
 void
 motd()
 {
 void
 motd()
 {
-       register int fd, nchars;
+       int fd, nchars;
        sig_t oldint;
        char tbuf[8192];
 
        sig_t oldint;
        char tbuf[8192];
 
@@ -523,6 +488,7 @@ void
 sigint(signo)
        int signo;
 {
 sigint(signo)
        int signo;
 {
+
        longjmp(motdinterrupt, 1);
 }
 
        longjmp(motdinterrupt, 1);
 }
 
@@ -531,6 +497,7 @@ void
 timedout(signo)
        int signo;
 {
 timedout(signo)
        int signo;
 {
+
        (void)fprintf(stderr, "Login timed out after %d seconds\n", timeout);
        exit(0);
 }
        (void)fprintf(stderr, "Login timed out after %d seconds\n", timeout);
        exit(0);
 }
@@ -538,7 +505,7 @@ timedout(signo)
 void
 checknologin()
 {
 void
 checknologin()
 {
-       register int fd, nchars;
+       int fd, nchars;
        char tbuf[8192];
 
        if ((fd = open(_PATH_NOLOGIN, O_RDONLY, 0)) >= 0) {
        char tbuf[8192];
 
        if ((fd = open(_PATH_NOLOGIN, O_RDONLY, 0)) >= 0) {
@@ -554,7 +521,6 @@ dolastlog(quiet)
 {
        struct lastlog ll;
        int fd;
 {
        struct lastlog ll;
        int fd;
-       char *ctime();
 
        if ((fd = open(_PATH_LASTLOG, O_RDWR, 0)) >= 0) {
                (void)lseek(fd, (off_t)pwd->pw_uid * sizeof(ll), L_SET);
 
        if ((fd = open(_PATH_LASTLOG, O_RDWR, 0)) >= 0) {
                (void)lseek(fd, (off_t)pwd->pw_uid * sizeof(ll), L_SET);
@@ -574,7 +540,7 @@ dolastlog(quiet)
                        }
                        (void)lseek(fd, (off_t)pwd->pw_uid * sizeof(ll), L_SET);
                }
                        }
                        (void)lseek(fd, (off_t)pwd->pw_uid * sizeof(ll), L_SET);
                }
-               bzero((void *)&ll, sizeof(ll));
+               memset((void *)&ll, 0, sizeof(ll));
                (void)time(&ll.ll_time);
                (void)strncpy(ll.ll_line, tty, sizeof(ll.ll_line));
                if (hostname)
                (void)time(&ll.ll_time);
                (void)strncpy(ll.ll_line, tty, sizeof(ll.ll_line));
                if (hostname)
@@ -588,6 +554,7 @@ void
 badlogin(name)
        char *name;
 {
 badlogin(name)
        char *name;
 {
+
        if (failures == 0)
                return;
        if (hostname) {
        if (failures == 0)
                return;
        if (hostname) {
@@ -614,56 +581,14 @@ stypeof(ttyid)
 {
        struct ttyent *t;
 
 {
        struct ttyent *t;
 
-       return(ttyid && (t = getttynam(ttyid)) ? t->ty_type : UNKNOWN);
+       return (ttyid && (t = getttynam(ttyid)) ? t->ty_type : UNKNOWN);
 }
 
 void
 sleepexit(eval)
        int eval;
 {
 }
 
 void
 sleepexit(eval)
        int eval;
 {
-       (void)sleep((u_int)5);
-       exit(eval);
-}
-
-doremotelogin(host)
-       char *host;
-{
-       static char lusername[UT_NAMESIZE+1];
-       char rusername[UT_NAMESIZE+1];
-
-       getstr(rusername, sizeof(rusername), "remuser");
-       getstr(lusername, sizeof(lusername), "locuser");
-       getstr(term, sizeof(term), "Terminal type");
-       username = lusername;
-       pwd = getpwnam(username);
-       if (pwd == NULL)
-               return(-1);
-       return(ruserok(host, (pwd->pw_uid == 0), rusername, username));
-}
-
-char *speeds[] = {
-       "0", "50", "75", "110", "134", "150", "200", "300", "600",
-       "1200", "1800", "2400", "4800", "9600", "19200", "38400",
-};
-#define        NSPEEDS (sizeof(speeds) / sizeof(speeds[0]))
 
 
-doremoteterm(tp)
-       struct sgttyb *tp;
-{
-       register char *cp = index(term, '/'), **cpp;
-       char *speed;
-
-       if (cp) {
-               *cp++ = '\0';
-               speed = cp;
-               cp = index(speed, '/');
-               if (cp)
-                       *cp++ = '\0';
-               for (cpp = speeds; cpp < &speeds[NSPEEDS]; cpp++)
-                       if (strcmp(*cpp, speed) == 0) {
-                               tp->sg_ispeed = tp->sg_ospeed = cpp-speeds;
-                               break;
-                       }
-       }
-       tp->sg_flags = ECHO|CRMOD|ANYP|XTABS;
+       (void)sleep(5);
+       exit(eval);
 }
 }