54 lines
1.3 KiB
C
54 lines
1.3 KiB
C
|
/*
|
||
|
|
* Copyright 1985, 1986, 1987, 1988 by the Massachusetts Institute
|
||
|
|
* of Technology.
|
||
|
|
* For copying and distribution information, please see the file
|
||
|
|
* <Copyright.MIT>.
|
||
|
|
*
|
||
|
|
* from: pkt_clen.c,v 4.7 88/11/15 16:56:36 jtkohl Exp $
|
||
|
|
* $Id: pkt_clen.c,v 1.2 1994/07/19 19:26:09 g89r4222 Exp $
|
||
|
|
*/
|
||
|
|
|
||
|
|
#ifndef lint
|
||
|
|
static char *rcsid =
|
||
|
|
"$Id: pkt_clen.c,v 1.2 1994/07/19 19:26:09 g89r4222 Exp $";
|
||
|
|
#endif /* lint */
|
||
|
|
|
||
|
|
#include <krb.h>
|
||
|
|
#include <prot.h>
|
||
|
|
|
||
|
|
extern int krb_debug;
|
||
|
|
extern int swap_bytes;
|
||
|
|
|
||
|
|
/*
|
||
|
|
* Given a pointer to an AUTH_MSG_KDC_REPLY packet, return the length of
|
||
|
|
* its ciphertext portion. The external variable "swap_bytes" is assumed
|
||
|
|
* to have been set to indicate whether or not the packet is in local
|
||
|
|
* byte order. pkt_clen() takes this into account when reading the
|
||
|
|
* ciphertext length out of the packet.
|
||
|
|
*/
|
||
|
|
|
||
|
|
pkt_clen(pkt)
|
||
|
|
KTEXT pkt;
|
||
|
|
{
|
||
|
|
static unsigned short temp,temp2;
|
||
|
|
int clen = 0;
|
||
|
|
|
||
|
|
/* Start of ticket list */
|
||
|
|
unsigned char *ptr = pkt_a_realm(pkt) + 10
|
||
|
|
+ strlen((char *)pkt_a_realm(pkt));
|
||
|
|
|
||
|
|
/* Finally the length */
|
||
|
|
bcopy((char *)(++ptr),(char *)&temp,2); /* alignment */
|
||
|
|
if (swap_bytes) {
|
||
|
|
/* assume a short is 2 bytes?? */
|
||
|
|
swab((char *)&temp,(char *)&temp2,2);
|
||
|
|
temp = temp2;
|
||
|
|
}
|
||
|
|
|
||
|
|
clen = (int) temp;
|
||
|
|
|
||
|
|
if (krb_debug)
|
||
|
|
printf("Clen is %d\n",clen);
|
||
|
|
return(clen);
|
||
|
|
}
|