15866Sarnold # include "curses.ext" 2*19890Sbloom # include <ctype.h> 32259Sarnold 42259Sarnold # define min(a,b) (a < b ? a : b) 5*19890Sbloom # define max(a,b) (a > b ? a : b) 62259Sarnold 72259Sarnold /* 82259Sarnold * This routine writes win1 on win2 destructively. 92259Sarnold * 10*19890Sbloom * @(#)overwrite.c 1.4 (Berkeley) 05/01/85 112259Sarnold */ 122259Sarnold overwrite(win1, win2) 132259Sarnold reg WINDOW *win1, *win2; { 142259Sarnold 15*19890Sbloom reg char *sp, *end; 16*19890Sbloom reg int x, y, endy, endx, starty, startx; 172259Sarnold 182259Sarnold # ifdef DEBUG 19*19890Sbloom fprintf(outf, "OVERWRITE(%0.2o, %0.2o);\n", win1, win2); 202259Sarnold # endif 21*19890Sbloom starty = max(win1->_begy, win2->_begy); 22*19890Sbloom startx = max(win1->_begx, win2->_begx); 23*19890Sbloom endy = min(win1->_maxy + win1->_begy, win2->_maxy + win2->_begx); 24*19890Sbloom endx = min(win1->_maxx + win1->_begx, win2->_maxx + win2->_begx); 25*19890Sbloom if (starty >= endy || startx >= endx) 26*19890Sbloom return; 272259Sarnold # ifdef DEBUG 28*19890Sbloom fprintf(outf, "OVERWRITE:from (%d,%d) to (%d,%d)\n", starty, startx, endy, endx); 292259Sarnold # endif 30*19890Sbloom x = endx - startx; 31*19890Sbloom for (y = starty; y < endy; y++) { 32*19890Sbloom bcopy(&win1->_y[y - win1->_begy][startx - win1->_begx], 33*19890Sbloom &win2->_y[y - win2->_begy][startx - win2->_begx], x); 34*19890Sbloom touchline(win2, y, startx - win2->_begx, endx - win2->_begx); 35*19890Sbloom } 362259Sarnold } 37