screen.c revision 1.8 1 /* $NetBSD: screen.c,v 1.8 2002/12/23 12:25:10 jdc 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. All advertising materials mentioning features or use of this software
16 * must display the following acknowledgement:
17 * This product includes software developed by the University of
18 * California, Berkeley and its contributors.
19 * 4. Neither the name of the University nor the names of its contributors
20 * may be used to endorse or promote products derived from this software
21 * without specific prior written permission.
22 *
23 * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
24 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
25 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
26 * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
27 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
28 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
29 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
30 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
31 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
32 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
33 * SUCH DAMAGE.
34 */
35
36 #include <sys/cdefs.h>
37 #ifndef lint
38 #if 0
39 static char sccsid[] = "@(#)screen.c 8.2 (blymn) 11/27/2001";
40 #else
41 __RCSID("$NetBSD: screen.c,v 1.8 2002/12/23 12:25:10 jdc Exp $");
42 #endif
43 #endif /* not lint */
44
45 #include <stdlib.h>
46
47 #include "curses.h"
48 #include "curses_private.h"
49
50 /*
51 * set_term --
52 * Change the term to the given screen.
53 *
54 */
55 SCREEN *
56 set_term(SCREEN *new)
57 {
58 SCREEN *old_screen = _cursesi_screen;
59
60 if (_cursesi_screen != NULL) {
61 /* save changes made to the current screen... */
62 old_screen->echoit = __echoit;
63 old_screen->pfast = __pfast;
64 old_screen->rawmode = __rawmode;
65 old_screen->noqch = __noqch;
66 old_screen->nca = __nca;
67 old_screen->winlistp = __winlistp;
68 old_screen->COLS = COLS;
69 old_screen->LINES = LINES;
70 old_screen->COLORS = COLORS;
71 old_screen->COLOR_PAIRS = COLOR_PAIRS;
72 old_screen->GT = __GT;
73 old_screen->NONL = __NONL;
74 old_screen->UPPERCASE = __UPPERCASE;
75 }
76
77 _cursesi_screen = new;
78
79 __echoit = new->echoit;
80 __pfast = new->pfast;
81 __rawmode = new->rawmode;
82 __noqch = new->noqch;
83 __nca = new->nca;
84 COLS = new->COLS;
85 LINES = new->LINES;
86 COLORS = new->COLORS;
87 COLOR_PAIRS = new->COLOR_PAIRS;
88 __GT = new->GT;
89 __NONL = new->NONL;
90 __UPPERCASE = new->UPPERCASE;
91
92 _cursesi_resetterm(new);
93
94 __winlistp = new->winlistp;
95
96 curscr = new->curscr;
97 clearok(curscr, new->clearok);
98 stdscr = new->stdscr;
99 __virtscr = new->__virtscr;
100
101 _cursesi_reset_acs(new);
102
103 #ifdef DEBUG
104 __CTRACE("initscr: LINES = %d, COLS = %d\n", LINES, COLS);
105 #endif
106
107 return old_screen;
108 }
109
110 /*
111 * newterm --
112 * Set up a new screen.
113 *
114 */
115 SCREEN *
116 newterm(char *type, FILE *outfd, FILE *infd)
117 {
118 SCREEN *new_screen;
119 char *sp;
120
121 sp = type;
122 if ((type == NULL) && (sp = getenv("TERM")) == NULL)
123 return NULL;
124
125 if ((new_screen = (SCREEN *) malloc(sizeof(SCREEN))) == NULL)
126 return NULL;
127
128 new_screen->infd = infd;
129 new_screen->outfd = outfd;
130 new_screen->echoit = 1;
131 new_screen->pfast = new_screen->rawmode = new_screen->noqch = 0;
132 new_screen->nca = A_NORMAL;
133 new_screen->color_type = COLOR_NONE;
134 new_screen->COLOR_PAIRS = 0;
135 new_screen->old_mode = 2;
136 new_screen->stdbuf = NULL;
137 new_screen->stdscr = NULL;
138 new_screen->curscr = NULL;
139 new_screen->__virtscr = NULL;
140 new_screen->curwin = 0;
141 new_screen->notty = FALSE;
142
143 if (_cursesi_gettmode(new_screen) == ERR)
144 goto error_exit;
145
146 if (_cursesi_setterm((char *)sp, new_screen) == ERR)
147 goto error_exit;
148
149 /* Need either homing or cursor motion for refreshes */
150 if (!new_screen->tc_ho && !new_screen->tc_cm)
151 goto error_exit;
152
153 new_screen->winlistp = NULL;
154
155 if ((new_screen->curscr = __newwin(new_screen, new_screen->LINES,
156 new_screen->COLS, 0, 0, FALSE)) == ERR)
157 goto error_exit;
158
159 if ((new_screen->stdscr = __newwin(new_screen, new_screen->LINES,
160 new_screen->COLS, 0, 0, FALSE)) == ERR) {
161 delwin(new_screen->curscr);
162 goto error_exit;
163 }
164
165 if ((new_screen->__virtscr = __newwin(new_screen, new_screen->LINES,
166 new_screen->COLS, 0, 0, FALSE)) == ERR) {
167 delwin(new_screen->curscr);
168 delwin(new_screen->stdscr);
169 goto error_exit;
170 }
171
172 __init_getch(new_screen);
173
174 __init_acs(new_screen);
175
176 __set_stophandler();
177
178 /*
179 * bleh - it seems that apps expect the first newterm to set
180 * up the curses screen.... emulate this.
181 */
182 if (_cursesi_screen == NULL || _cursesi_screen->endwin) {
183 set_term(new_screen);
184 }
185
186 #ifdef DEBUG
187 __CTRACE("newterm: LINES = %d, COLS = %d\n", LINES, COLS);
188 #endif
189 __startwin(new_screen);
190
191 return new_screen;
192
193 error_exit:
194 free(new_screen);
195 return NULL;
196 }
197
198 /*
199 * delscreen --
200 * Free resources used by the given screen and destroy it.
201 *
202 */
203 void
204 delscreen(SCREEN *screen)
205 {
206 struct __winlist *list, *np;
207
208 /* free up the termcap entry stuff */
209 t_freent(screen->cursesi_genbuf);
210
211 /* walk the window list and kill all the parent windows */
212 for (list = screen->winlistp; list != NULL; list = list->nextp) {
213 if (list->winp->orig == NULL)
214 delwin(list->winp);
215 }
216
217 /* free the windows list structures */
218 for (list = screen->winlistp; list;) {
219 np = list->nextp;
220 free(list);
221 list = np;
222 }
223
224 /* free the storage of the keymaps */
225 _cursesi_free_keymap(screen->base_keymap);
226
227 free(screen->stdbuf);
228 free(screen);
229 }
230