1*86d7f5d3SJohn Marino /* @(#)wwupdate.c 8.1 (Berkeley) 6/6/93 */
2*86d7f5d3SJohn Marino /* $NetBSD: wwupdate.c,v 1.6 2003/08/07 11:17:46 agc Exp $ */
3*86d7f5d3SJohn Marino
4*86d7f5d3SJohn Marino /*
5*86d7f5d3SJohn Marino * Copyright (c) 1983, 1993
6*86d7f5d3SJohn Marino * The Regents of the University of California. All rights reserved.
7*86d7f5d3SJohn Marino *
8*86d7f5d3SJohn Marino * This code is derived from software contributed to Berkeley by
9*86d7f5d3SJohn Marino * Edward Wang at The University of California, Berkeley.
10*86d7f5d3SJohn Marino *
11*86d7f5d3SJohn Marino * Redistribution and use in source and binary forms, with or without
12*86d7f5d3SJohn Marino * modification, are permitted provided that the following conditions
13*86d7f5d3SJohn Marino * are met:
14*86d7f5d3SJohn Marino * 1. Redistributions of source code must retain the above copyright
15*86d7f5d3SJohn Marino * notice, this list of conditions and the following disclaimer.
16*86d7f5d3SJohn Marino * 2. Redistributions in binary form must reproduce the above copyright
17*86d7f5d3SJohn Marino * notice, this list of conditions and the following disclaimer in the
18*86d7f5d3SJohn Marino * documentation and/or other materials provided with the distribution.
19*86d7f5d3SJohn Marino * 3. Neither the name of the University nor the names of its contributors
20*86d7f5d3SJohn Marino * may be used to endorse or promote products derived from this software
21*86d7f5d3SJohn Marino * without specific prior written permission.
22*86d7f5d3SJohn Marino *
23*86d7f5d3SJohn Marino * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
24*86d7f5d3SJohn Marino * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
25*86d7f5d3SJohn Marino * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
26*86d7f5d3SJohn Marino * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
27*86d7f5d3SJohn Marino * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
28*86d7f5d3SJohn Marino * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
29*86d7f5d3SJohn Marino * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
30*86d7f5d3SJohn Marino * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
31*86d7f5d3SJohn Marino * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
32*86d7f5d3SJohn Marino * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
33*86d7f5d3SJohn Marino * SUCH DAMAGE.
34*86d7f5d3SJohn Marino */
35*86d7f5d3SJohn Marino
36*86d7f5d3SJohn Marino #include "ww.h"
37*86d7f5d3SJohn Marino #include "tt.h"
38*86d7f5d3SJohn Marino #include "xx.h"
39*86d7f5d3SJohn Marino
40*86d7f5d3SJohn Marino void
wwupdate1(int top,int bot)41*86d7f5d3SJohn Marino wwupdate1(int top, int bot)
42*86d7f5d3SJohn Marino {
43*86d7f5d3SJohn Marino int i;
44*86d7f5d3SJohn Marino int j;
45*86d7f5d3SJohn Marino char *touched;
46*86d7f5d3SJohn Marino struct ww_update *upd;
47*86d7f5d3SJohn Marino char check_clreos = 0;
48*86d7f5d3SJohn Marino int scan_top, scan_bot;
49*86d7f5d3SJohn Marino
50*86d7f5d3SJohn Marino wwnupdate++;
51*86d7f5d3SJohn Marino {
52*86d7f5d3SJohn Marino char *t1 = wwtouched + top, *t2 = wwtouched + bot;
53*86d7f5d3SJohn Marino int n;
54*86d7f5d3SJohn Marino
55*86d7f5d3SJohn Marino while (!*t1++)
56*86d7f5d3SJohn Marino if (t1 == t2)
57*86d7f5d3SJohn Marino return;
58*86d7f5d3SJohn Marino while (!*--t2)
59*86d7f5d3SJohn Marino ;
60*86d7f5d3SJohn Marino scan_top = top = t1 - wwtouched - 1;
61*86d7f5d3SJohn Marino scan_bot = bot = t2 - wwtouched + 1;
62*86d7f5d3SJohn Marino if (scan_bot - scan_top > 1 &&
63*86d7f5d3SJohn Marino (tt.tt_clreos != 0 || tt.tt_clear != 0)) {
64*86d7f5d3SJohn Marino int st = tt.tt_clreos != 0 ? scan_top : 0;
65*86d7f5d3SJohn Marino
66*86d7f5d3SJohn Marino /*
67*86d7f5d3SJohn Marino * t1 is one past the first touched row,
68*86d7f5d3SJohn Marino * t2 is on the last touched row.
69*86d7f5d3SJohn Marino */
70*86d7f5d3SJohn Marino for (t1--, n = 1; t1 < t2;)
71*86d7f5d3SJohn Marino if (*t1++)
72*86d7f5d3SJohn Marino n++;
73*86d7f5d3SJohn Marino /*
74*86d7f5d3SJohn Marino * If we can't clreos then we try for clearing
75*86d7f5d3SJohn Marino * the whole screen.
76*86d7f5d3SJohn Marino */
77*86d7f5d3SJohn Marino if ((check_clreos = n * 10 > (wwnrow - st) * 9)) {
78*86d7f5d3SJohn Marino scan_top = st;
79*86d7f5d3SJohn Marino scan_bot = wwnrow;
80*86d7f5d3SJohn Marino }
81*86d7f5d3SJohn Marino }
82*86d7f5d3SJohn Marino }
83*86d7f5d3SJohn Marino if (tt.tt_clreol == 0 && !check_clreos)
84*86d7f5d3SJohn Marino goto simple;
85*86d7f5d3SJohn Marino for (i = scan_top, touched = &wwtouched[i], upd = &wwupd[i];
86*86d7f5d3SJohn Marino i < scan_bot;
87*86d7f5d3SJohn Marino i++, touched++, upd++) {
88*86d7f5d3SJohn Marino int gain = 0;
89*86d7f5d3SJohn Marino int best_gain = 0;
90*86d7f5d3SJohn Marino int best_col = 0;
91*86d7f5d3SJohn Marino union ww_char *ns, *os;
92*86d7f5d3SJohn Marino
93*86d7f5d3SJohn Marino if (wwinterrupt())
94*86d7f5d3SJohn Marino return;
95*86d7f5d3SJohn Marino if (!check_clreos && !*touched)
96*86d7f5d3SJohn Marino continue;
97*86d7f5d3SJohn Marino wwnupdscan++;
98*86d7f5d3SJohn Marino j = wwncol;
99*86d7f5d3SJohn Marino ns = &wwns[i][j];
100*86d7f5d3SJohn Marino os = &wwos[i][j];
101*86d7f5d3SJohn Marino while (--j >= 0) {
102*86d7f5d3SJohn Marino /*
103*86d7f5d3SJohn Marino * The cost of clearing is:
104*86d7f5d3SJohn Marino * ncol - nblank + X
105*86d7f5d3SJohn Marino * The cost of straight update is, more or less:
106*86d7f5d3SJohn Marino * ncol - nsame
107*86d7f5d3SJohn Marino * We clear if nblank - nsame > X
108*86d7f5d3SJohn Marino * X is the clreol overhead.
109*86d7f5d3SJohn Marino * So we make gain = nblank - nsame.
110*86d7f5d3SJohn Marino */
111*86d7f5d3SJohn Marino if ((--ns)->c_w == (--os)->c_w)
112*86d7f5d3SJohn Marino gain--;
113*86d7f5d3SJohn Marino else
114*86d7f5d3SJohn Marino best_gain--;
115*86d7f5d3SJohn Marino if (ns->c_w == ' ')
116*86d7f5d3SJohn Marino gain++;
117*86d7f5d3SJohn Marino if (gain > best_gain) {
118*86d7f5d3SJohn Marino best_col = j;
119*86d7f5d3SJohn Marino best_gain = gain;
120*86d7f5d3SJohn Marino }
121*86d7f5d3SJohn Marino }
122*86d7f5d3SJohn Marino upd->best_gain = best_gain;
123*86d7f5d3SJohn Marino upd->best_col = best_col;
124*86d7f5d3SJohn Marino upd->gain = gain;
125*86d7f5d3SJohn Marino }
126*86d7f5d3SJohn Marino if (check_clreos) {
127*86d7f5d3SJohn Marino struct ww_update *u;
128*86d7f5d3SJohn Marino int gain = 0;
129*86d7f5d3SJohn Marino int best_gain = 0;
130*86d7f5d3SJohn Marino int best_row = 0;
131*86d7f5d3SJohn Marino int simple_gain = 0;
132*86d7f5d3SJohn Marino char didit = 0;
133*86d7f5d3SJohn Marino
134*86d7f5d3SJohn Marino /*
135*86d7f5d3SJohn Marino * gain is the advantage of clearing all the lines.
136*86d7f5d3SJohn Marino * best_gain is the advantage of clearing to eos
137*86d7f5d3SJohn Marino * at best_row and u->best_col.
138*86d7f5d3SJohn Marino * simple_gain is the advantage of using only clreol.
139*86d7f5d3SJohn Marino * We use g > best_gain because u->best_col can be
140*86d7f5d3SJohn Marino * undefined when u->best_gain is 0 so we can't use it.
141*86d7f5d3SJohn Marino */
142*86d7f5d3SJohn Marino for (j = scan_bot - 1, u = wwupd + j; j >= top; j--, u--) {
143*86d7f5d3SJohn Marino int g = gain + u->best_gain;
144*86d7f5d3SJohn Marino
145*86d7f5d3SJohn Marino if (g > best_gain) {
146*86d7f5d3SJohn Marino best_gain = g;
147*86d7f5d3SJohn Marino best_row = j;
148*86d7f5d3SJohn Marino }
149*86d7f5d3SJohn Marino gain += u->gain;
150*86d7f5d3SJohn Marino if (tt.tt_clreol != 0 && u->best_gain > 4)
151*86d7f5d3SJohn Marino simple_gain += u->best_gain - 4;
152*86d7f5d3SJohn Marino }
153*86d7f5d3SJohn Marino if (tt.tt_clreos == 0) {
154*86d7f5d3SJohn Marino if (gain > simple_gain && gain > 4) {
155*86d7f5d3SJohn Marino xxclear();
156*86d7f5d3SJohn Marino i = top = scan_top;
157*86d7f5d3SJohn Marino bot = scan_bot;
158*86d7f5d3SJohn Marino j = 0;
159*86d7f5d3SJohn Marino didit = 1;
160*86d7f5d3SJohn Marino }
161*86d7f5d3SJohn Marino } else
162*86d7f5d3SJohn Marino if (best_gain > simple_gain && best_gain > 4) {
163*86d7f5d3SJohn Marino i = best_row;
164*86d7f5d3SJohn Marino xxclreos(i, j = wwupd[i].best_col);
165*86d7f5d3SJohn Marino bot = scan_bot;
166*86d7f5d3SJohn Marino didit = 1;
167*86d7f5d3SJohn Marino }
168*86d7f5d3SJohn Marino if (didit) {
169*86d7f5d3SJohn Marino wwnupdclreos++;
170*86d7f5d3SJohn Marino wwnupdclreosline += wwnrow - i;
171*86d7f5d3SJohn Marino u = wwupd + i;
172*86d7f5d3SJohn Marino while (i < scan_bot) {
173*86d7f5d3SJohn Marino union ww_char *os = &wwos[i][j];
174*86d7f5d3SJohn Marino
175*86d7f5d3SJohn Marino for (j = wwncol - j; --j >= 0;)
176*86d7f5d3SJohn Marino os++->c_w = ' ';
177*86d7f5d3SJohn Marino wwtouched[i++] |= WWU_TOUCHED;
178*86d7f5d3SJohn Marino u++->best_gain = 0;
179*86d7f5d3SJohn Marino j = 0;
180*86d7f5d3SJohn Marino }
181*86d7f5d3SJohn Marino } else
182*86d7f5d3SJohn Marino wwnupdclreosmiss++;
183*86d7f5d3SJohn Marino }
184*86d7f5d3SJohn Marino simple:
185*86d7f5d3SJohn Marino for (i = top, touched = &wwtouched[i], upd = &wwupd[i]; i < bot;
186*86d7f5d3SJohn Marino i++, touched++, upd++) {
187*86d7f5d3SJohn Marino union ww_char *os, *ns;
188*86d7f5d3SJohn Marino char didit;
189*86d7f5d3SJohn Marino
190*86d7f5d3SJohn Marino if (!*touched)
191*86d7f5d3SJohn Marino continue;
192*86d7f5d3SJohn Marino *touched = 0;
193*86d7f5d3SJohn Marino wwnupdline++;
194*86d7f5d3SJohn Marino didit = 0;
195*86d7f5d3SJohn Marino if (tt.tt_clreol != 0 && upd->best_gain > 4) {
196*86d7f5d3SJohn Marino wwnupdclreol++;
197*86d7f5d3SJohn Marino xxclreol(i, j = upd->best_col);
198*86d7f5d3SJohn Marino for (os = &wwos[i][j], j = wwncol - j; --j >= 0;)
199*86d7f5d3SJohn Marino os++->c_w = ' ';
200*86d7f5d3SJohn Marino didit = 1;
201*86d7f5d3SJohn Marino }
202*86d7f5d3SJohn Marino ns = wwns[i];
203*86d7f5d3SJohn Marino os = wwos[i];
204*86d7f5d3SJohn Marino for (j = 0; j < wwncol;) {
205*86d7f5d3SJohn Marino char *p, *q;
206*86d7f5d3SJohn Marino char m;
207*86d7f5d3SJohn Marino int c;
208*86d7f5d3SJohn Marino int n;
209*86d7f5d3SJohn Marino char buf[512]; /* > wwncol */
210*86d7f5d3SJohn Marino union ww_char lastc;
211*86d7f5d3SJohn Marino
212*86d7f5d3SJohn Marino for (; j++ < wwncol && ns++->c_w == os++->c_w;)
213*86d7f5d3SJohn Marino ;
214*86d7f5d3SJohn Marino if (j > wwncol)
215*86d7f5d3SJohn Marino break;
216*86d7f5d3SJohn Marino p = buf;
217*86d7f5d3SJohn Marino m = ns[-1].c_m;
218*86d7f5d3SJohn Marino c = j - 1;
219*86d7f5d3SJohn Marino os[-1] = ns[-1];
220*86d7f5d3SJohn Marino *p++ = ns[-1].c_c;
221*86d7f5d3SJohn Marino n = 5;
222*86d7f5d3SJohn Marino q = p;
223*86d7f5d3SJohn Marino while (j < wwncol && ns->c_m == m) {
224*86d7f5d3SJohn Marino *p++ = ns->c_c;
225*86d7f5d3SJohn Marino if (ns->c_w == os->c_w) {
226*86d7f5d3SJohn Marino if (--n <= 0)
227*86d7f5d3SJohn Marino break;
228*86d7f5d3SJohn Marino os++;
229*86d7f5d3SJohn Marino ns++;
230*86d7f5d3SJohn Marino } else {
231*86d7f5d3SJohn Marino n = 5;
232*86d7f5d3SJohn Marino q = p;
233*86d7f5d3SJohn Marino lastc = *os;
234*86d7f5d3SJohn Marino *os++ = *ns++;
235*86d7f5d3SJohn Marino }
236*86d7f5d3SJohn Marino j++;
237*86d7f5d3SJohn Marino }
238*86d7f5d3SJohn Marino n = q - buf;
239*86d7f5d3SJohn Marino if (!wwwrap || i != wwnrow - 1 || c + n != wwncol)
240*86d7f5d3SJohn Marino xxwrite(i, c, buf, n, m);
241*86d7f5d3SJohn Marino else if (tt.tt_inschar || tt.tt_insspace) {
242*86d7f5d3SJohn Marino if (n > 1) {
243*86d7f5d3SJohn Marino q[-2] = q[-1];
244*86d7f5d3SJohn Marino n--;
245*86d7f5d3SJohn Marino } else
246*86d7f5d3SJohn Marino c--;
247*86d7f5d3SJohn Marino xxwrite(i, c, buf, n, m);
248*86d7f5d3SJohn Marino c += n - 1;
249*86d7f5d3SJohn Marino if (tt.tt_inschar)
250*86d7f5d3SJohn Marino xxinschar(i, c, ns[-2].c_c,
251*86d7f5d3SJohn Marino ns[-2].c_m);
252*86d7f5d3SJohn Marino else {
253*86d7f5d3SJohn Marino xxinsspace(i, c);
254*86d7f5d3SJohn Marino xxwrite(i, c, &ns[-2].c_c, 1,
255*86d7f5d3SJohn Marino ns[-2].c_m);
256*86d7f5d3SJohn Marino }
257*86d7f5d3SJohn Marino } else {
258*86d7f5d3SJohn Marino if (--n)
259*86d7f5d3SJohn Marino xxwrite(i, c, buf, n, m);
260*86d7f5d3SJohn Marino os[-1] = lastc;
261*86d7f5d3SJohn Marino *touched = WWU_TOUCHED;
262*86d7f5d3SJohn Marino }
263*86d7f5d3SJohn Marino didit = 1;
264*86d7f5d3SJohn Marino }
265*86d7f5d3SJohn Marino if (!didit)
266*86d7f5d3SJohn Marino wwnupdmiss++;
267*86d7f5d3SJohn Marino }
268*86d7f5d3SJohn Marino }
269