… | |
… | |
30 | * Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA. |
30 | * Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA. |
31 | *---------------------------------------------------------------------*/ |
31 | *---------------------------------------------------------------------*/ |
32 | |
32 | |
33 | #include "../config.h" /* NECESSARY */ |
33 | #include "../config.h" /* NECESSARY */ |
34 | #include "rxvt.h" /* NECESSARY */ |
34 | #include "rxvt.h" /* NECESSARY */ |
|
|
35 | #include "keyboard.h" |
|
|
36 | #include "rxvtperl.h" |
35 | |
37 | |
36 | #include <limits> |
38 | #include <limits> |
37 | |
39 | |
38 | #include <csignal> |
40 | #include <csignal> |
39 | #include <cstring> |
41 | #include <cstring> |
… | |
… | |
42 | # include <grp.h> |
44 | # include <grp.h> |
43 | #endif |
45 | #endif |
44 | |
46 | |
45 | #ifdef HAVE_TERMIOS_H |
47 | #ifdef HAVE_TERMIOS_H |
46 | # include <termios.h> |
48 | # include <termios.h> |
47 | #endif |
|
|
48 | |
|
|
49 | #ifdef KEYSYM_RESOURCE |
|
|
50 | # include "keyboard.h" |
|
|
51 | #endif |
49 | #endif |
52 | |
50 | |
53 | vector<rxvt_term *> rxvt_term::termlist; |
51 | vector<rxvt_term *> rxvt_term::termlist; |
54 | |
52 | |
55 | static char curlocale[128]; |
53 | static char curlocale[128]; |
… | |
… | |
195 | pty.put (); |
193 | pty.put (); |
196 | } |
194 | } |
197 | |
195 | |
198 | rxvt_term::~rxvt_term () |
196 | rxvt_term::~rxvt_term () |
199 | { |
197 | { |
|
|
198 | PERL_INVOKE ((this, HOOK_DESTROY, DT_END)); |
|
|
199 | |
200 | termlist.erase (find (termlist.begin (), termlist.end(), this)); |
200 | termlist.erase (find (termlist.begin (), termlist.end(), this)); |
201 | |
201 | |
202 | emergency_cleanup (); |
202 | emergency_cleanup (); |
203 | |
203 | |
204 | #if ENABLE_STYLES |
204 | #if ENABLE_STYLES |
… | |
… | |
473 | #ifdef HAVE_SCROLLBARS |
473 | #ifdef HAVE_SCROLLBARS |
474 | if (OPTION (Opt_scrollBar)) |
474 | if (OPTION (Opt_scrollBar)) |
475 | scrollBar.setIdle (); /* set existence for size calculations */ |
475 | scrollBar.setIdle (); /* set existence for size calculations */ |
476 | #endif |
476 | #endif |
477 | |
477 | |
|
|
478 | #if ENABLE_PERL |
|
|
479 | rxvt_perl.init (); |
|
|
480 | #endif |
|
|
481 | |
|
|
482 | PERL_INVOKE ((this, HOOK_INIT, DT_END)); |
|
|
483 | |
478 | create_windows (argc, argv); |
484 | create_windows (argc, argv); |
479 | |
485 | |
480 | dDisp; |
486 | dDisp; |
481 | |
487 | |
482 | init_xlocale (); |
488 | init_xlocale (); |
… | |
… | |
514 | free (cmd_argv); |
520 | free (cmd_argv); |
515 | |
521 | |
516 | pty_ev.start (pty.pty, EVENT_READ); |
522 | pty_ev.start (pty.pty, EVENT_READ); |
517 | |
523 | |
518 | check_ev.start (); |
524 | check_ev.start (); |
|
|
525 | |
|
|
526 | PERL_INVOKE ((this, HOOK_START, DT_END)); |
519 | |
527 | |
520 | return true; |
528 | return true; |
521 | } |
529 | } |
522 | |
530 | |
523 | static struct sig_handlers |
531 | static struct sig_handlers |