talk.tproj/display.c

   1 /*
   2  * Copyright (c) 1999 Apple Computer, Inc. All rights reserved.
   3  *
   4  * @APPLE_LICENSE_HEADER_START@
   5  *
   6  * Copyright (c) 1999-2003 Apple Computer, Inc.  All Rights Reserved.
   7  *
   8  * This file contains Original Code and/or Modifications of Original Code
   9  * as defined in and that are subject to the Apple Public Source License
  10  * Version 2.0 (the 'License'). You may not use this file except in
  11  * compliance with the License. Please obtain a copy of the License at
  12  * http://www.opensource.apple.com/apsl/ and read it before using this
  13  * file.
  14  *
  15  * The Original Code and all software distributed under the License are
  16  * distributed on an 'AS IS' basis, WITHOUT WARRANTY OF ANY KIND, EITHER
  17  * EXPRESS OR IMPLIED, AND APPLE HEREBY DISCLAIMS ALL SUCH WARRANTIES,
  18  * INCLUDING WITHOUT LIMITATION, ANY WARRANTIES OF MERCHANTABILITY,
  19  * FITNESS FOR A PARTICULAR PURPOSE, QUIET ENJOYMENT OR NON-INFRINGEMENT.
  20  * Please see the License for the specific language governing rights and
  21  * limitations under the License.
  22  *
  23  * @APPLE_LICENSE_HEADER_END@
  24  */
  25 /*
  26  * Copyright (c) 1983, 1993
  27  *      The Regents of the University of California.  All rights reserved.
  28  *
  29  * Redistribution and use in source and binary forms, with or without
  30  * modification, are permitted provided that the following conditions
  31  * are met:
  32  * 1. Redistributions of source code must retain the above copyright
  33  *    notice, this list of conditions and the following disclaimer.
  34  * 2. Redistributions in binary form must reproduce the above copyright
  35  *    notice, this list of conditions and the following disclaimer in the
  36  *    documentation and/or other materials provided with the distribution.
  37  * 3. All advertising materials mentioning features or use of this software
  38  *    must display the following acknowledgement:
  39  *      This product includes software developed by the University of
  40  *      California, Berkeley and its contributors.
  41  * 4. Neither the name of the University nor the names of its contributors
  42  *    may be used to endorse or promote products derived from this software
  43  *    without specific prior written permission.
  44  *
  45  * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
  46  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
  47  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
  48  * ARE DISCLAIMED.  IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
  49  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
  50  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
  51  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
  52  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
  53  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
  54  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
  55  * SUCH DAMAGE.
  56  */
  57
  58
  59 /*
  60  * The window 'manager', initializes curses and handles the actual
  61  * displaying of text
  62  */
  63 #include "talk.h"
  64
  65 xwin_t  my_win;
  66 xwin_t  his_win;
  67 WINDOW  *line_win;
  68
  69 int     curses_initialized = 0;
  70
  71 /*
  72  * max HAS to be a function, it is called with
  73  * a argument of the form --foo at least once.
  74  */
  75 max(a,b)
  76         int a, b;
  77 {
  78
  79         return (a > b ? a : b);
  80 }
  81
  82 /*
  83  * Display some text on somebody's window, processing some control
  84  * characters while we are at it.
  85  */
  86 display(win, text, size)
  87         register xwin_t *win;
  88         register char *text;
  89         int size;
  90 {
  91         register int i;
  92         char cch;
  93
  94         for (i = 0; i < size; i++) {
  95                 if (*text == '\n') {
  96                         xscroll(win, 0);
  97                         text++;
  98                         continue;
  99                 }
 100                 /* erase character */
 101                 if (*text == win->cerase) {
 102                         wmove(win->x_win, win->x_line, max(--win->x_col, 0));
 103                         getyx(win->x_win, win->x_line, win->x_col);
 104                         waddch(win->x_win, ' ');
 105                         wmove(win->x_win, win->x_line, win->x_col);
 106                         getyx(win->x_win, win->x_line, win->x_col);
 107                         text++;
 108                         continue;
 109                 }
 110                 /*
 111                  * On word erase search backwards until we find
 112                  * the beginning of a word or the beginning of
 113                  * the line.
 114                  */
 115                 if (*text == win->werase) {
 116                         int endcol, xcol, i, c;
 117
 118                         endcol = win->x_col;
 119                         xcol = endcol - 1;
 120                         while (xcol >= 0) {
 121                                 c = readwin(win->x_win, win->x_line, xcol);
 122                                 if (c != ' ')
 123                                         break;
 124                                 xcol--;
 125                         }
 126                         while (xcol >= 0) {
 127                                 c = readwin(win->x_win, win->x_line, xcol);
 128                                 if (c == ' ')
 129                                         break;
 130                                 xcol--;
 131                         }
 132                         wmove(win->x_win, win->x_line, xcol + 1);
 133                         for (i = xcol + 1; i < endcol; i++)
 134                                 waddch(win->x_win, ' ');
 135                         wmove(win->x_win, win->x_line, xcol + 1);
 136                         getyx(win->x_win, win->x_line, win->x_col);
 137                         text++;
 138                         continue;
 139                 }
 140                 /* line kill */
 141                 if (*text == win->kill) {
 142                         wmove(win->x_win, win->x_line, 0);
 143                         wclrtoeol(win->x_win);
 144                         getyx(win->x_win, win->x_line, win->x_col);
 145                         text++;
 146                         continue;
 147                 }
 148                 if (*text == '\f') {
 149                         if (win == &my_win)
 150                                 wrefresh(curscr);
 151                         text++;
 152                         continue;
 153                 }
 154                 if (win->x_col == COLS-1) {
 155                         /* check for wraparound */
 156                         xscroll(win, 0);
 157                 }
 158                 if (*text < ' ' && *text != '\t') {
 159                         waddch(win->x_win, '^');
 160                         getyx(win->x_win, win->x_line, win->x_col);
 161                         if (win->x_col == COLS-1) /* check for wraparound */
 162                                 xscroll(win, 0);
 163                         cch = (*text & 63) + 64;
 164                         waddch(win->x_win, cch);
 165                 } else
 166                         waddch(win->x_win, *text);
 167                 getyx(win->x_win, win->x_line, win->x_col);
 168                 text++;
 169         }
 170         wrefresh(win->x_win);
 171 }
 172
 173 /*
 174  * Read the character at the indicated position in win
 175  */
 176 readwin(win, line, col)
 177         WINDOW *win;
 178 {
 179         int oldline, oldcol;
 180         register int c;
 181
 182         getyx(win, oldline, oldcol);
 183         wmove(win, line, col);
 184         c = winch(win);
 185         wmove(win, oldline, oldcol);
 186         return (c);
 187 }
 188
 189 /*
 190  * Scroll a window, blanking out the line following the current line
 191  * so that the current position is obvious
 192  */
 193 xscroll(win, flag)
 194         register xwin_t *win;
 195         int flag;
 196 {
 197
 198         if (flag == -1) {
 199                 wmove(win->x_win, 0, 0);
 200                 win->x_line = 0;
 201                 win->x_col = 0;
 202                 return;
 203         }
 204         win->x_line = (win->x_line + 1) % win->x_nlines;
 205         win->x_col = 0;
 206         wmove(win->x_win, win->x_line, win->x_col);
 207         wclrtoeol(win->x_win);
 208         wmove(win->x_win, (win->x_line + 1) % win->x_nlines, win->x_col);
 209         wclrtoeol(win->x_win);
 210         wmove(win->x_win, win->x_line, win->x_col);
 211 }