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 1997 Sun Microsystems, Inc. All rights reserved.
24 * Use is subject to license terms.
25 */
26
27 /* Copyright (c) 1988 AT&T */
28 /* All Rights Reserved */
29
30 /*
31 * University Copyright- Copyright (c) 1982, 1986, 1988
32 * The Regents of the University of California
33 * All Rights Reserved
34 *
35 * University Acknowledgment- Portions of this document are derived from
36 * software developed by the University of California, Berkeley, and its
37 * contributors.
38 */
39
40 /*LINTLIBRARY*/
41
42 #include "curses_inc.h"
43 #include <sys/types.h>
44 #include <sys/stat.h>
45 #include <stdlib.h>
46
47 /*
48 * Initialize the screen image to be the image contained
49 * in the given file. This is usually used in a child process
50 * to initialize its idea of the screen image to be that of its
51 * parent.
52 *
53 * filep: pointer to the output stream
54 * type: 0: <curses> should assume that the physical screen is
55 * EXACTLY as stored in the file. Therefore, we take
56 * special care to make sure that /dev/tty and the terminal
57 * did not change in any way. This information can then
58 * be used in the update optimization of the new program
59 * so that the screen does not have to be cleared. Instead,
60 * curses, by knowing what's on the screen can optimally
61 * update it with the information of the new program.
62 *
63 * 1: Tell <curses> that the stored image should be
64 * the physical image. Sort of like a huge waddstr onto
65 * curscr. This can be used when a library wants to save
66 * a screen image and restore it at a later time.
67 *
68 * 2: Tell <curses> that the stored image is the physical
69 * image and also it is what the new program wants on the
70 * screen. This can be be thought of as a screen inheritance
71 * function.
72 */
73
74 int
scr_reset(FILE * filep,int type)75 scr_reset(FILE *filep, int type)
76 {
77 WINDOW *win = NULL, *win1 = NULL;
78 int *hash, y;
79 char clearit = FALSE;
80 short magic;
81 struct stat statbuf;
82 time_t ttytime;
83
84 if (type != 1 && exit_ca_mode && *exit_ca_mode && non_rev_rmcup) {
85 if (type == 0)
86 goto err;
87 else {
88 #ifdef DEBUG
89 if (outf)
90 fprintf(outf, "clear it because of "
91 "exit_ca_mode\n");
92 #endif /* DEBUG */
93 clearit = TRUE;
94 }
95 }
96
97 /* check magic number */
98 if (fread((char *)&magic, sizeof (short), 1, filep) != 1)
99 goto err;
100 if (magic != SVR3_DUMP_MAGIC_NUMBER)
101 goto err;
102
103 /* get modification time of image in file */
104 if (fread((char *)&ttytime, sizeof (time_t), 1, filep) != 1)
105 goto err;
106
107 if ((type != 1) && ((ttyname(cur_term->Filedes) == NULL) ||
108 (fstat(cur_term->Filedes, &statbuf) < 0) ||
109 (statbuf.st_mtime != ttytime))) {
110 if (type == 0)
111 goto err;
112 else {
113 #ifdef DEBUG
114 if (outf)
115 fprintf(outf, "Filedes = %hd, "
116 "statbuf.st_mtime = %d, "
117 "ttytime = %d\n", cur_term->Filedes,
118 statbuf.st_mtime, ttytime);
119 #endif /* DEBUG */
120 clearit = TRUE;
121 }
122 }
123
124 /* if get here, everything is ok, read the curscr image */
125 if (((win = getwin(filep)) == NULL) ||
126 ((type == 2) && ((win1 = dupwin(win)) == NULL)) ||
127 (win->_maxy != curscr->_maxy) || (win->_maxx != curscr->_maxx) ||
128 /* soft labels */
129 (fread((char *)&magic, sizeof (int), 1, filep) != 1))
130 goto err;
131
132 /*
133 * if soft labels were dumped, we would like either read them
134 * or advance the file pointer pass them
135 */
136 if (magic) {
137 short i, labmax, lablen;
138 SLK_MAP *slk = SP->slk;
139 /*
140 * Why doesn't the following line and the two below
141 * that access those variables work ?
142 */
143 /*
144 * char **labdis = SP->slk->_ldis, **labval = SP->slk->_lval;
145 */
146
147 if ((fread((char *)&labmax, sizeof (short), 1, filep) != 1) ||
148 (fread((char *)&lablen, sizeof (short), 1, filep) != 1)) {
149 goto err;
150 }
151
152 if (slk != NULL) {
153 if ((labmax != slk->_num) ||
154 (lablen != (slk->_len + 1)))
155 goto err;
156
157 for (i = 0; i < labmax; i++) {
158 /*
159 * if ((fread(labdis[i], sizeof (char), lablen,
160 * filep) != lablen) ||
161 * (fread(labval[i], sizeof (char), lablen,
162 * filep != lablen))
163 */
164 if ((fread(slk->_ldis[i], sizeof (char),
165 lablen, filep) != lablen) ||
166 (fread(slk->_lval[i],
167 sizeof (char), lablen, filep) != lablen)) {
168 goto err;
169 }
170 }
171 (*_do_slk_tch)();
172 } else {
173 if (fseek(filep, (long)(2 * labmax * lablen *
174 sizeof (char)), 1) != 0)
175 goto err;
176 }
177 }
178
179 /* read the color information(if any) from the file */
180
181 if (fread((char *)&magic, sizeof (int), 1, filep) != 1)
182 goto err;
183
184 if (magic) {
185 int colors, color_pairs;
186 bool could_change;
187 int i;
188
189 /* if the new terminal doesn't support colors, or it supports */
190 /* less colors (or color_pairs) than the old terminal, or */
191 /* start_color() has not been called, simply advance the file */
192 /* pointer pass the color related info. */
193 /* Note: must to read the first line of color info, even if the */
194 /* new terminal doesn't support color, in order to know how to */
195 /* deal with the rest of the file */
196
197 if ((fread((char *)&colors, sizeof (int), 1, filep) != 1) ||
198 (fread((char *)&color_pairs, sizeof (int), 1,
199 filep) != 1) || (fread((char *)&could_change,
200 sizeof (char), 1, filep) != 1))
201 goto err;
202
203 if (max_pairs == -1 || cur_term->_pairs_tbl == NULL ||
204 colors > max_colors || color_pairs > max_pairs) {
205 if (fseek(filep, (long)(colors * sizeof (_Color) +
206 color_pairs * sizeof (_Color_pair)), 1) != 0)
207 goto err;
208 } else {
209 _Color_pair *ptp, *save_ptp;
210
211 /* if both old and new terminals could modify colors, read in */
212 /* color table, and call init_color for each color */
213
214 if (could_change) {
215 if (can_change) {
216 _Color *ctp, *save_ctp;
217
218 if ((save_ctp = (ctp = (_Color *)
219 malloc(colors *
220 sizeof (_Color)))) == NULL)
221 goto err;
222
223 if (fread(ctp, sizeof (_Color),
224 colors, filep) != colors)
225 goto err;
226
227 for (i = 0; i < colors; i++, ctp++) {
228 /* LINTED */
229 (void) init_color((short)i,
230 ctp->r, ctp->g, ctp->b);
231 }
232 free(save_ctp);
233 } else {
234
235 /* the old terminal could modify colors, by the new one */
236 /* cannot skip over color_table info. */
237
238 if (fseek(filep, (long)(colors *
239 sizeof (_Color)), 1) != 0)
240 goto err;
241 }
242 }
243
244 /* read color_pairs info. call init_pair for each pair */
245
246 if ((save_ptp = (ptp = (_Color_pair *)
247 malloc(color_pairs * sizeof (_Color_pair)))) ==
248 NULL)
249 goto err;
250 if (fread(ptp, sizeof (_Color_pair), color_pairs,
251 filep) != color_pairs) {
252 err:
253 if (win != NULL)
254 (void) delwin(win);
255 if (win1 != NULL)
256 (void) delwin(win1);
257 if (type == 0)
258 curscr->_clear = TRUE;
259 return (ERR);
260 }
261
262 for (i = 1, ++ptp; i <= color_pairs; i++, ptp++) {
263 if (ptp->init)
264 /* LINTED */
265 (void) init_pair((short)i,
266 ptp->foreground, ptp->background);
267 }
268 free(save_ptp);
269 }
270 }
271
272 /* substitute read in window for the curscr */
273 switch (type) {
274 case 1:
275 case 2:
276 (void) delwin(_virtscr);
277 hash = _VIRTHASH;
278 if (type == 1) {
279 SP->virt_scr = _virtscr = win;
280 _VIRTTOP = 0;
281 _VIRTBOT = curscr->_maxy - 1;
282 break;
283 }
284 SP->virt_scr = _virtscr = win1;
285 _VIRTTOP = curscr->_maxy;
286 _VIRTBOT = -1;
287 /* clear the hash table */
288 for (y = curscr->_maxy; y > 0; --y)
289 *hash++ = _NOHASH;
290 /* FALLTHROUGH */
291 case 0:
292 {
293 int saveflag = curscr->_flags & _CANT_BE_IMMED;
294
295 (void) delwin(curscr);
296 SP->cur_scr = curscr = win;
297 curscr->_sync = TRUE;
298 curscr->_flags |= saveflag;
299 hash = _CURHASH;
300 }
301 }
302
303 /* clear the hash table */
304 for (y = curscr->_maxy; y > 0; --y)
305 *hash++ = _NOHASH;
306
307 curscr->_clear = clearit;
308 return (OK);
309 }
310