From mboxrd@z Thu Jan  1 00:00:00 1970
Received: from localhost (fantadrom.bsd.lv [local])
	by fantadrom.bsd.lv (OpenSMTPD) with ESMTPA id 3bf4d89b
	for <source@mdocml.bsd.lv>;
	Tue, 18 Oct 2016 17:27:55 -0500 (EST)
Date: Tue, 18 Oct 2016 17:27:55 -0500 (EST)
Message-Id: <4662291817084134693.enqueue@fantadrom.bsd.lv>
X-Mailinglist: mdocml-source
Reply-To: source@mdocml.bsd.lv
MIME-Version: 1.0
From: schwarze@mdocml.bsd.lv
To: source@mdocml.bsd.lv
Subject: mdocml: The termination condition of the iteration logic in 
X-Mailer: activitymail 1.26, http://search.cpan.org/dist/activitymail/
Content-Type: text/plain; charset=utf-8

Log Message:
-----------
The termination condition of the iteration logic in page_bymacro() 
was overzealous.  Consequently, macro=substr and macro~regexp searches 
only returned all pages containing the first matching macro value,
rather than all pages containing any of the matching macro values.
Bug reported by tb@ - thanks!

Modified Files:
--------------
    mdocml:
        dbm.c

Revision Data
-------------
Index: dbm.c
===================================================================
RCS file: /home/cvs/mdocml/mdocml/dbm.c,v
retrieving revision 1.4
retrieving revision 1.5
diff -Ldbm.c -Ldbm.c -u -p -r1.4 -r1.5
--- dbm.c
+++ dbm.c
@@ -346,41 +346,45 @@ page_byarch(const struct dbm_match *arg_
 }
 
 static struct dbm_res
-page_bymacro(int32_t im, const struct dbm_match *match)
+page_bymacro(int32_t arg_im, const struct dbm_match *arg_match)
 {
-	static const int32_t	*pp;
-	struct dbm_res		 res = {-1, 0};
-	const char		*cp;
-	int32_t			 iv;
+	static const struct dbm_match	*match;
+	static const int32_t		*pp;
+	static const char		*cp;
+	static int32_t			 im, iv;
+	struct dbm_res			 res = {-1, 0};
 
 	assert(im >= 0);
 	assert(im < MACRO_MAX);
 
 	/* Initialize for a new iteration. */
 
-	if (match != NULL) {
+	if (arg_match != NULL) {
 		iteration = ITER_MACRO;
+		match = arg_match;
+		im = arg_im;
 		cp = nvals[im] ? dbm_get(macros[im]->value) : NULL;
-		for (iv = 0; iv < nvals[im]; iv++) {
-			if (dbm_match(match, cp))
-				break;
-			cp = strchr(cp, '\0') + 1;
-		}
-		pp = iv == nvals[im] ? NULL : dbm_get(macros[im][iv].pages);
+		pp = NULL;
+		iv = -1;
 		return res;
 	}
 	if (iteration != ITER_MACRO)
 		return res;
 
-	/* No more matches. */
+	/* Find the next matching macro value. */
 
-	if (pp == NULL || *pp == 0) {
-		iteration = ITER_NONE;
-		pp = NULL;
-		return res;
+	while (pp == NULL || *pp == 0) {
+		if (++iv == nvals[im]) {
+			iteration = ITER_NONE;
+			return res;
+		}
+		if (iv)
+			cp = strchr(cp, '\0') + 1;
+		if (dbm_match(match, cp))
+			pp = dbm_get(macros[im][iv].pages);
 	}
 
-	/* Found a match. */
+	/* Found a matching page. */
 
 	res.page = (struct page *)dbm_get(*pp++) - pages;
 	return res;
--
 To unsubscribe send an email to source+unsubscribe@mdocml.bsd.lv