debase-ruby_core_source 0.10.15 → 0.10.16
Sign up to get free protection for your applications and to get access to all the features.
- checksums.yaml +4 -4
- data/CHANGELOG.md +28 -0
- data/debase-ruby_core_source.gemspec +1 -1
- data/lib/debase/ruby_core_source/{ruby-1.9.3-p550 → ruby-2.5.4-p155}/addr2line.h +1 -1
- data/lib/debase/ruby_core_source/ruby-2.5.4-p155/ccan/build_assert/build_assert.h +40 -0
- data/lib/debase/ruby_core_source/ruby-2.5.4-p155/ccan/check_type/check_type.h +63 -0
- data/lib/debase/ruby_core_source/ruby-2.5.4-p155/ccan/container_of/container_of.h +142 -0
- data/lib/debase/ruby_core_source/ruby-2.5.4-p155/ccan/list/list.h +773 -0
- data/lib/debase/ruby_core_source/ruby-2.5.4-p155/ccan/str/str.h +16 -0
- data/lib/debase/ruby_core_source/ruby-2.5.4-p155/constant.h +51 -0
- data/lib/debase/ruby_core_source/ruby-2.5.4-p155/debug_counter.h +109 -0
- data/lib/debase/ruby_core_source/{ruby-1.9.3-p550 → ruby-2.5.4-p155}/dln.h +10 -9
- data/lib/debase/ruby_core_source/ruby-2.5.4-p155/encindex.h +69 -0
- data/lib/debase/ruby_core_source/ruby-2.5.4-p155/eval_intern.h +334 -0
- data/lib/debase/ruby_core_source/{ruby-1.9.3-p550 → ruby-2.5.4-p155}/gc.h +27 -10
- data/lib/debase/ruby_core_source/ruby-2.5.4-p155/id.h +250 -0
- data/lib/debase/ruby_core_source/ruby-2.5.4-p155/id_table.h +31 -0
- data/lib/debase/ruby_core_source/ruby-2.5.4-p155/insns.inc +217 -0
- data/lib/debase/ruby_core_source/ruby-2.5.4-p155/insns_info.inc +1570 -0
- data/lib/debase/ruby_core_source/ruby-2.5.4-p155/internal.h +2036 -0
- data/lib/debase/ruby_core_source/ruby-2.5.4-p155/iseq.h +308 -0
- data/lib/debase/ruby_core_source/{ruby-1.9.3-p550 → ruby-2.5.4-p155}/known_errors.inc +16 -1
- data/lib/debase/ruby_core_source/ruby-2.5.4-p155/method.h +218 -0
- data/lib/debase/ruby_core_source/{ruby-1.9.3-p550 → ruby-2.5.4-p155}/node.h +115 -79
- data/lib/debase/ruby_core_source/{ruby-1.9.3-p550 → ruby-2.5.4-p155}/node_name.inc +12 -22
- data/lib/debase/ruby_core_source/ruby-2.5.4-p155/opt_sc.inc +1601 -0
- data/lib/debase/ruby_core_source/ruby-2.5.4-p155/optinsn.inc +103 -0
- data/lib/debase/ruby_core_source/{ruby-1.9.3-p550 → ruby-2.5.4-p155}/optunifs.inc +28 -83
- data/lib/debase/ruby_core_source/{ruby-1.9.3-p550 → ruby-2.5.4-p155}/parse.h +74 -60
- data/lib/debase/ruby_core_source/ruby-2.5.4-p155/probes_helper.h +43 -0
- data/lib/debase/ruby_core_source/ruby-2.5.4-p155/regenc.h +254 -0
- data/lib/debase/ruby_core_source/{ruby-1.9.3-p550 → ruby-2.5.4-p155}/regint.h +299 -211
- data/lib/debase/ruby_core_source/{ruby-1.9.3-p550 → ruby-2.5.4-p155}/regparse.h +45 -37
- data/lib/debase/ruby_core_source/ruby-2.5.4-p155/revision.h +1 -0
- data/lib/debase/ruby_core_source/ruby-2.5.4-p155/ruby_assert.h +54 -0
- data/lib/debase/ruby_core_source/{ruby-1.9.3-p550 → ruby-2.5.4-p155}/ruby_atomic.h +84 -26
- data/lib/debase/ruby_core_source/{ruby-1.9.3-p550 → ruby-2.5.4-p155}/siphash.h +1 -1
- data/lib/debase/ruby_core_source/ruby-2.5.4-p155/symbol.h +108 -0
- data/lib/debase/ruby_core_source/{ruby-1.9.3-p550 → ruby-2.5.4-p155}/thread_pthread.h +14 -11
- data/lib/debase/ruby_core_source/{ruby-1.9.3-p550 → ruby-2.5.4-p155}/thread_win32.h +2 -6
- data/lib/debase/ruby_core_source/ruby-2.5.4-p155/timev.h +42 -0
- data/lib/debase/ruby_core_source/{ruby-1.9.3-p550 → ruby-2.5.4-p155}/transcode_data.h +34 -12
- data/lib/debase/ruby_core_source/ruby-2.5.4-p155/version.h +73 -0
- data/lib/debase/ruby_core_source/ruby-2.5.4-p155/vm.inc +3667 -0
- data/lib/debase/ruby_core_source/ruby-2.5.4-p155/vm_call_iseq_optimized.inc +213 -0
- data/lib/debase/ruby_core_source/ruby-2.5.4-p155/vm_core.h +1768 -0
- data/lib/debase/ruby_core_source/{ruby-1.9.3-p550/debug.h → ruby-2.5.4-p155/vm_debug.h} +4 -8
- data/lib/debase/ruby_core_source/{ruby-1.9.3-p550 → ruby-2.5.4-p155}/vm_exec.h +38 -30
- data/lib/debase/ruby_core_source/ruby-2.5.4-p155/vm_insnhelper.h +255 -0
- data/lib/debase/ruby_core_source/{ruby-1.9.3-p550 → ruby-2.5.4-p155}/vm_opts.h +14 -9
- data/lib/debase/ruby_core_source/ruby-2.5.4-p155/vmtc.inc +214 -0
- data/lib/debase/ruby_core_source/version.rb +1 -1
- metadata +52 -42
- data/lib/debase/ruby_core_source/ruby-1.9.3-p550/constant.h +0 -34
- data/lib/debase/ruby_core_source/ruby-1.9.3-p550/encdb.h +0 -167
- data/lib/debase/ruby_core_source/ruby-1.9.3-p550/eval_intern.h +0 -234
- data/lib/debase/ruby_core_source/ruby-1.9.3-p550/id.h +0 -177
- data/lib/debase/ruby_core_source/ruby-1.9.3-p550/insns.inc +0 -179
- data/lib/debase/ruby_core_source/ruby-1.9.3-p550/insns_info.inc +0 -695
- data/lib/debase/ruby_core_source/ruby-1.9.3-p550/internal.h +0 -242
- data/lib/debase/ruby_core_source/ruby-1.9.3-p550/iseq.h +0 -126
- data/lib/debase/ruby_core_source/ruby-1.9.3-p550/method.h +0 -105
- data/lib/debase/ruby_core_source/ruby-1.9.3-p550/opt_sc.inc +0 -670
- data/lib/debase/ruby_core_source/ruby-1.9.3-p550/optinsn.inc +0 -30
- data/lib/debase/ruby_core_source/ruby-1.9.3-p550/regenc.h +0 -219
- data/lib/debase/ruby_core_source/ruby-1.9.3-p550/revision.h +0 -1
- data/lib/debase/ruby_core_source/ruby-1.9.3-p550/timev.h +0 -21
- data/lib/debase/ruby_core_source/ruby-1.9.3-p550/transdb.h +0 -189
- data/lib/debase/ruby_core_source/ruby-1.9.3-p550/version.h +0 -52
- data/lib/debase/ruby_core_source/ruby-1.9.3-p550/vm.inc +0 -3054
- data/lib/debase/ruby_core_source/ruby-1.9.3-p550/vm_core.h +0 -763
- data/lib/debase/ruby_core_source/ruby-1.9.3-p550/vm_insnhelper.h +0 -220
- data/lib/debase/ruby_core_source/ruby-1.9.3-p550/vmtc.inc +0 -97
@@ -0,0 +1,103 @@
|
|
1
|
+
/* -*-c-*- *********************************************************/
|
2
|
+
/*******************************************************************/
|
3
|
+
/*******************************************************************/
|
4
|
+
/**
|
5
|
+
This file is for threaded code.
|
6
|
+
|
7
|
+
----
|
8
|
+
This file is auto generated by insns2vm.rb
|
9
|
+
DO NOT TOUCH!
|
10
|
+
|
11
|
+
If you want to fix something, you must edit 'template/optinsn.inc.tmpl'
|
12
|
+
or tool/insns2vm.rb
|
13
|
+
*/
|
14
|
+
|
15
|
+
static INSN *
|
16
|
+
insn_operands_unification(INSN *insnobj)
|
17
|
+
{
|
18
|
+
#ifdef OPT_OPERANDS_UNIFICATION
|
19
|
+
/* optimize rule */
|
20
|
+
switch(insnobj->insn_id){
|
21
|
+
case BIN(getlocal):
|
22
|
+
if (
|
23
|
+
insnobj->operands[1] == INT2FIX(0) &&
|
24
|
+
1) {
|
25
|
+
insnobj->insn_id = BIN(getlocal_OP__WC__0);
|
26
|
+
insnobj->operand_size = 1;
|
27
|
+
break;
|
28
|
+
}
|
29
|
+
if (
|
30
|
+
insnobj->operands[1] == INT2FIX(1) &&
|
31
|
+
1) {
|
32
|
+
insnobj->insn_id = BIN(getlocal_OP__WC__1);
|
33
|
+
insnobj->operand_size = 1;
|
34
|
+
break;
|
35
|
+
}
|
36
|
+
break;
|
37
|
+
case BIN(setlocal):
|
38
|
+
if (
|
39
|
+
insnobj->operands[1] == INT2FIX(0) &&
|
40
|
+
1) {
|
41
|
+
insnobj->insn_id = BIN(setlocal_OP__WC__0);
|
42
|
+
insnobj->operand_size = 1;
|
43
|
+
break;
|
44
|
+
}
|
45
|
+
if (
|
46
|
+
insnobj->operands[1] == INT2FIX(1) &&
|
47
|
+
1) {
|
48
|
+
insnobj->insn_id = BIN(setlocal_OP__WC__1);
|
49
|
+
insnobj->operand_size = 1;
|
50
|
+
break;
|
51
|
+
}
|
52
|
+
break;
|
53
|
+
case BIN(putobject):
|
54
|
+
if (
|
55
|
+
insnobj->operands[0] == INT2FIX(0) &&
|
56
|
+
1) {
|
57
|
+
insnobj->insn_id = BIN(putobject_OP_INT2FIX_O_0_C_);
|
58
|
+
insnobj->operand_size = 0;
|
59
|
+
break;
|
60
|
+
}
|
61
|
+
if (
|
62
|
+
insnobj->operands[0] == INT2FIX(1) &&
|
63
|
+
1) {
|
64
|
+
insnobj->insn_id = BIN(putobject_OP_INT2FIX_O_1_C_);
|
65
|
+
insnobj->operand_size = 0;
|
66
|
+
break;
|
67
|
+
}
|
68
|
+
break;
|
69
|
+
|
70
|
+
default:
|
71
|
+
/* do nothing */;
|
72
|
+
break;
|
73
|
+
}
|
74
|
+
#endif
|
75
|
+
return insnobj;
|
76
|
+
}
|
77
|
+
|
78
|
+
int
|
79
|
+
rb_insn_unified_local_var_level(VALUE insn)
|
80
|
+
{
|
81
|
+
#ifdef OPT_OPERANDS_UNIFICATION
|
82
|
+
/* optimize rule */
|
83
|
+
switch (insn) {
|
84
|
+
case BIN(getlocal_OP__WC__0):
|
85
|
+
return 0;
|
86
|
+
case BIN(getlocal_OP__WC__1):
|
87
|
+
return 1;
|
88
|
+
case BIN(setlocal_OP__WC__0):
|
89
|
+
return 0;
|
90
|
+
case BIN(setlocal_OP__WC__1):
|
91
|
+
return 1;
|
92
|
+
case BIN(putobject_OP_INT2FIX_O_0_C_):
|
93
|
+
return INT2FIX(0);
|
94
|
+
case BIN(putobject_OP_INT2FIX_O_1_C_):
|
95
|
+
return INT2FIX(1);
|
96
|
+
|
97
|
+
default:
|
98
|
+
/* do nothing */;
|
99
|
+
break;
|
100
|
+
}
|
101
|
+
#endif
|
102
|
+
return -1;
|
103
|
+
}
|
@@ -9,7 +9,7 @@
|
|
9
9
|
DO NOT TOUCH!
|
10
10
|
|
11
11
|
If you want to fix something, you must edit 'template/optunifs.inc.tmpl'
|
12
|
-
or
|
12
|
+
or tool/insns2vm.rb
|
13
13
|
*/
|
14
14
|
|
15
15
|
/*
|
@@ -28,89 +28,34 @@
|
|
28
28
|
*/
|
29
29
|
|
30
30
|
|
31
|
-
|
32
31
|
static const int *const *const unified_insns_data[] = {
|
33
|
-
|
34
|
-
|
35
|
-
|
36
|
-
|
37
|
-
|
38
|
-
|
39
|
-
|
40
|
-
|
41
|
-
|
42
|
-
|
43
|
-
|
44
|
-
|
45
|
-
|
46
|
-
|
47
|
-
|
48
|
-
|
49
|
-
|
50
|
-
|
51
|
-
|
52
|
-
|
53
|
-
|
54
|
-
|
55
|
-
|
56
|
-
|
57
|
-
|
58
|
-
|
59
|
-
0,
|
60
|
-
0,
|
61
|
-
0,
|
62
|
-
0,
|
63
|
-
0,
|
64
|
-
0,
|
65
|
-
0,
|
66
|
-
0,
|
67
|
-
0,
|
68
|
-
0,
|
69
|
-
0,
|
70
|
-
0,
|
71
|
-
0,
|
72
|
-
0,
|
73
|
-
0,
|
74
|
-
0,
|
75
|
-
0,
|
76
|
-
0,
|
77
|
-
0,
|
78
|
-
0,
|
79
|
-
0,
|
80
|
-
0,
|
81
|
-
0,
|
82
|
-
0,
|
83
|
-
0,
|
84
|
-
0,
|
85
|
-
0,
|
86
|
-
0,
|
87
|
-
0,
|
88
|
-
0,
|
89
|
-
0,
|
90
|
-
0,
|
91
|
-
0,
|
92
|
-
0,
|
93
|
-
0,
|
94
|
-
0,
|
95
|
-
0,
|
96
|
-
0,
|
97
|
-
0,
|
98
|
-
0,
|
99
|
-
0,
|
100
|
-
0,
|
101
|
-
0,
|
102
|
-
0,
|
103
|
-
0,
|
104
|
-
0,
|
105
|
-
0,
|
106
|
-
0,
|
107
|
-
0,
|
108
|
-
0,
|
109
|
-
0,
|
110
|
-
0,
|
111
|
-
0,
|
112
|
-
0};
|
113
|
-
|
32
|
+
0, 0, 0, 0, 0, 0, 0, 0,
|
33
|
+
0, 0, 0, 0, 0, 0, 0, 0,
|
34
|
+
0, 0, 0, 0, 0, 0, 0, 0,
|
35
|
+
0, 0, 0, 0, 0, 0, 0, 0,
|
36
|
+
0, 0, 0, 0, 0, 0, 0, 0,
|
37
|
+
0, 0, 0, 0, 0, 0, 0, 0,
|
38
|
+
0, 0, 0, 0, 0, 0, 0, 0,
|
39
|
+
0, 0, 0, 0, 0, 0, 0, 0,
|
40
|
+
0, 0, 0, 0, 0, 0, 0, 0,
|
41
|
+
0, 0, 0, 0, 0, 0, 0, 0,
|
42
|
+
0, 0, 0, 0, 0, 0, 0, 0,
|
43
|
+
0, 0, 0, 0, 0, 0, 0, 0,
|
44
|
+
0, 0, 0, 0, 0, 0, 0, 0,
|
45
|
+
0, 0, 0, 0, 0, 0, 0, 0,
|
46
|
+
0, 0, 0, 0, 0, 0, 0, 0,
|
47
|
+
0, 0, 0, 0, 0, 0, 0, 0,
|
48
|
+
0, 0, 0, 0, 0, 0, 0, 0,
|
49
|
+
0, 0, 0, 0, 0, 0, 0, 0,
|
50
|
+
0, 0, 0, 0, 0, 0, 0, 0,
|
51
|
+
0, 0, 0, 0, 0, 0, 0, 0,
|
52
|
+
0, 0, 0, 0, 0, 0, 0, 0,
|
53
|
+
0, 0, 0, 0, 0, 0, 0, 0,
|
54
|
+
0, 0, 0, 0, 0, 0, 0, 0,
|
55
|
+
0, 0, 0, 0, 0, 0, 0, 0,
|
56
|
+
0, 0, 0, 0,
|
57
|
+
};
|
114
58
|
|
115
59
|
#undef GET_INSN_NAME
|
116
60
|
|
61
|
+
ASSERT_VM_INSTRUCTION_SIZE(unified_insns_data);
|
@@ -37,6 +37,7 @@
|
|
37
37
|
/* Put the tokens into the symbol table, so that GDB and other debuggers
|
38
38
|
know about them. */
|
39
39
|
enum yytokentype {
|
40
|
+
END_OF_INPUT = 0,
|
40
41
|
keyword_class = 258,
|
41
42
|
keyword_module = 259,
|
42
43
|
keyword_def = 260,
|
@@ -95,66 +96,64 @@
|
|
95
96
|
tLABEL = 313,
|
96
97
|
tINTEGER = 314,
|
97
98
|
tFLOAT = 315,
|
98
|
-
|
99
|
-
|
100
|
-
|
101
|
-
|
102
|
-
|
103
|
-
|
104
|
-
|
105
|
-
|
106
|
-
|
107
|
-
|
108
|
-
|
109
|
-
|
110
|
-
|
111
|
-
|
112
|
-
|
113
|
-
|
114
|
-
|
115
|
-
|
116
|
-
|
117
|
-
|
118
|
-
|
119
|
-
|
120
|
-
|
121
|
-
|
122
|
-
|
123
|
-
|
124
|
-
|
125
|
-
|
126
|
-
|
127
|
-
|
128
|
-
|
129
|
-
|
130
|
-
|
131
|
-
|
132
|
-
|
133
|
-
|
134
|
-
|
135
|
-
|
136
|
-
|
137
|
-
|
138
|
-
|
139
|
-
|
140
|
-
|
141
|
-
|
142
|
-
|
143
|
-
|
144
|
-
|
145
|
-
|
146
|
-
|
147
|
-
|
148
|
-
|
149
|
-
|
150
|
-
|
151
|
-
|
152
|
-
|
153
|
-
|
154
|
-
|
155
|
-
|
156
|
-
id_core_set_postexe = 374,
|
157
|
-
tLAST_TOKEN = 375
|
99
|
+
tRATIONAL = 316,
|
100
|
+
tIMAGINARY = 317,
|
101
|
+
tSTRING_CONTENT = 318,
|
102
|
+
tCHAR = 319,
|
103
|
+
tNTH_REF = 320,
|
104
|
+
tBACK_REF = 321,
|
105
|
+
tREGEXP_END = 322,
|
106
|
+
tUPLUS = 130,
|
107
|
+
tUMINUS = 131,
|
108
|
+
tPOW = 132,
|
109
|
+
tCMP = 133,
|
110
|
+
tEQ = 138,
|
111
|
+
tEQQ = 139,
|
112
|
+
tNEQ = 140,
|
113
|
+
tGEQ = 137,
|
114
|
+
tLEQ = 136,
|
115
|
+
tANDOP = 146,
|
116
|
+
tOROP = 147,
|
117
|
+
tMATCH = 141,
|
118
|
+
tNMATCH = 142,
|
119
|
+
tDOT2 = 128,
|
120
|
+
tDOT3 = 129,
|
121
|
+
tAREF = 143,
|
122
|
+
tASET = 144,
|
123
|
+
tLSHFT = 134,
|
124
|
+
tRSHFT = 135,
|
125
|
+
tANDDOT = 148,
|
126
|
+
tCOLON2 = 145,
|
127
|
+
tCOLON3 = 323,
|
128
|
+
tOP_ASGN = 324,
|
129
|
+
tASSOC = 325,
|
130
|
+
tLPAREN = 326,
|
131
|
+
tLPAREN_ARG = 327,
|
132
|
+
tRPAREN = 328,
|
133
|
+
tLBRACK = 329,
|
134
|
+
tLBRACE = 330,
|
135
|
+
tLBRACE_ARG = 331,
|
136
|
+
tSTAR = 332,
|
137
|
+
tDSTAR = 333,
|
138
|
+
tAMPER = 334,
|
139
|
+
tLAMBDA = 335,
|
140
|
+
tSYMBEG = 336,
|
141
|
+
tSTRING_BEG = 337,
|
142
|
+
tXSTRING_BEG = 338,
|
143
|
+
tREGEXP_BEG = 339,
|
144
|
+
tWORDS_BEG = 340,
|
145
|
+
tQWORDS_BEG = 341,
|
146
|
+
tSYMBOLS_BEG = 342,
|
147
|
+
tQSYMBOLS_BEG = 343,
|
148
|
+
tSTRING_DBEG = 344,
|
149
|
+
tSTRING_DEND = 345,
|
150
|
+
tSTRING_DVAR = 346,
|
151
|
+
tSTRING_END = 347,
|
152
|
+
tLAMBEG = 348,
|
153
|
+
tLABEL_END = 349,
|
154
|
+
tLOWEST = 350,
|
155
|
+
tUMINUS_NUM = 351,
|
156
|
+
tLAST_TOKEN = 352
|
158
157
|
};
|
159
158
|
#endif
|
160
159
|
|
@@ -171,6 +170,7 @@ typedef union YYSTYPE
|
|
171
170
|
ID id;
|
172
171
|
int num;
|
173
172
|
const struct vtable *vars;
|
173
|
+
struct rb_strterm_struct *strterm;
|
174
174
|
|
175
175
|
|
176
176
|
|
@@ -183,4 +183,18 @@ typedef union YYSTYPE
|
|
183
183
|
|
184
184
|
|
185
185
|
|
186
|
+
#if ! defined YYLTYPE && ! defined YYLTYPE_IS_DECLARED
|
187
|
+
typedef struct YYLTYPE
|
188
|
+
{
|
189
|
+
int first_line;
|
190
|
+
int first_column;
|
191
|
+
int last_line;
|
192
|
+
int last_column;
|
193
|
+
} YYLTYPE;
|
194
|
+
# define yyltype YYLTYPE /* obsolescent; will be withdrawn */
|
195
|
+
# define YYLTYPE_IS_DECLARED 1
|
196
|
+
# define YYLTYPE_IS_TRIVIAL 1
|
197
|
+
#endif
|
198
|
+
|
199
|
+
|
186
200
|
|
@@ -0,0 +1,43 @@
|
|
1
|
+
#ifndef RUBY_PROBES_HELPER_H
|
2
|
+
#define RUBY_PROBES_HELPER_H
|
3
|
+
|
4
|
+
#include "ruby/ruby.h"
|
5
|
+
#include "probes.h"
|
6
|
+
|
7
|
+
struct ruby_dtrace_method_hook_args {
|
8
|
+
const char *classname;
|
9
|
+
const char *methodname;
|
10
|
+
const char *filename;
|
11
|
+
int line_no;
|
12
|
+
volatile VALUE klass;
|
13
|
+
volatile VALUE name;
|
14
|
+
};
|
15
|
+
|
16
|
+
NOINLINE(int rb_dtrace_setup(rb_execution_context_t *, VALUE, ID, struct ruby_dtrace_method_hook_args *));
|
17
|
+
|
18
|
+
#define RUBY_DTRACE_METHOD_HOOK(name, ec, klazz, id) \
|
19
|
+
do { \
|
20
|
+
if (UNLIKELY(RUBY_DTRACE_##name##_ENABLED())) { \
|
21
|
+
struct ruby_dtrace_method_hook_args args; \
|
22
|
+
if (rb_dtrace_setup(ec, klazz, id, &args)) { \
|
23
|
+
RUBY_DTRACE_##name(args.classname, \
|
24
|
+
args.methodname, \
|
25
|
+
args.filename, \
|
26
|
+
args.line_no); \
|
27
|
+
} \
|
28
|
+
} \
|
29
|
+
} while (0)
|
30
|
+
|
31
|
+
#define RUBY_DTRACE_METHOD_ENTRY_HOOK(ec, klass, id) \
|
32
|
+
RUBY_DTRACE_METHOD_HOOK(METHOD_ENTRY, ec, klass, id)
|
33
|
+
|
34
|
+
#define RUBY_DTRACE_METHOD_RETURN_HOOK(ec, klass, id) \
|
35
|
+
RUBY_DTRACE_METHOD_HOOK(METHOD_RETURN, ec, klass, id)
|
36
|
+
|
37
|
+
#define RUBY_DTRACE_CMETHOD_ENTRY_HOOK(ec, klass, id) \
|
38
|
+
RUBY_DTRACE_METHOD_HOOK(CMETHOD_ENTRY, ec, klass, id)
|
39
|
+
|
40
|
+
#define RUBY_DTRACE_CMETHOD_RETURN_HOOK(ec, klass, id) \
|
41
|
+
RUBY_DTRACE_METHOD_HOOK(CMETHOD_RETURN, ec, klass, id)
|
42
|
+
|
43
|
+
#endif /* RUBY_PROBES_HELPER_H */
|
@@ -0,0 +1,254 @@
|
|
1
|
+
#ifndef ONIGMO_REGENC_H
|
2
|
+
#define ONIGMO_REGENC_H
|
3
|
+
/**********************************************************************
|
4
|
+
regenc.h - Onigmo (Oniguruma-mod) (regular expression library)
|
5
|
+
**********************************************************************/
|
6
|
+
/*-
|
7
|
+
* Copyright (c) 2002-2008 K.Kosako <sndgk393 AT ybb DOT ne DOT jp>
|
8
|
+
* Copyright (c) 2011-2016 K.Takata <kentkt AT csc DOT jp>
|
9
|
+
* All rights reserved.
|
10
|
+
*
|
11
|
+
* Redistribution and use in source and binary forms, with or without
|
12
|
+
* modification, are permitted provided that the following conditions
|
13
|
+
* are met:
|
14
|
+
* 1. Redistributions of source code must retain the above copyright
|
15
|
+
* notice, this list of conditions and the following disclaimer.
|
16
|
+
* 2. Redistributions in binary form must reproduce the above copyright
|
17
|
+
* notice, this list of conditions and the following disclaimer in the
|
18
|
+
* documentation and/or other materials provided with the distribution.
|
19
|
+
*
|
20
|
+
* THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND CONTRIBUTORS ``AS IS'' AND
|
21
|
+
* ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
|
22
|
+
* IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
|
23
|
+
* ARE DISCLAIMED. IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE
|
24
|
+
* FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
|
25
|
+
* DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
|
26
|
+
* OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
|
27
|
+
* HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
|
28
|
+
* LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
|
29
|
+
* OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
|
30
|
+
* SUCH DAMAGE.
|
31
|
+
*/
|
32
|
+
|
33
|
+
#if !defined(RUBY) && (defined(RUBY_EXPORT) || defined(ONIG_ENC_REGISTER))
|
34
|
+
# define RUBY
|
35
|
+
#endif
|
36
|
+
#ifdef RUBY
|
37
|
+
# ifndef ONIGMO_REGINT_H
|
38
|
+
# ifndef RUBY_EXTERN
|
39
|
+
# include "ruby/config.h"
|
40
|
+
# include "ruby/defines.h"
|
41
|
+
# endif
|
42
|
+
# endif
|
43
|
+
#else /* RUBY */
|
44
|
+
# ifndef PACKAGE
|
45
|
+
/* PACKAGE is defined in config.h */
|
46
|
+
# include "config.h"
|
47
|
+
# endif
|
48
|
+
#endif /* RUBY */
|
49
|
+
|
50
|
+
#ifdef ONIG_ESCAPE_UCHAR_COLLISION
|
51
|
+
# undef ONIG_ESCAPE_UCHAR_COLLISION
|
52
|
+
#endif
|
53
|
+
|
54
|
+
#ifdef RUBY
|
55
|
+
# include "ruby/onigmo.h"
|
56
|
+
#else
|
57
|
+
# include "onigmo.h"
|
58
|
+
#endif
|
59
|
+
|
60
|
+
RUBY_SYMBOL_EXPORT_BEGIN
|
61
|
+
|
62
|
+
typedef struct {
|
63
|
+
OnigCodePoint from;
|
64
|
+
OnigCodePoint to;
|
65
|
+
} OnigPairCaseFoldCodes;
|
66
|
+
|
67
|
+
|
68
|
+
#ifndef NULL
|
69
|
+
# define NULL ((void* )0)
|
70
|
+
#endif
|
71
|
+
|
72
|
+
#ifndef TRUE
|
73
|
+
# define TRUE 1
|
74
|
+
#endif
|
75
|
+
|
76
|
+
#ifndef FALSE
|
77
|
+
# define FALSE 0
|
78
|
+
#endif
|
79
|
+
|
80
|
+
#ifndef ARG_UNUSED
|
81
|
+
# if defined(__GNUC__)
|
82
|
+
# define ARG_UNUSED __attribute__ ((unused))
|
83
|
+
# else
|
84
|
+
# define ARG_UNUSED
|
85
|
+
# endif
|
86
|
+
#endif
|
87
|
+
|
88
|
+
#define ONIG_IS_NULL(p) (((void*)(p)) == (void*)0)
|
89
|
+
#define ONIG_IS_NOT_NULL(p) (((void*)(p)) != (void*)0)
|
90
|
+
#define ONIG_CHECK_NULL_RETURN(p) if (ONIG_IS_NULL(p)) return NULL
|
91
|
+
#define ONIG_CHECK_NULL_RETURN_VAL(p,val) if (ONIG_IS_NULL(p)) return (val)
|
92
|
+
|
93
|
+
#define enclen(enc,p,e) ((enc->max_enc_len == enc->min_enc_len) ? enc->min_enc_len : ONIGENC_MBC_ENC_LEN(enc,p,e))
|
94
|
+
|
95
|
+
/* character types bit flag */
|
96
|
+
#define BIT_CTYPE_NEWLINE (1<< ONIGENC_CTYPE_NEWLINE)
|
97
|
+
#define BIT_CTYPE_ALPHA (1<< ONIGENC_CTYPE_ALPHA)
|
98
|
+
#define BIT_CTYPE_BLANK (1<< ONIGENC_CTYPE_BLANK)
|
99
|
+
#define BIT_CTYPE_CNTRL (1<< ONIGENC_CTYPE_CNTRL)
|
100
|
+
#define BIT_CTYPE_DIGIT (1<< ONIGENC_CTYPE_DIGIT)
|
101
|
+
#define BIT_CTYPE_GRAPH (1<< ONIGENC_CTYPE_GRAPH)
|
102
|
+
#define BIT_CTYPE_LOWER (1<< ONIGENC_CTYPE_LOWER)
|
103
|
+
#define BIT_CTYPE_PRINT (1<< ONIGENC_CTYPE_PRINT)
|
104
|
+
#define BIT_CTYPE_PUNCT (1<< ONIGENC_CTYPE_PUNCT)
|
105
|
+
#define BIT_CTYPE_SPACE (1<< ONIGENC_CTYPE_SPACE)
|
106
|
+
#define BIT_CTYPE_UPPER (1<< ONIGENC_CTYPE_UPPER)
|
107
|
+
#define BIT_CTYPE_XDIGIT (1<< ONIGENC_CTYPE_XDIGIT)
|
108
|
+
#define BIT_CTYPE_WORD (1<< ONIGENC_CTYPE_WORD)
|
109
|
+
#define BIT_CTYPE_ALNUM (1<< ONIGENC_CTYPE_ALNUM)
|
110
|
+
#define BIT_CTYPE_ASCII (1<< ONIGENC_CTYPE_ASCII)
|
111
|
+
|
112
|
+
#define CTYPE_TO_BIT(ctype) (1<<(ctype))
|
113
|
+
#define CTYPE_IS_WORD_GRAPH_PRINT(ctype) \
|
114
|
+
((ctype) == ONIGENC_CTYPE_WORD || (ctype) == ONIGENC_CTYPE_GRAPH ||\
|
115
|
+
(ctype) == ONIGENC_CTYPE_PRINT)
|
116
|
+
|
117
|
+
|
118
|
+
typedef struct {
|
119
|
+
short int len;
|
120
|
+
const UChar name[6];
|
121
|
+
int ctype;
|
122
|
+
} PosixBracketEntryType;
|
123
|
+
|
124
|
+
#define POSIX_BRACKET_ENTRY_INIT(name, ctype) \
|
125
|
+
{(short int )(sizeof(name) - 1), (name), (ctype)}
|
126
|
+
|
127
|
+
#ifndef numberof
|
128
|
+
# define numberof(array) (int )(sizeof(array) / sizeof((array)[0]))
|
129
|
+
#endif
|
130
|
+
|
131
|
+
|
132
|
+
#define USE_CRNL_AS_LINE_TERMINATOR
|
133
|
+
#define USE_UNICODE_PROPERTIES
|
134
|
+
#define USE_UNICODE_AGE_PROPERTIES
|
135
|
+
/* #define USE_UNICODE_CASE_FOLD_TURKISH_AZERI */
|
136
|
+
/* #define USE_UNICODE_ALL_LINE_TERMINATORS */ /* see Unicode.org UTS #18 */
|
137
|
+
|
138
|
+
|
139
|
+
#define ONIG_ENCODING_INIT_DEFAULT ONIG_ENCODING_ASCII
|
140
|
+
|
141
|
+
/* for encoding system implementation (internal) */
|
142
|
+
ONIG_EXTERN int onigenc_ascii_apply_all_case_fold(OnigCaseFoldType flag, OnigApplyAllCaseFoldFunc f, void* arg, OnigEncoding enc);
|
143
|
+
ONIG_EXTERN int onigenc_ascii_get_case_fold_codes_by_str(OnigCaseFoldType flag, const OnigUChar* p, const OnigUChar* end, OnigCaseFoldCodeItem items[], OnigEncoding enc);
|
144
|
+
ONIG_EXTERN int onigenc_apply_all_case_fold_with_map(int map_size, const OnigPairCaseFoldCodes map[], int ess_tsett_flag, OnigCaseFoldType flag, OnigApplyAllCaseFoldFunc f, void* arg);
|
145
|
+
ONIG_EXTERN int onigenc_get_case_fold_codes_by_str_with_map(int map_size, const OnigPairCaseFoldCodes map[], int ess_tsett_flag, OnigCaseFoldType flag, const OnigUChar* p, const OnigUChar* end, OnigCaseFoldCodeItem items[]);
|
146
|
+
ONIG_EXTERN int onigenc_not_support_get_ctype_code_range(OnigCtype ctype, OnigCodePoint* sb_out, const OnigCodePoint* ranges[], OnigEncoding enc);
|
147
|
+
ONIG_EXTERN int onigenc_is_mbc_newline_0x0a(const UChar* p, const UChar* end, OnigEncoding enc);
|
148
|
+
ONIG_EXTERN int onigenc_single_byte_ascii_only_case_map(OnigCaseFoldType* flagP, const OnigUChar** pp, const OnigUChar* end, OnigUChar* to, OnigUChar* to_end, const struct OnigEncodingTypeST* enc);
|
149
|
+
|
150
|
+
|
151
|
+
/* methods for single byte encoding */
|
152
|
+
ONIG_EXTERN int onigenc_ascii_mbc_case_fold(OnigCaseFoldType flag, const UChar** p, const UChar* end, UChar* lower, OnigEncoding enc);
|
153
|
+
ONIG_EXTERN int onigenc_single_byte_mbc_enc_len(const UChar* p, const UChar* e, OnigEncoding enc);
|
154
|
+
ONIG_EXTERN OnigCodePoint onigenc_single_byte_mbc_to_code(const UChar* p, const UChar* end, OnigEncoding enc);
|
155
|
+
ONIG_EXTERN int onigenc_single_byte_code_to_mbclen(OnigCodePoint code, OnigEncoding enc);
|
156
|
+
ONIG_EXTERN int onigenc_single_byte_code_to_mbc(OnigCodePoint code, UChar *buf, OnigEncoding enc);
|
157
|
+
ONIG_EXTERN UChar* onigenc_single_byte_left_adjust_char_head(const UChar* start, const UChar* s, const OnigUChar* end, OnigEncoding enc);
|
158
|
+
ONIG_EXTERN int onigenc_always_true_is_allowed_reverse_match(const UChar* s, const UChar* end, OnigEncoding enc);
|
159
|
+
ONIG_EXTERN int onigenc_always_false_is_allowed_reverse_match(const UChar* s, const UChar* end, OnigEncoding enc);
|
160
|
+
ONIG_EXTERN int onigenc_ascii_is_code_ctype(OnigCodePoint code, unsigned int ctype, OnigEncoding enc);
|
161
|
+
|
162
|
+
/* methods for multi byte encoding */
|
163
|
+
ONIG_EXTERN OnigCodePoint onigenc_mbn_mbc_to_code(OnigEncoding enc, const UChar* p, const UChar* end);
|
164
|
+
ONIG_EXTERN int onigenc_mbn_mbc_case_fold(OnigEncoding enc, OnigCaseFoldType flag, const UChar** p, const UChar* end, UChar* lower);
|
165
|
+
ONIG_EXTERN int onigenc_mb2_code_to_mbclen(OnigCodePoint code, OnigEncoding enc);
|
166
|
+
ONIG_EXTERN int onigenc_mb2_code_to_mbc(OnigEncoding enc, OnigCodePoint code, UChar *buf);
|
167
|
+
ONIG_EXTERN int onigenc_minimum_property_name_to_ctype(OnigEncoding enc, const UChar* p, const UChar* end);
|
168
|
+
ONIG_EXTERN int onigenc_unicode_property_name_to_ctype(OnigEncoding enc, const UChar* p, const UChar* end);
|
169
|
+
ONIG_EXTERN int onigenc_mb2_is_code_ctype(OnigEncoding enc, OnigCodePoint code, unsigned int ctype);
|
170
|
+
ONIG_EXTERN int onigenc_mb4_code_to_mbclen(OnigCodePoint code, OnigEncoding enc);
|
171
|
+
ONIG_EXTERN int onigenc_mb4_code_to_mbc(OnigEncoding enc, OnigCodePoint code, UChar *buf);
|
172
|
+
ONIG_EXTERN int onigenc_mb4_is_code_ctype(OnigEncoding enc, OnigCodePoint code, unsigned int ctype);
|
173
|
+
|
174
|
+
ONIG_EXTERN int onigenc_unicode_case_map(OnigCaseFoldType* flagP, const OnigUChar** pp, const OnigUChar* end, OnigUChar* to, OnigUChar* to_end, const struct OnigEncodingTypeST* enc);
|
175
|
+
|
176
|
+
|
177
|
+
/* in enc/unicode.c */
|
178
|
+
ONIG_EXTERN int onigenc_unicode_is_code_ctype(OnigCodePoint code, unsigned int ctype, OnigEncoding enc);
|
179
|
+
ONIG_EXTERN int onigenc_utf16_32_get_ctype_code_range(OnigCtype ctype, OnigCodePoint *sb_out, const OnigCodePoint* ranges[], OnigEncoding enc);
|
180
|
+
ONIG_EXTERN int onigenc_unicode_ctype_code_range(int ctype, const OnigCodePoint* ranges[]);
|
181
|
+
ONIG_EXTERN int onigenc_unicode_get_case_fold_codes_by_str(OnigEncoding enc, OnigCaseFoldType flag, const OnigUChar* p, const OnigUChar* end, OnigCaseFoldCodeItem items[]);
|
182
|
+
ONIG_EXTERN int onigenc_unicode_mbc_case_fold(OnigEncoding enc, OnigCaseFoldType flag, const UChar** pp, const UChar* end, UChar* fold);
|
183
|
+
ONIG_EXTERN int onigenc_unicode_apply_all_case_fold(OnigCaseFoldType flag, OnigApplyAllCaseFoldFunc f, void* arg, OnigEncoding enc);
|
184
|
+
|
185
|
+
|
186
|
+
#define UTF16_IS_SURROGATE_FIRST(c) (((c) & 0xfc) == 0xd8)
|
187
|
+
#define UTF16_IS_SURROGATE_SECOND(c) (((c) & 0xfc) == 0xdc)
|
188
|
+
#define UTF16_IS_SURROGATE(c) (((c) & 0xf8) == 0xd8)
|
189
|
+
#define UNICODE_VALID_CODEPOINT_P(c) ( \
|
190
|
+
((c) <= 0x10ffff) && \
|
191
|
+
!((c) < 0x10000 && UTF16_IS_SURROGATE((c) >> 8)))
|
192
|
+
|
193
|
+
#define ONIGENC_ISO_8859_1_TO_LOWER_CASE(c) \
|
194
|
+
OnigEncISO_8859_1_ToLowerCaseTable[c]
|
195
|
+
#define ONIGENC_ISO_8859_1_TO_UPPER_CASE(c) \
|
196
|
+
OnigEncISO_8859_1_ToUpperCaseTable[c]
|
197
|
+
|
198
|
+
ONIG_EXTERN const UChar OnigEncISO_8859_1_ToLowerCaseTable[];
|
199
|
+
ONIG_EXTERN const UChar OnigEncISO_8859_1_ToUpperCaseTable[];
|
200
|
+
|
201
|
+
ONIG_EXTERN int
|
202
|
+
onigenc_with_ascii_strncmp(OnigEncoding enc, const UChar* p, const UChar* end, const UChar* sascii /* ascii */, int n);
|
203
|
+
ONIG_EXTERN int
|
204
|
+
onigenc_with_ascii_strnicmp(OnigEncoding enc, const UChar* p, const UChar* end, const UChar* sascii /* ascii */, int n);
|
205
|
+
ONIG_EXTERN UChar*
|
206
|
+
onigenc_step(OnigEncoding enc, const UChar* p, const UChar* end, int n);
|
207
|
+
|
208
|
+
/* defined in regexec.c, but used in enc/xxx.c */
|
209
|
+
extern int onig_is_in_code_range(const UChar* p, OnigCodePoint code);
|
210
|
+
|
211
|
+
ONIG_EXTERN OnigEncoding OnigEncDefaultCharEncoding;
|
212
|
+
ONIG_EXTERN const UChar OnigEncAsciiToLowerCaseTable[];
|
213
|
+
ONIG_EXTERN const UChar OnigEncAsciiToUpperCaseTable[];
|
214
|
+
ONIG_EXTERN const unsigned short OnigEncAsciiCtypeTable[];
|
215
|
+
|
216
|
+
#define ONIGENC_IS_ASCII_CODE(code) ((code) < 0x80)
|
217
|
+
#define ONIGENC_ASCII_CODE_TO_LOWER_CASE(c) OnigEncAsciiToLowerCaseTable[c]
|
218
|
+
#define ONIGENC_ASCII_CODE_TO_UPPER_CASE(c) OnigEncAsciiToUpperCaseTable[c]
|
219
|
+
#define ONIGENC_IS_ASCII_CODE_CTYPE(code,ctype) \
|
220
|
+
((OnigEncAsciiCtypeTable[code] & CTYPE_TO_BIT(ctype)) != 0)
|
221
|
+
#define ONIGENC_IS_ASCII_CODE_CASE_AMBIG(code) \
|
222
|
+
(ONIGENC_IS_ASCII_CODE_CTYPE(code, ONIGENC_CTYPE_UPPER) ||\
|
223
|
+
ONIGENC_IS_ASCII_CODE_CTYPE(code, ONIGENC_CTYPE_LOWER))
|
224
|
+
|
225
|
+
/* Check if the code is in the range. (from <= code && code <= to) */
|
226
|
+
#define ONIGENC_IS_IN_RANGE(code, from, to) \
|
227
|
+
((OnigCodePoint )((code) - (from)) <= (OnigCodePoint )((to) - (from)))
|
228
|
+
|
229
|
+
|
230
|
+
#ifdef ONIG_ENC_REGISTER
|
231
|
+
extern int ONIG_ENC_REGISTER(const char *, OnigEncoding);
|
232
|
+
# define OnigEncodingName(n) encoding_##n
|
233
|
+
# define OnigEncodingDeclare(n) static const OnigEncodingType OnigEncodingName(n)
|
234
|
+
# define OnigEncodingDefine(f,n) \
|
235
|
+
OnigEncodingDeclare(n); \
|
236
|
+
void Init_##f(void) { \
|
237
|
+
ONIG_ENC_REGISTER(OnigEncodingName(n).name, \
|
238
|
+
&OnigEncodingName(n)); \
|
239
|
+
} \
|
240
|
+
OnigEncodingDeclare(n)
|
241
|
+
#else
|
242
|
+
# define OnigEncodingName(n) OnigEncoding##n
|
243
|
+
# define OnigEncodingDeclare(n) const OnigEncodingType OnigEncodingName(n)
|
244
|
+
# define OnigEncodingDefine(f,n) OnigEncodingDeclare(n)
|
245
|
+
#endif
|
246
|
+
|
247
|
+
/* macros for define replica encoding and encoding alias */
|
248
|
+
#define ENC_REPLICATE(name, orig)
|
249
|
+
#define ENC_ALIAS(name, orig)
|
250
|
+
#define ENC_DUMMY(name)
|
251
|
+
|
252
|
+
RUBY_SYMBOL_EXPORT_END
|
253
|
+
|
254
|
+
#endif /* ONIGMO_REGENC_H */
|