1 /* $NetBSD: wwdelchar.c,v 1.7 2003/08/07 11:17:38 agc Exp $ */ 2 3 /* 4 * Copyright (c) 1983, 1993 5 * The Regents of the University of California. All rights reserved. 6 * 7 * This code is derived from software contributed to Berkeley by 8 * Edward Wang at The University of California, Berkeley. 9 * 10 * Redistribution and use in source and binary forms, with or without 11 * modification, are permitted provided that the following conditions 12 * are met: 13 * 1. Redistributions of source code must retain the above copyright 14 * notice, this list of conditions and the following disclaimer. 15 * 2. Redistributions in binary form must reproduce the above copyright 16 * notice, this list of conditions and the following disclaimer in the 17 * documentation and/or other materials provided with the distribution. 18 * 3. Neither the name of the University nor the names of its contributors 19 * may be used to endorse or promote products derived from this software 20 * without specific prior written permission. 21 * 22 * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND 23 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE 24 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE 25 * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE 26 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL 27 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS 28 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) 29 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT 30 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY 31 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF 32 * SUCH DAMAGE. 33 */ 34 35 #include <sys/cdefs.h> 36 #ifndef lint 37 #if 0 38 static char sccsid[] = "@(#)wwdelchar.c 8.1 (Berkeley) 6/6/93"; 39 #else 40 __RCSID("$NetBSD: wwdelchar.c,v 1.7 2003/08/07 11:17:38 agc Exp $"); 41 #endif 42 #endif /* not lint */ 43 44 #include "ww.h" 45 #include "tt.h" 46 #include "xx.h" 47 48 void 49 wwdelchar(struct ww *w, int row, int col) 50 { 51 int i; 52 int nvis; 53 54 /* 55 * First, shift the line. 56 */ 57 { 58 union ww_char *p, *q; 59 60 p = &w->ww_buf[row][col]; 61 q = p + 1; 62 for (i = w->ww_b.r - col; --i > 0;) 63 *p++ = *q++; 64 p->c_w = ' '; 65 } 66 67 /* 68 * If can't see it, just return. 69 */ 70 if (row < w->ww_i.t || row >= w->ww_i.b 71 || w->ww_i.r <= 0 || w->ww_i.r <= col) 72 return; 73 74 if (col < w->ww_i.l) 75 col = w->ww_i.l; 76 77 /* 78 * Now find out how much is actually changed, and fix wwns. 79 */ 80 { 81 union ww_char *buf; 82 char *win; 83 union ww_char *ns; 84 unsigned char *smap; 85 char touched; 86 87 nvis = 0; 88 smap = &wwsmap[row][col]; 89 for (i = col; i < w->ww_i.r && *smap++ != w->ww_index; i++) 90 ; 91 if (i >= w->ww_i.r) 92 return; 93 col = i; 94 buf = w->ww_buf[row]; 95 win = w->ww_win[row]; 96 ns = wwns[row]; 97 smap = &wwsmap[row][i]; 98 touched = wwtouched[row]; 99 for (; i < w->ww_i.r; i++) { 100 if (*smap++ != w->ww_index) 101 continue; 102 touched |= WWU_TOUCHED; 103 if (win[i]) 104 ns[i].c_w = 105 buf[i].c_w ^ win[i] << WWC_MSHIFT; 106 else { 107 nvis++; 108 ns[i] = buf[i]; 109 } 110 } 111 wwtouched[row] = touched; 112 } 113 114 /* 115 * Can/Should we use delete character? 116 */ 117 if (tt.tt_delchar != 0 && nvis > (wwncol - col) / 2) { 118 union ww_char *p, *q; 119 120 xxdelchar(row, col); 121 p = &wwos[row][col]; 122 q = p + 1; 123 for (i = wwncol - col; --i > 0;) 124 *p++ = *q++; 125 p->c_w = ' '; 126 } 127 } 128