#include "gssapiP_generic.h"
#ifdef HAVE_SYS_TYPES_H
#include <sys/types.h>
#endif
#include <fcntl.h>
#include <limits.h>
#ifdef HAVE_BSD_DB
#include <sys/file.h>
#include <db.h>
static const int one = 1;
static const DBT dbtone = { (void *) &one, sizeof(one) };
typedef struct _vkey {
int type;
void *ptr;
} vkey;
#endif
#define V_NAME 1
#define V_CRED_ID 2
#define V_CTX_ID 3
static int g_save(db, type, ptr)
void **db;
#ifdef HAVE_BSD_DB
int type;
#else
void *type;
#endif
void *ptr;
{
#ifdef HAVE_BSD_DB
DB **vdb = (DB **) db;
vkey vk;
DBT key;
if (!*vdb)
*vdb = dbopen(NULL, O_CREAT|O_RDWR, O_CREAT|O_RDWR, DB_HASH, NULL);
vk.type = type;
vk.ptr = ptr;
key.data = &vk;
key.size = sizeof(vk);
return((*((*vdb)->put))(*vdb, &key, &dbtone, 0) == 0);
#else
g_set *gs = (g_set *) db;
if (!*gs)
if (g_set_init(gs))
return(0);
return(g_set_entry_add(gs, ptr, type) == 0);
#endif
}
static int g_validate(db, type, ptr)
void **db;
#ifdef HAVE_BSD_DB
int type;
#else
void *type;
#endif
void *ptr;
{
#ifdef HAVE_BSD_DB
DB **vdb = (DB **) db;
vkey vk;
DBT key, value;
if (!*vdb)
return(0);
vk.type = type;
vk.ptr = ptr;
key.data = &vk;
key.size = sizeof(vk);
if ((*((*vdb)->get))(*vdb, &key, &value, 0))
return(0);
return((value.size == sizeof(one)) &&
(*((int *) value.data) == one));
#else
g_set *gs = (g_set *) db;
void *value;
if (!*gs)
return(0);
if (g_set_entry_get(gs, ptr, (void **) &value))
return(0);
return(value == type);
#endif
}
static int g_delete(db, type, ptr)
void **db;
#ifdef HAVE_BSD_DB
int type;
#else
void *type;
#endif
void *ptr;
{
#ifdef HAVE_BSD_DB
DB **vdb = (DB **) db;
vkey vk;
DBT key;
if (!*vdb)
return(0);
vk.type = type;
vk.ptr = ptr;
key.data = &vk;
key.size = sizeof(vk);
return((*((*vdb)->del))(*vdb, &key, 0) == 0);
#else
g_set *gs = (g_set *) db;
if (!*gs)
return(0);
if (g_set_entry_delete(gs, ptr))
return(0);
return(1);
#endif
}
int g_save_name(vdb, name)
void **vdb;
gss_name_t *name;
{
return(g_save(vdb, V_NAME, (void *) name));
}
int g_save_cred_id(vdb, cred)
void **vdb;
gss_cred_id_t *cred;
{
return(g_save(vdb, V_CRED_ID, (void *) cred));
}
int g_save_ctx_id(vdb, ctx)
void **vdb;
gss_ctx_id_t *ctx;
{
return(g_save(vdb, V_CTX_ID, (void *) ctx));
}
int g_validate_name(vdb, name)
void **vdb;
gss_name_t *name;
{
return(g_validate(vdb, V_NAME, (void *) name));
}
int g_validate_cred_id(vdb, cred)
void **vdb;
gss_cred_id_t *cred;
{
return(g_validate(vdb, V_CRED_ID, (void *) cred));
}
int g_validate_ctx_id(vdb, ctx)
void **vdb;
gss_ctx_id_t *ctx;
{
return(g_validate(vdb, V_CTX_ID, (void *) ctx));
}
int g_delete_name(vdb, name)
void **vdb;
gss_name_t *name;
{
return(g_delete(vdb, V_NAME, (void *) name));
}
int g_delete_cred_id(vdb, cred)
void **vdb;
gss_cred_id_t *cred;
{
return(g_delete(vdb, V_CRED_ID, (void *) cred));
}
int g_delete_ctx_id(vdb, ctx)
void **vdb;
gss_ctx_id_t *ctx;
{
return(g_delete(vdb, V_CTX_ID, (void *) ctx));
}