#include <stdlib.h>
#include <string.h>
#include <assert.h>
+#include <err.h>
#include "logging.h"
-struct tdb_layout *new_tdb_layout(void)
+struct tdb_layout *new_tdb_layout(const char *filename)
{
struct tdb_layout *layout = malloc(sizeof(*layout));
+ layout->filename = filename;
layout->num_elems = 0;
layout->elem = NULL;
- layout->ftable = layout->htable = -1;
return layout;
}
layout->elem[layout->num_elems++] = elem;
}
+void tdb_layout_add_zone(struct tdb_layout *layout,
+ unsigned int zone_bits,
+ bool fill_prev)
+{
+ union tdb_layout_elem elem;
+ if (fill_prev)
+ tdb_layout_add_free(layout, 0);
+ elem.base.type = ZONE;
+ elem.zone.zone_bits = zone_bits;
+ add(layout, elem);
+}
+
void tdb_layout_add_free(struct tdb_layout *layout, tdb_len_t len)
{
union tdb_layout_elem elem;
add(layout, elem);
}
-void tdb_layout_add_hashtable(struct tdb_layout *layout,
- unsigned int hash_bits,
- tdb_len_t extra)
-{
- union tdb_layout_elem elem;
- elem.base.type = HASHTABLE;
- elem.hashtable.hash_bits = hash_bits;
- elem.hashtable.extra = extra;
- assert(layout->htable == -1U);
- layout->htable = layout->num_elems;
- add(layout, elem);
-}
-
-void tdb_layout_add_freetable(struct tdb_layout *layout,
- unsigned int num_zones,
- unsigned int zone_bits,
- unsigned int num_buckets,
- tdb_len_t extra)
-{
- union tdb_layout_elem elem;
- elem.base.type = FREETABLE;
- elem.freetable.num_zones = num_zones;
- elem.freetable.zone_bits = zone_bits;
- elem.freetable.num_buckets = num_buckets;
- elem.freetable.extra = extra;
- assert(layout->ftable == -1U);
- layout->ftable = layout->num_elems;
- add(layout, elem);
-}
-
static tdb_len_t free_record_len(tdb_len_t len)
{
return sizeof(struct tdb_used_record) + len;
static tdb_len_t hashtable_len(struct tle_hashtable *htable)
{
return sizeof(struct tdb_used_record)
- + (sizeof(tdb_off_t) << htable->hash_bits);
+ + (sizeof(tdb_off_t) << TDB_SUBLEVEL_HASH_BITS)
+ + htable->extra;
}
-static tdb_len_t freetable_len(struct tle_freetable *ftable)
+static tdb_len_t zone_header_len(struct tle_zone *zone)
{
- return sizeof(struct tdb_used_record)
- + (sizeof(tdb_off_t) * ftable->num_zones
- * (ftable->num_buckets + 1));
+ return sizeof(struct free_zone_header)
+ + sizeof(tdb_off_t) * (BUCKETS_FOR_ZONE(zone->zone_bits)+1);
}
static void set_free_record(void *mem, tdb_len_t len)
}
static void set_data_record(void *mem, struct tdb_context *tdb,
+ struct tle_zone *last_zone,
struct tle_used *used)
{
struct tdb_used_record *u = mem;
set_header(tdb, u, used->key.dsize, used->data.dsize,
used->key.dsize + used->data.dsize + used->extra,
- tdb_hash(tdb, used->key.dptr, used->key.dsize));
+ tdb_hash(tdb, used->key.dptr, used->key.dsize),
+ last_zone->zone_bits);
memcpy(u + 1, used->key.dptr, used->key.dsize);
memcpy((char *)(u + 1) + used->key.dsize,
used->data.dptr, used->data.dsize);
}
static void set_hashtable(void *mem, struct tdb_context *tdb,
+ struct tle_zone *last_zone,
struct tle_hashtable *htable)
{
struct tdb_used_record *u = mem;
- tdb_len_t len = sizeof(tdb_off_t) << htable->hash_bits;
+ tdb_len_t len = sizeof(tdb_off_t) << TDB_SUBLEVEL_HASH_BITS;
- set_header(tdb, u, 0, len, len + htable->extra, 0);
+ set_header(tdb, u, 0, len, len + htable->extra, 0,
+ last_zone->zone_bits);
memset(u + 1, 0, len);
}
-static void set_freetable(void *mem, struct tdb_context *tdb,
- struct tle_freetable *ftable)
+static void set_zone(void *mem, struct tdb_context *tdb,
+ struct tle_zone *zone)
{
- struct tdb_used_record *u = mem;
- tdb_len_t len = sizeof(tdb_off_t) * ftable->num_zones
- * (ftable->num_buckets + 1);
- set_header(tdb, u, 0, len, len + ftable->extra, 0);
- memset(u + 1, 0, len);
+ struct free_zone_header *fz = mem;
+ memset(fz, 0, zone_header_len(zone));
+ fz->zone_bits = zone->zone_bits;
}
static void add_to_freetable(struct tdb_context *tdb,
+ struct tle_zone *last_zone,
tdb_off_t eoff,
tdb_off_t elen)
{
- add_free_record(tdb, eoff, sizeof(struct tdb_used_record) + elen);
+ add_free_record(tdb, last_zone->zone_bits, eoff,
+ sizeof(struct tdb_used_record) + elen);
+}
+
+static tdb_off_t hbucket_off(tdb_off_t group_start, unsigned ingroup)
+{
+ return group_start
+ + (ingroup % (1 << TDB_HASH_GROUP_BITS)) * sizeof(tdb_off_t);
}
+/* Get bits from a value. */
+static uint32_t bits(uint64_t val, unsigned start, unsigned num)
+{
+ assert(num <= 32);
+ return (val >> start) & ((1U << num) - 1);
+}
+
+/* We take bits from the top: that way we can lock whole sections of the hash
+ * by using lock ranges. */
+static uint32_t use_bits(uint64_t h, unsigned num, unsigned *used)
+{
+ *used += num;
+ return bits(h, 64 - *used, num);
+}
+
+static tdb_off_t encode_offset(tdb_off_t new_off, unsigned bucket,
+ uint64_t h)
+{
+ return bucket
+ | new_off
+ | ((uint64_t)bits(h, 64 - TDB_OFF_UPPER_STEAL_EXTRA,
+ TDB_OFF_UPPER_STEAL_EXTRA)
+ << TDB_OFF_HASH_EXTRA_BIT);
+}
+
+/* FIXME: Our hash table handling here is primitive: we don't expand! */
static void add_to_hashtable(struct tdb_context *tdb,
tdb_off_t eoff,
struct tdb_data key)
{
- uint64_t hash = tdb_hash(tdb, key.dptr, key.dsize);
- tdb_off_t hoff;
+ uint64_t h = tdb_hash(tdb, key.dptr, key.dsize);
+ tdb_off_t b_off, group_start;
+ unsigned i, group, in_group;
+ unsigned used = 0;
+
+ group = use_bits(h, TDB_TOPLEVEL_HASH_BITS-TDB_HASH_GROUP_BITS, &used);
+ in_group = use_bits(h, TDB_HASH_GROUP_BITS, &used);
+
+ group_start = offsetof(struct tdb_header, hashtable)
+ + group * (sizeof(tdb_off_t) << TDB_HASH_GROUP_BITS);
- while (tdb_read_off(tdb, hoff = hash_off(tdb, hash)) != 0)
- hash++;
+ for (i = 0; i < (1 << TDB_HASH_GROUP_BITS); i++) {
+ unsigned bucket = (in_group + i) % (1 << TDB_HASH_GROUP_BITS);
- tdb_write_off(tdb, hoff, eoff);
+ b_off = hbucket_off(group_start, bucket);
+ if (tdb_read_off(tdb, b_off) == 0) {
+ tdb_write_off(tdb, b_off,
+ encode_offset(eoff, bucket, h));
+ return;
+ }
+ }
+ abort();
}
/* FIXME: Support TDB_CONVERT */
struct tdb_context *tdb_layout_get(struct tdb_layout *layout)
{
unsigned int i;
- tdb_off_t len;
- struct tdb_header *hdr;
+ tdb_off_t off, len;
+ tdb_len_t zone_left;
char *mem;
struct tdb_context *tdb;
+ struct tle_zone *last_zone = NULL;
- assert(layout->ftable != -1U);
- assert(layout->htable != -1U);
+ assert(layout->elem[0].base.type == ZONE);
- len = sizeof(struct tdb_header);
+ zone_left = 0;
+ off = sizeof(struct tdb_header);
/* First pass of layout: calc lengths */
for (i = 0; i < layout->num_elems; i++) {
union tdb_layout_elem *e = &layout->elem[i];
- e->base.off = len;
+ e->base.off = off;
switch (e->base.type) {
+ case ZONE:
+ assert(zone_left == 0);
+ len = zone_header_len(&e->zone);
+ zone_left = 1ULL << e->zone.zone_bits;
+ break;
case FREE:
- len += free_record_len(e->free.len);
+ if (e->free.len == 0)
+ e->free.len = zone_left
+ - sizeof(struct tdb_used_record);
+ len = free_record_len(e->free.len);
break;
case DATA:
- len += data_record_len(&e->used);
+ len = data_record_len(&e->used);
break;
case HASHTABLE:
- len += hashtable_len(&e->hashtable);
- break;
- case FREETABLE:
- len += freetable_len(&e->freetable);
+ len = hashtable_len(&e->hashtable);
break;
+ default:
+ abort();
}
+ off += len;
+ assert(zone_left >= len);
+ zone_left -= len;
}
- mem = malloc(len);
+ mem = malloc(off);
/* Now populate our header, cribbing from a real TDB header. */
tdb = tdb_open(NULL, TDB_INTERNAL, O_RDWR, 0, &tap_log_attr);
- hdr = (void *)mem;
- *hdr = tdb->header;
- hdr->v.generation++;
- hdr->v.num_zones = layout->elem[layout->ftable].freetable.num_zones;
- hdr->v.zone_bits = layout->elem[layout->ftable].freetable.zone_bits;
- hdr->v.free_buckets
- = layout->elem[layout->ftable].freetable.num_buckets;
- hdr->v.free_off = layout->elem[layout->ftable].base.off
- + sizeof(struct tdb_used_record);
- hdr->v.hash_bits = layout->elem[layout->htable].hashtable.hash_bits;
- hdr->v.hash_off = layout->elem[layout->htable].base.off
- + sizeof(struct tdb_used_record);
+ memcpy(mem, tdb->map_ptr, sizeof(struct tdb_header));
/* Mug the tdb we have to make it use this. */
free(tdb->map_ptr);
tdb->map_ptr = mem;
- tdb->map_size = len;
- header_changed(tdb);
+ tdb->map_size = off;
for (i = 0; i < layout->num_elems; i++) {
union tdb_layout_elem *e = &layout->elem[i];
switch (e->base.type) {
+ case ZONE:
+ set_zone(mem + e->base.off, tdb, &e->zone);
+ last_zone = &e->zone;
+ break;
case FREE:
set_free_record(mem + e->base.off, e->free.len);
break;
case DATA:
- set_data_record(mem + e->base.off, tdb, &e->used);
+ set_data_record(mem + e->base.off, tdb, last_zone,
+ &e->used);
break;
case HASHTABLE:
- set_hashtable(mem + e->base.off, tdb, &e->hashtable);
- break;
- case FREETABLE:
- set_freetable(mem + e->base.off, tdb, &e->freetable);
+ set_hashtable(mem + e->base.off, tdb, last_zone,
+ &e->hashtable);
break;
}
}
for (i = 0; i < layout->num_elems; i++) {
union tdb_layout_elem *e = &layout->elem[i];
switch (e->base.type) {
+ case ZONE:
+ last_zone = &e->zone;
+ break;
case FREE:
- add_to_freetable(tdb, e->base.off, e->free.len);
+ add_to_freetable(tdb, last_zone,
+ e->base.off, e->free.len);
break;
case DATA:
add_to_hashtable(tdb, e->base.off, e->used.key);
}
}
+ /* Get physical if they asked for it. */
+ if (layout->filename) {
+ int fd = open(layout->filename, O_WRONLY|O_TRUNC|O_CREAT,
+ 0600);
+ if (fd < 0)
+ err(1, "opening %s for writing", layout->filename);
+ if (write(fd, tdb->map_ptr, tdb->map_size) != tdb->map_size)
+ err(1, "writing %s", layout->filename);
+ close(fd);
+ tdb_close(tdb);
+ /* NOMMAP is for lockcheck. */
+ tdb = tdb_open(layout->filename, TDB_NOMMAP, O_RDWR, 0,
+ &tap_log_attr);
+ }
+
return tdb;
}