htable: speed benchmark

[ccan] / tools / ccanlint / ccanlint.c

diff --git a/tools/ccanlint/ccanlint.c b/tools/ccanlint/ccanlint.c
index 51962de8582f9a290b272e95b75cc19347065c51..f2c79795a5c50a215b99a1a71fff61abcad64549 100644 (file)
--- a/tools/ccanlint/ccanlint.c
+++ b/tools/ccanlint/ccanlint.c
@@ -30,6 +30,7 @@
 #include <ccan/str_talloc/str_talloc.h>
 #include <ccan/talloc/talloc.h>
 #include <ccan/opt/opt.h>
+#include <ccan/foreach/foreach.h>
 
 int verbose = 0;
 static LIST_HEAD(compulsory_tests);
@@ -74,12 +75,12 @@ static const char *should_skip(struct manifest *m, struct ccanlint *i)
        if (btree_lookup(info_exclude, i->key))
                return "excluded in _info file";
        
+       if (i->skip)
+               return i->skip;
+
        if (i->skip_fail)
                return "dependency failed";
 
-       if (i->skip)
-               return "dependency was skipped";
-
        if (i->can_run)
                return i->can_run(m);
        return NULL;
@@ -105,7 +106,7 @@ static bool run_test(struct ccanlint *i,
 
        if (skip) {
        skip:
-               if (verbose)
+               if (verbose && !streq(skip, "not relevant to target"))
                        printf("  %s: skipped (%s)\n", i->name, skip);
 
                /* If we're skipping this because a prereq failed, we fail. */
@@ -115,7 +116,9 @@ static bool run_test(struct ccanlint *i,
                list_del(&i->list);
                list_add_tail(&finished_tests, &i->list);
                list_for_each(&i->dependencies, d, node) {
-                       d->dependent->skip = true;
+                       if (d->dependent->skip)
+                               continue;
+                       d->dependent->skip = "dependency was skipped";
                        d->dependent->skip_fail = i->skip_fail;
                }
                return true;
@@ -169,7 +172,9 @@ static bool run_test(struct ccanlint *i,
        if (bad) {
                /* Skip any tests which depend on this one. */
                list_for_each(&i->dependencies, d, node) {
-                       d->dependent->skip = true;
+                       if (d->dependent->skip)
+                               continue;
+                       d->dependent->skip = "dependency failed";
                        d->dependent->skip_fail = true;
                }
        }
@@ -349,6 +354,32 @@ static void add_info_fails(struct ccan_file *info)
        }
 }
 
+static bool depends_on(struct ccanlint *i, struct ccanlint *target)
+{
+       const struct dependent *d;
+
+       if (i == target)
+               return true;
+
+       list_for_each(&i->dependencies, d, node) {
+               if (depends_on(d->dependent, target))
+                       return true;
+       }
+       return false;
+}
+
+/* O(N^2), who cares? */
+static void skip_unrelated_tests(struct ccanlint *target)
+{
+       struct ccanlint *i;
+       struct list_head *list;
+
+       foreach_ptr(list, &compulsory_tests, &normal_tests)
+               list_for_each(list, i, list)
+                       if (!depends_on(i, target))
+                               i->skip = "not relevant to target";
+}
+
 int main(int argc, char *argv[])
 {
        bool summary = false;
@@ -356,31 +387,34 @@ int main(int argc, char *argv[])
        struct manifest *m;
        struct ccanlint *i;
        const char *prefix = "";
-       char *dir = talloc_getcwd(NULL), *base_dir = dir;
+       char *dir = talloc_getcwd(NULL), *base_dir = dir, *target = NULL;
        
        init_tests();
 
        cmdline_exclude = btree_new(btree_strcmp);
        info_exclude = btree_new(btree_strcmp);
 
-       opt_register_arg("--dir/-d", opt_set_charp, opt_show_charp, &dir,
+       opt_register_arg("--dir|-d", opt_set_charp, opt_show_charp, &dir,
                         "use this directory");
-       opt_register_noarg("-n/--safe-mode", opt_set_bool, &safe_mode,
+       opt_register_noarg("-n|--safe-mode", opt_set_bool, &safe_mode,
                         "do not compile anything");
-       opt_register_noarg("-l/--list-tests", list_tests, NULL,
+       opt_register_noarg("-l|--list-tests", list_tests, NULL,
                         "list tests ccanlint performs (and exit)");
-       opt_register_arg("-k/--keep <testname>", keep_test, NULL, NULL,
+       opt_register_arg("-k|--keep <testname>", keep_test, NULL, NULL,
                           "keep results of <testname> (can be used multiple times)");
-       opt_register_noarg("--summary/-s", opt_set_bool, &summary,
+       opt_register_noarg("--summary|-s", opt_set_bool, &summary,
                           "simply give one line summary");
-       opt_register_noarg("--verbose/-v", opt_inc_intval, &verbose,
+       opt_register_noarg("--verbose|-v", opt_inc_intval, &verbose,
                           "verbose mode (can specify more than once)");
-       opt_register_arg("-x/--exclude <testname>", skip_test, NULL, NULL,
+       opt_register_arg("-x|--exclude <testname>", skip_test, NULL, NULL,
                         "exclude <testname> (can be used multiple times)");
-       opt_register_arg("-t/--timeout <milleseconds>", opt_set_uintval,
+       opt_register_arg("-t|--timeout <milleseconds>", opt_set_uintval,
                         NULL, &timeout,
                         "ignore (terminate) tests that are slower than this");
-       opt_register_noarg("-?/-h/--help", opt_usage_and_exit,
+       opt_register_arg("--target <testname>", opt_set_charp,
+                        NULL, &target,
+                        "only run one test (and its prerequisites)");
+       opt_register_noarg("-?|-h|--help", opt_usage_and_exit,
                           "\nA program for checking and guiding development"
                           " of CCAN modules.",
                           "This usage message");
@@ -407,12 +441,22 @@ int main(int argc, char *argv[])
                    talloc_asprintf(m, "%s/test", temp_dir(NULL))) != 0)
                err(1, "Creating test symlink in %s", temp_dir(NULL));
 
-       /* If you don't pass the compulsory tests, you don't even get a score */
+       if (target) {
+               struct ccanlint *test;
+
+               test = find_test(target);
+               if (!test)
+                       err(1, "Unknown test to run '%s'", target);
+               skip_unrelated_tests(test);
+       }
+
+       /* If you don't pass the compulsory tests, you get a score of 0. */
        if (verbose)
                printf("Compulsory tests:\n");
 
        while ((i = get_next_test(&compulsory_tests)) != NULL) {
                if (!run_test(i, summary, &score, &total_score, m)) {
+                       printf("%sTotal score: 0/%u\n", prefix, total_score);
                        errx(1, "%s%s failed", prefix, i->name);
                }
        }