1 /*-
64 #include "auth.h"
78 #define	KRB_CHALLENGE	3		/* Challenge for mutual auth. */
79 #define	KRB_RESPONSE	4		/* Response for mutual auth. */
81 static	KTEXT_ST auth;  variable
99 	if (c == -1)  in Data()
110 	*p++ = ap->type;  in Data()
111 	*p++ = ap->way;  in Data()
113 	while (c-- > 0) {  in Data()
120 		printsub('>', &str_data[2], p - (&str_data[2]));  in Data()
121 	return(net_write(str_data, p - str_data));  in Data()
165 	instance[sizeof(instance)-1] = '\0';  in kerberos4_send()
198 	if ((ap->way & AUTH_HOW_MASK) == AUTH_HOW_MUTUAL) {  in kerberos4_send()
209 		for (i = 7; i >= 0; --i) {  in kerberos4_send()
240 	if (cnt-- < 1)  in kerberos4_is()
245 			Data(ap, KRB_REJECT, "No local V4 Realm.", -1);  in kerberos4_is()
251 		memmove((void *)auth.dat, (void *)data, auth.length = cnt);  in kerberos4_is()
254 			printf("CK: %d:", kerberos4_cksum(auth.dat, auth.length));  in kerberos4_is()
255 			printd(auth.dat, auth.length);  in kerberos4_is()
259 		if ((r = krb_rd_req(&auth, krb_service_name,  in kerberos4_is()
263 			Data(ap, KRB_REJECT, krb_err_txt[r], -1);  in kerberos4_is()
275 			Data(ap, KRB_REJECT, "user is not authorized", -1);  in kerberos4_is()
307 		 * increment by one, re-encrypt it and send it back.  in kerberos4_is()
310 		for (r = 7; r >= 0; r--) {  in kerberos4_is()
324 			printf("Unknown Kerberos option %d\r\n", data[-1]);  in kerberos4_is()
337 	if (cnt-- < 1)  in kerberos4_reply()
350 		if ((ap->way & AUTH_HOW_MASK) == AUTH_HOW_MUTUAL) {  in kerberos4_reply()
390 			printf("Unknown Kerberos option %d\r\n", data[-1]);  in kerberos4_reply()
408 #define	BUMP(buf, len)		while (*(buf)) {++(buf), --(len);}
409 #define	ADDC(buf, len, c)	if ((len) > 0) {*(buf)++ = (c); --(len);}
417 	buf[buflen-1] = '\0';		/* make sure its NULL terminated */  in kerberos4_printsub()
418 	buflen -= 1;  in kerberos4_printsub()
423 		goto common;  in kerberos4_printsub()
427 	common:  in kerberos4_printsub()
439 		strncpy((char *)buf, " AUTH", buflen);  in kerberos4_printsub()
485 		--n;  in kerberos4_cksum()
488 		--n;  in kerberos4_cksum()
491 		--n;  in kerberos4_cksum()
494 		--n;  in kerberos4_cksum()