Fix few more leaks for zip0:// and the macho parser

Author: radare

libr/bin/format/mach0/mach0.c

@@ -3261,15 +3261,17 @@ static bool is_debug_build(RBinFile *bf, struct MACH0_(obj_t) *mo) {
 		return false;
 	}
 
+	bool res = false;
 	RListIter *iter;
 	RBinSection *section;
 	r_list_foreach (sections, iter, section) {
 		if (strstr (section->name, ".__debug_line")) {
-			return true;
+			res = true;
+			break;
 		}
 	}
 	r_list_free (sections);
-	return false;
+	return res;
 }
 #endif
 

libr/core/cfile.c

@@ -983,6 +983,7 @@ R_API RIODesc *r_core_file_open_many(RCore *r, const char *file, int perm, ut64
 			r_esil_setup (r->anal->esil, r->anal, 0, 0, false);
 		}
 	}
+	r_list_free (list_fds);
 	return first;
 }
 

libr/io/p/io_zip.c

@@ -221,6 +221,7 @@ static void r_io_zip_free_zipfileobj(RIOZipFileObj *zfo) {
 	if (zfo->modified) {
 		r_io_zip_flush_file (zfo);
 	}
+	free (zfo->archivename);
 	free (zfo->name);
 	free (zfo->password);
 	r_unref (zfo->b);

test/db/leak/open

@@ -70,3 +70,13 @@ EXPECT=<<EOF
 hello
 EOF
 RUN
+
+NAME=macho zip
+FILE=zip0://bins/mach0/io.zip
+CMDS=<<EOF
+?e hello
+EOF
+EXPECT=<<EOF
+hello
+EOF
+RUN