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