From 4740b89e88dff04361da7f7f3bd9e823fd75d5b2 Mon Sep 17 00:00:00 2001 From: sinanmohd Date: Sat, 22 Jun 2024 23:48:45 +0530 Subject: htab: init --- src/htab.c | 150 ++++++++++++++++++++++++++++++++++++++++++++++++++++++++ src/jobs.c | 5 +- src/meson.build | 1 + src/queue.c | 141 +++++++++++++++++++++++----------------------------- 4 files changed, 215 insertions(+), 82 deletions(-) create mode 100644 src/htab.c (limited to 'src') diff --git a/src/htab.c b/src/htab.c new file mode 100644 index 0000000..dde8430 --- /dev/null +++ b/src/htab.c @@ -0,0 +1,150 @@ +/* since hsearch_r does not support deletions dirctly, this is an abstraction on + * top of it with support for deletions, for this to work properly we have to + * strdup the key, this is not a big issue for 100k drv_path strings, it's + * either this or pulling in a external library + */ + +#include +#include +#include + +#include "htab.h" +#include "util.h" + +#define MAX_NIX_PKG_COUNT 200000 + +static int htab_keys_insert(struct htab *htab, char *key); + +static int htab_keys_insert(struct htab *htab, char *key) +{ + size_t newsize; + void *ret; + + if (htab->key_filled < htab->keys_size) { + htab->keys[htab->key_filled++] = key; + return 0; + } + + newsize = htab->keys_size == 0 ? 1 : htab->keys_size * 2; + ret = realloc(htab->keys, newsize * sizeof(*htab->keys)); + if (ret == NULL) { + print_err("%s", strerror(errno)); + return -errno; + } + + htab->keys = ret; + htab->keys_size = newsize; + htab->keys[htab->key_filled++] = key; + + return 0; +} + +int htab_search(struct htab *htab, char *key, ENTRY **ep) +{ + ENTRY e; + int ret; + + e.key = key; + e.data = NULL; + ret = hsearch_r(e, FIND, ep, htab->table); + if (ret == 0) { + if (errno != ESRCH) { + print_err("%s", strerror(errno)); + return -errno; + } + return ESRCH; + } + + if ((*ep)->data == NULL) { + return ESRCH; + } else { + return 0; + } +} + +int htab_enter(struct htab *htab, const char *key, void *data) +{ + ENTRY e, *ep; + int ret; + + e.key = strdup(key); + if (e.key == NULL) { + print_err("%s", strerror(errno)); + return -errno; + } + + e.data = data; + ret = hsearch_r(e, ENTER, &ep, htab->table); + if (ret == 0) { + print_err("%s", strerror(errno)); + return -errno; + } + ep->data = NULL; + + if (ep->key != e.key) { + free(e.key); + } else { + ret = htab_keys_insert(htab, e.key); + if (ret < 0) + free(e.key); + } + + return ret; +} + +int htab_delete(struct htab *htab, const char *key) +{ + return htab_enter(htab, key, NULL); +} + +int htab_init(struct htab **htab) +{ + int ret; + struct htab *h; + + h = malloc(sizeof(*h)); + if (h == NULL) { + print_err("%s", strerror(errno)); + return -errno; + } + + h->table = calloc(1, sizeof(*h->table)); + if (h == NULL) { + print_err("%s", strerror(errno)); + ret = -errno; + goto out_free_h; + } + + ret = hcreate_r(MAX_NIX_PKG_COUNT, h->table); + if (ret == 0) { + print_err("%s", strerror(errno)); + ret = -errno; + goto out_free_table; + } + ret = 0; + + h->keys = NULL; + h->keys_size = 0; + h->key_filled = 0; + +out_free_table: + if (ret < 0) + free(h->table); +out_free_h: + if (ret < 0) + free(h); + else + *htab = h; + + return ret; +} + +void htab_free(struct htab *htab) +{ + for (size_t i = 0; i < htab->key_filled; i++) + free(htab->keys[i]); + + free(htab->keys); + free(htab->table); + free(htab); +} diff --git a/src/jobs.c b/src/jobs.c index 28273dd..3e38b07 100644 --- a/src/jobs.c +++ b/src/jobs.c @@ -16,7 +16,6 @@ static int job_read_inputdrvs(struct job *job, cJSON *input_drvs); static int job_read_outputs(struct job *job, cJSON *outputs); static int job_deps_list_insert(struct job *job, struct job *dep); static int job_output_list_insert(struct job *job, struct output *output); -static void job_deps_list_rm(struct job *job, struct job *dep); static void output_free(struct output *output) { @@ -53,7 +52,7 @@ static int job_output_list_insert(struct job *job, struct output *output) return 0; } -static void job_deps_list_rm(struct job *job, struct job *dep) +void job_deps_list_rm(struct job *job, struct job *dep) { for (size_t i = 0; i < job->deps_filled; i++) { if (job->deps[i] != dep) @@ -370,7 +369,7 @@ int jobs_init(FILE **stream) char *const args[] = { "nix-eval-jobs", "--flake", - "github:sinanmohd/evanix#packages.x86_64-linux", + "github:NixOS/nixpkgs#legacyPackages.x86_64-linux.python310Packages", NULL, }; diff --git a/src/meson.build b/src/meson.build index 41b31da..ea955bc 100644 --- a/src/meson.build +++ b/src/meson.build @@ -6,6 +6,7 @@ e = executable( 'util.c', 'queue.c', 'build.c', + 'htab.c', ], include_directories: evanix_inc, diff --git a/src/queue.c b/src/queue.c index 1fb5ae7..b02474e 100644 --- a/src/queue.c +++ b/src/queue.c @@ -11,8 +11,45 @@ #define MAX_NIX_PKG_COUNT 200000 static int queue_push(struct queue *queue, struct job *job); -static int queue_htab_job_merge(struct job **job, struct hsearch_data *htab); -static int queue_htab_parent_merge(struct job *to, struct job *from); +static int queue_htab_job_merge(struct job **job, struct htab *htab); +static int queue_dag_isolate(struct job *job, struct job *keep_parent, + struct job_clist *jobs, struct htab *htab); + +static int queue_dag_isolate(struct job *job, struct job *keep_parent, + struct job_clist *jobs, struct htab *htab) +{ + int ret; + + for (size_t i = 0; i < job->deps_filled; i++) { + ret = queue_dag_isolate(job->deps[i], job, jobs, htab); + if (ret < 0) + return ret; + } + + for (size_t i = 0; i < job->parents_filled; i++) { + if (job->parents[i] == keep_parent) + continue; + + job_deps_list_rm(job->parents[i], job); + } + + if (keep_parent != NULL) { + job->parents[0] = keep_parent; + job->parents_filled = 1; + } else { + /* it must be tha parent */ + job->parents_filled = 0; + } + + if (!job->transitive) + CIRCLEQ_REMOVE(jobs, job, clist); + + ret = htab_delete(htab, job->drv_path); + if (ret < 0) + return ret; + + return 0; +} void *queue_thread_entry(void *queue_thread) { @@ -41,9 +78,8 @@ void *queue_thread_entry(void *queue_thread) pthread_exit(NULL); } -int queue_pop(struct queue *queue, struct job **job, struct hsearch_data *htab) +int queue_pop(struct queue *queue, struct job **job, struct htab *htab) { - ENTRY e, *ep; int ret; struct job *j = CIRCLEQ_FIRST(&queue->jobs); @@ -54,50 +90,12 @@ int queue_pop(struct queue *queue, struct job **job, struct hsearch_data *htab) } pthread_mutex_lock(&queue->mutex); - - CIRCLEQ_REMOVE(&queue->jobs, j, clist); - if (j->parents_filled <= 0) { - e.key = j->drv_path; - ret = hsearch_r(e, FIND, &ep, htab); - if (ret == 0) { - print_err("%s", strerror(errno)); - } - else - ep->data = NULL; - } - - pthread_mutex_unlock(&queue->mutex); - - *job = j; - return 0; -} - -static int queue_htab_parent_merge(struct job *to, struct job *from) -{ - int ret; - - /* the output from nix-eval-jobs("from") can only have maximum one - * parent */ - for (size_t i = 0; i < to->parents_filled; i++) { - if (strcmp(to->parents[i]->drv_path, - from->parents[0]->drv_path)) - continue; - - /* steal name from "from" */ - if (to->parents[i]->name == NULL) { - to->parents[i]->name = - from->parents[0]->name; - from->parents[0]->name = NULL; - } - - return 0; - } - - ret = job_parents_list_insert(to, from->parents[0]); + ret = queue_dag_isolate(j, NULL, &queue->jobs, htab); if (ret < 0) return ret; - from->parents_filled = 0; + pthread_mutex_unlock(&queue->mutex); + *job = j; return 0; } @@ -107,26 +105,21 @@ static int queue_htab_parent_merge(struct job *to, struct job *from) * - only childrens or dependencies have parent node * - only root node have dependencies */ -static int queue_htab_job_merge(struct job **job, struct hsearch_data *htab) +static int queue_htab_job_merge(struct job **job, struct htab *htab) { struct job *jtab; - ENTRY e, *ep; + ENTRY *ep; int ret; - e.key = (*job)->drv_path; - ret = hsearch_r(e, FIND, &ep, htab); - if (ret == 0) { - if (errno != ESRCH) { - print_err("%s", strerror(errno)); - return -errno; - } - - e.data = *job; - ret = hsearch_r(e, ENTER, &ep, htab); - if (ret == 0) { - print_err("%s", strerror(errno)); - return -errno; - } + // e.key = (*job)->drv_path; + // ret = hsearch_r(e, FIND, &ep, htab); + ret = htab_search(htab, (*job)->drv_path, &ep); + if (ret < 0) { + return ret; + } else if (ret == ESRCH) { + ret = htab_enter(htab, (*job)->drv_path, *job); + if (ret < 0) + return ret; for (size_t i = 0; i < (*job)->deps_filled; i++) { ret = queue_htab_job_merge(&(*job)->deps[i], htab); @@ -148,12 +141,15 @@ static int queue_htab_job_merge(struct job **job, struct hsearch_data *htab) /* only recursive calls with childrens or dependencies can enter this * for a recursive call to happen the parent was just entered into htab - * so, update the parent's deps reference to point to the node in htab + * so, + * - update parent's reference to point to jtab (done by *job = jtab) + * - insert the parent to jtab */ if ((*job)->parents_filled > 0) { - ret = queue_htab_parent_merge(jtab, *job); + ret = job_parents_list_insert(jtab, (*job)->parents[0]); if (ret < 0) return ret; + (*job)->parents_filled = 0; } job_free(*job); @@ -194,8 +190,7 @@ void queue_thread_free(struct queue_thread *queue_thread) CIRCLEQ_FOREACH_FREE(cur, next, &queue_thread->queue->jobs, clist, job_free); - hdestroy_r(queue_thread->queue->htab); - free(queue_thread->queue->htab); + htab_free(queue_thread->queue->htab); ret = sem_destroy(&queue_thread->queue->sem); if (ret < 0) print_err("%s", strerror(errno)); @@ -234,25 +229,13 @@ int queue_thread_new(struct queue_thread **queue_thread, FILE *stream) goto out_free_queue; } - qt->queue->htab = malloc(sizeof(*qt->queue->htab)); - if (qt->queue->htab == NULL) { - print_err("%s", strerror(errno)); - ret = -errno; + ret = htab_init(&qt->queue->htab); + if (ret < 0) goto out_free_sem; - } - ret = hcreate_r(MAX_NIX_PKG_COUNT, qt->queue->htab); - if (ret == 0) { - print_err("%s", strerror(errno)); - ret = -errno; - goto out_free_htab; - } CIRCLEQ_INIT(&qt->queue->jobs); pthread_mutex_init(&qt->queue->mutex, NULL); -out_free_htab: - if (ret < 0) - free(qt->queue->htab); out_free_sem: if (ret < 0) sem_destroy(&qt->queue->sem); -- cgit v1.2.3