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.16 by root, Thu Jan 12 01:30:53 2006 UTC vs.
Revision 1.28 by root, Tue Jun 12 10:45:53 2012 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_STR, 22 DT_STR, // 0-terminated string
19 DT_STR_LEN, 23 DT_STR_LEN, // string + length
20 DT_WCS_LEN, 24 DT_WCS_LEN, // wchar_t* + length
25 DT_LCS_LEN, // long* + length
21 DT_XEVENT, 26 DT_XEVENT,
22}; 27};
23 28
24enum hook_type { 29enum hook_type {
25# define def(sym) HOOK_ ## sym, 30# define def(sym) HOOK_ ## sym,
… …
30 35
31struct rxvt_perl_term 36struct rxvt_perl_term
32{ 37{
33 void *self; 38 void *self;
34 unsigned long grabtime; 39 unsigned long grabtime;
40 uint8_t should_invoke[HOOK_NUM];
41
42 // this object must be zero-initialised
43 rxvt_perl_term ()
44 {
45 should_invoke [HOOK_INIT] =
46 should_invoke [HOOK_DESTROY] = 1;
47 }
35}; 48};
36 49
37struct rxvt_perl_interp 50struct rxvt_perl_interp
38{ 51{
39 char **perl_environ; 52 char **perl_environ;
40 53
41 rxvt_perl_interp ();
42 ~rxvt_perl_interp (); 54 ~rxvt_perl_interp ();
43 55
44 bool should_invoke[HOOK_NUM];
45
46 void init (); 56 void init ();
57 void init (rxvt_term *term);
58 void eval (const char *str);
47 bool invoke (rxvt_term *term, hook_type htype, ...); 59 bool invoke (rxvt_term *term, hook_type htype, ...);
48 void line_update (rxvt_term *term); 60 void line_update (rxvt_term *term);
61 void selection_finish (rxvt_selection *sel, char *data, unsigned int len);
62 void usage (rxvt_term *term, int type);
63
64 enum
65 {
66 RESOURCE_AVAILABLE = 1, // whether the option is valid
67 RESOURCE_ARG = 2 // whether the option eats the next arg
68 };
69 uint8_t parse_resource (rxvt_term *term, const char *name, bool arg, bool longopt, bool flag, const char *value);
49}; 70};
50 71
51extern struct rxvt_perl_interp rxvt_perl; 72extern struct rxvt_perl_interp rxvt_perl;
52 73
53#else 74#else
75
54# define SHOULD_INVOKE(htype) false 76#define SHOULD_INVOKE(htype) false
55# define HOOK_INVOKE(args) false 77#define HOOK_INVOKE(args) false
78
56#endif 79#endif
57 80
58#endif 81#endif
59 82

Diff Legend

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