xref: /netbsd-src/lib/libcurses/curses.c (revision 0d34d14bb949d7e0fe657c29532de778397cd58d)
1 /*	$NetBSD: curses.c,v 1.23 2009/07/22 16:57:14 roy Exp $	*/
2 
3 /*
4  * Copyright (c) 1981, 1993, 1994
5  *	The Regents of the University of California.  All rights reserved.
6  *
7  * Redistribution and use in source and binary forms, with or without
8  * modification, are permitted provided that the following conditions
9  * are met:
10  * 1. Redistributions of source code must retain the above copyright
11  *    notice, this list of conditions and the following disclaimer.
12  * 2. Redistributions in binary form must reproduce the above copyright
13  *    notice, this list of conditions and the following disclaimer in the
14  *    documentation and/or other materials provided with the distribution.
15  * 3. Neither the name of the University nor the names of its contributors
16  *    may be used to endorse or promote products derived from this software
17  *    without specific prior written permission.
18  *
19  * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
20  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
21  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
22  * ARE DISCLAIMED.  IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
23  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
24  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
25  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
26  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
27  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
28  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
29  * SUCH DAMAGE.
30  */
31 
32 #include <sys/cdefs.h>
33 #include <stdlib.h>
34 #ifndef lint
35 #if 0
36 static char sccsid[] = "@(#)curses.c	8.3 (Berkeley) 5/4/94";
37 #else
38 __RCSID("$NetBSD: curses.c,v 1.23 2009/07/22 16:57:14 roy Exp $");
39 #endif
40 #endif				/* not lint */
41 
42 #include "curses.h"
43 #include "curses_private.h"
44 
45 /* Private. */
46 int	__echoit = 1;			 /* If stty indicates ECHO. */
47 int	__pfast;
48 int	__rawmode = 0;			 /* If stty indicates RAW mode. */
49 int	__noqch = 0;
50 					 /* If terminal doesn't have
51 					 * insert/delete line capabilities
52 					 * for quick change on refresh.
53 					 */
54 
55 char	PC;
56 char	__tc_am, __tc_bs, __tc_cc, __tc_da, __tc_eo,
57 	__tc_hc, __tc_hl, __tc_in, __tc_mi, __tc_ms,
58 	__tc_nc, __tc_ns, __tc_os, __tc_ul, __tc_ut,
59 	__tc_xb, __tc_xn, __tc_xt, __tc_xs, __tc_xx;
60 char	__CA;
61 int	__tc_pa, __tc_Co, __tc_NC;
62 char	*__tc_ac, *__tc_AB, *__tc_ae, *__tc_AF, *__tc_AL,
63 	*__tc_al, *__tc_as, *__tc_bc, *__tc_bl, *__tc_bt,
64 	*__tc_cd, *__tc_ce, *__tc_cl, *__tc_cm, *__tc_cr,
65 	*__tc_cs, *__tc_dc, *__tc_DL, *__tc_dl, *__tc_dm,
66 	*__tc_DO, *__tc_do, *__tc_eA, *__tc_ed, *__tc_ei,
67 	*__tc_ho, *__tc_Ic, *__tc_ic, *__tc_im, *__tc_Ip,
68 	*__tc_ip, *__tc_k0, *__tc_k1, *__tc_k2, *__tc_k3,
69 	*__tc_k4, *__tc_k5, *__tc_k6, *__tc_k7, *__tc_k8,
70 	*__tc_k9, *__tc_kd, *__tc_ke, *__tc_kh, *__tc_kl,
71 	*__tc_kr, *__tc_ks, *__tc_ku, *__tc_LE, *__tc_ll,
72 	*__tc_ma, *__tc_mb, *__tc_md, *__tc_me, *__tc_mh,
73 	*__tc_mk, *__tc_mm, *__tc_mo, *__tc_mp, *__tc_mr,
74 	*__tc_nd, *__tc_nl, *__tc_oc, *__tc_op,
75 	*__tc_rc, *__tc_RI, *__tc_Sb, *__tc_sc, *__tc_se,
76 	*__tc_SF, *__tc_Sf, *__tc_sf, *__tc_so, *__tc_sp,
77 	*__tc_SR, *__tc_sr, *__tc_ta, *__tc_te, *__tc_ti,
78 	*__tc_uc, *__tc_ue, *__tc_UP, *__tc_up, *__tc_us,
79 	*__tc_vb, *__tc_ve, *__tc_vi, *__tc_vs;
80 
81 #ifdef HAVE_WCHAR
82 char *__tc_Xh, *__tc_Xl, *__tc_Xo, *__tc_Xr, *__tc_Xt,
83 	*__tc_Xv;
84 #endif /* HAVE_WCHAR */
85 
86 /*
87  * Public.
88  *
89  * XXX
90  * UPPERCASE isn't used by libcurses, and is left for backward
91  * compatibility only.
92  */
93 WINDOW	*curscr;			/* Current screen. */
94 WINDOW	*stdscr;			/* Standard screen. */
95 WINDOW	*__virtscr;			/* Virtual screen (for doupdate()). */
96 SCREEN  *_cursesi_screen;               /* the current screen we are using */
97 int	 COLS;				/* Columns on the screen. */
98 int	 LINES;				/* Lines on the screen. */
99 int	 COLORS;			/* Maximum colors on the screen */
100 int	 COLOR_PAIRS = 0;		/* Maximum color pairs on the screen */
101 int	 My_term = 0;			/* Use Def_term regardless. */
102 const char	*Def_term = "unknown";	/* Default terminal type. */
103 char	 __GT;				/* Gtty indicates tabs. */
104 char	 __NONL;			/* Term can't hack LF doing a CR. */
105 char	 __UPPERCASE;			/* Terminal is uppercase only. */
106 
107 #ifdef HAVE_WCHAR
108 /*
109  * Copy the non-spacing character list (src_nsp) to the given character,
110  * allocate or free storage as required.
111  */
112 int
113 _cursesi_copy_nsp(nschar_t *src_nsp, struct __ldata *ch)
114 {
115 	nschar_t *np, *tnp, *pnp;
116 
117 	pnp = NULL;
118 	np = src_nsp;
119 	if (np) {
120 		tnp = ch->nsp;
121 		while (np) {
122 			if (tnp) {
123 				tnp->ch = np->ch;
124 				pnp = tnp;
125 				tnp = tnp->next;
126 			} else {
127 				tnp = (nschar_t *)malloc(sizeof(nschar_t));
128 				if (!tnp)
129 					return ERR;
130 				tnp->ch = np->ch;
131 				pnp->next = tnp;
132 				tnp->next = NULL;
133 				pnp = tnp;
134 				tnp = NULL;
135 			}
136 			np = np->next;
137 		}
138                 np = tnp;
139 		if (np) {
140 			pnp->next = NULL;
141 			__cursesi_free_nsp(np);
142 		}
143 	} else {
144 		if (ch->nsp) {
145 			__cursesi_free_nsp(ch->nsp);
146 			ch->nsp = NULL;
147 		}
148 	}
149 
150 	return OK;
151 }
152 
153 /*
154  * Free the storage associated with a non-spacing character - traverse the
155  * linked list until all storage is done.
156  */
157 void
158 __cursesi_free_nsp(nschar_t *inp)
159 {
160 	nschar_t *tnp, *np;
161 
162 	np = inp;
163 	if (np) {
164 		while (np) {
165 			tnp = np->next;
166 			free(np);
167 			np = tnp;
168 		}
169 	}
170 }
171 
172 /*
173  * Traverse all the cells in the given window free'ing the non-spacing
174  * character storage.
175  */
176 void
177 __cursesi_win_free_nsp(WINDOW *win)
178 {
179 	int     i, j;
180 	__LDATA *sp;
181 
182 	for (i = 0; i < win->maxy; i++) {
183 		for (sp = win->alines[i]->line, j = 0; j < win->maxx;
184 		     j++, sp++) {
185 			__cursesi_free_nsp(sp->nsp);
186 		}
187 	}
188 }
189 
190 #endif
191