ncurses 5.7 - patch 20100206
[ncurses.git] / ncurses / base / lib_overlay.c
1 /****************************************************************************
2  * Copyright (c) 1998-2008,2009 Free Software Foundation, Inc.              *
3  *                                                                          *
4  * Permission is hereby granted, free of charge, to any person obtaining a  *
5  * copy of this software and associated documentation files (the            *
6  * "Software"), to deal in the Software without restriction, including      *
7  * without limitation the rights to use, copy, modify, merge, publish,      *
8  * distribute, distribute with modifications, sublicense, and/or sell       *
9  * copies of the Software, and to permit persons to whom the Software is    *
10  * furnished to do so, subject to the following conditions:                 *
11  *                                                                          *
12  * The above copyright notice and this permission notice shall be included  *
13  * in all copies or substantial portions of the Software.                   *
14  *                                                                          *
15  * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS  *
16  * OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF               *
17  * MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT.   *
18  * IN NO EVENT SHALL THE ABOVE COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM,   *
19  * DAMAGES OR OTHER LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR    *
20  * OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION WITH THE SOFTWARE OR    *
21  * THE USE OR OTHER DEALINGS IN THE SOFTWARE.                               *
22  *                                                                          *
23  * Except as contained in this notice, the name(s) of the above copyright   *
24  * holders shall not be used in advertising or otherwise to promote the     *
25  * sale, use or other dealings in this Software without prior written       *
26  * authorization.                                                           *
27  ****************************************************************************/
28
29 /****************************************************************************
30  *  Author: Zeyd M. Ben-Halim <zmbenhal@netcom.com> 1992,1995               *
31  *     and: Eric S. Raymond <esr@snark.thyrsus.com>                         *
32  ****************************************************************************/
33
34 /*
35 **      lib_overlay.c
36 **
37 **      The routines overlay(), copywin(), and overwrite().
38 **
39 */
40
41 #include <curses.priv.h>
42
43 MODULE_ID("$Id: lib_overlay.c,v 1.29 2009/10/24 23:21:31 tom Exp $")
44
45 static int
46 overlap(const WINDOW *const src, WINDOW *const dst, int const flag)
47 {
48     int rc = ERR;
49     int sx1, sy1, sx2, sy2;
50     int dx1, dy1, dx2, dy2;
51     int sminrow, smincol;
52     int dminrow, dmincol;
53     int dmaxrow, dmaxcol;
54
55     T((T_CALLED("overlap(%p,%p,%d)"), (const void *) src, (void *) dst, flag));
56
57     if (src != 0 && dst != 0) {
58         _nc_lock_global(curses);
59
60         T(("src : begy %ld, begx %ld, maxy %ld, maxx %ld",
61            (long) src->_begy,
62            (long) src->_begx,
63            (long) src->_maxy,
64            (long) src->_maxx));
65         T(("dst : begy %ld, begx %ld, maxy %ld, maxx %ld",
66            (long) dst->_begy,
67            (long) dst->_begx,
68            (long) dst->_maxy,
69            (long) dst->_maxx));
70
71         sx1 = src->_begx;
72         sy1 = src->_begy;
73         sx2 = sx1 + src->_maxx;
74         sy2 = sy1 + src->_maxy;
75
76         dx1 = dst->_begx;
77         dy1 = dst->_begy;
78         dx2 = dx1 + dst->_maxx;
79         dy2 = dy1 + dst->_maxy;
80
81         if (dx2 >= sx1 && dx1 <= sx2 && dy2 >= sy1 && dy1 <= sy2) {
82             sminrow = max(sy1, dy1) - sy1;
83             smincol = max(sx1, dx1) - sx1;
84             dminrow = max(sy1, dy1) - dy1;
85             dmincol = max(sx1, dx1) - dx1;
86             dmaxrow = min(sy2, dy2) - dy1;
87             dmaxcol = min(sx2, dx2) - dx1;
88
89             rc = copywin(src, dst,
90                          sminrow, smincol,
91                          dminrow, dmincol,
92                          dmaxrow, dmaxcol,
93                          flag);
94         }
95         _nc_unlock_global(curses);
96     }
97     returnCode(rc);
98 }
99
100 /*
101 **
102 **      overlay(win1, win2)
103 **
104 **
105 **      overlay() writes the overlapping area of win1 behind win2
106 **      on win2 non-destructively.
107 **
108 **/
109
110 NCURSES_EXPORT(int)
111 overlay(const WINDOW *win1, WINDOW *win2)
112 {
113     T((T_CALLED("overlay(%p,%p)"), (const void *) win1, (void *) win2));
114     returnCode(overlap(win1, win2, TRUE));
115 }
116
117 /*
118 **
119 **      overwrite(win1, win2)
120 **
121 **
122 **      overwrite() writes the overlapping area of win1 behind win2
123 **      on win2 destructively.
124 **
125 **/
126
127 NCURSES_EXPORT(int)
128 overwrite(const WINDOW *win1, WINDOW *win2)
129 {
130     T((T_CALLED("overwrite(%p,%p)"), (const void *) win1, (void *) win2));
131     returnCode(overlap(win1, win2, FALSE));
132 }
133
134 NCURSES_EXPORT(int)
135 copywin(const WINDOW *src, WINDOW *dst,
136         int sminrow, int smincol,
137         int dminrow, int dmincol,
138         int dmaxrow, int dmaxcol,
139         int over)
140 {
141     int rc = ERR;
142     int sx, sy, dx, dy;
143     bool touched;
144     attr_t bk;
145     attr_t mask;
146
147     T((T_CALLED("copywin(%p, %p, %d, %d, %d, %d, %d, %d, %d)"),
148        (const void *) src,
149        (void *) dst,
150        sminrow, smincol,
151        dminrow, dmincol,
152        dmaxrow, dmaxcol, over));
153
154     if (src && dst) {
155         _nc_lock_global(curses);
156
157         bk = AttrOf(dst->_nc_bkgd);
158         mask = ~(attr_t) ((bk & A_COLOR) ? A_COLOR : 0);
159
160         /* make sure rectangle exists in source */
161         if ((sminrow + dmaxrow - dminrow) <= (src->_maxy + 1) &&
162             (smincol + dmaxcol - dmincol) <= (src->_maxx + 1)) {
163
164             T(("rectangle exists in source"));
165
166             /* make sure rectangle fits in destination */
167             if (dmaxrow <= dst->_maxy && dmaxcol <= dst->_maxx) {
168
169                 T(("rectangle fits in destination"));
170
171                 for (dy = dminrow, sy = sminrow;
172                      dy <= dmaxrow;
173                      sy++, dy++) {
174
175                     touched = FALSE;
176                     for (dx = dmincol, sx = smincol;
177                          dx <= dmaxcol;
178                          sx++, dx++) {
179                         if (over) {
180                             if ((CharOf(src->_line[sy].text[sx]) != L(' ')) &&
181                                 (!CharEq(dst->_line[dy].text[dx],
182                                          src->_line[sy].text[sx]))) {
183                                 dst->_line[dy].text[dx] =
184                                     src->_line[sy].text[sx];
185                                 SetAttr(dst->_line[dy].text[dx],
186                                         ((AttrOf(src->_line[sy].text[sx]) &
187                                           mask) | bk));
188                                 touched = TRUE;
189                             }
190                         } else {
191                             if (!CharEq(dst->_line[dy].text[dx],
192                                         src->_line[sy].text[sx])) {
193                                 dst->_line[dy].text[dx] =
194                                     src->_line[sy].text[sx];
195                                 touched = TRUE;
196                             }
197                         }
198                     }
199                     if (touched) {
200                         touchline(dst, dminrow, (dmaxrow - dminrow + 1));
201                     }
202                 }
203                 T(("finished copywin"));
204                 rc = OK;
205             }
206         }
207         _nc_unlock_global(curses);
208     }
209     returnCode(rc);
210 }