#include "k5-int.h"
#include "int-proto.h"
static krb5_error_code krb5_address_size
(krb5_context, krb5_pointer, size_t *);
static krb5_error_code krb5_address_externalize
(krb5_context, krb5_pointer, krb5_octet **, size_t *);
static krb5_error_code krb5_address_internalize
(krb5_context,krb5_pointer *, krb5_octet **, size_t *);
static const krb5_ser_entry krb5_address_ser_entry = {
KV5M_ADDRESS,
krb5_address_size,
krb5_address_externalize,
krb5_address_internalize
};
static krb5_error_code
krb5_address_size(krb5_context kcontext, krb5_pointer arg, size_t *sizep)
{
krb5_error_code kret;
krb5_address *address;
kret = EINVAL;
if ((address = (krb5_address *) arg)) {
*sizep += (sizeof(krb5_int32) +
sizeof(krb5_int32) +
sizeof(krb5_int32) +
sizeof(krb5_int32) +
(size_t) address->length);
kret = 0;
}
return(kret);
}
static krb5_error_code
krb5_address_externalize(krb5_context kcontext, krb5_pointer arg, krb5_octet **buffer, size_t *lenremain)
{
krb5_error_code kret;
krb5_address *address;
size_t required;
krb5_octet *bp;
size_t remain;
required = 0;
bp = *buffer;
remain = *lenremain;
kret = EINVAL;
if ((address = (krb5_address *) arg)) {
kret = ENOMEM;
if (!krb5_address_size(kcontext, arg, &required) &&
(required <= remain)) {
(void) krb5_ser_pack_int32(KV5M_ADDRESS, &bp, &remain);
(void) krb5_ser_pack_int32((krb5_int32) address->addrtype,
&bp, &remain);
(void) krb5_ser_pack_int32((krb5_int32) address->length,
&bp, &remain);
(void) krb5_ser_pack_bytes(address->contents,
(size_t) address->length,
&bp, &remain);
(void) krb5_ser_pack_int32(KV5M_ADDRESS, &bp, &remain);
kret = 0;
*buffer = bp;
*lenremain = remain;
}
}
return(kret);
}
static krb5_error_code
krb5_address_internalize(krb5_context kcontext, krb5_pointer *argp, krb5_octet **buffer, size_t *lenremain)
{
krb5_error_code kret;
krb5_address *address;
krb5_int32 ibuf;
krb5_octet *bp;
size_t remain;
bp = *buffer;
remain = *lenremain;
kret = EINVAL;
if (krb5_ser_unpack_int32(&ibuf, &bp, &remain))
ibuf = 0;
if (ibuf == KV5M_ADDRESS) {
kret = ENOMEM;
if ((remain >= (2*sizeof(krb5_int32))) &&
(address = (krb5_address *) malloc(sizeof(krb5_address)))) {
memset(address, 0, sizeof(krb5_address));
address->magic = KV5M_ADDRESS;
(void) krb5_ser_unpack_int32(&ibuf, &bp, &remain);
address->addrtype = (krb5_addrtype) ibuf;
(void) krb5_ser_unpack_int32(&ibuf, &bp, &remain);
address->length = (int) ibuf;
if ((address->contents = (krb5_octet *) malloc((size_t) (ibuf))) &&
!(kret = krb5_ser_unpack_bytes(address->contents,
(size_t) ibuf,
&bp, &remain))) {
if ((kret = krb5_ser_unpack_int32(&ibuf, &bp, &remain)))
ibuf = 0;
if (!kret && (ibuf == KV5M_ADDRESS)) {
address->magic = KV5M_ADDRESS;
*buffer = bp;
*lenremain = remain;
*argp = (krb5_pointer) address;
}
else
kret = EINVAL;
}
if (kret) {
if (address->contents)
free(address->contents);
free(address);
}
}
}
return(kret);
}
krb5_error_code
krb5_ser_address_init(krb5_context kcontext)
{
return(krb5_register_serializer(kcontext, &krb5_address_ser_entry));
}