ViewVC Help
View File | Revision Log | Show Annotations | Download File
/cvs/rxvt-unicode/src/rxvtperl.h
(Generate patch)

Comparing rxvt-unicode/src/rxvtperl.h (file contents):
Revision 1.9 by root, Fri Jan 6 01:16:58 2006 UTC vs.
Revision 1.23 by root, Mon Feb 21 07:41:03 2011 UTC

… …
4 4
5#ifndef RXVTPERL_H_ 5#ifndef RXVTPERL_H_
6#define RXVTPERL_H_ 6#define RXVTPERL_H_
7 7
8#if ENABLE_PERL 8#if ENABLE_PERL
9# define SHOULD_INVOKE(htype) rxvt_perl.should_invoke [htype]
10# define HOOK_INVOKE(args) rxvt_perl.invoke args
11 9
12#include "rxvt.h" 10#define SHOULD_INVOKE(htype) \
11 ( (htype) == HOOK_INIT \
12 || (htype) == HOOK_DESTROY \
13 || (htype) == HOOK_REFRESH_BEGIN \
14 || (htype) == HOOK_REFRESH_END \
15 || perl.should_invoke [htype])
16#define HOOK_INVOKE(args) rxvt_perl.invoke args
13 17
14enum data_type { 18enum data_type {
15 DT_END, 19 DT_END, // no further arguments
16 DT_INT, 20 DT_INT,
17 DT_LONG, 21 DT_LONG,
18 DT_STRING, 22 DT_STR, // 0-terminated string
19 DT_USTRING_LEN, 23 DT_STR_LEN, // string + length
24 DT_WCS_LEN, // wchar_t* + length
25 DT_LCS_LEN, // long* + length
20 DT_XEVENT, 26 DT_XEVENT,
21}; 27};
22 28
23enum hook_type { 29enum hook_type {
24# define def(sym) HOOK_ ## sym, 30# define def(sym) HOOK_ ## sym,
25# include "hookinc.h" 31# include "hookinc.h"
26# undef def 32# undef def
27 HOOK_NUM, 33 HOOK_NUM,
28}; 34};
29 35
36struct rxvt_perl_term
37{
38 void *self;
39 unsigned long grabtime;
40 uint8_t should_invoke[HOOK_NUM];
41};
42
30struct rxvt_perl_interp 43struct rxvt_perl_interp
31{ 44{
32 rxvt_perl_interp (); 45 char **perl_environ;
46
33 ~rxvt_perl_interp (); 47 ~rxvt_perl_interp ();
34 48
35 bool should_invoke[HOOK_NUM]; 49 void init (rxvt_term *term);
36
37 void init ();
38 bool invoke (rxvt_term *term, hook_type htype, ...); 50 bool invoke (rxvt_term *term, hook_type htype, ...);
39 void line_update (rxvt_term *term); 51 void line_update (rxvt_term *term);
40}; 52};
41 53
42extern struct rxvt_perl_interp rxvt_perl; 54extern struct rxvt_perl_interp rxvt_perl;
43 55
44#else 56#else
57
45# define SHOULD_INVOKE(htype) false 58#define SHOULD_INVOKE(htype) false
46# define PERL_INVOKE(args) false 59#define HOOK_INVOKE(args) false
60
47#endif 61#endif
48 62
49#endif 63#endif
50 64

Diff Legend

– Removed lines
+ Added lines
< Changed lines
> Changed lines