+LOC_EXPORT struct loc_network_list* loc_network_subnets(struct loc_network* network) {
+ struct loc_network_list* list;
+
+ // New prefix length
+ unsigned int prefix = network->prefix + 1;
+
+ // Check if the new prefix is valid
+ if (valid_prefix(&network->first_address, prefix))
+ return NULL;
+
+ // Create a new list with the result
+ int r = loc_network_list_new(network->ctx, &list);
+ if (r) {
+ ERROR(network->ctx, "Could not create network list: %d\n", r);
+ return NULL;
+ }
+
+ struct loc_network* subnet1 = NULL;
+ struct loc_network* subnet2 = NULL;
+
+ // Create the first half of the network
+ r = loc_network_new(network->ctx, &subnet1, &network->first_address, prefix);
+ if (r)
+ goto ERROR;
+
+ // The next subnet starts after the first one
+ struct in6_addr first_address = address_increment(&subnet1->last_address);
+
+ // Create the second half of the network
+ r = loc_network_new(network->ctx, &subnet2, &first_address, prefix);
+ if (r)
+ goto ERROR;
+
+ // Push the both onto the stack (in reverse order)
+ r = loc_network_list_push(list, subnet2);
+ if (r)
+ goto ERROR;
+
+ r = loc_network_list_push(list, subnet1);
+ if (r)
+ goto ERROR;
+
+ loc_network_unref(subnet1);
+ loc_network_unref(subnet2);
+
+ return list;
+
+ERROR:
+ if (subnet1)
+ loc_network_unref(subnet1);
+
+ if (subnet2)
+ loc_network_unref(subnet2);
+
+ if (list)
+ loc_network_list_unref(list);
+
+ return NULL;
+}
+
+LOC_EXPORT struct loc_network_list* loc_network_exclude(
+ struct loc_network* self, struct loc_network* other) {
+ struct loc_network_list* list;
+
+#ifdef ENABLE_DEBUG
+ char* n1 = loc_network_str(self);
+ char* n2 = loc_network_str(other);
+
+ DEBUG(self->ctx, "Returning %s excluding %s...\n", n1, n2);
+
+ free(n1);
+ free(n2);
+#endif
+
+ // Family must match
+ if (self->family != other->family) {
+ DEBUG(self->ctx, "Family mismatch\n");
+
+ return NULL;
+ }
+
+ // Other must be a subnet of self
+ if (!loc_network_is_subnet_of(other, self)) {
+ DEBUG(self->ctx, "Network %p is not contained in network %p\n", other, self);
+
+ return NULL;
+ }
+
+ // We cannot perform this operation if both networks equal
+ if (loc_network_eq(self, other)) {
+ DEBUG(self->ctx, "Networks %p and %p are equal\n", self, other);
+
+ return NULL;
+ }
+
+ // Create a new list with the result
+ int r = loc_network_list_new(self->ctx, &list);
+ if (r) {
+ ERROR(self->ctx, "Could not create network list: %d\n", r);
+ return NULL;
+ }
+
+ struct loc_network_list* subnets = loc_network_subnets(self);
+
+ struct loc_network* subnet1 = NULL;
+ struct loc_network* subnet2 = NULL;
+
+ while (subnets) {
+ // Fetch both subnets
+ subnet1 = loc_network_list_get(subnets, 0);
+ subnet2 = loc_network_list_get(subnets, 1);
+
+ // Free list
+ loc_network_list_unref(subnets);
+ subnets = NULL;
+
+ if (loc_network_eq(other, subnet1)) {
+ r = loc_network_list_push(list, subnet2);
+ if (r)
+ goto ERROR;
+
+ } else if (loc_network_eq(other, subnet2)) {
+ r = loc_network_list_push(list, subnet1);
+ if (r)
+ goto ERROR;
+
+ } else if (loc_network_is_subnet_of(other, subnet1)) {
+ r = loc_network_list_push(list, subnet2);
+ if (r)
+ goto ERROR;
+
+ subnets = loc_network_subnets(subnet1);
+
+ } else if (loc_network_is_subnet_of(other, subnet2)) {
+ r = loc_network_list_push(list, subnet1);
+ if (r)
+ goto ERROR;
+
+ subnets = loc_network_subnets(subnet2);
+
+ } else {
+ ERROR(self->ctx, "We should never get here\n");
+ goto ERROR;
+ }
+
+ loc_network_unref(subnet1);
+ loc_network_unref(subnet2);
+ }
+
+#ifdef ENABLE_DEBUG
+ loc_network_list_dump(list);
+#endif
+
+ // Return the result
+ return list;
+
+ERROR:
+ if (subnet1)
+ loc_network_unref(subnet1);
+
+ if (subnet2)
+ loc_network_unref(subnet2);
+
+ if (list)
+ loc_network_list_unref(list);
+
+ return NULL;
+}
+