static char *sccsid = "@(#)login.c.1 4.9 (Berkeley) %G%";
#define SCPYN(a, b) strncpy(a, b, sizeof(a))
#define NMAX sizeof(utmp.ut_name)
#define LMAX sizeof(utmp.ut_line)
char maildir[30] = "/usr/spool/mail/";
char lastlog[] = "/usr/adm/lastlog";
struct passwd nouser = {"", "nope"};
char homedir[64] = "HOME=";
char shell[64] = "SHELL=";
char *envinit[] = {homedir, shell, "PATH=:/usr/ucb:/bin:/usr/bin", term, user,0};
struct passwd *getpwnam();
#define CTRL(c) ('c'&037)
#define CQUIT 034 /* FS, cntl shift L */
#define CINTR 0177 /* DEL */
CINTR, CQUIT, CSTART, CSTOP, CEOT, CBRK
CTRL(z), CTRL(y), CTRL(r), CTRL(o), CTRL(w), CTRL(v)
signal(SIGQUIT, SIG_IGN);
ioctl(0, TIOCSLTC, <c);
ioctl(0, TIOCSETD, &ldisc);
SCPYN(utmp.ut_name, argv[1]);
while (utmp.ut_name[0] == '\0') {
while ((c = getchar()) != '\n') {
if (namep < utmp.ut_name+NMAX)
if ((pwd = getpwnam(utmp.ut_name)) == NULL)
if (!strcmp(pwd->pw_shell, "/bin/csh")) {
ioctl(0, TIOCSETD, &ldisc);
if (*pwd->pw_passwd != '\0') {
namep = crypt(getpass("Password:"),pwd->pw_passwd);
if (strcmp(namep, pwd->pw_passwd)) {
printf("Login incorrect\n");
FILE *console = fopen("/dev/console", "w");
fprintf(console, "\r\nBADDIALUP %s %s\r\n", ttyn+5, utmp.ut_name);
sprintf(user, "USER=%.*s", NMAX, pwd->pw_name);
if (pwd->pw_uid == 0 && ttyn[5] != 'c')
FILE *console = fopen("/dev/console", "w");
fprintf(console, "\r\nDIALUP %s %s\r\n", ttyn+5, pwd->pw_name);
if((f = open(lastlog, 2)) >= 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("%s on %.*s\n", ep, LMAX, ll.ll_line);
lseek(f, (long) pwd->pw_uid * sizeof (struct lastlog), 0);
strcpyn(ll.ll_line, ttyn+5, LMAX);
write(f, (char *) &ll, sizeof ll);
if(chdir(pwd->pw_dir) < 0) {
printf("Logging with home=/\n");
printf("No directory\n");
if (t>0 && (f = open("/etc/utmp", 1)) >= 0) {
lseek(f, (long)(t*sizeof(utmp)), 0);
SCPYN(utmp.ut_line, rindex(ttyn, '/')+1);
write(f, (char *)&utmp, sizeof(utmp));
if (t>0 && (f = open("/usr/adm/wtmp", 1)) >= 0) {
write(f, (char *)&utmp, sizeof(utmp));
chown(ttyn, pwd->pw_uid, pwd->pw_gid);
if (*pwd->pw_shell == '\0')
pwd->pw_shell = "/bin/sh";
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)
strcat(maildir, pwd->pw_name);
if(access(maildir,4)==0) {
printf("You have mail.\n");
signal(SIGQUIT, SIG_DFL);
execlp(pwd->pw_shell, minusnam, 0);
if((mf = fopen("/etc/motd","r")) != NULL) {
while((c = getc(mf)) != EOF && stopmotd == 0)
register char *p, *t, *q;
f = fopen("/etc/ttytype", "r");
/* split off end of name */
for (p = q = ttyid; *p != 0; p++)
while (fgets(buf, sizeof buf, f) != NULL)
for (t=buf; *t!=' '; t++)