BSD 4 release
[unix-history] / usr / src / cmd / login.c
index cea69ad..656910d 100644 (file)
@@ -1,3 +1,4 @@
+static char *sccsid = "@(#)login.c     4.6 (Berkeley) 11/11/80";
 /*
  * login [ name ]
  */
 /*
  * login [ name ]
  */
 #include <stdio.h>
 #include <sys/stat.h>
 #include <lastlog.h>
 #include <stdio.h>
 #include <sys/stat.h>
 #include <lastlog.h>
+#include <whoami.h>
 #define SCPYN(a, b)    strncpy(a, b, sizeof(a))
 
 #define SCPYN(a, b)    strncpy(a, b, sizeof(a))
 
+#define NMAX sizeof(utmp.ut_name)
+#define LMAX sizeof(utmp.ut_line)
+
+char   user[20];
 char   maildir[30] =   "/usr/spool/mail/";
 char   lastlog[] =     "/usr/adm/lastlog";
 struct passwd nouser = {"", "nope"};
 char   maildir[30] =   "/usr/spool/mail/";
 char   lastlog[] =     "/usr/adm/lastlog";
 struct passwd nouser = {"", "nope"};
@@ -21,7 +27,7 @@ char  minusnam[16] = "-";
 char   homedir[64] = "HOME=";
 char   shell[64] = "SHELL=";
 char   term[64] = "TERM=";
 char   homedir[64] = "HOME=";
 char   shell[64] = "SHELL=";
 char   term[64] = "TERM=";
-char   *envinit[] = {homedir, shell, "PATH=:/usr/ucb:/bin:/usr/bin", term, 0};
+char   *envinit[] = {homedir, shell, "PATH=:/usr/ucb:/bin:/usr/bin", term, user,0};
 struct passwd *pwd;
 
 struct passwd *getpwnam();
 struct passwd *pwd;
 
 struct passwd *getpwnam();
@@ -34,12 +40,29 @@ char        *rindex();
 char   *stypeof();
 extern char **environ;
 
 char   *stypeof();
 extern char **environ;
 
+#define        CTRL(c) ('c'&037)
+#define        CERASE  '#'
+#define        CEOT    CTRL(d)
+#define        CKILL   '@'
+#define        CQUIT   034             /* FS, cntl shift L */
+#define        CINTR   0177            /* DEL */
+#define        CSTOP   CTRL(s)
+#define        CSTART  CTRL(q)
+#define        CBRK    0377
+struct tchars tc = {
+       CINTR, CQUIT, CSTART, CSTOP, CEOT, CBRK
+};
+struct ltchars ltc = {
+       CTRL(z), CTRL(y), CTRL(r), CTRL(o), CTRL(w), CTRL(v)
+};
+
 main(argc, argv)
 char **argv;
 {
        register char *namep;
        int t, f, c;
        char *ttyn;
 main(argc, argv)
 char **argv;
 {
        register char *namep;
        int t, f, c;
        char *ttyn;
+       int ldisc = 0;
 
        alarm(60);
        signal(SIGQUIT, SIG_IGN);
 
        alarm(60);
        signal(SIGQUIT, SIG_IGN);
@@ -47,10 +70,14 @@ char **argv;
        nice(-100);
        nice(20);
        nice(0);
        nice(-100);
        nice(20);
        nice(0);
+       ioctl(0, TIOCLSET, 0);
+       ioctl(0, TIOCNXCL, 0);
        gtty(0, &ttyb);
        ttyb.sg_erase = '#';
        ttyb.sg_kill = '@';
        stty(0, &ttyb);
        gtty(0, &ttyb);
        ttyb.sg_erase = '#';
        ttyb.sg_kill = '@';
        stty(0, &ttyb);
+       ioctl(0, TIOCSETC, &tc);
+       ioctl(0, TIOCSLTC, &ltc);
        for (t=3; t<20; t++)
                close(t);
        ttyn = ttyname(0);
        for (t=3; t<20; t++)
                close(t);
        ttyn = ttyname(0);
@@ -58,6 +85,8 @@ char **argv;
                ttyn = "/dev/tty??";
 
     loop:
                ttyn = "/dev/tty??";
 
     loop:
+       ldisc = 0;
+       ioctl(0, TIOCSETD, &ldisc);
        SCPYN(utmp.ut_name, "");
        if (argc>1) {
                SCPYN(utmp.ut_name, argv[1]);
        SCPYN(utmp.ut_name, "");
        if (argc>1) {
                SCPYN(utmp.ut_name, argv[1]);
@@ -71,7 +100,7 @@ char **argv;
                                c = '_';
                        if (c == EOF)
                                exit(0);
                                c = '_';
                        if (c == EOF)
                                exit(0);
-                       if (namep < utmp.ut_name+8)
+                       if (namep < utmp.ut_name+NMAX)
                                *namep++ = c;
                }
        }
                                *namep++ = c;
                }
        }
@@ -79,12 +108,18 @@ char **argv;
        if ((pwd = getpwnam(utmp.ut_name)) == NULL)
                pwd = &nouser;
        endpwent();
        if ((pwd = getpwnam(utmp.ut_name)) == NULL)
                pwd = &nouser;
        endpwent();
+       if (!strcmp(pwd->pw_shell, "/bin/csh")) {
+               ldisc = NTTYDISC;
+               ioctl(0, TIOCSETD, &ldisc);
+       }
        if (*pwd->pw_passwd != '\0') {
        if (*pwd->pw_passwd != '\0') {
+               nice(-4);
                namep = crypt(getpass("Password:"),pwd->pw_passwd);
                namep = crypt(getpass("Password:"),pwd->pw_passwd);
+               nice(4);
                if (strcmp(namep, pwd->pw_passwd)) {
 bad:
                        printf("Login incorrect\n");
                if (strcmp(namep, pwd->pw_passwd)) {
 bad:
                        printf("Login incorrect\n");
-                       if (ttyn[8] == 'd') {
+                       if (ttyn[LMAX] == 'd') {
                                FILE *console = fopen("/dev/console", "w");
                                if (console != NULL) {
                                        fprintf(console, "\r\nBADDIALUP %s %s\r\n", ttyn+5, utmp.ut_name);
                                FILE *console = fopen("/dev/console", "w");
                                if (console != NULL) {
                                        fprintf(console, "\r\nBADDIALUP %s %s\r\n", ttyn+5, utmp.ut_name);
@@ -94,11 +129,12 @@ bad:
                        goto loop;
                }
        }
                        goto loop;
                }
        }
-/*
+       sprintf(user, "USER=%.*s", NMAX, pwd->pw_name);
+#ifdef ERNIE
        if (pwd->pw_uid == 0 && ttyn[5] != 'c')
                goto bad;
        if (pwd->pw_uid == 0 && ttyn[5] != 'c')
                goto bad;
-*/
-       if (ttyn[8] == 'd') {
+#endif
+       if (ttyn[LMAX] == 'd') {
                FILE *console = fopen("/dev/console", "w");
                if (console != NULL) {
                        fprintf(console, "\r\nDIALUP %s %s\r\n", ttyn+5, pwd->pw_name);
                FILE *console = fopen("/dev/console", "w");
                if (console != NULL) {
                        fprintf(console, "\r\nDIALUP %s %s\r\n", ttyn+5, pwd->pw_name);
@@ -108,17 +144,18 @@ bad:
        if((f = open(lastlog, 2)) >= 0) {
                struct lastlog ll;
 
        if((f = open(lastlog, 2)) >= 0) {
                struct lastlog ll;
 
-               lseek(f, pwd->pw_uid * sizeof (struct lastlog), 0);
+               lseek(f, (long) pwd->pw_uid * sizeof (struct lastlog), 0);
                if (read(f, (char *) &ll, sizeof ll) == sizeof ll && ll.ll_time != 0) {
                        register char *ep = (char *) ctime(&ll.ll_time);
                        printf("Last login: ");
                        ep[24 - 5] = 0;
                if (read(f, (char *) &ll, sizeof ll) == sizeof ll && ll.ll_time != 0) {
                        register char *ep = (char *) ctime(&ll.ll_time);
                        printf("Last login: ");
                        ep[24 - 5] = 0;
-                       printf("%s on %.8s\n", ep, ll.ll_line);
+                       printf("%s on %.*s\n", ep, LMAX, ll.ll_line);
                }
                }
-               lseek(f, pwd->pw_uid * sizeof (struct lastlog), 0);
+               lseek(f, (long) pwd->pw_uid * sizeof (struct lastlog), 0);
                time(&ll.ll_time);
                time(&ll.ll_time);
-               strcpyn(ll.ll_line, ttyn+5, 8);
+               strcpyn(ll.ll_line, ttyn+5, LMAX);
                write(f, (char *) &ll, sizeof ll);
                write(f, (char *) &ll, sizeof ll);
+               close(f);
        }
        if(chdir(pwd->pw_dir) < 0) {
                printf("No directory\n");
        }
        if(chdir(pwd->pw_dir) < 0) {
                printf("No directory\n");