1/*
2 * CDDL HEADER START
3 *
4 * The contents of this file are subject to the terms of the
5 * Common Development and Distribution License, Version 1.0 only
6 * (the "License").  You may not use this file except in compliance
7 * with the License.
8 *
9 * You can obtain a copy of the license at usr/src/OPENSOLARIS.LICENSE
10 * or http://www.opensolaris.org/os/licensing.
11 * See the License for the specific language governing permissions
12 * and limitations under the License.
13 *
14 * When distributing Covered Code, include this CDDL HEADER in each
15 * file and include the License file at usr/src/OPENSOLARIS.LICENSE.
16 * If applicable, add the following below this CDDL HEADER, with the
17 * fields enclosed by brackets "[]" replaced with your own identifying
18 * information: Portions Copyright [yyyy] [name of copyright owner]
19 *
20 * CDDL HEADER END
21 */
22/*
23 * Copyright (c) 1995-1998 by Sun Microsystems, Inc.
24 * All rights reserved.
25 */
26
27#pragma ident	"%Z%%M%	%I%	%E% SMI"
28
29/* LINTLIBRARY */
30
31/*
32 * wdelch.c
33 *
34 * XCurses Library
35 *
36 * Copyright 1990, 1995 by Mortice Kern Systems Inc.  All rights reserved.
37 *
38 */
39
40#ifdef M_RCSID
41#ifndef lint
42static char rcsID[] =
43"$Header: /team/ps/sun_xcurses/archive/local_changes/xcurses/src/lib/"
44"libxcurses/src/libc/xcurses/rcs/wdelch.c 1.3 1998/05/26 14:22:13 "
45"cbates Exp $";
46#endif
47#endif
48
49#include <private.h>
50#include <string.h>
51
52/*
53 * Delete the character under the cursor; all characters to the right of
54 * the cursor on the same line are moved to the left by one position and
55 * the last character on the line is filled with a blank. The cursor
56 * position does not change.
57 */
58int
59wdelch(WINDOW *w)
60{
61	int	next, width, y, x;
62
63	y = w->_cury;
64	x = w->_curx;
65
66	next = __m_cc_next(w, y, x);
67	x = __m_cc_first(w, y, x);
68
69	/* Determine the character width to delete. */
70	width = __m_cc_width(&w->_line[y][x]);
71
72	/* Shift line left to erase the character under the cursor. */
73	(void) memcpy(&w->_line[y][x], &w->_line[y][next],
74		(w->_maxx - next) * sizeof (**w->_line));
75
76	/*
77	 * Add blank(s) to the end of line based on the width
78	 * of the character that was deleted.
79	 */
80	(void) __m_cc_erase(w, y, w->_maxx - width, y, w->_maxx - 1);
81
82	/* Set dity region markers. */
83	if (x < w->_first[y])
84		w->_first[y] = (short) x;
85	w->_last[y] = w->_maxx;
86
87	WSYNC(w);
88
89	return (WFLUSH(w));
90}
91