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.20 by root, Mon Jan 16 08:48:09 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) \
10 ( (htype) == HOOK_INIT \
11 || (htype) == HOOK_DESTROY \
12 || (htype) == HOOK_REFRESH_BEGIN \
13 || (htype) == HOOK_REFRESH_END \
14 || perl.should_invoke [htype])
15# define HOOK_INVOKE(args) rxvt_perl.invoke args
16 9
17#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
18 17
19enum data_type { 18enum data_type {
20 DT_END, // no further arguments 19 DT_END, // no further arguments
21 DT_INT, 20 DT_INT,
22 DT_LONG, 21 DT_LONG,
23 DT_STR, // 0-terminates string 22 DT_STR, // 0-terminated string
24 DT_STR_LEN, // string + length 23 DT_STR_LEN, // string + length
24 DT_WCS_LEN, // wchar_t* + length
25 DT_WCS_LEN, // wstring + length 25 DT_LCS_LEN, // long* + length
26 DT_XEVENT, 26 DT_XEVENT,
27}; 27};
28 28
29enum hook_type { 29enum hook_type {
30# define def(sym) HOOK_ ## sym, 30# define def(sym) HOOK_ ## sym,
36struct rxvt_perl_term 36struct rxvt_perl_term
37{ 37{
38 void *self; 38 void *self;
39 unsigned long grabtime; 39 unsigned long grabtime;
40 uint8_t should_invoke[HOOK_NUM]; 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 }
41}; 48};
42 49
43struct rxvt_perl_interp 50struct rxvt_perl_interp
44{ 51{
45 char **perl_environ; 52 char **perl_environ;
46 53
47 ~rxvt_perl_interp (); 54 ~rxvt_perl_interp ();
48 55
56 void init ();
49 void init (rxvt_term *term); 57 void init (rxvt_term *term);
58 void eval (const char *str);
50 bool invoke (rxvt_term *term, hook_type htype, ...); 59 bool invoke (rxvt_term *term, hook_type htype, ...);
51 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);
52}; 70};
53 71
54extern struct rxvt_perl_interp rxvt_perl; 72extern struct rxvt_perl_interp rxvt_perl;
55 73
56#else 74#else
75
57# define SHOULD_INVOKE(htype) false 76#define SHOULD_INVOKE(htype) false
58# define HOOK_INVOKE(args) false 77#define HOOK_INVOKE(args) false
78
59#endif 79#endif
60 80
61#endif 81#endif
62 82

Diff Legend

Removed lines
+ Added lines
< Changed lines
> Changed lines