]> git.ozlabs.org Git - ccan/blobdiff - tools/tools.c
tools: use tal instead of talloc.
[ccan] / tools / tools.c
index 1eddf7e934ab9f658cadb9fe4e7a2c34b8312b15..2a776f062a354cea9f233b011ef1a4122038d3b1 100644 (file)
@@ -1,6 +1,7 @@
-#include <ccan/talloc/talloc.h>
-#include <ccan/grab_file/grab_file.h>
+#include <ccan/take/take.h>
+#include <ccan/err/err.h>
 #include <ccan/noerr/noerr.h>
+#include <ccan/rbuf/rbuf.h>
 #include <ccan/read_write_all/read_write_all.h>
 #include <ccan/noerr/noerr.h>
 #include <ccan/time/time.h>
@@ -13,7 +14,6 @@
 #include <unistd.h>
 #include <stdarg.h>
 #include <errno.h>
-#include <err.h>
 #include <unistd.h>
 #include <assert.h>
 #include <signal.h>
@@ -25,38 +25,38 @@ bool tools_verbose = false;
 /* Ten minutes. */
 const unsigned int default_timeout_ms = 10 * 60 * 1000;
 
-char *talloc_basename(const void *ctx, const char *dir)
+char *tal_basename(const void *ctx, const char *dir)
 {
-       char *p = strrchr(dir, '/');
+       const char *p = strrchr(dir, '/');
 
        if (!p)
-               return talloc_strdup(ctx, dir);
-       return talloc_strdup(ctx, p+1);
+               return tal_strdup(ctx, dir);
+       return tal_strdup(ctx, p+1);
 }
 
-char *talloc_dirname(const void *ctx, const char *dir)
+char *tal_dirname(const void *ctx, const char *dir)
 {
-       char *p = strrchr(dir, '/');
+       const char *p = strrchr(dir, '/');
 
        if (!p)
-               return talloc_strdup(ctx, ".");
-       return talloc_strndup(ctx, dir, p - dir);
+               return tal_strdup(ctx, ".");
+       return tal_strndup(ctx, dir, p - dir);
 }
 
-char *talloc_getcwd(const void *ctx)
+char *tal_getcwd(const void *ctx)
 {
        unsigned int len;
        char *cwd;
 
        /* *This* is why people hate C. */
        len = 32;
-       cwd = talloc_array(ctx, char, len);
+       cwd = tal_arr(ctx, char, len);
        while (!getcwd(cwd, len)) {
                if (errno != ERANGE) {
-                       talloc_free(cwd);
+                       tal_free(cwd);
                        return NULL;
                }
-               cwd = talloc_realloc(ctx, cwd, char, len *= 2);
+               tal_resize(&cwd, len *= 2);
        }
        return cwd;
 }
@@ -71,14 +71,14 @@ char *run_with_timeout(const void *ctx, const char *cmd,
 {
        pid_t pid;
        int p[2];
-       char *ret;
+       struct rbuf in;
        int status, ms;
-       struct timeval start;
+       struct timespec start;
 
        *ok = false;
        if (pipe(p) != 0)
-               return talloc_asprintf(ctx, "Failed to create pipe: %s",
-                                      strerror(errno));
+               return tal_fmt(ctx, "Failed to create pipe: %s",
+                              strerror(errno));
 
        if (tools_verbose)
                printf("Running: %s\n", cmd);
@@ -90,8 +90,7 @@ char *run_with_timeout(const void *ctx, const char *cmd,
        if (pid == -1) {
                close_noerr(p[0]);
                close_noerr(p[1]);
-               return talloc_asprintf(ctx, "Failed to fork: %s",
-                                      strerror(errno));
+               return tal_fmt(ctx, "Failed to fork: %s", strerror(errno));
        }
 
        if (pid == 0) {
@@ -106,7 +105,7 @@ char *run_with_timeout(const void *ctx, const char *cmd,
 
                signal(SIGALRM, killme);
                itim.it_interval.tv_sec = itim.it_interval.tv_usec = 0;
-               itim.it_value = time_from_msec(*timeout_ms);
+               itim.it_value = timespec_to_timeval(time_from_msec(*timeout_ms));
                setitimer(ITIMER_REAL, &itim, NULL);
 
                status = system(cmd);
@@ -117,7 +116,10 @@ char *run_with_timeout(const void *ctx, const char *cmd,
        }
 
        close(p[1]);
-       ret = grab_fd(ctx, p[0], NULL);
+       rbuf_init(&in, p[0], tal_arr(ctx, char, 4096), 4096);
+       if (!rbuf_read_str(&in, 0, do_tal_realloc) && errno)
+               in.buf = tal_free(in.buf);
+
        /* This shouldn't fail... */
        if (waitpid(pid, &status, 0) != pid)
                err(1, "Failed to wait for child");
@@ -129,17 +131,17 @@ char *run_with_timeout(const void *ctx, const char *cmd,
                *timeout_ms -= ms;
        close(p[0]);
        if (tools_verbose) {
-               printf("%s", ret);
+               printf("%s", in.buf);
                printf("Finished: %u ms, %s %u\n", ms,
                       WIFEXITED(status) ? "exit status" : "killed by signal",
                       WIFEXITED(status) ? WEXITSTATUS(status)
                       : WTERMSIG(status));
        }
        *ok = (WIFEXITED(status) && WEXITSTATUS(status) == 0);
-       return ret;
+       return in.buf;
 }
 
-/* Tallocs *output off ctx; return false if command fails. */
+/* Tals *output off ctx; return false if command fails. */
 bool run_command(const void *ctx, unsigned int *time_ms, char **output,
                 const char *fmt, ...)
 {
@@ -151,12 +153,12 @@ bool run_command(const void *ctx, unsigned int *time_ms, char **output,
        if (!time_ms)
                time_ms = &default_time;
        else if (*time_ms == 0) {
-               *output = talloc_strdup(ctx, "\n== TIMED OUT ==\n");
+               *output = tal_strdup(ctx, "\n== TIMED OUT ==\n");
                return false;
        }
 
        va_start(ap, fmt);
-       cmd = talloc_vasprintf(ctx, fmt, ap);
+       cmd = tal_vfmt(ctx, fmt, ap);
        va_end(ap);
 
        *output = run_with_timeout(ctx, cmd, &ok, time_ms);
@@ -165,12 +167,11 @@ bool run_command(const void *ctx, unsigned int *time_ms, char **output,
        if (!*output)
                err(1, "Problem running child");
        if (*time_ms == 0)
-               *output = talloc_asprintf_append(*output,
-                                                "\n== TIMED OUT ==\n");
+               *output = tal_strcat(ctx, take(*output), "\n== TIMED OUT ==\n");
        return false;
 }
 
-static int unlink_all(const char *dir)
+static void unlink_all(const char *dir)
 {
        char cmd[strlen(dir) + sizeof("rm -rf ")];
        sprintf(cmd, "rm -rf %s", dir);
@@ -178,66 +179,78 @@ static int unlink_all(const char *dir)
                printf("Running: %s\n", cmd);
        if (system(cmd) != 0)
                warn("Could not remove temporary work in %s", dir);
-       return 0;
 }
 
-const char *temp_dir(const void *ctx)
+static pid_t *afree;
+static void free_autofree(void)
+{
+       if (*afree == getpid())
+               tal_free(afree);
+}
+
+tal_t *autofree(void)
+{
+       if (!afree) {
+               afree = tal(NULL, pid_t);
+               *afree = getpid();
+               atexit(free_autofree);
+       }
+       return afree;
+}
+
+const char *temp_dir(void)
 {
        /* For first call, create dir. */
        while (!tmpdir) {
                tmpdir = getenv("TMPDIR");
                if (!tmpdir)
                        tmpdir = "/tmp";
-               tmpdir = talloc_asprintf(talloc_autofree_context(),
-                                        "%s/ccanlint-%u.%lu",
-                                        tmpdir, getpid(), random());
+               tmpdir = tal_fmt(autofree(), "%s/ccanlint-%u.%lu",
+                                tmpdir, getpid(), random());
                if (mkdir(tmpdir, 0700) != 0) {
                        if (errno == EEXIST) {
-                               talloc_free(tmpdir);
+                               tal_free(tmpdir);
                                tmpdir = NULL;
                                continue;
                        }
                        err(1, "mkdir %s failed", tmpdir);
                }
-               talloc_set_destructor(tmpdir, unlink_all);
+               tal_add_destructor(tmpdir, unlink_all);
                if (tools_verbose)
                        printf("Created temporary directory %s\n", tmpdir);
        }
        return tmpdir;
 }
 
-int unlink_file_destructor(char *filename)
+void keep_temp_dir(void)
 {
-       unlink(filename);
-       return 0;
+       tal_del_destructor(temp_dir(), unlink_all);
 }
 
 char *temp_file(const void *ctx, const char *extension, const char *srcname)
 {
        unsigned baselen;
-       char *f, *suffix = talloc_strdup(ctx, "");
+       char *f, *suffix = tal_strdup(ctx, "");
        struct stat st;
        unsigned int count = 0;
 
-       srcname = talloc_basename(ctx, srcname);
+       srcname = tal_basename(ctx, srcname);
        if (strrchr(srcname, '.'))
                baselen = strrchr(srcname, '.') - srcname;
        else
                baselen = strlen(srcname);
 
        do {
-               f = talloc_asprintf(ctx, "%s/%.*s%s%s",
-                                   temp_dir(ctx),
-                                   baselen, srcname,
-                                   suffix, extension);
-               talloc_free(suffix);
-               suffix = talloc_asprintf(ctx, "-%u", ++count);
+               f = tal_fmt(ctx, "%s/%.*s%s%s",
+                           temp_dir(), baselen, srcname, suffix, extension);
+               tal_free(suffix);
+               suffix = tal_fmt(ctx, "-%u", ++count);
        } while (lstat(f, &st) == 0);
 
        if (tools_verbose)
                printf("Creating file %s\n", f);
 
-       talloc_free(suffix);
+       tal_free(suffix);
        return f;
 }
 
@@ -259,7 +272,7 @@ bool move_file(const char *oldname, const char *newname)
        }
 
        /* Try copy and delete: not atomic! */
-       contents = grab_file(NULL, oldname, &size);
+       contents = tal_grab_file(NULL, oldname, &size);
        if (!contents) {
                if (tools_verbose)
                        printf("read failed: %s\n", strerror(errno));
@@ -289,6 +302,32 @@ bool move_file(const char *oldname, const char *newname)
        }
 
 free:
-       talloc_free(contents);
+       tal_free(contents);
        return ret;
 }
+
+void *do_tal_realloc(void *p, size_t size)
+{
+       tal_resize((char **)&p, size);
+       return p;
+}
+
+void *tal_grab_file(const void *ctx, const char *filename, size_t *size)
+{
+       struct rbuf rbuf;
+       char *buf = tal_arr(ctx, char, 0);
+
+       if (!rbuf_open(&rbuf, filename, buf, 0))
+               return tal_free(buf);
+
+       if (!rbuf_fill_all(&rbuf, do_tal_realloc) && errno)
+               rbuf.buf = tal_free(rbuf.buf);
+       else {
+               rbuf.buf[rbuf.len] = '\0';
+               if (size)
+                       *size = rbuf.len;
+       }
+       close(rbuf.fd);
+
+       return rbuf.buf;
+}