Initial import of binutils 2.22 on the new vendor branch
[dragonfly.git] / usr.bin / window / wwflush.c
1 /*      @(#)wwflush.c   8.1 (Berkeley) 6/6/93   */
2 /*      $NetBSD: wwflush.c,v 1.10 2006/12/18 20:04:55 christos Exp $    */
3
4 /*
5  * Copyright (c) 1983, 1993
6  *      The Regents of the University of California.  All rights reserved.
7  *
8  * This code is derived from software contributed to Berkeley by
9  * Edward Wang at The University of California, Berkeley.
10  *
11  * Redistribution and use in source and binary forms, with or without
12  * modification, are permitted provided that the following conditions
13  * are met:
14  * 1. Redistributions of source code must retain the above copyright
15  *    notice, this list of conditions and the following disclaimer.
16  * 2. Redistributions in binary form must reproduce the above copyright
17  *    notice, this list of conditions and the following disclaimer in the
18  *    documentation and/or other materials provided with the distribution.
19  * 3. Neither the name of the University nor the names of its contributors
20  *    may be used to endorse or promote products derived from this software
21  *    without specific prior written permission.
22  *
23  * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
24  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
25  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
26  * ARE DISCLAIMED.  IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
27  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
28  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
29  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
30  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
31  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
32  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
33  * SUCH DAMAGE.
34  */
35
36 #include <signal.h>
37 #include <string.h>
38 #include <unistd.h>
39 #include "ww.h"
40 #include "tt.h"
41 #include "xx.h"
42
43 void
44 wwflush(void)
45 {
46         int row, col;
47
48         if ((row = wwcursorrow) < 0)
49                 row = 0;
50         else if (row >= wwnrow)
51                 row = wwnrow - 1;
52         if ((col = wwcursorcol) < 0)
53                 col = 0;
54         else if (col >= wwncol)
55                 col = wwncol - 1;
56         xxmove(row, col);
57         if (wwdocheckpoint) {
58                 xxflush(0);
59                 wwcheckpoint();
60         } else
61                 xxflush(1);
62 }
63
64 void
65 wwcheckpoint(void)
66 {
67         sigset_t nsigset, osigset;
68
69         sigemptyset(&nsigset);
70         sigaddset(&nsigset, SIGALRM);
71         sigprocmask(SIG_BLOCK, &nsigset, &osigset);
72
73         tt.tt_ack = 0;
74         do {
75                 (*tt.tt_checkpoint)();
76 #ifndef OLD_TTY
77                 (void) tcdrain(1);
78 #endif
79                 (void) alarm(3);
80                 for (wwdocheckpoint = 0; !wwdocheckpoint && tt.tt_ack == 0;)
81                         sigsuspend(&osigset);
82         } while (tt.tt_ack == 0);
83         (void) alarm(0);
84         wwdocheckpoint = 0;
85         if (tt.tt_ack < 0) {
86                 wwcopyscreen(wwcs, wwos);
87                 (void) alarm(1);
88                 wwreset();
89                 wwupdate();
90                 wwflush();
91         } else {
92                 wwcopyscreen(wwos, wwcs);
93                 (void) alarm(3);
94         }
95
96         sigprocmask(SIG_SETMASK, &osigset, (sigset_t *)0);
97 }
98
99 void
100 wwcopyscreen(union ww_char **s1, union ww_char **s2)
101 {
102         int i;
103         int s = wwncol * sizeof **s1;
104
105         for (i = wwnrow; --i >= 0;)
106                 memmove((char *) *s2++, (char *) *s1++, s);
107 }
108
109 void
110 wwalarm(int dummy __unused)
111 {
112         wwdocheckpoint = 1;
113 }