X-Git-Url: https://git.subgeniuskitty.com/unix-history/.git/blobdiff_plain/05bfa7f4b0a461d4fb0219d7113aa999b1723dcd..31cef89cb428866f787983e68246030321893df4:/usr/src/cmd/login.c?ds=sidebyside

diff --git a/usr/src/cmd/login.c b/usr/src/cmd/login.c
index 5ff334a275..656910dcc7 100644
--- a/usr/src/cmd/login.c
+++ b/usr/src/cmd/login.c
@@ -1,3 +1,4 @@
+static	char *sccsid = "@(#)login.c	4.6 (Berkeley) 11/11/80";
 /*
  * login [ name ]
  */
@@ -9,15 +10,24 @@
 #include <pwd.h>
 #include <stdio.h>
 #include <sys/stat.h>
+#include <lastlog.h>
+#include <whoami.h>
 #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"};
 struct	sgttyb ttyb;
 struct	utmp utmp;
 char	minusnam[16] = "-";
 char	homedir[64] = "HOME=";
-char	*envinit[] = {homedir, "PATH=:/bin:/usr/bin", 0};
+char	shell[64] = "SHELL=";
+char	term[64] = "TERM=";
+char	*envinit[] = {homedir, shell, "PATH=:/usr/ucb:/bin:/usr/bin", term, user,0};
 struct	passwd *pwd;
 
 struct	passwd *getpwnam();
@@ -27,14 +37,32 @@ char	*ttyname();
 char	*crypt();
 char	*getpass();
 char	*rindex();
+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;
+	int ldisc = 0;
 
 	alarm(60);
 	signal(SIGQUIT, SIG_IGN);
@@ -42,10 +70,14 @@ char **argv;
 	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);
+	ioctl(0, TIOCSETC, &tc);
+	ioctl(0, TIOCSLTC, &ltc);
 	for (t=3; t<20; t++)
 		close(t);
 	ttyn = ttyname(0);
@@ -53,6 +85,8 @@ char **argv;
 		ttyn = "/dev/tty??";
 
     loop:
+	ldisc = 0;
+	ioctl(0, TIOCSETD, &ldisc);
 	SCPYN(utmp.ut_name, "");
 	if (argc>1) {
 		SCPYN(utmp.ut_name, argv[1]);
@@ -66,7 +100,7 @@ char **argv;
 				c = '_';
 			if (c == EOF)
 				exit(0);
-			if (namep < utmp.ut_name+8)
+			if (namep < utmp.ut_name+NMAX)
 				*namep++ = c;
 		}
 	}
@@ -74,13 +108,55 @@ char **argv;
 	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') {
+		nice(-4);
 		namep = crypt(getpass("Password:"),pwd->pw_passwd);
+		nice(4);
 		if (strcmp(namep, pwd->pw_passwd)) {
+bad:
 			printf("Login incorrect\n");
+			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);
+					fclose(console);
+				}
+			}
 			goto loop;
 		}
 	}
+	sprintf(user, "USER=%.*s", NMAX, pwd->pw_name);
+#ifdef ERNIE
+	if (pwd->pw_uid == 0 && ttyn[5] != 'c')
+		goto bad;
+#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);
+			fclose(console);
+		}
+	}
+	if((f = open(lastlog, 2)) >= 0) {
+		struct lastlog ll;
+
+		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;
+			printf("%s on %.*s\n", ep, LMAX, ll.ll_line);
+		}
+		lseek(f, (long) pwd->pw_uid * sizeof (struct lastlog), 0);
+		time(&ll.ll_time);
+		strcpyn(ll.ll_line, ttyn+5, LMAX);
+		write(f, (char *) &ll, sizeof ll);
+		close(f);
+	}
 	if(chdir(pwd->pw_dir) < 0) {
 		printf("No directory\n");
 		goto loop;
@@ -105,13 +181,15 @@ char **argv;
 		pwd->pw_shell = "/bin/sh";
 	environ = envinit;
 	strncat(homedir, pwd->pw_dir, sizeof(homedir)-6);
+	strncat(shell, pwd->pw_shell, sizeof(shell)-7);
+	strncat(term, stypeof(ttyn), sizeof(term)-6);
 	if ((namep = rindex(pwd->pw_shell, '/')) == NULL)
 		namep = pwd->pw_shell;
 	else
 		namep++;
 	strcat(minusnam, namep);
 	alarm(0);
-	umask(02);
+	umask(022);
 	showmotd();
 	strcat(maildir, pwd->pw_name);
 	if(access(maildir,4)==0) {
@@ -147,3 +225,43 @@ showmotd()
 	}
 	signal(SIGINT, SIG_IGN);
 }
+
+#define UNKNOWN "su"
+
+char *
+stypeof(ttyid)
+char	*ttyid;
+{
+	static char	typebuf[16];
+	char		buf[50];
+	register FILE	*f;
+	register char	*p, *t, *q;
+
+	if (ttyid == NULL)
+		return (UNKNOWN);
+	f = fopen("/etc/ttytype", "r");
+	if (f == NULL)
+		return (UNKNOWN);
+	/* split off end of name */
+	for (p = q = ttyid; *p != 0; p++)
+		if (*p == '/')
+			q = p + 1;
+
+	/* scan the file */
+	while (fgets(buf, sizeof buf, f) != NULL)
+	{
+		for (t=buf; *t!=' '; t++)
+			;
+		*t++ = 0;
+		for (p=t; *p>' '; p++)
+			;
+		*p = 0;
+		if (strcmp(q,t)==0) {
+			strcpy(typebuf, buf);
+			fclose(f);
+			return (typebuf);
+		}
+	}
+	fclose (f);
+	return (UNKNOWN);
+}