[unix-history] / usr / src / cmd / login.c

/*
 * login [ name ]
 */

#include <sys/types.h>
#include <sgtty.h>
#include <utmp.h>
#include <signal.h>
#include <pwd.h>
#include <stdio.h>
#include <sys/stat.h>
#define SCPYN(a, b)	strncpy(a, b, sizeof(a))

char	maildir[30] =	"/usr/spool/mail/";
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};
struct	passwd *pwd;

struct	passwd *getpwnam();
char	*strcat();
int	setpwent();
char	*ttyname();
char	*crypt();
char	*getpass();
char	*rindex();
extern	char **environ;

main(argc, argv)
char **argv;
{
	register char *namep;
	int t, f, c;
	char *ttyn;

	alarm(60);
	signal(SIGQUIT, SIG_IGN);
	signal(SIGINT, SIG_IGN);
	nice(-100);
	nice(20);
	nice(0);
	gtty(0, &ttyb);
	ttyb.sg_erase = '#';
	ttyb.sg_kill = '@';
	stty(0, &ttyb);
	for (t=3; t<20; t++)
		close(t);
	ttyn = ttyname(0);
	if (ttyn==0)
		ttyn = "/dev/tty??";

    loop:
	SCPYN(utmp.ut_name, "");
	if (argc>1) {
		SCPYN(utmp.ut_name, argv[1]);
		argc = 0;
	}
	while (utmp.ut_name[0] == '\0') {
		namep = utmp.ut_name;
		printf("login: ");
		while ((c = getchar()) != '\n') {
			if(c == ' ')
				c = '_';
			if (c == EOF)
				exit(0);
			if (namep < utmp.ut_name+8)
				*namep++ = c;
		}
	}
	setpwent();
	if ((pwd = getpwnam(utmp.ut_name)) == NULL)
		pwd = &nouser;
	endpwent();
	if (*pwd->pw_passwd != '\0') {
		namep = crypt(getpass("Password:"),pwd->pw_passwd);
		if (strcmp(namep, pwd->pw_passwd)) {
			printf("Login incorrect\n");
			goto loop;
		}
	}
	if(chdir(pwd->pw_dir) < 0) {
		printf("No directory\n");
		goto loop;
	}
	time(&utmp.ut_time);
	t = ttyslot();
	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));
		close(f);
	}
	if (t>0 && (f = open("/usr/adm/wtmp", 1)) >= 0) {
		lseek(f, 0L, 2);
		write(f, (char *)&utmp, sizeof(utmp));
		close(f);
	}
	chown(ttyn, pwd->pw_uid, pwd->pw_gid);
	setgid(pwd->pw_gid);
	setuid(pwd->pw_uid);
	if (*pwd->pw_shell == '\0')
		pwd->pw_shell = "/bin/sh";
	environ = envinit;
	strncat(homedir, pwd->pw_dir, sizeof(homedir)-6);
	if ((namep = rindex(pwd->pw_shell, '/')) == NULL)
		namep = pwd->pw_shell;
	else
		namep++;
	strcat(minusnam, namep);
	alarm(0);
	umask(02);
	showmotd();
	strcat(maildir, pwd->pw_name);
	if(access(maildir,4)==0) {
		struct stat statb;
		stat(maildir, &statb);
		if (statb.st_size)
			printf("You have mail.\n");
	}
	signal(SIGQUIT, SIG_DFL);
	signal(SIGINT, SIG_DFL);
	execlp(pwd->pw_shell, minusnam, 0);
	printf("No shell\n");
	exit(0);
}

int	stopmotd;
catch()
{
	signal(SIGINT, SIG_IGN);
	stopmotd++;
}

showmotd()
{
	FILE *mf;
	register c;

	signal(SIGINT, catch);
	if((mf = fopen("/etc/motd","r")) != NULL) {
		while((c = getc(mf)) != EOF && stopmotd == 0)
			putchar(c);
		fclose(mf);
	}
	signal(SIGINT, SIG_IGN);
}
Commit	Line	Data
05bfa7f4 TL	1	/*
	2	* login [ name ]
	3	*/
	4
	5	#include <sys/types.h>
	6	#include <sgtty.h>
	7	#include <utmp.h>
	8	#include <signal.h>
	9	#include <pwd.h>
	10	#include <stdio.h>
	11	#include <sys/stat.h>
	12	#define SCPYN(a, b) strncpy(a, b, sizeof(a))
	13
	14	char maildir[30] = "/usr/spool/mail/";
	15	struct passwd nouser = {"", "nope"};
	16	struct sgttyb ttyb;
	17	struct utmp utmp;
	18	char minusnam[16] = "-";
	19	char homedir[64] = "HOME=";
	20	char *envinit[] = {homedir, "PATH=:/bin:/usr/bin", 0};
	21	struct passwd *pwd;
	22
	23	struct passwd *getpwnam();
	24	char *strcat();
	25	int setpwent();
	26	char *ttyname();
	27	char *crypt();
	28	char *getpass();
	29	char *rindex();
	30	extern char **environ;
	31
	32	main(argc, argv)
	33	char **argv;
	34	{
	35	register char *namep;
	36	int t, f, c;
	37	char *ttyn;
	38
	39	alarm(60);
	40	signal(SIGQUIT, SIG_IGN);
	41	signal(SIGINT, SIG_IGN);
	42	nice(-100);
	43	nice(20);
	44	nice(0);
	45	gtty(0, &ttyb);
	46	ttyb.sg_erase = '#';
	47	ttyb.sg_kill = '@';
	48	stty(0, &ttyb);
	49	for (t=3; t<20; t++)
	50	close(t);
	51	ttyn = ttyname(0);
	52	if (ttyn==0)
	53	ttyn = "/dev/tty??";
	54
	55	loop:
	56	SCPYN(utmp.ut_name, "");
	57	if (argc>1) {
	58	SCPYN(utmp.ut_name, argv[1]);
	59	argc = 0;
	60	}
	61	while (utmp.ut_name[0] == '\0') {
	62	namep = utmp.ut_name;
	63	printf("login: ");
	64	while ((c = getchar()) != '\n') {
65	if(c == ' ')
66	c = '_';
67	if (c == EOF)
68	exit(0);
69	if (namep < utmp.ut_name+8)
70	*namep++ = c;
71	}
72	}
73	setpwent();
74	if ((pwd = getpwnam(utmp.ut_name)) == NULL)
75	pwd = &nouser;
76	endpwent();
77	if (*pwd->pw_passwd != '\0') {
78	namep = crypt(getpass("Password:"),pwd->pw_passwd);
79	if (strcmp(namep, pwd->pw_passwd)) {
80	printf("Login incorrect\n");
81	goto loop;
82	}
83	}
84	if(chdir(pwd->pw_dir) < 0) {
85	printf("No directory\n");
86	goto loop;
87	}
88	time(&utmp.ut_time);
89	t = ttyslot();
90	if (t>0 && (f = open("/etc/utmp", 1)) >= 0) {
91	lseek(f, (long)(t*sizeof(utmp)), 0);
92	SCPYN(utmp.ut_line, rindex(ttyn, '/')+1);
93	write(f, (char *)&utmp, sizeof(utmp));
94	close(f);
95	}
96	if (t>0 && (f = open("/usr/adm/wtmp", 1)) >= 0) {
97	lseek(f, 0L, 2);
98	write(f, (char *)&utmp, sizeof(utmp));
99	close(f);
100	}
101	chown(ttyn, pwd->pw_uid, pwd->pw_gid);
102	setgid(pwd->pw_gid);
103	setuid(pwd->pw_uid);
104	if (*pwd->pw_shell == '\0')
105	pwd->pw_shell = "/bin/sh";
106	environ = envinit;
107	strncat(homedir, pwd->pw_dir, sizeof(homedir)-6);
108	if ((namep = rindex(pwd->pw_shell, '/')) == NULL)
109	namep = pwd->pw_shell;
110	else
111	namep++;
112	strcat(minusnam, namep);
113	alarm(0);
114	umask(02);
115	showmotd();
116	strcat(maildir, pwd->pw_name);
117	if(access(maildir,4)==0) {
118	struct stat statb;
119	stat(maildir, &statb);
120	if (statb.st_size)
121	printf("You have mail.\n");
122	}
123	signal(SIGQUIT, SIG_DFL);
124	signal(SIGINT, SIG_DFL);
125	execlp(pwd->pw_shell, minusnam, 0);
126	printf("No shell\n");
127	exit(0);
128	}
129
130	int stopmotd;
131	catch()
132	{
133	signal(SIGINT, SIG_IGN);
134	stopmotd++;
135	}
136
137	showmotd()
138	{
139	FILE *mf;
140	register c;
141
142	signal(SIGINT, catch);
143	if((mf = fopen("/etc/motd","r")) != NULL) {
144	while((c = getc(mf)) != EOF && stopmotd == 0)
145	putchar(c);
146	fclose(mf);
147	}
148	signal(SIGINT, SIG_IGN);
149	}