#include <sys/types.h>

#include <stdio.h>
#include <stdlib.h>
#include <string.h>

#include <db.h>

#define DATABASE "access.db"


typedef struct {
       char address[80];
       char phone[30];
} addrinfo;

int main(void)
{
       DB *dbp;
       DBT key, data;
       int ret, t_ret;
       addrinfo info, *addrp;

       if ((ret = db_create(&dbp, NULL, 0)) != 0) {
               fprintf(stderr, "db_create: %s\n", db_strerror(ret));
               exit(1);
       }
       if ((ret = dbp->open(dbp, DATABASE, NULL, DB_BTREE,
               DB_CREATE, 0664)) != 0) {
               dbp->err(dbp, ret, "%s", DATABASE);
               goto err;
       }


       strcpy(info.address, "Kukvagen 54");
       strcpy(info.phone, "12345");

       memset(&key, 0, sizeof(key));
       memset(&data, 0, sizeof(data));
       key.data = "minnies";
       key.size = sizeof("minnies");
       data.data = &info;
       data.size = sizeof(info);

       if ((ret = dbp->put(dbp, NULL, &key, &data, 0)) == 0)
               printf("db: %s: key stored.\n", (char *)key.data);
       else {
               dbp->err(dbp, ret, "DB->put");
               goto err;
       }


       if ((ret = dbp->get(dbp, NULL, &key, &data, 0)) == 0) {
               addrp = (addrinfo*)data.data;
               printf("db: %s: key retrieved: data was %s, %s.\n",
                       (char *)key.data, addrp->address, addrp->phone);
       } else {
               dbp->err(dbp, ret, "DB->get");
               goto err;
       }


       if ((ret = dbp->del(dbp, NULL, &key, 0)) == 0)
               printf("db: %s: key was deleted.\n", (char *)key.data);
       else {
               dbp->err(dbp, ret, "DB->del");
               goto err;
       }


       if ((ret = dbp->get(dbp, NULL, &key, &data, 0)) == 0)
               printf("db: %s: key retrieved: data was %s.\n",
                       (char *)key.data, (char *)data.data);
       else
               dbp->err(dbp, ret, "DB->get");

err:    if ((t_ret = dbp->close(dbp, 0)) != 0 && ret == 0)
               ret = t_ret;

       exit(ret);
}