nvi/common/search.c

42 	SCR *sp,
54 	if (sp->lno <= 1) {
55 		if (db_last(sp, &lno))
59 				search_msg(sp, S_EMPTY);
85 prev:			if (sp->re == NULL) {
86 				search_msg(sp, S_NOPREV);
90 			if (!F_ISSET(sp, SC_RE_SEARCH) && re_compile(sp,
91 			    sp->re, sp->re_len, NULL, NULL, &sp->re_c,
98 				sp->searchdir = dir;
127 	if (re_compile(sp, ptrn, plen, &sp->re, &sp->re_len, &sp->re_c,
136 		sp->searchdir = dir;
150 	SCR *sp,
165 	if (search_init(sp, FORWARD, ptrn, plen, eptrn, flags))
172 		if (db_get(sp, fm->lno, DBG_FATAL, &l, &len))
194 			if (db_get(sp, lno, 0, &l, &len)) {
195 				if (!O_ISSET(sp, O_WRAPSCAN)) {
197 						search_msg(sp, S_EOF);
210 			if (INTERRUPTED(sp))
213 				search_busy(sp, btype);
218 		if ((wrapped && lno > fm->lno) || db_get(sp, lno, 0, &l, &len)) {
221 					search_msg(sp, S_NOTFOUND);
224 			if (!O_ISSET(sp, O_WRAPSCAN)) {
226 					search_msg(sp, S_EOF);
243 		TRACE(sp, "F search: %lu from %u to %u\n",
247 		eval = regexec(&sp->re_c, l, 1, match,
253 				re_error(sp, eval, &sp->re_c);
255 				(void)sp->gp->scr_bell(sp);
261 			search_msg(sp, S_WRAP);
264 		TRACE(sp, "F search: %qu to %qu\n",
284 		search_busy(sp, BUSY_OFF);
297 	SCR *sp,
312 	if (search_init(sp, BACKWARD, ptrn, plen, eptrn, flags))
330 			if (fm->lno == 1 && !O_ISSET(sp, O_WRAPSCAN)) {
332 					search_msg(sp, S_SOF);
344 			if (INTERRUPTED(sp))
347 				search_busy(sp, btype);
355 					search_msg(sp, S_NOTFOUND);
358 			if (!O_ISSET(sp, O_WRAPSCAN)) {
360 					search_msg(sp, S_SOF);
363 			if (db_last(sp, &lno))
367 					search_msg(sp, S_EMPTY);
375 		if (db_get(sp, lno, 0, &l, &len))
383 		TRACE(sp, "B search: %lu from 0 to %qu\n", lno, match[0].rm_eo);
386 		eval = regexec(&sp->re_c, l, 1, match,
392 				re_error(sp, eval, &sp->re_c);
394 				(void)sp->gp->scr_bell(sp);
404 			search_msg(sp, S_WRAP);
407 		TRACE(sp, "B found: %qu to %qu\n",
421 			eval = regexec(&sp->re_c, l, 1, match,
428 					re_error(sp, eval, &sp->re_c);
430 					(void)sp->gp->scr_bell(sp);
448 		search_busy(sp, BUSY_OFF);
458 	SCR *sp,
463 		msgq(sp, M_ERR, "072|File empty; nothing to search");
466 		msgq(sp, M_ERR,
470 		msgq(sp, M_ERR, "074|No previous search pattern");
473 		msgq(sp, M_ERR, "075|Pattern not found");
476 		msgq(sp, M_ERR,
480 		msgq(sp, M_ERR, "077|Search wrapped");
495 	SCR *sp,
498 	sp->gp->scr_busy(sp, "078|Searching...", btype);