*** empty log message ***
[dana/urxvt.git] / src / init.C
1 /*----------------------------------------------------------------------*
2  * File:        init.C
3  *----------------------------------------------------------------------*
4  *
5  * All portions of code are copyright by their respective author/s.
6  * Copyright (c) 1992      John Bovey, University of Kent at Canterbury <jdb@ukc.ac.uk>
7  *                              - original version
8  * Copyright (c) 1994      Robert Nation <nation@rocket.sanders.lockheed.com>
9  *                              - extensive modifications
10  * Copyright (c) 1996      Chuck Blake <cblake@BBN.COM>
11  * Copyright (c) 1997      mj olesen <olesen@me.queensu.ca>
12  * Copyright (c) 1997,1998 Oezguer Kesim <kesim@math.fu-berlin.de>
13  * Copyright (c) 1998-2001 Geoff Wing <gcw@pobox.com>
14  *                              - extensive modifications
15  * Copyright (c) 2003-2008 Marc Lehmann <pcg@goof.com>
16  *
17  * This program is free software; you can redistribute it and/or modify
18  * it under the terms of the GNU General Public License as published by
19  * the Free Software Foundation; either version 2 of the License, or
20  * (at your option) any later version.
21  *
22  * This program is distributed in the hope that it will be useful,
23  * but WITHOUT ANY WARRANTY; without even the implied warranty of
24  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
25  * GNU General Public License for more details.
26  *
27  * You should have received a copy of the GNU General Public License
28  * along with this program; if not, write to the Free Software
29  * Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
30  *---------------------------------------------------------------------*/
31 /*
32  * Initialisation routines.
33  */
34
35 #include "../config.h"          /* NECESSARY */
36 #include "rxvt.h"               /* NECESSARY */
37 #include "rxvtutil.h"
38 #include "init.h"
39 #include "keyboard.h"
40
41 #include <limits>
42
43 #include <csignal>
44
45 #include <fcntl.h>
46
47 #ifdef HAVE_XSETLOCALE
48 # define X_LOCALE
49 # include <X11/Xlocale.h>
50 #else
51 # ifdef HAVE_SETLOCALE
52 #  include <clocale>
53 # endif
54 #endif
55
56 #ifdef HAVE_NL_LANGINFO
57 # include <langinfo.h>
58 #endif
59
60 #ifdef DISPLAY_IS_IP
61 /* On Solaris link with -lsocket and -lnsl */
62 #include <sys/types.h>
63 #include <sys/socket.h>
64
65 /* these next two are probably only on Sun (not Solaris) */
66 #ifdef HAVE_SYS_SOCKIO_H
67 #include <sys/sockio.h>
68 #endif
69 #ifdef HAVE_SYS_BYTEORDER_H
70 #include <sys/byteorder.h>
71 #endif
72
73 #include <netinet/in.h>
74 #include <arpa/inet.h>
75 #include <net/if.h>
76 #include <net/if_arp.h>
77
78 static char *
79 rxvt_network_display (const char *display)
80 {
81   char            buffer[1024], *rval = NULL;
82   struct ifconf   ifc;
83   struct ifreq   *ifr;
84   int             i, skfd;
85
86   if (display[0] != ':' && strncmp (display, "unix:", 5))
87     return (char *) display;            /* nothing to do */
88
89   ifc.ifc_len = sizeof (buffer);        /* Get names of all ifaces */
90   ifc.ifc_buf = buffer;
91
92   if ((skfd = socket (AF_INET, SOCK_DGRAM, 0)) < 0)
93     {
94       perror ("socket");
95       return NULL;
96     }
97
98   if (ioctl (skfd, SIOCGIFCONF, &ifc) < 0)
99     {
100       perror ("SIOCGIFCONF");
101       close (skfd);
102       return NULL;
103     }
104
105   for (i = 0, ifr = ifc.ifc_req;
106        i < (ifc.ifc_len / sizeof (struct ifreq));
107        i++, ifr++)
108     {
109       struct ifreq ifr2;
110
111       strcpy (ifr2.ifr_name, ifr->ifr_name);
112
113       if (ioctl (skfd, SIOCGIFADDR, &ifr2) >= 0)
114         {
115           unsigned long addr;
116           struct sockaddr_in *p_addr;
117
118           p_addr = (struct sockaddr_in *) &ifr2.ifr_addr;
119           addr = htonl ((unsigned long)p_addr->sin_addr.s_addr);
120
121           /*
122            * not "0.0.0.0" or "127.0.0.1" - so format the address
123            */
124           if (addr && addr != 0x7F000001)
125             {
126               char *colon = strchr (display, ':');
127
128               if (colon == NULL)
129                 colon = ":0.0";
130
131               rval = rxvt_malloc (strlen (colon) + 16);
132               sprintf (rval, "%d.%d.%d.%d%s",
133                       (int) ((addr >> 030) & 0xFF),
134                       (int) ((addr >> 020) & 0xFF),
135                       (int) ((addr >> 010) & 0xFF),
136                       (int) (addr & 0xFF), colon);
137               break;
138             }
139         }
140     }
141
142   close (skfd);
143
144   return rval;
145 }
146 #endif
147
148 const char *const def_colorName[] =
149   {
150     COLOR_FOREGROUND,
151     COLOR_BACKGROUND,
152     /* low-intensity colors */
153     "rgb:00/00/00",             // 0: black             (Black)
154     "rgb:cd/00/00",             // 1: red               (Red3)
155     "rgb:00/cd/00",             // 2: green             (Green3)
156     "rgb:cd/cd/00",             // 3: yellow            (Yellow3)
157     "rgb:00/00/cd",             // 4: blue              (Blue3)
158     "rgb:cd/00/cd",             // 5: magenta           (Magenta3)
159     "rgb:00/cd/cd",             // 6: cyan              (Cyan3)
160 # ifdef XTERM_COLORS
161     "rgb:e5/e5/e5",             // 7: white             (Grey90)
162 # else
163     "rgb:fa/eb/d7",             // 7: white             (AntiqueWhite)
164 # endif
165     /* high-intensity colors */
166 # ifdef XTERM_COLORS
167     "rgb:4d/4d/4d",             // 8: bright black      (Grey30)
168 # else
169     "rgb:40/40/40",             // 8: bright black      (Grey25)
170 # endif
171     "rgb:ff/00/00",             // 1/9: bright red      (Reed)
172     "rgb:00/ff/00",             // 2/10: bright green   (Green)
173     "rgb:ff/ff/00",             // 3/11: bright yellow  (Yellow)
174     "rgb:00/00/ff",             // 4/12: bright blue    (Blue)
175     "rgb:ff/00/ff",             // 5/13: bright magenta (Magenta)
176     "rgb:00/ff/ff",             // 6/14: bright cyan    (Cyan)
177     "rgb:ff/ff/ff",             // 7/15: bright white   (White)
178
179     // 88 xterm colours
180     "rgb:00/00/00",
181     "rgb:00/00/8b",
182     "rgb:00/00/cd",
183     "rgb:00/00/ff",
184     "rgb:00/8b/00",
185     "rgb:00/8b/8b",
186     "rgb:00/8b/cd",
187     "rgb:00/8b/ff",
188     "rgb:00/cd/00",
189     "rgb:00/cd/8b",
190     "rgb:00/cd/cd",
191     "rgb:00/cd/ff",
192     "rgb:00/ff/00",
193     "rgb:00/ff/8b",
194     "rgb:00/ff/cd",
195     "rgb:00/ff/ff",
196     "rgb:8b/00/00",
197     "rgb:8b/00/8b",
198     "rgb:8b/00/cd",
199     "rgb:8b/00/ff",
200     "rgb:8b/8b/00",
201     "rgb:8b/8b/8b",
202     "rgb:8b/8b/cd",
203     "rgb:8b/8b/ff",
204     "rgb:8b/cd/00",
205     "rgb:8b/cd/8b",
206     "rgb:8b/cd/cd",
207     "rgb:8b/cd/ff",
208     "rgb:8b/ff/00",
209     "rgb:8b/ff/8b",
210     "rgb:8b/ff/cd",
211     "rgb:8b/ff/ff",
212     "rgb:cd/00/00",
213     "rgb:cd/00/8b",
214     "rgb:cd/00/cd",
215     "rgb:cd/00/ff",
216     "rgb:cd/8b/00",
217     "rgb:cd/8b/8b",
218     "rgb:cd/8b/cd",
219     "rgb:cd/8b/ff",
220     "rgb:cd/cd/00",
221     "rgb:cd/cd/8b",
222     "rgb:cd/cd/cd",
223     "rgb:cd/cd/ff",
224     "rgb:cd/ff/00",
225     "rgb:cd/ff/8b",
226     "rgb:cd/ff/cd",
227     "rgb:cd/ff/ff",
228     "rgb:ff/00/00",
229     "rgb:ff/00/8b",
230     "rgb:ff/00/cd",
231     "rgb:ff/00/ff",
232     "rgb:ff/8b/00",
233     "rgb:ff/8b/8b",
234     "rgb:ff/8b/cd",
235     "rgb:ff/8b/ff",
236     "rgb:ff/cd/00",
237     "rgb:ff/cd/8b",
238     "rgb:ff/cd/cd",
239     "rgb:ff/cd/ff",
240     "rgb:ff/ff/00",
241     "rgb:ff/ff/8b",
242     "rgb:ff/ff/cd",
243     "rgb:ff/ff/ff",
244     "rgb:2e/2e/2e",
245     "rgb:5c/5c/5c",
246     "rgb:73/73/73",
247     "rgb:8b/8b/8b",
248     "rgb:a2/a2/a2",
249     "rgb:b9/b9/b9",
250     "rgb:d0/d0/d0",
251     "rgb:e7/e7/e7",
252
253 #ifndef NO_CURSORCOLOR
254     COLOR_CURSOR_BACKGROUND,
255     COLOR_CURSOR_FOREGROUND,
256 #endif /* ! NO_CURSORCOLOR */
257     NULL,                       /* Color_pointer_fg               */
258     NULL,                       /* Color_pointer_bg               */
259     NULL,                       /* Color_border                   */
260 #ifndef NO_BOLD_UNDERLINE_REVERSE
261     NULL,                       /* Color_BD                       */
262     NULL,                       /* Color_IT                       */
263     NULL,                       /* Color_UL                       */
264     NULL,                       /* Color_RV                       */
265 #endif /* ! NO_BOLD_UNDERLINE_REVERSE */
266 #if ENABLE_FRILLS
267     NULL,                       // Color_underline
268 #endif
269 #ifdef OPTION_HC
270     NULL,
271 #endif
272     COLOR_SCROLLBAR,
273 #ifdef RXVT_SCROLLBAR
274     COLOR_SCROLLTROUGH,
275 #endif
276 #if ENABLE_TRANSPARENCY
277     NULL,
278 #endif
279 #if OFF_FOCUS_FADING
280     "rgb:00/00/00",
281 #endif
282   };
283
284 void
285 rxvt_term::init_vars ()
286 {
287   pix_colors = pix_colors_focused;
288
289   MEvent.time = CurrentTime;
290   MEvent.button = AnyButton;
291   want_refresh = 1;
292   priv_modes = SavedModes = PrivMode_Default;
293   ncol = 80;
294   nrow = 24;
295   int_bwidth = INTERNALBORDERWIDTH;
296   ext_bwidth = EXTERNALBORDERWIDTH;
297   lineSpace = LINESPACE;
298   letterSpace = LETTERSPACE;
299   saveLines = SAVELINES;
300
301   refresh_type = SLOW_REFRESH;
302
303   oldcursor.row = oldcursor.col = -1;
304
305   set_option (Opt_scrollBar);
306   set_option (Opt_scrollTtyOutput);
307   set_option (Opt_jumpScroll);
308   set_option (Opt_skipScroll);
309   set_option (Opt_secondaryScreen);
310   set_option (Opt_secondaryScroll);
311   set_option (Opt_pastableTabs);
312   set_option (Opt_intensityStyles);
313   set_option (Opt_iso14755_52);
314   set_option (Opt_buffered);
315 }
316
317 static void
318 init_secondary ()
319 {
320   int i;
321
322   if ((i = open ("/dev/null", O_RDONLY)) < 0)
323     {
324       dup2 (STDERR_FILENO, STDIN_FILENO);
325     }
326   else if (i != STDIN_FILENO)
327     {
328       dup2 (i, STDIN_FILENO);
329       close (i);
330     }
331
332   dup2 (STDERR_FILENO, STDOUT_FILENO);
333 }
334
335 /*----------------------------------------------------------------------*/
336 const char **
337 rxvt_term::init_resources (int argc, const char *const *argv)
338 {
339   int i, r_argc;
340   const char **cmd_argv, **r_argv;
341
342   /*
343    * Look for -e option. Find => split and make cmd_argv[] of command args
344    */
345   for (r_argc = 0; r_argc < argc; r_argc++)
346     if (!strcmp (argv[r_argc], "-e"))
347       break;
348
349   if (r_argc == argc)
350     cmd_argv = NULL;
351   else if (!argv[r_argc + 1])
352     rxvt_fatal ("option '-e' requires an argument, aborting.\n");
353   else
354     {
355       cmd_argv = (const char **)rxvt_malloc (sizeof (char *) * (argc - r_argc));
356
357       for (i = 0; i < argc - r_argc - 1; i++)
358         cmd_argv[i] = (const char *)argv[i + r_argc + 1];
359
360       cmd_argv[i] = NULL;
361     }
362
363   r_argv = (const char **)rxvt_malloc (sizeof (char *) * (r_argc + 1));
364
365   for (i = 0; i < r_argc; i++)
366     r_argv[i] = (const char *)argv[i];
367
368   r_argv[i] = NULL;
369
370   rs[Rs_name] = rxvt_basename (argv[0]);
371
372   /*
373    * Open display, get options/resources and create the window
374    */
375
376   if ((rs[Rs_display_name] = getenv ("DISPLAY")) == NULL)
377     rs[Rs_display_name] = ":0";
378
379   get_options (r_argc, r_argv);
380
381   if (!(display = displays.get (rs[Rs_display_name])))
382     {
383       free (r_argv);
384       rxvt_fatal ("can't open display %s, aborting.\n", rs[Rs_display_name]);
385     }
386
387   // using a local pointer decreases code size a lot
388   xa = display->xa;
389
390   set (display);
391   extract_resources ();
392
393 #if XFT
394   if (rs[Rs_depth])
395     select_visual (strtol (rs[Rs_depth], 0, 0));
396 #endif
397
398   free (r_argv);
399
400   for (int i = NUM_RESOURCES; i--; )
401     if (rs [i] == resval_undef)
402       rs [i] = 0;
403
404 #ifdef HAVE_AFTERIMAGE
405   set_application_name ((char *)rs[Rs_name]);
406   set_output_threshold (OUTPUT_LEVEL_WARNING);
407 #endif
408
409 #if ENABLE_PERL
410   if (!rs[Rs_perl_ext_1])
411     rs[Rs_perl_ext_1] = "default";
412
413   if ((rs[Rs_perl_ext_1] && *rs[Rs_perl_ext_1])
414       || (rs[Rs_perl_ext_2] && *rs[Rs_perl_ext_2])
415       || (rs[Rs_perl_eval] && *rs[Rs_perl_eval]))
416     {
417       rxvt_perl.init (this);
418       HOOK_INVOKE ((this, HOOK_INIT, DT_END));
419     }
420 #endif
421
422   /*
423    * set any defaults not already set
424    */
425   if (cmd_argv && cmd_argv[0])
426     {
427       if (!rs[Rs_title])
428         rs[Rs_title] = rxvt_basename (cmd_argv[0]);
429
430       if (!rs[Rs_iconName])
431         rs[Rs_iconName] = rs[Rs_title];
432     }
433   else
434     {
435       if (!rs[Rs_title])
436         rs[Rs_title] = rs[Rs_name];
437
438       if (!rs[Rs_iconName])
439         rs[Rs_iconName] = rs[Rs_name];
440     }
441
442   if (rs[Rs_saveLines] && (i = atoi (rs[Rs_saveLines])) >= 0)
443     saveLines = min (i, MAX_SAVELINES);
444
445 #if ENABLE_FRILLS
446   if (rs[Rs_int_bwidth] && (i = atoi (rs[Rs_int_bwidth])) >= 0)
447     int_bwidth = min (i, std::numeric_limits<int16_t>::max ());
448
449   if (rs[Rs_ext_bwidth] && (i = atoi (rs[Rs_ext_bwidth])) >= 0)
450     ext_bwidth = min (i, std::numeric_limits<int16_t>::max ());
451
452   if (rs[Rs_lineSpace] && (i = atoi (rs[Rs_lineSpace])) >= 0)
453     lineSpace = min (i, std::numeric_limits<int16_t>::max ());
454
455   if (rs[Rs_letterSpace])
456     letterSpace = atoi (rs[Rs_letterSpace]);
457 #endif
458
459 #ifdef POINTER_BLANK
460   if (rs[Rs_pointerBlankDelay] && (i = atoi (rs[Rs_pointerBlankDelay])) >= 0)
461     pointerBlankDelay = i;
462   else
463     pointerBlankDelay = 2;
464 #endif
465
466   /* no point having a scrollbar without having any scrollback! */
467   if (!saveLines)
468     set_option (Opt_scrollBar, 0);
469
470   if (!rs[Rs_cutchars])
471     rs[Rs_cutchars] = CUTCHARS;
472
473 #ifndef NO_BACKSPACE_KEY
474   if (!rs[Rs_backspace_key])
475 # ifdef DEFAULT_BACKSPACE
476     rs[Rs_backspace_key] = DEFAULT_BACKSPACE;
477 # else
478     rs[Rs_backspace_key] = "DEC";       /* can toggle between \010 or \177 */
479 # endif
480 #endif
481
482 #ifndef NO_DELETE_KEY
483   if (!rs[Rs_delete_key])
484 # ifdef DEFAULT_DELETE
485     rs[Rs_delete_key] = DEFAULT_DELETE;
486 # else
487     rs[Rs_delete_key] = "\033[3~";
488 # endif
489 #endif
490
491     scrollBar.setup (this);
492
493 #ifdef XTERM_REVERSE_VIDEO
494   /* this is how xterm implements reverseVideo */
495   if (option (Opt_reverseVideo))
496     {
497       if (!rs[Rs_color + Color_fg])
498         rs[Rs_color + Color_fg] = def_colorName[Color_bg];
499
500       if (!rs[Rs_color + Color_bg])
501         rs[Rs_color + Color_bg] = def_colorName[Color_fg];
502     }
503 #endif
504
505   for (i = 0; i < NRS_COLORS; i++)
506     if (!rs[Rs_color + i])
507       rs[Rs_color + i] = def_colorName[i];
508
509 #ifndef XTERM_REVERSE_VIDEO
510   /* this is how we implement reverseVideo */
511   if (option (Opt_reverseVideo))
512     ::swap (rs[Rs_color + Color_fg], rs[Rs_color + Color_bg]);
513 #endif
514
515   /* convenient aliases for setting fg/bg to colors */
516   color_aliases (Color_fg);
517   color_aliases (Color_bg);
518 #ifndef NO_CURSORCOLOR
519   color_aliases (Color_cursor);
520   color_aliases (Color_cursor2);
521 #endif /* NO_CURSORCOLOR */
522   color_aliases (Color_pointer_fg);
523   color_aliases (Color_pointer_bg);
524   color_aliases (Color_border);
525 #ifndef NO_BOLD_UNDERLINE_REVERSE
526   color_aliases (Color_BD);
527   color_aliases (Color_UL);
528   color_aliases (Color_RV);
529 #endif /* ! NO_BOLD_UNDERLINE_REVERSE */
530
531   if (!rs[Rs_color + Color_border])
532     rs[Rs_color + Color_border] = rs[Rs_color + Color_bg];
533
534   return cmd_argv;
535 }
536
537 /*----------------------------------------------------------------------*/
538 void
539 rxvt_term::init (int argc, const char *const *argv, stringvec *envv)
540 {
541   this->envv = envv;
542
543   SET_R (this);
544   set_locale ("");
545   set_environ (envv); // a few things in X do not call setlocale :(
546
547   init_vars ();
548
549   init_secondary ();
550
551   const char **cmd_argv = init_resources (argc, argv);
552
553 #ifdef KEYSYM_RESOURCE
554   keyboard->register_done ();
555 #endif
556
557   if (const char *path = rs[Rs_chdir])
558     if (*path) // ignored if empty
559       {
560         if (*path != '/')
561           rxvt_fatal ("specified shell working directory must start with a slash, aborting.\n");
562
563         if (chdir (path))
564           rxvt_fatal ("unable to change into specified shell working directory, aborting.\n");
565       }
566
567   if (option (Opt_scrollBar))
568     scrollBar.state = STATE_IDLE;    /* set existence for size calculations */
569
570   pty = ptytty::create ();
571
572   create_windows (argc, argv);
573
574   init_xlocale ();
575
576   scr_poweron (); // initialize screen
577
578 #if 0
579   XSynchronize (dpy, True);
580 #endif
581
582   if (option (Opt_scrollBar))
583     scrollBar.resize ();      /* create and map scrollbar */
584 #ifdef HAVE_BG_PIXMAP
585   {
586     bgPixmap.set_target (this);
587     bgPixmap.invalidate ();
588
589 #ifdef ENABLE_TRANSPARENCY
590     if (option (Opt_transparent))
591       {
592         bgPixmap.set_transparent ();
593
594 #ifdef HAVE_AFTERIMAGE
595         if (rs [Rs_blurradius])
596           bgPixmap.set_blur_radius (rs [Rs_blurradius]);
597 #endif
598         if (ISSET_PIXCOLOR (Color_tint))
599           bgPixmap.set_tint (pix_colors_focused [Color_tint]);
600
601         if (rs [Rs_shade])
602           bgPixmap.set_shade (rs [Rs_shade]);
603
604         bgPixmap.set_root_pixmap ();
605         XSelectInput (dpy, display->root, PropertyChangeMask);
606         rootwin_ev.start (display, display->root);
607       }
608 #endif
609
610 #ifdef BG_IMAGE_FROM_FILE
611     if (rs[Rs_backgroundPixmap])
612       {
613         const char *p = rs[Rs_backgroundPixmap];
614
615         if ((p = strchr (p, ';')) != 0)
616           {
617             p++;
618             bgPixmap.set_geometry (p);
619           }
620         else
621           bgPixmap.set_defaultGeometry ();
622
623         if (bgPixmap.set_file (rs[Rs_backgroundPixmap]))
624           if (!bgPixmap.window_position_sensitive ())
625             update_background ();
626       }
627 #endif
628   }
629 #endif
630
631 #if ENABLE_PERL
632   rootwin_ev.start (display, display->root);
633 #endif
634
635   set_colorfgbg ();
636
637   init_command (cmd_argv);
638
639   free (cmd_argv);
640
641   if (pty->pty >= 0)
642     pty_ev.start (pty->pty, ev::READ);
643
644   HOOK_INVOKE ((this, HOOK_START, DT_END));
645
646 #if ENABLE_XEMBED
647   if (rs[Rs_embed])
648     {
649       long info[2] = { 0, XEMBED_MAPPED };
650
651       XChangeProperty (dpy, parent[0], xa[XA_XEMBED_INFO], xa[XA_XEMBED_INFO],
652                        32, PropModeReplace, (unsigned char *)&info, 2);
653     }
654 #endif
655
656   XMapWindow (dpy, vt);
657   XMapWindow (dpy, parent[0]);
658
659   refresh_check ();
660 }
661
662 /*----------------------------------------------------------------------*/
663 void
664 rxvt_term::init_env ()
665 {
666   int i;
667   char *val;
668
669 #ifdef DISPLAY_IS_IP
670   /* Fixup display_name for export over pty to any interested terminal
671    * clients via "ESC[7n" (e.g. shells).  Note we use the pure IP number
672    * (for the first non-loopback interface) that we get from
673    * rxvt_network_display ().  This is more "name-resolution-portable", if you
674    * will, and probably allows for faster x-client startup if your name
675    * server is beyond a slow link or overloaded at client startup.  Of
676    * course that only helps the shell's child processes, not us.
677    *
678    * Giving out the display_name also affords a potential security hole
679    */
680   val = rxvt_network_display (rs[Rs_display_name]);
681   rs[Rs_display_name] = (const char *)val;
682
683   if (val == NULL)
684 #endif /* DISPLAY_IS_IP */
685     val = XDisplayString (dpy);
686
687   if (rs[Rs_display_name] == NULL)
688     rs[Rs_display_name] = val;   /* use broken `:0' value */
689
690   i = strlen (val);
691   env_display = (char *)rxvt_malloc (i + 9);
692
693   sprintf (env_display, "DISPLAY=%s", val);
694
695   sprintf (env_windowid, "WINDOWID=%lu", (unsigned long)parent[0]);
696
697   /* add entries to the environment:
698    * @ DISPLAY:   in case we started with -display
699    * @ WINDOWID:  X window id number of the window
700    * @ COLORTERM: terminal sub-name and also indicates its color
701    * @ TERM:      terminal name
702    * @ TERMINFO:  path to terminfo directory
703    * @ COLORFGBG: fg;bg color codes
704    */
705   putenv (env_display);
706   putenv (env_windowid);
707
708   if (env_colorfgbg)
709     putenv (env_colorfgbg);
710
711 #ifdef RXVT_TERMINFO
712   putenv ("TERMINFO=" RXVT_TERMINFO);
713 #endif
714
715   if (depth <= 2)
716     putenv ("COLORTERM=" COLORTERMENV "-mono");
717   else
718     putenv ("COLORTERM=" COLORTERMENVFULL);
719
720   if (rs[Rs_term_name] != NULL)
721     {
722       env_term = (char *)rxvt_malloc (strlen (rs[Rs_term_name]) + 6);
723       sprintf (env_term, "TERM=%s", rs[Rs_term_name]);
724       putenv (env_term);
725     }
726   else
727     putenv ("TERM=" TERMENV);
728
729 #ifdef HAVE_UNSETENV
730   /* avoid passing old settings and confusing term size */
731   unsetenv ("LINES");
732   unsetenv ("COLUMNS");
733   unsetenv ("TERMCAP");        /* terminfo should be okay */
734 #endif /* HAVE_UNSETENV */
735 }
736
737 /*----------------------------------------------------------------------*/
738 /*
739  * This is more or less stolen straight from XFree86 xterm.
740  * This should support all European type languages.
741  */
742 void
743 rxvt_term::set_locale (const char *locale)
744 {
745   set_environ (envv);
746
747 #if HAVE_XSETLOCALE || HAVE_SETLOCALE
748   free (this->locale);
749   this->locale = setlocale (LC_CTYPE, locale);
750
751   if (!this->locale)
752     {
753       if (*locale)
754         {
755           rxvt_warn ("unable to set locale \"%s\", using C locale instead.\n", locale);
756           setlocale (LC_CTYPE, "C");
757         }
758       else
759         rxvt_warn ("default locale unavailable, check LC_* and LANG variables. Continuing.\n");
760
761       this->locale = "C";
762     }
763
764
765   this->locale = strdup (this->locale);
766   SET_LOCALE (this->locale);
767   mbstate.reset ();
768 #endif
769
770 #if HAVE_NL_LANGINFO
771   char *codeset = strdup (nl_langinfo (CODESET));
772   // /^UTF.?8/i
773   enc_utf8 = (codeset[0] == 'U' || codeset[0] == 'u')
774           && (codeset[1] == 'T' || codeset[1] == 't')
775           && (codeset[2] == 'F' || codeset[2] == 'f')
776           && (codeset[3] == '8' || codeset[4] == '8');
777   free (codeset);
778 #else
779   enc_utf8 = 0;
780 #endif
781 }
782
783 void
784 rxvt_term::init_xlocale ()
785 {
786   set_environ (envv);
787
788 #ifdef USE_XIM
789   if (!locale)
790     rxvt_warn ("setting locale failed, working without locale support.\n");
791   else
792     {
793       set_string_property (xa[XA_WM_LOCALE_NAME], locale);
794
795       if (!XSupportsLocale ())
796         {
797           rxvt_warn ("the locale is not supported by Xlib, working without locale support.\n");
798           return;
799         }
800
801       im_ev.start (display);
802
803       /* see if we can connect already */
804       im_cb ();
805     }
806 #endif
807 }
808
809 /*----------------------------------------------------------------------*/
810 void
811 rxvt_term::init_command (const char *const *argv)
812 {
813   /*
814    * Initialize the command connection.
815    * This should be called after the X server connection is established.
816    */
817
818 #ifdef META8_OPTION
819   meta_char = option (Opt_meta8) ? 0x80 : C0_ESC;
820 #endif
821
822   get_ourmods ();
823
824   if (!option (Opt_scrollTtyOutput))
825     priv_modes |= PrivMode_TtyOutputInh;
826   if (option (Opt_scrollTtyKeypress))
827     priv_modes |= PrivMode_Keypress;
828   if (!option (Opt_jumpScroll))
829     priv_modes |= PrivMode_smoothScroll;
830
831 #ifndef NO_BACKSPACE_KEY
832   if (strcmp (rs[Rs_backspace_key], "DEC") == 0)
833     priv_modes |= PrivMode_HaveBackSpace;
834 #endif
835
836   /* add value for scrollBar */
837   if (scrollBar.state)
838     {
839       priv_modes |= PrivMode_scrollBar;
840       SavedModes |= PrivMode_scrollBar;
841     }
842
843   run_command (argv);
844 }
845
846 /*----------------------------------------------------------------------*/
847 void
848 rxvt_term::get_colours ()
849 {
850   int i;
851
852 #ifdef OFF_FOCUS_FADING
853   pix_colors = pix_colors_focused;
854 #endif
855
856   for (i = 0; i < (depth <= 2 ? 2 : NRS_COLORS); i++)
857     {
858       const char *name = rs[Rs_color + i];
859
860       if (!name)
861         continue;
862
863       rxvt_color xcol;
864
865       if (!set_color (xcol, name))
866         {
867 #ifndef XTERM_REVERSE_VIDEO
868           if (i < 2 && option (Opt_reverseVideo))
869             name = def_colorName [1 - i];
870           else
871 #endif
872             name = def_colorName [i];
873
874           if (!name)
875             continue;
876
877           if (!set_color (xcol, name))
878             {
879               switch (i)
880                 {
881                   case Color_fg:
882                   case Color_bg:
883                     rxvt_warn ("unable to get foreground/background colour, continuing.\n");
884                     name = "";
885                     break;
886 #ifndef NO_CURSORCOLOR
887                   case Color_cursor2:
888 #endif
889                   case Color_pointer_fg:
890                     name = rs[Rs_color + Color_fg];
891                     xcol.set (this, name);
892                     break;
893                   default:
894                     name = rs[Rs_color + Color_bg];
895                     xcol.set (this, name);
896                     break;
897                 }
898             }
899         }
900
901       pix_colors[i] = xcol;
902       rs[Rs_color + i] = name;
903     }
904
905   if (depth <= 2)
906     {
907       if (!rs[Rs_color + Color_pointer_fg]) alias_color (Color_pointer_fg, Color_fg);
908       if (!rs[Rs_color + Color_pointer_bg]) alias_color (Color_pointer_bg, Color_bg);
909       if (!rs[Rs_color + Color_border]    ) alias_color (Color_border,     Color_fg);
910     }
911
912   /*
913    * get scrollBar shadow colors
914    *
915    * The calculations of topShadow/bottomShadow values are adapted
916    * from the fvwm window manager.
917    */
918 #ifdef RXVT_SCROLLBAR
919   if (depth <= 2)
920     {
921       /* Monochrome */
922       alias_color (Color_scroll,       Color_fg);
923       alias_color (Color_topShadow,    Color_bg);
924       alias_color (Color_bottomShadow, Color_bg);
925     }
926   else
927     {
928       pix_colors [Color_scroll].fade (this, 50, pix_colors [Color_bottomShadow]);
929
930       rgba cscroll;
931       pix_colors [Color_scroll].get (cscroll);
932
933       /* topShadowColor */
934       if (!pix_colors[Color_topShadow].set (this,
935                        rgba (
936                          min ((int)rgba::MAX_CC, max (cscroll.r / 5, cscroll.r) * 7 / 5),
937                          min ((int)rgba::MAX_CC, max (cscroll.g / 5, cscroll.g) * 7 / 5),
938                          min ((int)rgba::MAX_CC, max (cscroll.b / 5, cscroll.b) * 7 / 5),
939                          cscroll.a)
940                        ))
941         alias_color (Color_topShadow, Color_White);
942     }
943 #endif
944
945 #ifdef OFF_FOCUS_FADING
946   for (i = 0; i < (depth <= 2 ? 2 : NRS_COLORS); i++)
947     update_fade_color (i);
948 #endif
949 }
950
951 /*----------------------------------------------------------------------*/
952 /* color aliases, fg/bg bright-bold */
953 void
954 rxvt_term::color_aliases (int idx)
955 {
956   if (rs[Rs_color + idx] && isdigit (* (rs[Rs_color + idx])))
957     {
958       int i = atoi (rs[Rs_color + idx]);
959
960       if (i >= 8 && i <= 15)
961         /* bright colors */
962         rs[Rs_color + idx] = rs[Rs_color + minBrightCOLOR + i - 8];
963       else if (i >= 0 && i <= 7)
964         /* normal colors */
965         rs[Rs_color + idx] = rs[Rs_color + minCOLOR + i];
966     }
967 }
968
969 /*----------------------------------------------------------------------*/
970 /*
971  * Probe the modifier keymap to get the Meta (Alt) and Num_Lock settings
972  * Use resource ``modifier'' to override the Meta modifier
973  */
974 void
975 rxvt_term::get_ourmods ()
976 {
977   int i, j, k;
978   int requestedmeta, realmeta, realalt;
979   const char *cm, *rsmod;
980   XModifierKeymap *map;
981   KeyCode *kc;
982   const unsigned int modmasks[] =
983     {
984       Mod1Mask, Mod2Mask, Mod3Mask, Mod4Mask, Mod5Mask
985     };
986
987   requestedmeta = realmeta = realalt = 0;
988   rsmod = rs[Rs_modifier];
989
990   if (rsmod
991       && strcasecmp (rsmod, "mod1") >= 0 && strcasecmp (rsmod, "mod5") <= 0)
992     requestedmeta = rsmod[3] - '0';
993
994   map = XGetModifierMapping (dpy);
995   kc = map->modifiermap;
996
997   for (i = 1; i < 6; i++)
998     {
999       k = (i + 2) * map->max_keypermod;       /* skip shift/lock/control */
1000
1001       for (j = map->max_keypermod; j--; k++)
1002         {
1003           if (kc[k] == 0)
1004             break;
1005
1006           switch (XKeycodeToKeysym (dpy, kc[k], 0))
1007             {
1008               case XK_Num_Lock:
1009                 ModNumLockMask = modmasks[i - 1];
1010                 continue;
1011
1012               case XK_ISO_Level3_Shift:
1013                 ModLevel3Mask = modmasks[i - 1];
1014                 continue;
1015
1016               case XK_Meta_L:
1017               case XK_Meta_R:
1018                 cm = "meta";
1019                 realmeta = i;
1020                 break;
1021
1022               case XK_Alt_L:
1023               case XK_Alt_R:
1024                 cm = "alt";
1025                 realalt = i;
1026                 break;
1027
1028               case XK_Super_L:
1029               case XK_Super_R:
1030                 cm = "super";
1031                 break;
1032
1033               case XK_Hyper_L:
1034               case XK_Hyper_R:
1035                 cm = "hyper";
1036                 break;
1037
1038               default:
1039                 continue;
1040             }
1041
1042           if (rsmod && strncasecmp (rsmod, cm, strlen (cm)) == 0)
1043             requestedmeta = i;
1044         }
1045     }
1046
1047   XFreeModifiermap (map);
1048
1049   i = requestedmeta ? requestedmeta
1050     : realmeta      ? realmeta
1051     : realalt       ? realalt
1052     : 0;
1053
1054   if (i)
1055     ModMetaMask = modmasks[i - 1];
1056 }
1057
1058 /*----------------------------------------------------------------------*/
1059 /* rxvt_Create_Windows () - Open and map the window */
1060 void
1061 rxvt_term::create_windows (int argc, const char *const *argv)
1062 {
1063   XClassHint classHint;
1064   XWMHints wmHint;
1065 #if ENABLE_FRILLS
1066   MWMHints mwmhints = { };
1067 #endif
1068   XGCValues gcvalue;
1069   XSetWindowAttributes attributes;
1070   Window top, parent;
1071
1072   dLocal (Display *, dpy);
1073
1074   /* grab colors before netscape does */
1075   get_colours ();
1076
1077   if (!set_fonts ())
1078     rxvt_fatal ("unable to load base fontset, please specify a valid one using -fn, aborting.\n");
1079
1080   parent = display->root;
1081
1082   attributes.override_redirect = !!option (Opt_override_redirect);
1083
1084 #if ENABLE_FRILLS
1085   if (option (Opt_borderLess))
1086     {
1087       if (XInternAtom (dpy, "_MOTIF_WM_INFO", True) == None)
1088         {
1089           // rxvt_warn("Window Manager does not support MWM hints.  Bypassing window manager control for borderless window.\n");
1090           attributes.override_redirect = true;
1091         }
1092       else
1093         {
1094           mwmhints.flags = MWM_HINTS_DECORATIONS;
1095         }
1096     }
1097 #endif
1098
1099 #if ENABLE_XEMBED
1100   if (rs[Rs_embed])
1101     {
1102       XWindowAttributes wattr;
1103
1104       parent = strtol (rs[Rs_embed], 0, 0);
1105
1106       if (!XGetWindowAttributes (dpy, parent, &wattr))
1107         rxvt_fatal ("invalid window-id specified with -embed, aborting.\n");
1108
1109       window_calc (wattr.width, wattr.height);
1110     }
1111 #endif
1112
1113   window_calc (0, 0);
1114
1115   /* sub-window placement & size in rxvt_resize_subwindows () */
1116   attributes.background_pixel = pix_colors_focused [Color_border];
1117   attributes.border_pixel     = pix_colors_focused [Color_border];
1118   attributes.colormap         = cmap;
1119
1120   top = XCreateWindow (dpy, parent,
1121                        szHint.x, szHint.y,
1122                        szHint.width, szHint.height,
1123                        ext_bwidth,
1124                        depth, InputOutput, visual,
1125                        CWColormap | CWBackPixel | CWBorderPixel | CWOverrideRedirect,
1126                        &attributes);
1127
1128   this->parent[0] = top;
1129
1130   old_width = szHint.width;
1131   old_height = szHint.height;
1132
1133   set_title     (rs [Rs_title]);
1134   set_icon_name (rs [Rs_iconName]);
1135
1136   classHint.res_name  = (char *)rs[Rs_name];
1137   classHint.res_class = (char *)RESCLASS;
1138
1139   wmHint.flags         = InputHint | StateHint | WindowGroupHint;
1140   wmHint.input         = True;
1141   wmHint.initial_state = option (Opt_iconic) ? IconicState : NormalState;
1142   wmHint.window_group  = top;
1143
1144   XmbSetWMProperties (dpy, top, NULL, NULL, (char **)argv, argc,
1145                       &szHint, &wmHint, &classHint);
1146 #if ENABLE_EWMH 
1147 # ifdef HAVE_AFTERIMAGE
1148   /*
1149    * set up icon hint
1150    * rs [Rs_iconfile] is path to icon, asv has been created in init_resources
1151    */
1152
1153   if (rs [Rs_iconfile])
1154     {
1155       init_asv ();
1156
1157       ASImage *im = file2ASImage (rs [Rs_iconfile], 0xFFFFFFFF, SCREEN_GAMMA, 0, NULL);
1158       if (asv && im)
1159         {
1160           int w = im->width;
1161           int h = im->height;
1162           long* buffer = (long *)malloc ((2 + w * h) * sizeof (long));
1163           ASImage *result = scale_asimage (asv, im,
1164                                            w, h, ASA_ARGB32,
1165                                            100, ASIMAGE_QUALITY_DEFAULT);
1166           destroy_asimage (&im);
1167
1168           if (buffer && result)
1169             {
1170               ARGB32 *asbuf = result->alt.argb32;
1171               buffer [0] = w;
1172               buffer [1] = h;
1173
1174               for (unsigned int i = 0; i < w * h; ++i)
1175                 buffer [i + 2] = asbuf [i];
1176
1177               destroy_asimage (&result);
1178               XChangeProperty (dpy, top, xa[XA_NET_WM_ICON], XA_CARDINAL, 32,
1179                                PropModeReplace, (const unsigned char*) buffer, 2 + w * h);
1180               free (buffer);
1181             }
1182           else
1183             {
1184               if (!buffer)
1185                 rxvt_warn ("Memory allocation for icon hint failed, continuing without.\n");
1186
1187               if (!result)
1188                 rxvt_warn ("Icon image transformation to ARGB failed, continuing without.\n");
1189             }
1190         }
1191       else
1192         rxvt_warn ("Loading image icon failed, continuing without.\n");
1193     }
1194 # endif
1195 #endif
1196
1197 #if ENABLE_FRILLS
1198   if (mwmhints.flags)
1199     XChangeProperty (dpy, top, xa[XA_MOTIF_WM_HINTS], xa[XA_MOTIF_WM_HINTS], 32,
1200                      PropModeReplace, (unsigned char *)&mwmhints, PROP_MWM_HINTS_ELEMENTS);
1201 #endif
1202
1203   Atom protocols[] = {
1204     xa[XA_WM_DELETE_WINDOW],
1205 #if ENABLE_EWMH
1206     xa[XA_NET_WM_PING],
1207 #endif
1208   };
1209
1210   XSetWMProtocols (dpy, top, protocols, sizeof (protocols) / sizeof (protocols[0]));
1211
1212 #if ENABLE_FRILLS
1213   if (rs[Rs_transient_for])
1214     XSetTransientForHint (dpy, top, (Window)strtol (rs[Rs_transient_for], 0, 0));
1215 #endif
1216
1217 #if ENABLE_EWMH
1218   long pid = getpid ();
1219
1220   XChangeProperty (dpy, top,
1221                    xa[XA_NET_WM_PID], XA_CARDINAL, 32,
1222                    PropModeReplace, (unsigned char *)&pid, 1);
1223
1224   // _NET_WM_WINDOW_TYPE is NORMAL, which is the default
1225 #endif
1226
1227   XSelectInput (dpy, top,
1228                 KeyPressMask
1229 #if (MOUSE_WHEEL && MOUSE_SLIP_WHEELING) || ENABLE_FRILLS || ISO_14755
1230                 | KeyReleaseMask
1231 #endif
1232                 | FocusChangeMask | VisibilityChangeMask
1233                 | ExposureMask | StructureNotifyMask);
1234
1235   termwin_ev.start (display, top);
1236
1237   /* vt cursor: Black-on-White is standard, but this is more popular */
1238   TermWin_cursor = XCreateFontCursor (dpy, XC_xterm);
1239
1240   /* the vt window */
1241   vt = XCreateSimpleWindow (dpy, top,
1242                             window_vt_x, window_vt_y,
1243                             width, height,
1244                             0,
1245                             pix_colors_focused[Color_fg],
1246                             pix_colors_focused[Color_bg]);
1247
1248   attributes.bit_gravity = NorthWestGravity;
1249   XChangeWindowAttributes (dpy, vt, CWBitGravity, &attributes);
1250
1251   vt_emask = ExposureMask | ButtonPressMask | ButtonReleaseMask | PropertyChangeMask;
1252
1253   if (option (Opt_pointerBlank))
1254     vt_emask |= PointerMotionMask;
1255   else
1256     vt_emask |= Button1MotionMask | Button3MotionMask;
1257
1258   vt_select_input ();
1259
1260   vt_ev.start (display, vt);
1261
1262   /* graphics context for the vt window */
1263   gcvalue.foreground         = pix_colors[Color_fg];
1264   gcvalue.background         = pix_colors[Color_bg];
1265   gcvalue.graphics_exposures = 0;
1266
1267   gc = XCreateGC (dpy, vt,
1268                   GCForeground | GCBackground | GCGraphicsExposures,
1269                   &gcvalue);
1270
1271   drawable = new rxvt_drawable (this, vt);
1272
1273 #ifdef OFF_FOCUS_FADING
1274   // initially we are in unfocused state
1275   if (rs[Rs_fade])
1276     pix_colors = pix_colors_unfocused;
1277 #endif
1278
1279   pointer_unblank ();
1280   scr_recolour ();
1281 }
1282
1283 /* ------------------------------------------------------------------------- *
1284  *                            GET TTY CURRENT STATE                          *
1285  * ------------------------------------------------------------------------- */
1286 void
1287 rxvt_get_ttymode (struct termios *tio, int erase)
1288 {
1289   /*
1290    * standard System V termios interface
1291    */
1292   if (tcgetattr (STDIN_FILENO, tio) < 0)
1293     {
1294       // return error - use system defaults,
1295       // where possible, and zero elsewhere
1296       memset (tio, 0, sizeof (struct termios));
1297
1298       tio->c_cc[VINTR] = CINTR;
1299       tio->c_cc[VQUIT] = CQUIT;
1300       tio->c_cc[VERASE] = CERASE;
1301 #ifdef VERASE2
1302       tio->c_cc[VERASE2] = CERASE2;
1303 #endif
1304       tio->c_cc[VKILL] = CKILL;
1305       tio->c_cc[VSTART] = CSTART;
1306       tio->c_cc[VSTOP] = CSTOP;
1307       tio->c_cc[VSUSP] = CSUSP;
1308 # ifdef VDSUSP
1309       tio->c_cc[VDSUSP] = CDSUSP;
1310 # endif
1311 # ifdef VREPRINT
1312       tio->c_cc[VREPRINT] = CRPRNT;
1313 # endif
1314 # ifdef VDISCRD
1315       tio->c_cc[VDISCRD] = CFLUSH;
1316 # endif
1317 # ifdef VWERSE
1318       tio->c_cc[VWERSE] = CWERASE;
1319 # endif
1320 # ifdef VLNEXT
1321       tio->c_cc[VLNEXT] = CLNEXT;
1322 # endif
1323     }
1324
1325   tio->c_cc[VEOF] = CEOF;
1326   tio->c_cc[VEOL] = VDISABLE;
1327 # ifdef VEOL2
1328   tio->c_cc[VEOL2] = VDISABLE;
1329 # endif
1330 # ifdef VSWTC
1331   tio->c_cc[VSWTC] = VDISABLE;
1332 # endif
1333 # ifdef VSWTCH
1334   tio->c_cc[VSWTCH] = VDISABLE;
1335 # endif
1336 # if VMIN != VEOF
1337   tio->c_cc[VMIN] = 1;
1338 # endif
1339 # if VTIME != VEOL
1340   tio->c_cc[VTIME] = 0;
1341 # endif
1342
1343   if (erase != -1)
1344     tio->c_cc[VERASE] = (char)erase;
1345
1346   /* input modes */
1347   tio->c_iflag = (BRKINT | IGNPAR | ICRNL
1348 # ifdef IMAXBEL
1349                   | IMAXBEL
1350 # endif
1351                   | IXON);
1352
1353   /* output modes */
1354   tio->c_oflag = (OPOST | ONLCR);
1355
1356   /* control modes */
1357   tio->c_cflag = (CS8 | CREAD);
1358
1359   /* line discipline modes */
1360   tio->c_lflag = (ISIG | ICANON | IEXTEN | ECHO
1361 # if defined (ECHOCTL) && defined (ECHOKE)
1362                   | ECHOCTL | ECHOKE
1363 # endif
1364                   | ECHOE | ECHOK);
1365
1366   /*
1367    * Debugging
1368    */
1369 #ifdef DEBUG_TTYMODE
1370   /* c_iflag bits */
1371   fprintf (stderr, "Input flags\n");
1372
1373   /* cpp token stringize doesn't work on all machines <sigh> */
1374 # define FOO(flag,name)                 \
1375     if ((tio->c_iflag) & flag)          \
1376         fprintf (stderr, "%s ", name)
1377
1378   /* c_iflag bits */
1379   FOO (IGNBRK, "IGNBRK");
1380   FOO (BRKINT, "BRKINT");
1381   FOO (IGNPAR, "IGNPAR");
1382   FOO (PARMRK, "PARMRK");
1383   FOO (INPCK, "INPCK");
1384   FOO (ISTRIP, "ISTRIP");
1385   FOO (INLCR, "INLCR");
1386   FOO (IGNCR, "IGNCR");
1387   FOO (ICRNL, "ICRNL");
1388   FOO (IXON, "IXON");
1389   FOO (IXOFF, "IXOFF");
1390 # ifdef IUCLC
1391   FOO (IUCLC, "IUCLC");
1392 # endif
1393 # ifdef IXANY
1394   FOO (IXANY, "IXANY");
1395 # endif
1396 # ifdef IMAXBEL
1397   FOO (IMAXBEL, "IMAXBEL");
1398 # endif
1399
1400   fprintf (stderr, "\n");
1401
1402 # undef FOO
1403 # define FOO(entry, name)                                       \
1404     fprintf (stderr, "%-8s = %#04o\n", name, tio->c_cc [entry])
1405
1406   FOO (VINTR, "VINTR");
1407   FOO (VQUIT, "VQUIT");
1408   FOO (VERASE, "VERASE");
1409   FOO (VKILL, "VKILL");
1410   FOO (VEOF, "VEOF");
1411   FOO (VEOL, "VEOL");
1412 # ifdef VEOL2
1413   FOO (VEOL2, "VEOL2");
1414 # endif
1415 # ifdef VSWTC
1416   FOO (VSWTC, "VSWTC");
1417 # endif
1418 # ifdef VSWTCH
1419   FOO (VSWTCH, "VSWTCH");
1420 # endif
1421   FOO (VSTART, "VSTART");
1422   FOO (VSTOP, "VSTOP");
1423   FOO (VSUSP, "VSUSP");
1424 # ifdef VDSUSP
1425   FOO (VDSUSP, "VDSUSP");
1426 # endif
1427 # ifdef VREPRINT
1428   FOO (VREPRINT, "VREPRINT");
1429 # endif
1430 # ifdef VDISCRD
1431   FOO (VDISCRD, "VDISCRD");
1432 # endif
1433 # ifdef VWERSE
1434   FOO (VWERSE, "VWERSE");
1435 # endif
1436 # ifdef VLNEXT
1437   FOO (VLNEXT, "VLNEXT");
1438 # endif
1439
1440   fprintf (stderr, "\n");
1441 # undef FOO
1442 #endif /* DEBUG_TTYMODE */
1443 }
1444
1445 /*----------------------------------------------------------------------*/
1446 /*
1447  * Run the command in a subprocess and return a file descriptor for the
1448  * master end of the pseudo-teletype pair with the command talking to
1449  * the slave.
1450  */
1451 void
1452 rxvt_term::run_command (const char *const *argv)
1453 {
1454 #if ENABLE_FRILLS
1455   if (rs[Rs_pty_fd])
1456     {
1457       pty->pty = atoi (rs[Rs_pty_fd]);
1458
1459       if (pty->pty >= 0)
1460         {
1461           if (getfd_hook)
1462             pty->pty = (*getfd_hook) (pty->pty);
1463
1464           if (pty->pty < 0 || fcntl (pty->pty, F_SETFL, O_NONBLOCK))
1465             rxvt_fatal ("unusable pty-fd filehandle, aborting.\n");
1466         }
1467     }
1468   else
1469 #endif
1470     if (!pty->get ())
1471       rxvt_fatal ("can't initialize pseudo-tty, aborting.\n");
1472
1473   int er;
1474
1475 #ifndef NO_BACKSPACE_KEY
1476   if (rs[Rs_backspace_key][0] && !rs[Rs_backspace_key][1])
1477     er = rs[Rs_backspace_key][0];
1478   else if (strcmp (rs[Rs_backspace_key], "DEC") == 0)
1479     er = '\177';            /* the initial state anyway */
1480   else
1481 #endif
1482     er = -1;
1483
1484   rxvt_get_ttymode (&tio, er);
1485   /* init terminal attributes */
1486   cfsetospeed (&tio, BAUDRATE);
1487   cfsetispeed (&tio, BAUDRATE);
1488   tcsetattr (pty->tty, TCSANOW, &tio);
1489   pty->set_utf8_mode (enc_utf8);
1490
1491   /* set initial window size */
1492   tt_winch ();
1493
1494 #if ENABLE_FRILLS
1495   if (rs[Rs_pty_fd])
1496     return;
1497 #endif
1498
1499   /* spin off the command interpreter */
1500   switch (cmd_pid = fork ())
1501     {
1502       case -1:
1503         {
1504           cmd_pid = 0;
1505           rxvt_fatal ("can't fork, aborting.\n");
1506         }
1507       case 0:
1508         init_env ();
1509
1510         if (!pty->make_controlling_tty ())
1511           fprintf (stderr, "%s: could not obtain control of tty.", RESNAME);
1512         else
1513           {
1514             /* Reopen stdin, stdout and stderr over the tty file descriptor */
1515             dup2 (pty->tty, STDIN_FILENO);
1516             dup2 (pty->tty, STDOUT_FILENO);
1517             dup2 (pty->tty, STDERR_FILENO);
1518
1519             // close all our file handles that we do no longer need
1520             for (rxvt_term **t = termlist.begin (); t < termlist.end (); t++)
1521               {
1522                 if ((*t)->pty->pty > 2) close ((*t)->pty->pty);
1523                 if ((*t)->pty->tty > 2) close ((*t)->pty->tty);
1524               }
1525
1526             run_child (argv);
1527             fprintf (stderr, "%s: unable to exec child.", RESNAME);
1528           }
1529
1530         _exit (EXIT_FAILURE);
1531
1532       default:
1533         if (!option (Opt_utmpInhibit))
1534           pty->login (cmd_pid, option (Opt_loginShell), rs[Rs_display_name]);
1535
1536         pty->close_tty ();
1537
1538         child_ev.start (cmd_pid);
1539
1540         HOOK_INVOKE ((this, HOOK_CHILD_START, DT_INT, cmd_pid, DT_END));
1541         break;
1542     }
1543 }
1544
1545 /* ------------------------------------------------------------------------- *
1546  *                          CHILD PROCESS OPERATIONS                         *
1547  * ------------------------------------------------------------------------- */
1548 /*
1549  * The only open file descriptor is the slave tty - so no error messages.
1550  * returns are fatal
1551  */
1552 int
1553 rxvt_term::run_child (const char *const *argv)
1554 {
1555   char *login;
1556
1557   if (option (Opt_console))
1558     {
1559       /* be virtual console, fail silently */
1560 #ifdef TIOCCONS
1561       unsigned int on = 1;
1562
1563       ioctl (STDIN_FILENO, TIOCCONS, &on);
1564 #elif defined (SRIOCSREDIR)
1565       int fd;
1566
1567       fd = open (CONSOLE, O_WRONLY, 0);
1568       if (fd >= 0)
1569         if (ioctl (fd, SRIOCSREDIR, NULL) < 0)
1570           close (fd);
1571 #endif /* SRIOCSREDIR */
1572     }
1573
1574   /* reset signals and spin off the command interpreter */
1575   signal (SIGINT,  SIG_DFL);
1576   signal (SIGQUIT, SIG_DFL);
1577   signal (SIGCHLD, SIG_DFL);
1578   signal (SIGHUP,  SIG_DFL);
1579   signal (SIGPIPE, SIG_DFL);
1580   /*
1581    * mimick login's behavior by disabling the job control signals
1582    * a shell that wants them can turn them back on
1583    */
1584 #ifdef SIGTSTP
1585   signal (SIGTSTP, SIG_IGN);
1586   signal (SIGTTIN, SIG_IGN);
1587   signal (SIGTTOU, SIG_IGN);
1588 #endif /* SIGTSTP */
1589
1590   /* command interpreter path */
1591   if (argv)
1592     {
1593 # ifdef DEBUG_CMD
1594       int             i;
1595
1596       for (i = 0; argv[i]; i++)
1597         fprintf (stderr, "argv [%d] = \"%s\"\n", i, argv[i]);
1598 # endif
1599
1600       execvp (argv[0], (char *const *)argv);
1601       /* no error message: STDERR is closed! */
1602     }
1603   else
1604     {
1605       const char *argv0, *shell;
1606
1607       if ((shell = getenv ("SHELL")) == NULL || *shell == '\0')
1608         shell = "/bin/sh";
1609
1610       argv0 = rxvt_basename (shell);
1611
1612       if (option (Opt_loginShell))
1613         {
1614           login = (char *)rxvt_malloc (strlen (argv0) + 2);
1615
1616           login[0] = '-';
1617           strcpy (&login[1], argv0);
1618           argv0 = login;
1619         }
1620
1621       execlp (shell, argv0, (char *)0);
1622       /* no error message: STDERR is closed! */
1623     }
1624
1625   return -1;
1626 }
1627
1628 /*----------------------- end-of-file (C source) -----------------------*/