]>
git.saurik.com Git - apple/shell_cmds.git/blob - window/wwdelchar.c
1 /* $NetBSD: wwdelchar.c,v 1.5 1997/11/21 08:37:10 lukem Exp $ */
4 * Copyright (c) 1983, 1993
5 * The Regents of the University of California. All rights reserved.
7 * This code is derived from software contributed to Berkeley by
8 * Edward Wang at The University of California, Berkeley.
10 * Redistribution and use in source and binary forms, with or without
11 * modification, are permitted provided that the following conditions
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. All advertising materials mentioning features or use of this software
19 * must display the following acknowledgement:
20 * This product includes software developed by the University of
21 * California, Berkeley and its contributors.
22 * 4. Neither the name of the University nor the names of its contributors
23 * may be used to endorse or promote products derived from this software
24 * without specific prior written permission.
26 * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
27 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
28 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
29 * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
30 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
31 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
32 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
33 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
34 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
35 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
39 #include <sys/cdefs.h>
42 static char sccsid
[] = "@(#)wwdelchar.c 8.1 (Berkeley) 6/6/93";
44 __RCSID("$NetBSD: wwdelchar.c,v 1.5 1997/11/21 08:37:10 lukem Exp $");
53 wwdelchar(w
, row
, col
)
61 * First, shift the line.
66 p
= &w
->ww_buf
[row
][col
];
68 for (i
= w
->ww_b
.r
- col
; --i
> 0;)
74 * If can't see it, just return.
76 if (row
< w
->ww_i
.t
|| row
>= w
->ww_i
.b
77 || w
->ww_i
.r
<= 0 || w
->ww_i
.r
<= col
)
84 * Now find out how much is actually changed, and fix wwns.
94 smap
= &wwsmap
[row
][col
];
95 for (i
= col
; i
< w
->ww_i
.r
&& *smap
++ != w
->ww_index
; i
++)
100 buf
= w
->ww_buf
[row
];
101 win
= w
->ww_win
[row
];
103 smap
= &wwsmap
[row
][i
];
104 touched
= wwtouched
[row
];
105 for (; i
< w
->ww_i
.r
; i
++) {
106 if (*smap
++ != w
->ww_index
)
108 touched
|= WWU_TOUCHED
;
111 buf
[i
].c_w
^ win
[i
] << WWC_MSHIFT
;
117 wwtouched
[row
] = touched
;
121 * Can/Should we use delete character?
123 if (tt
.tt_delchar
!= 0 && nvis
> (wwncol
- col
) / 2) {
124 union ww_char
*p
, *q
;
129 for (i
= wwncol
- col
; --i
> 0;)