lib/tty/win.c

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