vi/v_txt.c: txt_dent: introduce sequence point between decrement and access
[nvi.git] / vi / v_z.c
blob4c9b836fb7ce81aa08159916e05ccc84468ad554
1 /*-
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.
8 */
10 #include "config.h"
12 #ifndef lint
13 static const char sccsid[] = "$Id: v_z.c,v 10.12 2001/06/25 15:19:36 skimo Exp $ (Berkeley) $Date: 2001/06/25 15:19:36 $";
14 #endif /* not lint */
16 #include <sys/types.h>
17 #include <sys/queue.h>
18 #include <sys/time.h>
20 #include <bitstring.h>
21 #include <limits.h>
22 #include <stdio.h>
24 #include "../common/common.h"
25 #include "vi.h"
28 * v_z -- [count]z[count][-.+^<CR>]
29 * Move the screen.
31 * PUBLIC: int v_z __P((SCR *, VICMD *));
33 int
34 v_z(SCR *sp, VICMD *vp)
36 db_recno_t lno;
37 u_int value;
40 * The first count is the line to use. If the value doesn't
41 * exist, use the last line.
43 if (F_ISSET(vp, VC_C1SET)) {
44 lno = vp->count;
45 if (!db_exist(sp, lno) && db_last(sp, &lno))
46 return (1);
47 } else
48 lno = vp->m_start.lno;
50 /* Set default return cursor line. */
51 vp->m_final.lno = lno;
52 vp->m_final.cno = vp->m_start.cno;
55 * The second count is the displayed window size, i.e. the 'z' command
56 * is another way to get artificially small windows. Note, you can't
57 * grow beyond the size of the window.
59 * !!!
60 * A window size of 0 was historically allowed, and simply ignored.
61 * This could be much more simply done by modifying the value of the
62 * O_WINDOW option, but that's not how it worked historically.
64 if (F_ISSET(vp, VC_C2SET) && vp->count2 != 0) {
65 if (vp->count2 > O_VAL(sp, O_WINDOW))
66 vp->count2 = O_VAL(sp, O_WINDOW);
67 if (vs_crel(sp, vp->count2))
68 return (1);
71 switch (vp->character) {
72 case '-': /* Put the line at the bottom. */
73 if (vs_sm_fill(sp, lno, P_BOTTOM))
74 return (1);
75 break;
76 case '.': /* Put the line in the middle. */
77 if (vs_sm_fill(sp, lno, P_MIDDLE))
78 return (1);
79 break;
80 case '+':
82 * If the user specified a line number, put that line at the
83 * top and move the cursor to it. Otherwise, scroll forward
84 * a screen from the current screen.
86 if (F_ISSET(vp, VC_C1SET)) {
87 if (vs_sm_fill(sp, lno, P_TOP))
88 return (1);
89 if (vs_sm_position(sp, &vp->m_final, 0, P_TOP))
90 return (1);
91 } else
92 if (vs_sm_scroll(sp, &vp->m_final, sp->t_rows, Z_PLUS))
93 return (1);
94 break;
95 case '^':
97 * If the user specified a line number, put that line at the
98 * bottom, move the cursor to it, and then display the screen
99 * before that one. Otherwise, scroll backward a screen from
100 * the current screen.
102 * !!!
103 * Note, we match the off-by-one characteristics of historic
104 * vi, here.
106 if (F_ISSET(vp, VC_C1SET)) {
107 if (vs_sm_fill(sp, lno, P_BOTTOM))
108 return (1);
109 if (vs_sm_position(sp, &vp->m_final, 0, P_TOP))
110 return (1);
111 if (vs_sm_fill(sp, vp->m_final.lno, P_BOTTOM))
112 return (1);
113 } else
114 if (vs_sm_scroll(sp, &vp->m_final, sp->t_rows, Z_CARAT))
115 return (1);
116 break;
117 default: /* Put the line at the top for <cr>. */
118 value = KEY_VAL(sp, vp->character);
119 if (value != K_CR && value != K_NL) {
120 v_emsg(sp, vp->kp->usage, VIM_USAGE);
121 return (1);
123 if (vs_sm_fill(sp, lno, P_TOP))
124 return (1);
125 break;
127 return (0);
131 * vs_crel --
132 * Change the relative size of the current screen.
134 * PUBLIC: int vs_crel __P((SCR *, long));
137 vs_crel(SCR *sp, long int count)
139 sp->t_minrows = sp->t_rows = count;
140 if (sp->t_rows > sp->rows - 1)
141 sp->t_minrows = sp->t_rows = sp->rows - 1;
142 TMAP = HMAP + (sp->t_rows - 1);
143 F_SET(sp, SC_SCR_REDRAW);
144 return (0);