* Copyright (c) 1992, 1993
* The Regents of the University of California. All rights reserved.
* Redistribution and use in source and binary forms, with or without
* modification, are permitted provided that the following conditions
* 1. Redistributions of source code must retain the above copyright
* notice, this list of conditions and the following disclaimer.
* 2. Redistributions in binary form must reproduce the above copyright
* notice, this list of conditions and the following disclaimer in the
* documentation and/or other materials provided with the distribution.
* 3. All advertising materials mentioning features or use of this software
* must display the following acknowledgement:
* This product includes software developed by the University of
* California, Berkeley and its contributors.
* 4. Neither the name of the University nor the names of its contributors
* may be used to endorse or promote products derived from this software
* without specific prior written permission.
* THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
* ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
* IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
* ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
* FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
* DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
* OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
* HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
* LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
* OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
static char sccsid
[] = "@(#)v_ch.c 8.2 (Berkeley) 12/20/93";
msgq(sp, M_BERR, "No previous F, f, T or t search."); \
msgq(sp, M_BERR, "%s not found.", charname(sp, ch)); \
* Repeat the last F, f, T or t search.
v_chrepeat(sp
, ep
, vp
, fm
, tm
, rp
)
vp
->character
= sp
->lastckey
;
switch (sp
->csearchdir
) {
return (v_chF(sp
, ep
, vp
, fm
, tm
, rp
));
return (v_chf(sp
, ep
, vp
, fm
, tm
, rp
));
return (v_chT(sp
, ep
, vp
, fm
, tm
, rp
));
return (v_cht(sp
, ep
, vp
, fm
, tm
, rp
));
* v_chrrepeat -- [count],
* Repeat the last F, f, T or t search in the reverse direction.
v_chrrepeat(sp
, ep
, vp
, fm
, tm
, rp
)
vp
->character
= sp
->lastckey
;
savedir
= sp
->csearchdir
;
switch (sp
->csearchdir
) {
rval
= v_chf(sp
, ep
, vp
, fm
, tm
, rp
);
rval
= v_chF(sp
, ep
, vp
, fm
, tm
, rp
);
rval
= v_cht(sp
, ep
, vp
, fm
, tm
, rp
);
rval
= v_chT(sp
, ep
, vp
, fm
, tm
, rp
);
sp
->csearchdir
= savedir
;
* Search forward in the line for the next occurrence of the character.
* Place the cursor on it if a motion command, to its left if its not.
v_cht(sp
, ep
, vp
, fm
, tm
, rp
)
rval
= v_chf(sp
, ep
, vp
, fm
, tm
, rp
);
--rp
->cno
; /* XXX: Motion interaction with v_chf. */
sp
->csearchdir
= tSEARCH
;
* Search forward in the line for the next occurrence of the character.
* Place the cursor to its right if a motion command, on it if its not.
v_chf(sp
, ep
, vp
, fm
, tm
, rp
)
* If it's a dot command, it doesn't reset the key for which
* we're searching, e.g. in "df1|f2|.|;", the ';' searches
if (!F_ISSET(vp
, VC_ISDOT
))
sp
->csearchdir
= fSEARCH
;
if ((p
= file_gline(sp
, ep
, fm
->lno
, &len
)) == NULL
) {
if (file_lline(sp
, ep
, &lno
))
GETLINE_ERR(sp
, fm
->lno
);
for (cnt
= F_ISSET(vp
, VC_C1SET
) ? vp
->count
: 1; cnt
--;) {
while (++p
< endp
&& *p
!= key
);
if (F_ISSET(vp
, VC_C
| VC_D
| VC_Y
))
* Search backward in the line for the next occurrence of the character.
* Place the cursor to its right.
v_chT(sp
, ep
, vp
, fm
, tm
, rp
)
rval
= v_chF(sp
, ep
, vp
, fm
, tm
, rp
);
sp
->csearchdir
= TSEARCH
;
* Search backward in the line for the next occurrence of the character.
* Place the cursor on it.
v_chF(sp
, ep
, vp
, fm
, tm
, rp
)
* If it's a dot command, it doesn't reset the key for which
* we're searching, e.g. in "df1|f2|.|;", the ';' searches
if (!F_ISSET(vp
, VC_ISDOT
))
sp
->csearchdir
= FSEARCH
;
if ((p
= file_gline(sp
, ep
, fm
->lno
, &len
)) == NULL
) {
if (file_lline(sp
, ep
, &lno
))
GETLINE_ERR(sp
, fm
->lno
);
for (cnt
= F_ISSET(vp
, VC_C1SET
) ? vp
->count
: 1; cnt
--;) {
while (--p
> endp
&& *p
!= key
);
rp
->cno
= (p
- endp
) - 1;