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