delch.c revision 1.19 1 1.19 jdc /* $NetBSD: delch.c,v 1.19 2006/02/05 17:39:52 jdc Exp $ */
2 1.8 mikel
3 1.1 cgd /*
4 1.7 cgd * Copyright (c) 1981, 1993, 1994
5 1.5 cgd * The Regents of the University of California. All rights reserved.
6 1.1 cgd *
7 1.1 cgd * Redistribution and use in source and binary forms, with or without
8 1.1 cgd * modification, are permitted provided that the following conditions
9 1.1 cgd * are met:
10 1.1 cgd * 1. Redistributions of source code must retain the above copyright
11 1.1 cgd * notice, this list of conditions and the following disclaimer.
12 1.1 cgd * 2. Redistributions in binary form must reproduce the above copyright
13 1.1 cgd * notice, this list of conditions and the following disclaimer in the
14 1.1 cgd * documentation and/or other materials provided with the distribution.
15 1.16 agc * 3. Neither the name of the University nor the names of its contributors
16 1.1 cgd * may be used to endorse or promote products derived from this software
17 1.1 cgd * without specific prior written permission.
18 1.1 cgd *
19 1.1 cgd * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
20 1.1 cgd * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
21 1.1 cgd * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
22 1.1 cgd * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
23 1.1 cgd * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
24 1.1 cgd * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
25 1.1 cgd * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
26 1.1 cgd * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
27 1.1 cgd * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
28 1.1 cgd * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
29 1.1 cgd * SUCH DAMAGE.
30 1.1 cgd */
31 1.1 cgd
32 1.8 mikel #include <sys/cdefs.h>
33 1.1 cgd #ifndef lint
34 1.8 mikel #if 0
35 1.7 cgd static char sccsid[] = "@(#)delch.c 8.2 (Berkeley) 5/4/94";
36 1.8 mikel #else
37 1.19 jdc __RCSID("$NetBSD: delch.c,v 1.19 2006/02/05 17:39:52 jdc Exp $");
38 1.8 mikel #endif
39 1.10 mrg #endif /* not lint */
40 1.1 cgd
41 1.5 cgd #include <string.h>
42 1.7 cgd
43 1.7 cgd #include "curses.h"
44 1.11 blymn #include "curses_private.h"
45 1.1 cgd
46 1.12 blymn #ifndef _CURSES_USE_MACROS
47 1.12 blymn /*
48 1.12 blymn * delch --
49 1.17 wiz * Do a delete-char on the line, leaving (cury, curx) unchanged.
50 1.12 blymn */
51 1.12 blymn int
52 1.12 blymn delch(void)
53 1.12 blymn {
54 1.12 blymn return wdelch(stdscr);
55 1.12 blymn }
56 1.12 blymn
57 1.12 blymn /*
58 1.12 blymn * mvdelch --
59 1.17 wiz * Do a delete-char on the line at (y, x) on stdscr.
60 1.12 blymn */
61 1.12 blymn int
62 1.12 blymn mvdelch(int y, int x)
63 1.12 blymn {
64 1.12 blymn return mvwdelch(stdscr, y, x);
65 1.12 blymn }
66 1.12 blymn
67 1.12 blymn /*
68 1.12 blymn * mvwdelch --
69 1.17 wiz * Do a delete-char on the line at (y, x) of the given window.
70 1.12 blymn */
71 1.12 blymn int
72 1.12 blymn mvwdelch(WINDOW *win, int y, int x)
73 1.12 blymn {
74 1.12 blymn if (wmove(win, y, x) == ERR)
75 1.12 blymn return ERR;
76 1.12 blymn
77 1.12 blymn return wdelch(win);
78 1.12 blymn }
79 1.12 blymn
80 1.12 blymn #endif
81 1.12 blymn
82 1.1 cgd /*
83 1.4 mycroft * wdelch --
84 1.17 wiz * Do a delete-char on the line, leaving (cury, curx) unchanged.
85 1.1 cgd */
86 1.4 mycroft int
87 1.12 blymn wdelch(WINDOW *win)
88 1.4 mycroft {
89 1.9 perry __LDATA *end, *temp1, *temp2;
90 1.1 cgd
91 1.5 cgd end = &win->lines[win->cury]->line[win->maxx - 1];
92 1.5 cgd temp1 = &win->lines[win->cury]->line[win->curx];
93 1.1 cgd temp2 = temp1 + 1;
94 1.5 cgd while (temp1 < end) {
95 1.10 mrg (void) memcpy(temp1, temp2, sizeof(__LDATA));
96 1.5 cgd temp1++, temp2++;
97 1.5 cgd }
98 1.19 jdc temp1->ch = win->bch;
99 1.19 jdc if (__using_color && win != curscr)
100 1.19 jdc temp1->attr = win->battr & __COLOR;
101 1.19 jdc else
102 1.19 jdc temp1->attr = 0;
103 1.14 mycroft __touchline(win, (int) win->cury, (int) win->curx, (int) win->maxx - 1);
104 1.4 mycroft return (OK);
105 1.1 cgd }
106