-LOC_EXPORT int loc_database_new(struct loc_ctx* ctx, struct loc_database** database, size_t pool_size) {
- struct loc_database* db = calloc(1, sizeof(*db));
- if (!db)
- return -ENOMEM;
-
- // Reference context
- db->ctx = loc_ref(ctx);
- db->refcount = 1;
-
- // Save creation time
- db->created_at = time(NULL);
-
- DEBUG(db->ctx, "Database allocated at %p\n", db);
-
- // Create string pool
- int r = loc_stringpool_new(db->ctx, &db->pool, pool_size);
- if (r) {
- loc_database_unref(db);
- return r;
- }
-
- *database = db;
-
- return 0;
-}
-
-LOC_EXPORT int loc_database_open(struct loc_ctx* ctx, struct loc_database** database, FILE* f) {
- int r = loc_database_new(ctx, database, 0);
- if (r)
- return r;
-
- return loc_database_read(*database, f);
-}
-
-LOC_EXPORT struct loc_database* loc_database_ref(struct loc_database* db) {
- db->refcount++;
-
- return db;
-}
-
-static void loc_database_free(struct loc_database* db) {
- DEBUG(db->ctx, "Releasing database %p\n", db);
-
- // Remove references to all ASes
- if (db->as) {
- for (unsigned int i = 0; i < db->as_count; i++) {
- loc_as_unref(db->as[i]);
- }
- free(db->as);
- }
-
- loc_stringpool_unref(db->pool);
-
- // Close file
- if (db->file)
- fclose(db->file);
-
- loc_unref(db->ctx);
- free(db);
-}
-
-LOC_EXPORT struct loc_database* loc_database_unref(struct loc_database* db) {
- if (--db->refcount > 0)
- return NULL;
-
- loc_database_free(db);
- return NULL;
-}
-
-LOC_EXPORT time_t loc_database_created_at(struct loc_database* db) {
- return db->created_at;
-}
-
-LOC_EXPORT const char* loc_database_get_vendor(struct loc_database* db) {
- return loc_stringpool_get(db->pool, db->vendor);
-}
-
-LOC_EXPORT int loc_database_set_vendor(struct loc_database* db, const char* vendor) {
- // Add the string to the string pool
- off_t offset = loc_stringpool_add(db->pool, vendor);
- if (offset < 0)
- return offset;
-
- db->vendor = offset;
- return 0;
-}
-
-LOC_EXPORT const char* loc_database_get_description(struct loc_database* db) {
- return loc_stringpool_get(db->pool, db->description);
-}
-
-LOC_EXPORT int loc_database_set_description(struct loc_database* db, const char* description) {
- // Add the string to the string pool
- off_t offset = loc_stringpool_add(db->pool, description);
- if (offset < 0)
- return offset;
-
- db->description = offset;
- return 0;
-}
-
-LOC_EXPORT size_t loc_database_count_as(struct loc_database* db) {
- return db->as_count;
-}
-
-static int loc_database_has_as(struct loc_database* db, struct loc_as* as) {
- for (unsigned int i = 0; i < db->as_count; i++) {
- if (loc_as_cmp(as, db->as[i]) == 0)
- return i;
- }
-
- return -1;
-}
-
-static int __loc_as_cmp(const void* as1, const void* as2) {
- return loc_as_cmp(*(struct loc_as**)as1, *(struct loc_as**)as2);
-}
-
-static void loc_database_sort_ases(struct loc_database* db) {
- qsort(db->as, db->as_count, sizeof(*db->as), __loc_as_cmp);
-}
-
-static struct loc_as* __loc_database_add_as(struct loc_database* db, struct loc_as* as) {
- // Check if AS exists already
- int i = loc_database_has_as(db, as);
- if (i >= 0) {
- loc_as_unref(as);
-
- // Select already existing AS
- as = db->as[i];
-
- return loc_as_ref(as);
- }
-
- db->as_count++;
-
- // Make space for the new entry
- db->as = realloc(db->as, sizeof(*db->as) * db->as_count);
-
- // Add the new entry at the end
- db->as[db->as_count - 1] = loc_as_ref(as);
-
- // Sort everything
- loc_database_sort_ases(db);
-
- return as;
-}
-
-LOC_EXPORT struct loc_as* loc_database_add_as(struct loc_database* db, uint32_t number) {
- struct loc_as* as;
- int r = loc_as_new(db->ctx, db->pool, &as, number);
- if (r)
- return NULL;
-
- return __loc_database_add_as(db, as);
-}
-