tdb2: close memory leak in traverse.

[ccan] / ccan / tdb2 / traverse.c

diff --git a/ccan/tdb2/traverse.c b/ccan/tdb2/traverse.c
index 410054d7947a704407dbf3c559a569d22ea27a87..14cdac65148fa05c419f0bd6a514806d99d2fc28 100644 (file)
--- a/ccan/tdb2/traverse.c
+++ b/ccan/tdb2/traverse.c
@@ -26,14 +26,18 @@ static int64_t traverse(struct tdb_context *tdb, int ltype,
        struct tdb_data k, d;
        int64_t count = 0;
 
+       k.dptr = NULL;
        for (ret = first_in_hash(tdb, ltype, &tinfo, &k, &d.dsize);
             ret == 1;
             ret = next_in_hash(tdb, ltype, &tinfo, &k, &d.dsize)) {
                d.dptr = k.dptr + k.dsize;
                
                count++;
-               if (fn && fn(tdb, k, d, p))
+               if (fn && fn(tdb, k, d, p)) {
+                       free(k.dptr);
                        break;
+               }
+               free(k.dptr);
        }
 
        if (ret < 0)