Compatibility fix to satisfy tn3270.
[unix-history] / lib / libcurses / newwin.c
CommitLineData
15637ed4 1/*
b80b8de3
AC
2 * Copyright (c) 1981, 1993
3 * The Regents of the University of California. All rights reserved.
15637ed4
RG
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
b80b8de3
AC
35static char sccsid[] = "@(#)newwin.c 8.1 (Berkeley) 7/20/93";
36#endif /* not lint */
15637ed4 37
b80b8de3
AC
38#include <curses.h>
39#include <stdlib.h>
15637ed4 40
b80b8de3 41#undef nl /* Don't need it here, and it interferes. */
15637ed4 42
b80b8de3 43static WINDOW *__makenew __P((int, int, int, int, int));
15637ed4 44
b80b8de3 45void __set_subwin __P((WINDOW *, WINDOW *));
15637ed4 46
b80b8de3
AC
47/*
48 * newwin --
49 * Allocate space for and set up defaults for a new window.
50 */
15637ed4 51WINDOW *
b80b8de3
AC
52newwin(nl, nc, by, bx)
53 register int nl, nc, by, bx;
15637ed4 54{
b80b8de3
AC
55 register WINDOW *win;
56 register __LINE *lp;
57 register int i, j;
58 register __LDATA *sp;
15637ed4
RG
59
60 if (nl == 0)
61 nl = LINES - by;
62 if (nc == 0)
63 nc = COLS - bx;
b80b8de3
AC
64
65 if ((win = __makenew(nl, nc, by, bx, 0)) == NULL)
66 return (NULL);
67
68 win->nextp = win;
69 win->ch_off = 0;
70 win->orig = NULL;
71
72#ifdef DEBUG
73 __CTRACE("newwin: win->ch_off = %d\n", win->ch_off);
74#endif
75
15637ed4 76 for (i = 0; i < nl; i++) {
b80b8de3
AC
77 lp = win->lines[i];
78 lp->flags = 0;
79 for (sp = lp->line, j = 0; j < nc; j++, sp++) {
80 sp->ch = ' ';
81 sp->attr = 0;
15637ed4 82 }
b80b8de3
AC
83 lp->hash = __hash((char *) lp->line, nc * __LDATASIZE);
84 }
85 return (win);
15637ed4
RG
86}
87
88WINDOW *
b80b8de3
AC
89subwin(orig, nl, nc, by, bx)
90 register WINDOW *orig;
91 register int by, bx, nl, nc;
15637ed4 92{
b80b8de3
AC
93 int i;
94 __LINE *lp;
95 register WINDOW *win;
96
97 /* Make sure window fits inside the original one. */
98#ifdef DEBUG
99 __CTRACE("subwin: (%0.2o, %d, %d, %d, %d)\n", orig, nl, nc, by, bx);
100#endif
101 if (by < orig->begy || bx < orig->begx
102 || by + nl > orig->maxy + orig->begy
103 || bx + nc > orig->maxx + orig->begx)
104 return (NULL);
15637ed4 105 if (nl == 0)
b80b8de3 106 nl = orig->maxy + orig->begy - by;
15637ed4 107 if (nc == 0)
b80b8de3
AC
108 nc = orig->maxx + orig->begx - bx;
109 if ((win = __makenew(nl, nc, by, bx, 1)) == NULL)
110 return (NULL);
111 win->nextp = orig->nextp;
112 orig->nextp = win;
113 win->orig = orig;
114
115 /* Initialize flags here so that refresh can also use __set_subwin. */
116 for (lp = win->lspace, i = 0; i < win->maxy; i++, lp++)
117 lp->flags = 0;
118 __set_subwin(orig, win);
119 return (win);
15637ed4
RG
120}
121
122/*
b80b8de3 123 * This code is shared with mvwin().
15637ed4 124 */
b80b8de3
AC
125void
126__set_subwin(orig, win)
127 register WINDOW *orig, *win;
15637ed4 128{
b80b8de3
AC
129 int i;
130 __LINE *lp, *olp;
131
132 win->ch_off = win->begx - orig->begx;
133 /* Point line pointers to line space. */
134 for (lp = win->lspace, i = 0; i < win->maxy; i++, lp++) {
135 win->lines[i] = lp;
136 olp = orig->lines[i + win->begy];
137 lp->line = &olp->line[win->begx];
138 lp->firstchp = &olp->firstch;
139 lp->lastchp = &olp->lastch;
140 lp->hash = __hash((char *) lp->line, win->maxx * __LDATASIZE);
141 }
15637ed4 142
b80b8de3
AC
143#ifdef DEBUG
144 __CTRACE("__set_subwin: win->ch_off = %d\n", win->ch_off);
145#endif
15637ed4
RG
146}
147
148/*
b80b8de3
AC
149 * __makenew --
150 * Set up a window buffer and returns a pointer to it.
15637ed4
RG
151 */
152static WINDOW *
b80b8de3
AC
153__makenew(nl, nc, by, bx, sub)
154 register int by, bx, nl, nc;
155 int sub;
156{
157 register WINDOW *win;
158 register __LINE *lp;
159 int i;
160
161
162#ifdef DEBUG
163 __CTRACE("makenew: (%d, %d, %d, %d)\n", nl, nc, by, bx);
164#endif
165 if ((win = malloc(sizeof(*win))) == NULL)
166 return (NULL);
167#ifdef DEBUG
168 __CTRACE("makenew: nl = %d\n", nl);
169#endif
170
171 /*
172 * Set up line pointer array and line space.
173 */
174 if ((win->lines = malloc (nl * sizeof(__LINE *))) == NULL) {
15637ed4
RG
175 free(win);
176 return NULL;
177 }
b80b8de3
AC
178 if ((win->lspace = malloc (nl * sizeof(__LINE))) == NULL) {
179 free (win);
180 free (win->lines);
181 return NULL;
182 }
183
184 /* Don't allocate window and line space if it's a subwindow */
185 if (!sub) {
186 /*
187 * Allocate window space in one chunk.
188 */
189 if ((win->wspace =
190 malloc(nc * nl * sizeof(__LDATA))) == NULL) {
191 free(win->lines);
192 free(win->lspace);
193 free(win);
194 return NULL;
195 }
196
197 /*
198 * Point line pointers to line space, and lines themselves into
199 * window space.
200 */
201 for (lp = win->lspace, i = 0; i < nl; i++, lp++) {
202 win->lines[i] = lp;
203 lp->line = &win->wspace[i * nc];
204 lp->firstchp = &lp->firstch;
205 lp->lastchp = &lp->lastch;
206 lp->firstch = 0;
207 lp->lastch = 0;
208 }
209 }
210#ifdef DEBUG
211 __CTRACE("makenew: nc = %d\n", nc);
212#endif
213 win->cury = win->curx = 0;
214 win->maxy = nl;
215 win->maxx = nc;
216
217 win->begy = by;
218 win->begx = bx;
219 win->flags = 0;
220 __swflags(win);
221#ifdef DEBUG
222 __CTRACE("makenew: win->flags = %0.2o\n", win->flags);
223 __CTRACE("makenew: win->maxy = %d\n", win->maxy);
224 __CTRACE("makenew: win->maxx = %d\n", win->maxx);
225 __CTRACE("makenew: win->begy = %d\n", win->begy);
226 __CTRACE("makenew: win->begx = %d\n", win->begx);
227#endif
228 return (win);
15637ed4
RG
229}
230
b80b8de3
AC
231void
232__swflags(win)
233 register WINDOW *win;
15637ed4 234{
b80b8de3
AC
235 win->flags &=
236 ~(__ENDLINE | __FULLLINE | __FULLWIN | __SCROLLWIN | __LEAVEOK);
237 if (win->begx + win->maxx == COLS) {
238 win->flags |= __ENDLINE;
239 if (win->begx == 0) {
15637ed4 240 if (AL && DL)
b80b8de3
AC
241 win->flags |= __FULLLINE;
242 if (win->maxy == LINES && win->begy == 0)
243 win->flags |= __FULLWIN;
15637ed4 244 }
b80b8de3
AC
245 if (win->begy + win->maxy == LINES)
246 win->flags |= __SCROLLWIN;
15637ed4
RG
247 }
248}