Head

GCC Code Coverage Report

Directory:	./		Exec	Total	Coverage
File:	usr.bin/mandoc/dbm.c	Lines:	139	179	77.7 %
Date:	2017-11-13	Branches:	83	132	62.9 %


/*	$OpenBSD: dbm.c,v 1.3 2016/10/18 22:26:20 schwarze Exp $ */
/*
 * Copyright (c) 2016 Ingo Schwarze <schwarze@openbsd.org>
 *
 * Permission to use, copy, modify, and distribute this software for any
 * purpose with or without fee is hereby granted, provided that the above
 * copyright notice and this permission notice appear in all copies.
 *
 * THE SOFTWARE IS PROVIDED "AS IS" AND THE AUTHOR DISCLAIMS ALL WARRANTIES
 * WITH REGARD TO THIS SOFTWARE INCLUDING ALL IMPLIED WARRANTIES OF
 * MERCHANTABILITY AND FITNESS. IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR
 * ANY SPECIAL, DIRECT, INDIRECT, OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES
 * WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS, WHETHER IN AN
 * ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING OUT OF
 * OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE.
 *
 * Map-based version of the mandoc database, for read-only access.
 * The interface is defined in "dbm.h".
 */
#include <assert.h>
#include <endian.h>
#include <err.h>
#include <errno.h>
#include <regex.h>
#include <stdint.h>
#include <stdio.h>
#include <stdlib.h>
#include <string.h>

#include "mansearch.h"
#include "dbm_map.h"
#include "dbm.h"

struct macro {
	int32_t	value;
	int32_t	pages;
};

struct page {
	int32_t	name;
	int32_t	sect;
	int32_t	arch;
	int32_t	desc;
	int32_t	file;
};

enum iter {
	ITER_NONE = 0,
	ITER_NAME,
	ITER_SECT,
	ITER_ARCH,
	ITER_DESC,
	ITER_MACRO
};

static struct macro	*macros[MACRO_MAX];
static int32_t		 nvals[MACRO_MAX];
static struct page	*pages;
static int32_t		 npages;
static enum iter	 iteration;

static struct dbm_res	 page_bytitle(enum iter, const struct dbm_match *);
static struct dbm_res	 page_byarch(const struct dbm_match *);
static struct dbm_res	 page_bymacro(int32_t, const struct dbm_match *);
static char		*macro_bypage(int32_t, int32_t);


/*** top level functions **********************************************/

/*
 * Open a disk-based mandoc database for read-only access.
 * Map the pages and macros[] arrays.
 * Return 0 on success.  Return -1 and set errno on failure.
 */
int
dbm_open(const char *fname)
{
	const int32_t	*mp, *ep;
	int32_t		 im;

	if (dbm_map(fname) == -1)
		return -1;

	if ((npages = be32toh(*dbm_getint(4))) < 0) {
		warnx("dbm_open(%s): Invalid number of pages: %d",
		    fname, npages);
		goto fail;
	}
	pages = (struct page *)dbm_getint(5);

	if ((mp = dbm_get(*dbm_getint(2))) == NULL) {
		warnx("dbm_open(%s): Invalid offset of macros array", fname);
		goto fail;
	}
	if (be32toh(*mp) != MACRO_MAX) {
		warnx("dbm_open(%s): Invalid number of macros: %d",
		    fname, be32toh(*mp));
		goto fail;
	}
	for (im = 0; im < MACRO_MAX; im++) {
		if ((ep = dbm_get(*++mp)) == NULL) {
			warnx("dbm_open(%s): Invalid offset of macro %d",
			    fname, im);
			goto fail;
		}
		nvals[im] = be32toh(*ep);
		macros[im] = (struct macro *)++ep;
	}
	return 0;

fail:
	dbm_unmap();
	errno = EFTYPE;
	return -1;
}

void
dbm_close(void)
{
	dbm_unmap();
}


/*** functions for handling pages *************************************/

int32_t
dbm_page_count(void)
{
	return npages;
}

/*
 * Give the caller pointers to the data for one manual page.
 */
struct dbm_page *
dbm_page_get(int32_t ip)
{
	static struct dbm_page	 res;

	assert(ip >= 0);
	assert(ip < npages);
	res.name = dbm_get(pages[ip].name);
	if (res.name == NULL)
		res.name = "(NULL)";
	res.sect = dbm_get(pages[ip].sect);
	if (res.sect == NULL)
		res.sect = "(NULL)";
	res.arch = pages[ip].arch ? dbm_get(pages[ip].arch) : NULL;
	res.desc = dbm_get(pages[ip].desc);
	if (res.desc == NULL)
		res.desc = "(NULL)";
	res.file = dbm_get(pages[ip].file);
	if (res.file == NULL)
		res.file = " (NULL)";
	res.addr = dbm_addr(pages + ip);
	return &res;
}

/*
 * Functions to start filtered iterations over manual pages.
 */
void
dbm_page_byname(const struct dbm_match *match)
{
	assert(match != NULL);
	page_bytitle(ITER_NAME, match);
}

void
dbm_page_bysect(const struct dbm_match *match)
{
	assert(match != NULL);
	page_bytitle(ITER_SECT, match);
}

void
dbm_page_byarch(const struct dbm_match *match)
{
	assert(match != NULL);
	page_byarch(match);
}

void
dbm_page_bydesc(const struct dbm_match *match)
{
	assert(match != NULL);
	page_bytitle(ITER_DESC, match);
}

void
dbm_page_bymacro(int32_t im, const struct dbm_match *match)
{
	assert(im >= 0);
	assert(im < MACRO_MAX);
	assert(match != NULL);
	page_bymacro(im, match);
}

/*
 * Return the number of the next manual page in the current iteration.
 */
struct dbm_res
dbm_page_next(void)
{
	struct dbm_res			 res = {-1, 0};

	switch(iteration) {
	case ITER_NONE:
		return res;
	case ITER_ARCH:
		return page_byarch(NULL);
	case ITER_MACRO:
		return page_bymacro(0, NULL);
	default:
		return page_bytitle(iteration, NULL);
	}
}

/*
 * Functions implementing the iteration over manual pages.
 */
static struct dbm_res
page_bytitle(enum iter arg_iter, const struct dbm_match *arg_match)
{
	static const struct dbm_match	*match;
	static const char		*cp;
	static int32_t			 ip;
	struct dbm_res			 res = {-1, 0};

	assert(arg_iter == ITER_NAME || arg_iter == ITER_DESC ||
	    arg_iter == ITER_SECT);

	/* Initialize for a new iteration. */

	if (arg_match != NULL) {
		iteration = arg_iter;
		match = arg_match;
		switch (iteration) {
		case ITER_NAME:
			cp = dbm_get(pages[0].name);
			break;
		case ITER_SECT:
			cp = dbm_get(pages[0].sect);
			break;
		case ITER_DESC:
			cp = dbm_get(pages[0].desc);
			break;
		default:
			abort();
		}
		if (cp == NULL) {
			iteration = ITER_NONE;
			match = NULL;
			cp = NULL;
			ip = npages;
		} else
			ip = 0;
		return res;
	}

	/* Search for a name. */

	while (ip < npages) {
		if (iteration == ITER_NAME)
			cp++;
		if (dbm_match(match, cp))
			break;
		cp = strchr(cp, '\0') + 1;
		if (iteration == ITER_DESC)
			ip++;
		else if (*cp == '\0') {
			cp++;
			ip++;
		}
	}

	/* Reached the end without a match. */

	if (ip == npages) {
		iteration = ITER_NONE;
		match = NULL;
		cp = NULL;
		return res;
	}

	/* Found a match; save the quality for later retrieval. */

	res.page = ip;
	res.bits = iteration == ITER_NAME ? cp[-1] : 0;

	/* Skip the remaining names of this page. */

	if (++ip < npages) {
		do {
			cp++;
		} while (cp[-1] != '\0' ||
		    (iteration != ITER_DESC && cp[-2] != '\0'));
	}
	return res;
}

static struct dbm_res
page_byarch(const struct dbm_match *arg_match)
{
	static const struct dbm_match	*match;
	struct dbm_res			 res = {-1, 0};
	static int32_t			 ip;
	const char			*cp;

	/* Initialize for a new iteration. */

	if (arg_match != NULL) {
		iteration = ITER_ARCH;
		match = arg_match;
		ip = 0;
		return res;
	}

	/* Search for an architecture. */

	for ( ; ip < npages; ip++)
		if (pages[ip].arch)
			for (cp = dbm_get(pages[ip].arch);
			    *cp != '\0';
			    cp = strchr(cp, '\0') + 1)
				if (dbm_match(match, cp)) {
					res.page = ip++;
					return res;
				}

	/* Reached the end without a match. */

	iteration = ITER_NONE;
	match = NULL;
	return res;
}

static struct dbm_res
page_bymacro(int32_t arg_im, const struct dbm_match *arg_match)
{
	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 (arg_match != NULL) {
		iteration = ITER_MACRO;
		match = arg_match;
		im = arg_im;
		cp = nvals[im] ? dbm_get(macros[im]->value) : NULL;
		pp = NULL;
		iv = -1;
		return res;
	}
	if (iteration != ITER_MACRO)
		return res;

	/* Find the next matching macro value. */

	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 matching page. */

	res.page = (struct page *)dbm_get(*pp++) - pages;
	return res;
}


/*** functions for handling macros ************************************/

int32_t
dbm_macro_count(int32_t im)
{
	assert(im >= 0);
	assert(im < MACRO_MAX);
	return nvals[im];
}

struct dbm_macro *
dbm_macro_get(int32_t im, int32_t iv)
{
	static struct dbm_macro macro;

	assert(im >= 0);
	assert(im < MACRO_MAX);
	assert(iv >= 0);
	assert(iv < nvals[im]);
	macro.value = dbm_get(macros[im][iv].value);
	macro.pp = dbm_get(macros[im][iv].pages);
	return &macro;
}

/*
 * Filtered iteration over macro entries.
 */
void
dbm_macro_bypage(int32_t im, int32_t ip)
{
	assert(im >= 0);
	assert(im < MACRO_MAX);
	assert(ip != 0);
	macro_bypage(im, ip);
}

char *
dbm_macro_next(void)
{
	return macro_bypage(MACRO_MAX, 0);
}

static char *
macro_bypage(int32_t arg_im, int32_t arg_ip)
{
	static const int32_t	*pp;
	static int32_t		 im, ip, iv;

	/* Initialize for a new iteration. */

	if (arg_im < MACRO_MAX && arg_ip != 0) {
		im = arg_im;
		ip = arg_ip;
		pp = dbm_get(macros[im]->pages);
		iv = 0;
		return NULL;
	}
	if (im >= MACRO_MAX)
		return NULL;

	/* Search for the next value. */

	while (iv < nvals[im]) {
		if (*pp == ip)
			break;
		if (*pp == 0)
			iv++;
		pp++;
	}

	/* Reached the end without a match. */

	if (iv == nvals[im]) {
		im = MACRO_MAX;
		ip = 0;
		pp = NULL;
		return NULL;
	}

	/* Found a match; skip the remaining pages of this entry. */

	if (++iv < nvals[im])
		while (*pp++ != 0)
			continue;

	return dbm_get(macros[im][iv - 1].value);
}


Generated by: GCOVR (Version 3.3)

Line	Branch	Exec	Source
1			/* $OpenBSD: dbm.c,v 1.3 2016/10/18 22:26:20 schwarze Exp $ */
2			/*
3			* Copyright (c) 2016 Ingo Schwarze <schwarze@openbsd.org>
4			*
5			* Permission to use, copy, modify, and distribute this software for any
6			* purpose with or without fee is hereby granted, provided that the above
7			* copyright notice and this permission notice appear in all copies.
8			*
9			* THE SOFTWARE IS PROVIDED "AS IS" AND THE AUTHOR DISCLAIMS ALL WARRANTIES
10			* WITH REGARD TO THIS SOFTWARE INCLUDING ALL IMPLIED WARRANTIES OF
11			* MERCHANTABILITY AND FITNESS. IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR
12			* ANY SPECIAL, DIRECT, INDIRECT, OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES
13			* WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS, WHETHER IN AN
14			* ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING OUT OF
15			* OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE.
16			*
17			* Map-based version of the mandoc database, for read-only access.
18			* The interface is defined in "dbm.h".
19			*/
20			#include <assert.h>
21			#include <endian.h>
22			#include <err.h>
23			#include <errno.h>
24			#include <regex.h>
25			#include <stdint.h>
26			#include <stdio.h>
27			#include <stdlib.h>
28			#include <string.h>
29
30			#include "mansearch.h"
31			#include "dbm_map.h"
32			#include "dbm.h"
33
34			struct macro {
35			int32_t value;
36			int32_t pages;
37			};
38
39			struct page {
40			int32_t name;
41			int32_t sect;
42			int32_t arch;
43			int32_t desc;
44			int32_t file;
45			};
46
47			enum iter {
48			ITER_NONE = 0,
49			ITER_NAME,
50			ITER_SECT,
51			ITER_ARCH,
52			ITER_DESC,
53			ITER_MACRO
54			};
55
56			static struct macro *macros[MACRO_MAX];
57			static int32_t nvals[MACRO_MAX];
58			static struct page *pages;
59			static int32_t npages;
60			static enum iter iteration;
61
62			static struct dbm_res page_bytitle(enum iter, const struct dbm_match *);
63			static struct dbm_res page_byarch(const struct dbm_match *);
64			static struct dbm_res page_bymacro(int32_t, const struct dbm_match *);
65			static char *macro_bypage(int32_t, int32_t);
66
67
68			/* top level functions ********************************************/
69
70			/*
71			* Open a disk-based mandoc database for read-only access.
72			* Map the pages and macros[] arrays.
73			* Return 0 on success. Return -1 and set errno on failure.
74			*/
75			int
76			dbm_open(const char *fname)
77			{
78			const int32_t mp, ep;
79			int32_t im;
80
81	✓✓	408	if (dbm_map(fname) == -1)
82		23	return -1;
83
84	✓✓	181	if ((npages = be32toh(*dbm_getint(4))) < 0) {
85		2	warnx("dbm_open(%s): Invalid number of pages: %d",
86			fname, npages);
87		2	goto fail;
88			}
89		179	pages = (struct page *)dbm_getint(5);
90
91	✓✓	179	if ((mp = dbm_get(*dbm_getint(2))) == NULL) {
92		2	warnx("dbm_open(%s): Invalid offset of macros array", fname);
93		2	goto fail;
94			}
95	✓✓	177	if (be32toh(*mp) != MACRO_MAX) {
96		2	warnx("dbm_open(%s): Invalid number of macros: %d",
97			fname, be32toh(*mp));
98		2	goto fail;
99			}
100	✓✓	12806	for (im = 0; im < MACRO_MAX; im++) {
101	✓✓	6230	if ((ep = dbm_get(*++mp)) == NULL) {
102		2	warnx("dbm_open(%s): Invalid offset of macro %d",
103			fname, im);
104		2	goto fail;
105			}
106		6228	nvals[im] = be32toh(*ep);
107		6228	macros[im] = (struct macro *)++ep;
108			}
109		173	return 0;
110
111			fail:
112		8	dbm_unmap();
113		8	errno = EFTYPE;
114		8	return -1;
115		204	}
116
117			void
118			dbm_close(void)
119			{
120		346	dbm_unmap();
121		173	}
122
123
124			/* functions for handling pages ***********************************/
125
126			int32_t
127			dbm_page_count(void)
128			{
129			return npages;
130			}
131
132			/*
133			* Give the caller pointers to the data for one manual page.
134			*/
135			struct dbm_page *
136			dbm_page_get(int32_t ip)
137			{
138			static struct dbm_page res;
139
140	✗✓	282	assert(ip >= 0);
141	✗✓	141	assert(ip < npages);
142		141	res.name = dbm_get(pages[ip].name);
143		141	if (res.name == NULL)
144			res.name = "(NULL)";
145		141	res.sect = dbm_get(pages[ip].sect);
146		141	if (res.sect == NULL)
147			res.sect = "(NULL)";
148	✓✓	314	res.arch = pages[ip].arch ? dbm_get(pages[ip].arch) : NULL;
149		141	res.desc = dbm_get(pages[ip].desc);
150		141	if (res.desc == NULL)
151			res.desc = "(NULL)";
152		141	res.file = dbm_get(pages[ip].file);
153		141	if (res.file == NULL)
154			res.file = " (NULL)";
155		141	res.addr = dbm_addr(pages + ip);
156		141	return &res;
157			}
158
159			/*
160			* Functions to start filtered iterations over manual pages.
161			*/
162			void
163			dbm_page_byname(const struct dbm_match *match)
164			{
165	✗✓	122	assert(match != NULL);
166		61	page_bytitle(ITER_NAME, match);
167		61	}
168
169			void
170			dbm_page_bysect(const struct dbm_match *match)
171			{
172			assert(match != NULL);
173			page_bytitle(ITER_SECT, match);
174			}
175
176			void
177			dbm_page_byarch(const struct dbm_match *match)
178			{
179			assert(match != NULL);
180			page_byarch(match);
181			}
182
183			void
184			dbm_page_bydesc(const struct dbm_match *match)
185			{
186	✗✓	20	assert(match != NULL);
187		10	page_bytitle(ITER_DESC, match);
188		10	}
189
190			void
191			dbm_page_bymacro(int32_t im, const struct dbm_match *match)
192			{
193	✗✓	76	assert(im >= 0);
194	✗✓	38	assert(im < MACRO_MAX);
195	✗✓	38	assert(match != NULL);
196		38	page_bymacro(im, match);
197		38	}
198
199			/*
200			* Return the number of the next manual page in the current iteration.
201			*/
202			struct dbm_res
203			dbm_page_next(void)
204			{
205			struct dbm_res res = {-1, 0};
206
207	✓✗✓✓	510	switch(iteration) {
208			case ITER_NONE:
209		4	return res;
210			case ITER_ARCH:
211			return page_byarch(NULL);
212			case ITER_MACRO:
213		76	return page_bymacro(0, NULL);
214			default:
215		175	return page_bytitle(iteration, NULL);
216			}
217		255	}
218
219			/*
220			* Functions implementing the iteration over manual pages.
221			*/
222			static struct dbm_res
223			page_bytitle(enum iter arg_iter, const struct dbm_match *arg_match)
224			{
225			static const struct dbm_match *match;
226			static const char *cp;
227			static int32_t ip;
228			struct dbm_res res = {-1, 0};
229
230	✗✓	492	assert(arg_iter == ITER_NAME \|\| arg_iter == ITER_DESC \|\|
231			arg_iter == ITER_SECT);
232
233			/* Initialize for a new iteration. */
234
235	✓✓	246	if (arg_match != NULL) {
236		71	iteration = arg_iter;
237		71	match = arg_match;
238	✓✗✓✗	71	switch (iteration) {
239			case ITER_NAME:
240		61	cp = dbm_get(pages[0].name);
241		61	break;
242			case ITER_SECT:
243			cp = dbm_get(pages[0].sect);
244			break;
245			case ITER_DESC:
246		81	cp = dbm_get(pages[0].desc);
247		10	break;
248			default:
249			abort();
250			}
251	✓✓	71	if (cp == NULL) {
252		4	iteration = ITER_NONE;
253		4	match = NULL;
254		4	cp = NULL;
255		4	ip = npages;
256		4	} else
257			ip = 0;
258		71	return res;
259			}
260
261			/* Search for a name. */
262
263	✓✓	151214	while (ip < npages) {
264	✓✓	62332	if (iteration == ITER_NAME)
265		62320	cp++;
266	✓✓	62332	if (dbm_match(match, cp))
267			break;
268		62224	cp = strchr(cp, '\0') + 1;
269	✓✓	62224	if (iteration == ITER_DESC)
270			ip++;
271	✓✓	62218	else if (*cp == '\0') {
272		26410	cp++;
273			ip++;
274		26410	}
275			}
276
277			/* Reached the end without a match. */
278
279	✓✓	175	if (ip == npages) {
280		67	iteration = ITER_NONE;
281		67	match = NULL;
282		67	cp = NULL;
283		67	return res;
284			}
285
286			/* Found a match; save the quality for later retrieval. */
287
288			res.page = ip;
289	✓✓	318	res.bits = iteration == ITER_NAME ? cp[-1] : 0;
290
291			/* Skip the remaining names of this page. */
292
293	✓✓	108	if (++ip < npages) {
294		60	do {
295		1240	cp++;
296	✓✓✓✓	1452	} while (cp[-1] != '\0' \|\|
297	✓✗	424	(iteration != ITER_DESC && cp[-2] != '\0'));
298			}
299		108	return res;
300		246	}
301
302			static struct dbm_res
303			page_byarch(const struct dbm_match *arg_match)
304			{
305			static const struct dbm_match *match;
306			struct dbm_res res = {-1, 0};
307			static int32_t ip;
308			const char *cp;
309
310			/* Initialize for a new iteration. */
311
312			if (arg_match != NULL) {
313			iteration = ITER_ARCH;
314			match = arg_match;
315			ip = 0;
316			return res;
317			}
318
319			/* Search for an architecture. */
320
321			for ( ; ip < npages; ip++)
322			if (pages[ip].arch)
323			for (cp = dbm_get(pages[ip].arch);
324			*cp != '\0';
325			cp = strchr(cp, '\0') + 1)
326			if (dbm_match(match, cp)) {
327			res.page = ip++;
328			return res;
329			}
330
331			/* Reached the end without a match. */
332
333			iteration = ITER_NONE;
334			match = NULL;
335			return res;
336			}
337
338			static struct dbm_res
339			page_bymacro(int32_t arg_im, const struct dbm_match *arg_match)
340			{
341			static const struct dbm_match *match;
342			static const int32_t *pp;
343			static const char *cp;
344			static int32_t im, iv;
345			struct dbm_res res = {-1, 0};
346
347	✗✓	228	assert(im >= 0);
348	✗✓	114	assert(im < MACRO_MAX);
349
350			/* Initialize for a new iteration. */
351
352	✓✓	114	if (arg_match != NULL) {
353		38	iteration = ITER_MACRO;
354		38	match = arg_match;
355		38	im = arg_im;
356	✓✗	114	cp = nvals[im] ? dbm_get(macros[im]->value) : NULL;
357		38	pp = NULL;
358		38	iv = -1;
359		38	return res;
360			}
361	✗✓	76	if (iteration != ITER_MACRO)
362			return res;
363
364			/* Find the next matching macro value. */
365
366	✓✓✓✓	430	while (pp == NULL \|\| *pp == 0) {
367	✓✓	128	if (++iv == nvals[im]) {
368		38	iteration = ITER_NONE;
369		38	return res;
370			}
371	✓✓	90	if (iv)
372		52	cp = strchr(cp, '\0') + 1;
373	✓✓	90	if (dbm_match(match, cp))
374		38	pp = dbm_get(macros[im][iv].pages);
375			}
376
377			/* Found a matching page. */
378
379		38	res.page = (struct page )dbm_get(pp++) - pages;
380		38	return res;
381		114	}
382
383
384			/* functions for handling macros **********************************/
385
386			int32_t
387			dbm_macro_count(int32_t im)
388			{
389			assert(im >= 0);
390			assert(im < MACRO_MAX);
391			return nvals[im];
392			}
393
394			struct dbm_macro *
395			dbm_macro_get(int32_t im, int32_t iv)
396			{
397			static struct dbm_macro macro;
398
399			assert(im >= 0);
400			assert(im < MACRO_MAX);
401			assert(iv >= 0);
402			assert(iv < nvals[im]);
403			macro.value = dbm_get(macros[im][iv].value);
404			macro.pp = dbm_get(macros[im][iv].pages);
405			return &macro;
406			}
407
408			/*
409			* Filtered iteration over macro entries.
410			*/
411			void
412			dbm_macro_bypage(int32_t im, int32_t ip)
413			{
414	✗✓	4	assert(im >= 0);
415	✗✓	2	assert(im < MACRO_MAX);
416	✗✓	2	assert(ip != 0);
417		2	macro_bypage(im, ip);
418		2	}
419
420			char *
421			dbm_macro_next(void)
422			{
423		16	return macro_bypage(MACRO_MAX, 0);
424			}
425
426			static char *
427			macro_bypage(int32_t arg_im, int32_t arg_ip)
428			{
429			static const int32_t *pp;
430			static int32_t im, ip, iv;
431
432			/* Initialize for a new iteration. */
433
434	✓✓	20	if (arg_im < MACRO_MAX && arg_ip != 0) {
435		2	im = arg_im;
436		2	ip = arg_ip;
437		2	pp = dbm_get(macros[im]->pages);
438		2	iv = 0;
439		2	return NULL;
440			}
441	✗✓	8	if (im >= MACRO_MAX)
442			return NULL;
443
444			/* Search for the next value. */
445
446	✓✓	16	while (iv < nvals[im]) {
447	✗✓	6	if (*pp == ip)
448			break;
449			if (*pp == 0)
450			iv++;
451			pp++;
452			}
453
454			/* Reached the end without a match. */
455
456	✓✓	8	if (iv == nvals[im]) {
457		2	im = MACRO_MAX;
458		2	ip = 0;
459		2	pp = NULL;
460		2	return NULL;
461			}
462
463			/* Found a match; skip the remaining pages of this entry. */
464
465	✓✓	6	if (++iv < nvals[im])
466	✓✓	12	while (*pp++ != 0)
467		4	continue;
468
469		6	return dbm_get(macros[im][iv - 1].value);
470		10	}