no more interaction with quotas
[unix-history] / usr / src / usr.bin / login / login.c
index d2c21a9..6c181ab 100644 (file)
@@ -22,26 +22,25 @@ char copyright[] =
 #endif /* not lint */
 
 #ifndef lint
 #endif /* not lint */
 
 #ifndef lint
-static char sccsid[] = "@(#)login.c    5.35 (Berkeley) %G%";
+static char sccsid[] = "@(#)login.c    5.52 (Berkeley) %G%";
 #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.)
  */
 
 #include <sys/param.h>
  * login -h hostname   (for telnetd, etc.)
  * login -f name       (for pre-authenticated login: datakit, xterm, etc.)
  */
 
 #include <sys/param.h>
-#include <sys/quota.h>
 #include <sys/stat.h>
 #include <sys/time.h>
 #include <sys/resource.h>
 #include <sys/file.h>
 #include <sys/stat.h>
 #include <sys/time.h>
 #include <sys/resource.h>
 #include <sys/file.h>
-#include <sys/ioctl.h>
+#include <sgtty.h>
 
 #include <utmp.h>
 #include <signal.h>
 
 #include <utmp.h>
 #include <signal.h>
-#include <lastlog.h>
 #include <errno.h>
 #include <ttyent.h>
 #include <syslog.h>
 #include <errno.h>
 #include <ttyent.h>
 #include <syslog.h>
@@ -50,6 +49,7 @@ static char sccsid[] = "@(#)login.c   5.35 (Berkeley) %G%";
 #include <setjmp.h>
 #include <stdio.h>
 #include <strings.h>
 #include <setjmp.h>
 #include <stdio.h>
 #include <strings.h>
+#include <tzfile.h>
 #include "pathnames.h"
 
 #define        TTYGRPNAME      "tty"           /* name of group to own ttys */
 #include "pathnames.h"
 
 #define        TTYGRPNAME      "tty"           /* name of group to own ttys */
@@ -62,7 +62,7 @@ int   timeout = 300;
 
 struct passwd *pwd;
 int    failures;
 
 struct passwd *pwd;
 int    failures;
-char   term[64], *hostname, *username, *tty;
+char   term[64], *envinit[1], *hostname, *username, *tty;
 
 struct sgttyb sgttyb;
 struct tchars tc = {
 
 struct sgttyb sgttyb;
 struct tchars tc = {
@@ -93,10 +93,11 @@ main(argc, argv)
        struct group *gr;
        register int ch;
        register char *p;
        struct group *gr;
        register int ch;
        register char *p;
-       int ask, fflag, hflag, pflag, cnt;
+       int ask, fflag, hflag, pflag, rflag, cnt;
        int quietlog, passwd_req, ioctlval, timedout();
        int quietlog, passwd_req, ioctlval, timedout();
-       char *domain, *salt, *envinit[1], *ttyn, *pp;
-       char tbuf[MAXPATHLEN + 2];
+       char *domain, *salt, *ttyn, *pp;
+       char tbuf[MAXPATHLEN + 2], tname[sizeof(_PATH_TTY) + 10];
+       char localhost[MAXHOSTNAMELEN];
        char *ctime(), *ttyname(), *stypeof(), *crypt(), *getpass();
        time_t time();
        off_t lseek();
        char *ctime(), *ttyname(), *stypeof(), *crypt(), *getpass();
        time_t time();
        off_t lseek();
@@ -106,30 +107,46 @@ main(argc, argv)
        (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);
-       (void)quota(Q_SETUID, 0, 0, 0);
 
        /*
         * -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
         */
-       (void)gethostname(tbuf, sizeof(tbuf));
-       domain = index(tbuf, '.');
+       domain = NULL;
+       if (gethostname(localhost, sizeof(localhost)) < 0)
+               syslog(LOG_ERR, "couldn't get local hostname: %m");
+       else
+               domain = index(localhost, '.');
+
+       openlog("login", LOG_ODELAY, LOG_AUTH);
 
 
-       fflag = hflag = pflag = 0;
+       fflag = hflag = pflag = rflag = 0;
        passwd_req = 1;
        passwd_req = 1;
-       while ((ch = getopt(argc, argv, "fh:p")) != EOF)
+       uid = getuid();
+       while ((ch = getopt(argc, argv, "fh:pr:")) != 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 (getuid()) {
-                               fprintf(stderr,
+                       if (uid) {
+                               (void)fprintf(stderr,
                                    "login: -h for super-user only.\n");
                                exit(1);
                        }
                                    "login: -h for super-user only.\n");
                                exit(1);
                        }
+                       if (rflag) {
+                               fprintf(stderr,
+                                   "login: only one of -r and -h allowed.\n");
+                               exit(1);
+                       }
                        hflag = 1;
                        if (domain && (p = index(optarg, '.')) &&
                            strcasecmp(p, domain) == 0)
                        hflag = 1;
                        if (domain && (p = index(optarg, '.')) &&
                            strcasecmp(p, domain) == 0)
@@ -139,9 +156,35 @@ 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:
                case '?':
                default:
-                       fprintf(stderr, "usage: login [-fp] [username]\n");
+                       if (!uid)
+                               syslog(LOG_ERR, "invalid flag %c", ch);
+                       (void)fprintf(stderr,
+                           "usage: login [-fp] [username]\n");
                        exit(1);
                }
        argc -= optind;
                        exit(1);
                }
        argc -= optind;
@@ -151,12 +194,21 @@ main(argc, argv)
                ask = 0;
        } else
                ask = 1;
                ask = 0;
        } else
                ask = 1;
+       if (rflag)
+               ask = 0;
 
        ioctlval = 0;
        (void)ioctl(0, TIOCLSET, &ioctlval);
        (void)ioctl(0, TIOCNXCL, 0);
        (void)fcntl(0, F_SETFL, ioctlval);
        (void)ioctl(0, TIOCGETP, &sgttyb);
 
        ioctlval = 0;
        (void)ioctl(0, TIOCLSET, &ioctlval);
        (void)ioctl(0, TIOCNXCL, 0);
        (void)fcntl(0, F_SETFL, ioctlval);
        (void)ioctl(0, TIOCGETP, &sgttyb);
+
+       /*
+        * If talking to an rlogin process, propagate the terminal type and
+        * baud rate across the network.
+        */
+       if (rflag)
+               doremoteterm(&sgttyb);
        sgttyb.sg_erase = CERASE;
        sgttyb.sg_kill = CKILL;
        (void)ioctl(0, TIOCSLTC, &ltc);
        sgttyb.sg_erase = CERASE;
        sgttyb.sg_kill = CKILL;
        (void)ioctl(0, TIOCSLTC, &ltc);
@@ -167,17 +219,17 @@ main(argc, argv)
                close(cnt);
 
        ttyn = ttyname(0);
                close(cnt);
 
        ttyn = ttyname(0);
-       if (ttyn == NULL || *ttyn == '\0')
-               ttyn = "/dev/tty??";
+       if (ttyn == NULL || *ttyn == '\0') {
+               (void)sprintf(tname, "%s??", _PATH_TTY);
+               ttyn = tname;
+       }
        if (tty = rindex(ttyn, '/'))
                ++tty;
        else
                tty = ttyn;
 
        if (tty = rindex(ttyn, '/'))
                ++tty;
        else
                tty = ttyn;
 
-       openlog("login", LOG_ODELAY, LOG_AUTH);
-
        for (cnt = 0;; ask = 1) {
        for (cnt = 0;; ask = 1) {
-               ioctlval = 0;
+               ioctlval = TTYDISC;
                (void)ioctl(0, TIOCSETD, &ioctlval);
 
                if (ask) {
                (void)ioctl(0, TIOCSETD, &ioctlval);
 
                if (ask) {
@@ -185,9 +237,8 @@ main(argc, argv)
                        getloginname();
                }
                /*
                        getloginname();
                }
                /*
-                * Note if trying multiple user names;
-                * log failures for previous user name,
-                * but don't bother logging one failure
+                * Note if trying multiple user names; log failures for
+                * previous user name, but don't bother logging one failure
                 * for nonexistent name (mistyped username).
                 */
                if (failures && strcmp(tbuf, username)) {
                 * for nonexistent name (mistyped username).
                 */
                if (failures && strcmp(tbuf, username)) {
@@ -210,9 +261,10 @@ main(argc, argv)
                 * root, disallow if the uid's differ.
                 */
                if (fflag && pwd) {
                 * root, disallow if the uid's differ.
                 */
                if (fflag && pwd) {
-                       int uid = getuid();
-
-                       passwd_req = pwd->pw_uid == 0 ||
+                       passwd_req =
+#ifndef        KERBEROS
+                            pwd->pw_uid == 0 ||
+#endif
                            (uid && uid != pwd->pw_uid);
                }
 
                            (uid && uid != pwd->pw_uid);
                }
 
@@ -223,6 +275,25 @@ main(argc, argv)
                if (!passwd_req || (pwd && !*pwd->pw_passwd))
                        break;
 
                if (!passwd_req || (pwd && !*pwd->pw_passwd))
                        break;
 
+               /*
+                * If trying to log in as root, but with insecure terminal,
+                * refuse the login attempt.
+                */
+               if (pwd->pw_uid == 0 && !rootterm(tty)) {
+                       (void)fprintf(stderr,
+                           "%s login refused on this terminal.\n",
+                           pwd->pw_name);
+                       if (hostname)
+                               syslog(LOG_NOTICE,
+                                   "LOGIN %s REFUSED FROM %s ON TTY %s",
+                                   pwd->pw_name, hostname, tty);
+                       else
+                               syslog(LOG_NOTICE,
+                                   "LOGIN %s REFUSED ON TTY %s",
+                                    pwd->pw_name, tty);
+                       continue;
+               }
+
                setpriority(PRIO_PROCESS, 0, -4);
                pp = getpass("Password:");
                p = crypt(pp, salt);
                setpriority(PRIO_PROCESS, 0, -4);
                pp = getpass("Password:");
                p = crypt(pp, salt);
@@ -232,7 +303,7 @@ main(argc, argv)
                if (pwd && !strcmp(p, pwd->pw_passwd))
                        break;
 
                if (pwd && !strcmp(p, pwd->pw_passwd))
                        break;
 
-               printf("Login incorrect\n");
+               (void)printf("Login incorrect\n");
                failures++;
                /* we allow 10 tries, but after 3 we start backing off */
                if (++cnt > 3) {
                failures++;
                /* we allow 10 tries, but after 3 we start backing off */
                if (++cnt > 3) {
@@ -248,42 +319,15 @@ main(argc, argv)
        /* committed to login -- turn off timeout */
        (void)alarm((u_int)0);
 
        /* committed to login -- turn off timeout */
        (void)alarm((u_int)0);
 
-       /*
-        * If valid so far and root is logging in, see if root logins on
-        * this terminal are permitted.
-        */
-       if (pwd->pw_uid == 0 && !rootterm(tty)) {
-               if (hostname)
-                       syslog(LOG_NOTICE, "ROOT LOGIN REFUSED FROM %s",
-                           hostname);
-               else
-                       syslog(LOG_NOTICE, "ROOT LOGIN REFUSED ON %s", tty);
-               printf("Login incorrect\n");
-               sleepexit(1);
-       }
-
-       if (quota(Q_SETUID, pwd->pw_uid, 0, 0) < 0 && errno != EINVAL) {
-               switch(errno) {
-               case EUSERS:
-                       fprintf(stderr,
-               "Too many users logged on already.\nTry again later.\n");
-                       break;
-               case EPROCLIM:
-                       fprintf(stderr,
-                           "You have too many processes running.\n");
-                       break;
-               default:
-                       perror("quota (Q_SETUID)");
-               }
-               sleepexit(0);
-       }
+       /* paranoia... */
+       endpwent();
 
        if (chdir(pwd->pw_dir) < 0) {
 
        if (chdir(pwd->pw_dir) < 0) {
-               printf("No directory %s!\n", pwd->pw_dir);
+               (void)printf("No directory %s!\n", pwd->pw_dir);
                if (chdir("/"))
                        exit(0);
                pwd->pw_dir = "/";
                if (chdir("/"))
                        exit(0);
                pwd->pw_dir = "/";
-               printf("Logging in with home = \"/\".\n");
+               (void)printf("Logging in with home = \"/\".\n");
        }
 
 #define        TWOWEEKS        (14*24*60*60)
        }
 
 #define        TWOWEEKS        (14*24*60*60)
@@ -310,28 +354,31 @@ main(argc, argv)
                            months[ttp->tm_mon], ttp->tm_mday, ttp->tm_year);
                }
 
                            months[ttp->tm_mon], ttp->tm_mday, ttp->tm_year);
                }
 
-#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) {
        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");
+                       (void)printf("Sorry -- your password has expired.\n");
                        sleepexit(1);
                }
                        sleepexit(1);
                }
-               else if (tp.tv_sec - pwd->pw_change < TWOWEEKS) {
+               else if (pwd->pw_change - tp.tv_sec <
+                   2 * DAYSPERWEEK * SECSPERDAY && !quietlog) {
                        ttp = localtime(&pwd->pw_change);
                        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);
+                       (void)printf("Warning: your password expires on %s %d, %d\n",
+                           months[ttp->tm_mon], ttp->tm_mday,
+                           TM_YEAR_BASE + ttp->tm_year);
                }
        if (pwd->pw_expire)
                if (tp.tv_sec >= pwd->pw_expire) {
                }
        if (pwd->pw_expire)
                if (tp.tv_sec >= pwd->pw_expire) {
-                       printf("Sorry -- your account has expired.\n");
+                       (void)printf("Sorry -- your account has expired.\n");
                        sleepexit(1);
                }
                        sleepexit(1);
                }
-               else if (tp.tv_sec - pwd->pw_expire < TWOWEEKS) {
+               else if (pwd->pw_expire - tp.tv_sec <
+                   2 * DAYSPERWEEK * SECSPERDAY && !quietlog) {
                        ttp = localtime(&pwd->pw_expire);
                        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);
+                       (void)printf("Warning: your account expires on %s %d, %d\n",
+                           months[ttp->tm_mon], ttp->tm_mday,
+                           TM_YEAR_BASE + ttp->tm_year);
                }
 
        /* nothing else left to fail -- really log in */
                }
 
        /* nothing else left to fail -- really log in */
@@ -347,10 +394,9 @@ main(argc, argv)
                login(&utmp);
        }
 
                login(&utmp);
        }
 
-       quietlog = access(_PATH_HUSHLOGIN, F_OK) == 0;
        dolastlog(quietlog);
 
        dolastlog(quietlog);
 
-       if (!hflag) {                                   /* XXX */
+       if (!hflag && !rflag) {                                 /* XXX */
                static struct winsize win = { 0, 0, 0, 0 };
 
                (void)ioctl(0, TIOCSWINSZ, &win);
                static struct winsize win = { 0, 0, 0, 0 };
 
                (void)ioctl(0, TIOCSWINSZ, &win);
@@ -363,16 +409,8 @@ main(argc, argv)
 
        initgroups(username, pwd->pw_gid);
 
 
        initgroups(username, pwd->pw_gid);
 
-       quota(Q_DOWARN, pwd->pw_uid, (dev_t)-1, 0);
-       (void)setuid(pwd->pw_uid);
-
        if (*pwd->pw_shell == '\0')
                pwd->pw_shell = _PATH_BSHELL;
        if (*pwd->pw_shell == '\0')
                pwd->pw_shell = _PATH_BSHELL;
-       /* turn on new line discipline for the csh */
-       else if (!strcmp(pwd->pw_shell, "/bin/csh")) {
-               ioctlval = NTTYDISC;
-               (void)ioctl(0, TIOCSETD, &ioctlval);
-       }
 
        /* destroy environment unless user has requested preservation */
        if (!pflag)
 
        /* destroy environment unless user has requested preservation */
        if (!pflag)
@@ -383,7 +421,7 @@ main(argc, argv)
                strncpy(term, stypeof(tty), sizeof(term));
        (void)setenv("TERM", term, 0);
        (void)setenv("USER", pwd->pw_name, 1);
                strncpy(term, stypeof(tty), sizeof(term));
        (void)setenv("TERM", term, 0);
        (void)setenv("USER", pwd->pw_name, 1);
-       (void)setenv("PATH", "/usr/ucb:/bin:/usr/bin:", 0);
+       (void)setenv("PATH", _PATH_DEFPATH, 0);
 
        if (tty[sizeof("tty")-1] == 'd')
                syslog(LOG_INFO, "DIALUP %s, %s", tty, pwd->pw_name);
 
        if (tty[sizeof("tty")-1] == 'd')
                syslog(LOG_INFO, "DIALUP %s, %s", tty, pwd->pw_name);
@@ -400,7 +438,7 @@ main(argc, argv)
                motd();
                (void)sprintf(tbuf, "%s/%s", _PATH_MAILDIR, pwd->pw_name);
                if (stat(tbuf, &st) == 0 && st.st_size != 0)
                motd();
                (void)sprintf(tbuf, "%s/%s", _PATH_MAILDIR, pwd->pw_name);
                if (stat(tbuf, &st) == 0 && st.st_size != 0)
-                       printf("You have %smail.\n",
+                       (void)printf("You have %smail.\n",
                            (st.st_mtime > st.st_atime) ? "new " : "");
        }
 
                            (st.st_mtime > st.st_atime) ? "new " : "");
        }
 
@@ -412,9 +450,15 @@ main(argc, argv)
        tbuf[0] = '-';
        strcpy(tbuf + 1, (p = rindex(pwd->pw_shell, '/')) ?
            p + 1 : pwd->pw_shell);
        tbuf[0] = '-';
        strcpy(tbuf + 1, (p = rindex(pwd->pw_shell, '/')) ?
            p + 1 : pwd->pw_shell);
+
+       if (setlogin(pwd->pw_name) < 0)
+               syslog(LOG_ERR, "setlogin() failure: %m");
+
+       /* discard permissions last so can't get killed and drop core */
+       (void)setuid(pwd->pw_uid);
+
        execlp(pwd->pw_shell, tbuf, 0);
        execlp(pwd->pw_shell, tbuf, 0);
-       fprintf(stderr, "login: no shell: ");
-       perror(pwd->pw_shell);
+       (void)fprintf(stderr, "login: no shell: %s.\n", strerror(errno));
        exit(0);
 }
 
        exit(0);
 }
 
@@ -425,7 +469,7 @@ getloginname()
        static char nbuf[UT_NAMESIZE + 1];
 
        for (;;) {
        static char nbuf[UT_NAMESIZE + 1];
 
        for (;;) {
-               printf("login: ");
+               (void)printf("login: ");
                for (p = nbuf; (ch = getchar()) != '\n'; ) {
                        if (ch == EOF) {
                                badlogin(username);
                for (p = nbuf; (ch = getchar()) != '\n'; ) {
                        if (ch == EOF) {
                                badlogin(username);
@@ -436,7 +480,7 @@ getloginname()
                }
                if (p > nbuf)
                        if (nbuf[0] == '-')
                }
                if (p > nbuf)
                        if (nbuf[0] == '-')
-                               fprintf(stderr,
+                               (void)fprintf(stderr,
                                    "login names may not start with '-'.\n");
                        else {
                                *p = '\0';
                                    "login names may not start with '-'.\n");
                        else {
                                *p = '\0';
@@ -448,7 +492,7 @@ getloginname()
 
 timedout()
 {
 
 timedout()
 {
-       fprintf(stderr, "Login timed out after %d seconds\n", timeout);
+       (void)fprintf(stderr, "Login timed out after %d seconds\n", timeout);
        exit(0);
 }
 
        exit(0);
 }
 
@@ -465,7 +509,8 @@ jmp_buf motdinterrupt;
 motd()
 {
        register int fd, nchars;
 motd()
 {
        register int fd, nchars;
-       int (*oldint)(), sigint();
+       sig_t oldint;
+       int sigint();
        char tbuf[8192];
 
        if ((fd = open(_PATH_MOTDFILE, O_RDONLY, 0)) < 0)
        char tbuf[8192];
 
        if ((fd = open(_PATH_MOTDFILE, O_RDONLY, 0)) < 0)
@@ -508,13 +553,13 @@ dolastlog(quiet)
                if (!quiet) {
                        if (read(fd, (char *)&ll, sizeof(ll)) == sizeof(ll) &&
                            ll.ll_time != 0) {
                if (!quiet) {
                        if (read(fd, (char *)&ll, sizeof(ll)) == sizeof(ll) &&
                            ll.ll_time != 0) {
-                               printf("Last login: %.*s ",
+                               (void)printf("Last login: %.*s ",
                                    24-5, (char *)ctime(&ll.ll_time));
                                if (*ll.ll_host != '\0')
                                    24-5, (char *)ctime(&ll.ll_time));
                                if (*ll.ll_host != '\0')
-                                       printf("from %.*s\n",
+                                       (void)printf("from %.*s\n",
                                            sizeof(ll.ll_host), ll.ll_host);
                                else
                                            sizeof(ll.ll_host), ll.ll_host);
                                else
-                                       printf("on %.*s\n",
+                                       (void)printf("on %.*s\n",
                                            sizeof(ll.ll_line), ll.ll_line);
                        }
                        (void)lseek(fd, (off_t)pwd->pw_uid * sizeof(ll), L_SET);
                                            sizeof(ll.ll_line), ll.ll_line);
                        }
                        (void)lseek(fd, (off_t)pwd->pw_uid * sizeof(ll), L_SET);
@@ -564,7 +609,7 @@ getstr(buf, cnt, err)
                if (read(0, &ch, sizeof(ch)) != sizeof(ch))
                        exit(1);
                if (--cnt < 0) {
                if (read(0, &ch, sizeof(ch)) != sizeof(ch))
                        exit(1);
                if (--cnt < 0) {
-                       fprintf(stderr, "%s too long\r\n", err);
+                       (void)fprintf(stderr, "%s too long\r\n", err);
                        sleepexit(1);
                }
                *buf++ = ch;
                        sleepexit(1);
                }
                *buf++ = ch;
@@ -577,3 +622,46 @@ sleepexit(eval)
        sleep((u_int)5);
        exit(eval);
 }
        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;
+}