]> git.ipfire.org Git - people/ms/libloc.git/blobdiff - src/database.c
Mark all nodes as non-visited after walk through tree has completed
[people/ms/libloc.git] / src / database.c
index 2c8af0c1c64791e7e0f3b1e9ac2c739ad8288a73..7950b46c943758de5a729a3bb561c254b5ac4e83 100644 (file)
@@ -62,6 +62,14 @@ struct loc_database {
        struct loc_stringpool* pool;
 };
 
+#define MAX_STACK_DEPTH 256
+
+struct loc_node_stack {
+       off_t offset;
+       int i; // Is this node 0 or 1?
+       int depth;
+};
+
 struct loc_database_enumerator {
        struct loc_ctx* ctx;
        struct loc_database* db;
@@ -69,9 +77,16 @@ struct loc_database_enumerator {
 
        // Search string
        char* string;
+       char country_code[3];
 
        // Index of the AS we are looking at
        unsigned int as_index;
+
+       // Network state
+       struct in6_addr network_address;
+       struct loc_node_stack network_stack[MAX_STACK_DEPTH];
+       int network_stack_depth;
+       unsigned int* networks_visited;
 };
 
 static int loc_database_read_magic(struct loc_database* db, FILE* f) {
@@ -564,6 +579,11 @@ LOC_EXPORT int loc_database_enumerator_new(struct loc_database_enumerator** enum
        e->db = loc_database_ref(db);
        e->refcount = 1;
 
+       // Initialise graph search
+       //e->network_stack[++e->network_stack_depth] = 0;
+       e->network_stack_depth = 1;
+       e->networks_visited = calloc(db->network_nodes_count, sizeof(*e->networks_visited));
+
        DEBUG(e->ctx, "Database enumerator object allocated at %p\n", e);
 
        *enumerator = e;
@@ -586,6 +606,9 @@ static void loc_database_enumerator_free(struct loc_database_enumerator* enumera
        if (enumerator->string)
                free(enumerator->string);
 
+       // Free network search
+       free(enumerator->networks_visited);
+
        free(enumerator);
 }
 
@@ -610,6 +633,24 @@ LOC_EXPORT int loc_database_enumerator_set_string(struct loc_database_enumerator
        return 0;
 }
 
+LOC_EXPORT int loc_database_enumerator_set_country_code(struct loc_database_enumerator* enumerator, const char* country_code) {
+       // Set empty country code
+       if (!country_code || !*country_code) {
+               *enumerator->country_code = '\0';
+               return 0;
+       }
+
+       // Country codes must be two characters
+       if (strlen(country_code) != 2)
+               return -EINVAL;
+
+       for (unsigned int i = 0; i < 3; i++) {
+               enumerator->country_code[i] = country_code[i];
+       }
+
+       return 0;
+}
+
 LOC_EXPORT struct loc_as* loc_database_enumerator_next_as(struct loc_database_enumerator* enumerator) {
        struct loc_database* db = enumerator->db;
        struct loc_as* as;
@@ -621,7 +662,7 @@ LOC_EXPORT struct loc_as* loc_database_enumerator_next_as(struct loc_database_en
                        return NULL;
 
                r = loc_as_match_string(as, enumerator->string);
-               if (r == 0) {
+               if (r == 1) {
                        DEBUG(enumerator->ctx, "AS%d (%s) matches %s\n",
                                loc_as_get_number(as), loc_as_get_name(as), enumerator->string);
 
@@ -638,3 +679,121 @@ LOC_EXPORT struct loc_as* loc_database_enumerator_next_as(struct loc_database_en
        // We have searched through all of them
        return NULL;
 }
+
+static int loc_database_enumerator_stack_push_node(
+               struct loc_database_enumerator* e, off_t offset, int i, int depth) {
+       // Do not add empty nodes
+       if (!offset)
+               return 0;
+
+       // Check if there is any space left on the stack
+       if (e->network_stack_depth >= MAX_STACK_DEPTH) {
+               ERROR(e->ctx, "Maximum stack size reached: %d\n", e->network_stack_depth);
+               return -1;
+       }
+
+       // Increase stack size
+       int s = ++e->network_stack_depth;
+
+       DEBUG(e->ctx, "Added node %jd to stack (%d)\n", offset, depth);
+
+       e->network_stack[s].offset = offset;
+       e->network_stack[s].i = i;
+       e->network_stack[s].depth = depth;
+
+       return 0;
+}
+
+static int loc_database_enumerator_network_depth_first_search(
+               struct loc_database_enumerator* e, struct loc_network** network) {
+       // Reset network
+       *network = NULL;
+       int r;
+
+       DEBUG(e->ctx, "Called with a stack of %u nodes\n", e->network_stack_depth);
+
+       // Perform DFS
+       while (e->network_stack_depth > 0) {
+               DEBUG(e->ctx, "Stack depth: %u\n", e->network_stack_depth);
+
+               // Get object from top of the stack
+               struct loc_node_stack* node = &e->network_stack[e->network_stack_depth];
+
+               // Remove the node from the stack if we have already visited it
+               if (e->networks_visited[node->offset]) {
+                       e->network_stack_depth--;
+                       continue;
+               }
+
+               in6_addr_set_bit(&e->network_address,
+                       (node->depth > 0) ? node->depth - 1 : 0, node->i);
+
+               //for (unsigned int i = stack->depth + 1; i < 128; i++)
+               //      in6_addr_set_bit(&e->network_address, i, 0);
+
+               DEBUG(e->ctx, "Looking at node %jd\n", node->offset);
+               e->networks_visited[node->offset]++;
+
+               // Pop node from top of the stack
+               struct loc_database_network_node_v0* n =
+                       e->db->network_nodes_v0 + node->offset;
+
+               // Add edges to stack
+               r = loc_database_enumerator_stack_push_node(e,
+                       be32toh(n->one), 1, node->depth + 1);
+
+               if (r)
+                       return r;
+
+               r = loc_database_enumerator_stack_push_node(e,
+                       be32toh(n->zero), 0, node->depth + 1);
+
+               if (r)
+                       return r;
+
+               // Check if this node is a leaf and has a network object
+               if (__loc_database_node_is_leaf(n)) {
+                       off_t network_index = be32toh(n->network);
+
+                       DEBUG(e->ctx, "Node has a network at %jd\n", network_index);
+
+                       // Fetch the network object
+                       r = loc_database_fetch_network(e->db, network,
+                               &e->network_address, node->depth, network_index);
+
+                       // Break on any errors
+                       if (r)
+                               return r;
+
+                       // Check if we are interested in this network
+
+                       // Skip if the country code does not match
+                       if (e->country_code && !loc_network_match_country_code(*network, e->country_code)) {
+                               loc_network_unref(*network);
+                               continue;
+                       }
+
+                       return 0;
+               }
+       }
+
+       // Reached the end of the search
+
+       // Mark all nodes as non-visited
+       for (unsigned int i = 0; i < e->db->network_nodes_count; i++)
+               e->networks_visited[i] = 0;
+
+       return 0;
+}
+
+LOC_EXPORT struct loc_network* loc_database_enumerator_next_network(
+               struct loc_database_enumerator* enumerator) {
+       struct loc_network* network = NULL;
+
+       int r = loc_database_enumerator_network_depth_first_search(enumerator, &network);
+       if (r) {
+               return NULL;
+       }
+
+       return network;
+}