#include "k5-int.h"
#include "rc-int.h"
static krb5_error_code krb5_rcache_size
(krb5_context, krb5_pointer, size_t *);
static krb5_error_code krb5_rcache_externalize
(krb5_context, krb5_pointer, krb5_octet **, size_t *);
static krb5_error_code krb5_rcache_internalize
(krb5_context,krb5_pointer *, krb5_octet **, size_t *);
static const krb5_ser_entry krb5_rcache_ser_entry = {
KV5M_RCACHE,
krb5_rcache_size,
krb5_rcache_externalize,
krb5_rcache_internalize
};
static krb5_error_code
krb5_rcache_size(krb5_context kcontext, krb5_pointer arg, size_t *sizep)
{
krb5_error_code kret;
krb5_rcache rcache;
size_t required;
kret = EINVAL;
if ((rcache = (krb5_rcache) arg)) {
required = sizeof(krb5_int32) * 3;
if (rcache->ops && rcache->ops->type)
required += (strlen(rcache->ops->type)+1);
required += strlen(krb5_rc_get_name(kcontext, rcache));
kret = 0;
*sizep += required;
}
return(kret);
}
static krb5_error_code
krb5_rcache_externalize(krb5_context kcontext, krb5_pointer arg, krb5_octet **buffer, size_t *lenremain)
{
krb5_error_code kret;
krb5_rcache rcache;
size_t required;
krb5_octet *bp;
size_t remain;
char *rcname;
size_t namelen;
char *fnamep;
required = 0;
bp = *buffer;
remain = *lenremain;
kret = EINVAL;
if ((rcache = (krb5_rcache) arg)) {
kret = ENOMEM;
if (!krb5_rcache_size(kcontext, arg, &required) &&
(required <= remain)) {
(void) krb5_ser_pack_int32(KV5M_RCACHE, &bp, &remain);
namelen = (rcache->ops && rcache->ops->type) ?
strlen(rcache->ops->type)+1 : 0;
fnamep = krb5_rc_get_name(kcontext, rcache);
namelen += (strlen(fnamep)+1);
if ((rcname = (char *) malloc(namelen))) {
if (rcache->ops && rcache->ops->type)
sprintf(rcname, "%s:%s", rcache->ops->type, fnamep);
else
strcpy(rcname, fnamep);
(void) krb5_ser_pack_int32((krb5_int32) strlen(rcname),
&bp, &remain);
(void) krb5_ser_pack_bytes((krb5_octet *) rcname,
strlen(rcname),
&bp, &remain);
(void) krb5_ser_pack_int32(KV5M_RCACHE, &bp, &remain);
kret = 0;
*buffer = bp;
*lenremain = remain;
free(rcname);
}
}
}
return(kret);
}
static krb5_error_code
krb5_rcache_internalize(krb5_context kcontext, krb5_pointer *argp, krb5_octet **buffer, size_t *lenremain)
{
krb5_error_code kret;
krb5_rcache rcache;
krb5_int32 ibuf;
krb5_octet *bp;
size_t remain;
char *rcname;
bp = *buffer;
remain = *lenremain;
kret = EINVAL;
if (krb5_ser_unpack_int32(&ibuf, &bp, &remain))
ibuf = 0;
if (ibuf == KV5M_RCACHE) {
kret = ENOMEM;
kret = krb5_ser_unpack_int32(&ibuf, &bp, &remain);
if (!kret &&
(rcname = (char *) malloc((size_t) (ibuf+1))) &&
!(kret = krb5_ser_unpack_bytes((krb5_octet *) rcname,
(size_t) ibuf,
&bp, &remain))) {
rcname[ibuf] = '\0';
if (!(kret = krb5_rc_resolve_full(kcontext, &rcache, rcname))) {
(void) krb5_rc_recover(kcontext, rcache);
if (!kret &&
!(kret = krb5_ser_unpack_int32(&ibuf, &bp, &remain)) &&
(ibuf == KV5M_RCACHE)) {
*buffer = bp;
*lenremain = remain;
*argp = (krb5_pointer) rcache;
}
else
krb5_rc_close(kcontext, rcache);
}
free(rcname);
}
}
return(kret);
}
krb5_error_code KRB5_CALLCONV
krb5_ser_rcache_init(krb5_context kcontext)
{
return(krb5_register_serializer(kcontext, &krb5_rcache_ser_entry));
}