lib/tty/win.c

   1 /* Terminal management xterm and rxvt support
   2    Copyright (C) 1995, 1998, 1999, 2000, 2001, 2002, 2003, 2004, 2005,
   3    2007, 2009 Free Software Foundation, Inc.
   4
   5    Written by:
   6    Andrew Borodin <aborodin@vmail.ru>, 2009.
   7
   8    This program is free software; you can redistribute it and/or modify
   9    it under the terms of the GNU General Public License as published by
  10    the Free Software Foundation; either version 2 of the License, or
  11    (at your option) any later version.
  12
  13    This program is distributed in the hope that it will be useful,
  14    but WITHOUT ANY WARRANTY; without even the implied warranty of
  15    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  16    GNU General Public License for more details.
  17
  18    You should have received a copy of the GNU General Public License
  19    along with this program; if not, write to the Free Software
  20    Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301, USA.  */
  21
  22 /** \file win.c
  23  *  \brief Source: Terminal management xterm and rxvt support
  24  */
  25
  26 #include <config.h>
  27
  28 #include <stdio.h>
  29 #include <stdlib.h>
  30 #include <string.h>
  31 #include <string.h>
  32 #include <sys/types.h>
  33 #include <unistd.h>
  34
  35 #include "lib/global.h"
  36 #include "tty.h"  /* tty_gotoyx, tty_print_char */
  37 #include "win.h"
  38 #include "src/consaver/cons.saver.h"       /* console_flag */
  39
  40 /*** global variables **************************************************/
  41
  42 /* This flag is set by xterm detection routine in function main() */
  43 /* It is used by function view_other_cmd() */
  44 int xterm_flag = 0;
  45
  46 extern int keybar_visible;
  47
  48 /*** file scope macro definitions **************************************/
  49
  50 /*** file scope type declarations **************************************/
  51
  52 /*** file scope variables **********************************************/
  53
  54 static gboolean rxvt_extensions = FALSE;
  55
  56 /*** file scope functions **********************************************/
  57
  58 /* my own wierd protocol base 16 - paul */
  59 static int
  60 rxvt_getc (void)
  61 {
  62     int r;
  63     unsigned char c;
  64
  65     while (read (0, &c, 1) != 1);
  66     if (c == '\n')
  67         return -1;
  68     r = (c - 'A') * 16;
  69     while (read (0, &c, 1) != 1);
  70     r += (c - 'A');
  71     return r;
  72 }
  73
  74 static int
  75 anything_ready (void)
  76 {
  77     fd_set fds;
  78     struct timeval tv;
  79
  80     FD_ZERO (&fds);
  81     FD_SET (0, &fds);
  82     tv.tv_sec = 0;
  83     tv.tv_usec = 0;
  84     return select (1, &fds, 0, 0, &tv);
  85 }
  86
  87 /*** public functions **************************************************/
  88
  89 void
  90 do_enter_ca_mode (void)
  91 {
  92     if (xterm_flag) {
  93         fprintf (stdout, /* ESC_STR ")0" */ ESC_STR "7" ESC_STR "[?47h");
  94         fflush (stdout);
  95     }
  96 }
  97
  98 void
  99 do_exit_ca_mode (void)
 100 {
 101     if (xterm_flag) {
 102         fprintf (stdout, ESC_STR "[?47l" ESC_STR "8" ESC_STR "[m");
 103         fflush (stdout);
 104     }
 105 }
 106
 107 void
 108 show_rxvt_contents (int starty, unsigned char y1, unsigned char y2)
 109 {
 110     unsigned char *k;
 111     int bytes, i, j, cols = 0;
 112
 113     y1 += (keybar_visible != 0);        /* i don't knwo why we need this - paul */
 114     y2 += (keybar_visible != 0);
 115     while (anything_ready ())
 116         tty_lowlevel_getch ();
 117
 118 /* my own wierd protocol base 26 - paul */
 119     printf ("\033CL%c%c%c%c\n", (y1 / 26) + 'A', (y1 % 26) + 'A', (y2 / 26) + 'A', (y2 % 26) + 'A');
 120
 121     bytes = (y2 - y1) * (COLS + 1) + 1; /* *should* be the number of bytes read */
 122     j = 0;
 123     k = g_malloc (bytes);
 124     for (;;) {
 125         int c;
 126         c = rxvt_getc ();
 127         if (c < 0)
 128             break;
 129         if (j < bytes)
 130             k[j++] = c;
 131         for (cols = 1;; cols++) {
 132             c = rxvt_getc ();
 133             if (c < 0)
 134                 break;
 135             if (j < bytes)
 136                 k[j++] = c;
 137         }
 138     }
 139     for (i = 0; i < j; i++) {
 140         if ((i % cols) == 0)
 141             tty_gotoyx (starty + (i / cols), 0);
 142         tty_print_char (is_printable (k[i]) ? k[i] : ' ');
 143     }
 144     g_free (k);
 145 }
 146
 147 gboolean
 148 look_for_rxvt_extensions (void)
 149 {
 150     static gboolean been_called = FALSE;
 151
 152     if (!been_called) {
 153         const char *e = getenv ("RXVT_EXT");
 154         rxvt_extensions = ((e != NULL) && (strcmp (e, "1.0") == 0));
 155         been_called = TRUE;
 156     }
 157
 158     if (rxvt_extensions)
 159         console_flag = 4;
 160
 161     return rxvt_extensions;
 162 }