Files
heimdal/lib/hdb/db.c
Johan Danielsson 86d922a0fc Don't free, don't malloc (by a paraphrased Yoshigasaki-sensei).
git-svn-id: svn://svn.h5l.se/heimdal/trunk/heimdal@2243 ec53bebd-3082-4978-b11e-865c3cabbd6b
1997-07-13 03:11:00 +00:00

137 lines
2.7 KiB
C

#include "hdb_locl.h"
RCSID("$Id$");
#ifdef HAVE_DB_H
krb5_error_code
DB_close(krb5_context context, HDB *db)
{
DB *d = (DB*)db->db;
d->close(d);
free(db);
return 0;
}
static krb5_error_code
DB_op(krb5_context context, HDB *db, hdb_entry *entry, int op)
{
DB *d = (DB*)db->db;
DBT key, value;
krb5_data data;
int err;
hdb_principal2key(context, entry->principal, &data);
key.data = data.data;
key.size = data.length;
switch(op){
case 0:
err = d->get(d, &key, &value, 0);
break;
case 1:
hdb_entry2value(context, entry, &data);
value.data = data.data;
value.size = data.length;
err = d->put(d, &key, &value, 0);
krb5_data_free(&data);
break;
case 2:
err = d->del(d, &key, 0);
break;
}
data.data = key.data;
data.length = key.size;
krb5_data_free(&data);
if(err < 0)
return errno;
if(err == 1)
return KRB5_HDB_NOENTRY;
if(op == 0){
data.data = value.data;
data.length = value.size;
hdb_value2entry(context, &data, entry);
}
return 0;
}
static krb5_error_code
DB_fetch(krb5_context context, HDB *db, hdb_entry *entry)
{
return DB_op(context, db, entry, 0);
}
static krb5_error_code
DB_store(krb5_context context, HDB *db, hdb_entry *entry)
{
return DB_op(context, db, entry, 1);
}
static krb5_error_code
DB_delete(krb5_context context, HDB *db, hdb_entry *entry)
{
return DB_op(context, db, entry, 2);
}
static krb5_error_code
DB_seq(krb5_context context, HDB *db, hdb_entry *entry, int flag)
{
DB *d = (DB*)db->db;
DBT key, value;
krb5_data data;
int err;
err = d->seq(d, &key, &value, flag);
if(err == -1)
return errno;
if(err == 1)
return KRB5_HDB_NOENTRY;
data.data = key.data;
data.length = key.size;
hdb_key2principal(context, &data, &entry->principal);
data.data = value.data;
data.length = value.size;
hdb_value2entry(context, &data, entry);
return 0;
}
static krb5_error_code
DB_firstkey(krb5_context context, HDB *db, hdb_entry *entry)
{
return DB_seq(context, db, entry, R_FIRST);
}
static krb5_error_code
DB_nextkey(krb5_context context, HDB *db, hdb_entry *entry)
{
return DB_seq(context, db, entry, R_NEXT);
}
krb5_error_code
hdb_db_open(krb5_context context, HDB **db,
const char *filename, int flags, mode_t mode)
{
DB *d;
char *fn = malloc(strlen(filename) + 4);
sprintf(fn, "%s.db", filename);
d = dbopen(fn, flags, mode, DB_BTREE, NULL);
free(fn);
if(d == NULL)
return errno;
*db = malloc(sizeof(**db));
(*db)->db = d;
(*db)->close = DB_close;
(*db)->fetch = DB_fetch;
(*db)->store = DB_store;
(*db)->delete = DB_delete;
(*db)->firstkey = DB_firstkey;
(*db)->nextkey= DB_nextkey;
return 0;
}
#endif