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 "lib/util.h"           /* is_printable() */
  37 #include "tty.h"                /* tty_gotoyx, tty_print_char */
  38 #include "win.h"
  39 #include "src/consaver/cons.saver.h"    /* console_flag */
  40
  41 /*** global variables ****************************************************************************/
  42
  43 /* This flag is set by xterm detection routine in function main() */
  44 /* It is used by function view_other_cmd() */
  45 int xterm_flag = 0;
  46
  47 extern int keybar_visible;
  48
  49 /*** file scope macro definitions ****************************************************************/
  50
  51 /*** file scope type declarations ****************************************************************/
  52
  53 /*** file scope variables ************************************************************************/
  54
  55 static gboolean rxvt_extensions = FALSE;
  56
  57 /*** file scope functions ************************************************************************/
  58 /* --------------------------------------------------------------------------------------------- */
  59
  60 /* my own wierd protocol base 16 - paul */
  61 static int
  62 rxvt_getc (void)
  63 {
  64     int r;
  65     unsigned char c;
  66
  67     while (read (0, &c, 1) != 1);
  68     if (c == '\n')
  69         return -1;
  70     r = (c - 'A') * 16;
  71     while (read (0, &c, 1) != 1);
  72     r += (c - 'A');
  73     return r;
  74 }
  75
  76 /* --------------------------------------------------------------------------------------------- */
  77
  78 static int
  79 anything_ready (void)
  80 {
  81     fd_set fds;
  82     struct timeval tv;
  83
  84     FD_ZERO (&fds);
  85     FD_SET (0, &fds);
  86     tv.tv_sec = 0;
  87     tv.tv_usec = 0;
  88     return select (1, &fds, 0, 0, &tv);
  89 }
  90
  91 /* --------------------------------------------------------------------------------------------- */
  92 /*** public functions ****************************************************************************/
  93 /* --------------------------------------------------------------------------------------------- */
  94
  95 void
  96 do_enter_ca_mode (void)
  97 {
  98     if (xterm_flag)
  99     {
 100         fprintf (stdout, /* ESC_STR ")0" */ ESC_STR "7" ESC_STR "[?47h");
 101         fflush (stdout);
 102     }
 103 }
 104
 105 /* --------------------------------------------------------------------------------------------- */
 106
 107 void
 108 do_exit_ca_mode (void)
 109 {
 110     if (xterm_flag)
 111     {
 112         fprintf (stdout, ESC_STR "[?47l" ESC_STR "8" ESC_STR "[m");
 113         fflush (stdout);
 114     }
 115 }
 116
 117 /* --------------------------------------------------------------------------------------------- */
 118
 119 void
 120 show_rxvt_contents (int starty, unsigned char y1, unsigned char y2)
 121 {
 122     unsigned char *k;
 123     int bytes, i, j, cols = 0;
 124
 125     y1 += (keybar_visible != 0);        /* i don't knwo why we need this - paul */
 126     y2 += (keybar_visible != 0);
 127     while (anything_ready ())
 128         tty_lowlevel_getch ();
 129
 130     /* my own wierd protocol base 26 - paul */
 131     printf ("\033CL%c%c%c%c\n", (y1 / 26) + 'A', (y1 % 26) + 'A', (y2 / 26) + 'A', (y2 % 26) + 'A');
 132
 133     bytes = (y2 - y1) * (COLS + 1) + 1; /* *should* be the number of bytes read */
 134     j = 0;
 135     k = g_malloc (bytes);
 136     for (;;)
 137     {
 138         int c;
 139         c = rxvt_getc ();
 140         if (c < 0)
 141             break;
 142         if (j < bytes)
 143             k[j++] = c;
 144         for (cols = 1;; cols++)
 145         {
 146             c = rxvt_getc ();
 147             if (c < 0)
 148                 break;
 149             if (j < bytes)
 150                 k[j++] = c;
 151         }
 152     }
 153     for (i = 0; i < j; i++)
 154     {
 155         if ((i % cols) == 0)
 156             tty_gotoyx (starty + (i / cols), 0);
 157         tty_print_char (is_printable (k[i]) ? k[i] : ' ');
 158     }
 159     g_free (k);
 160 }
 161
 162 /* --------------------------------------------------------------------------------------------- */
 163
 164 gboolean
 165 look_for_rxvt_extensions (void)
 166 {
 167     static gboolean been_called = FALSE;
 168
 169     if (!been_called)
 170     {
 171         const char *e = getenv ("RXVT_EXT");
 172         rxvt_extensions = ((e != NULL) && (strcmp (e, "1.0") == 0));
 173         been_called = TRUE;
 174     }
 175
 176     if (rxvt_extensions)
 177         console_flag = 4;
 178
 179     return rxvt_extensions;
 180 }
 181
 182 /* --------------------------------------------------------------------------------------------- */