#include "k5-int.h"
extern const krb5_kt_ops krb5_ktf_ops;
extern const krb5_kt_ops krb5_ktf_writable_ops;
extern const krb5_kt_ops krb5_kts_ops;
struct krb5_kt_typelist {
const krb5_kt_ops *ops;
struct krb5_kt_typelist *next;
};
static struct krb5_kt_typelist krb5_kt_typelist_wrfile = {
&krb5_ktf_writable_ops,
0
};
static struct krb5_kt_typelist krb5_kt_typelist_file = {
&krb5_ktf_ops,
&krb5_kt_typelist_wrfile
};
static struct krb5_kt_typelist krb5_kt_typelist_srvtab = {
&krb5_kts_ops,
&krb5_kt_typelist_file
};
static struct krb5_kt_typelist *kt_typehead = &krb5_kt_typelist_srvtab;
krb5_error_code KRB5_CALLCONV
krb5_kt_register(krb5_context context, krb5_kt_ops *ops)
{
struct krb5_kt_typelist *t;
for (t = kt_typehead;t && strcmp(t->ops->prefix,ops->prefix);t = t->next)
;
if (t) {
return KRB5_KT_TYPE_EXISTS;
}
if (!(t = (struct krb5_kt_typelist *) malloc(sizeof(*t))))
return ENOMEM;
t->next = kt_typehead;
t->ops = ops;
kt_typehead = t;
return 0;
}
krb5_error_code KRB5_CALLCONV
krb5_kt_resolve (krb5_context context, const char *name, krb5_keytab *ktid)
{
struct krb5_kt_typelist *tlist;
char *pfx;
unsigned int pfxlen;
const char *cp, *resid;
cp = strchr (name, ':');
if (!cp) {
return (*krb5_kt_dfl_ops.resolve)(context, name, ktid);
}
pfxlen = cp - name;
resid = name + pfxlen + 1;
pfx = malloc (pfxlen+1);
if (!pfx)
return ENOMEM;
memcpy (pfx, name, pfxlen);
pfx[pfxlen] = '\0';
*ktid = (krb5_keytab) 0;
for (tlist = kt_typehead; tlist; tlist = tlist->next) {
if (strcmp (tlist->ops->prefix, pfx) == 0) {
free(pfx);
return (*tlist->ops->resolve)(context, resid, ktid);
}
}
free(pfx);
return KRB5_KT_UNKNOWN_TYPE;
}
static krb5_error_code krb5_keytab_size
(krb5_context, krb5_pointer, size_t *);
static krb5_error_code krb5_keytab_externalize
(krb5_context, krb5_pointer, krb5_octet **, size_t *);
static krb5_error_code krb5_keytab_internalize
(krb5_context,krb5_pointer *, krb5_octet **, size_t *);
static const krb5_ser_entry krb5_keytab_ser_entry = {
KV5M_KEYTAB,
krb5_keytab_size,
krb5_keytab_externalize,
krb5_keytab_internalize
};
static krb5_error_code
krb5_keytab_size(krb5_context kcontext, krb5_pointer arg, size_t *sizep)
{
krb5_error_code kret;
krb5_keytab keytab;
krb5_ser_handle shandle;
kret = EINVAL;
if ((keytab = (krb5_keytab) arg) &&
keytab->ops &&
(shandle = (krb5_ser_handle) keytab->ops->serializer) &&
shandle->sizer)
kret = (*shandle->sizer)(kcontext, arg, sizep);
return(kret);
}
static krb5_error_code
krb5_keytab_externalize(krb5_context kcontext, krb5_pointer arg, krb5_octet **buffer, size_t *lenremain)
{
krb5_error_code kret;
krb5_keytab keytab;
krb5_ser_handle shandle;
kret = EINVAL;
if ((keytab = (krb5_keytab) arg) &&
keytab->ops &&
(shandle = (krb5_ser_handle) keytab->ops->serializer) &&
shandle->externalizer)
kret = (*shandle->externalizer)(kcontext, arg, buffer, lenremain);
return(kret);
}
static krb5_error_code
krb5_keytab_internalize(krb5_context kcontext, krb5_pointer *argp, krb5_octet **buffer, size_t *lenremain)
{
krb5_error_code kret;
krb5_ser_handle shandle;
kret = EINVAL;
if ((shandle = (krb5_ser_handle) krb5_kt_dfl_ops.serializer) &&
shandle->internalizer)
kret = (*shandle->internalizer)(kcontext, argp, buffer, lenremain);
return(kret);
}
krb5_error_code KRB5_CALLCONV
krb5_ser_keytab_init(krb5_context kcontext)
{
return(krb5_register_serializer(kcontext, &krb5_keytab_ser_entry));
}