2 * Copyright (c) 1992, 1993, 1994
3 * The Regents of the University of California. All rights reserved.
4 * Copyright (c) 1992, 1993, 1994, 1995, 1996
5 * Keith Bostic. All rights reserved.
7 * See the LICENSE file for redistribution information.
13 static const char sccsid
[] = "$Id: v_paragraph.c,v 10.7 1996/03/06 19:54:26 bostic Exp $ (Berkeley) $Date: 1996/03/06 19:54:26 $";
16 #include <sys/types.h>
17 #include <sys/queue.h>
20 #include <bitstring.h>
27 #include "../common/common.h"
30 #define INTEXT_CHECK { \
31 if (len == 0 || v_isempty(p, len)) { \
38 * Historic documentation (USD:15-11, 4.2) said that formfeed \
39 * characters (^L) in the first column delimited paragraphs. \
40 * The historic vi code mentions formfeed characters, but never \
41 * implements them. It seems reasonable, do it. \
43 if (p[0] == '\014') { \
48 if (p[0] != '.' || len < 2) \
50 for (lp = VIP(sp)->ps; *lp != '\0'; lp += 2) \
51 if (lp[0] == p[1] && \
52 (lp[1] == ' ' && len == 2 || lp[1] == p[2]) && \
58 * v_paragraphf -- [count]}
59 * Move forward count paragraphs.
61 * Paragraphs are empty lines after text, formfeed characters, or values
62 * from the paragraph or section options.
64 * PUBLIC: int v_paragraphf __P((SCR *, VICMD *));
71 enum { P_INTEXT
, P_INBLANK
} pstate
;
73 recno_t cnt
, lastlno
, lno
;
79 * If the starting cursor position is at or before any non-blank
80 * characters in the line, i.e. the movement is cutting all of the
81 * line's text, the buffer is in line mode. It's a lot easier to
82 * check here, because we know that the end is going to be the start
85 * This was historical practice in vi, with a single exception. If
86 * the paragraph movement was from the start of the last line to EOF,
87 * then all the characters were deleted from the last line, but the
88 * line itself remained. If somebody complains, don't pause, don't
89 * hesitate, just hit them.
92 if (vp
->m_start
.cno
== 0)
95 vp
->m_stop
= vp
->m_start
;
97 if (nonblank(sp
, vp
->m_stop
.lno
, &vp
->m_stop
.cno
))
99 if (vp
->m_start
.cno
<= vp
->m_stop
.cno
)
103 /* Figure out what state we're currently in. */
104 lno
= vp
->m_start
.lno
;
105 if (db_get(sp
, lno
, 0, &p
, &len
))
109 * If we start in text, we want to switch states
110 * (2 * N - 1) times, in non-text, (2 * N) times.
112 cnt
= F_ISSET(vp
, VC_C1SET
) ? vp
->count
: 1;
114 if (len
== 0 || v_isempty(p
, len
))
124 if (db_get(sp
, ++lno
, 0, &p
, &len
))
131 if (len
== 0 || v_isempty(p
, len
))
139 * Non-motion commands move to the end of the range,
140 * delete and yank stay at the start. Ignore others.
141 * Adjust the end of the range for motion commands;
142 * historically, a motion component was to the end of
143 * the previous line, whereas the movement command was
144 * to the start of the new "paragraph".
146 found
: if (ISMOTION(vp
)) {
147 vp
->m_stop
.lno
= lastlno
;
148 vp
->m_stop
.cno
= lastlen
? lastlen
- 1 : 0;
149 vp
->m_final
= vp
->m_start
;
151 vp
->m_stop
.lno
= lno
;
153 vp
->m_final
= vp
->m_stop
;
163 * Adjust end of the range for motion commands; EOF is a movement
164 * sink. The } command historically moved to the end of the last
165 * line, not the beginning, from any position before the end of the
166 * last line. It also historically worked on empty files, so we
167 * have to make it okay.
169 eof
: if (vp
->m_start
.lno
== lno
|| vp
->m_start
.lno
== lno
- 1) {
170 if (db_eget(sp
, vp
->m_start
.lno
, &p
, &len
, &isempty
)) {
176 if (vp
->m_start
.cno
== (len
? len
- 1 : 0)) {
183 * Non-motion commands move to the end of the range, delete
184 * and yank stay at the start. Ignore others.
186 * If deleting the line (which happens if deleting to EOF), then
187 * cursor movement is to the first nonblank.
189 if (ISMOTION(vp
) && ISCMD(vp
->rkp
, 'd')) {
190 F_CLR(vp
, VM_RCM_MASK
);
191 F_SET(vp
, VM_RCM_SETFNB
);
193 vp
->m_stop
.lno
= lno
- 1;
194 vp
->m_stop
.cno
= len
? len
- 1 : 0;
195 vp
->m_final
= ISMOTION(vp
) ? vp
->m_start
: vp
->m_stop
;
200 * v_paragraphb -- [count]{
201 * Move backward count paragraphs.
203 * PUBLIC: int v_paragraphb __P((SCR *, VICMD *));
210 enum { P_INTEXT
, P_INBLANK
} pstate
;
217 * Check for SOF. The historic vi didn't complain if users hit SOF
218 * repeatedly, unless it was part of a motion command. There is no
219 * question but that Emerson's editor of choice was vi.
221 * The { command historically moved to the beginning of the first
222 * line if invoked on the first line.
225 * If the starting cursor position is in the first column (backward
226 * paragraph movements did NOT historically pay attention to non-blank
227 * characters) i.e. the movement is cutting the entire line, the buffer
228 * is in line mode. Cuts from the beginning of the line also did not
229 * cut the current line, but started at the previous EOL.
231 * Correct for a left motion component while we're thinking about it.
233 lno
= vp
->m_start
.lno
;
236 if (vp
->m_start
.cno
== 0) {
237 if (vp
->m_start
.lno
== 1) {
238 v_sof(sp
, &vp
->m_start
);
246 if (vp
->m_start
.lno
<= 1)
249 /* Figure out what state we're currently in. */
250 if (db_get(sp
, lno
, 0, &p
, &len
))
254 * If we start in text, we want to switch states
255 * (2 * N - 1) times, in non-text, (2 * N) times.
257 cnt
= F_ISSET(vp
, VC_C1SET
) ? vp
->count
: 1;
259 if (len
== 0 || v_isempty(p
, len
))
267 * If the starting cursor is past the first column,
268 * the current line is checked for a paragraph.
270 if (vp
->m_start
.cno
> 0)
275 if (db_get(sp
, --lno
, 0, &p
, &len
))
282 if (len
!= 0 && !v_isempty(p
, len
)) {
293 /* SOF is a movement sink. */
296 found
: vp
->m_stop
.lno
= lno
;
300 * All commands move to the end of the range. (We already
301 * adjusted the start of the range for motion commands).
303 vp
->m_final
= vp
->m_stop
;
309 * Build the paragraph command search pattern.
311 * PUBLIC: int v_buildps __P((SCR *, char *, char *));
314 v_buildps(sp
, p_p
, s_p
)
323 * The vi paragraph command searches for either a paragraph or
324 * section option macro.
326 p_len
= p_p
== NULL
? 0 : strlen(p_p
);
327 s_len
= s_p
== NULL
? 0 : strlen(s_p
);
329 if (p_len
== 0 && s_len
== 0)
332 MALLOC_RET(sp
, p
, char *, p_len
+ s_len
+ 1);
339 memmove(p
, p_p
, p_len
+ 1);
341 memmove(p
+ p_len
, s_p
, s_len
+ 1);