xref: /netbsd-src/lib/libcurses/initscr.c (revision e9d867ef5010fbab8d48045c13025636f5cd7479)
1 /*
2  * Copyright (c) 1981 Regents of the University of California.
3  * All rights reserved.
4  *
5  * Redistribution and use in source and binary forms, with or without
6  * modification, are permitted provided that the following conditions
7  * are met:
8  * 1. Redistributions of source code must retain the above copyright
9  *    notice, this list of conditions and the following disclaimer.
10  * 2. Redistributions in binary form must reproduce the above copyright
11  *    notice, this list of conditions and the following disclaimer in the
12  *    documentation and/or other materials provided with the distribution.
13  * 3. All advertising materials mentioning features or use of this software
14  *    must display the following acknowledgement:
15  *	This product includes software developed by the University of
16  *	California, Berkeley and its contributors.
17  * 4. Neither the name of the University nor the names of its contributors
18  *    may be used to endorse or promote products derived from this software
19  *    without specific prior written permission.
20  *
21  * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
22  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
23  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
24  * ARE DISCLAIMED.  IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
25  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
26  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
27  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
28  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
29  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
30  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
31  * SUCH DAMAGE.
32  */
33 
34 #ifndef lint
35 /*static char sccsid[] = "from: @(#)initscr.c	5.6 (Berkeley) 3/3/91";*/
36 static char rcsid[] = "$Id: initscr.c,v 1.2 1993/08/01 18:35:37 mycroft Exp $";
37 #endif /* not lint */
38 
39 # include	"curses.ext"
40 # include	<signal.h>
41 
42 extern char	*getenv();
43 
44 /*
45  *	This routine initializes the current and standard screen.
46  *
47  */
48 WINDOW *
49 initscr() {
50 
51 	reg char	*sp;
52 	void		tstp();
53 
54 # ifdef DEBUG
55 	fprintf(outf, "INITSCR()\n");
56 # endif
57 	if (My_term)
58 		setterm(Def_term);
59 	else {
60 		gettmode();
61 		if ((sp = getenv("TERM")) == NULL)
62 			sp = Def_term;
63 		setterm(sp);
64 # ifdef DEBUG
65 		fprintf(outf, "INITSCR: term = %s\n", sp);
66 # endif
67 	}
68 	_puts(TI);
69 	_puts(VS);
70 # ifdef SIGTSTP
71 	signal(SIGTSTP, tstp);
72 # endif
73 	if (curscr != NULL) {
74 # ifdef DEBUG
75 		fprintf(outf, "INITSCR: curscr = 0%o\n", curscr);
76 # endif
77 		delwin(curscr);
78 	}
79 # ifdef DEBUG
80 	fprintf(outf, "LINES = %d, COLS = %d\n", LINES, COLS);
81 # endif
82 	if ((curscr = newwin(LINES, COLS, 0, 0)) == ERR)
83 		return ERR;
84 	clearok(curscr, TRUE);
85 	curscr->_flags &= ~_FULLLINE;
86 	if (stdscr != NULL) {
87 # ifdef DEBUG
88 		fprintf(outf, "INITSCR: stdscr = 0%o\n", stdscr);
89 # endif
90 		delwin(stdscr);
91 	}
92 	stdscr = newwin(LINES, COLS, 0, 0);
93 	return stdscr;
94 }
95