line |
stmt |
bran |
cond |
sub |
pod |
time |
code |
1
|
|
|
|
|
|
|
# |
2
|
|
|
|
|
|
|
# Autogenerated by Thrift |
3
|
|
|
|
|
|
|
# |
4
|
|
|
|
|
|
|
# DO NOT EDIT UNLESS YOU ARE SURE THAT YOU KNOW WHAT YOU ARE DOING |
5
|
|
|
|
|
|
|
# |
6
|
|
|
|
|
|
|
require 5.6.0; |
7
|
1
|
|
|
1
|
|
8
|
use strict; |
|
1
|
|
|
|
|
2
|
|
|
1
|
|
|
|
|
47
|
|
8
|
1
|
|
|
1
|
|
7
|
use warnings; |
|
1
|
|
|
|
|
2
|
|
|
1
|
|
|
|
|
35
|
|
9
|
1
|
|
|
1
|
|
917
|
use Thrift; |
|
1
|
|
|
|
|
2477
|
|
|
1
|
|
|
|
|
27
|
|
10
|
|
|
|
|
|
|
|
11
|
1
|
|
|
1
|
|
1026
|
use Cassandra::Types; |
|
1
|
|
|
|
|
4
|
|
|
1
|
|
|
|
|
53
|
|
12
|
|
|
|
|
|
|
|
13
|
|
|
|
|
|
|
# HELPER FUNCTIONS AND STRUCTURES |
14
|
|
|
|
|
|
|
|
15
|
|
|
|
|
|
|
package Cassandra::Cassandra_login_args; |
16
|
|
|
|
|
|
|
BEGIN { |
17
|
1
|
|
|
1
|
|
23
|
$Cassandra::Cassandra_login_args::VERSION = '0.4.0'; |
18
|
|
|
|
|
|
|
} |
19
|
1
|
|
|
1
|
|
10
|
use base qw(Class::Accessor); |
|
1
|
|
|
|
|
2
|
|
|
1
|
|
|
|
|
571
|
|
20
|
|
|
|
|
|
|
Cassandra::Cassandra_login_args->mk_accessors( qw( auth_request ) ); |
21
|
|
|
|
|
|
|
|
22
|
|
|
|
|
|
|
sub new { |
23
|
0
|
|
|
0
|
|
|
my $classname = shift; |
24
|
0
|
|
|
|
|
|
my $self = {}; |
25
|
0
|
|
0
|
|
|
|
my $vals = shift || {}; |
26
|
0
|
|
|
|
|
|
$self->{auth_request} = undef; |
27
|
0
|
0
|
|
|
|
|
if (UNIVERSAL::isa($vals,'HASH')) { |
28
|
0
|
0
|
|
|
|
|
if (defined $vals->{auth_request}) { |
29
|
0
|
|
|
|
|
|
$self->{auth_request} = $vals->{auth_request}; |
30
|
|
|
|
|
|
|
} |
31
|
|
|
|
|
|
|
} |
32
|
0
|
|
|
|
|
|
return bless ($self, $classname); |
33
|
|
|
|
|
|
|
} |
34
|
|
|
|
|
|
|
|
35
|
|
|
|
|
|
|
sub getName { |
36
|
0
|
|
|
0
|
|
|
return 'Cassandra_login_args'; |
37
|
|
|
|
|
|
|
} |
38
|
|
|
|
|
|
|
|
39
|
|
|
|
|
|
|
sub read { |
40
|
0
|
|
|
0
|
|
|
my ($self, $input) = @_; |
41
|
0
|
|
|
|
|
|
my $xfer = 0; |
42
|
0
|
|
|
|
|
|
my $fname; |
43
|
0
|
|
|
|
|
|
my $ftype = 0; |
44
|
0
|
|
|
|
|
|
my $fid = 0; |
45
|
0
|
|
|
|
|
|
$xfer += $input->readStructBegin(\$fname); |
46
|
0
|
|
|
|
|
|
while (1) |
47
|
|
|
|
|
|
|
{ |
48
|
0
|
|
|
|
|
|
$xfer += $input->readFieldBegin(\$fname, \$ftype, \$fid); |
49
|
0
|
0
|
|
|
|
|
if ($ftype == TType::STOP) { |
50
|
0
|
|
|
|
|
|
last; |
51
|
|
|
|
|
|
|
} |
52
|
0
|
|
|
|
|
|
SWITCH: for($fid) |
53
|
|
|
|
|
|
|
{ |
54
|
0
|
0
|
|
|
|
|
/^1$/ && do{ if ($ftype == TType::STRUCT) { |
|
0
|
0
|
|
|
|
|
|
55
|
0
|
|
|
|
|
|
$self->{auth_request} = new Cassandra::AuthenticationRequest(); |
56
|
0
|
|
|
|
|
|
$xfer += $self->{auth_request}->read($input); |
57
|
|
|
|
|
|
|
} else { |
58
|
0
|
|
|
|
|
|
$xfer += $input->skip($ftype); |
59
|
|
|
|
|
|
|
} |
60
|
0
|
|
|
|
|
|
last; }; |
61
|
0
|
|
|
|
|
|
$xfer += $input->skip($ftype); |
62
|
|
|
|
|
|
|
} |
63
|
0
|
|
|
|
|
|
$xfer += $input->readFieldEnd(); |
64
|
|
|
|
|
|
|
} |
65
|
0
|
|
|
|
|
|
$xfer += $input->readStructEnd(); |
66
|
0
|
|
|
|
|
|
return $xfer; |
67
|
|
|
|
|
|
|
} |
68
|
|
|
|
|
|
|
|
69
|
|
|
|
|
|
|
sub write { |
70
|
0
|
|
|
0
|
|
|
my ($self, $output) = @_; |
71
|
0
|
|
|
|
|
|
my $xfer = 0; |
72
|
0
|
|
|
|
|
|
$xfer += $output->writeStructBegin('Cassandra_login_args'); |
73
|
0
|
0
|
|
|
|
|
if (defined $self->{auth_request}) { |
74
|
0
|
|
|
|
|
|
$xfer += $output->writeFieldBegin('auth_request', TType::STRUCT, 1); |
75
|
0
|
|
|
|
|
|
$xfer += $self->{auth_request}->write($output); |
76
|
0
|
|
|
|
|
|
$xfer += $output->writeFieldEnd(); |
77
|
|
|
|
|
|
|
} |
78
|
0
|
|
|
|
|
|
$xfer += $output->writeFieldStop(); |
79
|
0
|
|
|
|
|
|
$xfer += $output->writeStructEnd(); |
80
|
0
|
|
|
|
|
|
return $xfer; |
81
|
|
|
|
|
|
|
} |
82
|
|
|
|
|
|
|
|
83
|
|
|
|
|
|
|
package Cassandra::Cassandra_login_result; |
84
|
|
|
|
|
|
|
BEGIN { |
85
|
1
|
|
|
1
|
|
202
|
$Cassandra::Cassandra_login_result::VERSION = '0.4.0'; |
86
|
|
|
|
|
|
|
} |
87
|
1
|
|
|
1
|
|
7
|
use base qw(Class::Accessor); |
|
1
|
|
|
|
|
3
|
|
|
1
|
|
|
|
|
779
|
|
88
|
|
|
|
|
|
|
Cassandra::Cassandra_login_result->mk_accessors( qw( ) ); |
89
|
|
|
|
|
|
|
|
90
|
|
|
|
|
|
|
sub new { |
91
|
0
|
|
|
0
|
|
|
my $classname = shift; |
92
|
0
|
|
|
|
|
|
my $self = {}; |
93
|
0
|
|
0
|
|
|
|
my $vals = shift || {}; |
94
|
0
|
|
|
|
|
|
$self->{authnx} = undef; |
95
|
0
|
|
|
|
|
|
$self->{authzx} = undef; |
96
|
0
|
0
|
|
|
|
|
if (UNIVERSAL::isa($vals,'HASH')) { |
97
|
0
|
0
|
|
|
|
|
if (defined $vals->{authnx}) { |
98
|
0
|
|
|
|
|
|
$self->{authnx} = $vals->{authnx}; |
99
|
|
|
|
|
|
|
} |
100
|
0
|
0
|
|
|
|
|
if (defined $vals->{authzx}) { |
101
|
0
|
|
|
|
|
|
$self->{authzx} = $vals->{authzx}; |
102
|
|
|
|
|
|
|
} |
103
|
|
|
|
|
|
|
} |
104
|
0
|
|
|
|
|
|
return bless ($self, $classname); |
105
|
|
|
|
|
|
|
} |
106
|
|
|
|
|
|
|
|
107
|
|
|
|
|
|
|
sub getName { |
108
|
0
|
|
|
0
|
|
|
return 'Cassandra_login_result'; |
109
|
|
|
|
|
|
|
} |
110
|
|
|
|
|
|
|
|
111
|
|
|
|
|
|
|
sub read { |
112
|
0
|
|
|
0
|
|
|
my ($self, $input) = @_; |
113
|
0
|
|
|
|
|
|
my $xfer = 0; |
114
|
0
|
|
|
|
|
|
my $fname; |
115
|
0
|
|
|
|
|
|
my $ftype = 0; |
116
|
0
|
|
|
|
|
|
my $fid = 0; |
117
|
0
|
|
|
|
|
|
$xfer += $input->readStructBegin(\$fname); |
118
|
0
|
|
|
|
|
|
while (1) |
119
|
|
|
|
|
|
|
{ |
120
|
0
|
|
|
|
|
|
$xfer += $input->readFieldBegin(\$fname, \$ftype, \$fid); |
121
|
0
|
0
|
|
|
|
|
if ($ftype == TType::STOP) { |
122
|
0
|
|
|
|
|
|
last; |
123
|
|
|
|
|
|
|
} |
124
|
0
|
|
|
|
|
|
SWITCH: for($fid) |
125
|
|
|
|
|
|
|
{ |
126
|
0
|
0
|
|
|
|
|
/^1$/ && do{ if ($ftype == TType::STRUCT) { |
|
0
|
0
|
|
|
|
|
|
127
|
0
|
|
|
|
|
|
$self->{authnx} = new Cassandra::AuthenticationException(); |
128
|
0
|
|
|
|
|
|
$xfer += $self->{authnx}->read($input); |
129
|
|
|
|
|
|
|
} else { |
130
|
0
|
|
|
|
|
|
$xfer += $input->skip($ftype); |
131
|
|
|
|
|
|
|
} |
132
|
0
|
|
|
|
|
|
last; }; |
133
|
0
|
0
|
|
|
|
|
/^2$/ && do{ if ($ftype == TType::STRUCT) { |
|
0
|
0
|
|
|
|
|
|
134
|
0
|
|
|
|
|
|
$self->{authzx} = new Cassandra::AuthorizationException(); |
135
|
0
|
|
|
|
|
|
$xfer += $self->{authzx}->read($input); |
136
|
|
|
|
|
|
|
} else { |
137
|
0
|
|
|
|
|
|
$xfer += $input->skip($ftype); |
138
|
|
|
|
|
|
|
} |
139
|
0
|
|
|
|
|
|
last; }; |
140
|
0
|
|
|
|
|
|
$xfer += $input->skip($ftype); |
141
|
|
|
|
|
|
|
} |
142
|
0
|
|
|
|
|
|
$xfer += $input->readFieldEnd(); |
143
|
|
|
|
|
|
|
} |
144
|
0
|
|
|
|
|
|
$xfer += $input->readStructEnd(); |
145
|
0
|
|
|
|
|
|
return $xfer; |
146
|
|
|
|
|
|
|
} |
147
|
|
|
|
|
|
|
|
148
|
|
|
|
|
|
|
sub write { |
149
|
0
|
|
|
0
|
|
|
my ($self, $output) = @_; |
150
|
0
|
|
|
|
|
|
my $xfer = 0; |
151
|
0
|
|
|
|
|
|
$xfer += $output->writeStructBegin('Cassandra_login_result'); |
152
|
0
|
0
|
|
|
|
|
if (defined $self->{authnx}) { |
153
|
0
|
|
|
|
|
|
$xfer += $output->writeFieldBegin('authnx', TType::STRUCT, 1); |
154
|
0
|
|
|
|
|
|
$xfer += $self->{authnx}->write($output); |
155
|
0
|
|
|
|
|
|
$xfer += $output->writeFieldEnd(); |
156
|
|
|
|
|
|
|
} |
157
|
0
|
0
|
|
|
|
|
if (defined $self->{authzx}) { |
158
|
0
|
|
|
|
|
|
$xfer += $output->writeFieldBegin('authzx', TType::STRUCT, 2); |
159
|
0
|
|
|
|
|
|
$xfer += $self->{authzx}->write($output); |
160
|
0
|
|
|
|
|
|
$xfer += $output->writeFieldEnd(); |
161
|
|
|
|
|
|
|
} |
162
|
0
|
|
|
|
|
|
$xfer += $output->writeFieldStop(); |
163
|
0
|
|
|
|
|
|
$xfer += $output->writeStructEnd(); |
164
|
0
|
|
|
|
|
|
return $xfer; |
165
|
|
|
|
|
|
|
} |
166
|
|
|
|
|
|
|
|
167
|
|
|
|
|
|
|
package Cassandra::Cassandra_set_keyspace_args; |
168
|
|
|
|
|
|
|
BEGIN { |
169
|
1
|
|
|
1
|
|
23
|
$Cassandra::Cassandra_set_keyspace_args::VERSION = '0.4.0'; |
170
|
|
|
|
|
|
|
} |
171
|
1
|
|
|
1
|
|
8
|
use base qw(Class::Accessor); |
|
1
|
|
|
|
|
2
|
|
|
1
|
|
|
|
|
534
|
|
172
|
|
|
|
|
|
|
Cassandra::Cassandra_set_keyspace_args->mk_accessors( qw( keyspace ) ); |
173
|
|
|
|
|
|
|
|
174
|
|
|
|
|
|
|
sub new { |
175
|
0
|
|
|
0
|
|
|
my $classname = shift; |
176
|
0
|
|
|
|
|
|
my $self = {}; |
177
|
0
|
|
0
|
|
|
|
my $vals = shift || {}; |
178
|
0
|
|
|
|
|
|
$self->{keyspace} = undef; |
179
|
0
|
0
|
|
|
|
|
if (UNIVERSAL::isa($vals,'HASH')) { |
180
|
0
|
0
|
|
|
|
|
if (defined $vals->{keyspace}) { |
181
|
0
|
|
|
|
|
|
$self->{keyspace} = $vals->{keyspace}; |
182
|
|
|
|
|
|
|
} |
183
|
|
|
|
|
|
|
} |
184
|
0
|
|
|
|
|
|
return bless ($self, $classname); |
185
|
|
|
|
|
|
|
} |
186
|
|
|
|
|
|
|
|
187
|
|
|
|
|
|
|
sub getName { |
188
|
0
|
|
|
0
|
|
|
return 'Cassandra_set_keyspace_args'; |
189
|
|
|
|
|
|
|
} |
190
|
|
|
|
|
|
|
|
191
|
|
|
|
|
|
|
sub read { |
192
|
0
|
|
|
0
|
|
|
my ($self, $input) = @_; |
193
|
0
|
|
|
|
|
|
my $xfer = 0; |
194
|
0
|
|
|
|
|
|
my $fname; |
195
|
0
|
|
|
|
|
|
my $ftype = 0; |
196
|
0
|
|
|
|
|
|
my $fid = 0; |
197
|
0
|
|
|
|
|
|
$xfer += $input->readStructBegin(\$fname); |
198
|
0
|
|
|
|
|
|
while (1) |
199
|
|
|
|
|
|
|
{ |
200
|
0
|
|
|
|
|
|
$xfer += $input->readFieldBegin(\$fname, \$ftype, \$fid); |
201
|
0
|
0
|
|
|
|
|
if ($ftype == TType::STOP) { |
202
|
0
|
|
|
|
|
|
last; |
203
|
|
|
|
|
|
|
} |
204
|
0
|
|
|
|
|
|
SWITCH: for($fid) |
205
|
|
|
|
|
|
|
{ |
206
|
0
|
0
|
|
|
|
|
/^1$/ && do{ if ($ftype == TType::STRING) { |
|
0
|
0
|
|
|
|
|
|
207
|
0
|
|
|
|
|
|
$xfer += $input->readString(\$self->{keyspace}); |
208
|
|
|
|
|
|
|
} else { |
209
|
0
|
|
|
|
|
|
$xfer += $input->skip($ftype); |
210
|
|
|
|
|
|
|
} |
211
|
0
|
|
|
|
|
|
last; }; |
212
|
0
|
|
|
|
|
|
$xfer += $input->skip($ftype); |
213
|
|
|
|
|
|
|
} |
214
|
0
|
|
|
|
|
|
$xfer += $input->readFieldEnd(); |
215
|
|
|
|
|
|
|
} |
216
|
0
|
|
|
|
|
|
$xfer += $input->readStructEnd(); |
217
|
0
|
|
|
|
|
|
return $xfer; |
218
|
|
|
|
|
|
|
} |
219
|
|
|
|
|
|
|
|
220
|
|
|
|
|
|
|
sub write { |
221
|
0
|
|
|
0
|
|
|
my ($self, $output) = @_; |
222
|
0
|
|
|
|
|
|
my $xfer = 0; |
223
|
0
|
|
|
|
|
|
$xfer += $output->writeStructBegin('Cassandra_set_keyspace_args'); |
224
|
0
|
0
|
|
|
|
|
if (defined $self->{keyspace}) { |
225
|
0
|
|
|
|
|
|
$xfer += $output->writeFieldBegin('keyspace', TType::STRING, 1); |
226
|
0
|
|
|
|
|
|
$xfer += $output->writeString($self->{keyspace}); |
227
|
0
|
|
|
|
|
|
$xfer += $output->writeFieldEnd(); |
228
|
|
|
|
|
|
|
} |
229
|
0
|
|
|
|
|
|
$xfer += $output->writeFieldStop(); |
230
|
0
|
|
|
|
|
|
$xfer += $output->writeStructEnd(); |
231
|
0
|
|
|
|
|
|
return $xfer; |
232
|
|
|
|
|
|
|
} |
233
|
|
|
|
|
|
|
|
234
|
|
|
|
|
|
|
package Cassandra::Cassandra_set_keyspace_result; |
235
|
|
|
|
|
|
|
BEGIN { |
236
|
1
|
|
|
1
|
|
19
|
$Cassandra::Cassandra_set_keyspace_result::VERSION = '0.4.0'; |
237
|
|
|
|
|
|
|
} |
238
|
1
|
|
|
1
|
|
6
|
use base qw(Class::Accessor); |
|
1
|
|
|
|
|
2
|
|
|
1
|
|
|
|
|
499
|
|
239
|
|
|
|
|
|
|
Cassandra::Cassandra_set_keyspace_result->mk_accessors( qw( ) ); |
240
|
|
|
|
|
|
|
|
241
|
|
|
|
|
|
|
sub new { |
242
|
0
|
|
|
0
|
|
|
my $classname = shift; |
243
|
0
|
|
|
|
|
|
my $self = {}; |
244
|
0
|
|
0
|
|
|
|
my $vals = shift || {}; |
245
|
0
|
|
|
|
|
|
$self->{ire} = undef; |
246
|
0
|
0
|
|
|
|
|
if (UNIVERSAL::isa($vals,'HASH')) { |
247
|
0
|
0
|
|
|
|
|
if (defined $vals->{ire}) { |
248
|
0
|
|
|
|
|
|
$self->{ire} = $vals->{ire}; |
249
|
|
|
|
|
|
|
} |
250
|
|
|
|
|
|
|
} |
251
|
0
|
|
|
|
|
|
return bless ($self, $classname); |
252
|
|
|
|
|
|
|
} |
253
|
|
|
|
|
|
|
|
254
|
|
|
|
|
|
|
sub getName { |
255
|
0
|
|
|
0
|
|
|
return 'Cassandra_set_keyspace_result'; |
256
|
|
|
|
|
|
|
} |
257
|
|
|
|
|
|
|
|
258
|
|
|
|
|
|
|
sub read { |
259
|
0
|
|
|
0
|
|
|
my ($self, $input) = @_; |
260
|
0
|
|
|
|
|
|
my $xfer = 0; |
261
|
0
|
|
|
|
|
|
my $fname; |
262
|
0
|
|
|
|
|
|
my $ftype = 0; |
263
|
0
|
|
|
|
|
|
my $fid = 0; |
264
|
0
|
|
|
|
|
|
$xfer += $input->readStructBegin(\$fname); |
265
|
0
|
|
|
|
|
|
while (1) |
266
|
|
|
|
|
|
|
{ |
267
|
0
|
|
|
|
|
|
$xfer += $input->readFieldBegin(\$fname, \$ftype, \$fid); |
268
|
0
|
0
|
|
|
|
|
if ($ftype == TType::STOP) { |
269
|
0
|
|
|
|
|
|
last; |
270
|
|
|
|
|
|
|
} |
271
|
0
|
|
|
|
|
|
SWITCH: for($fid) |
272
|
|
|
|
|
|
|
{ |
273
|
0
|
0
|
|
|
|
|
/^1$/ && do{ if ($ftype == TType::STRUCT) { |
|
0
|
0
|
|
|
|
|
|
274
|
0
|
|
|
|
|
|
$self->{ire} = new Cassandra::InvalidRequestException(); |
275
|
0
|
|
|
|
|
|
$xfer += $self->{ire}->read($input); |
276
|
|
|
|
|
|
|
} else { |
277
|
0
|
|
|
|
|
|
$xfer += $input->skip($ftype); |
278
|
|
|
|
|
|
|
} |
279
|
0
|
|
|
|
|
|
last; }; |
280
|
0
|
|
|
|
|
|
$xfer += $input->skip($ftype); |
281
|
|
|
|
|
|
|
} |
282
|
0
|
|
|
|
|
|
$xfer += $input->readFieldEnd(); |
283
|
|
|
|
|
|
|
} |
284
|
0
|
|
|
|
|
|
$xfer += $input->readStructEnd(); |
285
|
0
|
|
|
|
|
|
return $xfer; |
286
|
|
|
|
|
|
|
} |
287
|
|
|
|
|
|
|
|
288
|
|
|
|
|
|
|
sub write { |
289
|
0
|
|
|
0
|
|
|
my ($self, $output) = @_; |
290
|
0
|
|
|
|
|
|
my $xfer = 0; |
291
|
0
|
|
|
|
|
|
$xfer += $output->writeStructBegin('Cassandra_set_keyspace_result'); |
292
|
0
|
0
|
|
|
|
|
if (defined $self->{ire}) { |
293
|
0
|
|
|
|
|
|
$xfer += $output->writeFieldBegin('ire', TType::STRUCT, 1); |
294
|
0
|
|
|
|
|
|
$xfer += $self->{ire}->write($output); |
295
|
0
|
|
|
|
|
|
$xfer += $output->writeFieldEnd(); |
296
|
|
|
|
|
|
|
} |
297
|
0
|
|
|
|
|
|
$xfer += $output->writeFieldStop(); |
298
|
0
|
|
|
|
|
|
$xfer += $output->writeStructEnd(); |
299
|
0
|
|
|
|
|
|
return $xfer; |
300
|
|
|
|
|
|
|
} |
301
|
|
|
|
|
|
|
|
302
|
|
|
|
|
|
|
package Cassandra::Cassandra_get_args; |
303
|
|
|
|
|
|
|
BEGIN { |
304
|
1
|
|
|
1
|
|
26
|
$Cassandra::Cassandra_get_args::VERSION = '0.4.0'; |
305
|
|
|
|
|
|
|
} |
306
|
1
|
|
|
1
|
|
6
|
use base qw(Class::Accessor); |
|
1
|
|
|
|
|
2
|
|
|
1
|
|
|
|
|
755
|
|
307
|
|
|
|
|
|
|
Cassandra::Cassandra_get_args->mk_accessors( qw( key column_path consistency_level ) ); |
308
|
|
|
|
|
|
|
|
309
|
|
|
|
|
|
|
sub new { |
310
|
0
|
|
|
0
|
|
|
my $classname = shift; |
311
|
0
|
|
|
|
|
|
my $self = {}; |
312
|
0
|
|
0
|
|
|
|
my $vals = shift || {}; |
313
|
0
|
|
|
|
|
|
$self->{key} = undef; |
314
|
0
|
|
|
|
|
|
$self->{column_path} = undef; |
315
|
0
|
|
|
|
|
|
$self->{consistency_level} = 1; |
316
|
0
|
0
|
|
|
|
|
if (UNIVERSAL::isa($vals,'HASH')) { |
317
|
0
|
0
|
|
|
|
|
if (defined $vals->{key}) { |
318
|
0
|
|
|
|
|
|
$self->{key} = $vals->{key}; |
319
|
|
|
|
|
|
|
} |
320
|
0
|
0
|
|
|
|
|
if (defined $vals->{column_path}) { |
321
|
0
|
|
|
|
|
|
$self->{column_path} = $vals->{column_path}; |
322
|
|
|
|
|
|
|
} |
323
|
0
|
0
|
|
|
|
|
if (defined $vals->{consistency_level}) { |
324
|
0
|
|
|
|
|
|
$self->{consistency_level} = $vals->{consistency_level}; |
325
|
|
|
|
|
|
|
} |
326
|
|
|
|
|
|
|
} |
327
|
0
|
|
|
|
|
|
return bless ($self, $classname); |
328
|
|
|
|
|
|
|
} |
329
|
|
|
|
|
|
|
|
330
|
|
|
|
|
|
|
sub getName { |
331
|
0
|
|
|
0
|
|
|
return 'Cassandra_get_args'; |
332
|
|
|
|
|
|
|
} |
333
|
|
|
|
|
|
|
|
334
|
|
|
|
|
|
|
sub read { |
335
|
0
|
|
|
0
|
|
|
my ($self, $input) = @_; |
336
|
0
|
|
|
|
|
|
my $xfer = 0; |
337
|
0
|
|
|
|
|
|
my $fname; |
338
|
0
|
|
|
|
|
|
my $ftype = 0; |
339
|
0
|
|
|
|
|
|
my $fid = 0; |
340
|
0
|
|
|
|
|
|
$xfer += $input->readStructBegin(\$fname); |
341
|
0
|
|
|
|
|
|
while (1) |
342
|
|
|
|
|
|
|
{ |
343
|
0
|
|
|
|
|
|
$xfer += $input->readFieldBegin(\$fname, \$ftype, \$fid); |
344
|
0
|
0
|
|
|
|
|
if ($ftype == TType::STOP) { |
345
|
0
|
|
|
|
|
|
last; |
346
|
|
|
|
|
|
|
} |
347
|
0
|
|
|
|
|
|
SWITCH: for($fid) |
348
|
|
|
|
|
|
|
{ |
349
|
0
|
0
|
|
|
|
|
/^1$/ && do{ if ($ftype == TType::STRING) { |
|
0
|
0
|
|
|
|
|
|
350
|
0
|
|
|
|
|
|
$xfer += $input->readString(\$self->{key}); |
351
|
|
|
|
|
|
|
} else { |
352
|
0
|
|
|
|
|
|
$xfer += $input->skip($ftype); |
353
|
|
|
|
|
|
|
} |
354
|
0
|
|
|
|
|
|
last; }; |
355
|
0
|
0
|
|
|
|
|
/^2$/ && do{ if ($ftype == TType::STRUCT) { |
|
0
|
0
|
|
|
|
|
|
356
|
0
|
|
|
|
|
|
$self->{column_path} = new Cassandra::ColumnPath(); |
357
|
0
|
|
|
|
|
|
$xfer += $self->{column_path}->read($input); |
358
|
|
|
|
|
|
|
} else { |
359
|
0
|
|
|
|
|
|
$xfer += $input->skip($ftype); |
360
|
|
|
|
|
|
|
} |
361
|
0
|
|
|
|
|
|
last; }; |
362
|
0
|
0
|
|
|
|
|
/^3$/ && do{ if ($ftype == TType::I32) { |
|
0
|
0
|
|
|
|
|
|
363
|
0
|
|
|
|
|
|
$xfer += $input->readI32(\$self->{consistency_level}); |
364
|
|
|
|
|
|
|
} else { |
365
|
0
|
|
|
|
|
|
$xfer += $input->skip($ftype); |
366
|
|
|
|
|
|
|
} |
367
|
0
|
|
|
|
|
|
last; }; |
368
|
0
|
|
|
|
|
|
$xfer += $input->skip($ftype); |
369
|
|
|
|
|
|
|
} |
370
|
0
|
|
|
|
|
|
$xfer += $input->readFieldEnd(); |
371
|
|
|
|
|
|
|
} |
372
|
0
|
|
|
|
|
|
$xfer += $input->readStructEnd(); |
373
|
0
|
|
|
|
|
|
return $xfer; |
374
|
|
|
|
|
|
|
} |
375
|
|
|
|
|
|
|
|
376
|
|
|
|
|
|
|
sub write { |
377
|
0
|
|
|
0
|
|
|
my ($self, $output) = @_; |
378
|
0
|
|
|
|
|
|
my $xfer = 0; |
379
|
0
|
|
|
|
|
|
$xfer += $output->writeStructBegin('Cassandra_get_args'); |
380
|
0
|
0
|
|
|
|
|
if (defined $self->{key}) { |
381
|
0
|
|
|
|
|
|
$xfer += $output->writeFieldBegin('key', TType::STRING, 1); |
382
|
0
|
|
|
|
|
|
$xfer += $output->writeString($self->{key}); |
383
|
0
|
|
|
|
|
|
$xfer += $output->writeFieldEnd(); |
384
|
|
|
|
|
|
|
} |
385
|
0
|
0
|
|
|
|
|
if (defined $self->{column_path}) { |
386
|
0
|
|
|
|
|
|
$xfer += $output->writeFieldBegin('column_path', TType::STRUCT, 2); |
387
|
0
|
|
|
|
|
|
$xfer += $self->{column_path}->write($output); |
388
|
0
|
|
|
|
|
|
$xfer += $output->writeFieldEnd(); |
389
|
|
|
|
|
|
|
} |
390
|
0
|
0
|
|
|
|
|
if (defined $self->{consistency_level}) { |
391
|
0
|
|
|
|
|
|
$xfer += $output->writeFieldBegin('consistency_level', TType::I32, 3); |
392
|
0
|
|
|
|
|
|
$xfer += $output->writeI32($self->{consistency_level}); |
393
|
0
|
|
|
|
|
|
$xfer += $output->writeFieldEnd(); |
394
|
|
|
|
|
|
|
} |
395
|
0
|
|
|
|
|
|
$xfer += $output->writeFieldStop(); |
396
|
0
|
|
|
|
|
|
$xfer += $output->writeStructEnd(); |
397
|
0
|
|
|
|
|
|
return $xfer; |
398
|
|
|
|
|
|
|
} |
399
|
|
|
|
|
|
|
|
400
|
|
|
|
|
|
|
package Cassandra::Cassandra_get_result; |
401
|
|
|
|
|
|
|
BEGIN { |
402
|
1
|
|
|
1
|
|
19
|
$Cassandra::Cassandra_get_result::VERSION = '0.4.0'; |
403
|
|
|
|
|
|
|
} |
404
|
1
|
|
|
1
|
|
7
|
use base qw(Class::Accessor); |
|
1
|
|
|
|
|
2
|
|
|
1
|
|
|
|
|
1386
|
|
405
|
|
|
|
|
|
|
Cassandra::Cassandra_get_result->mk_accessors( qw( success ) ); |
406
|
|
|
|
|
|
|
|
407
|
|
|
|
|
|
|
sub new { |
408
|
0
|
|
|
0
|
|
|
my $classname = shift; |
409
|
0
|
|
|
|
|
|
my $self = {}; |
410
|
0
|
|
0
|
|
|
|
my $vals = shift || {}; |
411
|
0
|
|
|
|
|
|
$self->{success} = undef; |
412
|
0
|
|
|
|
|
|
$self->{ire} = undef; |
413
|
0
|
|
|
|
|
|
$self->{nfe} = undef; |
414
|
0
|
|
|
|
|
|
$self->{ue} = undef; |
415
|
0
|
|
|
|
|
|
$self->{te} = undef; |
416
|
0
|
0
|
|
|
|
|
if (UNIVERSAL::isa($vals,'HASH')) { |
417
|
0
|
0
|
|
|
|
|
if (defined $vals->{success}) { |
418
|
0
|
|
|
|
|
|
$self->{success} = $vals->{success}; |
419
|
|
|
|
|
|
|
} |
420
|
0
|
0
|
|
|
|
|
if (defined $vals->{ire}) { |
421
|
0
|
|
|
|
|
|
$self->{ire} = $vals->{ire}; |
422
|
|
|
|
|
|
|
} |
423
|
0
|
0
|
|
|
|
|
if (defined $vals->{nfe}) { |
424
|
0
|
|
|
|
|
|
$self->{nfe} = $vals->{nfe}; |
425
|
|
|
|
|
|
|
} |
426
|
0
|
0
|
|
|
|
|
if (defined $vals->{ue}) { |
427
|
0
|
|
|
|
|
|
$self->{ue} = $vals->{ue}; |
428
|
|
|
|
|
|
|
} |
429
|
0
|
0
|
|
|
|
|
if (defined $vals->{te}) { |
430
|
0
|
|
|
|
|
|
$self->{te} = $vals->{te}; |
431
|
|
|
|
|
|
|
} |
432
|
|
|
|
|
|
|
} |
433
|
0
|
|
|
|
|
|
return bless ($self, $classname); |
434
|
|
|
|
|
|
|
} |
435
|
|
|
|
|
|
|
|
436
|
|
|
|
|
|
|
sub getName { |
437
|
0
|
|
|
0
|
|
|
return 'Cassandra_get_result'; |
438
|
|
|
|
|
|
|
} |
439
|
|
|
|
|
|
|
|
440
|
|
|
|
|
|
|
sub read { |
441
|
0
|
|
|
0
|
|
|
my ($self, $input) = @_; |
442
|
0
|
|
|
|
|
|
my $xfer = 0; |
443
|
0
|
|
|
|
|
|
my $fname; |
444
|
0
|
|
|
|
|
|
my $ftype = 0; |
445
|
0
|
|
|
|
|
|
my $fid = 0; |
446
|
0
|
|
|
|
|
|
$xfer += $input->readStructBegin(\$fname); |
447
|
0
|
|
|
|
|
|
while (1) |
448
|
|
|
|
|
|
|
{ |
449
|
0
|
|
|
|
|
|
$xfer += $input->readFieldBegin(\$fname, \$ftype, \$fid); |
450
|
0
|
0
|
|
|
|
|
if ($ftype == TType::STOP) { |
451
|
0
|
|
|
|
|
|
last; |
452
|
|
|
|
|
|
|
} |
453
|
0
|
|
|
|
|
|
SWITCH: for($fid) |
454
|
|
|
|
|
|
|
{ |
455
|
0
|
0
|
|
|
|
|
/^0$/ && do{ if ($ftype == TType::STRUCT) { |
|
0
|
0
|
|
|
|
|
|
456
|
0
|
|
|
|
|
|
$self->{success} = new Cassandra::ColumnOrSuperColumn(); |
457
|
0
|
|
|
|
|
|
$xfer += $self->{success}->read($input); |
458
|
|
|
|
|
|
|
} else { |
459
|
0
|
|
|
|
|
|
$xfer += $input->skip($ftype); |
460
|
|
|
|
|
|
|
} |
461
|
0
|
|
|
|
|
|
last; }; |
462
|
0
|
0
|
|
|
|
|
/^1$/ && do{ if ($ftype == TType::STRUCT) { |
|
0
|
0
|
|
|
|
|
|
463
|
0
|
|
|
|
|
|
$self->{ire} = new Cassandra::InvalidRequestException(); |
464
|
0
|
|
|
|
|
|
$xfer += $self->{ire}->read($input); |
465
|
|
|
|
|
|
|
} else { |
466
|
0
|
|
|
|
|
|
$xfer += $input->skip($ftype); |
467
|
|
|
|
|
|
|
} |
468
|
0
|
|
|
|
|
|
last; }; |
469
|
0
|
0
|
|
|
|
|
/^2$/ && do{ if ($ftype == TType::STRUCT) { |
|
0
|
0
|
|
|
|
|
|
470
|
0
|
|
|
|
|
|
$self->{nfe} = new Cassandra::NotFoundException(); |
471
|
0
|
|
|
|
|
|
$xfer += $self->{nfe}->read($input); |
472
|
|
|
|
|
|
|
} else { |
473
|
0
|
|
|
|
|
|
$xfer += $input->skip($ftype); |
474
|
|
|
|
|
|
|
} |
475
|
0
|
|
|
|
|
|
last; }; |
476
|
0
|
0
|
|
|
|
|
/^3$/ && do{ if ($ftype == TType::STRUCT) { |
|
0
|
0
|
|
|
|
|
|
477
|
0
|
|
|
|
|
|
$self->{ue} = new Cassandra::UnavailableException(); |
478
|
0
|
|
|
|
|
|
$xfer += $self->{ue}->read($input); |
479
|
|
|
|
|
|
|
} else { |
480
|
0
|
|
|
|
|
|
$xfer += $input->skip($ftype); |
481
|
|
|
|
|
|
|
} |
482
|
0
|
|
|
|
|
|
last; }; |
483
|
0
|
0
|
|
|
|
|
/^4$/ && do{ if ($ftype == TType::STRUCT) { |
|
0
|
0
|
|
|
|
|
|
484
|
0
|
|
|
|
|
|
$self->{te} = new Cassandra::TimedOutException(); |
485
|
0
|
|
|
|
|
|
$xfer += $self->{te}->read($input); |
486
|
|
|
|
|
|
|
} else { |
487
|
0
|
|
|
|
|
|
$xfer += $input->skip($ftype); |
488
|
|
|
|
|
|
|
} |
489
|
0
|
|
|
|
|
|
last; }; |
490
|
0
|
|
|
|
|
|
$xfer += $input->skip($ftype); |
491
|
|
|
|
|
|
|
} |
492
|
0
|
|
|
|
|
|
$xfer += $input->readFieldEnd(); |
493
|
|
|
|
|
|
|
} |
494
|
0
|
|
|
|
|
|
$xfer += $input->readStructEnd(); |
495
|
0
|
|
|
|
|
|
return $xfer; |
496
|
|
|
|
|
|
|
} |
497
|
|
|
|
|
|
|
|
498
|
|
|
|
|
|
|
sub write { |
499
|
0
|
|
|
0
|
|
|
my ($self, $output) = @_; |
500
|
0
|
|
|
|
|
|
my $xfer = 0; |
501
|
0
|
|
|
|
|
|
$xfer += $output->writeStructBegin('Cassandra_get_result'); |
502
|
0
|
0
|
|
|
|
|
if (defined $self->{success}) { |
503
|
0
|
|
|
|
|
|
$xfer += $output->writeFieldBegin('success', TType::STRUCT, 0); |
504
|
0
|
|
|
|
|
|
$xfer += $self->{success}->write($output); |
505
|
0
|
|
|
|
|
|
$xfer += $output->writeFieldEnd(); |
506
|
|
|
|
|
|
|
} |
507
|
0
|
0
|
|
|
|
|
if (defined $self->{ire}) { |
508
|
0
|
|
|
|
|
|
$xfer += $output->writeFieldBegin('ire', TType::STRUCT, 1); |
509
|
0
|
|
|
|
|
|
$xfer += $self->{ire}->write($output); |
510
|
0
|
|
|
|
|
|
$xfer += $output->writeFieldEnd(); |
511
|
|
|
|
|
|
|
} |
512
|
0
|
0
|
|
|
|
|
if (defined $self->{nfe}) { |
513
|
0
|
|
|
|
|
|
$xfer += $output->writeFieldBegin('nfe', TType::STRUCT, 2); |
514
|
0
|
|
|
|
|
|
$xfer += $self->{nfe}->write($output); |
515
|
0
|
|
|
|
|
|
$xfer += $output->writeFieldEnd(); |
516
|
|
|
|
|
|
|
} |
517
|
0
|
0
|
|
|
|
|
if (defined $self->{ue}) { |
518
|
0
|
|
|
|
|
|
$xfer += $output->writeFieldBegin('ue', TType::STRUCT, 3); |
519
|
0
|
|
|
|
|
|
$xfer += $self->{ue}->write($output); |
520
|
0
|
|
|
|
|
|
$xfer += $output->writeFieldEnd(); |
521
|
|
|
|
|
|
|
} |
522
|
0
|
0
|
|
|
|
|
if (defined $self->{te}) { |
523
|
0
|
|
|
|
|
|
$xfer += $output->writeFieldBegin('te', TType::STRUCT, 4); |
524
|
0
|
|
|
|
|
|
$xfer += $self->{te}->write($output); |
525
|
0
|
|
|
|
|
|
$xfer += $output->writeFieldEnd(); |
526
|
|
|
|
|
|
|
} |
527
|
0
|
|
|
|
|
|
$xfer += $output->writeFieldStop(); |
528
|
0
|
|
|
|
|
|
$xfer += $output->writeStructEnd(); |
529
|
0
|
|
|
|
|
|
return $xfer; |
530
|
|
|
|
|
|
|
} |
531
|
|
|
|
|
|
|
|
532
|
|
|
|
|
|
|
package Cassandra::Cassandra_get_slice_args; |
533
|
|
|
|
|
|
|
BEGIN { |
534
|
1
|
|
|
1
|
|
33
|
$Cassandra::Cassandra_get_slice_args::VERSION = '0.4.0'; |
535
|
|
|
|
|
|
|
} |
536
|
1
|
|
|
1
|
|
7
|
use base qw(Class::Accessor); |
|
1
|
|
|
|
|
2
|
|
|
1
|
|
|
|
|
916
|
|
537
|
|
|
|
|
|
|
Cassandra::Cassandra_get_slice_args->mk_accessors( qw( key column_parent predicate consistency_level ) ); |
538
|
|
|
|
|
|
|
|
539
|
|
|
|
|
|
|
sub new { |
540
|
0
|
|
|
0
|
|
|
my $classname = shift; |
541
|
0
|
|
|
|
|
|
my $self = {}; |
542
|
0
|
|
0
|
|
|
|
my $vals = shift || {}; |
543
|
0
|
|
|
|
|
|
$self->{key} = undef; |
544
|
0
|
|
|
|
|
|
$self->{column_parent} = undef; |
545
|
0
|
|
|
|
|
|
$self->{predicate} = undef; |
546
|
0
|
|
|
|
|
|
$self->{consistency_level} = 1; |
547
|
0
|
0
|
|
|
|
|
if (UNIVERSAL::isa($vals,'HASH')) { |
548
|
0
|
0
|
|
|
|
|
if (defined $vals->{key}) { |
549
|
0
|
|
|
|
|
|
$self->{key} = $vals->{key}; |
550
|
|
|
|
|
|
|
} |
551
|
0
|
0
|
|
|
|
|
if (defined $vals->{column_parent}) { |
552
|
0
|
|
|
|
|
|
$self->{column_parent} = $vals->{column_parent}; |
553
|
|
|
|
|
|
|
} |
554
|
0
|
0
|
|
|
|
|
if (defined $vals->{predicate}) { |
555
|
0
|
|
|
|
|
|
$self->{predicate} = $vals->{predicate}; |
556
|
|
|
|
|
|
|
} |
557
|
0
|
0
|
|
|
|
|
if (defined $vals->{consistency_level}) { |
558
|
0
|
|
|
|
|
|
$self->{consistency_level} = $vals->{consistency_level}; |
559
|
|
|
|
|
|
|
} |
560
|
|
|
|
|
|
|
} |
561
|
0
|
|
|
|
|
|
return bless ($self, $classname); |
562
|
|
|
|
|
|
|
} |
563
|
|
|
|
|
|
|
|
564
|
|
|
|
|
|
|
sub getName { |
565
|
0
|
|
|
0
|
|
|
return 'Cassandra_get_slice_args'; |
566
|
|
|
|
|
|
|
} |
567
|
|
|
|
|
|
|
|
568
|
|
|
|
|
|
|
sub read { |
569
|
0
|
|
|
0
|
|
|
my ($self, $input) = @_; |
570
|
0
|
|
|
|
|
|
my $xfer = 0; |
571
|
0
|
|
|
|
|
|
my $fname; |
572
|
0
|
|
|
|
|
|
my $ftype = 0; |
573
|
0
|
|
|
|
|
|
my $fid = 0; |
574
|
0
|
|
|
|
|
|
$xfer += $input->readStructBegin(\$fname); |
575
|
0
|
|
|
|
|
|
while (1) |
576
|
|
|
|
|
|
|
{ |
577
|
0
|
|
|
|
|
|
$xfer += $input->readFieldBegin(\$fname, \$ftype, \$fid); |
578
|
0
|
0
|
|
|
|
|
if ($ftype == TType::STOP) { |
579
|
0
|
|
|
|
|
|
last; |
580
|
|
|
|
|
|
|
} |
581
|
0
|
|
|
|
|
|
SWITCH: for($fid) |
582
|
|
|
|
|
|
|
{ |
583
|
0
|
0
|
|
|
|
|
/^1$/ && do{ if ($ftype == TType::STRING) { |
|
0
|
0
|
|
|
|
|
|
584
|
0
|
|
|
|
|
|
$xfer += $input->readString(\$self->{key}); |
585
|
|
|
|
|
|
|
} else { |
586
|
0
|
|
|
|
|
|
$xfer += $input->skip($ftype); |
587
|
|
|
|
|
|
|
} |
588
|
0
|
|
|
|
|
|
last; }; |
589
|
0
|
0
|
|
|
|
|
/^2$/ && do{ if ($ftype == TType::STRUCT) { |
|
0
|
0
|
|
|
|
|
|
590
|
0
|
|
|
|
|
|
$self->{column_parent} = new Cassandra::ColumnParent(); |
591
|
0
|
|
|
|
|
|
$xfer += $self->{column_parent}->read($input); |
592
|
|
|
|
|
|
|
} else { |
593
|
0
|
|
|
|
|
|
$xfer += $input->skip($ftype); |
594
|
|
|
|
|
|
|
} |
595
|
0
|
|
|
|
|
|
last; }; |
596
|
0
|
0
|
|
|
|
|
/^3$/ && do{ if ($ftype == TType::STRUCT) { |
|
0
|
0
|
|
|
|
|
|
597
|
0
|
|
|
|
|
|
$self->{predicate} = new Cassandra::SlicePredicate(); |
598
|
0
|
|
|
|
|
|
$xfer += $self->{predicate}->read($input); |
599
|
|
|
|
|
|
|
} else { |
600
|
0
|
|
|
|
|
|
$xfer += $input->skip($ftype); |
601
|
|
|
|
|
|
|
} |
602
|
0
|
|
|
|
|
|
last; }; |
603
|
0
|
0
|
|
|
|
|
/^4$/ && do{ if ($ftype == TType::I32) { |
|
0
|
0
|
|
|
|
|
|
604
|
0
|
|
|
|
|
|
$xfer += $input->readI32(\$self->{consistency_level}); |
605
|
|
|
|
|
|
|
} else { |
606
|
0
|
|
|
|
|
|
$xfer += $input->skip($ftype); |
607
|
|
|
|
|
|
|
} |
608
|
0
|
|
|
|
|
|
last; }; |
609
|
0
|
|
|
|
|
|
$xfer += $input->skip($ftype); |
610
|
|
|
|
|
|
|
} |
611
|
0
|
|
|
|
|
|
$xfer += $input->readFieldEnd(); |
612
|
|
|
|
|
|
|
} |
613
|
0
|
|
|
|
|
|
$xfer += $input->readStructEnd(); |
614
|
0
|
|
|
|
|
|
return $xfer; |
615
|
|
|
|
|
|
|
} |
616
|
|
|
|
|
|
|
|
617
|
|
|
|
|
|
|
sub write { |
618
|
0
|
|
|
0
|
|
|
my ($self, $output) = @_; |
619
|
0
|
|
|
|
|
|
my $xfer = 0; |
620
|
0
|
|
|
|
|
|
$xfer += $output->writeStructBegin('Cassandra_get_slice_args'); |
621
|
0
|
0
|
|
|
|
|
if (defined $self->{key}) { |
622
|
0
|
|
|
|
|
|
$xfer += $output->writeFieldBegin('key', TType::STRING, 1); |
623
|
0
|
|
|
|
|
|
$xfer += $output->writeString($self->{key}); |
624
|
0
|
|
|
|
|
|
$xfer += $output->writeFieldEnd(); |
625
|
|
|
|
|
|
|
} |
626
|
0
|
0
|
|
|
|
|
if (defined $self->{column_parent}) { |
627
|
0
|
|
|
|
|
|
$xfer += $output->writeFieldBegin('column_parent', TType::STRUCT, 2); |
628
|
0
|
|
|
|
|
|
$xfer += $self->{column_parent}->write($output); |
629
|
0
|
|
|
|
|
|
$xfer += $output->writeFieldEnd(); |
630
|
|
|
|
|
|
|
} |
631
|
0
|
0
|
|
|
|
|
if (defined $self->{predicate}) { |
632
|
0
|
|
|
|
|
|
$xfer += $output->writeFieldBegin('predicate', TType::STRUCT, 3); |
633
|
0
|
|
|
|
|
|
$xfer += $self->{predicate}->write($output); |
634
|
0
|
|
|
|
|
|
$xfer += $output->writeFieldEnd(); |
635
|
|
|
|
|
|
|
} |
636
|
0
|
0
|
|
|
|
|
if (defined $self->{consistency_level}) { |
637
|
0
|
|
|
|
|
|
$xfer += $output->writeFieldBegin('consistency_level', TType::I32, 4); |
638
|
0
|
|
|
|
|
|
$xfer += $output->writeI32($self->{consistency_level}); |
639
|
0
|
|
|
|
|
|
$xfer += $output->writeFieldEnd(); |
640
|
|
|
|
|
|
|
} |
641
|
0
|
|
|
|
|
|
$xfer += $output->writeFieldStop(); |
642
|
0
|
|
|
|
|
|
$xfer += $output->writeStructEnd(); |
643
|
0
|
|
|
|
|
|
return $xfer; |
644
|
|
|
|
|
|
|
} |
645
|
|
|
|
|
|
|
|
646
|
|
|
|
|
|
|
package Cassandra::Cassandra_get_slice_result; |
647
|
|
|
|
|
|
|
BEGIN { |
648
|
1
|
|
|
1
|
|
19
|
$Cassandra::Cassandra_get_slice_result::VERSION = '0.4.0'; |
649
|
|
|
|
|
|
|
} |
650
|
1
|
|
|
1
|
|
7
|
use base qw(Class::Accessor); |
|
1
|
|
|
|
|
2
|
|
|
1
|
|
|
|
|
1121
|
|
651
|
|
|
|
|
|
|
Cassandra::Cassandra_get_slice_result->mk_accessors( qw( success ) ); |
652
|
|
|
|
|
|
|
|
653
|
|
|
|
|
|
|
sub new { |
654
|
0
|
|
|
0
|
|
|
my $classname = shift; |
655
|
0
|
|
|
|
|
|
my $self = {}; |
656
|
0
|
|
0
|
|
|
|
my $vals = shift || {}; |
657
|
0
|
|
|
|
|
|
$self->{success} = undef; |
658
|
0
|
|
|
|
|
|
$self->{ire} = undef; |
659
|
0
|
|
|
|
|
|
$self->{ue} = undef; |
660
|
0
|
|
|
|
|
|
$self->{te} = undef; |
661
|
0
|
0
|
|
|
|
|
if (UNIVERSAL::isa($vals,'HASH')) { |
662
|
0
|
0
|
|
|
|
|
if (defined $vals->{success}) { |
663
|
0
|
|
|
|
|
|
$self->{success} = $vals->{success}; |
664
|
|
|
|
|
|
|
} |
665
|
0
|
0
|
|
|
|
|
if (defined $vals->{ire}) { |
666
|
0
|
|
|
|
|
|
$self->{ire} = $vals->{ire}; |
667
|
|
|
|
|
|
|
} |
668
|
0
|
0
|
|
|
|
|
if (defined $vals->{ue}) { |
669
|
0
|
|
|
|
|
|
$self->{ue} = $vals->{ue}; |
670
|
|
|
|
|
|
|
} |
671
|
0
|
0
|
|
|
|
|
if (defined $vals->{te}) { |
672
|
0
|
|
|
|
|
|
$self->{te} = $vals->{te}; |
673
|
|
|
|
|
|
|
} |
674
|
|
|
|
|
|
|
} |
675
|
0
|
|
|
|
|
|
return bless ($self, $classname); |
676
|
|
|
|
|
|
|
} |
677
|
|
|
|
|
|
|
|
678
|
|
|
|
|
|
|
sub getName { |
679
|
0
|
|
|
0
|
|
|
return 'Cassandra_get_slice_result'; |
680
|
|
|
|
|
|
|
} |
681
|
|
|
|
|
|
|
|
682
|
|
|
|
|
|
|
sub read { |
683
|
0
|
|
|
0
|
|
|
my ($self, $input) = @_; |
684
|
0
|
|
|
|
|
|
my $xfer = 0; |
685
|
0
|
|
|
|
|
|
my $fname; |
686
|
0
|
|
|
|
|
|
my $ftype = 0; |
687
|
0
|
|
|
|
|
|
my $fid = 0; |
688
|
0
|
|
|
|
|
|
$xfer += $input->readStructBegin(\$fname); |
689
|
0
|
|
|
|
|
|
while (1) |
690
|
|
|
|
|
|
|
{ |
691
|
0
|
|
|
|
|
|
$xfer += $input->readFieldBegin(\$fname, \$ftype, \$fid); |
692
|
0
|
0
|
|
|
|
|
if ($ftype == TType::STOP) { |
693
|
0
|
|
|
|
|
|
last; |
694
|
|
|
|
|
|
|
} |
695
|
0
|
|
|
|
|
|
SWITCH: for($fid) |
696
|
|
|
|
|
|
|
{ |
697
|
0
|
0
|
|
|
|
|
/^0$/ && do{ if ($ftype == TType::LIST) { |
|
0
|
0
|
|
|
|
|
|
698
|
|
|
|
|
|
|
{ |
699
|
0
|
|
|
|
|
|
my $_size88 = 0; |
|
0
|
|
|
|
|
|
|
700
|
0
|
|
|
|
|
|
$self->{success} = []; |
701
|
0
|
|
|
|
|
|
my $_etype91 = 0; |
702
|
0
|
|
|
|
|
|
$xfer += $input->readListBegin(\$_etype91, \$_size88); |
703
|
0
|
|
|
|
|
|
for (my $_i92 = 0; $_i92 < $_size88; ++$_i92) |
704
|
|
|
|
|
|
|
{ |
705
|
0
|
|
|
|
|
|
my $elem93 = undef; |
706
|
0
|
|
|
|
|
|
$elem93 = new Cassandra::ColumnOrSuperColumn(); |
707
|
0
|
|
|
|
|
|
$xfer += $elem93->read($input); |
708
|
0
|
|
|
|
|
|
push(@{$self->{success}},$elem93); |
|
0
|
|
|
|
|
|
|
709
|
|
|
|
|
|
|
} |
710
|
0
|
|
|
|
|
|
$xfer += $input->readListEnd(); |
711
|
|
|
|
|
|
|
} |
712
|
|
|
|
|
|
|
} else { |
713
|
0
|
|
|
|
|
|
$xfer += $input->skip($ftype); |
714
|
|
|
|
|
|
|
} |
715
|
0
|
|
|
|
|
|
last; }; |
716
|
0
|
0
|
|
|
|
|
/^1$/ && do{ if ($ftype == TType::STRUCT) { |
|
0
|
0
|
|
|
|
|
|
717
|
0
|
|
|
|
|
|
$self->{ire} = new Cassandra::InvalidRequestException(); |
718
|
0
|
|
|
|
|
|
$xfer += $self->{ire}->read($input); |
719
|
|
|
|
|
|
|
} else { |
720
|
0
|
|
|
|
|
|
$xfer += $input->skip($ftype); |
721
|
|
|
|
|
|
|
} |
722
|
0
|
|
|
|
|
|
last; }; |
723
|
0
|
0
|
|
|
|
|
/^2$/ && do{ if ($ftype == TType::STRUCT) { |
|
0
|
0
|
|
|
|
|
|
724
|
0
|
|
|
|
|
|
$self->{ue} = new Cassandra::UnavailableException(); |
725
|
0
|
|
|
|
|
|
$xfer += $self->{ue}->read($input); |
726
|
|
|
|
|
|
|
} else { |
727
|
0
|
|
|
|
|
|
$xfer += $input->skip($ftype); |
728
|
|
|
|
|
|
|
} |
729
|
0
|
|
|
|
|
|
last; }; |
730
|
0
|
0
|
|
|
|
|
/^3$/ && do{ if ($ftype == TType::STRUCT) { |
|
0
|
0
|
|
|
|
|
|
731
|
0
|
|
|
|
|
|
$self->{te} = new Cassandra::TimedOutException(); |
732
|
0
|
|
|
|
|
|
$xfer += $self->{te}->read($input); |
733
|
|
|
|
|
|
|
} else { |
734
|
0
|
|
|
|
|
|
$xfer += $input->skip($ftype); |
735
|
|
|
|
|
|
|
} |
736
|
0
|
|
|
|
|
|
last; }; |
737
|
0
|
|
|
|
|
|
$xfer += $input->skip($ftype); |
738
|
|
|
|
|
|
|
} |
739
|
0
|
|
|
|
|
|
$xfer += $input->readFieldEnd(); |
740
|
|
|
|
|
|
|
} |
741
|
0
|
|
|
|
|
|
$xfer += $input->readStructEnd(); |
742
|
0
|
|
|
|
|
|
return $xfer; |
743
|
|
|
|
|
|
|
} |
744
|
|
|
|
|
|
|
|
745
|
|
|
|
|
|
|
sub write { |
746
|
0
|
|
|
0
|
|
|
my ($self, $output) = @_; |
747
|
0
|
|
|
|
|
|
my $xfer = 0; |
748
|
0
|
|
|
|
|
|
$xfer += $output->writeStructBegin('Cassandra_get_slice_result'); |
749
|
0
|
0
|
|
|
|
|
if (defined $self->{success}) { |
750
|
0
|
|
|
|
|
|
$xfer += $output->writeFieldBegin('success', TType::LIST, 0); |
751
|
|
|
|
|
|
|
{ |
752
|
0
|
|
|
|
|
|
$xfer += $output->writeListBegin(TType::STRUCT, scalar(@{$self->{success}})); |
|
0
|
|
|
|
|
|
|
|
0
|
|
|
|
|
|
|
753
|
|
|
|
|
|
|
{ |
754
|
0
|
|
|
|
|
|
foreach my $iter94 (@{$self->{success}}) |
|
0
|
|
|
|
|
|
|
|
0
|
|
|
|
|
|
|
755
|
|
|
|
|
|
|
{ |
756
|
0
|
|
|
|
|
|
$xfer += ${iter94}->write($output); |
757
|
|
|
|
|
|
|
} |
758
|
|
|
|
|
|
|
} |
759
|
0
|
|
|
|
|
|
$xfer += $output->writeListEnd(); |
760
|
|
|
|
|
|
|
} |
761
|
0
|
|
|
|
|
|
$xfer += $output->writeFieldEnd(); |
762
|
|
|
|
|
|
|
} |
763
|
0
|
0
|
|
|
|
|
if (defined $self->{ire}) { |
764
|
0
|
|
|
|
|
|
$xfer += $output->writeFieldBegin('ire', TType::STRUCT, 1); |
765
|
0
|
|
|
|
|
|
$xfer += $self->{ire}->write($output); |
766
|
0
|
|
|
|
|
|
$xfer += $output->writeFieldEnd(); |
767
|
|
|
|
|
|
|
} |
768
|
0
|
0
|
|
|
|
|
if (defined $self->{ue}) { |
769
|
0
|
|
|
|
|
|
$xfer += $output->writeFieldBegin('ue', TType::STRUCT, 2); |
770
|
0
|
|
|
|
|
|
$xfer += $self->{ue}->write($output); |
771
|
0
|
|
|
|
|
|
$xfer += $output->writeFieldEnd(); |
772
|
|
|
|
|
|
|
} |
773
|
0
|
0
|
|
|
|
|
if (defined $self->{te}) { |
774
|
0
|
|
|
|
|
|
$xfer += $output->writeFieldBegin('te', TType::STRUCT, 3); |
775
|
0
|
|
|
|
|
|
$xfer += $self->{te}->write($output); |
776
|
0
|
|
|
|
|
|
$xfer += $output->writeFieldEnd(); |
777
|
|
|
|
|
|
|
} |
778
|
0
|
|
|
|
|
|
$xfer += $output->writeFieldStop(); |
779
|
0
|
|
|
|
|
|
$xfer += $output->writeStructEnd(); |
780
|
0
|
|
|
|
|
|
return $xfer; |
781
|
|
|
|
|
|
|
} |
782
|
|
|
|
|
|
|
|
783
|
|
|
|
|
|
|
package Cassandra::Cassandra_get_count_args; |
784
|
|
|
|
|
|
|
BEGIN { |
785
|
1
|
|
|
1
|
|
29
|
$Cassandra::Cassandra_get_count_args::VERSION = '0.4.0'; |
786
|
|
|
|
|
|
|
} |
787
|
1
|
|
|
1
|
|
8
|
use base qw(Class::Accessor); |
|
1
|
|
|
|
|
3
|
|
|
1
|
|
|
|
|
1037
|
|
788
|
|
|
|
|
|
|
Cassandra::Cassandra_get_count_args->mk_accessors( qw( key column_parent predicate consistency_level ) ); |
789
|
|
|
|
|
|
|
|
790
|
|
|
|
|
|
|
sub new { |
791
|
0
|
|
|
0
|
|
|
my $classname = shift; |
792
|
0
|
|
|
|
|
|
my $self = {}; |
793
|
0
|
|
0
|
|
|
|
my $vals = shift || {}; |
794
|
0
|
|
|
|
|
|
$self->{key} = undef; |
795
|
0
|
|
|
|
|
|
$self->{column_parent} = undef; |
796
|
0
|
|
|
|
|
|
$self->{predicate} = undef; |
797
|
0
|
|
|
|
|
|
$self->{consistency_level} = 1; |
798
|
0
|
0
|
|
|
|
|
if (UNIVERSAL::isa($vals,'HASH')) { |
799
|
0
|
0
|
|
|
|
|
if (defined $vals->{key}) { |
800
|
0
|
|
|
|
|
|
$self->{key} = $vals->{key}; |
801
|
|
|
|
|
|
|
} |
802
|
0
|
0
|
|
|
|
|
if (defined $vals->{column_parent}) { |
803
|
0
|
|
|
|
|
|
$self->{column_parent} = $vals->{column_parent}; |
804
|
|
|
|
|
|
|
} |
805
|
0
|
0
|
|
|
|
|
if (defined $vals->{predicate}) { |
806
|
0
|
|
|
|
|
|
$self->{predicate} = $vals->{predicate}; |
807
|
|
|
|
|
|
|
} |
808
|
0
|
0
|
|
|
|
|
if (defined $vals->{consistency_level}) { |
809
|
0
|
|
|
|
|
|
$self->{consistency_level} = $vals->{consistency_level}; |
810
|
|
|
|
|
|
|
} |
811
|
|
|
|
|
|
|
} |
812
|
0
|
|
|
|
|
|
return bless ($self, $classname); |
813
|
|
|
|
|
|
|
} |
814
|
|
|
|
|
|
|
|
815
|
|
|
|
|
|
|
sub getName { |
816
|
0
|
|
|
0
|
|
|
return 'Cassandra_get_count_args'; |
817
|
|
|
|
|
|
|
} |
818
|
|
|
|
|
|
|
|
819
|
|
|
|
|
|
|
sub read { |
820
|
0
|
|
|
0
|
|
|
my ($self, $input) = @_; |
821
|
0
|
|
|
|
|
|
my $xfer = 0; |
822
|
0
|
|
|
|
|
|
my $fname; |
823
|
0
|
|
|
|
|
|
my $ftype = 0; |
824
|
0
|
|
|
|
|
|
my $fid = 0; |
825
|
0
|
|
|
|
|
|
$xfer += $input->readStructBegin(\$fname); |
826
|
0
|
|
|
|
|
|
while (1) |
827
|
|
|
|
|
|
|
{ |
828
|
0
|
|
|
|
|
|
$xfer += $input->readFieldBegin(\$fname, \$ftype, \$fid); |
829
|
0
|
0
|
|
|
|
|
if ($ftype == TType::STOP) { |
830
|
0
|
|
|
|
|
|
last; |
831
|
|
|
|
|
|
|
} |
832
|
0
|
|
|
|
|
|
SWITCH: for($fid) |
833
|
|
|
|
|
|
|
{ |
834
|
0
|
0
|
|
|
|
|
/^1$/ && do{ if ($ftype == TType::STRING) { |
|
0
|
0
|
|
|
|
|
|
835
|
0
|
|
|
|
|
|
$xfer += $input->readString(\$self->{key}); |
836
|
|
|
|
|
|
|
} else { |
837
|
0
|
|
|
|
|
|
$xfer += $input->skip($ftype); |
838
|
|
|
|
|
|
|
} |
839
|
0
|
|
|
|
|
|
last; }; |
840
|
0
|
0
|
|
|
|
|
/^2$/ && do{ if ($ftype == TType::STRUCT) { |
|
0
|
0
|
|
|
|
|
|
841
|
0
|
|
|
|
|
|
$self->{column_parent} = new Cassandra::ColumnParent(); |
842
|
0
|
|
|
|
|
|
$xfer += $self->{column_parent}->read($input); |
843
|
|
|
|
|
|
|
} else { |
844
|
0
|
|
|
|
|
|
$xfer += $input->skip($ftype); |
845
|
|
|
|
|
|
|
} |
846
|
0
|
|
|
|
|
|
last; }; |
847
|
0
|
0
|
|
|
|
|
/^3$/ && do{ if ($ftype == TType::STRUCT) { |
|
0
|
0
|
|
|
|
|
|
848
|
0
|
|
|
|
|
|
$self->{predicate} = new Cassandra::SlicePredicate(); |
849
|
0
|
|
|
|
|
|
$xfer += $self->{predicate}->read($input); |
850
|
|
|
|
|
|
|
} else { |
851
|
0
|
|
|
|
|
|
$xfer += $input->skip($ftype); |
852
|
|
|
|
|
|
|
} |
853
|
0
|
|
|
|
|
|
last; }; |
854
|
0
|
0
|
|
|
|
|
/^4$/ && do{ if ($ftype == TType::I32) { |
|
0
|
0
|
|
|
|
|
|
855
|
0
|
|
|
|
|
|
$xfer += $input->readI32(\$self->{consistency_level}); |
856
|
|
|
|
|
|
|
} else { |
857
|
0
|
|
|
|
|
|
$xfer += $input->skip($ftype); |
858
|
|
|
|
|
|
|
} |
859
|
0
|
|
|
|
|
|
last; }; |
860
|
0
|
|
|
|
|
|
$xfer += $input->skip($ftype); |
861
|
|
|
|
|
|
|
} |
862
|
0
|
|
|
|
|
|
$xfer += $input->readFieldEnd(); |
863
|
|
|
|
|
|
|
} |
864
|
0
|
|
|
|
|
|
$xfer += $input->readStructEnd(); |
865
|
0
|
|
|
|
|
|
return $xfer; |
866
|
|
|
|
|
|
|
} |
867
|
|
|
|
|
|
|
|
868
|
|
|
|
|
|
|
sub write { |
869
|
0
|
|
|
0
|
|
|
my ($self, $output) = @_; |
870
|
0
|
|
|
|
|
|
my $xfer = 0; |
871
|
0
|
|
|
|
|
|
$xfer += $output->writeStructBegin('Cassandra_get_count_args'); |
872
|
0
|
0
|
|
|
|
|
if (defined $self->{key}) { |
873
|
0
|
|
|
|
|
|
$xfer += $output->writeFieldBegin('key', TType::STRING, 1); |
874
|
0
|
|
|
|
|
|
$xfer += $output->writeString($self->{key}); |
875
|
0
|
|
|
|
|
|
$xfer += $output->writeFieldEnd(); |
876
|
|
|
|
|
|
|
} |
877
|
0
|
0
|
|
|
|
|
if (defined $self->{column_parent}) { |
878
|
0
|
|
|
|
|
|
$xfer += $output->writeFieldBegin('column_parent', TType::STRUCT, 2); |
879
|
0
|
|
|
|
|
|
$xfer += $self->{column_parent}->write($output); |
880
|
0
|
|
|
|
|
|
$xfer += $output->writeFieldEnd(); |
881
|
|
|
|
|
|
|
} |
882
|
0
|
0
|
|
|
|
|
if (defined $self->{predicate}) { |
883
|
0
|
|
|
|
|
|
$xfer += $output->writeFieldBegin('predicate', TType::STRUCT, 3); |
884
|
0
|
|
|
|
|
|
$xfer += $self->{predicate}->write($output); |
885
|
0
|
|
|
|
|
|
$xfer += $output->writeFieldEnd(); |
886
|
|
|
|
|
|
|
} |
887
|
0
|
0
|
|
|
|
|
if (defined $self->{consistency_level}) { |
888
|
0
|
|
|
|
|
|
$xfer += $output->writeFieldBegin('consistency_level', TType::I32, 4); |
889
|
0
|
|
|
|
|
|
$xfer += $output->writeI32($self->{consistency_level}); |
890
|
0
|
|
|
|
|
|
$xfer += $output->writeFieldEnd(); |
891
|
|
|
|
|
|
|
} |
892
|
0
|
|
|
|
|
|
$xfer += $output->writeFieldStop(); |
893
|
0
|
|
|
|
|
|
$xfer += $output->writeStructEnd(); |
894
|
0
|
|
|
|
|
|
return $xfer; |
895
|
|
|
|
|
|
|
} |
896
|
|
|
|
|
|
|
|
897
|
|
|
|
|
|
|
package Cassandra::Cassandra_get_count_result; |
898
|
|
|
|
|
|
|
BEGIN { |
899
|
1
|
|
|
1
|
|
26
|
$Cassandra::Cassandra_get_count_result::VERSION = '0.4.0'; |
900
|
|
|
|
|
|
|
} |
901
|
1
|
|
|
1
|
|
8
|
use base qw(Class::Accessor); |
|
1
|
|
|
|
|
2
|
|
|
1
|
|
|
|
|
955
|
|
902
|
|
|
|
|
|
|
Cassandra::Cassandra_get_count_result->mk_accessors( qw( success ) ); |
903
|
|
|
|
|
|
|
|
904
|
|
|
|
|
|
|
sub new { |
905
|
0
|
|
|
0
|
|
|
my $classname = shift; |
906
|
0
|
|
|
|
|
|
my $self = {}; |
907
|
0
|
|
0
|
|
|
|
my $vals = shift || {}; |
908
|
0
|
|
|
|
|
|
$self->{success} = undef; |
909
|
0
|
|
|
|
|
|
$self->{ire} = undef; |
910
|
0
|
|
|
|
|
|
$self->{ue} = undef; |
911
|
0
|
|
|
|
|
|
$self->{te} = undef; |
912
|
0
|
0
|
|
|
|
|
if (UNIVERSAL::isa($vals,'HASH')) { |
913
|
0
|
0
|
|
|
|
|
if (defined $vals->{success}) { |
914
|
0
|
|
|
|
|
|
$self->{success} = $vals->{success}; |
915
|
|
|
|
|
|
|
} |
916
|
0
|
0
|
|
|
|
|
if (defined $vals->{ire}) { |
917
|
0
|
|
|
|
|
|
$self->{ire} = $vals->{ire}; |
918
|
|
|
|
|
|
|
} |
919
|
0
|
0
|
|
|
|
|
if (defined $vals->{ue}) { |
920
|
0
|
|
|
|
|
|
$self->{ue} = $vals->{ue}; |
921
|
|
|
|
|
|
|
} |
922
|
0
|
0
|
|
|
|
|
if (defined $vals->{te}) { |
923
|
0
|
|
|
|
|
|
$self->{te} = $vals->{te}; |
924
|
|
|
|
|
|
|
} |
925
|
|
|
|
|
|
|
} |
926
|
0
|
|
|
|
|
|
return bless ($self, $classname); |
927
|
|
|
|
|
|
|
} |
928
|
|
|
|
|
|
|
|
929
|
|
|
|
|
|
|
sub getName { |
930
|
0
|
|
|
0
|
|
|
return 'Cassandra_get_count_result'; |
931
|
|
|
|
|
|
|
} |
932
|
|
|
|
|
|
|
|
933
|
|
|
|
|
|
|
sub read { |
934
|
0
|
|
|
0
|
|
|
my ($self, $input) = @_; |
935
|
0
|
|
|
|
|
|
my $xfer = 0; |
936
|
0
|
|
|
|
|
|
my $fname; |
937
|
0
|
|
|
|
|
|
my $ftype = 0; |
938
|
0
|
|
|
|
|
|
my $fid = 0; |
939
|
0
|
|
|
|
|
|
$xfer += $input->readStructBegin(\$fname); |
940
|
0
|
|
|
|
|
|
while (1) |
941
|
|
|
|
|
|
|
{ |
942
|
0
|
|
|
|
|
|
$xfer += $input->readFieldBegin(\$fname, \$ftype, \$fid); |
943
|
0
|
0
|
|
|
|
|
if ($ftype == TType::STOP) { |
944
|
0
|
|
|
|
|
|
last; |
945
|
|
|
|
|
|
|
} |
946
|
0
|
|
|
|
|
|
SWITCH: for($fid) |
947
|
|
|
|
|
|
|
{ |
948
|
0
|
0
|
|
|
|
|
/^0$/ && do{ if ($ftype == TType::I32) { |
|
0
|
0
|
|
|
|
|
|
949
|
0
|
|
|
|
|
|
$xfer += $input->readI32(\$self->{success}); |
950
|
|
|
|
|
|
|
} else { |
951
|
0
|
|
|
|
|
|
$xfer += $input->skip($ftype); |
952
|
|
|
|
|
|
|
} |
953
|
0
|
|
|
|
|
|
last; }; |
954
|
0
|
0
|
|
|
|
|
/^1$/ && do{ if ($ftype == TType::STRUCT) { |
|
0
|
0
|
|
|
|
|
|
955
|
0
|
|
|
|
|
|
$self->{ire} = new Cassandra::InvalidRequestException(); |
956
|
0
|
|
|
|
|
|
$xfer += $self->{ire}->read($input); |
957
|
|
|
|
|
|
|
} else { |
958
|
0
|
|
|
|
|
|
$xfer += $input->skip($ftype); |
959
|
|
|
|
|
|
|
} |
960
|
0
|
|
|
|
|
|
last; }; |
961
|
0
|
0
|
|
|
|
|
/^2$/ && do{ if ($ftype == TType::STRUCT) { |
|
0
|
0
|
|
|
|
|
|
962
|
0
|
|
|
|
|
|
$self->{ue} = new Cassandra::UnavailableException(); |
963
|
0
|
|
|
|
|
|
$xfer += $self->{ue}->read($input); |
964
|
|
|
|
|
|
|
} else { |
965
|
0
|
|
|
|
|
|
$xfer += $input->skip($ftype); |
966
|
|
|
|
|
|
|
} |
967
|
0
|
|
|
|
|
|
last; }; |
968
|
0
|
0
|
|
|
|
|
/^3$/ && do{ if ($ftype == TType::STRUCT) { |
|
0
|
0
|
|
|
|
|
|
969
|
0
|
|
|
|
|
|
$self->{te} = new Cassandra::TimedOutException(); |
970
|
0
|
|
|
|
|
|
$xfer += $self->{te}->read($input); |
971
|
|
|
|
|
|
|
} else { |
972
|
0
|
|
|
|
|
|
$xfer += $input->skip($ftype); |
973
|
|
|
|
|
|
|
} |
974
|
0
|
|
|
|
|
|
last; }; |
975
|
0
|
|
|
|
|
|
$xfer += $input->skip($ftype); |
976
|
|
|
|
|
|
|
} |
977
|
0
|
|
|
|
|
|
$xfer += $input->readFieldEnd(); |
978
|
|
|
|
|
|
|
} |
979
|
0
|
|
|
|
|
|
$xfer += $input->readStructEnd(); |
980
|
0
|
|
|
|
|
|
return $xfer; |
981
|
|
|
|
|
|
|
} |
982
|
|
|
|
|
|
|
|
983
|
|
|
|
|
|
|
sub write { |
984
|
0
|
|
|
0
|
|
|
my ($self, $output) = @_; |
985
|
0
|
|
|
|
|
|
my $xfer = 0; |
986
|
0
|
|
|
|
|
|
$xfer += $output->writeStructBegin('Cassandra_get_count_result'); |
987
|
0
|
0
|
|
|
|
|
if (defined $self->{success}) { |
988
|
0
|
|
|
|
|
|
$xfer += $output->writeFieldBegin('success', TType::I32, 0); |
989
|
0
|
|
|
|
|
|
$xfer += $output->writeI32($self->{success}); |
990
|
0
|
|
|
|
|
|
$xfer += $output->writeFieldEnd(); |
991
|
|
|
|
|
|
|
} |
992
|
0
|
0
|
|
|
|
|
if (defined $self->{ire}) { |
993
|
0
|
|
|
|
|
|
$xfer += $output->writeFieldBegin('ire', TType::STRUCT, 1); |
994
|
0
|
|
|
|
|
|
$xfer += $self->{ire}->write($output); |
995
|
0
|
|
|
|
|
|
$xfer += $output->writeFieldEnd(); |
996
|
|
|
|
|
|
|
} |
997
|
0
|
0
|
|
|
|
|
if (defined $self->{ue}) { |
998
|
0
|
|
|
|
|
|
$xfer += $output->writeFieldBegin('ue', TType::STRUCT, 2); |
999
|
0
|
|
|
|
|
|
$xfer += $self->{ue}->write($output); |
1000
|
0
|
|
|
|
|
|
$xfer += $output->writeFieldEnd(); |
1001
|
|
|
|
|
|
|
} |
1002
|
0
|
0
|
|
|
|
|
if (defined $self->{te}) { |
1003
|
0
|
|
|
|
|
|
$xfer += $output->writeFieldBegin('te', TType::STRUCT, 3); |
1004
|
0
|
|
|
|
|
|
$xfer += $self->{te}->write($output); |
1005
|
0
|
|
|
|
|
|
$xfer += $output->writeFieldEnd(); |
1006
|
|
|
|
|
|
|
} |
1007
|
0
|
|
|
|
|
|
$xfer += $output->writeFieldStop(); |
1008
|
0
|
|
|
|
|
|
$xfer += $output->writeStructEnd(); |
1009
|
0
|
|
|
|
|
|
return $xfer; |
1010
|
|
|
|
|
|
|
} |
1011
|
|
|
|
|
|
|
|
1012
|
|
|
|
|
|
|
package Cassandra::Cassandra_multiget_slice_args; |
1013
|
|
|
|
|
|
|
BEGIN { |
1014
|
1
|
|
|
1
|
|
20
|
$Cassandra::Cassandra_multiget_slice_args::VERSION = '0.4.0'; |
1015
|
|
|
|
|
|
|
} |
1016
|
1
|
|
|
1
|
|
7
|
use base qw(Class::Accessor); |
|
1
|
|
|
|
|
2
|
|
|
1
|
|
|
|
|
1055
|
|
1017
|
|
|
|
|
|
|
Cassandra::Cassandra_multiget_slice_args->mk_accessors( qw( keys column_parent predicate consistency_level ) ); |
1018
|
|
|
|
|
|
|
|
1019
|
|
|
|
|
|
|
sub new { |
1020
|
0
|
|
|
0
|
|
|
my $classname = shift; |
1021
|
0
|
|
|
|
|
|
my $self = {}; |
1022
|
0
|
|
0
|
|
|
|
my $vals = shift || {}; |
1023
|
0
|
|
|
|
|
|
$self->{keys} = undef; |
1024
|
0
|
|
|
|
|
|
$self->{column_parent} = undef; |
1025
|
0
|
|
|
|
|
|
$self->{predicate} = undef; |
1026
|
0
|
|
|
|
|
|
$self->{consistency_level} = 1; |
1027
|
0
|
0
|
|
|
|
|
if (UNIVERSAL::isa($vals,'HASH')) { |
1028
|
0
|
0
|
|
|
|
|
if (defined $vals->{keys}) { |
1029
|
0
|
|
|
|
|
|
$self->{keys} = $vals->{keys}; |
1030
|
|
|
|
|
|
|
} |
1031
|
0
|
0
|
|
|
|
|
if (defined $vals->{column_parent}) { |
1032
|
0
|
|
|
|
|
|
$self->{column_parent} = $vals->{column_parent}; |
1033
|
|
|
|
|
|
|
} |
1034
|
0
|
0
|
|
|
|
|
if (defined $vals->{predicate}) { |
1035
|
0
|
|
|
|
|
|
$self->{predicate} = $vals->{predicate}; |
1036
|
|
|
|
|
|
|
} |
1037
|
0
|
0
|
|
|
|
|
if (defined $vals->{consistency_level}) { |
1038
|
0
|
|
|
|
|
|
$self->{consistency_level} = $vals->{consistency_level}; |
1039
|
|
|
|
|
|
|
} |
1040
|
|
|
|
|
|
|
} |
1041
|
0
|
|
|
|
|
|
return bless ($self, $classname); |
1042
|
|
|
|
|
|
|
} |
1043
|
|
|
|
|
|
|
|
1044
|
|
|
|
|
|
|
sub getName { |
1045
|
0
|
|
|
0
|
|
|
return 'Cassandra_multiget_slice_args'; |
1046
|
|
|
|
|
|
|
} |
1047
|
|
|
|
|
|
|
|
1048
|
|
|
|
|
|
|
sub read { |
1049
|
0
|
|
|
0
|
|
|
my ($self, $input) = @_; |
1050
|
0
|
|
|
|
|
|
my $xfer = 0; |
1051
|
0
|
|
|
|
|
|
my $fname; |
1052
|
0
|
|
|
|
|
|
my $ftype = 0; |
1053
|
0
|
|
|
|
|
|
my $fid = 0; |
1054
|
0
|
|
|
|
|
|
$xfer += $input->readStructBegin(\$fname); |
1055
|
0
|
|
|
|
|
|
while (1) |
1056
|
|
|
|
|
|
|
{ |
1057
|
0
|
|
|
|
|
|
$xfer += $input->readFieldBegin(\$fname, \$ftype, \$fid); |
1058
|
0
|
0
|
|
|
|
|
if ($ftype == TType::STOP) { |
1059
|
0
|
|
|
|
|
|
last; |
1060
|
|
|
|
|
|
|
} |
1061
|
0
|
|
|
|
|
|
SWITCH: for($fid) |
1062
|
|
|
|
|
|
|
{ |
1063
|
0
|
0
|
|
|
|
|
/^1$/ && do{ if ($ftype == TType::LIST) { |
|
0
|
0
|
|
|
|
|
|
1064
|
|
|
|
|
|
|
{ |
1065
|
0
|
|
|
|
|
|
my $_size95 = 0; |
|
0
|
|
|
|
|
|
|
1066
|
0
|
|
|
|
|
|
$self->{keys} = []; |
1067
|
0
|
|
|
|
|
|
my $_etype98 = 0; |
1068
|
0
|
|
|
|
|
|
$xfer += $input->readListBegin(\$_etype98, \$_size95); |
1069
|
0
|
|
|
|
|
|
for (my $_i99 = 0; $_i99 < $_size95; ++$_i99) |
1070
|
|
|
|
|
|
|
{ |
1071
|
0
|
|
|
|
|
|
my $elem100 = undef; |
1072
|
0
|
|
|
|
|
|
$xfer += $input->readString(\$elem100); |
1073
|
0
|
|
|
|
|
|
push(@{$self->{keys}},$elem100); |
|
0
|
|
|
|
|
|
|
1074
|
|
|
|
|
|
|
} |
1075
|
0
|
|
|
|
|
|
$xfer += $input->readListEnd(); |
1076
|
|
|
|
|
|
|
} |
1077
|
|
|
|
|
|
|
} else { |
1078
|
0
|
|
|
|
|
|
$xfer += $input->skip($ftype); |
1079
|
|
|
|
|
|
|
} |
1080
|
0
|
|
|
|
|
|
last; }; |
1081
|
0
|
0
|
|
|
|
|
/^2$/ && do{ if ($ftype == TType::STRUCT) { |
|
0
|
0
|
|
|
|
|
|
1082
|
0
|
|
|
|
|
|
$self->{column_parent} = new Cassandra::ColumnParent(); |
1083
|
0
|
|
|
|
|
|
$xfer += $self->{column_parent}->read($input); |
1084
|
|
|
|
|
|
|
} else { |
1085
|
0
|
|
|
|
|
|
$xfer += $input->skip($ftype); |
1086
|
|
|
|
|
|
|
} |
1087
|
0
|
|
|
|
|
|
last; }; |
1088
|
0
|
0
|
|
|
|
|
/^3$/ && do{ if ($ftype == TType::STRUCT) { |
|
0
|
0
|
|
|
|
|
|
1089
|
0
|
|
|
|
|
|
$self->{predicate} = new Cassandra::SlicePredicate(); |
1090
|
0
|
|
|
|
|
|
$xfer += $self->{predicate}->read($input); |
1091
|
|
|
|
|
|
|
} else { |
1092
|
0
|
|
|
|
|
|
$xfer += $input->skip($ftype); |
1093
|
|
|
|
|
|
|
} |
1094
|
0
|
|
|
|
|
|
last; }; |
1095
|
0
|
0
|
|
|
|
|
/^4$/ && do{ if ($ftype == TType::I32) { |
|
0
|
0
|
|
|
|
|
|
1096
|
0
|
|
|
|
|
|
$xfer += $input->readI32(\$self->{consistency_level}); |
1097
|
|
|
|
|
|
|
} else { |
1098
|
0
|
|
|
|
|
|
$xfer += $input->skip($ftype); |
1099
|
|
|
|
|
|
|
} |
1100
|
0
|
|
|
|
|
|
last; }; |
1101
|
0
|
|
|
|
|
|
$xfer += $input->skip($ftype); |
1102
|
|
|
|
|
|
|
} |
1103
|
0
|
|
|
|
|
|
$xfer += $input->readFieldEnd(); |
1104
|
|
|
|
|
|
|
} |
1105
|
0
|
|
|
|
|
|
$xfer += $input->readStructEnd(); |
1106
|
0
|
|
|
|
|
|
return $xfer; |
1107
|
|
|
|
|
|
|
} |
1108
|
|
|
|
|
|
|
|
1109
|
|
|
|
|
|
|
sub write { |
1110
|
0
|
|
|
0
|
|
|
my ($self, $output) = @_; |
1111
|
0
|
|
|
|
|
|
my $xfer = 0; |
1112
|
0
|
|
|
|
|
|
$xfer += $output->writeStructBegin('Cassandra_multiget_slice_args'); |
1113
|
0
|
0
|
|
|
|
|
if (defined $self->{keys}) { |
1114
|
0
|
|
|
|
|
|
$xfer += $output->writeFieldBegin('keys', TType::LIST, 1); |
1115
|
|
|
|
|
|
|
{ |
1116
|
0
|
|
|
|
|
|
$xfer += $output->writeListBegin(TType::STRING, scalar(@{$self->{keys}})); |
|
0
|
|
|
|
|
|
|
|
0
|
|
|
|
|
|
|
1117
|
|
|
|
|
|
|
{ |
1118
|
0
|
|
|
|
|
|
foreach my $iter101 (@{$self->{keys}}) |
|
0
|
|
|
|
|
|
|
|
0
|
|
|
|
|
|
|
1119
|
|
|
|
|
|
|
{ |
1120
|
0
|
|
|
|
|
|
$xfer += $output->writeString($iter101); |
1121
|
|
|
|
|
|
|
} |
1122
|
|
|
|
|
|
|
} |
1123
|
0
|
|
|
|
|
|
$xfer += $output->writeListEnd(); |
1124
|
|
|
|
|
|
|
} |
1125
|
0
|
|
|
|
|
|
$xfer += $output->writeFieldEnd(); |
1126
|
|
|
|
|
|
|
} |
1127
|
0
|
0
|
|
|
|
|
if (defined $self->{column_parent}) { |
1128
|
0
|
|
|
|
|
|
$xfer += $output->writeFieldBegin('column_parent', TType::STRUCT, 2); |
1129
|
0
|
|
|
|
|
|
$xfer += $self->{column_parent}->write($output); |
1130
|
0
|
|
|
|
|
|
$xfer += $output->writeFieldEnd(); |
1131
|
|
|
|
|
|
|
} |
1132
|
0
|
0
|
|
|
|
|
if (defined $self->{predicate}) { |
1133
|
0
|
|
|
|
|
|
$xfer += $output->writeFieldBegin('predicate', TType::STRUCT, 3); |
1134
|
0
|
|
|
|
|
|
$xfer += $self->{predicate}->write($output); |
1135
|
0
|
|
|
|
|
|
$xfer += $output->writeFieldEnd(); |
1136
|
|
|
|
|
|
|
} |
1137
|
0
|
0
|
|
|
|
|
if (defined $self->{consistency_level}) { |
1138
|
0
|
|
|
|
|
|
$xfer += $output->writeFieldBegin('consistency_level', TType::I32, 4); |
1139
|
0
|
|
|
|
|
|
$xfer += $output->writeI32($self->{consistency_level}); |
1140
|
0
|
|
|
|
|
|
$xfer += $output->writeFieldEnd(); |
1141
|
|
|
|
|
|
|
} |
1142
|
0
|
|
|
|
|
|
$xfer += $output->writeFieldStop(); |
1143
|
0
|
|
|
|
|
|
$xfer += $output->writeStructEnd(); |
1144
|
0
|
|
|
|
|
|
return $xfer; |
1145
|
|
|
|
|
|
|
} |
1146
|
|
|
|
|
|
|
|
1147
|
|
|
|
|
|
|
package Cassandra::Cassandra_multiget_slice_result; |
1148
|
|
|
|
|
|
|
BEGIN { |
1149
|
1
|
|
|
1
|
|
20
|
$Cassandra::Cassandra_multiget_slice_result::VERSION = '0.4.0'; |
1150
|
|
|
|
|
|
|
} |
1151
|
1
|
|
|
1
|
|
14
|
use base qw(Class::Accessor); |
|
1
|
|
|
|
|
2
|
|
|
1
|
|
|
|
|
1174
|
|
1152
|
|
|
|
|
|
|
Cassandra::Cassandra_multiget_slice_result->mk_accessors( qw( success ) ); |
1153
|
|
|
|
|
|
|
|
1154
|
|
|
|
|
|
|
sub new { |
1155
|
0
|
|
|
0
|
|
|
my $classname = shift; |
1156
|
0
|
|
|
|
|
|
my $self = {}; |
1157
|
0
|
|
0
|
|
|
|
my $vals = shift || {}; |
1158
|
0
|
|
|
|
|
|
$self->{success} = undef; |
1159
|
0
|
|
|
|
|
|
$self->{ire} = undef; |
1160
|
0
|
|
|
|
|
|
$self->{ue} = undef; |
1161
|
0
|
|
|
|
|
|
$self->{te} = undef; |
1162
|
0
|
0
|
|
|
|
|
if (UNIVERSAL::isa($vals,'HASH')) { |
1163
|
0
|
0
|
|
|
|
|
if (defined $vals->{success}) { |
1164
|
0
|
|
|
|
|
|
$self->{success} = $vals->{success}; |
1165
|
|
|
|
|
|
|
} |
1166
|
0
|
0
|
|
|
|
|
if (defined $vals->{ire}) { |
1167
|
0
|
|
|
|
|
|
$self->{ire} = $vals->{ire}; |
1168
|
|
|
|
|
|
|
} |
1169
|
0
|
0
|
|
|
|
|
if (defined $vals->{ue}) { |
1170
|
0
|
|
|
|
|
|
$self->{ue} = $vals->{ue}; |
1171
|
|
|
|
|
|
|
} |
1172
|
0
|
0
|
|
|
|
|
if (defined $vals->{te}) { |
1173
|
0
|
|
|
|
|
|
$self->{te} = $vals->{te}; |
1174
|
|
|
|
|
|
|
} |
1175
|
|
|
|
|
|
|
} |
1176
|
0
|
|
|
|
|
|
return bless ($self, $classname); |
1177
|
|
|
|
|
|
|
} |
1178
|
|
|
|
|
|
|
|
1179
|
|
|
|
|
|
|
sub getName { |
1180
|
0
|
|
|
0
|
|
|
return 'Cassandra_multiget_slice_result'; |
1181
|
|
|
|
|
|
|
} |
1182
|
|
|
|
|
|
|
|
1183
|
|
|
|
|
|
|
sub read { |
1184
|
0
|
|
|
0
|
|
|
my ($self, $input) = @_; |
1185
|
0
|
|
|
|
|
|
my $xfer = 0; |
1186
|
0
|
|
|
|
|
|
my $fname; |
1187
|
0
|
|
|
|
|
|
my $ftype = 0; |
1188
|
0
|
|
|
|
|
|
my $fid = 0; |
1189
|
0
|
|
|
|
|
|
$xfer += $input->readStructBegin(\$fname); |
1190
|
0
|
|
|
|
|
|
while (1) |
1191
|
|
|
|
|
|
|
{ |
1192
|
0
|
|
|
|
|
|
$xfer += $input->readFieldBegin(\$fname, \$ftype, \$fid); |
1193
|
0
|
0
|
|
|
|
|
if ($ftype == TType::STOP) { |
1194
|
0
|
|
|
|
|
|
last; |
1195
|
|
|
|
|
|
|
} |
1196
|
0
|
|
|
|
|
|
SWITCH: for($fid) |
1197
|
|
|
|
|
|
|
{ |
1198
|
0
|
0
|
|
|
|
|
/^0$/ && do{ if ($ftype == TType::MAP) { |
|
0
|
0
|
|
|
|
|
|
1199
|
|
|
|
|
|
|
{ |
1200
|
0
|
|
|
|
|
|
my $_size102 = 0; |
|
0
|
|
|
|
|
|
|
1201
|
0
|
|
|
|
|
|
$self->{success} = {}; |
1202
|
0
|
|
|
|
|
|
my $_ktype103 = 0; |
1203
|
0
|
|
|
|
|
|
my $_vtype104 = 0; |
1204
|
0
|
|
|
|
|
|
$xfer += $input->readMapBegin(\$_ktype103, \$_vtype104, \$_size102); |
1205
|
0
|
|
|
|
|
|
for (my $_i106 = 0; $_i106 < $_size102; ++$_i106) |
1206
|
|
|
|
|
|
|
{ |
1207
|
0
|
|
|
|
|
|
my $key107 = ''; |
1208
|
0
|
|
|
|
|
|
my $val108 = []; |
1209
|
0
|
|
|
|
|
|
$xfer += $input->readString(\$key107); |
1210
|
|
|
|
|
|
|
{ |
1211
|
0
|
|
|
|
|
|
my $_size109 = 0; |
|
0
|
|
|
|
|
|
|
1212
|
0
|
|
|
|
|
|
$val108 = []; |
1213
|
0
|
|
|
|
|
|
my $_etype112 = 0; |
1214
|
0
|
|
|
|
|
|
$xfer += $input->readListBegin(\$_etype112, \$_size109); |
1215
|
0
|
|
|
|
|
|
for (my $_i113 = 0; $_i113 < $_size109; ++$_i113) |
1216
|
|
|
|
|
|
|
{ |
1217
|
0
|
|
|
|
|
|
my $elem114 = undef; |
1218
|
0
|
|
|
|
|
|
$elem114 = new Cassandra::ColumnOrSuperColumn(); |
1219
|
0
|
|
|
|
|
|
$xfer += $elem114->read($input); |
1220
|
0
|
|
|
|
|
|
push(@{$val108},$elem114); |
|
0
|
|
|
|
|
|
|
1221
|
|
|
|
|
|
|
} |
1222
|
0
|
|
|
|
|
|
$xfer += $input->readListEnd(); |
1223
|
|
|
|
|
|
|
} |
1224
|
0
|
|
|
|
|
|
$self->{success}->{$key107} = $val108; |
1225
|
|
|
|
|
|
|
} |
1226
|
0
|
|
|
|
|
|
$xfer += $input->readMapEnd(); |
1227
|
|
|
|
|
|
|
} |
1228
|
|
|
|
|
|
|
} else { |
1229
|
0
|
|
|
|
|
|
$xfer += $input->skip($ftype); |
1230
|
|
|
|
|
|
|
} |
1231
|
0
|
|
|
|
|
|
last; }; |
1232
|
0
|
0
|
|
|
|
|
/^1$/ && do{ if ($ftype == TType::STRUCT) { |
|
0
|
0
|
|
|
|
|
|
1233
|
0
|
|
|
|
|
|
$self->{ire} = new Cassandra::InvalidRequestException(); |
1234
|
0
|
|
|
|
|
|
$xfer += $self->{ire}->read($input); |
1235
|
|
|
|
|
|
|
} else { |
1236
|
0
|
|
|
|
|
|
$xfer += $input->skip($ftype); |
1237
|
|
|
|
|
|
|
} |
1238
|
0
|
|
|
|
|
|
last; }; |
1239
|
0
|
0
|
|
|
|
|
/^2$/ && do{ if ($ftype == TType::STRUCT) { |
|
0
|
0
|
|
|
|
|
|
1240
|
0
|
|
|
|
|
|
$self->{ue} = new Cassandra::UnavailableException(); |
1241
|
0
|
|
|
|
|
|
$xfer += $self->{ue}->read($input); |
1242
|
|
|
|
|
|
|
} else { |
1243
|
0
|
|
|
|
|
|
$xfer += $input->skip($ftype); |
1244
|
|
|
|
|
|
|
} |
1245
|
0
|
|
|
|
|
|
last; }; |
1246
|
0
|
0
|
|
|
|
|
/^3$/ && do{ if ($ftype == TType::STRUCT) { |
|
0
|
0
|
|
|
|
|
|
1247
|
0
|
|
|
|
|
|
$self->{te} = new Cassandra::TimedOutException(); |
1248
|
0
|
|
|
|
|
|
$xfer += $self->{te}->read($input); |
1249
|
|
|
|
|
|
|
} else { |
1250
|
0
|
|
|
|
|
|
$xfer += $input->skip($ftype); |
1251
|
|
|
|
|
|
|
} |
1252
|
0
|
|
|
|
|
|
last; }; |
1253
|
0
|
|
|
|
|
|
$xfer += $input->skip($ftype); |
1254
|
|
|
|
|
|
|
} |
1255
|
0
|
|
|
|
|
|
$xfer += $input->readFieldEnd(); |
1256
|
|
|
|
|
|
|
} |
1257
|
0
|
|
|
|
|
|
$xfer += $input->readStructEnd(); |
1258
|
0
|
|
|
|
|
|
return $xfer; |
1259
|
|
|
|
|
|
|
} |
1260
|
|
|
|
|
|
|
|
1261
|
|
|
|
|
|
|
sub write { |
1262
|
0
|
|
|
0
|
|
|
my ($self, $output) = @_; |
1263
|
0
|
|
|
|
|
|
my $xfer = 0; |
1264
|
0
|
|
|
|
|
|
$xfer += $output->writeStructBegin('Cassandra_multiget_slice_result'); |
1265
|
0
|
0
|
|
|
|
|
if (defined $self->{success}) { |
1266
|
0
|
|
|
|
|
|
$xfer += $output->writeFieldBegin('success', TType::MAP, 0); |
1267
|
|
|
|
|
|
|
{ |
1268
|
0
|
|
|
|
|
|
$xfer += $output->writeMapBegin(TType::STRING, TType::LIST, scalar(keys %{$self->{success}})); |
|
0
|
|
|
|
|
|
|
|
0
|
|
|
|
|
|
|
1269
|
|
|
|
|
|
|
{ |
1270
|
0
|
|
|
|
|
|
while( my ($kiter115,$viter116) = each %{$self->{success}}) |
|
0
|
|
|
|
|
|
|
|
0
|
|
|
|
|
|
|
1271
|
|
|
|
|
|
|
{ |
1272
|
0
|
|
|
|
|
|
$xfer += $output->writeString($kiter115); |
1273
|
|
|
|
|
|
|
{ |
1274
|
0
|
|
|
|
|
|
$xfer += $output->writeListBegin(TType::STRUCT, scalar(@{${viter116}})); |
|
0
|
|
|
|
|
|
|
|
0
|
|
|
|
|
|
|
1275
|
|
|
|
|
|
|
{ |
1276
|
0
|
|
|
|
|
|
foreach my $iter117 (@{${viter116}}) |
|
0
|
|
|
|
|
|
|
|
0
|
|
|
|
|
|
|
1277
|
|
|
|
|
|
|
{ |
1278
|
0
|
|
|
|
|
|
$xfer += ${iter117}->write($output); |
1279
|
|
|
|
|
|
|
} |
1280
|
|
|
|
|
|
|
} |
1281
|
0
|
|
|
|
|
|
$xfer += $output->writeListEnd(); |
1282
|
|
|
|
|
|
|
} |
1283
|
|
|
|
|
|
|
} |
1284
|
|
|
|
|
|
|
} |
1285
|
0
|
|
|
|
|
|
$xfer += $output->writeMapEnd(); |
1286
|
|
|
|
|
|
|
} |
1287
|
0
|
|
|
|
|
|
$xfer += $output->writeFieldEnd(); |
1288
|
|
|
|
|
|
|
} |
1289
|
0
|
0
|
|
|
|
|
if (defined $self->{ire}) { |
1290
|
0
|
|
|
|
|
|
$xfer += $output->writeFieldBegin('ire', TType::STRUCT, 1); |
1291
|
0
|
|
|
|
|
|
$xfer += $self->{ire}->write($output); |
1292
|
0
|
|
|
|
|
|
$xfer += $output->writeFieldEnd(); |
1293
|
|
|
|
|
|
|
} |
1294
|
0
|
0
|
|
|
|
|
if (defined $self->{ue}) { |
1295
|
0
|
|
|
|
|
|
$xfer += $output->writeFieldBegin('ue', TType::STRUCT, 2); |
1296
|
0
|
|
|
|
|
|
$xfer += $self->{ue}->write($output); |
1297
|
0
|
|
|
|
|
|
$xfer += $output->writeFieldEnd(); |
1298
|
|
|
|
|
|
|
} |
1299
|
0
|
0
|
|
|
|
|
if (defined $self->{te}) { |
1300
|
0
|
|
|
|
|
|
$xfer += $output->writeFieldBegin('te', TType::STRUCT, 3); |
1301
|
0
|
|
|
|
|
|
$xfer += $self->{te}->write($output); |
1302
|
0
|
|
|
|
|
|
$xfer += $output->writeFieldEnd(); |
1303
|
|
|
|
|
|
|
} |
1304
|
0
|
|
|
|
|
|
$xfer += $output->writeFieldStop(); |
1305
|
0
|
|
|
|
|
|
$xfer += $output->writeStructEnd(); |
1306
|
0
|
|
|
|
|
|
return $xfer; |
1307
|
|
|
|
|
|
|
} |
1308
|
|
|
|
|
|
|
|
1309
|
|
|
|
|
|
|
package Cassandra::Cassandra_multiget_count_args; |
1310
|
|
|
|
|
|
|
BEGIN { |
1311
|
1
|
|
|
1
|
|
22
|
$Cassandra::Cassandra_multiget_count_args::VERSION = '0.4.0'; |
1312
|
|
|
|
|
|
|
} |
1313
|
1
|
|
|
1
|
|
7
|
use base qw(Class::Accessor); |
|
1
|
|
|
|
|
2
|
|
|
1
|
|
|
|
|
855
|
|
1314
|
|
|
|
|
|
|
Cassandra::Cassandra_multiget_count_args->mk_accessors( qw( keys column_parent predicate consistency_level ) ); |
1315
|
|
|
|
|
|
|
|
1316
|
|
|
|
|
|
|
sub new { |
1317
|
0
|
|
|
0
|
|
|
my $classname = shift; |
1318
|
0
|
|
|
|
|
|
my $self = {}; |
1319
|
0
|
|
0
|
|
|
|
my $vals = shift || {}; |
1320
|
0
|
|
|
|
|
|
$self->{keys} = undef; |
1321
|
0
|
|
|
|
|
|
$self->{column_parent} = undef; |
1322
|
0
|
|
|
|
|
|
$self->{predicate} = undef; |
1323
|
0
|
|
|
|
|
|
$self->{consistency_level} = 1; |
1324
|
0
|
0
|
|
|
|
|
if (UNIVERSAL::isa($vals,'HASH')) { |
1325
|
0
|
0
|
|
|
|
|
if (defined $vals->{keys}) { |
1326
|
0
|
|
|
|
|
|
$self->{keys} = $vals->{keys}; |
1327
|
|
|
|
|
|
|
} |
1328
|
0
|
0
|
|
|
|
|
if (defined $vals->{column_parent}) { |
1329
|
0
|
|
|
|
|
|
$self->{column_parent} = $vals->{column_parent}; |
1330
|
|
|
|
|
|
|
} |
1331
|
0
|
0
|
|
|
|
|
if (defined $vals->{predicate}) { |
1332
|
0
|
|
|
|
|
|
$self->{predicate} = $vals->{predicate}; |
1333
|
|
|
|
|
|
|
} |
1334
|
0
|
0
|
|
|
|
|
if (defined $vals->{consistency_level}) { |
1335
|
0
|
|
|
|
|
|
$self->{consistency_level} = $vals->{consistency_level}; |
1336
|
|
|
|
|
|
|
} |
1337
|
|
|
|
|
|
|
} |
1338
|
0
|
|
|
|
|
|
return bless ($self, $classname); |
1339
|
|
|
|
|
|
|
} |
1340
|
|
|
|
|
|
|
|
1341
|
|
|
|
|
|
|
sub getName { |
1342
|
0
|
|
|
0
|
|
|
return 'Cassandra_multiget_count_args'; |
1343
|
|
|
|
|
|
|
} |
1344
|
|
|
|
|
|
|
|
1345
|
|
|
|
|
|
|
sub read { |
1346
|
0
|
|
|
0
|
|
|
my ($self, $input) = @_; |
1347
|
0
|
|
|
|
|
|
my $xfer = 0; |
1348
|
0
|
|
|
|
|
|
my $fname; |
1349
|
0
|
|
|
|
|
|
my $ftype = 0; |
1350
|
0
|
|
|
|
|
|
my $fid = 0; |
1351
|
0
|
|
|
|
|
|
$xfer += $input->readStructBegin(\$fname); |
1352
|
0
|
|
|
|
|
|
while (1) |
1353
|
|
|
|
|
|
|
{ |
1354
|
0
|
|
|
|
|
|
$xfer += $input->readFieldBegin(\$fname, \$ftype, \$fid); |
1355
|
0
|
0
|
|
|
|
|
if ($ftype == TType::STOP) { |
1356
|
0
|
|
|
|
|
|
last; |
1357
|
|
|
|
|
|
|
} |
1358
|
0
|
|
|
|
|
|
SWITCH: for($fid) |
1359
|
|
|
|
|
|
|
{ |
1360
|
0
|
0
|
|
|
|
|
/^1$/ && do{ if ($ftype == TType::LIST) { |
|
0
|
0
|
|
|
|
|
|
1361
|
|
|
|
|
|
|
{ |
1362
|
0
|
|
|
|
|
|
my $_size118 = 0; |
|
0
|
|
|
|
|
|
|
1363
|
0
|
|
|
|
|
|
$self->{keys} = []; |
1364
|
0
|
|
|
|
|
|
my $_etype121 = 0; |
1365
|
0
|
|
|
|
|
|
$xfer += $input->readListBegin(\$_etype121, \$_size118); |
1366
|
0
|
|
|
|
|
|
for (my $_i122 = 0; $_i122 < $_size118; ++$_i122) |
1367
|
|
|
|
|
|
|
{ |
1368
|
0
|
|
|
|
|
|
my $elem123 = undef; |
1369
|
0
|
|
|
|
|
|
$xfer += $input->readString(\$elem123); |
1370
|
0
|
|
|
|
|
|
push(@{$self->{keys}},$elem123); |
|
0
|
|
|
|
|
|
|
1371
|
|
|
|
|
|
|
} |
1372
|
0
|
|
|
|
|
|
$xfer += $input->readListEnd(); |
1373
|
|
|
|
|
|
|
} |
1374
|
|
|
|
|
|
|
} else { |
1375
|
0
|
|
|
|
|
|
$xfer += $input->skip($ftype); |
1376
|
|
|
|
|
|
|
} |
1377
|
0
|
|
|
|
|
|
last; }; |
1378
|
0
|
0
|
|
|
|
|
/^2$/ && do{ if ($ftype == TType::STRUCT) { |
|
0
|
0
|
|
|
|
|
|
1379
|
0
|
|
|
|
|
|
$self->{column_parent} = new Cassandra::ColumnParent(); |
1380
|
0
|
|
|
|
|
|
$xfer += $self->{column_parent}->read($input); |
1381
|
|
|
|
|
|
|
} else { |
1382
|
0
|
|
|
|
|
|
$xfer += $input->skip($ftype); |
1383
|
|
|
|
|
|
|
} |
1384
|
0
|
|
|
|
|
|
last; }; |
1385
|
0
|
0
|
|
|
|
|
/^3$/ && do{ if ($ftype == TType::STRUCT) { |
|
0
|
0
|
|
|
|
|
|
1386
|
0
|
|
|
|
|
|
$self->{predicate} = new Cassandra::SlicePredicate(); |
1387
|
0
|
|
|
|
|
|
$xfer += $self->{predicate}->read($input); |
1388
|
|
|
|
|
|
|
} else { |
1389
|
0
|
|
|
|
|
|
$xfer += $input->skip($ftype); |
1390
|
|
|
|
|
|
|
} |
1391
|
0
|
|
|
|
|
|
last; }; |
1392
|
0
|
0
|
|
|
|
|
/^4$/ && do{ if ($ftype == TType::I32) { |
|
0
|
0
|
|
|
|
|
|
1393
|
0
|
|
|
|
|
|
$xfer += $input->readI32(\$self->{consistency_level}); |
1394
|
|
|
|
|
|
|
} else { |
1395
|
0
|
|
|
|
|
|
$xfer += $input->skip($ftype); |
1396
|
|
|
|
|
|
|
} |
1397
|
0
|
|
|
|
|
|
last; }; |
1398
|
0
|
|
|
|
|
|
$xfer += $input->skip($ftype); |
1399
|
|
|
|
|
|
|
} |
1400
|
0
|
|
|
|
|
|
$xfer += $input->readFieldEnd(); |
1401
|
|
|
|
|
|
|
} |
1402
|
0
|
|
|
|
|
|
$xfer += $input->readStructEnd(); |
1403
|
0
|
|
|
|
|
|
return $xfer; |
1404
|
|
|
|
|
|
|
} |
1405
|
|
|
|
|
|
|
|
1406
|
|
|
|
|
|
|
sub write { |
1407
|
0
|
|
|
0
|
|
|
my ($self, $output) = @_; |
1408
|
0
|
|
|
|
|
|
my $xfer = 0; |
1409
|
0
|
|
|
|
|
|
$xfer += $output->writeStructBegin('Cassandra_multiget_count_args'); |
1410
|
0
|
0
|
|
|
|
|
if (defined $self->{keys}) { |
1411
|
0
|
|
|
|
|
|
$xfer += $output->writeFieldBegin('keys', TType::LIST, 1); |
1412
|
|
|
|
|
|
|
{ |
1413
|
0
|
|
|
|
|
|
$xfer += $output->writeListBegin(TType::STRING, scalar(@{$self->{keys}})); |
|
0
|
|
|
|
|
|
|
|
0
|
|
|
|
|
|
|
1414
|
|
|
|
|
|
|
{ |
1415
|
0
|
|
|
|
|
|
foreach my $iter124 (@{$self->{keys}}) |
|
0
|
|
|
|
|
|
|
|
0
|
|
|
|
|
|
|
1416
|
|
|
|
|
|
|
{ |
1417
|
0
|
|
|
|
|
|
$xfer += $output->writeString($iter124); |
1418
|
|
|
|
|
|
|
} |
1419
|
|
|
|
|
|
|
} |
1420
|
0
|
|
|
|
|
|
$xfer += $output->writeListEnd(); |
1421
|
|
|
|
|
|
|
} |
1422
|
0
|
|
|
|
|
|
$xfer += $output->writeFieldEnd(); |
1423
|
|
|
|
|
|
|
} |
1424
|
0
|
0
|
|
|
|
|
if (defined $self->{column_parent}) { |
1425
|
0
|
|
|
|
|
|
$xfer += $output->writeFieldBegin('column_parent', TType::STRUCT, 2); |
1426
|
0
|
|
|
|
|
|
$xfer += $self->{column_parent}->write($output); |
1427
|
0
|
|
|
|
|
|
$xfer += $output->writeFieldEnd(); |
1428
|
|
|
|
|
|
|
} |
1429
|
0
|
0
|
|
|
|
|
if (defined $self->{predicate}) { |
1430
|
0
|
|
|
|
|
|
$xfer += $output->writeFieldBegin('predicate', TType::STRUCT, 3); |
1431
|
0
|
|
|
|
|
|
$xfer += $self->{predicate}->write($output); |
1432
|
0
|
|
|
|
|
|
$xfer += $output->writeFieldEnd(); |
1433
|
|
|
|
|
|
|
} |
1434
|
0
|
0
|
|
|
|
|
if (defined $self->{consistency_level}) { |
1435
|
0
|
|
|
|
|
|
$xfer += $output->writeFieldBegin('consistency_level', TType::I32, 4); |
1436
|
0
|
|
|
|
|
|
$xfer += $output->writeI32($self->{consistency_level}); |
1437
|
0
|
|
|
|
|
|
$xfer += $output->writeFieldEnd(); |
1438
|
|
|
|
|
|
|
} |
1439
|
0
|
|
|
|
|
|
$xfer += $output->writeFieldStop(); |
1440
|
0
|
|
|
|
|
|
$xfer += $output->writeStructEnd(); |
1441
|
0
|
|
|
|
|
|
return $xfer; |
1442
|
|
|
|
|
|
|
} |
1443
|
|
|
|
|
|
|
|
1444
|
|
|
|
|
|
|
package Cassandra::Cassandra_multiget_count_result; |
1445
|
|
|
|
|
|
|
BEGIN { |
1446
|
1
|
|
|
1
|
|
16
|
$Cassandra::Cassandra_multiget_count_result::VERSION = '0.4.0'; |
1447
|
|
|
|
|
|
|
} |
1448
|
1
|
|
|
1
|
|
5
|
use base qw(Class::Accessor); |
|
1
|
|
|
|
|
2
|
|
|
1
|
|
|
|
|
825
|
|
1449
|
|
|
|
|
|
|
Cassandra::Cassandra_multiget_count_result->mk_accessors( qw( success ) ); |
1450
|
|
|
|
|
|
|
|
1451
|
|
|
|
|
|
|
sub new { |
1452
|
0
|
|
|
0
|
|
|
my $classname = shift; |
1453
|
0
|
|
|
|
|
|
my $self = {}; |
1454
|
0
|
|
0
|
|
|
|
my $vals = shift || {}; |
1455
|
0
|
|
|
|
|
|
$self->{success} = undef; |
1456
|
0
|
|
|
|
|
|
$self->{ire} = undef; |
1457
|
0
|
|
|
|
|
|
$self->{ue} = undef; |
1458
|
0
|
|
|
|
|
|
$self->{te} = undef; |
1459
|
0
|
0
|
|
|
|
|
if (UNIVERSAL::isa($vals,'HASH')) { |
1460
|
0
|
0
|
|
|
|
|
if (defined $vals->{success}) { |
1461
|
0
|
|
|
|
|
|
$self->{success} = $vals->{success}; |
1462
|
|
|
|
|
|
|
} |
1463
|
0
|
0
|
|
|
|
|
if (defined $vals->{ire}) { |
1464
|
0
|
|
|
|
|
|
$self->{ire} = $vals->{ire}; |
1465
|
|
|
|
|
|
|
} |
1466
|
0
|
0
|
|
|
|
|
if (defined $vals->{ue}) { |
1467
|
0
|
|
|
|
|
|
$self->{ue} = $vals->{ue}; |
1468
|
|
|
|
|
|
|
} |
1469
|
0
|
0
|
|
|
|
|
if (defined $vals->{te}) { |
1470
|
0
|
|
|
|
|
|
$self->{te} = $vals->{te}; |
1471
|
|
|
|
|
|
|
} |
1472
|
|
|
|
|
|
|
} |
1473
|
0
|
|
|
|
|
|
return bless ($self, $classname); |
1474
|
|
|
|
|
|
|
} |
1475
|
|
|
|
|
|
|
|
1476
|
|
|
|
|
|
|
sub getName { |
1477
|
0
|
|
|
0
|
|
|
return 'Cassandra_multiget_count_result'; |
1478
|
|
|
|
|
|
|
} |
1479
|
|
|
|
|
|
|
|
1480
|
|
|
|
|
|
|
sub read { |
1481
|
0
|
|
|
0
|
|
|
my ($self, $input) = @_; |
1482
|
0
|
|
|
|
|
|
my $xfer = 0; |
1483
|
0
|
|
|
|
|
|
my $fname; |
1484
|
0
|
|
|
|
|
|
my $ftype = 0; |
1485
|
0
|
|
|
|
|
|
my $fid = 0; |
1486
|
0
|
|
|
|
|
|
$xfer += $input->readStructBegin(\$fname); |
1487
|
0
|
|
|
|
|
|
while (1) |
1488
|
|
|
|
|
|
|
{ |
1489
|
0
|
|
|
|
|
|
$xfer += $input->readFieldBegin(\$fname, \$ftype, \$fid); |
1490
|
0
|
0
|
|
|
|
|
if ($ftype == TType::STOP) { |
1491
|
0
|
|
|
|
|
|
last; |
1492
|
|
|
|
|
|
|
} |
1493
|
0
|
|
|
|
|
|
SWITCH: for($fid) |
1494
|
|
|
|
|
|
|
{ |
1495
|
0
|
0
|
|
|
|
|
/^0$/ && do{ if ($ftype == TType::MAP) { |
|
0
|
0
|
|
|
|
|
|
1496
|
|
|
|
|
|
|
{ |
1497
|
0
|
|
|
|
|
|
my $_size125 = 0; |
|
0
|
|
|
|
|
|
|
1498
|
0
|
|
|
|
|
|
$self->{success} = {}; |
1499
|
0
|
|
|
|
|
|
my $_ktype126 = 0; |
1500
|
0
|
|
|
|
|
|
my $_vtype127 = 0; |
1501
|
0
|
|
|
|
|
|
$xfer += $input->readMapBegin(\$_ktype126, \$_vtype127, \$_size125); |
1502
|
0
|
|
|
|
|
|
for (my $_i129 = 0; $_i129 < $_size125; ++$_i129) |
1503
|
|
|
|
|
|
|
{ |
1504
|
0
|
|
|
|
|
|
my $key130 = ''; |
1505
|
0
|
|
|
|
|
|
my $val131 = 0; |
1506
|
0
|
|
|
|
|
|
$xfer += $input->readString(\$key130); |
1507
|
0
|
|
|
|
|
|
$xfer += $input->readI32(\$val131); |
1508
|
0
|
|
|
|
|
|
$self->{success}->{$key130} = $val131; |
1509
|
|
|
|
|
|
|
} |
1510
|
0
|
|
|
|
|
|
$xfer += $input->readMapEnd(); |
1511
|
|
|
|
|
|
|
} |
1512
|
|
|
|
|
|
|
} else { |
1513
|
0
|
|
|
|
|
|
$xfer += $input->skip($ftype); |
1514
|
|
|
|
|
|
|
} |
1515
|
0
|
|
|
|
|
|
last; }; |
1516
|
0
|
0
|
|
|
|
|
/^1$/ && do{ if ($ftype == TType::STRUCT) { |
|
0
|
0
|
|
|
|
|
|
1517
|
0
|
|
|
|
|
|
$self->{ire} = new Cassandra::InvalidRequestException(); |
1518
|
0
|
|
|
|
|
|
$xfer += $self->{ire}->read($input); |
1519
|
|
|
|
|
|
|
} else { |
1520
|
0
|
|
|
|
|
|
$xfer += $input->skip($ftype); |
1521
|
|
|
|
|
|
|
} |
1522
|
0
|
|
|
|
|
|
last; }; |
1523
|
0
|
0
|
|
|
|
|
/^2$/ && do{ if ($ftype == TType::STRUCT) { |
|
0
|
0
|
|
|
|
|
|
1524
|
0
|
|
|
|
|
|
$self->{ue} = new Cassandra::UnavailableException(); |
1525
|
0
|
|
|
|
|
|
$xfer += $self->{ue}->read($input); |
1526
|
|
|
|
|
|
|
} else { |
1527
|
0
|
|
|
|
|
|
$xfer += $input->skip($ftype); |
1528
|
|
|
|
|
|
|
} |
1529
|
0
|
|
|
|
|
|
last; }; |
1530
|
0
|
0
|
|
|
|
|
/^3$/ && do{ if ($ftype == TType::STRUCT) { |
|
0
|
0
|
|
|
|
|
|
1531
|
0
|
|
|
|
|
|
$self->{te} = new Cassandra::TimedOutException(); |
1532
|
0
|
|
|
|
|
|
$xfer += $self->{te}->read($input); |
1533
|
|
|
|
|
|
|
} else { |
1534
|
0
|
|
|
|
|
|
$xfer += $input->skip($ftype); |
1535
|
|
|
|
|
|
|
} |
1536
|
0
|
|
|
|
|
|
last; }; |
1537
|
0
|
|
|
|
|
|
$xfer += $input->skip($ftype); |
1538
|
|
|
|
|
|
|
} |
1539
|
0
|
|
|
|
|
|
$xfer += $input->readFieldEnd(); |
1540
|
|
|
|
|
|
|
} |
1541
|
0
|
|
|
|
|
|
$xfer += $input->readStructEnd(); |
1542
|
0
|
|
|
|
|
|
return $xfer; |
1543
|
|
|
|
|
|
|
} |
1544
|
|
|
|
|
|
|
|
1545
|
|
|
|
|
|
|
sub write { |
1546
|
0
|
|
|
0
|
|
|
my ($self, $output) = @_; |
1547
|
0
|
|
|
|
|
|
my $xfer = 0; |
1548
|
0
|
|
|
|
|
|
$xfer += $output->writeStructBegin('Cassandra_multiget_count_result'); |
1549
|
0
|
0
|
|
|
|
|
if (defined $self->{success}) { |
1550
|
0
|
|
|
|
|
|
$xfer += $output->writeFieldBegin('success', TType::MAP, 0); |
1551
|
|
|
|
|
|
|
{ |
1552
|
0
|
|
|
|
|
|
$xfer += $output->writeMapBegin(TType::STRING, TType::I32, scalar(keys %{$self->{success}})); |
|
0
|
|
|
|
|
|
|
|
0
|
|
|
|
|
|
|
1553
|
|
|
|
|
|
|
{ |
1554
|
0
|
|
|
|
|
|
while( my ($kiter132,$viter133) = each %{$self->{success}}) |
|
0
|
|
|
|
|
|
|
|
0
|
|
|
|
|
|
|
1555
|
|
|
|
|
|
|
{ |
1556
|
0
|
|
|
|
|
|
$xfer += $output->writeString($kiter132); |
1557
|
0
|
|
|
|
|
|
$xfer += $output->writeI32($viter133); |
1558
|
|
|
|
|
|
|
} |
1559
|
|
|
|
|
|
|
} |
1560
|
0
|
|
|
|
|
|
$xfer += $output->writeMapEnd(); |
1561
|
|
|
|
|
|
|
} |
1562
|
0
|
|
|
|
|
|
$xfer += $output->writeFieldEnd(); |
1563
|
|
|
|
|
|
|
} |
1564
|
0
|
0
|
|
|
|
|
if (defined $self->{ire}) { |
1565
|
0
|
|
|
|
|
|
$xfer += $output->writeFieldBegin('ire', TType::STRUCT, 1); |
1566
|
0
|
|
|
|
|
|
$xfer += $self->{ire}->write($output); |
1567
|
0
|
|
|
|
|
|
$xfer += $output->writeFieldEnd(); |
1568
|
|
|
|
|
|
|
} |
1569
|
0
|
0
|
|
|
|
|
if (defined $self->{ue}) { |
1570
|
0
|
|
|
|
|
|
$xfer += $output->writeFieldBegin('ue', TType::STRUCT, 2); |
1571
|
0
|
|
|
|
|
|
$xfer += $self->{ue}->write($output); |
1572
|
0
|
|
|
|
|
|
$xfer += $output->writeFieldEnd(); |
1573
|
|
|
|
|
|
|
} |
1574
|
0
|
0
|
|
|
|
|
if (defined $self->{te}) { |
1575
|
0
|
|
|
|
|
|
$xfer += $output->writeFieldBegin('te', TType::STRUCT, 3); |
1576
|
0
|
|
|
|
|
|
$xfer += $self->{te}->write($output); |
1577
|
0
|
|
|
|
|
|
$xfer += $output->writeFieldEnd(); |
1578
|
|
|
|
|
|
|
} |
1579
|
0
|
|
|
|
|
|
$xfer += $output->writeFieldStop(); |
1580
|
0
|
|
|
|
|
|
$xfer += $output->writeStructEnd(); |
1581
|
0
|
|
|
|
|
|
return $xfer; |
1582
|
|
|
|
|
|
|
} |
1583
|
|
|
|
|
|
|
|
1584
|
|
|
|
|
|
|
package Cassandra::Cassandra_get_range_slices_args; |
1585
|
|
|
|
|
|
|
BEGIN { |
1586
|
1
|
|
|
1
|
|
21
|
$Cassandra::Cassandra_get_range_slices_args::VERSION = '0.4.0'; |
1587
|
|
|
|
|
|
|
} |
1588
|
1
|
|
|
1
|
|
7
|
use base qw(Class::Accessor); |
|
1
|
|
|
|
|
1
|
|
|
1
|
|
|
|
|
733
|
|
1589
|
|
|
|
|
|
|
Cassandra::Cassandra_get_range_slices_args->mk_accessors( qw( column_parent predicate range consistency_level ) ); |
1590
|
|
|
|
|
|
|
|
1591
|
|
|
|
|
|
|
sub new { |
1592
|
0
|
|
|
0
|
|
|
my $classname = shift; |
1593
|
0
|
|
|
|
|
|
my $self = {}; |
1594
|
0
|
|
0
|
|
|
|
my $vals = shift || {}; |
1595
|
0
|
|
|
|
|
|
$self->{column_parent} = undef; |
1596
|
0
|
|
|
|
|
|
$self->{predicate} = undef; |
1597
|
0
|
|
|
|
|
|
$self->{range} = undef; |
1598
|
0
|
|
|
|
|
|
$self->{consistency_level} = 1; |
1599
|
0
|
0
|
|
|
|
|
if (UNIVERSAL::isa($vals,'HASH')) { |
1600
|
0
|
0
|
|
|
|
|
if (defined $vals->{column_parent}) { |
1601
|
0
|
|
|
|
|
|
$self->{column_parent} = $vals->{column_parent}; |
1602
|
|
|
|
|
|
|
} |
1603
|
0
|
0
|
|
|
|
|
if (defined $vals->{predicate}) { |
1604
|
0
|
|
|
|
|
|
$self->{predicate} = $vals->{predicate}; |
1605
|
|
|
|
|
|
|
} |
1606
|
0
|
0
|
|
|
|
|
if (defined $vals->{range}) { |
1607
|
0
|
|
|
|
|
|
$self->{range} = $vals->{range}; |
1608
|
|
|
|
|
|
|
} |
1609
|
0
|
0
|
|
|
|
|
if (defined $vals->{consistency_level}) { |
1610
|
0
|
|
|
|
|
|
$self->{consistency_level} = $vals->{consistency_level}; |
1611
|
|
|
|
|
|
|
} |
1612
|
|
|
|
|
|
|
} |
1613
|
0
|
|
|
|
|
|
return bless ($self, $classname); |
1614
|
|
|
|
|
|
|
} |
1615
|
|
|
|
|
|
|
|
1616
|
|
|
|
|
|
|
sub getName { |
1617
|
0
|
|
|
0
|
|
|
return 'Cassandra_get_range_slices_args'; |
1618
|
|
|
|
|
|
|
} |
1619
|
|
|
|
|
|
|
|
1620
|
|
|
|
|
|
|
sub read { |
1621
|
0
|
|
|
0
|
|
|
my ($self, $input) = @_; |
1622
|
0
|
|
|
|
|
|
my $xfer = 0; |
1623
|
0
|
|
|
|
|
|
my $fname; |
1624
|
0
|
|
|
|
|
|
my $ftype = 0; |
1625
|
0
|
|
|
|
|
|
my $fid = 0; |
1626
|
0
|
|
|
|
|
|
$xfer += $input->readStructBegin(\$fname); |
1627
|
0
|
|
|
|
|
|
while (1) |
1628
|
|
|
|
|
|
|
{ |
1629
|
0
|
|
|
|
|
|
$xfer += $input->readFieldBegin(\$fname, \$ftype, \$fid); |
1630
|
0
|
0
|
|
|
|
|
if ($ftype == TType::STOP) { |
1631
|
0
|
|
|
|
|
|
last; |
1632
|
|
|
|
|
|
|
} |
1633
|
0
|
|
|
|
|
|
SWITCH: for($fid) |
1634
|
|
|
|
|
|
|
{ |
1635
|
0
|
0
|
|
|
|
|
/^1$/ && do{ if ($ftype == TType::STRUCT) { |
|
0
|
0
|
|
|
|
|
|
1636
|
0
|
|
|
|
|
|
$self->{column_parent} = new Cassandra::ColumnParent(); |
1637
|
0
|
|
|
|
|
|
$xfer += $self->{column_parent}->read($input); |
1638
|
|
|
|
|
|
|
} else { |
1639
|
0
|
|
|
|
|
|
$xfer += $input->skip($ftype); |
1640
|
|
|
|
|
|
|
} |
1641
|
0
|
|
|
|
|
|
last; }; |
1642
|
0
|
0
|
|
|
|
|
/^2$/ && do{ if ($ftype == TType::STRUCT) { |
|
0
|
0
|
|
|
|
|
|
1643
|
0
|
|
|
|
|
|
$self->{predicate} = new Cassandra::SlicePredicate(); |
1644
|
0
|
|
|
|
|
|
$xfer += $self->{predicate}->read($input); |
1645
|
|
|
|
|
|
|
} else { |
1646
|
0
|
|
|
|
|
|
$xfer += $input->skip($ftype); |
1647
|
|
|
|
|
|
|
} |
1648
|
0
|
|
|
|
|
|
last; }; |
1649
|
0
|
0
|
|
|
|
|
/^3$/ && do{ if ($ftype == TType::STRUCT) { |
|
0
|
0
|
|
|
|
|
|
1650
|
0
|
|
|
|
|
|
$self->{range} = new Cassandra::KeyRange(); |
1651
|
0
|
|
|
|
|
|
$xfer += $self->{range}->read($input); |
1652
|
|
|
|
|
|
|
} else { |
1653
|
0
|
|
|
|
|
|
$xfer += $input->skip($ftype); |
1654
|
|
|
|
|
|
|
} |
1655
|
0
|
|
|
|
|
|
last; }; |
1656
|
0
|
0
|
|
|
|
|
/^4$/ && do{ if ($ftype == TType::I32) { |
|
0
|
0
|
|
|
|
|
|
1657
|
0
|
|
|
|
|
|
$xfer += $input->readI32(\$self->{consistency_level}); |
1658
|
|
|
|
|
|
|
} else { |
1659
|
0
|
|
|
|
|
|
$xfer += $input->skip($ftype); |
1660
|
|
|
|
|
|
|
} |
1661
|
0
|
|
|
|
|
|
last; }; |
1662
|
0
|
|
|
|
|
|
$xfer += $input->skip($ftype); |
1663
|
|
|
|
|
|
|
} |
1664
|
0
|
|
|
|
|
|
$xfer += $input->readFieldEnd(); |
1665
|
|
|
|
|
|
|
} |
1666
|
0
|
|
|
|
|
|
$xfer += $input->readStructEnd(); |
1667
|
0
|
|
|
|
|
|
return $xfer; |
1668
|
|
|
|
|
|
|
} |
1669
|
|
|
|
|
|
|
|
1670
|
|
|
|
|
|
|
sub write { |
1671
|
0
|
|
|
0
|
|
|
my ($self, $output) = @_; |
1672
|
0
|
|
|
|
|
|
my $xfer = 0; |
1673
|
0
|
|
|
|
|
|
$xfer += $output->writeStructBegin('Cassandra_get_range_slices_args'); |
1674
|
0
|
0
|
|
|
|
|
if (defined $self->{column_parent}) { |
1675
|
0
|
|
|
|
|
|
$xfer += $output->writeFieldBegin('column_parent', TType::STRUCT, 1); |
1676
|
0
|
|
|
|
|
|
$xfer += $self->{column_parent}->write($output); |
1677
|
0
|
|
|
|
|
|
$xfer += $output->writeFieldEnd(); |
1678
|
|
|
|
|
|
|
} |
1679
|
0
|
0
|
|
|
|
|
if (defined $self->{predicate}) { |
1680
|
0
|
|
|
|
|
|
$xfer += $output->writeFieldBegin('predicate', TType::STRUCT, 2); |
1681
|
0
|
|
|
|
|
|
$xfer += $self->{predicate}->write($output); |
1682
|
0
|
|
|
|
|
|
$xfer += $output->writeFieldEnd(); |
1683
|
|
|
|
|
|
|
} |
1684
|
0
|
0
|
|
|
|
|
if (defined $self->{range}) { |
1685
|
0
|
|
|
|
|
|
$xfer += $output->writeFieldBegin('range', TType::STRUCT, 3); |
1686
|
0
|
|
|
|
|
|
$xfer += $self->{range}->write($output); |
1687
|
0
|
|
|
|
|
|
$xfer += $output->writeFieldEnd(); |
1688
|
|
|
|
|
|
|
} |
1689
|
0
|
0
|
|
|
|
|
if (defined $self->{consistency_level}) { |
1690
|
0
|
|
|
|
|
|
$xfer += $output->writeFieldBegin('consistency_level', TType::I32, 4); |
1691
|
0
|
|
|
|
|
|
$xfer += $output->writeI32($self->{consistency_level}); |
1692
|
0
|
|
|
|
|
|
$xfer += $output->writeFieldEnd(); |
1693
|
|
|
|
|
|
|
} |
1694
|
0
|
|
|
|
|
|
$xfer += $output->writeFieldStop(); |
1695
|
0
|
|
|
|
|
|
$xfer += $output->writeStructEnd(); |
1696
|
0
|
|
|
|
|
|
return $xfer; |
1697
|
|
|
|
|
|
|
} |
1698
|
|
|
|
|
|
|
|
1699
|
|
|
|
|
|
|
package Cassandra::Cassandra_get_range_slices_result; |
1700
|
|
|
|
|
|
|
BEGIN { |
1701
|
1
|
|
|
1
|
|
15
|
$Cassandra::Cassandra_get_range_slices_result::VERSION = '0.4.0'; |
1702
|
|
|
|
|
|
|
} |
1703
|
1
|
|
|
1
|
|
6
|
use base qw(Class::Accessor); |
|
1
|
|
|
|
|
2
|
|
|
1
|
|
|
|
|
806
|
|
1704
|
|
|
|
|
|
|
Cassandra::Cassandra_get_range_slices_result->mk_accessors( qw( success ) ); |
1705
|
|
|
|
|
|
|
|
1706
|
|
|
|
|
|
|
sub new { |
1707
|
0
|
|
|
0
|
|
|
my $classname = shift; |
1708
|
0
|
|
|
|
|
|
my $self = {}; |
1709
|
0
|
|
0
|
|
|
|
my $vals = shift || {}; |
1710
|
0
|
|
|
|
|
|
$self->{success} = undef; |
1711
|
0
|
|
|
|
|
|
$self->{ire} = undef; |
1712
|
0
|
|
|
|
|
|
$self->{ue} = undef; |
1713
|
0
|
|
|
|
|
|
$self->{te} = undef; |
1714
|
0
|
0
|
|
|
|
|
if (UNIVERSAL::isa($vals,'HASH')) { |
1715
|
0
|
0
|
|
|
|
|
if (defined $vals->{success}) { |
1716
|
0
|
|
|
|
|
|
$self->{success} = $vals->{success}; |
1717
|
|
|
|
|
|
|
} |
1718
|
0
|
0
|
|
|
|
|
if (defined $vals->{ire}) { |
1719
|
0
|
|
|
|
|
|
$self->{ire} = $vals->{ire}; |
1720
|
|
|
|
|
|
|
} |
1721
|
0
|
0
|
|
|
|
|
if (defined $vals->{ue}) { |
1722
|
0
|
|
|
|
|
|
$self->{ue} = $vals->{ue}; |
1723
|
|
|
|
|
|
|
} |
1724
|
0
|
0
|
|
|
|
|
if (defined $vals->{te}) { |
1725
|
0
|
|
|
|
|
|
$self->{te} = $vals->{te}; |
1726
|
|
|
|
|
|
|
} |
1727
|
|
|
|
|
|
|
} |
1728
|
0
|
|
|
|
|
|
return bless ($self, $classname); |
1729
|
|
|
|
|
|
|
} |
1730
|
|
|
|
|
|
|
|
1731
|
|
|
|
|
|
|
sub getName { |
1732
|
0
|
|
|
0
|
|
|
return 'Cassandra_get_range_slices_result'; |
1733
|
|
|
|
|
|
|
} |
1734
|
|
|
|
|
|
|
|
1735
|
|
|
|
|
|
|
sub read { |
1736
|
0
|
|
|
0
|
|
|
my ($self, $input) = @_; |
1737
|
0
|
|
|
|
|
|
my $xfer = 0; |
1738
|
0
|
|
|
|
|
|
my $fname; |
1739
|
0
|
|
|
|
|
|
my $ftype = 0; |
1740
|
0
|
|
|
|
|
|
my $fid = 0; |
1741
|
0
|
|
|
|
|
|
$xfer += $input->readStructBegin(\$fname); |
1742
|
0
|
|
|
|
|
|
while (1) |
1743
|
|
|
|
|
|
|
{ |
1744
|
0
|
|
|
|
|
|
$xfer += $input->readFieldBegin(\$fname, \$ftype, \$fid); |
1745
|
0
|
0
|
|
|
|
|
if ($ftype == TType::STOP) { |
1746
|
0
|
|
|
|
|
|
last; |
1747
|
|
|
|
|
|
|
} |
1748
|
0
|
|
|
|
|
|
SWITCH: for($fid) |
1749
|
|
|
|
|
|
|
{ |
1750
|
0
|
0
|
|
|
|
|
/^0$/ && do{ if ($ftype == TType::LIST) { |
|
0
|
0
|
|
|
|
|
|
1751
|
|
|
|
|
|
|
{ |
1752
|
0
|
|
|
|
|
|
my $_size134 = 0; |
|
0
|
|
|
|
|
|
|
1753
|
0
|
|
|
|
|
|
$self->{success} = []; |
1754
|
0
|
|
|
|
|
|
my $_etype137 = 0; |
1755
|
0
|
|
|
|
|
|
$xfer += $input->readListBegin(\$_etype137, \$_size134); |
1756
|
0
|
|
|
|
|
|
for (my $_i138 = 0; $_i138 < $_size134; ++$_i138) |
1757
|
|
|
|
|
|
|
{ |
1758
|
0
|
|
|
|
|
|
my $elem139 = undef; |
1759
|
0
|
|
|
|
|
|
$elem139 = new Cassandra::KeySlice(); |
1760
|
0
|
|
|
|
|
|
$xfer += $elem139->read($input); |
1761
|
0
|
|
|
|
|
|
push(@{$self->{success}},$elem139); |
|
0
|
|
|
|
|
|
|
1762
|
|
|
|
|
|
|
} |
1763
|
0
|
|
|
|
|
|
$xfer += $input->readListEnd(); |
1764
|
|
|
|
|
|
|
} |
1765
|
|
|
|
|
|
|
} else { |
1766
|
0
|
|
|
|
|
|
$xfer += $input->skip($ftype); |
1767
|
|
|
|
|
|
|
} |
1768
|
0
|
|
|
|
|
|
last; }; |
1769
|
0
|
0
|
|
|
|
|
/^1$/ && do{ if ($ftype == TType::STRUCT) { |
|
0
|
0
|
|
|
|
|
|
1770
|
0
|
|
|
|
|
|
$self->{ire} = new Cassandra::InvalidRequestException(); |
1771
|
0
|
|
|
|
|
|
$xfer += $self->{ire}->read($input); |
1772
|
|
|
|
|
|
|
} else { |
1773
|
0
|
|
|
|
|
|
$xfer += $input->skip($ftype); |
1774
|
|
|
|
|
|
|
} |
1775
|
0
|
|
|
|
|
|
last; }; |
1776
|
0
|
0
|
|
|
|
|
/^2$/ && do{ if ($ftype == TType::STRUCT) { |
|
0
|
0
|
|
|
|
|
|
1777
|
0
|
|
|
|
|
|
$self->{ue} = new Cassandra::UnavailableException(); |
1778
|
0
|
|
|
|
|
|
$xfer += $self->{ue}->read($input); |
1779
|
|
|
|
|
|
|
} else { |
1780
|
0
|
|
|
|
|
|
$xfer += $input->skip($ftype); |
1781
|
|
|
|
|
|
|
} |
1782
|
0
|
|
|
|
|
|
last; }; |
1783
|
0
|
0
|
|
|
|
|
/^3$/ && do{ if ($ftype == TType::STRUCT) { |
|
0
|
0
|
|
|
|
|
|
1784
|
0
|
|
|
|
|
|
$self->{te} = new Cassandra::TimedOutException(); |
1785
|
0
|
|
|
|
|
|
$xfer += $self->{te}->read($input); |
1786
|
|
|
|
|
|
|
} else { |
1787
|
0
|
|
|
|
|
|
$xfer += $input->skip($ftype); |
1788
|
|
|
|
|
|
|
} |
1789
|
0
|
|
|
|
|
|
last; }; |
1790
|
0
|
|
|
|
|
|
$xfer += $input->skip($ftype); |
1791
|
|
|
|
|
|
|
} |
1792
|
0
|
|
|
|
|
|
$xfer += $input->readFieldEnd(); |
1793
|
|
|
|
|
|
|
} |
1794
|
0
|
|
|
|
|
|
$xfer += $input->readStructEnd(); |
1795
|
0
|
|
|
|
|
|
return $xfer; |
1796
|
|
|
|
|
|
|
} |
1797
|
|
|
|
|
|
|
|
1798
|
|
|
|
|
|
|
sub write { |
1799
|
0
|
|
|
0
|
|
|
my ($self, $output) = @_; |
1800
|
0
|
|
|
|
|
|
my $xfer = 0; |
1801
|
0
|
|
|
|
|
|
$xfer += $output->writeStructBegin('Cassandra_get_range_slices_result'); |
1802
|
0
|
0
|
|
|
|
|
if (defined $self->{success}) { |
1803
|
0
|
|
|
|
|
|
$xfer += $output->writeFieldBegin('success', TType::LIST, 0); |
1804
|
|
|
|
|
|
|
{ |
1805
|
0
|
|
|
|
|
|
$xfer += $output->writeListBegin(TType::STRUCT, scalar(@{$self->{success}})); |
|
0
|
|
|
|
|
|
|
|
0
|
|
|
|
|
|
|
1806
|
|
|
|
|
|
|
{ |
1807
|
0
|
|
|
|
|
|
foreach my $iter140 (@{$self->{success}}) |
|
0
|
|
|
|
|
|
|
|
0
|
|
|
|
|
|
|
1808
|
|
|
|
|
|
|
{ |
1809
|
0
|
|
|
|
|
|
$xfer += ${iter140}->write($output); |
1810
|
|
|
|
|
|
|
} |
1811
|
|
|
|
|
|
|
} |
1812
|
0
|
|
|
|
|
|
$xfer += $output->writeListEnd(); |
1813
|
|
|
|
|
|
|
} |
1814
|
0
|
|
|
|
|
|
$xfer += $output->writeFieldEnd(); |
1815
|
|
|
|
|
|
|
} |
1816
|
0
|
0
|
|
|
|
|
if (defined $self->{ire}) { |
1817
|
0
|
|
|
|
|
|
$xfer += $output->writeFieldBegin('ire', TType::STRUCT, 1); |
1818
|
0
|
|
|
|
|
|
$xfer += $self->{ire}->write($output); |
1819
|
0
|
|
|
|
|
|
$xfer += $output->writeFieldEnd(); |
1820
|
|
|
|
|
|
|
} |
1821
|
0
|
0
|
|
|
|
|
if (defined $self->{ue}) { |
1822
|
0
|
|
|
|
|
|
$xfer += $output->writeFieldBegin('ue', TType::STRUCT, 2); |
1823
|
0
|
|
|
|
|
|
$xfer += $self->{ue}->write($output); |
1824
|
0
|
|
|
|
|
|
$xfer += $output->writeFieldEnd(); |
1825
|
|
|
|
|
|
|
} |
1826
|
0
|
0
|
|
|
|
|
if (defined $self->{te}) { |
1827
|
0
|
|
|
|
|
|
$xfer += $output->writeFieldBegin('te', TType::STRUCT, 3); |
1828
|
0
|
|
|
|
|
|
$xfer += $self->{te}->write($output); |
1829
|
0
|
|
|
|
|
|
$xfer += $output->writeFieldEnd(); |
1830
|
|
|
|
|
|
|
} |
1831
|
0
|
|
|
|
|
|
$xfer += $output->writeFieldStop(); |
1832
|
0
|
|
|
|
|
|
$xfer += $output->writeStructEnd(); |
1833
|
0
|
|
|
|
|
|
return $xfer; |
1834
|
|
|
|
|
|
|
} |
1835
|
|
|
|
|
|
|
|
1836
|
|
|
|
|
|
|
package Cassandra::Cassandra_get_indexed_slices_args; |
1837
|
|
|
|
|
|
|
BEGIN { |
1838
|
1
|
|
|
1
|
|
21
|
$Cassandra::Cassandra_get_indexed_slices_args::VERSION = '0.4.0'; |
1839
|
|
|
|
|
|
|
} |
1840
|
1
|
|
|
1
|
|
5
|
use base qw(Class::Accessor); |
|
1
|
|
|
|
|
2
|
|
|
1
|
|
|
|
|
671
|
|
1841
|
|
|
|
|
|
|
Cassandra::Cassandra_get_indexed_slices_args->mk_accessors( qw( column_parent index_clause column_predicate consistency_level ) ); |
1842
|
|
|
|
|
|
|
|
1843
|
|
|
|
|
|
|
sub new { |
1844
|
0
|
|
|
0
|
|
|
my $classname = shift; |
1845
|
0
|
|
|
|
|
|
my $self = {}; |
1846
|
0
|
|
0
|
|
|
|
my $vals = shift || {}; |
1847
|
0
|
|
|
|
|
|
$self->{column_parent} = undef; |
1848
|
0
|
|
|
|
|
|
$self->{index_clause} = undef; |
1849
|
0
|
|
|
|
|
|
$self->{column_predicate} = undef; |
1850
|
0
|
|
|
|
|
|
$self->{consistency_level} = 1; |
1851
|
0
|
0
|
|
|
|
|
if (UNIVERSAL::isa($vals,'HASH')) { |
1852
|
0
|
0
|
|
|
|
|
if (defined $vals->{column_parent}) { |
1853
|
0
|
|
|
|
|
|
$self->{column_parent} = $vals->{column_parent}; |
1854
|
|
|
|
|
|
|
} |
1855
|
0
|
0
|
|
|
|
|
if (defined $vals->{index_clause}) { |
1856
|
0
|
|
|
|
|
|
$self->{index_clause} = $vals->{index_clause}; |
1857
|
|
|
|
|
|
|
} |
1858
|
0
|
0
|
|
|
|
|
if (defined $vals->{column_predicate}) { |
1859
|
0
|
|
|
|
|
|
$self->{column_predicate} = $vals->{column_predicate}; |
1860
|
|
|
|
|
|
|
} |
1861
|
0
|
0
|
|
|
|
|
if (defined $vals->{consistency_level}) { |
1862
|
0
|
|
|
|
|
|
$self->{consistency_level} = $vals->{consistency_level}; |
1863
|
|
|
|
|
|
|
} |
1864
|
|
|
|
|
|
|
} |
1865
|
0
|
|
|
|
|
|
return bless ($self, $classname); |
1866
|
|
|
|
|
|
|
} |
1867
|
|
|
|
|
|
|
|
1868
|
|
|
|
|
|
|
sub getName { |
1869
|
0
|
|
|
0
|
|
|
return 'Cassandra_get_indexed_slices_args'; |
1870
|
|
|
|
|
|
|
} |
1871
|
|
|
|
|
|
|
|
1872
|
|
|
|
|
|
|
sub read { |
1873
|
0
|
|
|
0
|
|
|
my ($self, $input) = @_; |
1874
|
0
|
|
|
|
|
|
my $xfer = 0; |
1875
|
0
|
|
|
|
|
|
my $fname; |
1876
|
0
|
|
|
|
|
|
my $ftype = 0; |
1877
|
0
|
|
|
|
|
|
my $fid = 0; |
1878
|
0
|
|
|
|
|
|
$xfer += $input->readStructBegin(\$fname); |
1879
|
0
|
|
|
|
|
|
while (1) |
1880
|
|
|
|
|
|
|
{ |
1881
|
0
|
|
|
|
|
|
$xfer += $input->readFieldBegin(\$fname, \$ftype, \$fid); |
1882
|
0
|
0
|
|
|
|
|
if ($ftype == TType::STOP) { |
1883
|
0
|
|
|
|
|
|
last; |
1884
|
|
|
|
|
|
|
} |
1885
|
0
|
|
|
|
|
|
SWITCH: for($fid) |
1886
|
|
|
|
|
|
|
{ |
1887
|
0
|
0
|
|
|
|
|
/^1$/ && do{ if ($ftype == TType::STRUCT) { |
|
0
|
0
|
|
|
|
|
|
1888
|
0
|
|
|
|
|
|
$self->{column_parent} = new Cassandra::ColumnParent(); |
1889
|
0
|
|
|
|
|
|
$xfer += $self->{column_parent}->read($input); |
1890
|
|
|
|
|
|
|
} else { |
1891
|
0
|
|
|
|
|
|
$xfer += $input->skip($ftype); |
1892
|
|
|
|
|
|
|
} |
1893
|
0
|
|
|
|
|
|
last; }; |
1894
|
0
|
0
|
|
|
|
|
/^2$/ && do{ if ($ftype == TType::STRUCT) { |
|
0
|
0
|
|
|
|
|
|
1895
|
0
|
|
|
|
|
|
$self->{index_clause} = new Cassandra::IndexClause(); |
1896
|
0
|
|
|
|
|
|
$xfer += $self->{index_clause}->read($input); |
1897
|
|
|
|
|
|
|
} else { |
1898
|
0
|
|
|
|
|
|
$xfer += $input->skip($ftype); |
1899
|
|
|
|
|
|
|
} |
1900
|
0
|
|
|
|
|
|
last; }; |
1901
|
0
|
0
|
|
|
|
|
/^3$/ && do{ if ($ftype == TType::STRUCT) { |
|
0
|
0
|
|
|
|
|
|
1902
|
0
|
|
|
|
|
|
$self->{column_predicate} = new Cassandra::SlicePredicate(); |
1903
|
0
|
|
|
|
|
|
$xfer += $self->{column_predicate}->read($input); |
1904
|
|
|
|
|
|
|
} else { |
1905
|
0
|
|
|
|
|
|
$xfer += $input->skip($ftype); |
1906
|
|
|
|
|
|
|
} |
1907
|
0
|
|
|
|
|
|
last; }; |
1908
|
0
|
0
|
|
|
|
|
/^4$/ && do{ if ($ftype == TType::I32) { |
|
0
|
0
|
|
|
|
|
|
1909
|
0
|
|
|
|
|
|
$xfer += $input->readI32(\$self->{consistency_level}); |
1910
|
|
|
|
|
|
|
} else { |
1911
|
0
|
|
|
|
|
|
$xfer += $input->skip($ftype); |
1912
|
|
|
|
|
|
|
} |
1913
|
0
|
|
|
|
|
|
last; }; |
1914
|
0
|
|
|
|
|
|
$xfer += $input->skip($ftype); |
1915
|
|
|
|
|
|
|
} |
1916
|
0
|
|
|
|
|
|
$xfer += $input->readFieldEnd(); |
1917
|
|
|
|
|
|
|
} |
1918
|
0
|
|
|
|
|
|
$xfer += $input->readStructEnd(); |
1919
|
0
|
|
|
|
|
|
return $xfer; |
1920
|
|
|
|
|
|
|
} |
1921
|
|
|
|
|
|
|
|
1922
|
|
|
|
|
|
|
sub write { |
1923
|
0
|
|
|
0
|
|
|
my ($self, $output) = @_; |
1924
|
0
|
|
|
|
|
|
my $xfer = 0; |
1925
|
0
|
|
|
|
|
|
$xfer += $output->writeStructBegin('Cassandra_get_indexed_slices_args'); |
1926
|
0
|
0
|
|
|
|
|
if (defined $self->{column_parent}) { |
1927
|
0
|
|
|
|
|
|
$xfer += $output->writeFieldBegin('column_parent', TType::STRUCT, 1); |
1928
|
0
|
|
|
|
|
|
$xfer += $self->{column_parent}->write($output); |
1929
|
0
|
|
|
|
|
|
$xfer += $output->writeFieldEnd(); |
1930
|
|
|
|
|
|
|
} |
1931
|
0
|
0
|
|
|
|
|
if (defined $self->{index_clause}) { |
1932
|
0
|
|
|
|
|
|
$xfer += $output->writeFieldBegin('index_clause', TType::STRUCT, 2); |
1933
|
0
|
|
|
|
|
|
$xfer += $self->{index_clause}->write($output); |
1934
|
0
|
|
|
|
|
|
$xfer += $output->writeFieldEnd(); |
1935
|
|
|
|
|
|
|
} |
1936
|
0
|
0
|
|
|
|
|
if (defined $self->{column_predicate}) { |
1937
|
0
|
|
|
|
|
|
$xfer += $output->writeFieldBegin('column_predicate', TType::STRUCT, 3); |
1938
|
0
|
|
|
|
|
|
$xfer += $self->{column_predicate}->write($output); |
1939
|
0
|
|
|
|
|
|
$xfer += $output->writeFieldEnd(); |
1940
|
|
|
|
|
|
|
} |
1941
|
0
|
0
|
|
|
|
|
if (defined $self->{consistency_level}) { |
1942
|
0
|
|
|
|
|
|
$xfer += $output->writeFieldBegin('consistency_level', TType::I32, 4); |
1943
|
0
|
|
|
|
|
|
$xfer += $output->writeI32($self->{consistency_level}); |
1944
|
0
|
|
|
|
|
|
$xfer += $output->writeFieldEnd(); |
1945
|
|
|
|
|
|
|
} |
1946
|
0
|
|
|
|
|
|
$xfer += $output->writeFieldStop(); |
1947
|
0
|
|
|
|
|
|
$xfer += $output->writeStructEnd(); |
1948
|
0
|
|
|
|
|
|
return $xfer; |
1949
|
|
|
|
|
|
|
} |
1950
|
|
|
|
|
|
|
|
1951
|
|
|
|
|
|
|
package Cassandra::Cassandra_get_indexed_slices_result; |
1952
|
|
|
|
|
|
|
BEGIN { |
1953
|
1
|
|
|
1
|
|
18
|
$Cassandra::Cassandra_get_indexed_slices_result::VERSION = '0.4.0'; |
1954
|
|
|
|
|
|
|
} |
1955
|
1
|
|
|
1
|
|
5
|
use base qw(Class::Accessor); |
|
1
|
|
|
|
|
1
|
|
|
1
|
|
|
|
|
912
|
|
1956
|
|
|
|
|
|
|
Cassandra::Cassandra_get_indexed_slices_result->mk_accessors( qw( success ) ); |
1957
|
|
|
|
|
|
|
|
1958
|
|
|
|
|
|
|
sub new { |
1959
|
0
|
|
|
0
|
|
|
my $classname = shift; |
1960
|
0
|
|
|
|
|
|
my $self = {}; |
1961
|
0
|
|
0
|
|
|
|
my $vals = shift || {}; |
1962
|
0
|
|
|
|
|
|
$self->{success} = undef; |
1963
|
0
|
|
|
|
|
|
$self->{ire} = undef; |
1964
|
0
|
|
|
|
|
|
$self->{ue} = undef; |
1965
|
0
|
|
|
|
|
|
$self->{te} = undef; |
1966
|
0
|
0
|
|
|
|
|
if (UNIVERSAL::isa($vals,'HASH')) { |
1967
|
0
|
0
|
|
|
|
|
if (defined $vals->{success}) { |
1968
|
0
|
|
|
|
|
|
$self->{success} = $vals->{success}; |
1969
|
|
|
|
|
|
|
} |
1970
|
0
|
0
|
|
|
|
|
if (defined $vals->{ire}) { |
1971
|
0
|
|
|
|
|
|
$self->{ire} = $vals->{ire}; |
1972
|
|
|
|
|
|
|
} |
1973
|
0
|
0
|
|
|
|
|
if (defined $vals->{ue}) { |
1974
|
0
|
|
|
|
|
|
$self->{ue} = $vals->{ue}; |
1975
|
|
|
|
|
|
|
} |
1976
|
0
|
0
|
|
|
|
|
if (defined $vals->{te}) { |
1977
|
0
|
|
|
|
|
|
$self->{te} = $vals->{te}; |
1978
|
|
|
|
|
|
|
} |
1979
|
|
|
|
|
|
|
} |
1980
|
0
|
|
|
|
|
|
return bless ($self, $classname); |
1981
|
|
|
|
|
|
|
} |
1982
|
|
|
|
|
|
|
|
1983
|
|
|
|
|
|
|
sub getName { |
1984
|
0
|
|
|
0
|
|
|
return 'Cassandra_get_indexed_slices_result'; |
1985
|
|
|
|
|
|
|
} |
1986
|
|
|
|
|
|
|
|
1987
|
|
|
|
|
|
|
sub read { |
1988
|
0
|
|
|
0
|
|
|
my ($self, $input) = @_; |
1989
|
0
|
|
|
|
|
|
my $xfer = 0; |
1990
|
0
|
|
|
|
|
|
my $fname; |
1991
|
0
|
|
|
|
|
|
my $ftype = 0; |
1992
|
0
|
|
|
|
|
|
my $fid = 0; |
1993
|
0
|
|
|
|
|
|
$xfer += $input->readStructBegin(\$fname); |
1994
|
0
|
|
|
|
|
|
while (1) |
1995
|
|
|
|
|
|
|
{ |
1996
|
0
|
|
|
|
|
|
$xfer += $input->readFieldBegin(\$fname, \$ftype, \$fid); |
1997
|
0
|
0
|
|
|
|
|
if ($ftype == TType::STOP) { |
1998
|
0
|
|
|
|
|
|
last; |
1999
|
|
|
|
|
|
|
} |
2000
|
0
|
|
|
|
|
|
SWITCH: for($fid) |
2001
|
|
|
|
|
|
|
{ |
2002
|
0
|
0
|
|
|
|
|
/^0$/ && do{ if ($ftype == TType::LIST) { |
|
0
|
0
|
|
|
|
|
|
2003
|
|
|
|
|
|
|
{ |
2004
|
0
|
|
|
|
|
|
my $_size141 = 0; |
|
0
|
|
|
|
|
|
|
2005
|
0
|
|
|
|
|
|
$self->{success} = []; |
2006
|
0
|
|
|
|
|
|
my $_etype144 = 0; |
2007
|
0
|
|
|
|
|
|
$xfer += $input->readListBegin(\$_etype144, \$_size141); |
2008
|
0
|
|
|
|
|
|
for (my $_i145 = 0; $_i145 < $_size141; ++$_i145) |
2009
|
|
|
|
|
|
|
{ |
2010
|
0
|
|
|
|
|
|
my $elem146 = undef; |
2011
|
0
|
|
|
|
|
|
$elem146 = new Cassandra::KeySlice(); |
2012
|
0
|
|
|
|
|
|
$xfer += $elem146->read($input); |
2013
|
0
|
|
|
|
|
|
push(@{$self->{success}},$elem146); |
|
0
|
|
|
|
|
|
|
2014
|
|
|
|
|
|
|
} |
2015
|
0
|
|
|
|
|
|
$xfer += $input->readListEnd(); |
2016
|
|
|
|
|
|
|
} |
2017
|
|
|
|
|
|
|
} else { |
2018
|
0
|
|
|
|
|
|
$xfer += $input->skip($ftype); |
2019
|
|
|
|
|
|
|
} |
2020
|
0
|
|
|
|
|
|
last; }; |
2021
|
0
|
0
|
|
|
|
|
/^1$/ && do{ if ($ftype == TType::STRUCT) { |
|
0
|
0
|
|
|
|
|
|
2022
|
0
|
|
|
|
|
|
$self->{ire} = new Cassandra::InvalidRequestException(); |
2023
|
0
|
|
|
|
|
|
$xfer += $self->{ire}->read($input); |
2024
|
|
|
|
|
|
|
} else { |
2025
|
0
|
|
|
|
|
|
$xfer += $input->skip($ftype); |
2026
|
|
|
|
|
|
|
} |
2027
|
0
|
|
|
|
|
|
last; }; |
2028
|
0
|
0
|
|
|
|
|
/^2$/ && do{ if ($ftype == TType::STRUCT) { |
|
0
|
0
|
|
|
|
|
|
2029
|
0
|
|
|
|
|
|
$self->{ue} = new Cassandra::UnavailableException(); |
2030
|
0
|
|
|
|
|
|
$xfer += $self->{ue}->read($input); |
2031
|
|
|
|
|
|
|
} else { |
2032
|
0
|
|
|
|
|
|
$xfer += $input->skip($ftype); |
2033
|
|
|
|
|
|
|
} |
2034
|
0
|
|
|
|
|
|
last; }; |
2035
|
0
|
0
|
|
|
|
|
/^3$/ && do{ if ($ftype == TType::STRUCT) { |
|
0
|
0
|
|
|
|
|
|
2036
|
0
|
|
|
|
|
|
$self->{te} = new Cassandra::TimedOutException(); |
2037
|
0
|
|
|
|
|
|
$xfer += $self->{te}->read($input); |
2038
|
|
|
|
|
|
|
} else { |
2039
|
0
|
|
|
|
|
|
$xfer += $input->skip($ftype); |
2040
|
|
|
|
|
|
|
} |
2041
|
0
|
|
|
|
|
|
last; }; |
2042
|
0
|
|
|
|
|
|
$xfer += $input->skip($ftype); |
2043
|
|
|
|
|
|
|
} |
2044
|
0
|
|
|
|
|
|
$xfer += $input->readFieldEnd(); |
2045
|
|
|
|
|
|
|
} |
2046
|
0
|
|
|
|
|
|
$xfer += $input->readStructEnd(); |
2047
|
0
|
|
|
|
|
|
return $xfer; |
2048
|
|
|
|
|
|
|
} |
2049
|
|
|
|
|
|
|
|
2050
|
|
|
|
|
|
|
sub write { |
2051
|
0
|
|
|
0
|
|
|
my ($self, $output) = @_; |
2052
|
0
|
|
|
|
|
|
my $xfer = 0; |
2053
|
0
|
|
|
|
|
|
$xfer += $output->writeStructBegin('Cassandra_get_indexed_slices_result'); |
2054
|
0
|
0
|
|
|
|
|
if (defined $self->{success}) { |
2055
|
0
|
|
|
|
|
|
$xfer += $output->writeFieldBegin('success', TType::LIST, 0); |
2056
|
|
|
|
|
|
|
{ |
2057
|
0
|
|
|
|
|
|
$xfer += $output->writeListBegin(TType::STRUCT, scalar(@{$self->{success}})); |
|
0
|
|
|
|
|
|
|
|
0
|
|
|
|
|
|
|
2058
|
|
|
|
|
|
|
{ |
2059
|
0
|
|
|
|
|
|
foreach my $iter147 (@{$self->{success}}) |
|
0
|
|
|
|
|
|
|
|
0
|
|
|
|
|
|
|
2060
|
|
|
|
|
|
|
{ |
2061
|
0
|
|
|
|
|
|
$xfer += ${iter147}->write($output); |
2062
|
|
|
|
|
|
|
} |
2063
|
|
|
|
|
|
|
} |
2064
|
0
|
|
|
|
|
|
$xfer += $output->writeListEnd(); |
2065
|
|
|
|
|
|
|
} |
2066
|
0
|
|
|
|
|
|
$xfer += $output->writeFieldEnd(); |
2067
|
|
|
|
|
|
|
} |
2068
|
0
|
0
|
|
|
|
|
if (defined $self->{ire}) { |
2069
|
0
|
|
|
|
|
|
$xfer += $output->writeFieldBegin('ire', TType::STRUCT, 1); |
2070
|
0
|
|
|
|
|
|
$xfer += $self->{ire}->write($output); |
2071
|
0
|
|
|
|
|
|
$xfer += $output->writeFieldEnd(); |
2072
|
|
|
|
|
|
|
} |
2073
|
0
|
0
|
|
|
|
|
if (defined $self->{ue}) { |
2074
|
0
|
|
|
|
|
|
$xfer += $output->writeFieldBegin('ue', TType::STRUCT, 2); |
2075
|
0
|
|
|
|
|
|
$xfer += $self->{ue}->write($output); |
2076
|
0
|
|
|
|
|
|
$xfer += $output->writeFieldEnd(); |
2077
|
|
|
|
|
|
|
} |
2078
|
0
|
0
|
|
|
|
|
if (defined $self->{te}) { |
2079
|
0
|
|
|
|
|
|
$xfer += $output->writeFieldBegin('te', TType::STRUCT, 3); |
2080
|
0
|
|
|
|
|
|
$xfer += $self->{te}->write($output); |
2081
|
0
|
|
|
|
|
|
$xfer += $output->writeFieldEnd(); |
2082
|
|
|
|
|
|
|
} |
2083
|
0
|
|
|
|
|
|
$xfer += $output->writeFieldStop(); |
2084
|
0
|
|
|
|
|
|
$xfer += $output->writeStructEnd(); |
2085
|
0
|
|
|
|
|
|
return $xfer; |
2086
|
|
|
|
|
|
|
} |
2087
|
|
|
|
|
|
|
|
2088
|
|
|
|
|
|
|
package Cassandra::Cassandra_insert_args; |
2089
|
|
|
|
|
|
|
BEGIN { |
2090
|
1
|
|
|
1
|
|
23
|
$Cassandra::Cassandra_insert_args::VERSION = '0.4.0'; |
2091
|
|
|
|
|
|
|
} |
2092
|
1
|
|
|
1
|
|
5
|
use base qw(Class::Accessor); |
|
1
|
|
|
|
|
2
|
|
|
1
|
|
|
|
|
740
|
|
2093
|
|
|
|
|
|
|
Cassandra::Cassandra_insert_args->mk_accessors( qw( key column_parent column consistency_level ) ); |
2094
|
|
|
|
|
|
|
|
2095
|
|
|
|
|
|
|
sub new { |
2096
|
0
|
|
|
0
|
|
|
my $classname = shift; |
2097
|
0
|
|
|
|
|
|
my $self = {}; |
2098
|
0
|
|
0
|
|
|
|
my $vals = shift || {}; |
2099
|
0
|
|
|
|
|
|
$self->{key} = undef; |
2100
|
0
|
|
|
|
|
|
$self->{column_parent} = undef; |
2101
|
0
|
|
|
|
|
|
$self->{column} = undef; |
2102
|
0
|
|
|
|
|
|
$self->{consistency_level} = 1; |
2103
|
0
|
0
|
|
|
|
|
if (UNIVERSAL::isa($vals,'HASH')) { |
2104
|
0
|
0
|
|
|
|
|
if (defined $vals->{key}) { |
2105
|
0
|
|
|
|
|
|
$self->{key} = $vals->{key}; |
2106
|
|
|
|
|
|
|
} |
2107
|
0
|
0
|
|
|
|
|
if (defined $vals->{column_parent}) { |
2108
|
0
|
|
|
|
|
|
$self->{column_parent} = $vals->{column_parent}; |
2109
|
|
|
|
|
|
|
} |
2110
|
0
|
0
|
|
|
|
|
if (defined $vals->{column}) { |
2111
|
0
|
|
|
|
|
|
$self->{column} = $vals->{column}; |
2112
|
|
|
|
|
|
|
} |
2113
|
0
|
0
|
|
|
|
|
if (defined $vals->{consistency_level}) { |
2114
|
0
|
|
|
|
|
|
$self->{consistency_level} = $vals->{consistency_level}; |
2115
|
|
|
|
|
|
|
} |
2116
|
|
|
|
|
|
|
} |
2117
|
0
|
|
|
|
|
|
return bless ($self, $classname); |
2118
|
|
|
|
|
|
|
} |
2119
|
|
|
|
|
|
|
|
2120
|
|
|
|
|
|
|
sub getName { |
2121
|
0
|
|
|
0
|
|
|
return 'Cassandra_insert_args'; |
2122
|
|
|
|
|
|
|
} |
2123
|
|
|
|
|
|
|
|
2124
|
|
|
|
|
|
|
sub read { |
2125
|
0
|
|
|
0
|
|
|
my ($self, $input) = @_; |
2126
|
0
|
|
|
|
|
|
my $xfer = 0; |
2127
|
0
|
|
|
|
|
|
my $fname; |
2128
|
0
|
|
|
|
|
|
my $ftype = 0; |
2129
|
0
|
|
|
|
|
|
my $fid = 0; |
2130
|
0
|
|
|
|
|
|
$xfer += $input->readStructBegin(\$fname); |
2131
|
0
|
|
|
|
|
|
while (1) |
2132
|
|
|
|
|
|
|
{ |
2133
|
0
|
|
|
|
|
|
$xfer += $input->readFieldBegin(\$fname, \$ftype, \$fid); |
2134
|
0
|
0
|
|
|
|
|
if ($ftype == TType::STOP) { |
2135
|
0
|
|
|
|
|
|
last; |
2136
|
|
|
|
|
|
|
} |
2137
|
0
|
|
|
|
|
|
SWITCH: for($fid) |
2138
|
|
|
|
|
|
|
{ |
2139
|
0
|
0
|
|
|
|
|
/^1$/ && do{ if ($ftype == TType::STRING) { |
|
0
|
0
|
|
|
|
|
|
2140
|
0
|
|
|
|
|
|
$xfer += $input->readString(\$self->{key}); |
2141
|
|
|
|
|
|
|
} else { |
2142
|
0
|
|
|
|
|
|
$xfer += $input->skip($ftype); |
2143
|
|
|
|
|
|
|
} |
2144
|
0
|
|
|
|
|
|
last; }; |
2145
|
0
|
0
|
|
|
|
|
/^2$/ && do{ if ($ftype == TType::STRUCT) { |
|
0
|
0
|
|
|
|
|
|
2146
|
0
|
|
|
|
|
|
$self->{column_parent} = new Cassandra::ColumnParent(); |
2147
|
0
|
|
|
|
|
|
$xfer += $self->{column_parent}->read($input); |
2148
|
|
|
|
|
|
|
} else { |
2149
|
0
|
|
|
|
|
|
$xfer += $input->skip($ftype); |
2150
|
|
|
|
|
|
|
} |
2151
|
0
|
|
|
|
|
|
last; }; |
2152
|
0
|
0
|
|
|
|
|
/^3$/ && do{ if ($ftype == TType::STRUCT) { |
|
0
|
0
|
|
|
|
|
|
2153
|
0
|
|
|
|
|
|
$self->{column} = new Cassandra::Column(); |
2154
|
0
|
|
|
|
|
|
$xfer += $self->{column}->read($input); |
2155
|
|
|
|
|
|
|
} else { |
2156
|
0
|
|
|
|
|
|
$xfer += $input->skip($ftype); |
2157
|
|
|
|
|
|
|
} |
2158
|
0
|
|
|
|
|
|
last; }; |
2159
|
0
|
0
|
|
|
|
|
/^4$/ && do{ if ($ftype == TType::I32) { |
|
0
|
0
|
|
|
|
|
|
2160
|
0
|
|
|
|
|
|
$xfer += $input->readI32(\$self->{consistency_level}); |
2161
|
|
|
|
|
|
|
} else { |
2162
|
0
|
|
|
|
|
|
$xfer += $input->skip($ftype); |
2163
|
|
|
|
|
|
|
} |
2164
|
0
|
|
|
|
|
|
last; }; |
2165
|
0
|
|
|
|
|
|
$xfer += $input->skip($ftype); |
2166
|
|
|
|
|
|
|
} |
2167
|
0
|
|
|
|
|
|
$xfer += $input->readFieldEnd(); |
2168
|
|
|
|
|
|
|
} |
2169
|
0
|
|
|
|
|
|
$xfer += $input->readStructEnd(); |
2170
|
0
|
|
|
|
|
|
return $xfer; |
2171
|
|
|
|
|
|
|
} |
2172
|
|
|
|
|
|
|
|
2173
|
|
|
|
|
|
|
sub write { |
2174
|
0
|
|
|
0
|
|
|
my ($self, $output) = @_; |
2175
|
0
|
|
|
|
|
|
my $xfer = 0; |
2176
|
0
|
|
|
|
|
|
$xfer += $output->writeStructBegin('Cassandra_insert_args'); |
2177
|
0
|
0
|
|
|
|
|
if (defined $self->{key}) { |
2178
|
0
|
|
|
|
|
|
$xfer += $output->writeFieldBegin('key', TType::STRING, 1); |
2179
|
0
|
|
|
|
|
|
$xfer += $output->writeString($self->{key}); |
2180
|
0
|
|
|
|
|
|
$xfer += $output->writeFieldEnd(); |
2181
|
|
|
|
|
|
|
} |
2182
|
0
|
0
|
|
|
|
|
if (defined $self->{column_parent}) { |
2183
|
0
|
|
|
|
|
|
$xfer += $output->writeFieldBegin('column_parent', TType::STRUCT, 2); |
2184
|
0
|
|
|
|
|
|
$xfer += $self->{column_parent}->write($output); |
2185
|
0
|
|
|
|
|
|
$xfer += $output->writeFieldEnd(); |
2186
|
|
|
|
|
|
|
} |
2187
|
0
|
0
|
|
|
|
|
if (defined $self->{column}) { |
2188
|
0
|
|
|
|
|
|
$xfer += $output->writeFieldBegin('column', TType::STRUCT, 3); |
2189
|
0
|
|
|
|
|
|
$xfer += $self->{column}->write($output); |
2190
|
0
|
|
|
|
|
|
$xfer += $output->writeFieldEnd(); |
2191
|
|
|
|
|
|
|
} |
2192
|
0
|
0
|
|
|
|
|
if (defined $self->{consistency_level}) { |
2193
|
0
|
|
|
|
|
|
$xfer += $output->writeFieldBegin('consistency_level', TType::I32, 4); |
2194
|
0
|
|
|
|
|
|
$xfer += $output->writeI32($self->{consistency_level}); |
2195
|
0
|
|
|
|
|
|
$xfer += $output->writeFieldEnd(); |
2196
|
|
|
|
|
|
|
} |
2197
|
0
|
|
|
|
|
|
$xfer += $output->writeFieldStop(); |
2198
|
0
|
|
|
|
|
|
$xfer += $output->writeStructEnd(); |
2199
|
0
|
|
|
|
|
|
return $xfer; |
2200
|
|
|
|
|
|
|
} |
2201
|
|
|
|
|
|
|
|
2202
|
|
|
|
|
|
|
package Cassandra::Cassandra_insert_result; |
2203
|
|
|
|
|
|
|
BEGIN { |
2204
|
1
|
|
|
1
|
|
22
|
$Cassandra::Cassandra_insert_result::VERSION = '0.4.0'; |
2205
|
|
|
|
|
|
|
} |
2206
|
1
|
|
|
1
|
|
6
|
use base qw(Class::Accessor); |
|
1
|
|
|
|
|
1
|
|
|
1
|
|
|
|
|
757
|
|
2207
|
|
|
|
|
|
|
Cassandra::Cassandra_insert_result->mk_accessors( qw( ) ); |
2208
|
|
|
|
|
|
|
|
2209
|
|
|
|
|
|
|
sub new { |
2210
|
0
|
|
|
0
|
|
|
my $classname = shift; |
2211
|
0
|
|
|
|
|
|
my $self = {}; |
2212
|
0
|
|
0
|
|
|
|
my $vals = shift || {}; |
2213
|
0
|
|
|
|
|
|
$self->{ire} = undef; |
2214
|
0
|
|
|
|
|
|
$self->{ue} = undef; |
2215
|
0
|
|
|
|
|
|
$self->{te} = undef; |
2216
|
0
|
0
|
|
|
|
|
if (UNIVERSAL::isa($vals,'HASH')) { |
2217
|
0
|
0
|
|
|
|
|
if (defined $vals->{ire}) { |
2218
|
0
|
|
|
|
|
|
$self->{ire} = $vals->{ire}; |
2219
|
|
|
|
|
|
|
} |
2220
|
0
|
0
|
|
|
|
|
if (defined $vals->{ue}) { |
2221
|
0
|
|
|
|
|
|
$self->{ue} = $vals->{ue}; |
2222
|
|
|
|
|
|
|
} |
2223
|
0
|
0
|
|
|
|
|
if (defined $vals->{te}) { |
2224
|
0
|
|
|
|
|
|
$self->{te} = $vals->{te}; |
2225
|
|
|
|
|
|
|
} |
2226
|
|
|
|
|
|
|
} |
2227
|
0
|
|
|
|
|
|
return bless ($self, $classname); |
2228
|
|
|
|
|
|
|
} |
2229
|
|
|
|
|
|
|
|
2230
|
|
|
|
|
|
|
sub getName { |
2231
|
0
|
|
|
0
|
|
|
return 'Cassandra_insert_result'; |
2232
|
|
|
|
|
|
|
} |
2233
|
|
|
|
|
|
|
|
2234
|
|
|
|
|
|
|
sub read { |
2235
|
0
|
|
|
0
|
|
|
my ($self, $input) = @_; |
2236
|
0
|
|
|
|
|
|
my $xfer = 0; |
2237
|
0
|
|
|
|
|
|
my $fname; |
2238
|
0
|
|
|
|
|
|
my $ftype = 0; |
2239
|
0
|
|
|
|
|
|
my $fid = 0; |
2240
|
0
|
|
|
|
|
|
$xfer += $input->readStructBegin(\$fname); |
2241
|
0
|
|
|
|
|
|
while (1) |
2242
|
|
|
|
|
|
|
{ |
2243
|
0
|
|
|
|
|
|
$xfer += $input->readFieldBegin(\$fname, \$ftype, \$fid); |
2244
|
0
|
0
|
|
|
|
|
if ($ftype == TType::STOP) { |
2245
|
0
|
|
|
|
|
|
last; |
2246
|
|
|
|
|
|
|
} |
2247
|
0
|
|
|
|
|
|
SWITCH: for($fid) |
2248
|
|
|
|
|
|
|
{ |
2249
|
0
|
0
|
|
|
|
|
/^1$/ && do{ if ($ftype == TType::STRUCT) { |
|
0
|
0
|
|
|
|
|
|
2250
|
0
|
|
|
|
|
|
$self->{ire} = new Cassandra::InvalidRequestException(); |
2251
|
0
|
|
|
|
|
|
$xfer += $self->{ire}->read($input); |
2252
|
|
|
|
|
|
|
} else { |
2253
|
0
|
|
|
|
|
|
$xfer += $input->skip($ftype); |
2254
|
|
|
|
|
|
|
} |
2255
|
0
|
|
|
|
|
|
last; }; |
2256
|
0
|
0
|
|
|
|
|
/^2$/ && do{ if ($ftype == TType::STRUCT) { |
|
0
|
0
|
|
|
|
|
|
2257
|
0
|
|
|
|
|
|
$self->{ue} = new Cassandra::UnavailableException(); |
2258
|
0
|
|
|
|
|
|
$xfer += $self->{ue}->read($input); |
2259
|
|
|
|
|
|
|
} else { |
2260
|
0
|
|
|
|
|
|
$xfer += $input->skip($ftype); |
2261
|
|
|
|
|
|
|
} |
2262
|
0
|
|
|
|
|
|
last; }; |
2263
|
0
|
0
|
|
|
|
|
/^3$/ && do{ if ($ftype == TType::STRUCT) { |
|
0
|
0
|
|
|
|
|
|
2264
|
0
|
|
|
|
|
|
$self->{te} = new Cassandra::TimedOutException(); |
2265
|
0
|
|
|
|
|
|
$xfer += $self->{te}->read($input); |
2266
|
|
|
|
|
|
|
} else { |
2267
|
0
|
|
|
|
|
|
$xfer += $input->skip($ftype); |
2268
|
|
|
|
|
|
|
} |
2269
|
0
|
|
|
|
|
|
last; }; |
2270
|
0
|
|
|
|
|
|
$xfer += $input->skip($ftype); |
2271
|
|
|
|
|
|
|
} |
2272
|
0
|
|
|
|
|
|
$xfer += $input->readFieldEnd(); |
2273
|
|
|
|
|
|
|
} |
2274
|
0
|
|
|
|
|
|
$xfer += $input->readStructEnd(); |
2275
|
0
|
|
|
|
|
|
return $xfer; |
2276
|
|
|
|
|
|
|
} |
2277
|
|
|
|
|
|
|
|
2278
|
|
|
|
|
|
|
sub write { |
2279
|
0
|
|
|
0
|
|
|
my ($self, $output) = @_; |
2280
|
0
|
|
|
|
|
|
my $xfer = 0; |
2281
|
0
|
|
|
|
|
|
$xfer += $output->writeStructBegin('Cassandra_insert_result'); |
2282
|
0
|
0
|
|
|
|
|
if (defined $self->{ire}) { |
2283
|
0
|
|
|
|
|
|
$xfer += $output->writeFieldBegin('ire', TType::STRUCT, 1); |
2284
|
0
|
|
|
|
|
|
$xfer += $self->{ire}->write($output); |
2285
|
0
|
|
|
|
|
|
$xfer += $output->writeFieldEnd(); |
2286
|
|
|
|
|
|
|
} |
2287
|
0
|
0
|
|
|
|
|
if (defined $self->{ue}) { |
2288
|
0
|
|
|
|
|
|
$xfer += $output->writeFieldBegin('ue', TType::STRUCT, 2); |
2289
|
0
|
|
|
|
|
|
$xfer += $self->{ue}->write($output); |
2290
|
0
|
|
|
|
|
|
$xfer += $output->writeFieldEnd(); |
2291
|
|
|
|
|
|
|
} |
2292
|
0
|
0
|
|
|
|
|
if (defined $self->{te}) { |
2293
|
0
|
|
|
|
|
|
$xfer += $output->writeFieldBegin('te', TType::STRUCT, 3); |
2294
|
0
|
|
|
|
|
|
$xfer += $self->{te}->write($output); |
2295
|
0
|
|
|
|
|
|
$xfer += $output->writeFieldEnd(); |
2296
|
|
|
|
|
|
|
} |
2297
|
0
|
|
|
|
|
|
$xfer += $output->writeFieldStop(); |
2298
|
0
|
|
|
|
|
|
$xfer += $output->writeStructEnd(); |
2299
|
0
|
|
|
|
|
|
return $xfer; |
2300
|
|
|
|
|
|
|
} |
2301
|
|
|
|
|
|
|
|
2302
|
|
|
|
|
|
|
package Cassandra::Cassandra_add_args; |
2303
|
|
|
|
|
|
|
BEGIN { |
2304
|
1
|
|
|
1
|
|
19
|
$Cassandra::Cassandra_add_args::VERSION = '0.4.0'; |
2305
|
|
|
|
|
|
|
} |
2306
|
1
|
|
|
1
|
|
7
|
use base qw(Class::Accessor); |
|
1
|
|
|
|
|
9
|
|
|
1
|
|
|
|
|
699
|
|
2307
|
|
|
|
|
|
|
Cassandra::Cassandra_add_args->mk_accessors( qw( key column_parent column consistency_level ) ); |
2308
|
|
|
|
|
|
|
|
2309
|
|
|
|
|
|
|
sub new { |
2310
|
0
|
|
|
0
|
|
|
my $classname = shift; |
2311
|
0
|
|
|
|
|
|
my $self = {}; |
2312
|
0
|
|
0
|
|
|
|
my $vals = shift || {}; |
2313
|
0
|
|
|
|
|
|
$self->{key} = undef; |
2314
|
0
|
|
|
|
|
|
$self->{column_parent} = undef; |
2315
|
0
|
|
|
|
|
|
$self->{column} = undef; |
2316
|
0
|
|
|
|
|
|
$self->{consistency_level} = 1; |
2317
|
0
|
0
|
|
|
|
|
if (UNIVERSAL::isa($vals,'HASH')) { |
2318
|
0
|
0
|
|
|
|
|
if (defined $vals->{key}) { |
2319
|
0
|
|
|
|
|
|
$self->{key} = $vals->{key}; |
2320
|
|
|
|
|
|
|
} |
2321
|
0
|
0
|
|
|
|
|
if (defined $vals->{column_parent}) { |
2322
|
0
|
|
|
|
|
|
$self->{column_parent} = $vals->{column_parent}; |
2323
|
|
|
|
|
|
|
} |
2324
|
0
|
0
|
|
|
|
|
if (defined $vals->{column}) { |
2325
|
0
|
|
|
|
|
|
$self->{column} = $vals->{column}; |
2326
|
|
|
|
|
|
|
} |
2327
|
0
|
0
|
|
|
|
|
if (defined $vals->{consistency_level}) { |
2328
|
0
|
|
|
|
|
|
$self->{consistency_level} = $vals->{consistency_level}; |
2329
|
|
|
|
|
|
|
} |
2330
|
|
|
|
|
|
|
} |
2331
|
0
|
|
|
|
|
|
return bless ($self, $classname); |
2332
|
|
|
|
|
|
|
} |
2333
|
|
|
|
|
|
|
|
2334
|
|
|
|
|
|
|
sub getName { |
2335
|
0
|
|
|
0
|
|
|
return 'Cassandra_add_args'; |
2336
|
|
|
|
|
|
|
} |
2337
|
|
|
|
|
|
|
|
2338
|
|
|
|
|
|
|
sub read { |
2339
|
0
|
|
|
0
|
|
|
my ($self, $input) = @_; |
2340
|
0
|
|
|
|
|
|
my $xfer = 0; |
2341
|
0
|
|
|
|
|
|
my $fname; |
2342
|
0
|
|
|
|
|
|
my $ftype = 0; |
2343
|
0
|
|
|
|
|
|
my $fid = 0; |
2344
|
0
|
|
|
|
|
|
$xfer += $input->readStructBegin(\$fname); |
2345
|
0
|
|
|
|
|
|
while (1) |
2346
|
|
|
|
|
|
|
{ |
2347
|
0
|
|
|
|
|
|
$xfer += $input->readFieldBegin(\$fname, \$ftype, \$fid); |
2348
|
0
|
0
|
|
|
|
|
if ($ftype == TType::STOP) { |
2349
|
0
|
|
|
|
|
|
last; |
2350
|
|
|
|
|
|
|
} |
2351
|
0
|
|
|
|
|
|
SWITCH: for($fid) |
2352
|
|
|
|
|
|
|
{ |
2353
|
0
|
0
|
|
|
|
|
/^1$/ && do{ if ($ftype == TType::STRING) { |
|
0
|
0
|
|
|
|
|
|
2354
|
0
|
|
|
|
|
|
$xfer += $input->readString(\$self->{key}); |
2355
|
|
|
|
|
|
|
} else { |
2356
|
0
|
|
|
|
|
|
$xfer += $input->skip($ftype); |
2357
|
|
|
|
|
|
|
} |
2358
|
0
|
|
|
|
|
|
last; }; |
2359
|
0
|
0
|
|
|
|
|
/^2$/ && do{ if ($ftype == TType::STRUCT) { |
|
0
|
0
|
|
|
|
|
|
2360
|
0
|
|
|
|
|
|
$self->{column_parent} = new Cassandra::ColumnParent(); |
2361
|
0
|
|
|
|
|
|
$xfer += $self->{column_parent}->read($input); |
2362
|
|
|
|
|
|
|
} else { |
2363
|
0
|
|
|
|
|
|
$xfer += $input->skip($ftype); |
2364
|
|
|
|
|
|
|
} |
2365
|
0
|
|
|
|
|
|
last; }; |
2366
|
0
|
0
|
|
|
|
|
/^3$/ && do{ if ($ftype == TType::STRUCT) { |
|
0
|
0
|
|
|
|
|
|
2367
|
0
|
|
|
|
|
|
$self->{column} = new Cassandra::CounterColumn(); |
2368
|
0
|
|
|
|
|
|
$xfer += $self->{column}->read($input); |
2369
|
|
|
|
|
|
|
} else { |
2370
|
0
|
|
|
|
|
|
$xfer += $input->skip($ftype); |
2371
|
|
|
|
|
|
|
} |
2372
|
0
|
|
|
|
|
|
last; }; |
2373
|
0
|
0
|
|
|
|
|
/^4$/ && do{ if ($ftype == TType::I32) { |
|
0
|
0
|
|
|
|
|
|
2374
|
0
|
|
|
|
|
|
$xfer += $input->readI32(\$self->{consistency_level}); |
2375
|
|
|
|
|
|
|
} else { |
2376
|
0
|
|
|
|
|
|
$xfer += $input->skip($ftype); |
2377
|
|
|
|
|
|
|
} |
2378
|
0
|
|
|
|
|
|
last; }; |
2379
|
0
|
|
|
|
|
|
$xfer += $input->skip($ftype); |
2380
|
|
|
|
|
|
|
} |
2381
|
0
|
|
|
|
|
|
$xfer += $input->readFieldEnd(); |
2382
|
|
|
|
|
|
|
} |
2383
|
0
|
|
|
|
|
|
$xfer += $input->readStructEnd(); |
2384
|
0
|
|
|
|
|
|
return $xfer; |
2385
|
|
|
|
|
|
|
} |
2386
|
|
|
|
|
|
|
|
2387
|
|
|
|
|
|
|
sub write { |
2388
|
0
|
|
|
0
|
|
|
my ($self, $output) = @_; |
2389
|
0
|
|
|
|
|
|
my $xfer = 0; |
2390
|
0
|
|
|
|
|
|
$xfer += $output->writeStructBegin('Cassandra_add_args'); |
2391
|
0
|
0
|
|
|
|
|
if (defined $self->{key}) { |
2392
|
0
|
|
|
|
|
|
$xfer += $output->writeFieldBegin('key', TType::STRING, 1); |
2393
|
0
|
|
|
|
|
|
$xfer += $output->writeString($self->{key}); |
2394
|
0
|
|
|
|
|
|
$xfer += $output->writeFieldEnd(); |
2395
|
|
|
|
|
|
|
} |
2396
|
0
|
0
|
|
|
|
|
if (defined $self->{column_parent}) { |
2397
|
0
|
|
|
|
|
|
$xfer += $output->writeFieldBegin('column_parent', TType::STRUCT, 2); |
2398
|
0
|
|
|
|
|
|
$xfer += $self->{column_parent}->write($output); |
2399
|
0
|
|
|
|
|
|
$xfer += $output->writeFieldEnd(); |
2400
|
|
|
|
|
|
|
} |
2401
|
0
|
0
|
|
|
|
|
if (defined $self->{column}) { |
2402
|
0
|
|
|
|
|
|
$xfer += $output->writeFieldBegin('column', TType::STRUCT, 3); |
2403
|
0
|
|
|
|
|
|
$xfer += $self->{column}->write($output); |
2404
|
0
|
|
|
|
|
|
$xfer += $output->writeFieldEnd(); |
2405
|
|
|
|
|
|
|
} |
2406
|
0
|
0
|
|
|
|
|
if (defined $self->{consistency_level}) { |
2407
|
0
|
|
|
|
|
|
$xfer += $output->writeFieldBegin('consistency_level', TType::I32, 4); |
2408
|
0
|
|
|
|
|
|
$xfer += $output->writeI32($self->{consistency_level}); |
2409
|
0
|
|
|
|
|
|
$xfer += $output->writeFieldEnd(); |
2410
|
|
|
|
|
|
|
} |
2411
|
0
|
|
|
|
|
|
$xfer += $output->writeFieldStop(); |
2412
|
0
|
|
|
|
|
|
$xfer += $output->writeStructEnd(); |
2413
|
0
|
|
|
|
|
|
return $xfer; |
2414
|
|
|
|
|
|
|
} |
2415
|
|
|
|
|
|
|
|
2416
|
|
|
|
|
|
|
package Cassandra::Cassandra_add_result; |
2417
|
|
|
|
|
|
|
BEGIN { |
2418
|
1
|
|
|
1
|
|
22
|
$Cassandra::Cassandra_add_result::VERSION = '0.4.0'; |
2419
|
|
|
|
|
|
|
} |
2420
|
1
|
|
|
1
|
|
6
|
use base qw(Class::Accessor); |
|
1
|
|
|
|
|
2
|
|
|
1
|
|
|
|
|
711
|
|
2421
|
|
|
|
|
|
|
Cassandra::Cassandra_add_result->mk_accessors( qw( ) ); |
2422
|
|
|
|
|
|
|
|
2423
|
|
|
|
|
|
|
sub new { |
2424
|
0
|
|
|
0
|
|
|
my $classname = shift; |
2425
|
0
|
|
|
|
|
|
my $self = {}; |
2426
|
0
|
|
0
|
|
|
|
my $vals = shift || {}; |
2427
|
0
|
|
|
|
|
|
$self->{ire} = undef; |
2428
|
0
|
|
|
|
|
|
$self->{ue} = undef; |
2429
|
0
|
|
|
|
|
|
$self->{te} = undef; |
2430
|
0
|
0
|
|
|
|
|
if (UNIVERSAL::isa($vals,'HASH')) { |
2431
|
0
|
0
|
|
|
|
|
if (defined $vals->{ire}) { |
2432
|
0
|
|
|
|
|
|
$self->{ire} = $vals->{ire}; |
2433
|
|
|
|
|
|
|
} |
2434
|
0
|
0
|
|
|
|
|
if (defined $vals->{ue}) { |
2435
|
0
|
|
|
|
|
|
$self->{ue} = $vals->{ue}; |
2436
|
|
|
|
|
|
|
} |
2437
|
0
|
0
|
|
|
|
|
if (defined $vals->{te}) { |
2438
|
0
|
|
|
|
|
|
$self->{te} = $vals->{te}; |
2439
|
|
|
|
|
|
|
} |
2440
|
|
|
|
|
|
|
} |
2441
|
0
|
|
|
|
|
|
return bless ($self, $classname); |
2442
|
|
|
|
|
|
|
} |
2443
|
|
|
|
|
|
|
|
2444
|
|
|
|
|
|
|
sub getName { |
2445
|
0
|
|
|
0
|
|
|
return 'Cassandra_add_result'; |
2446
|
|
|
|
|
|
|
} |
2447
|
|
|
|
|
|
|
|
2448
|
|
|
|
|
|
|
sub read { |
2449
|
0
|
|
|
0
|
|
|
my ($self, $input) = @_; |
2450
|
0
|
|
|
|
|
|
my $xfer = 0; |
2451
|
0
|
|
|
|
|
|
my $fname; |
2452
|
0
|
|
|
|
|
|
my $ftype = 0; |
2453
|
0
|
|
|
|
|
|
my $fid = 0; |
2454
|
0
|
|
|
|
|
|
$xfer += $input->readStructBegin(\$fname); |
2455
|
0
|
|
|
|
|
|
while (1) |
2456
|
|
|
|
|
|
|
{ |
2457
|
0
|
|
|
|
|
|
$xfer += $input->readFieldBegin(\$fname, \$ftype, \$fid); |
2458
|
0
|
0
|
|
|
|
|
if ($ftype == TType::STOP) { |
2459
|
0
|
|
|
|
|
|
last; |
2460
|
|
|
|
|
|
|
} |
2461
|
0
|
|
|
|
|
|
SWITCH: for($fid) |
2462
|
|
|
|
|
|
|
{ |
2463
|
0
|
0
|
|
|
|
|
/^1$/ && do{ if ($ftype == TType::STRUCT) { |
|
0
|
0
|
|
|
|
|
|
2464
|
0
|
|
|
|
|
|
$self->{ire} = new Cassandra::InvalidRequestException(); |
2465
|
0
|
|
|
|
|
|
$xfer += $self->{ire}->read($input); |
2466
|
|
|
|
|
|
|
} else { |
2467
|
0
|
|
|
|
|
|
$xfer += $input->skip($ftype); |
2468
|
|
|
|
|
|
|
} |
2469
|
0
|
|
|
|
|
|
last; }; |
2470
|
0
|
0
|
|
|
|
|
/^2$/ && do{ if ($ftype == TType::STRUCT) { |
|
0
|
0
|
|
|
|
|
|
2471
|
0
|
|
|
|
|
|
$self->{ue} = new Cassandra::UnavailableException(); |
2472
|
0
|
|
|
|
|
|
$xfer += $self->{ue}->read($input); |
2473
|
|
|
|
|
|
|
} else { |
2474
|
0
|
|
|
|
|
|
$xfer += $input->skip($ftype); |
2475
|
|
|
|
|
|
|
} |
2476
|
0
|
|
|
|
|
|
last; }; |
2477
|
0
|
0
|
|
|
|
|
/^3$/ && do{ if ($ftype == TType::STRUCT) { |
|
0
|
0
|
|
|
|
|
|
2478
|
0
|
|
|
|
|
|
$self->{te} = new Cassandra::TimedOutException(); |
2479
|
0
|
|
|
|
|
|
$xfer += $self->{te}->read($input); |
2480
|
|
|
|
|
|
|
} else { |
2481
|
0
|
|
|
|
|
|
$xfer += $input->skip($ftype); |
2482
|
|
|
|
|
|
|
} |
2483
|
0
|
|
|
|
|
|
last; }; |
2484
|
0
|
|
|
|
|
|
$xfer += $input->skip($ftype); |
2485
|
|
|
|
|
|
|
} |
2486
|
0
|
|
|
|
|
|
$xfer += $input->readFieldEnd(); |
2487
|
|
|
|
|
|
|
} |
2488
|
0
|
|
|
|
|
|
$xfer += $input->readStructEnd(); |
2489
|
0
|
|
|
|
|
|
return $xfer; |
2490
|
|
|
|
|
|
|
} |
2491
|
|
|
|
|
|
|
|
2492
|
|
|
|
|
|
|
sub write { |
2493
|
0
|
|
|
0
|
|
|
my ($self, $output) = @_; |
2494
|
0
|
|
|
|
|
|
my $xfer = 0; |
2495
|
0
|
|
|
|
|
|
$xfer += $output->writeStructBegin('Cassandra_add_result'); |
2496
|
0
|
0
|
|
|
|
|
if (defined $self->{ire}) { |
2497
|
0
|
|
|
|
|
|
$xfer += $output->writeFieldBegin('ire', TType::STRUCT, 1); |
2498
|
0
|
|
|
|
|
|
$xfer += $self->{ire}->write($output); |
2499
|
0
|
|
|
|
|
|
$xfer += $output->writeFieldEnd(); |
2500
|
|
|
|
|
|
|
} |
2501
|
0
|
0
|
|
|
|
|
if (defined $self->{ue}) { |
2502
|
0
|
|
|
|
|
|
$xfer += $output->writeFieldBegin('ue', TType::STRUCT, 2); |
2503
|
0
|
|
|
|
|
|
$xfer += $self->{ue}->write($output); |
2504
|
0
|
|
|
|
|
|
$xfer += $output->writeFieldEnd(); |
2505
|
|
|
|
|
|
|
} |
2506
|
0
|
0
|
|
|
|
|
if (defined $self->{te}) { |
2507
|
0
|
|
|
|
|
|
$xfer += $output->writeFieldBegin('te', TType::STRUCT, 3); |
2508
|
0
|
|
|
|
|
|
$xfer += $self->{te}->write($output); |
2509
|
0
|
|
|
|
|
|
$xfer += $output->writeFieldEnd(); |
2510
|
|
|
|
|
|
|
} |
2511
|
0
|
|
|
|
|
|
$xfer += $output->writeFieldStop(); |
2512
|
0
|
|
|
|
|
|
$xfer += $output->writeStructEnd(); |
2513
|
0
|
|
|
|
|
|
return $xfer; |
2514
|
|
|
|
|
|
|
} |
2515
|
|
|
|
|
|
|
|
2516
|
|
|
|
|
|
|
package Cassandra::Cassandra_remove_args; |
2517
|
|
|
|
|
|
|
BEGIN { |
2518
|
1
|
|
|
1
|
|
21
|
$Cassandra::Cassandra_remove_args::VERSION = '0.4.0'; |
2519
|
|
|
|
|
|
|
} |
2520
|
1
|
|
|
1
|
|
5
|
use base qw(Class::Accessor); |
|
1
|
|
|
|
|
2
|
|
|
1
|
|
|
|
|
807
|
|
2521
|
|
|
|
|
|
|
Cassandra::Cassandra_remove_args->mk_accessors( qw( key column_path timestamp consistency_level ) ); |
2522
|
|
|
|
|
|
|
|
2523
|
|
|
|
|
|
|
sub new { |
2524
|
0
|
|
|
0
|
|
|
my $classname = shift; |
2525
|
0
|
|
|
|
|
|
my $self = {}; |
2526
|
0
|
|
0
|
|
|
|
my $vals = shift || {}; |
2527
|
0
|
|
|
|
|
|
$self->{key} = undef; |
2528
|
0
|
|
|
|
|
|
$self->{column_path} = undef; |
2529
|
0
|
|
|
|
|
|
$self->{timestamp} = undef; |
2530
|
0
|
|
|
|
|
|
$self->{consistency_level} = 1; |
2531
|
0
|
0
|
|
|
|
|
if (UNIVERSAL::isa($vals,'HASH')) { |
2532
|
0
|
0
|
|
|
|
|
if (defined $vals->{key}) { |
2533
|
0
|
|
|
|
|
|
$self->{key} = $vals->{key}; |
2534
|
|
|
|
|
|
|
} |
2535
|
0
|
0
|
|
|
|
|
if (defined $vals->{column_path}) { |
2536
|
0
|
|
|
|
|
|
$self->{column_path} = $vals->{column_path}; |
2537
|
|
|
|
|
|
|
} |
2538
|
0
|
0
|
|
|
|
|
if (defined $vals->{timestamp}) { |
2539
|
0
|
|
|
|
|
|
$self->{timestamp} = $vals->{timestamp}; |
2540
|
|
|
|
|
|
|
} |
2541
|
0
|
0
|
|
|
|
|
if (defined $vals->{consistency_level}) { |
2542
|
0
|
|
|
|
|
|
$self->{consistency_level} = $vals->{consistency_level}; |
2543
|
|
|
|
|
|
|
} |
2544
|
|
|
|
|
|
|
} |
2545
|
0
|
|
|
|
|
|
return bless ($self, $classname); |
2546
|
|
|
|
|
|
|
} |
2547
|
|
|
|
|
|
|
|
2548
|
|
|
|
|
|
|
sub getName { |
2549
|
0
|
|
|
0
|
|
|
return 'Cassandra_remove_args'; |
2550
|
|
|
|
|
|
|
} |
2551
|
|
|
|
|
|
|
|
2552
|
|
|
|
|
|
|
sub read { |
2553
|
0
|
|
|
0
|
|
|
my ($self, $input) = @_; |
2554
|
0
|
|
|
|
|
|
my $xfer = 0; |
2555
|
0
|
|
|
|
|
|
my $fname; |
2556
|
0
|
|
|
|
|
|
my $ftype = 0; |
2557
|
0
|
|
|
|
|
|
my $fid = 0; |
2558
|
0
|
|
|
|
|
|
$xfer += $input->readStructBegin(\$fname); |
2559
|
0
|
|
|
|
|
|
while (1) |
2560
|
|
|
|
|
|
|
{ |
2561
|
0
|
|
|
|
|
|
$xfer += $input->readFieldBegin(\$fname, \$ftype, \$fid); |
2562
|
0
|
0
|
|
|
|
|
if ($ftype == TType::STOP) { |
2563
|
0
|
|
|
|
|
|
last; |
2564
|
|
|
|
|
|
|
} |
2565
|
0
|
|
|
|
|
|
SWITCH: for($fid) |
2566
|
|
|
|
|
|
|
{ |
2567
|
0
|
0
|
|
|
|
|
/^1$/ && do{ if ($ftype == TType::STRING) { |
|
0
|
0
|
|
|
|
|
|
2568
|
0
|
|
|
|
|
|
$xfer += $input->readString(\$self->{key}); |
2569
|
|
|
|
|
|
|
} else { |
2570
|
0
|
|
|
|
|
|
$xfer += $input->skip($ftype); |
2571
|
|
|
|
|
|
|
} |
2572
|
0
|
|
|
|
|
|
last; }; |
2573
|
0
|
0
|
|
|
|
|
/^2$/ && do{ if ($ftype == TType::STRUCT) { |
|
0
|
0
|
|
|
|
|
|
2574
|
0
|
|
|
|
|
|
$self->{column_path} = new Cassandra::ColumnPath(); |
2575
|
0
|
|
|
|
|
|
$xfer += $self->{column_path}->read($input); |
2576
|
|
|
|
|
|
|
} else { |
2577
|
0
|
|
|
|
|
|
$xfer += $input->skip($ftype); |
2578
|
|
|
|
|
|
|
} |
2579
|
0
|
|
|
|
|
|
last; }; |
2580
|
0
|
0
|
|
|
|
|
/^3$/ && do{ if ($ftype == TType::I64) { |
|
0
|
0
|
|
|
|
|
|
2581
|
0
|
|
|
|
|
|
$xfer += $input->readI64(\$self->{timestamp}); |
2582
|
|
|
|
|
|
|
} else { |
2583
|
0
|
|
|
|
|
|
$xfer += $input->skip($ftype); |
2584
|
|
|
|
|
|
|
} |
2585
|
0
|
|
|
|
|
|
last; }; |
2586
|
0
|
0
|
|
|
|
|
/^4$/ && do{ if ($ftype == TType::I32) { |
|
0
|
0
|
|
|
|
|
|
2587
|
0
|
|
|
|
|
|
$xfer += $input->readI32(\$self->{consistency_level}); |
2588
|
|
|
|
|
|
|
} else { |
2589
|
0
|
|
|
|
|
|
$xfer += $input->skip($ftype); |
2590
|
|
|
|
|
|
|
} |
2591
|
0
|
|
|
|
|
|
last; }; |
2592
|
0
|
|
|
|
|
|
$xfer += $input->skip($ftype); |
2593
|
|
|
|
|
|
|
} |
2594
|
0
|
|
|
|
|
|
$xfer += $input->readFieldEnd(); |
2595
|
|
|
|
|
|
|
} |
2596
|
0
|
|
|
|
|
|
$xfer += $input->readStructEnd(); |
2597
|
0
|
|
|
|
|
|
return $xfer; |
2598
|
|
|
|
|
|
|
} |
2599
|
|
|
|
|
|
|
|
2600
|
|
|
|
|
|
|
sub write { |
2601
|
0
|
|
|
0
|
|
|
my ($self, $output) = @_; |
2602
|
0
|
|
|
|
|
|
my $xfer = 0; |
2603
|
0
|
|
|
|
|
|
$xfer += $output->writeStructBegin('Cassandra_remove_args'); |
2604
|
0
|
0
|
|
|
|
|
if (defined $self->{key}) { |
2605
|
0
|
|
|
|
|
|
$xfer += $output->writeFieldBegin('key', TType::STRING, 1); |
2606
|
0
|
|
|
|
|
|
$xfer += $output->writeString($self->{key}); |
2607
|
0
|
|
|
|
|
|
$xfer += $output->writeFieldEnd(); |
2608
|
|
|
|
|
|
|
} |
2609
|
0
|
0
|
|
|
|
|
if (defined $self->{column_path}) { |
2610
|
0
|
|
|
|
|
|
$xfer += $output->writeFieldBegin('column_path', TType::STRUCT, 2); |
2611
|
0
|
|
|
|
|
|
$xfer += $self->{column_path}->write($output); |
2612
|
0
|
|
|
|
|
|
$xfer += $output->writeFieldEnd(); |
2613
|
|
|
|
|
|
|
} |
2614
|
0
|
0
|
|
|
|
|
if (defined $self->{timestamp}) { |
2615
|
0
|
|
|
|
|
|
$xfer += $output->writeFieldBegin('timestamp', TType::I64, 3); |
2616
|
0
|
|
|
|
|
|
$xfer += $output->writeI64($self->{timestamp}); |
2617
|
0
|
|
|
|
|
|
$xfer += $output->writeFieldEnd(); |
2618
|
|
|
|
|
|
|
} |
2619
|
0
|
0
|
|
|
|
|
if (defined $self->{consistency_level}) { |
2620
|
0
|
|
|
|
|
|
$xfer += $output->writeFieldBegin('consistency_level', TType::I32, 4); |
2621
|
0
|
|
|
|
|
|
$xfer += $output->writeI32($self->{consistency_level}); |
2622
|
0
|
|
|
|
|
|
$xfer += $output->writeFieldEnd(); |
2623
|
|
|
|
|
|
|
} |
2624
|
0
|
|
|
|
|
|
$xfer += $output->writeFieldStop(); |
2625
|
0
|
|
|
|
|
|
$xfer += $output->writeStructEnd(); |
2626
|
0
|
|
|
|
|
|
return $xfer; |
2627
|
|
|
|
|
|
|
} |
2628
|
|
|
|
|
|
|
|
2629
|
|
|
|
|
|
|
package Cassandra::Cassandra_remove_result; |
2630
|
|
|
|
|
|
|
BEGIN { |
2631
|
1
|
|
|
1
|
|
31
|
$Cassandra::Cassandra_remove_result::VERSION = '0.4.0'; |
2632
|
|
|
|
|
|
|
} |
2633
|
1
|
|
|
1
|
|
7
|
use base qw(Class::Accessor); |
|
1
|
|
|
|
|
1
|
|
|
1
|
|
|
|
|
735
|
|
2634
|
|
|
|
|
|
|
Cassandra::Cassandra_remove_result->mk_accessors( qw( ) ); |
2635
|
|
|
|
|
|
|
|
2636
|
|
|
|
|
|
|
sub new { |
2637
|
0
|
|
|
0
|
|
|
my $classname = shift; |
2638
|
0
|
|
|
|
|
|
my $self = {}; |
2639
|
0
|
|
0
|
|
|
|
my $vals = shift || {}; |
2640
|
0
|
|
|
|
|
|
$self->{ire} = undef; |
2641
|
0
|
|
|
|
|
|
$self->{ue} = undef; |
2642
|
0
|
|
|
|
|
|
$self->{te} = undef; |
2643
|
0
|
0
|
|
|
|
|
if (UNIVERSAL::isa($vals,'HASH')) { |
2644
|
0
|
0
|
|
|
|
|
if (defined $vals->{ire}) { |
2645
|
0
|
|
|
|
|
|
$self->{ire} = $vals->{ire}; |
2646
|
|
|
|
|
|
|
} |
2647
|
0
|
0
|
|
|
|
|
if (defined $vals->{ue}) { |
2648
|
0
|
|
|
|
|
|
$self->{ue} = $vals->{ue}; |
2649
|
|
|
|
|
|
|
} |
2650
|
0
|
0
|
|
|
|
|
if (defined $vals->{te}) { |
2651
|
0
|
|
|
|
|
|
$self->{te} = $vals->{te}; |
2652
|
|
|
|
|
|
|
} |
2653
|
|
|
|
|
|
|
} |
2654
|
0
|
|
|
|
|
|
return bless ($self, $classname); |
2655
|
|
|
|
|
|
|
} |
2656
|
|
|
|
|
|
|
|
2657
|
|
|
|
|
|
|
sub getName { |
2658
|
0
|
|
|
0
|
|
|
return 'Cassandra_remove_result'; |
2659
|
|
|
|
|
|
|
} |
2660
|
|
|
|
|
|
|
|
2661
|
|
|
|
|
|
|
sub read { |
2662
|
0
|
|
|
0
|
|
|
my ($self, $input) = @_; |
2663
|
0
|
|
|
|
|
|
my $xfer = 0; |
2664
|
0
|
|
|
|
|
|
my $fname; |
2665
|
0
|
|
|
|
|
|
my $ftype = 0; |
2666
|
0
|
|
|
|
|
|
my $fid = 0; |
2667
|
0
|
|
|
|
|
|
$xfer += $input->readStructBegin(\$fname); |
2668
|
0
|
|
|
|
|
|
while (1) |
2669
|
|
|
|
|
|
|
{ |
2670
|
0
|
|
|
|
|
|
$xfer += $input->readFieldBegin(\$fname, \$ftype, \$fid); |
2671
|
0
|
0
|
|
|
|
|
if ($ftype == TType::STOP) { |
2672
|
0
|
|
|
|
|
|
last; |
2673
|
|
|
|
|
|
|
} |
2674
|
0
|
|
|
|
|
|
SWITCH: for($fid) |
2675
|
|
|
|
|
|
|
{ |
2676
|
0
|
0
|
|
|
|
|
/^1$/ && do{ if ($ftype == TType::STRUCT) { |
|
0
|
0
|
|
|
|
|
|
2677
|
0
|
|
|
|
|
|
$self->{ire} = new Cassandra::InvalidRequestException(); |
2678
|
0
|
|
|
|
|
|
$xfer += $self->{ire}->read($input); |
2679
|
|
|
|
|
|
|
} else { |
2680
|
0
|
|
|
|
|
|
$xfer += $input->skip($ftype); |
2681
|
|
|
|
|
|
|
} |
2682
|
0
|
|
|
|
|
|
last; }; |
2683
|
0
|
0
|
|
|
|
|
/^2$/ && do{ if ($ftype == TType::STRUCT) { |
|
0
|
0
|
|
|
|
|
|
2684
|
0
|
|
|
|
|
|
$self->{ue} = new Cassandra::UnavailableException(); |
2685
|
0
|
|
|
|
|
|
$xfer += $self->{ue}->read($input); |
2686
|
|
|
|
|
|
|
} else { |
2687
|
0
|
|
|
|
|
|
$xfer += $input->skip($ftype); |
2688
|
|
|
|
|
|
|
} |
2689
|
0
|
|
|
|
|
|
last; }; |
2690
|
0
|
0
|
|
|
|
|
/^3$/ && do{ if ($ftype == TType::STRUCT) { |
|
0
|
0
|
|
|
|
|
|
2691
|
0
|
|
|
|
|
|
$self->{te} = new Cassandra::TimedOutException(); |
2692
|
0
|
|
|
|
|
|
$xfer += $self->{te}->read($input); |
2693
|
|
|
|
|
|
|
} else { |
2694
|
0
|
|
|
|
|
|
$xfer += $input->skip($ftype); |
2695
|
|
|
|
|
|
|
} |
2696
|
0
|
|
|
|
|
|
last; }; |
2697
|
0
|
|
|
|
|
|
$xfer += $input->skip($ftype); |
2698
|
|
|
|
|
|
|
} |
2699
|
0
|
|
|
|
|
|
$xfer += $input->readFieldEnd(); |
2700
|
|
|
|
|
|
|
} |
2701
|
0
|
|
|
|
|
|
$xfer += $input->readStructEnd(); |
2702
|
0
|
|
|
|
|
|
return $xfer; |
2703
|
|
|
|
|
|
|
} |
2704
|
|
|
|
|
|
|
|
2705
|
|
|
|
|
|
|
sub write { |
2706
|
0
|
|
|
0
|
|
|
my ($self, $output) = @_; |
2707
|
0
|
|
|
|
|
|
my $xfer = 0; |
2708
|
0
|
|
|
|
|
|
$xfer += $output->writeStructBegin('Cassandra_remove_result'); |
2709
|
0
|
0
|
|
|
|
|
if (defined $self->{ire}) { |
2710
|
0
|
|
|
|
|
|
$xfer += $output->writeFieldBegin('ire', TType::STRUCT, 1); |
2711
|
0
|
|
|
|
|
|
$xfer += $self->{ire}->write($output); |
2712
|
0
|
|
|
|
|
|
$xfer += $output->writeFieldEnd(); |
2713
|
|
|
|
|
|
|
} |
2714
|
0
|
0
|
|
|
|
|
if (defined $self->{ue}) { |
2715
|
0
|
|
|
|
|
|
$xfer += $output->writeFieldBegin('ue', TType::STRUCT, 2); |
2716
|
0
|
|
|
|
|
|
$xfer += $self->{ue}->write($output); |
2717
|
0
|
|
|
|
|
|
$xfer += $output->writeFieldEnd(); |
2718
|
|
|
|
|
|
|
} |
2719
|
0
|
0
|
|
|
|
|
if (defined $self->{te}) { |
2720
|
0
|
|
|
|
|
|
$xfer += $output->writeFieldBegin('te', TType::STRUCT, 3); |
2721
|
0
|
|
|
|
|
|
$xfer += $self->{te}->write($output); |
2722
|
0
|
|
|
|
|
|
$xfer += $output->writeFieldEnd(); |
2723
|
|
|
|
|
|
|
} |
2724
|
0
|
|
|
|
|
|
$xfer += $output->writeFieldStop(); |
2725
|
0
|
|
|
|
|
|
$xfer += $output->writeStructEnd(); |
2726
|
0
|
|
|
|
|
|
return $xfer; |
2727
|
|
|
|
|
|
|
} |
2728
|
|
|
|
|
|
|
|
2729
|
|
|
|
|
|
|
package Cassandra::Cassandra_remove_counter_args; |
2730
|
|
|
|
|
|
|
BEGIN { |
2731
|
1
|
|
|
1
|
|
26
|
$Cassandra::Cassandra_remove_counter_args::VERSION = '0.4.0'; |
2732
|
|
|
|
|
|
|
} |
2733
|
1
|
|
|
1
|
|
7
|
use base qw(Class::Accessor); |
|
1
|
|
|
|
|
2
|
|
|
1
|
|
|
|
|
724
|
|
2734
|
|
|
|
|
|
|
Cassandra::Cassandra_remove_counter_args->mk_accessors( qw( key path consistency_level ) ); |
2735
|
|
|
|
|
|
|
|
2736
|
|
|
|
|
|
|
sub new { |
2737
|
0
|
|
|
0
|
|
|
my $classname = shift; |
2738
|
0
|
|
|
|
|
|
my $self = {}; |
2739
|
0
|
|
0
|
|
|
|
my $vals = shift || {}; |
2740
|
0
|
|
|
|
|
|
$self->{key} = undef; |
2741
|
0
|
|
|
|
|
|
$self->{path} = undef; |
2742
|
0
|
|
|
|
|
|
$self->{consistency_level} = 1; |
2743
|
0
|
0
|
|
|
|
|
if (UNIVERSAL::isa($vals,'HASH')) { |
2744
|
0
|
0
|
|
|
|
|
if (defined $vals->{key}) { |
2745
|
0
|
|
|
|
|
|
$self->{key} = $vals->{key}; |
2746
|
|
|
|
|
|
|
} |
2747
|
0
|
0
|
|
|
|
|
if (defined $vals->{path}) { |
2748
|
0
|
|
|
|
|
|
$self->{path} = $vals->{path}; |
2749
|
|
|
|
|
|
|
} |
2750
|
0
|
0
|
|
|
|
|
if (defined $vals->{consistency_level}) { |
2751
|
0
|
|
|
|
|
|
$self->{consistency_level} = $vals->{consistency_level}; |
2752
|
|
|
|
|
|
|
} |
2753
|
|
|
|
|
|
|
} |
2754
|
0
|
|
|
|
|
|
return bless ($self, $classname); |
2755
|
|
|
|
|
|
|
} |
2756
|
|
|
|
|
|
|
|
2757
|
|
|
|
|
|
|
sub getName { |
2758
|
0
|
|
|
0
|
|
|
return 'Cassandra_remove_counter_args'; |
2759
|
|
|
|
|
|
|
} |
2760
|
|
|
|
|
|
|
|
2761
|
|
|
|
|
|
|
sub read { |
2762
|
0
|
|
|
0
|
|
|
my ($self, $input) = @_; |
2763
|
0
|
|
|
|
|
|
my $xfer = 0; |
2764
|
0
|
|
|
|
|
|
my $fname; |
2765
|
0
|
|
|
|
|
|
my $ftype = 0; |
2766
|
0
|
|
|
|
|
|
my $fid = 0; |
2767
|
0
|
|
|
|
|
|
$xfer += $input->readStructBegin(\$fname); |
2768
|
0
|
|
|
|
|
|
while (1) |
2769
|
|
|
|
|
|
|
{ |
2770
|
0
|
|
|
|
|
|
$xfer += $input->readFieldBegin(\$fname, \$ftype, \$fid); |
2771
|
0
|
0
|
|
|
|
|
if ($ftype == TType::STOP) { |
2772
|
0
|
|
|
|
|
|
last; |
2773
|
|
|
|
|
|
|
} |
2774
|
0
|
|
|
|
|
|
SWITCH: for($fid) |
2775
|
|
|
|
|
|
|
{ |
2776
|
0
|
0
|
|
|
|
|
/^1$/ && do{ if ($ftype == TType::STRING) { |
|
0
|
0
|
|
|
|
|
|
2777
|
0
|
|
|
|
|
|
$xfer += $input->readString(\$self->{key}); |
2778
|
|
|
|
|
|
|
} else { |
2779
|
0
|
|
|
|
|
|
$xfer += $input->skip($ftype); |
2780
|
|
|
|
|
|
|
} |
2781
|
0
|
|
|
|
|
|
last; }; |
2782
|
0
|
0
|
|
|
|
|
/^2$/ && do{ if ($ftype == TType::STRUCT) { |
|
0
|
0
|
|
|
|
|
|
2783
|
0
|
|
|
|
|
|
$self->{path} = new Cassandra::ColumnPath(); |
2784
|
0
|
|
|
|
|
|
$xfer += $self->{path}->read($input); |
2785
|
|
|
|
|
|
|
} else { |
2786
|
0
|
|
|
|
|
|
$xfer += $input->skip($ftype); |
2787
|
|
|
|
|
|
|
} |
2788
|
0
|
|
|
|
|
|
last; }; |
2789
|
0
|
0
|
|
|
|
|
/^3$/ && do{ if ($ftype == TType::I32) { |
|
0
|
0
|
|
|
|
|
|
2790
|
0
|
|
|
|
|
|
$xfer += $input->readI32(\$self->{consistency_level}); |
2791
|
|
|
|
|
|
|
} else { |
2792
|
0
|
|
|
|
|
|
$xfer += $input->skip($ftype); |
2793
|
|
|
|
|
|
|
} |
2794
|
0
|
|
|
|
|
|
last; }; |
2795
|
0
|
|
|
|
|
|
$xfer += $input->skip($ftype); |
2796
|
|
|
|
|
|
|
} |
2797
|
0
|
|
|
|
|
|
$xfer += $input->readFieldEnd(); |
2798
|
|
|
|
|
|
|
} |
2799
|
0
|
|
|
|
|
|
$xfer += $input->readStructEnd(); |
2800
|
0
|
|
|
|
|
|
return $xfer; |
2801
|
|
|
|
|
|
|
} |
2802
|
|
|
|
|
|
|
|
2803
|
|
|
|
|
|
|
sub write { |
2804
|
0
|
|
|
0
|
|
|
my ($self, $output) = @_; |
2805
|
0
|
|
|
|
|
|
my $xfer = 0; |
2806
|
0
|
|
|
|
|
|
$xfer += $output->writeStructBegin('Cassandra_remove_counter_args'); |
2807
|
0
|
0
|
|
|
|
|
if (defined $self->{key}) { |
2808
|
0
|
|
|
|
|
|
$xfer += $output->writeFieldBegin('key', TType::STRING, 1); |
2809
|
0
|
|
|
|
|
|
$xfer += $output->writeString($self->{key}); |
2810
|
0
|
|
|
|
|
|
$xfer += $output->writeFieldEnd(); |
2811
|
|
|
|
|
|
|
} |
2812
|
0
|
0
|
|
|
|
|
if (defined $self->{path}) { |
2813
|
0
|
|
|
|
|
|
$xfer += $output->writeFieldBegin('path', TType::STRUCT, 2); |
2814
|
0
|
|
|
|
|
|
$xfer += $self->{path}->write($output); |
2815
|
0
|
|
|
|
|
|
$xfer += $output->writeFieldEnd(); |
2816
|
|
|
|
|
|
|
} |
2817
|
0
|
0
|
|
|
|
|
if (defined $self->{consistency_level}) { |
2818
|
0
|
|
|
|
|
|
$xfer += $output->writeFieldBegin('consistency_level', TType::I32, 3); |
2819
|
0
|
|
|
|
|
|
$xfer += $output->writeI32($self->{consistency_level}); |
2820
|
0
|
|
|
|
|
|
$xfer += $output->writeFieldEnd(); |
2821
|
|
|
|
|
|
|
} |
2822
|
0
|
|
|
|
|
|
$xfer += $output->writeFieldStop(); |
2823
|
0
|
|
|
|
|
|
$xfer += $output->writeStructEnd(); |
2824
|
0
|
|
|
|
|
|
return $xfer; |
2825
|
|
|
|
|
|
|
} |
2826
|
|
|
|
|
|
|
|
2827
|
|
|
|
|
|
|
package Cassandra::Cassandra_remove_counter_result; |
2828
|
|
|
|
|
|
|
BEGIN { |
2829
|
1
|
|
|
1
|
|
16
|
$Cassandra::Cassandra_remove_counter_result::VERSION = '0.4.0'; |
2830
|
|
|
|
|
|
|
} |
2831
|
1
|
|
|
1
|
|
6
|
use base qw(Class::Accessor); |
|
1
|
|
|
|
|
2
|
|
|
1
|
|
|
|
|
656
|
|
2832
|
|
|
|
|
|
|
Cassandra::Cassandra_remove_counter_result->mk_accessors( qw( ) ); |
2833
|
|
|
|
|
|
|
|
2834
|
|
|
|
|
|
|
sub new { |
2835
|
0
|
|
|
0
|
|
|
my $classname = shift; |
2836
|
0
|
|
|
|
|
|
my $self = {}; |
2837
|
0
|
|
0
|
|
|
|
my $vals = shift || {}; |
2838
|
0
|
|
|
|
|
|
$self->{ire} = undef; |
2839
|
0
|
|
|
|
|
|
$self->{ue} = undef; |
2840
|
0
|
|
|
|
|
|
$self->{te} = undef; |
2841
|
0
|
0
|
|
|
|
|
if (UNIVERSAL::isa($vals,'HASH')) { |
2842
|
0
|
0
|
|
|
|
|
if (defined $vals->{ire}) { |
2843
|
0
|
|
|
|
|
|
$self->{ire} = $vals->{ire}; |
2844
|
|
|
|
|
|
|
} |
2845
|
0
|
0
|
|
|
|
|
if (defined $vals->{ue}) { |
2846
|
0
|
|
|
|
|
|
$self->{ue} = $vals->{ue}; |
2847
|
|
|
|
|
|
|
} |
2848
|
0
|
0
|
|
|
|
|
if (defined $vals->{te}) { |
2849
|
0
|
|
|
|
|
|
$self->{te} = $vals->{te}; |
2850
|
|
|
|
|
|
|
} |
2851
|
|
|
|
|
|
|
} |
2852
|
0
|
|
|
|
|
|
return bless ($self, $classname); |
2853
|
|
|
|
|
|
|
} |
2854
|
|
|
|
|
|
|
|
2855
|
|
|
|
|
|
|
sub getName { |
2856
|
0
|
|
|
0
|
|
|
return 'Cassandra_remove_counter_result'; |
2857
|
|
|
|
|
|
|
} |
2858
|
|
|
|
|
|
|
|
2859
|
|
|
|
|
|
|
sub read { |
2860
|
0
|
|
|
0
|
|
|
my ($self, $input) = @_; |
2861
|
0
|
|
|
|
|
|
my $xfer = 0; |
2862
|
0
|
|
|
|
|
|
my $fname; |
2863
|
0
|
|
|
|
|
|
my $ftype = 0; |
2864
|
0
|
|
|
|
|
|
my $fid = 0; |
2865
|
0
|
|
|
|
|
|
$xfer += $input->readStructBegin(\$fname); |
2866
|
0
|
|
|
|
|
|
while (1) |
2867
|
|
|
|
|
|
|
{ |
2868
|
0
|
|
|
|
|
|
$xfer += $input->readFieldBegin(\$fname, \$ftype, \$fid); |
2869
|
0
|
0
|
|
|
|
|
if ($ftype == TType::STOP) { |
2870
|
0
|
|
|
|
|
|
last; |
2871
|
|
|
|
|
|
|
} |
2872
|
0
|
|
|
|
|
|
SWITCH: for($fid) |
2873
|
|
|
|
|
|
|
{ |
2874
|
0
|
0
|
|
|
|
|
/^1$/ && do{ if ($ftype == TType::STRUCT) { |
|
0
|
0
|
|
|
|
|
|
2875
|
0
|
|
|
|
|
|
$self->{ire} = new Cassandra::InvalidRequestException(); |
2876
|
0
|
|
|
|
|
|
$xfer += $self->{ire}->read($input); |
2877
|
|
|
|
|
|
|
} else { |
2878
|
0
|
|
|
|
|
|
$xfer += $input->skip($ftype); |
2879
|
|
|
|
|
|
|
} |
2880
|
0
|
|
|
|
|
|
last; }; |
2881
|
0
|
0
|
|
|
|
|
/^2$/ && do{ if ($ftype == TType::STRUCT) { |
|
0
|
0
|
|
|
|
|
|
2882
|
0
|
|
|
|
|
|
$self->{ue} = new Cassandra::UnavailableException(); |
2883
|
0
|
|
|
|
|
|
$xfer += $self->{ue}->read($input); |
2884
|
|
|
|
|
|
|
} else { |
2885
|
0
|
|
|
|
|
|
$xfer += $input->skip($ftype); |
2886
|
|
|
|
|
|
|
} |
2887
|
0
|
|
|
|
|
|
last; }; |
2888
|
0
|
0
|
|
|
|
|
/^3$/ && do{ if ($ftype == TType::STRUCT) { |
|
0
|
0
|
|
|
|
|
|
2889
|
0
|
|
|
|
|
|
$self->{te} = new Cassandra::TimedOutException(); |
2890
|
0
|
|
|
|
|
|
$xfer += $self->{te}->read($input); |
2891
|
|
|
|
|
|
|
} else { |
2892
|
0
|
|
|
|
|
|
$xfer += $input->skip($ftype); |
2893
|
|
|
|
|
|
|
} |
2894
|
0
|
|
|
|
|
|
last; }; |
2895
|
0
|
|
|
|
|
|
$xfer += $input->skip($ftype); |
2896
|
|
|
|
|
|
|
} |
2897
|
0
|
|
|
|
|
|
$xfer += $input->readFieldEnd(); |
2898
|
|
|
|
|
|
|
} |
2899
|
0
|
|
|
|
|
|
$xfer += $input->readStructEnd(); |
2900
|
0
|
|
|
|
|
|
return $xfer; |
2901
|
|
|
|
|
|
|
} |
2902
|
|
|
|
|
|
|
|
2903
|
|
|
|
|
|
|
sub write { |
2904
|
0
|
|
|
0
|
|
|
my ($self, $output) = @_; |
2905
|
0
|
|
|
|
|
|
my $xfer = 0; |
2906
|
0
|
|
|
|
|
|
$xfer += $output->writeStructBegin('Cassandra_remove_counter_result'); |
2907
|
0
|
0
|
|
|
|
|
if (defined $self->{ire}) { |
2908
|
0
|
|
|
|
|
|
$xfer += $output->writeFieldBegin('ire', TType::STRUCT, 1); |
2909
|
0
|
|
|
|
|
|
$xfer += $self->{ire}->write($output); |
2910
|
0
|
|
|
|
|
|
$xfer += $output->writeFieldEnd(); |
2911
|
|
|
|
|
|
|
} |
2912
|
0
|
0
|
|
|
|
|
if (defined $self->{ue}) { |
2913
|
0
|
|
|
|
|
|
$xfer += $output->writeFieldBegin('ue', TType::STRUCT, 2); |
2914
|
0
|
|
|
|
|
|
$xfer += $self->{ue}->write($output); |
2915
|
0
|
|
|
|
|
|
$xfer += $output->writeFieldEnd(); |
2916
|
|
|
|
|
|
|
} |
2917
|
0
|
0
|
|
|
|
|
if (defined $self->{te}) { |
2918
|
0
|
|
|
|
|
|
$xfer += $output->writeFieldBegin('te', TType::STRUCT, 3); |
2919
|
0
|
|
|
|
|
|
$xfer += $self->{te}->write($output); |
2920
|
0
|
|
|
|
|
|
$xfer += $output->writeFieldEnd(); |
2921
|
|
|
|
|
|
|
} |
2922
|
0
|
|
|
|
|
|
$xfer += $output->writeFieldStop(); |
2923
|
0
|
|
|
|
|
|
$xfer += $output->writeStructEnd(); |
2924
|
0
|
|
|
|
|
|
return $xfer; |
2925
|
|
|
|
|
|
|
} |
2926
|
|
|
|
|
|
|
|
2927
|
|
|
|
|
|
|
package Cassandra::Cassandra_batch_mutate_args; |
2928
|
|
|
|
|
|
|
BEGIN { |
2929
|
1
|
|
|
1
|
|
17
|
$Cassandra::Cassandra_batch_mutate_args::VERSION = '0.4.0'; |
2930
|
|
|
|
|
|
|
} |
2931
|
1
|
|
|
1
|
|
5
|
use base qw(Class::Accessor); |
|
1
|
|
|
|
|
2
|
|
|
1
|
|
|
|
|
1037
|
|
2932
|
|
|
|
|
|
|
Cassandra::Cassandra_batch_mutate_args->mk_accessors( qw( mutation_map consistency_level ) ); |
2933
|
|
|
|
|
|
|
|
2934
|
|
|
|
|
|
|
sub new { |
2935
|
0
|
|
|
0
|
|
|
my $classname = shift; |
2936
|
0
|
|
|
|
|
|
my $self = {}; |
2937
|
0
|
|
0
|
|
|
|
my $vals = shift || {}; |
2938
|
0
|
|
|
|
|
|
$self->{mutation_map} = undef; |
2939
|
0
|
|
|
|
|
|
$self->{consistency_level} = 1; |
2940
|
0
|
0
|
|
|
|
|
if (UNIVERSAL::isa($vals,'HASH')) { |
2941
|
0
|
0
|
|
|
|
|
if (defined $vals->{mutation_map}) { |
2942
|
0
|
|
|
|
|
|
$self->{mutation_map} = $vals->{mutation_map}; |
2943
|
|
|
|
|
|
|
} |
2944
|
0
|
0
|
|
|
|
|
if (defined $vals->{consistency_level}) { |
2945
|
0
|
|
|
|
|
|
$self->{consistency_level} = $vals->{consistency_level}; |
2946
|
|
|
|
|
|
|
} |
2947
|
|
|
|
|
|
|
} |
2948
|
0
|
|
|
|
|
|
return bless ($self, $classname); |
2949
|
|
|
|
|
|
|
} |
2950
|
|
|
|
|
|
|
|
2951
|
|
|
|
|
|
|
sub getName { |
2952
|
0
|
|
|
0
|
|
|
return 'Cassandra_batch_mutate_args'; |
2953
|
|
|
|
|
|
|
} |
2954
|
|
|
|
|
|
|
|
2955
|
|
|
|
|
|
|
sub read { |
2956
|
0
|
|
|
0
|
|
|
my ($self, $input) = @_; |
2957
|
0
|
|
|
|
|
|
my $xfer = 0; |
2958
|
0
|
|
|
|
|
|
my $fname; |
2959
|
0
|
|
|
|
|
|
my $ftype = 0; |
2960
|
0
|
|
|
|
|
|
my $fid = 0; |
2961
|
0
|
|
|
|
|
|
$xfer += $input->readStructBegin(\$fname); |
2962
|
0
|
|
|
|
|
|
while (1) |
2963
|
|
|
|
|
|
|
{ |
2964
|
0
|
|
|
|
|
|
$xfer += $input->readFieldBegin(\$fname, \$ftype, \$fid); |
2965
|
0
|
0
|
|
|
|
|
if ($ftype == TType::STOP) { |
2966
|
0
|
|
|
|
|
|
last; |
2967
|
|
|
|
|
|
|
} |
2968
|
0
|
|
|
|
|
|
SWITCH: for($fid) |
2969
|
|
|
|
|
|
|
{ |
2970
|
0
|
0
|
|
|
|
|
/^1$/ && do{ if ($ftype == TType::MAP) { |
|
0
|
0
|
|
|
|
|
|
2971
|
|
|
|
|
|
|
{ |
2972
|
0
|
|
|
|
|
|
my $_size148 = 0; |
|
0
|
|
|
|
|
|
|
2973
|
0
|
|
|
|
|
|
$self->{mutation_map} = {}; |
2974
|
0
|
|
|
|
|
|
my $_ktype149 = 0; |
2975
|
0
|
|
|
|
|
|
my $_vtype150 = 0; |
2976
|
0
|
|
|
|
|
|
$xfer += $input->readMapBegin(\$_ktype149, \$_vtype150, \$_size148); |
2977
|
0
|
|
|
|
|
|
for (my $_i152 = 0; $_i152 < $_size148; ++$_i152) |
2978
|
|
|
|
|
|
|
{ |
2979
|
0
|
|
|
|
|
|
my $key153 = ''; |
2980
|
0
|
|
|
|
|
|
my $val154 = []; |
2981
|
0
|
|
|
|
|
|
$xfer += $input->readString(\$key153); |
2982
|
|
|
|
|
|
|
{ |
2983
|
0
|
|
|
|
|
|
my $_size155 = 0; |
|
0
|
|
|
|
|
|
|
2984
|
0
|
|
|
|
|
|
$val154 = {}; |
2985
|
0
|
|
|
|
|
|
my $_ktype156 = 0; |
2986
|
0
|
|
|
|
|
|
my $_vtype157 = 0; |
2987
|
0
|
|
|
|
|
|
$xfer += $input->readMapBegin(\$_ktype156, \$_vtype157, \$_size155); |
2988
|
0
|
|
|
|
|
|
for (my $_i159 = 0; $_i159 < $_size155; ++$_i159) |
2989
|
|
|
|
|
|
|
{ |
2990
|
0
|
|
|
|
|
|
my $key160 = ''; |
2991
|
0
|
|
|
|
|
|
my $val161 = []; |
2992
|
0
|
|
|
|
|
|
$xfer += $input->readString(\$key160); |
2993
|
|
|
|
|
|
|
{ |
2994
|
0
|
|
|
|
|
|
my $_size162 = 0; |
|
0
|
|
|
|
|
|
|
2995
|
0
|
|
|
|
|
|
$val161 = []; |
2996
|
0
|
|
|
|
|
|
my $_etype165 = 0; |
2997
|
0
|
|
|
|
|
|
$xfer += $input->readListBegin(\$_etype165, \$_size162); |
2998
|
0
|
|
|
|
|
|
for (my $_i166 = 0; $_i166 < $_size162; ++$_i166) |
2999
|
|
|
|
|
|
|
{ |
3000
|
0
|
|
|
|
|
|
my $elem167 = undef; |
3001
|
0
|
|
|
|
|
|
$elem167 = new Cassandra::Mutation(); |
3002
|
0
|
|
|
|
|
|
$xfer += $elem167->read($input); |
3003
|
0
|
|
|
|
|
|
push(@{$val161},$elem167); |
|
0
|
|
|
|
|
|
|
3004
|
|
|
|
|
|
|
} |
3005
|
0
|
|
|
|
|
|
$xfer += $input->readListEnd(); |
3006
|
|
|
|
|
|
|
} |
3007
|
0
|
|
|
|
|
|
$val154->{$key160} = $val161; |
3008
|
|
|
|
|
|
|
} |
3009
|
0
|
|
|
|
|
|
$xfer += $input->readMapEnd(); |
3010
|
|
|
|
|
|
|
} |
3011
|
0
|
|
|
|
|
|
$self->{mutation_map}->{$key153} = $val154; |
3012
|
|
|
|
|
|
|
} |
3013
|
0
|
|
|
|
|
|
$xfer += $input->readMapEnd(); |
3014
|
|
|
|
|
|
|
} |
3015
|
|
|
|
|
|
|
} else { |
3016
|
0
|
|
|
|
|
|
$xfer += $input->skip($ftype); |
3017
|
|
|
|
|
|
|
} |
3018
|
0
|
|
|
|
|
|
last; }; |
3019
|
0
|
0
|
|
|
|
|
/^2$/ && do{ if ($ftype == TType::I32) { |
|
0
|
0
|
|
|
|
|
|
3020
|
0
|
|
|
|
|
|
$xfer += $input->readI32(\$self->{consistency_level}); |
3021
|
|
|
|
|
|
|
} else { |
3022
|
0
|
|
|
|
|
|
$xfer += $input->skip($ftype); |
3023
|
|
|
|
|
|
|
} |
3024
|
0
|
|
|
|
|
|
last; }; |
3025
|
0
|
|
|
|
|
|
$xfer += $input->skip($ftype); |
3026
|
|
|
|
|
|
|
} |
3027
|
0
|
|
|
|
|
|
$xfer += $input->readFieldEnd(); |
3028
|
|
|
|
|
|
|
} |
3029
|
0
|
|
|
|
|
|
$xfer += $input->readStructEnd(); |
3030
|
0
|
|
|
|
|
|
return $xfer; |
3031
|
|
|
|
|
|
|
} |
3032
|
|
|
|
|
|
|
|
3033
|
|
|
|
|
|
|
sub write { |
3034
|
0
|
|
|
0
|
|
|
my ($self, $output) = @_; |
3035
|
0
|
|
|
|
|
|
my $xfer = 0; |
3036
|
0
|
|
|
|
|
|
$xfer += $output->writeStructBegin('Cassandra_batch_mutate_args'); |
3037
|
0
|
0
|
|
|
|
|
if (defined $self->{mutation_map}) { |
3038
|
0
|
|
|
|
|
|
$xfer += $output->writeFieldBegin('mutation_map', TType::MAP, 1); |
3039
|
|
|
|
|
|
|
{ |
3040
|
0
|
|
|
|
|
|
$xfer += $output->writeMapBegin(TType::STRING, TType::MAP, scalar(keys %{$self->{mutation_map}})); |
|
0
|
|
|
|
|
|
|
|
0
|
|
|
|
|
|
|
3041
|
|
|
|
|
|
|
{ |
3042
|
0
|
|
|
|
|
|
while( my ($kiter168,$viter169) = each %{$self->{mutation_map}}) |
|
0
|
|
|
|
|
|
|
|
0
|
|
|
|
|
|
|
3043
|
|
|
|
|
|
|
{ |
3044
|
0
|
|
|
|
|
|
$xfer += $output->writeString($kiter168); |
3045
|
|
|
|
|
|
|
{ |
3046
|
0
|
|
|
|
|
|
$xfer += $output->writeMapBegin(TType::STRING, TType::LIST, scalar(keys %{${viter169}})); |
|
0
|
|
|
|
|
|
|
|
0
|
|
|
|
|
|
|
3047
|
|
|
|
|
|
|
{ |
3048
|
0
|
|
|
|
|
|
while( my ($kiter170,$viter171) = each %{${viter169}}) |
|
0
|
|
|
|
|
|
|
|
0
|
|
|
|
|
|
|
3049
|
|
|
|
|
|
|
{ |
3050
|
0
|
|
|
|
|
|
$xfer += $output->writeString($kiter170); |
3051
|
|
|
|
|
|
|
{ |
3052
|
0
|
|
|
|
|
|
$xfer += $output->writeListBegin(TType::STRUCT, scalar(@{${viter171}})); |
|
0
|
|
|
|
|
|
|
|
0
|
|
|
|
|
|
|
3053
|
|
|
|
|
|
|
{ |
3054
|
0
|
|
|
|
|
|
foreach my $iter172 (@{${viter171}}) |
|
0
|
|
|
|
|
|
|
|
0
|
|
|
|
|
|
|
3055
|
|
|
|
|
|
|
{ |
3056
|
0
|
|
|
|
|
|
$xfer += ${iter172}->write($output); |
3057
|
|
|
|
|
|
|
} |
3058
|
|
|
|
|
|
|
} |
3059
|
0
|
|
|
|
|
|
$xfer += $output->writeListEnd(); |
3060
|
|
|
|
|
|
|
} |
3061
|
|
|
|
|
|
|
} |
3062
|
|
|
|
|
|
|
} |
3063
|
0
|
|
|
|
|
|
$xfer += $output->writeMapEnd(); |
3064
|
|
|
|
|
|
|
} |
3065
|
|
|
|
|
|
|
} |
3066
|
|
|
|
|
|
|
} |
3067
|
0
|
|
|
|
|
|
$xfer += $output->writeMapEnd(); |
3068
|
|
|
|
|
|
|
} |
3069
|
0
|
|
|
|
|
|
$xfer += $output->writeFieldEnd(); |
3070
|
|
|
|
|
|
|
} |
3071
|
0
|
0
|
|
|
|
|
if (defined $self->{consistency_level}) { |
3072
|
0
|
|
|
|
|
|
$xfer += $output->writeFieldBegin('consistency_level', TType::I32, 2); |
3073
|
0
|
|
|
|
|
|
$xfer += $output->writeI32($self->{consistency_level}); |
3074
|
0
|
|
|
|
|
|
$xfer += $output->writeFieldEnd(); |
3075
|
|
|
|
|
|
|
} |
3076
|
0
|
|
|
|
|
|
$xfer += $output->writeFieldStop(); |
3077
|
0
|
|
|
|
|
|
$xfer += $output->writeStructEnd(); |
3078
|
0
|
|
|
|
|
|
return $xfer; |
3079
|
|
|
|
|
|
|
} |
3080
|
|
|
|
|
|
|
|
3081
|
|
|
|
|
|
|
package Cassandra::Cassandra_batch_mutate_result; |
3082
|
|
|
|
|
|
|
BEGIN { |
3083
|
1
|
|
|
1
|
|
17
|
$Cassandra::Cassandra_batch_mutate_result::VERSION = '0.4.0'; |
3084
|
|
|
|
|
|
|
} |
3085
|
1
|
|
|
1
|
|
8
|
use base qw(Class::Accessor); |
|
1
|
|
|
|
|
3
|
|
|
1
|
|
|
|
|
700
|
|
3086
|
|
|
|
|
|
|
Cassandra::Cassandra_batch_mutate_result->mk_accessors( qw( ) ); |
3087
|
|
|
|
|
|
|
|
3088
|
|
|
|
|
|
|
sub new { |
3089
|
0
|
|
|
0
|
|
|
my $classname = shift; |
3090
|
0
|
|
|
|
|
|
my $self = {}; |
3091
|
0
|
|
0
|
|
|
|
my $vals = shift || {}; |
3092
|
0
|
|
|
|
|
|
$self->{ire} = undef; |
3093
|
0
|
|
|
|
|
|
$self->{ue} = undef; |
3094
|
0
|
|
|
|
|
|
$self->{te} = undef; |
3095
|
0
|
0
|
|
|
|
|
if (UNIVERSAL::isa($vals,'HASH')) { |
3096
|
0
|
0
|
|
|
|
|
if (defined $vals->{ire}) { |
3097
|
0
|
|
|
|
|
|
$self->{ire} = $vals->{ire}; |
3098
|
|
|
|
|
|
|
} |
3099
|
0
|
0
|
|
|
|
|
if (defined $vals->{ue}) { |
3100
|
0
|
|
|
|
|
|
$self->{ue} = $vals->{ue}; |
3101
|
|
|
|
|
|
|
} |
3102
|
0
|
0
|
|
|
|
|
if (defined $vals->{te}) { |
3103
|
0
|
|
|
|
|
|
$self->{te} = $vals->{te}; |
3104
|
|
|
|
|
|
|
} |
3105
|
|
|
|
|
|
|
} |
3106
|
0
|
|
|
|
|
|
return bless ($self, $classname); |
3107
|
|
|
|
|
|
|
} |
3108
|
|
|
|
|
|
|
|
3109
|
|
|
|
|
|
|
sub getName { |
3110
|
0
|
|
|
0
|
|
|
return 'Cassandra_batch_mutate_result'; |
3111
|
|
|
|
|
|
|
} |
3112
|
|
|
|
|
|
|
|
3113
|
|
|
|
|
|
|
sub read { |
3114
|
0
|
|
|
0
|
|
|
my ($self, $input) = @_; |
3115
|
0
|
|
|
|
|
|
my $xfer = 0; |
3116
|
0
|
|
|
|
|
|
my $fname; |
3117
|
0
|
|
|
|
|
|
my $ftype = 0; |
3118
|
0
|
|
|
|
|
|
my $fid = 0; |
3119
|
0
|
|
|
|
|
|
$xfer += $input->readStructBegin(\$fname); |
3120
|
0
|
|
|
|
|
|
while (1) |
3121
|
|
|
|
|
|
|
{ |
3122
|
0
|
|
|
|
|
|
$xfer += $input->readFieldBegin(\$fname, \$ftype, \$fid); |
3123
|
0
|
0
|
|
|
|
|
if ($ftype == TType::STOP) { |
3124
|
0
|
|
|
|
|
|
last; |
3125
|
|
|
|
|
|
|
} |
3126
|
0
|
|
|
|
|
|
SWITCH: for($fid) |
3127
|
|
|
|
|
|
|
{ |
3128
|
0
|
0
|
|
|
|
|
/^1$/ && do{ if ($ftype == TType::STRUCT) { |
|
0
|
0
|
|
|
|
|
|
3129
|
0
|
|
|
|
|
|
$self->{ire} = new Cassandra::InvalidRequestException(); |
3130
|
0
|
|
|
|
|
|
$xfer += $self->{ire}->read($input); |
3131
|
|
|
|
|
|
|
} else { |
3132
|
0
|
|
|
|
|
|
$xfer += $input->skip($ftype); |
3133
|
|
|
|
|
|
|
} |
3134
|
0
|
|
|
|
|
|
last; }; |
3135
|
0
|
0
|
|
|
|
|
/^2$/ && do{ if ($ftype == TType::STRUCT) { |
|
0
|
0
|
|
|
|
|
|
3136
|
0
|
|
|
|
|
|
$self->{ue} = new Cassandra::UnavailableException(); |
3137
|
0
|
|
|
|
|
|
$xfer += $self->{ue}->read($input); |
3138
|
|
|
|
|
|
|
} else { |
3139
|
0
|
|
|
|
|
|
$xfer += $input->skip($ftype); |
3140
|
|
|
|
|
|
|
} |
3141
|
0
|
|
|
|
|
|
last; }; |
3142
|
0
|
0
|
|
|
|
|
/^3$/ && do{ if ($ftype == TType::STRUCT) { |
|
0
|
0
|
|
|
|
|
|
3143
|
0
|
|
|
|
|
|
$self->{te} = new Cassandra::TimedOutException(); |
3144
|
0
|
|
|
|
|
|
$xfer += $self->{te}->read($input); |
3145
|
|
|
|
|
|
|
} else { |
3146
|
0
|
|
|
|
|
|
$xfer += $input->skip($ftype); |
3147
|
|
|
|
|
|
|
} |
3148
|
0
|
|
|
|
|
|
last; }; |
3149
|
0
|
|
|
|
|
|
$xfer += $input->skip($ftype); |
3150
|
|
|
|
|
|
|
} |
3151
|
0
|
|
|
|
|
|
$xfer += $input->readFieldEnd(); |
3152
|
|
|
|
|
|
|
} |
3153
|
0
|
|
|
|
|
|
$xfer += $input->readStructEnd(); |
3154
|
0
|
|
|
|
|
|
return $xfer; |
3155
|
|
|
|
|
|
|
} |
3156
|
|
|
|
|
|
|
|
3157
|
|
|
|
|
|
|
sub write { |
3158
|
0
|
|
|
0
|
|
|
my ($self, $output) = @_; |
3159
|
0
|
|
|
|
|
|
my $xfer = 0; |
3160
|
0
|
|
|
|
|
|
$xfer += $output->writeStructBegin('Cassandra_batch_mutate_result'); |
3161
|
0
|
0
|
|
|
|
|
if (defined $self->{ire}) { |
3162
|
0
|
|
|
|
|
|
$xfer += $output->writeFieldBegin('ire', TType::STRUCT, 1); |
3163
|
0
|
|
|
|
|
|
$xfer += $self->{ire}->write($output); |
3164
|
0
|
|
|
|
|
|
$xfer += $output->writeFieldEnd(); |
3165
|
|
|
|
|
|
|
} |
3166
|
0
|
0
|
|
|
|
|
if (defined $self->{ue}) { |
3167
|
0
|
|
|
|
|
|
$xfer += $output->writeFieldBegin('ue', TType::STRUCT, 2); |
3168
|
0
|
|
|
|
|
|
$xfer += $self->{ue}->write($output); |
3169
|
0
|
|
|
|
|
|
$xfer += $output->writeFieldEnd(); |
3170
|
|
|
|
|
|
|
} |
3171
|
0
|
0
|
|
|
|
|
if (defined $self->{te}) { |
3172
|
0
|
|
|
|
|
|
$xfer += $output->writeFieldBegin('te', TType::STRUCT, 3); |
3173
|
0
|
|
|
|
|
|
$xfer += $self->{te}->write($output); |
3174
|
0
|
|
|
|
|
|
$xfer += $output->writeFieldEnd(); |
3175
|
|
|
|
|
|
|
} |
3176
|
0
|
|
|
|
|
|
$xfer += $output->writeFieldStop(); |
3177
|
0
|
|
|
|
|
|
$xfer += $output->writeStructEnd(); |
3178
|
0
|
|
|
|
|
|
return $xfer; |
3179
|
|
|
|
|
|
|
} |
3180
|
|
|
|
|
|
|
|
3181
|
|
|
|
|
|
|
package Cassandra::Cassandra_truncate_args; |
3182
|
|
|
|
|
|
|
BEGIN { |
3183
|
1
|
|
|
1
|
|
18
|
$Cassandra::Cassandra_truncate_args::VERSION = '0.4.0'; |
3184
|
|
|
|
|
|
|
} |
3185
|
1
|
|
|
1
|
|
6
|
use base qw(Class::Accessor); |
|
1
|
|
|
|
|
19
|
|
|
1
|
|
|
|
|
602
|
|
3186
|
|
|
|
|
|
|
Cassandra::Cassandra_truncate_args->mk_accessors( qw( cfname ) ); |
3187
|
|
|
|
|
|
|
|
3188
|
|
|
|
|
|
|
sub new { |
3189
|
0
|
|
|
0
|
|
|
my $classname = shift; |
3190
|
0
|
|
|
|
|
|
my $self = {}; |
3191
|
0
|
|
0
|
|
|
|
my $vals = shift || {}; |
3192
|
0
|
|
|
|
|
|
$self->{cfname} = undef; |
3193
|
0
|
0
|
|
|
|
|
if (UNIVERSAL::isa($vals,'HASH')) { |
3194
|
0
|
0
|
|
|
|
|
if (defined $vals->{cfname}) { |
3195
|
0
|
|
|
|
|
|
$self->{cfname} = $vals->{cfname}; |
3196
|
|
|
|
|
|
|
} |
3197
|
|
|
|
|
|
|
} |
3198
|
0
|
|
|
|
|
|
return bless ($self, $classname); |
3199
|
|
|
|
|
|
|
} |
3200
|
|
|
|
|
|
|
|
3201
|
|
|
|
|
|
|
sub getName { |
3202
|
0
|
|
|
0
|
|
|
return 'Cassandra_truncate_args'; |
3203
|
|
|
|
|
|
|
} |
3204
|
|
|
|
|
|
|
|
3205
|
|
|
|
|
|
|
sub read { |
3206
|
0
|
|
|
0
|
|
|
my ($self, $input) = @_; |
3207
|
0
|
|
|
|
|
|
my $xfer = 0; |
3208
|
0
|
|
|
|
|
|
my $fname; |
3209
|
0
|
|
|
|
|
|
my $ftype = 0; |
3210
|
0
|
|
|
|
|
|
my $fid = 0; |
3211
|
0
|
|
|
|
|
|
$xfer += $input->readStructBegin(\$fname); |
3212
|
0
|
|
|
|
|
|
while (1) |
3213
|
|
|
|
|
|
|
{ |
3214
|
0
|
|
|
|
|
|
$xfer += $input->readFieldBegin(\$fname, \$ftype, \$fid); |
3215
|
0
|
0
|
|
|
|
|
if ($ftype == TType::STOP) { |
3216
|
0
|
|
|
|
|
|
last; |
3217
|
|
|
|
|
|
|
} |
3218
|
0
|
|
|
|
|
|
SWITCH: for($fid) |
3219
|
|
|
|
|
|
|
{ |
3220
|
0
|
0
|
|
|
|
|
/^1$/ && do{ if ($ftype == TType::STRING) { |
|
0
|
0
|
|
|
|
|
|
3221
|
0
|
|
|
|
|
|
$xfer += $input->readString(\$self->{cfname}); |
3222
|
|
|
|
|
|
|
} else { |
3223
|
0
|
|
|
|
|
|
$xfer += $input->skip($ftype); |
3224
|
|
|
|
|
|
|
} |
3225
|
0
|
|
|
|
|
|
last; }; |
3226
|
0
|
|
|
|
|
|
$xfer += $input->skip($ftype); |
3227
|
|
|
|
|
|
|
} |
3228
|
0
|
|
|
|
|
|
$xfer += $input->readFieldEnd(); |
3229
|
|
|
|
|
|
|
} |
3230
|
0
|
|
|
|
|
|
$xfer += $input->readStructEnd(); |
3231
|
0
|
|
|
|
|
|
return $xfer; |
3232
|
|
|
|
|
|
|
} |
3233
|
|
|
|
|
|
|
|
3234
|
|
|
|
|
|
|
sub write { |
3235
|
0
|
|
|
0
|
|
|
my ($self, $output) = @_; |
3236
|
0
|
|
|
|
|
|
my $xfer = 0; |
3237
|
0
|
|
|
|
|
|
$xfer += $output->writeStructBegin('Cassandra_truncate_args'); |
3238
|
0
|
0
|
|
|
|
|
if (defined $self->{cfname}) { |
3239
|
0
|
|
|
|
|
|
$xfer += $output->writeFieldBegin('cfname', TType::STRING, 1); |
3240
|
0
|
|
|
|
|
|
$xfer += $output->writeString($self->{cfname}); |
3241
|
0
|
|
|
|
|
|
$xfer += $output->writeFieldEnd(); |
3242
|
|
|
|
|
|
|
} |
3243
|
0
|
|
|
|
|
|
$xfer += $output->writeFieldStop(); |
3244
|
0
|
|
|
|
|
|
$xfer += $output->writeStructEnd(); |
3245
|
0
|
|
|
|
|
|
return $xfer; |
3246
|
|
|
|
|
|
|
} |
3247
|
|
|
|
|
|
|
|
3248
|
|
|
|
|
|
|
package Cassandra::Cassandra_truncate_result; |
3249
|
|
|
|
|
|
|
BEGIN { |
3250
|
1
|
|
|
1
|
|
23
|
$Cassandra::Cassandra_truncate_result::VERSION = '0.4.0'; |
3251
|
|
|
|
|
|
|
} |
3252
|
1
|
|
|
1
|
|
8
|
use base qw(Class::Accessor); |
|
1
|
|
|
|
|
3
|
|
|
1
|
|
|
|
|
770
|
|
3253
|
|
|
|
|
|
|
Cassandra::Cassandra_truncate_result->mk_accessors( qw( ) ); |
3254
|
|
|
|
|
|
|
|
3255
|
|
|
|
|
|
|
sub new { |
3256
|
0
|
|
|
0
|
|
|
my $classname = shift; |
3257
|
0
|
|
|
|
|
|
my $self = {}; |
3258
|
0
|
|
0
|
|
|
|
my $vals = shift || {}; |
3259
|
0
|
|
|
|
|
|
$self->{ire} = undef; |
3260
|
0
|
|
|
|
|
|
$self->{ue} = undef; |
3261
|
0
|
0
|
|
|
|
|
if (UNIVERSAL::isa($vals,'HASH')) { |
3262
|
0
|
0
|
|
|
|
|
if (defined $vals->{ire}) { |
3263
|
0
|
|
|
|
|
|
$self->{ire} = $vals->{ire}; |
3264
|
|
|
|
|
|
|
} |
3265
|
0
|
0
|
|
|
|
|
if (defined $vals->{ue}) { |
3266
|
0
|
|
|
|
|
|
$self->{ue} = $vals->{ue}; |
3267
|
|
|
|
|
|
|
} |
3268
|
|
|
|
|
|
|
} |
3269
|
0
|
|
|
|
|
|
return bless ($self, $classname); |
3270
|
|
|
|
|
|
|
} |
3271
|
|
|
|
|
|
|
|
3272
|
|
|
|
|
|
|
sub getName { |
3273
|
0
|
|
|
0
|
|
|
return 'Cassandra_truncate_result'; |
3274
|
|
|
|
|
|
|
} |
3275
|
|
|
|
|
|
|
|
3276
|
|
|
|
|
|
|
sub read { |
3277
|
0
|
|
|
0
|
|
|
my ($self, $input) = @_; |
3278
|
0
|
|
|
|
|
|
my $xfer = 0; |
3279
|
0
|
|
|
|
|
|
my $fname; |
3280
|
0
|
|
|
|
|
|
my $ftype = 0; |
3281
|
0
|
|
|
|
|
|
my $fid = 0; |
3282
|
0
|
|
|
|
|
|
$xfer += $input->readStructBegin(\$fname); |
3283
|
0
|
|
|
|
|
|
while (1) |
3284
|
|
|
|
|
|
|
{ |
3285
|
0
|
|
|
|
|
|
$xfer += $input->readFieldBegin(\$fname, \$ftype, \$fid); |
3286
|
0
|
0
|
|
|
|
|
if ($ftype == TType::STOP) { |
3287
|
0
|
|
|
|
|
|
last; |
3288
|
|
|
|
|
|
|
} |
3289
|
0
|
|
|
|
|
|
SWITCH: for($fid) |
3290
|
|
|
|
|
|
|
{ |
3291
|
0
|
0
|
|
|
|
|
/^1$/ && do{ if ($ftype == TType::STRUCT) { |
|
0
|
0
|
|
|
|
|
|
3292
|
0
|
|
|
|
|
|
$self->{ire} = new Cassandra::InvalidRequestException(); |
3293
|
0
|
|
|
|
|
|
$xfer += $self->{ire}->read($input); |
3294
|
|
|
|
|
|
|
} else { |
3295
|
0
|
|
|
|
|
|
$xfer += $input->skip($ftype); |
3296
|
|
|
|
|
|
|
} |
3297
|
0
|
|
|
|
|
|
last; }; |
3298
|
0
|
0
|
|
|
|
|
/^2$/ && do{ if ($ftype == TType::STRUCT) { |
|
0
|
0
|
|
|
|
|
|
3299
|
0
|
|
|
|
|
|
$self->{ue} = new Cassandra::UnavailableException(); |
3300
|
0
|
|
|
|
|
|
$xfer += $self->{ue}->read($input); |
3301
|
|
|
|
|
|
|
} else { |
3302
|
0
|
|
|
|
|
|
$xfer += $input->skip($ftype); |
3303
|
|
|
|
|
|
|
} |
3304
|
0
|
|
|
|
|
|
last; }; |
3305
|
0
|
|
|
|
|
|
$xfer += $input->skip($ftype); |
3306
|
|
|
|
|
|
|
} |
3307
|
0
|
|
|
|
|
|
$xfer += $input->readFieldEnd(); |
3308
|
|
|
|
|
|
|
} |
3309
|
0
|
|
|
|
|
|
$xfer += $input->readStructEnd(); |
3310
|
0
|
|
|
|
|
|
return $xfer; |
3311
|
|
|
|
|
|
|
} |
3312
|
|
|
|
|
|
|
|
3313
|
|
|
|
|
|
|
sub write { |
3314
|
0
|
|
|
0
|
|
|
my ($self, $output) = @_; |
3315
|
0
|
|
|
|
|
|
my $xfer = 0; |
3316
|
0
|
|
|
|
|
|
$xfer += $output->writeStructBegin('Cassandra_truncate_result'); |
3317
|
0
|
0
|
|
|
|
|
if (defined $self->{ire}) { |
3318
|
0
|
|
|
|
|
|
$xfer += $output->writeFieldBegin('ire', TType::STRUCT, 1); |
3319
|
0
|
|
|
|
|
|
$xfer += $self->{ire}->write($output); |
3320
|
0
|
|
|
|
|
|
$xfer += $output->writeFieldEnd(); |
3321
|
|
|
|
|
|
|
} |
3322
|
0
|
0
|
|
|
|
|
if (defined $self->{ue}) { |
3323
|
0
|
|
|
|
|
|
$xfer += $output->writeFieldBegin('ue', TType::STRUCT, 2); |
3324
|
0
|
|
|
|
|
|
$xfer += $self->{ue}->write($output); |
3325
|
0
|
|
|
|
|
|
$xfer += $output->writeFieldEnd(); |
3326
|
|
|
|
|
|
|
} |
3327
|
0
|
|
|
|
|
|
$xfer += $output->writeFieldStop(); |
3328
|
0
|
|
|
|
|
|
$xfer += $output->writeStructEnd(); |
3329
|
0
|
|
|
|
|
|
return $xfer; |
3330
|
|
|
|
|
|
|
} |
3331
|
|
|
|
|
|
|
|
3332
|
|
|
|
|
|
|
package Cassandra::Cassandra_describe_schema_versions_args; |
3333
|
|
|
|
|
|
|
BEGIN { |
3334
|
1
|
|
|
1
|
|
29
|
$Cassandra::Cassandra_describe_schema_versions_args::VERSION = '0.4.0'; |
3335
|
|
|
|
|
|
|
} |
3336
|
1
|
|
|
1
|
|
8
|
use base qw(Class::Accessor); |
|
1
|
|
|
|
|
2
|
|
|
1
|
|
|
|
|
392
|
|
3337
|
|
|
|
|
|
|
|
3338
|
|
|
|
|
|
|
sub new { |
3339
|
0
|
|
|
0
|
|
|
my $classname = shift; |
3340
|
0
|
|
|
|
|
|
my $self = {}; |
3341
|
0
|
|
0
|
|
|
|
my $vals = shift || {}; |
3342
|
0
|
|
|
|
|
|
return bless ($self, $classname); |
3343
|
|
|
|
|
|
|
} |
3344
|
|
|
|
|
|
|
|
3345
|
|
|
|
|
|
|
sub getName { |
3346
|
0
|
|
|
0
|
|
|
return 'Cassandra_describe_schema_versions_args'; |
3347
|
|
|
|
|
|
|
} |
3348
|
|
|
|
|
|
|
|
3349
|
|
|
|
|
|
|
sub read { |
3350
|
0
|
|
|
0
|
|
|
my ($self, $input) = @_; |
3351
|
0
|
|
|
|
|
|
my $xfer = 0; |
3352
|
0
|
|
|
|
|
|
my $fname; |
3353
|
0
|
|
|
|
|
|
my $ftype = 0; |
3354
|
0
|
|
|
|
|
|
my $fid = 0; |
3355
|
0
|
|
|
|
|
|
$xfer += $input->readStructBegin(\$fname); |
3356
|
0
|
|
|
|
|
|
while (1) |
3357
|
|
|
|
|
|
|
{ |
3358
|
0
|
|
|
|
|
|
$xfer += $input->readFieldBegin(\$fname, \$ftype, \$fid); |
3359
|
0
|
0
|
|
|
|
|
if ($ftype == TType::STOP) { |
3360
|
0
|
|
|
|
|
|
last; |
3361
|
|
|
|
|
|
|
} |
3362
|
0
|
|
|
|
|
|
SWITCH: for($fid) |
3363
|
|
|
|
|
|
|
{ |
3364
|
0
|
|
|
|
|
|
$xfer += $input->skip($ftype); |
3365
|
|
|
|
|
|
|
} |
3366
|
0
|
|
|
|
|
|
$xfer += $input->readFieldEnd(); |
3367
|
|
|
|
|
|
|
} |
3368
|
0
|
|
|
|
|
|
$xfer += $input->readStructEnd(); |
3369
|
0
|
|
|
|
|
|
return $xfer; |
3370
|
|
|
|
|
|
|
} |
3371
|
|
|
|
|
|
|
|
3372
|
|
|
|
|
|
|
sub write { |
3373
|
0
|
|
|
0
|
|
|
my ($self, $output) = @_; |
3374
|
0
|
|
|
|
|
|
my $xfer = 0; |
3375
|
0
|
|
|
|
|
|
$xfer += $output->writeStructBegin('Cassandra_describe_schema_versions_args'); |
3376
|
0
|
|
|
|
|
|
$xfer += $output->writeFieldStop(); |
3377
|
0
|
|
|
|
|
|
$xfer += $output->writeStructEnd(); |
3378
|
0
|
|
|
|
|
|
return $xfer; |
3379
|
|
|
|
|
|
|
} |
3380
|
|
|
|
|
|
|
|
3381
|
|
|
|
|
|
|
package Cassandra::Cassandra_describe_schema_versions_result; |
3382
|
|
|
|
|
|
|
BEGIN { |
3383
|
1
|
|
|
1
|
|
18
|
$Cassandra::Cassandra_describe_schema_versions_result::VERSION = '0.4.0'; |
3384
|
|
|
|
|
|
|
} |
3385
|
1
|
|
|
1
|
|
7
|
use base qw(Class::Accessor); |
|
1
|
|
|
|
|
2
|
|
|
1
|
|
|
|
|
854
|
|
3386
|
|
|
|
|
|
|
Cassandra::Cassandra_describe_schema_versions_result->mk_accessors( qw( success ) ); |
3387
|
|
|
|
|
|
|
|
3388
|
|
|
|
|
|
|
sub new { |
3389
|
0
|
|
|
0
|
|
|
my $classname = shift; |
3390
|
0
|
|
|
|
|
|
my $self = {}; |
3391
|
0
|
|
0
|
|
|
|
my $vals = shift || {}; |
3392
|
0
|
|
|
|
|
|
$self->{success} = undef; |
3393
|
0
|
|
|
|
|
|
$self->{ire} = undef; |
3394
|
0
|
0
|
|
|
|
|
if (UNIVERSAL::isa($vals,'HASH')) { |
3395
|
0
|
0
|
|
|
|
|
if (defined $vals->{success}) { |
3396
|
0
|
|
|
|
|
|
$self->{success} = $vals->{success}; |
3397
|
|
|
|
|
|
|
} |
3398
|
0
|
0
|
|
|
|
|
if (defined $vals->{ire}) { |
3399
|
0
|
|
|
|
|
|
$self->{ire} = $vals->{ire}; |
3400
|
|
|
|
|
|
|
} |
3401
|
|
|
|
|
|
|
} |
3402
|
0
|
|
|
|
|
|
return bless ($self, $classname); |
3403
|
|
|
|
|
|
|
} |
3404
|
|
|
|
|
|
|
|
3405
|
|
|
|
|
|
|
sub getName { |
3406
|
0
|
|
|
0
|
|
|
return 'Cassandra_describe_schema_versions_result'; |
3407
|
|
|
|
|
|
|
} |
3408
|
|
|
|
|
|
|
|
3409
|
|
|
|
|
|
|
sub read { |
3410
|
0
|
|
|
0
|
|
|
my ($self, $input) = @_; |
3411
|
0
|
|
|
|
|
|
my $xfer = 0; |
3412
|
0
|
|
|
|
|
|
my $fname; |
3413
|
0
|
|
|
|
|
|
my $ftype = 0; |
3414
|
0
|
|
|
|
|
|
my $fid = 0; |
3415
|
0
|
|
|
|
|
|
$xfer += $input->readStructBegin(\$fname); |
3416
|
0
|
|
|
|
|
|
while (1) |
3417
|
|
|
|
|
|
|
{ |
3418
|
0
|
|
|
|
|
|
$xfer += $input->readFieldBegin(\$fname, \$ftype, \$fid); |
3419
|
0
|
0
|
|
|
|
|
if ($ftype == TType::STOP) { |
3420
|
0
|
|
|
|
|
|
last; |
3421
|
|
|
|
|
|
|
} |
3422
|
0
|
|
|
|
|
|
SWITCH: for($fid) |
3423
|
|
|
|
|
|
|
{ |
3424
|
0
|
0
|
|
|
|
|
/^0$/ && do{ if ($ftype == TType::MAP) { |
|
0
|
0
|
|
|
|
|
|
3425
|
|
|
|
|
|
|
{ |
3426
|
0
|
|
|
|
|
|
my $_size173 = 0; |
|
0
|
|
|
|
|
|
|
3427
|
0
|
|
|
|
|
|
$self->{success} = {}; |
3428
|
0
|
|
|
|
|
|
my $_ktype174 = 0; |
3429
|
0
|
|
|
|
|
|
my $_vtype175 = 0; |
3430
|
0
|
|
|
|
|
|
$xfer += $input->readMapBegin(\$_ktype174, \$_vtype175, \$_size173); |
3431
|
0
|
|
|
|
|
|
for (my $_i177 = 0; $_i177 < $_size173; ++$_i177) |
3432
|
|
|
|
|
|
|
{ |
3433
|
0
|
|
|
|
|
|
my $key178 = ''; |
3434
|
0
|
|
|
|
|
|
my $val179 = []; |
3435
|
0
|
|
|
|
|
|
$xfer += $input->readString(\$key178); |
3436
|
|
|
|
|
|
|
{ |
3437
|
0
|
|
|
|
|
|
my $_size180 = 0; |
|
0
|
|
|
|
|
|
|
3438
|
0
|
|
|
|
|
|
$val179 = []; |
3439
|
0
|
|
|
|
|
|
my $_etype183 = 0; |
3440
|
0
|
|
|
|
|
|
$xfer += $input->readListBegin(\$_etype183, \$_size180); |
3441
|
0
|
|
|
|
|
|
for (my $_i184 = 0; $_i184 < $_size180; ++$_i184) |
3442
|
|
|
|
|
|
|
{ |
3443
|
0
|
|
|
|
|
|
my $elem185 = undef; |
3444
|
0
|
|
|
|
|
|
$xfer += $input->readString(\$elem185); |
3445
|
0
|
|
|
|
|
|
push(@{$val179},$elem185); |
|
0
|
|
|
|
|
|
|
3446
|
|
|
|
|
|
|
} |
3447
|
0
|
|
|
|
|
|
$xfer += $input->readListEnd(); |
3448
|
|
|
|
|
|
|
} |
3449
|
0
|
|
|
|
|
|
$self->{success}->{$key178} = $val179; |
3450
|
|
|
|
|
|
|
} |
3451
|
0
|
|
|
|
|
|
$xfer += $input->readMapEnd(); |
3452
|
|
|
|
|
|
|
} |
3453
|
|
|
|
|
|
|
} else { |
3454
|
0
|
|
|
|
|
|
$xfer += $input->skip($ftype); |
3455
|
|
|
|
|
|
|
} |
3456
|
0
|
|
|
|
|
|
last; }; |
3457
|
0
|
0
|
|
|
|
|
/^1$/ && do{ if ($ftype == TType::STRUCT) { |
|
0
|
0
|
|
|
|
|
|
3458
|
0
|
|
|
|
|
|
$self->{ire} = new Cassandra::InvalidRequestException(); |
3459
|
0
|
|
|
|
|
|
$xfer += $self->{ire}->read($input); |
3460
|
|
|
|
|
|
|
} else { |
3461
|
0
|
|
|
|
|
|
$xfer += $input->skip($ftype); |
3462
|
|
|
|
|
|
|
} |
3463
|
0
|
|
|
|
|
|
last; }; |
3464
|
0
|
|
|
|
|
|
$xfer += $input->skip($ftype); |
3465
|
|
|
|
|
|
|
} |
3466
|
0
|
|
|
|
|
|
$xfer += $input->readFieldEnd(); |
3467
|
|
|
|
|
|
|
} |
3468
|
0
|
|
|
|
|
|
$xfer += $input->readStructEnd(); |
3469
|
0
|
|
|
|
|
|
return $xfer; |
3470
|
|
|
|
|
|
|
} |
3471
|
|
|
|
|
|
|
|
3472
|
|
|
|
|
|
|
sub write { |
3473
|
0
|
|
|
0
|
|
|
my ($self, $output) = @_; |
3474
|
0
|
|
|
|
|
|
my $xfer = 0; |
3475
|
0
|
|
|
|
|
|
$xfer += $output->writeStructBegin('Cassandra_describe_schema_versions_result'); |
3476
|
0
|
0
|
|
|
|
|
if (defined $self->{success}) { |
3477
|
0
|
|
|
|
|
|
$xfer += $output->writeFieldBegin('success', TType::MAP, 0); |
3478
|
|
|
|
|
|
|
{ |
3479
|
0
|
|
|
|
|
|
$xfer += $output->writeMapBegin(TType::STRING, TType::LIST, scalar(keys %{$self->{success}})); |
|
0
|
|
|
|
|
|
|
|
0
|
|
|
|
|
|
|
3480
|
|
|
|
|
|
|
{ |
3481
|
0
|
|
|
|
|
|
while( my ($kiter186,$viter187) = each %{$self->{success}}) |
|
0
|
|
|
|
|
|
|
|
0
|
|
|
|
|
|
|
3482
|
|
|
|
|
|
|
{ |
3483
|
0
|
|
|
|
|
|
$xfer += $output->writeString($kiter186); |
3484
|
|
|
|
|
|
|
{ |
3485
|
0
|
|
|
|
|
|
$xfer += $output->writeListBegin(TType::STRING, scalar(@{${viter187}})); |
|
0
|
|
|
|
|
|
|
|
0
|
|
|
|
|
|
|
3486
|
|
|
|
|
|
|
{ |
3487
|
0
|
|
|
|
|
|
foreach my $iter188 (@{${viter187}}) |
|
0
|
|
|
|
|
|
|
|
0
|
|
|
|
|
|
|
3488
|
|
|
|
|
|
|
{ |
3489
|
0
|
|
|
|
|
|
$xfer += $output->writeString($iter188); |
3490
|
|
|
|
|
|
|
} |
3491
|
|
|
|
|
|
|
} |
3492
|
0
|
|
|
|
|
|
$xfer += $output->writeListEnd(); |
3493
|
|
|
|
|
|
|
} |
3494
|
|
|
|
|
|
|
} |
3495
|
|
|
|
|
|
|
} |
3496
|
0
|
|
|
|
|
|
$xfer += $output->writeMapEnd(); |
3497
|
|
|
|
|
|
|
} |
3498
|
0
|
|
|
|
|
|
$xfer += $output->writeFieldEnd(); |
3499
|
|
|
|
|
|
|
} |
3500
|
0
|
0
|
|
|
|
|
if (defined $self->{ire}) { |
3501
|
0
|
|
|
|
|
|
$xfer += $output->writeFieldBegin('ire', TType::STRUCT, 1); |
3502
|
0
|
|
|
|
|
|
$xfer += $self->{ire}->write($output); |
3503
|
0
|
|
|
|
|
|
$xfer += $output->writeFieldEnd(); |
3504
|
|
|
|
|
|
|
} |
3505
|
0
|
|
|
|
|
|
$xfer += $output->writeFieldStop(); |
3506
|
0
|
|
|
|
|
|
$xfer += $output->writeStructEnd(); |
3507
|
0
|
|
|
|
|
|
return $xfer; |
3508
|
|
|
|
|
|
|
} |
3509
|
|
|
|
|
|
|
|
3510
|
|
|
|
|
|
|
package Cassandra::Cassandra_describe_keyspaces_args; |
3511
|
|
|
|
|
|
|
BEGIN { |
3512
|
1
|
|
|
1
|
|
22
|
$Cassandra::Cassandra_describe_keyspaces_args::VERSION = '0.4.0'; |
3513
|
|
|
|
|
|
|
} |
3514
|
1
|
|
|
1
|
|
6
|
use base qw(Class::Accessor); |
|
1
|
|
|
|
|
1
|
|
|
1
|
|
|
|
|
324
|
|
3515
|
|
|
|
|
|
|
|
3516
|
|
|
|
|
|
|
sub new { |
3517
|
0
|
|
|
0
|
|
|
my $classname = shift; |
3518
|
0
|
|
|
|
|
|
my $self = {}; |
3519
|
0
|
|
0
|
|
|
|
my $vals = shift || {}; |
3520
|
0
|
|
|
|
|
|
return bless ($self, $classname); |
3521
|
|
|
|
|
|
|
} |
3522
|
|
|
|
|
|
|
|
3523
|
|
|
|
|
|
|
sub getName { |
3524
|
0
|
|
|
0
|
|
|
return 'Cassandra_describe_keyspaces_args'; |
3525
|
|
|
|
|
|
|
} |
3526
|
|
|
|
|
|
|
|
3527
|
|
|
|
|
|
|
sub read { |
3528
|
0
|
|
|
0
|
|
|
my ($self, $input) = @_; |
3529
|
0
|
|
|
|
|
|
my $xfer = 0; |
3530
|
0
|
|
|
|
|
|
my $fname; |
3531
|
0
|
|
|
|
|
|
my $ftype = 0; |
3532
|
0
|
|
|
|
|
|
my $fid = 0; |
3533
|
0
|
|
|
|
|
|
$xfer += $input->readStructBegin(\$fname); |
3534
|
0
|
|
|
|
|
|
while (1) |
3535
|
|
|
|
|
|
|
{ |
3536
|
0
|
|
|
|
|
|
$xfer += $input->readFieldBegin(\$fname, \$ftype, \$fid); |
3537
|
0
|
0
|
|
|
|
|
if ($ftype == TType::STOP) { |
3538
|
0
|
|
|
|
|
|
last; |
3539
|
|
|
|
|
|
|
} |
3540
|
0
|
|
|
|
|
|
SWITCH: for($fid) |
3541
|
|
|
|
|
|
|
{ |
3542
|
0
|
|
|
|
|
|
$xfer += $input->skip($ftype); |
3543
|
|
|
|
|
|
|
} |
3544
|
0
|
|
|
|
|
|
$xfer += $input->readFieldEnd(); |
3545
|
|
|
|
|
|
|
} |
3546
|
0
|
|
|
|
|
|
$xfer += $input->readStructEnd(); |
3547
|
0
|
|
|
|
|
|
return $xfer; |
3548
|
|
|
|
|
|
|
} |
3549
|
|
|
|
|
|
|
|
3550
|
|
|
|
|
|
|
sub write { |
3551
|
0
|
|
|
0
|
|
|
my ($self, $output) = @_; |
3552
|
0
|
|
|
|
|
|
my $xfer = 0; |
3553
|
0
|
|
|
|
|
|
$xfer += $output->writeStructBegin('Cassandra_describe_keyspaces_args'); |
3554
|
0
|
|
|
|
|
|
$xfer += $output->writeFieldStop(); |
3555
|
0
|
|
|
|
|
|
$xfer += $output->writeStructEnd(); |
3556
|
0
|
|
|
|
|
|
return $xfer; |
3557
|
|
|
|
|
|
|
} |
3558
|
|
|
|
|
|
|
|
3559
|
|
|
|
|
|
|
package Cassandra::Cassandra_describe_keyspaces_result; |
3560
|
|
|
|
|
|
|
BEGIN { |
3561
|
1
|
|
|
1
|
|
20
|
$Cassandra::Cassandra_describe_keyspaces_result::VERSION = '0.4.0'; |
3562
|
|
|
|
|
|
|
} |
3563
|
1
|
|
|
1
|
|
6
|
use base qw(Class::Accessor); |
|
1
|
|
|
|
|
2
|
|
|
1
|
|
|
|
|
691
|
|
3564
|
|
|
|
|
|
|
Cassandra::Cassandra_describe_keyspaces_result->mk_accessors( qw( success ) ); |
3565
|
|
|
|
|
|
|
|
3566
|
|
|
|
|
|
|
sub new { |
3567
|
0
|
|
|
0
|
|
|
my $classname = shift; |
3568
|
0
|
|
|
|
|
|
my $self = {}; |
3569
|
0
|
|
0
|
|
|
|
my $vals = shift || {}; |
3570
|
0
|
|
|
|
|
|
$self->{success} = undef; |
3571
|
0
|
|
|
|
|
|
$self->{ire} = undef; |
3572
|
0
|
0
|
|
|
|
|
if (UNIVERSAL::isa($vals,'HASH')) { |
3573
|
0
|
0
|
|
|
|
|
if (defined $vals->{success}) { |
3574
|
0
|
|
|
|
|
|
$self->{success} = $vals->{success}; |
3575
|
|
|
|
|
|
|
} |
3576
|
0
|
0
|
|
|
|
|
if (defined $vals->{ire}) { |
3577
|
0
|
|
|
|
|
|
$self->{ire} = $vals->{ire}; |
3578
|
|
|
|
|
|
|
} |
3579
|
|
|
|
|
|
|
} |
3580
|
0
|
|
|
|
|
|
return bless ($self, $classname); |
3581
|
|
|
|
|
|
|
} |
3582
|
|
|
|
|
|
|
|
3583
|
|
|
|
|
|
|
sub getName { |
3584
|
0
|
|
|
0
|
|
|
return 'Cassandra_describe_keyspaces_result'; |
3585
|
|
|
|
|
|
|
} |
3586
|
|
|
|
|
|
|
|
3587
|
|
|
|
|
|
|
sub read { |
3588
|
0
|
|
|
0
|
|
|
my ($self, $input) = @_; |
3589
|
0
|
|
|
|
|
|
my $xfer = 0; |
3590
|
0
|
|
|
|
|
|
my $fname; |
3591
|
0
|
|
|
|
|
|
my $ftype = 0; |
3592
|
0
|
|
|
|
|
|
my $fid = 0; |
3593
|
0
|
|
|
|
|
|
$xfer += $input->readStructBegin(\$fname); |
3594
|
0
|
|
|
|
|
|
while (1) |
3595
|
|
|
|
|
|
|
{ |
3596
|
0
|
|
|
|
|
|
$xfer += $input->readFieldBegin(\$fname, \$ftype, \$fid); |
3597
|
0
|
0
|
|
|
|
|
if ($ftype == TType::STOP) { |
3598
|
0
|
|
|
|
|
|
last; |
3599
|
|
|
|
|
|
|
} |
3600
|
0
|
|
|
|
|
|
SWITCH: for($fid) |
3601
|
|
|
|
|
|
|
{ |
3602
|
0
|
0
|
|
|
|
|
/^0$/ && do{ if ($ftype == TType::LIST) { |
|
0
|
0
|
|
|
|
|
|
3603
|
|
|
|
|
|
|
{ |
3604
|
0
|
|
|
|
|
|
my $_size189 = 0; |
|
0
|
|
|
|
|
|
|
3605
|
0
|
|
|
|
|
|
$self->{success} = []; |
3606
|
0
|
|
|
|
|
|
my $_etype192 = 0; |
3607
|
0
|
|
|
|
|
|
$xfer += $input->readListBegin(\$_etype192, \$_size189); |
3608
|
0
|
|
|
|
|
|
for (my $_i193 = 0; $_i193 < $_size189; ++$_i193) |
3609
|
|
|
|
|
|
|
{ |
3610
|
0
|
|
|
|
|
|
my $elem194 = undef; |
3611
|
0
|
|
|
|
|
|
$elem194 = new Cassandra::KsDef(); |
3612
|
0
|
|
|
|
|
|
$xfer += $elem194->read($input); |
3613
|
0
|
|
|
|
|
|
push(@{$self->{success}},$elem194); |
|
0
|
|
|
|
|
|
|
3614
|
|
|
|
|
|
|
} |
3615
|
0
|
|
|
|
|
|
$xfer += $input->readListEnd(); |
3616
|
|
|
|
|
|
|
} |
3617
|
|
|
|
|
|
|
} else { |
3618
|
0
|
|
|
|
|
|
$xfer += $input->skip($ftype); |
3619
|
|
|
|
|
|
|
} |
3620
|
0
|
|
|
|
|
|
last; }; |
3621
|
0
|
0
|
|
|
|
|
/^1$/ && do{ if ($ftype == TType::STRUCT) { |
|
0
|
0
|
|
|
|
|
|
3622
|
0
|
|
|
|
|
|
$self->{ire} = new Cassandra::InvalidRequestException(); |
3623
|
0
|
|
|
|
|
|
$xfer += $self->{ire}->read($input); |
3624
|
|
|
|
|
|
|
} else { |
3625
|
0
|
|
|
|
|
|
$xfer += $input->skip($ftype); |
3626
|
|
|
|
|
|
|
} |
3627
|
0
|
|
|
|
|
|
last; }; |
3628
|
0
|
|
|
|
|
|
$xfer += $input->skip($ftype); |
3629
|
|
|
|
|
|
|
} |
3630
|
0
|
|
|
|
|
|
$xfer += $input->readFieldEnd(); |
3631
|
|
|
|
|
|
|
} |
3632
|
0
|
|
|
|
|
|
$xfer += $input->readStructEnd(); |
3633
|
0
|
|
|
|
|
|
return $xfer; |
3634
|
|
|
|
|
|
|
} |
3635
|
|
|
|
|
|
|
|
3636
|
|
|
|
|
|
|
sub write { |
3637
|
0
|
|
|
0
|
|
|
my ($self, $output) = @_; |
3638
|
0
|
|
|
|
|
|
my $xfer = 0; |
3639
|
0
|
|
|
|
|
|
$xfer += $output->writeStructBegin('Cassandra_describe_keyspaces_result'); |
3640
|
0
|
0
|
|
|
|
|
if (defined $self->{success}) { |
3641
|
0
|
|
|
|
|
|
$xfer += $output->writeFieldBegin('success', TType::LIST, 0); |
3642
|
|
|
|
|
|
|
{ |
3643
|
0
|
|
|
|
|
|
$xfer += $output->writeListBegin(TType::STRUCT, scalar(@{$self->{success}})); |
|
0
|
|
|
|
|
|
|
|
0
|
|
|
|
|
|
|
3644
|
|
|
|
|
|
|
{ |
3645
|
0
|
|
|
|
|
|
foreach my $iter195 (@{$self->{success}}) |
|
0
|
|
|
|
|
|
|
|
0
|
|
|
|
|
|
|
3646
|
|
|
|
|
|
|
{ |
3647
|
0
|
|
|
|
|
|
$xfer += ${iter195}->write($output); |
3648
|
|
|
|
|
|
|
} |
3649
|
|
|
|
|
|
|
} |
3650
|
0
|
|
|
|
|
|
$xfer += $output->writeListEnd(); |
3651
|
|
|
|
|
|
|
} |
3652
|
0
|
|
|
|
|
|
$xfer += $output->writeFieldEnd(); |
3653
|
|
|
|
|
|
|
} |
3654
|
0
|
0
|
|
|
|
|
if (defined $self->{ire}) { |
3655
|
0
|
|
|
|
|
|
$xfer += $output->writeFieldBegin('ire', TType::STRUCT, 1); |
3656
|
0
|
|
|
|
|
|
$xfer += $self->{ire}->write($output); |
3657
|
0
|
|
|
|
|
|
$xfer += $output->writeFieldEnd(); |
3658
|
|
|
|
|
|
|
} |
3659
|
0
|
|
|
|
|
|
$xfer += $output->writeFieldStop(); |
3660
|
0
|
|
|
|
|
|
$xfer += $output->writeStructEnd(); |
3661
|
0
|
|
|
|
|
|
return $xfer; |
3662
|
|
|
|
|
|
|
} |
3663
|
|
|
|
|
|
|
|
3664
|
|
|
|
|
|
|
package Cassandra::Cassandra_describe_cluster_name_args; |
3665
|
|
|
|
|
|
|
BEGIN { |
3666
|
1
|
|
|
1
|
|
20
|
$Cassandra::Cassandra_describe_cluster_name_args::VERSION = '0.4.0'; |
3667
|
|
|
|
|
|
|
} |
3668
|
1
|
|
|
1
|
|
7
|
use base qw(Class::Accessor); |
|
1
|
|
|
|
|
2
|
|
|
1
|
|
|
|
|
299
|
|
3669
|
|
|
|
|
|
|
|
3670
|
|
|
|
|
|
|
sub new { |
3671
|
0
|
|
|
0
|
|
|
my $classname = shift; |
3672
|
0
|
|
|
|
|
|
my $self = {}; |
3673
|
0
|
|
0
|
|
|
|
my $vals = shift || {}; |
3674
|
0
|
|
|
|
|
|
return bless ($self, $classname); |
3675
|
|
|
|
|
|
|
} |
3676
|
|
|
|
|
|
|
|
3677
|
|
|
|
|
|
|
sub getName { |
3678
|
0
|
|
|
0
|
|
|
return 'Cassandra_describe_cluster_name_args'; |
3679
|
|
|
|
|
|
|
} |
3680
|
|
|
|
|
|
|
|
3681
|
|
|
|
|
|
|
sub read { |
3682
|
0
|
|
|
0
|
|
|
my ($self, $input) = @_; |
3683
|
0
|
|
|
|
|
|
my $xfer = 0; |
3684
|
0
|
|
|
|
|
|
my $fname; |
3685
|
0
|
|
|
|
|
|
my $ftype = 0; |
3686
|
0
|
|
|
|
|
|
my $fid = 0; |
3687
|
0
|
|
|
|
|
|
$xfer += $input->readStructBegin(\$fname); |
3688
|
0
|
|
|
|
|
|
while (1) |
3689
|
|
|
|
|
|
|
{ |
3690
|
0
|
|
|
|
|
|
$xfer += $input->readFieldBegin(\$fname, \$ftype, \$fid); |
3691
|
0
|
0
|
|
|
|
|
if ($ftype == TType::STOP) { |
3692
|
0
|
|
|
|
|
|
last; |
3693
|
|
|
|
|
|
|
} |
3694
|
0
|
|
|
|
|
|
SWITCH: for($fid) |
3695
|
|
|
|
|
|
|
{ |
3696
|
0
|
|
|
|
|
|
$xfer += $input->skip($ftype); |
3697
|
|
|
|
|
|
|
} |
3698
|
0
|
|
|
|
|
|
$xfer += $input->readFieldEnd(); |
3699
|
|
|
|
|
|
|
} |
3700
|
0
|
|
|
|
|
|
$xfer += $input->readStructEnd(); |
3701
|
0
|
|
|
|
|
|
return $xfer; |
3702
|
|
|
|
|
|
|
} |
3703
|
|
|
|
|
|
|
|
3704
|
|
|
|
|
|
|
sub write { |
3705
|
0
|
|
|
0
|
|
|
my ($self, $output) = @_; |
3706
|
0
|
|
|
|
|
|
my $xfer = 0; |
3707
|
0
|
|
|
|
|
|
$xfer += $output->writeStructBegin('Cassandra_describe_cluster_name_args'); |
3708
|
0
|
|
|
|
|
|
$xfer += $output->writeFieldStop(); |
3709
|
0
|
|
|
|
|
|
$xfer += $output->writeStructEnd(); |
3710
|
0
|
|
|
|
|
|
return $xfer; |
3711
|
|
|
|
|
|
|
} |
3712
|
|
|
|
|
|
|
|
3713
|
|
|
|
|
|
|
package Cassandra::Cassandra_describe_cluster_name_result; |
3714
|
|
|
|
|
|
|
BEGIN { |
3715
|
1
|
|
|
1
|
|
23
|
$Cassandra::Cassandra_describe_cluster_name_result::VERSION = '0.4.0'; |
3716
|
|
|
|
|
|
|
} |
3717
|
1
|
|
|
1
|
|
6
|
use base qw(Class::Accessor); |
|
1
|
|
|
|
|
2
|
|
|
1
|
|
|
|
|
433
|
|
3718
|
|
|
|
|
|
|
Cassandra::Cassandra_describe_cluster_name_result->mk_accessors( qw( success ) ); |
3719
|
|
|
|
|
|
|
|
3720
|
|
|
|
|
|
|
sub new { |
3721
|
0
|
|
|
0
|
|
|
my $classname = shift; |
3722
|
0
|
|
|
|
|
|
my $self = {}; |
3723
|
0
|
|
0
|
|
|
|
my $vals = shift || {}; |
3724
|
0
|
|
|
|
|
|
$self->{success} = undef; |
3725
|
0
|
0
|
|
|
|
|
if (UNIVERSAL::isa($vals,'HASH')) { |
3726
|
0
|
0
|
|
|
|
|
if (defined $vals->{success}) { |
3727
|
0
|
|
|
|
|
|
$self->{success} = $vals->{success}; |
3728
|
|
|
|
|
|
|
} |
3729
|
|
|
|
|
|
|
} |
3730
|
0
|
|
|
|
|
|
return bless ($self, $classname); |
3731
|
|
|
|
|
|
|
} |
3732
|
|
|
|
|
|
|
|
3733
|
|
|
|
|
|
|
sub getName { |
3734
|
0
|
|
|
0
|
|
|
return 'Cassandra_describe_cluster_name_result'; |
3735
|
|
|
|
|
|
|
} |
3736
|
|
|
|
|
|
|
|
3737
|
|
|
|
|
|
|
sub read { |
3738
|
0
|
|
|
0
|
|
|
my ($self, $input) = @_; |
3739
|
0
|
|
|
|
|
|
my $xfer = 0; |
3740
|
0
|
|
|
|
|
|
my $fname; |
3741
|
0
|
|
|
|
|
|
my $ftype = 0; |
3742
|
0
|
|
|
|
|
|
my $fid = 0; |
3743
|
0
|
|
|
|
|
|
$xfer += $input->readStructBegin(\$fname); |
3744
|
0
|
|
|
|
|
|
while (1) |
3745
|
|
|
|
|
|
|
{ |
3746
|
0
|
|
|
|
|
|
$xfer += $input->readFieldBegin(\$fname, \$ftype, \$fid); |
3747
|
0
|
0
|
|
|
|
|
if ($ftype == TType::STOP) { |
3748
|
0
|
|
|
|
|
|
last; |
3749
|
|
|
|
|
|
|
} |
3750
|
0
|
|
|
|
|
|
SWITCH: for($fid) |
3751
|
|
|
|
|
|
|
{ |
3752
|
0
|
0
|
|
|
|
|
/^0$/ && do{ if ($ftype == TType::STRING) { |
|
0
|
0
|
|
|
|
|
|
3753
|
0
|
|
|
|
|
|
$xfer += $input->readString(\$self->{success}); |
3754
|
|
|
|
|
|
|
} else { |
3755
|
0
|
|
|
|
|
|
$xfer += $input->skip($ftype); |
3756
|
|
|
|
|
|
|
} |
3757
|
0
|
|
|
|
|
|
last; }; |
3758
|
0
|
|
|
|
|
|
$xfer += $input->skip($ftype); |
3759
|
|
|
|
|
|
|
} |
3760
|
0
|
|
|
|
|
|
$xfer += $input->readFieldEnd(); |
3761
|
|
|
|
|
|
|
} |
3762
|
0
|
|
|
|
|
|
$xfer += $input->readStructEnd(); |
3763
|
0
|
|
|
|
|
|
return $xfer; |
3764
|
|
|
|
|
|
|
} |
3765
|
|
|
|
|
|
|
|
3766
|
|
|
|
|
|
|
sub write { |
3767
|
0
|
|
|
0
|
|
|
my ($self, $output) = @_; |
3768
|
0
|
|
|
|
|
|
my $xfer = 0; |
3769
|
0
|
|
|
|
|
|
$xfer += $output->writeStructBegin('Cassandra_describe_cluster_name_result'); |
3770
|
0
|
0
|
|
|
|
|
if (defined $self->{success}) { |
3771
|
0
|
|
|
|
|
|
$xfer += $output->writeFieldBegin('success', TType::STRING, 0); |
3772
|
0
|
|
|
|
|
|
$xfer += $output->writeString($self->{success}); |
3773
|
0
|
|
|
|
|
|
$xfer += $output->writeFieldEnd(); |
3774
|
|
|
|
|
|
|
} |
3775
|
0
|
|
|
|
|
|
$xfer += $output->writeFieldStop(); |
3776
|
0
|
|
|
|
|
|
$xfer += $output->writeStructEnd(); |
3777
|
0
|
|
|
|
|
|
return $xfer; |
3778
|
|
|
|
|
|
|
} |
3779
|
|
|
|
|
|
|
|
3780
|
|
|
|
|
|
|
package Cassandra::Cassandra_describe_version_args; |
3781
|
|
|
|
|
|
|
BEGIN { |
3782
|
1
|
|
|
1
|
|
17
|
$Cassandra::Cassandra_describe_version_args::VERSION = '0.4.0'; |
3783
|
|
|
|
|
|
|
} |
3784
|
1
|
|
|
1
|
|
5
|
use base qw(Class::Accessor); |
|
1
|
|
|
|
|
1
|
|
|
1
|
|
|
|
|
283
|
|
3785
|
|
|
|
|
|
|
|
3786
|
|
|
|
|
|
|
sub new { |
3787
|
0
|
|
|
0
|
|
|
my $classname = shift; |
3788
|
0
|
|
|
|
|
|
my $self = {}; |
3789
|
0
|
|
0
|
|
|
|
my $vals = shift || {}; |
3790
|
0
|
|
|
|
|
|
return bless ($self, $classname); |
3791
|
|
|
|
|
|
|
} |
3792
|
|
|
|
|
|
|
|
3793
|
|
|
|
|
|
|
sub getName { |
3794
|
0
|
|
|
0
|
|
|
return 'Cassandra_describe_version_args'; |
3795
|
|
|
|
|
|
|
} |
3796
|
|
|
|
|
|
|
|
3797
|
|
|
|
|
|
|
sub read { |
3798
|
0
|
|
|
0
|
|
|
my ($self, $input) = @_; |
3799
|
0
|
|
|
|
|
|
my $xfer = 0; |
3800
|
0
|
|
|
|
|
|
my $fname; |
3801
|
0
|
|
|
|
|
|
my $ftype = 0; |
3802
|
0
|
|
|
|
|
|
my $fid = 0; |
3803
|
0
|
|
|
|
|
|
$xfer += $input->readStructBegin(\$fname); |
3804
|
0
|
|
|
|
|
|
while (1) |
3805
|
|
|
|
|
|
|
{ |
3806
|
0
|
|
|
|
|
|
$xfer += $input->readFieldBegin(\$fname, \$ftype, \$fid); |
3807
|
0
|
0
|
|
|
|
|
if ($ftype == TType::STOP) { |
3808
|
0
|
|
|
|
|
|
last; |
3809
|
|
|
|
|
|
|
} |
3810
|
0
|
|
|
|
|
|
SWITCH: for($fid) |
3811
|
|
|
|
|
|
|
{ |
3812
|
0
|
|
|
|
|
|
$xfer += $input->skip($ftype); |
3813
|
|
|
|
|
|
|
} |
3814
|
0
|
|
|
|
|
|
$xfer += $input->readFieldEnd(); |
3815
|
|
|
|
|
|
|
} |
3816
|
0
|
|
|
|
|
|
$xfer += $input->readStructEnd(); |
3817
|
0
|
|
|
|
|
|
return $xfer; |
3818
|
|
|
|
|
|
|
} |
3819
|
|
|
|
|
|
|
|
3820
|
|
|
|
|
|
|
sub write { |
3821
|
0
|
|
|
0
|
|
|
my ($self, $output) = @_; |
3822
|
0
|
|
|
|
|
|
my $xfer = 0; |
3823
|
0
|
|
|
|
|
|
$xfer += $output->writeStructBegin('Cassandra_describe_version_args'); |
3824
|
0
|
|
|
|
|
|
$xfer += $output->writeFieldStop(); |
3825
|
0
|
|
|
|
|
|
$xfer += $output->writeStructEnd(); |
3826
|
0
|
|
|
|
|
|
return $xfer; |
3827
|
|
|
|
|
|
|
} |
3828
|
|
|
|
|
|
|
|
3829
|
|
|
|
|
|
|
package Cassandra::Cassandra_describe_version_result; |
3830
|
|
|
|
|
|
|
BEGIN { |
3831
|
1
|
|
|
1
|
|
20
|
$Cassandra::Cassandra_describe_version_result::VERSION = '0.4.0'; |
3832
|
|
|
|
|
|
|
} |
3833
|
1
|
|
|
1
|
|
5
|
use base qw(Class::Accessor); |
|
1
|
|
|
|
|
2
|
|
|
1
|
|
|
|
|
521
|
|
3834
|
|
|
|
|
|
|
Cassandra::Cassandra_describe_version_result->mk_accessors( qw( success ) ); |
3835
|
|
|
|
|
|
|
|
3836
|
|
|
|
|
|
|
sub new { |
3837
|
0
|
|
|
0
|
|
|
my $classname = shift; |
3838
|
0
|
|
|
|
|
|
my $self = {}; |
3839
|
0
|
|
0
|
|
|
|
my $vals = shift || {}; |
3840
|
0
|
|
|
|
|
|
$self->{success} = undef; |
3841
|
0
|
0
|
|
|
|
|
if (UNIVERSAL::isa($vals,'HASH')) { |
3842
|
0
|
0
|
|
|
|
|
if (defined $vals->{success}) { |
3843
|
0
|
|
|
|
|
|
$self->{success} = $vals->{success}; |
3844
|
|
|
|
|
|
|
} |
3845
|
|
|
|
|
|
|
} |
3846
|
0
|
|
|
|
|
|
return bless ($self, $classname); |
3847
|
|
|
|
|
|
|
} |
3848
|
|
|
|
|
|
|
|
3849
|
|
|
|
|
|
|
sub getName { |
3850
|
0
|
|
|
0
|
|
|
return 'Cassandra_describe_version_result'; |
3851
|
|
|
|
|
|
|
} |
3852
|
|
|
|
|
|
|
|
3853
|
|
|
|
|
|
|
sub read { |
3854
|
0
|
|
|
0
|
|
|
my ($self, $input) = @_; |
3855
|
0
|
|
|
|
|
|
my $xfer = 0; |
3856
|
0
|
|
|
|
|
|
my $fname; |
3857
|
0
|
|
|
|
|
|
my $ftype = 0; |
3858
|
0
|
|
|
|
|
|
my $fid = 0; |
3859
|
0
|
|
|
|
|
|
$xfer += $input->readStructBegin(\$fname); |
3860
|
0
|
|
|
|
|
|
while (1) |
3861
|
|
|
|
|
|
|
{ |
3862
|
0
|
|
|
|
|
|
$xfer += $input->readFieldBegin(\$fname, \$ftype, \$fid); |
3863
|
0
|
0
|
|
|
|
|
if ($ftype == TType::STOP) { |
3864
|
0
|
|
|
|
|
|
last; |
3865
|
|
|
|
|
|
|
} |
3866
|
0
|
|
|
|
|
|
SWITCH: for($fid) |
3867
|
|
|
|
|
|
|
{ |
3868
|
0
|
0
|
|
|
|
|
/^0$/ && do{ if ($ftype == TType::STRING) { |
|
0
|
0
|
|
|
|
|
|
3869
|
0
|
|
|
|
|
|
$xfer += $input->readString(\$self->{success}); |
3870
|
|
|
|
|
|
|
} else { |
3871
|
0
|
|
|
|
|
|
$xfer += $input->skip($ftype); |
3872
|
|
|
|
|
|
|
} |
3873
|
0
|
|
|
|
|
|
last; }; |
3874
|
0
|
|
|
|
|
|
$xfer += $input->skip($ftype); |
3875
|
|
|
|
|
|
|
} |
3876
|
0
|
|
|
|
|
|
$xfer += $input->readFieldEnd(); |
3877
|
|
|
|
|
|
|
} |
3878
|
0
|
|
|
|
|
|
$xfer += $input->readStructEnd(); |
3879
|
0
|
|
|
|
|
|
return $xfer; |
3880
|
|
|
|
|
|
|
} |
3881
|
|
|
|
|
|
|
|
3882
|
|
|
|
|
|
|
sub write { |
3883
|
0
|
|
|
0
|
|
|
my ($self, $output) = @_; |
3884
|
0
|
|
|
|
|
|
my $xfer = 0; |
3885
|
0
|
|
|
|
|
|
$xfer += $output->writeStructBegin('Cassandra_describe_version_result'); |
3886
|
0
|
0
|
|
|
|
|
if (defined $self->{success}) { |
3887
|
0
|
|
|
|
|
|
$xfer += $output->writeFieldBegin('success', TType::STRING, 0); |
3888
|
0
|
|
|
|
|
|
$xfer += $output->writeString($self->{success}); |
3889
|
0
|
|
|
|
|
|
$xfer += $output->writeFieldEnd(); |
3890
|
|
|
|
|
|
|
} |
3891
|
0
|
|
|
|
|
|
$xfer += $output->writeFieldStop(); |
3892
|
0
|
|
|
|
|
|
$xfer += $output->writeStructEnd(); |
3893
|
0
|
|
|
|
|
|
return $xfer; |
3894
|
|
|
|
|
|
|
} |
3895
|
|
|
|
|
|
|
|
3896
|
|
|
|
|
|
|
package Cassandra::Cassandra_describe_ring_args; |
3897
|
|
|
|
|
|
|
BEGIN { |
3898
|
1
|
|
|
1
|
|
20
|
$Cassandra::Cassandra_describe_ring_args::VERSION = '0.4.0'; |
3899
|
|
|
|
|
|
|
} |
3900
|
1
|
|
|
1
|
|
8
|
use base qw(Class::Accessor); |
|
1
|
|
|
|
|
2
|
|
|
1
|
|
|
|
|
499
|
|
3901
|
|
|
|
|
|
|
Cassandra::Cassandra_describe_ring_args->mk_accessors( qw( keyspace ) ); |
3902
|
|
|
|
|
|
|
|
3903
|
|
|
|
|
|
|
sub new { |
3904
|
0
|
|
|
0
|
|
|
my $classname = shift; |
3905
|
0
|
|
|
|
|
|
my $self = {}; |
3906
|
0
|
|
0
|
|
|
|
my $vals = shift || {}; |
3907
|
0
|
|
|
|
|
|
$self->{keyspace} = undef; |
3908
|
0
|
0
|
|
|
|
|
if (UNIVERSAL::isa($vals,'HASH')) { |
3909
|
0
|
0
|
|
|
|
|
if (defined $vals->{keyspace}) { |
3910
|
0
|
|
|
|
|
|
$self->{keyspace} = $vals->{keyspace}; |
3911
|
|
|
|
|
|
|
} |
3912
|
|
|
|
|
|
|
} |
3913
|
0
|
|
|
|
|
|
return bless ($self, $classname); |
3914
|
|
|
|
|
|
|
} |
3915
|
|
|
|
|
|
|
|
3916
|
|
|
|
|
|
|
sub getName { |
3917
|
0
|
|
|
0
|
|
|
return 'Cassandra_describe_ring_args'; |
3918
|
|
|
|
|
|
|
} |
3919
|
|
|
|
|
|
|
|
3920
|
|
|
|
|
|
|
sub read { |
3921
|
0
|
|
|
0
|
|
|
my ($self, $input) = @_; |
3922
|
0
|
|
|
|
|
|
my $xfer = 0; |
3923
|
0
|
|
|
|
|
|
my $fname; |
3924
|
0
|
|
|
|
|
|
my $ftype = 0; |
3925
|
0
|
|
|
|
|
|
my $fid = 0; |
3926
|
0
|
|
|
|
|
|
$xfer += $input->readStructBegin(\$fname); |
3927
|
0
|
|
|
|
|
|
while (1) |
3928
|
|
|
|
|
|
|
{ |
3929
|
0
|
|
|
|
|
|
$xfer += $input->readFieldBegin(\$fname, \$ftype, \$fid); |
3930
|
0
|
0
|
|
|
|
|
if ($ftype == TType::STOP) { |
3931
|
0
|
|
|
|
|
|
last; |
3932
|
|
|
|
|
|
|
} |
3933
|
0
|
|
|
|
|
|
SWITCH: for($fid) |
3934
|
|
|
|
|
|
|
{ |
3935
|
0
|
0
|
|
|
|
|
/^1$/ && do{ if ($ftype == TType::STRING) { |
|
0
|
0
|
|
|
|
|
|
3936
|
0
|
|
|
|
|
|
$xfer += $input->readString(\$self->{keyspace}); |
3937
|
|
|
|
|
|
|
} else { |
3938
|
0
|
|
|
|
|
|
$xfer += $input->skip($ftype); |
3939
|
|
|
|
|
|
|
} |
3940
|
0
|
|
|
|
|
|
last; }; |
3941
|
0
|
|
|
|
|
|
$xfer += $input->skip($ftype); |
3942
|
|
|
|
|
|
|
} |
3943
|
0
|
|
|
|
|
|
$xfer += $input->readFieldEnd(); |
3944
|
|
|
|
|
|
|
} |
3945
|
0
|
|
|
|
|
|
$xfer += $input->readStructEnd(); |
3946
|
0
|
|
|
|
|
|
return $xfer; |
3947
|
|
|
|
|
|
|
} |
3948
|
|
|
|
|
|
|
|
3949
|
|
|
|
|
|
|
sub write { |
3950
|
0
|
|
|
0
|
|
|
my ($self, $output) = @_; |
3951
|
0
|
|
|
|
|
|
my $xfer = 0; |
3952
|
0
|
|
|
|
|
|
$xfer += $output->writeStructBegin('Cassandra_describe_ring_args'); |
3953
|
0
|
0
|
|
|
|
|
if (defined $self->{keyspace}) { |
3954
|
0
|
|
|
|
|
|
$xfer += $output->writeFieldBegin('keyspace', TType::STRING, 1); |
3955
|
0
|
|
|
|
|
|
$xfer += $output->writeString($self->{keyspace}); |
3956
|
0
|
|
|
|
|
|
$xfer += $output->writeFieldEnd(); |
3957
|
|
|
|
|
|
|
} |
3958
|
0
|
|
|
|
|
|
$xfer += $output->writeFieldStop(); |
3959
|
0
|
|
|
|
|
|
$xfer += $output->writeStructEnd(); |
3960
|
0
|
|
|
|
|
|
return $xfer; |
3961
|
|
|
|
|
|
|
} |
3962
|
|
|
|
|
|
|
|
3963
|
|
|
|
|
|
|
package Cassandra::Cassandra_describe_ring_result; |
3964
|
|
|
|
|
|
|
BEGIN { |
3965
|
1
|
|
|
1
|
|
25
|
$Cassandra::Cassandra_describe_ring_result::VERSION = '0.4.0'; |
3966
|
|
|
|
|
|
|
} |
3967
|
1
|
|
|
1
|
|
7
|
use base qw(Class::Accessor); |
|
1
|
|
|
|
|
2
|
|
|
1
|
|
|
|
|
617
|
|
3968
|
|
|
|
|
|
|
Cassandra::Cassandra_describe_ring_result->mk_accessors( qw( success ) ); |
3969
|
|
|
|
|
|
|
|
3970
|
|
|
|
|
|
|
sub new { |
3971
|
0
|
|
|
0
|
|
|
my $classname = shift; |
3972
|
0
|
|
|
|
|
|
my $self = {}; |
3973
|
0
|
|
0
|
|
|
|
my $vals = shift || {}; |
3974
|
0
|
|
|
|
|
|
$self->{success} = undef; |
3975
|
0
|
|
|
|
|
|
$self->{ire} = undef; |
3976
|
0
|
0
|
|
|
|
|
if (UNIVERSAL::isa($vals,'HASH')) { |
3977
|
0
|
0
|
|
|
|
|
if (defined $vals->{success}) { |
3978
|
0
|
|
|
|
|
|
$self->{success} = $vals->{success}; |
3979
|
|
|
|
|
|
|
} |
3980
|
0
|
0
|
|
|
|
|
if (defined $vals->{ire}) { |
3981
|
0
|
|
|
|
|
|
$self->{ire} = $vals->{ire}; |
3982
|
|
|
|
|
|
|
} |
3983
|
|
|
|
|
|
|
} |
3984
|
0
|
|
|
|
|
|
return bless ($self, $classname); |
3985
|
|
|
|
|
|
|
} |
3986
|
|
|
|
|
|
|
|
3987
|
|
|
|
|
|
|
sub getName { |
3988
|
0
|
|
|
0
|
|
|
return 'Cassandra_describe_ring_result'; |
3989
|
|
|
|
|
|
|
} |
3990
|
|
|
|
|
|
|
|
3991
|
|
|
|
|
|
|
sub read { |
3992
|
0
|
|
|
0
|
|
|
my ($self, $input) = @_; |
3993
|
0
|
|
|
|
|
|
my $xfer = 0; |
3994
|
0
|
|
|
|
|
|
my $fname; |
3995
|
0
|
|
|
|
|
|
my $ftype = 0; |
3996
|
0
|
|
|
|
|
|
my $fid = 0; |
3997
|
0
|
|
|
|
|
|
$xfer += $input->readStructBegin(\$fname); |
3998
|
0
|
|
|
|
|
|
while (1) |
3999
|
|
|
|
|
|
|
{ |
4000
|
0
|
|
|
|
|
|
$xfer += $input->readFieldBegin(\$fname, \$ftype, \$fid); |
4001
|
0
|
0
|
|
|
|
|
if ($ftype == TType::STOP) { |
4002
|
0
|
|
|
|
|
|
last; |
4003
|
|
|
|
|
|
|
} |
4004
|
0
|
|
|
|
|
|
SWITCH: for($fid) |
4005
|
|
|
|
|
|
|
{ |
4006
|
0
|
0
|
|
|
|
|
/^0$/ && do{ if ($ftype == TType::LIST) { |
|
0
|
0
|
|
|
|
|
|
4007
|
|
|
|
|
|
|
{ |
4008
|
0
|
|
|
|
|
|
my $_size196 = 0; |
|
0
|
|
|
|
|
|
|
4009
|
0
|
|
|
|
|
|
$self->{success} = []; |
4010
|
0
|
|
|
|
|
|
my $_etype199 = 0; |
4011
|
0
|
|
|
|
|
|
$xfer += $input->readListBegin(\$_etype199, \$_size196); |
4012
|
0
|
|
|
|
|
|
for (my $_i200 = 0; $_i200 < $_size196; ++$_i200) |
4013
|
|
|
|
|
|
|
{ |
4014
|
0
|
|
|
|
|
|
my $elem201 = undef; |
4015
|
0
|
|
|
|
|
|
$elem201 = new Cassandra::TokenRange(); |
4016
|
0
|
|
|
|
|
|
$xfer += $elem201->read($input); |
4017
|
0
|
|
|
|
|
|
push(@{$self->{success}},$elem201); |
|
0
|
|
|
|
|
|
|
4018
|
|
|
|
|
|
|
} |
4019
|
0
|
|
|
|
|
|
$xfer += $input->readListEnd(); |
4020
|
|
|
|
|
|
|
} |
4021
|
|
|
|
|
|
|
} else { |
4022
|
0
|
|
|
|
|
|
$xfer += $input->skip($ftype); |
4023
|
|
|
|
|
|
|
} |
4024
|
0
|
|
|
|
|
|
last; }; |
4025
|
0
|
0
|
|
|
|
|
/^1$/ && do{ if ($ftype == TType::STRUCT) { |
|
0
|
0
|
|
|
|
|
|
4026
|
0
|
|
|
|
|
|
$self->{ire} = new Cassandra::InvalidRequestException(); |
4027
|
0
|
|
|
|
|
|
$xfer += $self->{ire}->read($input); |
4028
|
|
|
|
|
|
|
} else { |
4029
|
0
|
|
|
|
|
|
$xfer += $input->skip($ftype); |
4030
|
|
|
|
|
|
|
} |
4031
|
0
|
|
|
|
|
|
last; }; |
4032
|
0
|
|
|
|
|
|
$xfer += $input->skip($ftype); |
4033
|
|
|
|
|
|
|
} |
4034
|
0
|
|
|
|
|
|
$xfer += $input->readFieldEnd(); |
4035
|
|
|
|
|
|
|
} |
4036
|
0
|
|
|
|
|
|
$xfer += $input->readStructEnd(); |
4037
|
0
|
|
|
|
|
|
return $xfer; |
4038
|
|
|
|
|
|
|
} |
4039
|
|
|
|
|
|
|
|
4040
|
|
|
|
|
|
|
sub write { |
4041
|
0
|
|
|
0
|
|
|
my ($self, $output) = @_; |
4042
|
0
|
|
|
|
|
|
my $xfer = 0; |
4043
|
0
|
|
|
|
|
|
$xfer += $output->writeStructBegin('Cassandra_describe_ring_result'); |
4044
|
0
|
0
|
|
|
|
|
if (defined $self->{success}) { |
4045
|
0
|
|
|
|
|
|
$xfer += $output->writeFieldBegin('success', TType::LIST, 0); |
4046
|
|
|
|
|
|
|
{ |
4047
|
0
|
|
|
|
|
|
$xfer += $output->writeListBegin(TType::STRUCT, scalar(@{$self->{success}})); |
|
0
|
|
|
|
|
|
|
|
0
|
|
|
|
|
|
|
4048
|
|
|
|
|
|
|
{ |
4049
|
0
|
|
|
|
|
|
foreach my $iter202 (@{$self->{success}}) |
|
0
|
|
|
|
|
|
|
|
0
|
|
|
|
|
|
|
4050
|
|
|
|
|
|
|
{ |
4051
|
0
|
|
|
|
|
|
$xfer += ${iter202}->write($output); |
4052
|
|
|
|
|
|
|
} |
4053
|
|
|
|
|
|
|
} |
4054
|
0
|
|
|
|
|
|
$xfer += $output->writeListEnd(); |
4055
|
|
|
|
|
|
|
} |
4056
|
0
|
|
|
|
|
|
$xfer += $output->writeFieldEnd(); |
4057
|
|
|
|
|
|
|
} |
4058
|
0
|
0
|
|
|
|
|
if (defined $self->{ire}) { |
4059
|
0
|
|
|
|
|
|
$xfer += $output->writeFieldBegin('ire', TType::STRUCT, 1); |
4060
|
0
|
|
|
|
|
|
$xfer += $self->{ire}->write($output); |
4061
|
0
|
|
|
|
|
|
$xfer += $output->writeFieldEnd(); |
4062
|
|
|
|
|
|
|
} |
4063
|
0
|
|
|
|
|
|
$xfer += $output->writeFieldStop(); |
4064
|
0
|
|
|
|
|
|
$xfer += $output->writeStructEnd(); |
4065
|
0
|
|
|
|
|
|
return $xfer; |
4066
|
|
|
|
|
|
|
} |
4067
|
|
|
|
|
|
|
|
4068
|
|
|
|
|
|
|
package Cassandra::Cassandra_describe_partitioner_args; |
4069
|
|
|
|
|
|
|
BEGIN { |
4070
|
1
|
|
|
1
|
|
16
|
$Cassandra::Cassandra_describe_partitioner_args::VERSION = '0.4.0'; |
4071
|
|
|
|
|
|
|
} |
4072
|
1
|
|
|
1
|
|
5
|
use base qw(Class::Accessor); |
|
1
|
|
|
|
|
1
|
|
|
1
|
|
|
|
|
312
|
|
4073
|
|
|
|
|
|
|
|
4074
|
|
|
|
|
|
|
sub new { |
4075
|
0
|
|
|
0
|
|
|
my $classname = shift; |
4076
|
0
|
|
|
|
|
|
my $self = {}; |
4077
|
0
|
|
0
|
|
|
|
my $vals = shift || {}; |
4078
|
0
|
|
|
|
|
|
return bless ($self, $classname); |
4079
|
|
|
|
|
|
|
} |
4080
|
|
|
|
|
|
|
|
4081
|
|
|
|
|
|
|
sub getName { |
4082
|
0
|
|
|
0
|
|
|
return 'Cassandra_describe_partitioner_args'; |
4083
|
|
|
|
|
|
|
} |
4084
|
|
|
|
|
|
|
|
4085
|
|
|
|
|
|
|
sub read { |
4086
|
0
|
|
|
0
|
|
|
my ($self, $input) = @_; |
4087
|
0
|
|
|
|
|
|
my $xfer = 0; |
4088
|
0
|
|
|
|
|
|
my $fname; |
4089
|
0
|
|
|
|
|
|
my $ftype = 0; |
4090
|
0
|
|
|
|
|
|
my $fid = 0; |
4091
|
0
|
|
|
|
|
|
$xfer += $input->readStructBegin(\$fname); |
4092
|
0
|
|
|
|
|
|
while (1) |
4093
|
|
|
|
|
|
|
{ |
4094
|
0
|
|
|
|
|
|
$xfer += $input->readFieldBegin(\$fname, \$ftype, \$fid); |
4095
|
0
|
0
|
|
|
|
|
if ($ftype == TType::STOP) { |
4096
|
0
|
|
|
|
|
|
last; |
4097
|
|
|
|
|
|
|
} |
4098
|
0
|
|
|
|
|
|
SWITCH: for($fid) |
4099
|
|
|
|
|
|
|
{ |
4100
|
0
|
|
|
|
|
|
$xfer += $input->skip($ftype); |
4101
|
|
|
|
|
|
|
} |
4102
|
0
|
|
|
|
|
|
$xfer += $input->readFieldEnd(); |
4103
|
|
|
|
|
|
|
} |
4104
|
0
|
|
|
|
|
|
$xfer += $input->readStructEnd(); |
4105
|
0
|
|
|
|
|
|
return $xfer; |
4106
|
|
|
|
|
|
|
} |
4107
|
|
|
|
|
|
|
|
4108
|
|
|
|
|
|
|
sub write { |
4109
|
0
|
|
|
0
|
|
|
my ($self, $output) = @_; |
4110
|
0
|
|
|
|
|
|
my $xfer = 0; |
4111
|
0
|
|
|
|
|
|
$xfer += $output->writeStructBegin('Cassandra_describe_partitioner_args'); |
4112
|
0
|
|
|
|
|
|
$xfer += $output->writeFieldStop(); |
4113
|
0
|
|
|
|
|
|
$xfer += $output->writeStructEnd(); |
4114
|
0
|
|
|
|
|
|
return $xfer; |
4115
|
|
|
|
|
|
|
} |
4116
|
|
|
|
|
|
|
|
4117
|
|
|
|
|
|
|
package Cassandra::Cassandra_describe_partitioner_result; |
4118
|
|
|
|
|
|
|
BEGIN { |
4119
|
1
|
|
|
1
|
|
21
|
$Cassandra::Cassandra_describe_partitioner_result::VERSION = '0.4.0'; |
4120
|
|
|
|
|
|
|
} |
4121
|
1
|
|
|
1
|
|
5
|
use base qw(Class::Accessor); |
|
1
|
|
|
|
|
2
|
|
|
1
|
|
|
|
|
389
|
|
4122
|
|
|
|
|
|
|
Cassandra::Cassandra_describe_partitioner_result->mk_accessors( qw( success ) ); |
4123
|
|
|
|
|
|
|
|
4124
|
|
|
|
|
|
|
sub new { |
4125
|
0
|
|
|
0
|
|
|
my $classname = shift; |
4126
|
0
|
|
|
|
|
|
my $self = {}; |
4127
|
0
|
|
0
|
|
|
|
my $vals = shift || {}; |
4128
|
0
|
|
|
|
|
|
$self->{success} = undef; |
4129
|
0
|
0
|
|
|
|
|
if (UNIVERSAL::isa($vals,'HASH')) { |
4130
|
0
|
0
|
|
|
|
|
if (defined $vals->{success}) { |
4131
|
0
|
|
|
|
|
|
$self->{success} = $vals->{success}; |
4132
|
|
|
|
|
|
|
} |
4133
|
|
|
|
|
|
|
} |
4134
|
0
|
|
|
|
|
|
return bless ($self, $classname); |
4135
|
|
|
|
|
|
|
} |
4136
|
|
|
|
|
|
|
|
4137
|
|
|
|
|
|
|
sub getName { |
4138
|
0
|
|
|
0
|
|
|
return 'Cassandra_describe_partitioner_result'; |
4139
|
|
|
|
|
|
|
} |
4140
|
|
|
|
|
|
|
|
4141
|
|
|
|
|
|
|
sub read { |
4142
|
0
|
|
|
0
|
|
|
my ($self, $input) = @_; |
4143
|
0
|
|
|
|
|
|
my $xfer = 0; |
4144
|
0
|
|
|
|
|
|
my $fname; |
4145
|
0
|
|
|
|
|
|
my $ftype = 0; |
4146
|
0
|
|
|
|
|
|
my $fid = 0; |
4147
|
0
|
|
|
|
|
|
$xfer += $input->readStructBegin(\$fname); |
4148
|
0
|
|
|
|
|
|
while (1) |
4149
|
|
|
|
|
|
|
{ |
4150
|
0
|
|
|
|
|
|
$xfer += $input->readFieldBegin(\$fname, \$ftype, \$fid); |
4151
|
0
|
0
|
|
|
|
|
if ($ftype == TType::STOP) { |
4152
|
0
|
|
|
|
|
|
last; |
4153
|
|
|
|
|
|
|
} |
4154
|
0
|
|
|
|
|
|
SWITCH: for($fid) |
4155
|
|
|
|
|
|
|
{ |
4156
|
0
|
0
|
|
|
|
|
/^0$/ && do{ if ($ftype == TType::STRING) { |
|
0
|
0
|
|
|
|
|
|
4157
|
0
|
|
|
|
|
|
$xfer += $input->readString(\$self->{success}); |
4158
|
|
|
|
|
|
|
} else { |
4159
|
0
|
|
|
|
|
|
$xfer += $input->skip($ftype); |
4160
|
|
|
|
|
|
|
} |
4161
|
0
|
|
|
|
|
|
last; }; |
4162
|
0
|
|
|
|
|
|
$xfer += $input->skip($ftype); |
4163
|
|
|
|
|
|
|
} |
4164
|
0
|
|
|
|
|
|
$xfer += $input->readFieldEnd(); |
4165
|
|
|
|
|
|
|
} |
4166
|
0
|
|
|
|
|
|
$xfer += $input->readStructEnd(); |
4167
|
0
|
|
|
|
|
|
return $xfer; |
4168
|
|
|
|
|
|
|
} |
4169
|
|
|
|
|
|
|
|
4170
|
|
|
|
|
|
|
sub write { |
4171
|
0
|
|
|
0
|
|
|
my ($self, $output) = @_; |
4172
|
0
|
|
|
|
|
|
my $xfer = 0; |
4173
|
0
|
|
|
|
|
|
$xfer += $output->writeStructBegin('Cassandra_describe_partitioner_result'); |
4174
|
0
|
0
|
|
|
|
|
if (defined $self->{success}) { |
4175
|
0
|
|
|
|
|
|
$xfer += $output->writeFieldBegin('success', TType::STRING, 0); |
4176
|
0
|
|
|
|
|
|
$xfer += $output->writeString($self->{success}); |
4177
|
0
|
|
|
|
|
|
$xfer += $output->writeFieldEnd(); |
4178
|
|
|
|
|
|
|
} |
4179
|
0
|
|
|
|
|
|
$xfer += $output->writeFieldStop(); |
4180
|
0
|
|
|
|
|
|
$xfer += $output->writeStructEnd(); |
4181
|
0
|
|
|
|
|
|
return $xfer; |
4182
|
|
|
|
|
|
|
} |
4183
|
|
|
|
|
|
|
|
4184
|
|
|
|
|
|
|
package Cassandra::Cassandra_describe_snitch_args; |
4185
|
|
|
|
|
|
|
BEGIN { |
4186
|
1
|
|
|
1
|
|
27
|
$Cassandra::Cassandra_describe_snitch_args::VERSION = '0.4.0'; |
4187
|
|
|
|
|
|
|
} |
4188
|
1
|
|
|
1
|
|
5
|
use base qw(Class::Accessor); |
|
1
|
|
|
|
|
2
|
|
|
1
|
|
|
|
|
335
|
|
4189
|
|
|
|
|
|
|
|
4190
|
|
|
|
|
|
|
sub new { |
4191
|
0
|
|
|
0
|
|
|
my $classname = shift; |
4192
|
0
|
|
|
|
|
|
my $self = {}; |
4193
|
0
|
|
0
|
|
|
|
my $vals = shift || {}; |
4194
|
0
|
|
|
|
|
|
return bless ($self, $classname); |
4195
|
|
|
|
|
|
|
} |
4196
|
|
|
|
|
|
|
|
4197
|
|
|
|
|
|
|
sub getName { |
4198
|
0
|
|
|
0
|
|
|
return 'Cassandra_describe_snitch_args'; |
4199
|
|
|
|
|
|
|
} |
4200
|
|
|
|
|
|
|
|
4201
|
|
|
|
|
|
|
sub read { |
4202
|
0
|
|
|
0
|
|
|
my ($self, $input) = @_; |
4203
|
0
|
|
|
|
|
|
my $xfer = 0; |
4204
|
0
|
|
|
|
|
|
my $fname; |
4205
|
0
|
|
|
|
|
|
my $ftype = 0; |
4206
|
0
|
|
|
|
|
|
my $fid = 0; |
4207
|
0
|
|
|
|
|
|
$xfer += $input->readStructBegin(\$fname); |
4208
|
0
|
|
|
|
|
|
while (1) |
4209
|
|
|
|
|
|
|
{ |
4210
|
0
|
|
|
|
|
|
$xfer += $input->readFieldBegin(\$fname, \$ftype, \$fid); |
4211
|
0
|
0
|
|
|
|
|
if ($ftype == TType::STOP) { |
4212
|
0
|
|
|
|
|
|
last; |
4213
|
|
|
|
|
|
|
} |
4214
|
0
|
|
|
|
|
|
SWITCH: for($fid) |
4215
|
|
|
|
|
|
|
{ |
4216
|
0
|
|
|
|
|
|
$xfer += $input->skip($ftype); |
4217
|
|
|
|
|
|
|
} |
4218
|
0
|
|
|
|
|
|
$xfer += $input->readFieldEnd(); |
4219
|
|
|
|
|
|
|
} |
4220
|
0
|
|
|
|
|
|
$xfer += $input->readStructEnd(); |
4221
|
0
|
|
|
|
|
|
return $xfer; |
4222
|
|
|
|
|
|
|
} |
4223
|
|
|
|
|
|
|
|
4224
|
|
|
|
|
|
|
sub write { |
4225
|
0
|
|
|
0
|
|
|
my ($self, $output) = @_; |
4226
|
0
|
|
|
|
|
|
my $xfer = 0; |
4227
|
0
|
|
|
|
|
|
$xfer += $output->writeStructBegin('Cassandra_describe_snitch_args'); |
4228
|
0
|
|
|
|
|
|
$xfer += $output->writeFieldStop(); |
4229
|
0
|
|
|
|
|
|
$xfer += $output->writeStructEnd(); |
4230
|
0
|
|
|
|
|
|
return $xfer; |
4231
|
|
|
|
|
|
|
} |
4232
|
|
|
|
|
|
|
|
4233
|
|
|
|
|
|
|
package Cassandra::Cassandra_describe_snitch_result; |
4234
|
|
|
|
|
|
|
BEGIN { |
4235
|
1
|
|
|
1
|
|
20
|
$Cassandra::Cassandra_describe_snitch_result::VERSION = '0.4.0'; |
4236
|
|
|
|
|
|
|
} |
4237
|
1
|
|
|
1
|
|
5
|
use base qw(Class::Accessor); |
|
1
|
|
|
|
|
7
|
|
|
1
|
|
|
|
|
422
|
|
4238
|
|
|
|
|
|
|
Cassandra::Cassandra_describe_snitch_result->mk_accessors( qw( success ) ); |
4239
|
|
|
|
|
|
|
|
4240
|
|
|
|
|
|
|
sub new { |
4241
|
0
|
|
|
0
|
|
|
my $classname = shift; |
4242
|
0
|
|
|
|
|
|
my $self = {}; |
4243
|
0
|
|
0
|
|
|
|
my $vals = shift || {}; |
4244
|
0
|
|
|
|
|
|
$self->{success} = undef; |
4245
|
0
|
0
|
|
|
|
|
if (UNIVERSAL::isa($vals,'HASH')) { |
4246
|
0
|
0
|
|
|
|
|
if (defined $vals->{success}) { |
4247
|
0
|
|
|
|
|
|
$self->{success} = $vals->{success}; |
4248
|
|
|
|
|
|
|
} |
4249
|
|
|
|
|
|
|
} |
4250
|
0
|
|
|
|
|
|
return bless ($self, $classname); |
4251
|
|
|
|
|
|
|
} |
4252
|
|
|
|
|
|
|
|
4253
|
|
|
|
|
|
|
sub getName { |
4254
|
0
|
|
|
0
|
|
|
return 'Cassandra_describe_snitch_result'; |
4255
|
|
|
|
|
|
|
} |
4256
|
|
|
|
|
|
|
|
4257
|
|
|
|
|
|
|
sub read { |
4258
|
0
|
|
|
0
|
|
|
my ($self, $input) = @_; |
4259
|
0
|
|
|
|
|
|
my $xfer = 0; |
4260
|
0
|
|
|
|
|
|
my $fname; |
4261
|
0
|
|
|
|
|
|
my $ftype = 0; |
4262
|
0
|
|
|
|
|
|
my $fid = 0; |
4263
|
0
|
|
|
|
|
|
$xfer += $input->readStructBegin(\$fname); |
4264
|
0
|
|
|
|
|
|
while (1) |
4265
|
|
|
|
|
|
|
{ |
4266
|
0
|
|
|
|
|
|
$xfer += $input->readFieldBegin(\$fname, \$ftype, \$fid); |
4267
|
0
|
0
|
|
|
|
|
if ($ftype == TType::STOP) { |
4268
|
0
|
|
|
|
|
|
last; |
4269
|
|
|
|
|
|
|
} |
4270
|
0
|
|
|
|
|
|
SWITCH: for($fid) |
4271
|
|
|
|
|
|
|
{ |
4272
|
0
|
0
|
|
|
|
|
/^0$/ && do{ if ($ftype == TType::STRING) { |
|
0
|
0
|
|
|
|
|
|
4273
|
0
|
|
|
|
|
|
$xfer += $input->readString(\$self->{success}); |
4274
|
|
|
|
|
|
|
} else { |
4275
|
0
|
|
|
|
|
|
$xfer += $input->skip($ftype); |
4276
|
|
|
|
|
|
|
} |
4277
|
0
|
|
|
|
|
|
last; }; |
4278
|
0
|
|
|
|
|
|
$xfer += $input->skip($ftype); |
4279
|
|
|
|
|
|
|
} |
4280
|
0
|
|
|
|
|
|
$xfer += $input->readFieldEnd(); |
4281
|
|
|
|
|
|
|
} |
4282
|
0
|
|
|
|
|
|
$xfer += $input->readStructEnd(); |
4283
|
0
|
|
|
|
|
|
return $xfer; |
4284
|
|
|
|
|
|
|
} |
4285
|
|
|
|
|
|
|
|
4286
|
|
|
|
|
|
|
sub write { |
4287
|
0
|
|
|
0
|
|
|
my ($self, $output) = @_; |
4288
|
0
|
|
|
|
|
|
my $xfer = 0; |
4289
|
0
|
|
|
|
|
|
$xfer += $output->writeStructBegin('Cassandra_describe_snitch_result'); |
4290
|
0
|
0
|
|
|
|
|
if (defined $self->{success}) { |
4291
|
0
|
|
|
|
|
|
$xfer += $output->writeFieldBegin('success', TType::STRING, 0); |
4292
|
0
|
|
|
|
|
|
$xfer += $output->writeString($self->{success}); |
4293
|
0
|
|
|
|
|
|
$xfer += $output->writeFieldEnd(); |
4294
|
|
|
|
|
|
|
} |
4295
|
0
|
|
|
|
|
|
$xfer += $output->writeFieldStop(); |
4296
|
0
|
|
|
|
|
|
$xfer += $output->writeStructEnd(); |
4297
|
0
|
|
|
|
|
|
return $xfer; |
4298
|
|
|
|
|
|
|
} |
4299
|
|
|
|
|
|
|
|
4300
|
|
|
|
|
|
|
package Cassandra::Cassandra_describe_keyspace_args; |
4301
|
|
|
|
|
|
|
BEGIN { |
4302
|
1
|
|
|
1
|
|
21
|
$Cassandra::Cassandra_describe_keyspace_args::VERSION = '0.4.0'; |
4303
|
|
|
|
|
|
|
} |
4304
|
1
|
|
|
1
|
|
6
|
use base qw(Class::Accessor); |
|
1
|
|
|
|
|
2
|
|
|
1
|
|
|
|
|
429
|
|
4305
|
|
|
|
|
|
|
Cassandra::Cassandra_describe_keyspace_args->mk_accessors( qw( keyspace ) ); |
4306
|
|
|
|
|
|
|
|
4307
|
|
|
|
|
|
|
sub new { |
4308
|
0
|
|
|
0
|
|
|
my $classname = shift; |
4309
|
0
|
|
|
|
|
|
my $self = {}; |
4310
|
0
|
|
0
|
|
|
|
my $vals = shift || {}; |
4311
|
0
|
|
|
|
|
|
$self->{keyspace} = undef; |
4312
|
0
|
0
|
|
|
|
|
if (UNIVERSAL::isa($vals,'HASH')) { |
4313
|
0
|
0
|
|
|
|
|
if (defined $vals->{keyspace}) { |
4314
|
0
|
|
|
|
|
|
$self->{keyspace} = $vals->{keyspace}; |
4315
|
|
|
|
|
|
|
} |
4316
|
|
|
|
|
|
|
} |
4317
|
0
|
|
|
|
|
|
return bless ($self, $classname); |
4318
|
|
|
|
|
|
|
} |
4319
|
|
|
|
|
|
|
|
4320
|
|
|
|
|
|
|
sub getName { |
4321
|
0
|
|
|
0
|
|
|
return 'Cassandra_describe_keyspace_args'; |
4322
|
|
|
|
|
|
|
} |
4323
|
|
|
|
|
|
|
|
4324
|
|
|
|
|
|
|
sub read { |
4325
|
0
|
|
|
0
|
|
|
my ($self, $input) = @_; |
4326
|
0
|
|
|
|
|
|
my $xfer = 0; |
4327
|
0
|
|
|
|
|
|
my $fname; |
4328
|
0
|
|
|
|
|
|
my $ftype = 0; |
4329
|
0
|
|
|
|
|
|
my $fid = 0; |
4330
|
0
|
|
|
|
|
|
$xfer += $input->readStructBegin(\$fname); |
4331
|
0
|
|
|
|
|
|
while (1) |
4332
|
|
|
|
|
|
|
{ |
4333
|
0
|
|
|
|
|
|
$xfer += $input->readFieldBegin(\$fname, \$ftype, \$fid); |
4334
|
0
|
0
|
|
|
|
|
if ($ftype == TType::STOP) { |
4335
|
0
|
|
|
|
|
|
last; |
4336
|
|
|
|
|
|
|
} |
4337
|
0
|
|
|
|
|
|
SWITCH: for($fid) |
4338
|
|
|
|
|
|
|
{ |
4339
|
0
|
0
|
|
|
|
|
/^1$/ && do{ if ($ftype == TType::STRING) { |
|
0
|
0
|
|
|
|
|
|
4340
|
0
|
|
|
|
|
|
$xfer += $input->readString(\$self->{keyspace}); |
4341
|
|
|
|
|
|
|
} else { |
4342
|
0
|
|
|
|
|
|
$xfer += $input->skip($ftype); |
4343
|
|
|
|
|
|
|
} |
4344
|
0
|
|
|
|
|
|
last; }; |
4345
|
0
|
|
|
|
|
|
$xfer += $input->skip($ftype); |
4346
|
|
|
|
|
|
|
} |
4347
|
0
|
|
|
|
|
|
$xfer += $input->readFieldEnd(); |
4348
|
|
|
|
|
|
|
} |
4349
|
0
|
|
|
|
|
|
$xfer += $input->readStructEnd(); |
4350
|
0
|
|
|
|
|
|
return $xfer; |
4351
|
|
|
|
|
|
|
} |
4352
|
|
|
|
|
|
|
|
4353
|
|
|
|
|
|
|
sub write { |
4354
|
0
|
|
|
0
|
|
|
my ($self, $output) = @_; |
4355
|
0
|
|
|
|
|
|
my $xfer = 0; |
4356
|
0
|
|
|
|
|
|
$xfer += $output->writeStructBegin('Cassandra_describe_keyspace_args'); |
4357
|
0
|
0
|
|
|
|
|
if (defined $self->{keyspace}) { |
4358
|
0
|
|
|
|
|
|
$xfer += $output->writeFieldBegin('keyspace', TType::STRING, 1); |
4359
|
0
|
|
|
|
|
|
$xfer += $output->writeString($self->{keyspace}); |
4360
|
0
|
|
|
|
|
|
$xfer += $output->writeFieldEnd(); |
4361
|
|
|
|
|
|
|
} |
4362
|
0
|
|
|
|
|
|
$xfer += $output->writeFieldStop(); |
4363
|
0
|
|
|
|
|
|
$xfer += $output->writeStructEnd(); |
4364
|
0
|
|
|
|
|
|
return $xfer; |
4365
|
|
|
|
|
|
|
} |
4366
|
|
|
|
|
|
|
|
4367
|
|
|
|
|
|
|
package Cassandra::Cassandra_describe_keyspace_result; |
4368
|
|
|
|
|
|
|
BEGIN { |
4369
|
1
|
|
|
1
|
|
25
|
$Cassandra::Cassandra_describe_keyspace_result::VERSION = '0.4.0'; |
4370
|
|
|
|
|
|
|
} |
4371
|
1
|
|
|
1
|
|
7
|
use base qw(Class::Accessor); |
|
1
|
|
|
|
|
1
|
|
|
1
|
|
|
|
|
703
|
|
4372
|
|
|
|
|
|
|
Cassandra::Cassandra_describe_keyspace_result->mk_accessors( qw( success ) ); |
4373
|
|
|
|
|
|
|
|
4374
|
|
|
|
|
|
|
sub new { |
4375
|
0
|
|
|
0
|
|
|
my $classname = shift; |
4376
|
0
|
|
|
|
|
|
my $self = {}; |
4377
|
0
|
|
0
|
|
|
|
my $vals = shift || {}; |
4378
|
0
|
|
|
|
|
|
$self->{success} = undef; |
4379
|
0
|
|
|
|
|
|
$self->{nfe} = undef; |
4380
|
0
|
|
|
|
|
|
$self->{ire} = undef; |
4381
|
0
|
0
|
|
|
|
|
if (UNIVERSAL::isa($vals,'HASH')) { |
4382
|
0
|
0
|
|
|
|
|
if (defined $vals->{success}) { |
4383
|
0
|
|
|
|
|
|
$self->{success} = $vals->{success}; |
4384
|
|
|
|
|
|
|
} |
4385
|
0
|
0
|
|
|
|
|
if (defined $vals->{nfe}) { |
4386
|
0
|
|
|
|
|
|
$self->{nfe} = $vals->{nfe}; |
4387
|
|
|
|
|
|
|
} |
4388
|
0
|
0
|
|
|
|
|
if (defined $vals->{ire}) { |
4389
|
0
|
|
|
|
|
|
$self->{ire} = $vals->{ire}; |
4390
|
|
|
|
|
|
|
} |
4391
|
|
|
|
|
|
|
} |
4392
|
0
|
|
|
|
|
|
return bless ($self, $classname); |
4393
|
|
|
|
|
|
|
} |
4394
|
|
|
|
|
|
|
|
4395
|
|
|
|
|
|
|
sub getName { |
4396
|
0
|
|
|
0
|
|
|
return 'Cassandra_describe_keyspace_result'; |
4397
|
|
|
|
|
|
|
} |
4398
|
|
|
|
|
|
|
|
4399
|
|
|
|
|
|
|
sub read { |
4400
|
0
|
|
|
0
|
|
|
my ($self, $input) = @_; |
4401
|
0
|
|
|
|
|
|
my $xfer = 0; |
4402
|
0
|
|
|
|
|
|
my $fname; |
4403
|
0
|
|
|
|
|
|
my $ftype = 0; |
4404
|
0
|
|
|
|
|
|
my $fid = 0; |
4405
|
0
|
|
|
|
|
|
$xfer += $input->readStructBegin(\$fname); |
4406
|
0
|
|
|
|
|
|
while (1) |
4407
|
|
|
|
|
|
|
{ |
4408
|
0
|
|
|
|
|
|
$xfer += $input->readFieldBegin(\$fname, \$ftype, \$fid); |
4409
|
0
|
0
|
|
|
|
|
if ($ftype == TType::STOP) { |
4410
|
0
|
|
|
|
|
|
last; |
4411
|
|
|
|
|
|
|
} |
4412
|
0
|
|
|
|
|
|
SWITCH: for($fid) |
4413
|
|
|
|
|
|
|
{ |
4414
|
0
|
0
|
|
|
|
|
/^0$/ && do{ if ($ftype == TType::STRUCT) { |
|
0
|
0
|
|
|
|
|
|
4415
|
0
|
|
|
|
|
|
$self->{success} = new Cassandra::KsDef(); |
4416
|
0
|
|
|
|
|
|
$xfer += $self->{success}->read($input); |
4417
|
|
|
|
|
|
|
} else { |
4418
|
0
|
|
|
|
|
|
$xfer += $input->skip($ftype); |
4419
|
|
|
|
|
|
|
} |
4420
|
0
|
|
|
|
|
|
last; }; |
4421
|
0
|
0
|
|
|
|
|
/^1$/ && do{ if ($ftype == TType::STRUCT) { |
|
0
|
0
|
|
|
|
|
|
4422
|
0
|
|
|
|
|
|
$self->{nfe} = new Cassandra::NotFoundException(); |
4423
|
0
|
|
|
|
|
|
$xfer += $self->{nfe}->read($input); |
4424
|
|
|
|
|
|
|
} else { |
4425
|
0
|
|
|
|
|
|
$xfer += $input->skip($ftype); |
4426
|
|
|
|
|
|
|
} |
4427
|
0
|
|
|
|
|
|
last; }; |
4428
|
0
|
0
|
|
|
|
|
/^2$/ && do{ if ($ftype == TType::STRUCT) { |
|
0
|
0
|
|
|
|
|
|
4429
|
0
|
|
|
|
|
|
$self->{ire} = new Cassandra::InvalidRequestException(); |
4430
|
0
|
|
|
|
|
|
$xfer += $self->{ire}->read($input); |
4431
|
|
|
|
|
|
|
} else { |
4432
|
0
|
|
|
|
|
|
$xfer += $input->skip($ftype); |
4433
|
|
|
|
|
|
|
} |
4434
|
0
|
|
|
|
|
|
last; }; |
4435
|
0
|
|
|
|
|
|
$xfer += $input->skip($ftype); |
4436
|
|
|
|
|
|
|
} |
4437
|
0
|
|
|
|
|
|
$xfer += $input->readFieldEnd(); |
4438
|
|
|
|
|
|
|
} |
4439
|
0
|
|
|
|
|
|
$xfer += $input->readStructEnd(); |
4440
|
0
|
|
|
|
|
|
return $xfer; |
4441
|
|
|
|
|
|
|
} |
4442
|
|
|
|
|
|
|
|
4443
|
|
|
|
|
|
|
sub write { |
4444
|
0
|
|
|
0
|
|
|
my ($self, $output) = @_; |
4445
|
0
|
|
|
|
|
|
my $xfer = 0; |
4446
|
0
|
|
|
|
|
|
$xfer += $output->writeStructBegin('Cassandra_describe_keyspace_result'); |
4447
|
0
|
0
|
|
|
|
|
if (defined $self->{success}) { |
4448
|
0
|
|
|
|
|
|
$xfer += $output->writeFieldBegin('success', TType::STRUCT, 0); |
4449
|
0
|
|
|
|
|
|
$xfer += $self->{success}->write($output); |
4450
|
0
|
|
|
|
|
|
$xfer += $output->writeFieldEnd(); |
4451
|
|
|
|
|
|
|
} |
4452
|
0
|
0
|
|
|
|
|
if (defined $self->{nfe}) { |
4453
|
0
|
|
|
|
|
|
$xfer += $output->writeFieldBegin('nfe', TType::STRUCT, 1); |
4454
|
0
|
|
|
|
|
|
$xfer += $self->{nfe}->write($output); |
4455
|
0
|
|
|
|
|
|
$xfer += $output->writeFieldEnd(); |
4456
|
|
|
|
|
|
|
} |
4457
|
0
|
0
|
|
|
|
|
if (defined $self->{ire}) { |
4458
|
0
|
|
|
|
|
|
$xfer += $output->writeFieldBegin('ire', TType::STRUCT, 2); |
4459
|
0
|
|
|
|
|
|
$xfer += $self->{ire}->write($output); |
4460
|
0
|
|
|
|
|
|
$xfer += $output->writeFieldEnd(); |
4461
|
|
|
|
|
|
|
} |
4462
|
0
|
|
|
|
|
|
$xfer += $output->writeFieldStop(); |
4463
|
0
|
|
|
|
|
|
$xfer += $output->writeStructEnd(); |
4464
|
0
|
|
|
|
|
|
return $xfer; |
4465
|
|
|
|
|
|
|
} |
4466
|
|
|
|
|
|
|
|
4467
|
|
|
|
|
|
|
package Cassandra::Cassandra_describe_splits_args; |
4468
|
|
|
|
|
|
|
BEGIN { |
4469
|
1
|
|
|
1
|
|
20
|
$Cassandra::Cassandra_describe_splits_args::VERSION = '0.4.0'; |
4470
|
|
|
|
|
|
|
} |
4471
|
1
|
|
|
1
|
|
5
|
use base qw(Class::Accessor); |
|
1
|
|
|
|
|
3
|
|
|
1
|
|
|
|
|
753
|
|
4472
|
|
|
|
|
|
|
Cassandra::Cassandra_describe_splits_args->mk_accessors( qw( cfName start_token end_token keys_per_split ) ); |
4473
|
|
|
|
|
|
|
|
4474
|
|
|
|
|
|
|
sub new { |
4475
|
0
|
|
|
0
|
|
|
my $classname = shift; |
4476
|
0
|
|
|
|
|
|
my $self = {}; |
4477
|
0
|
|
0
|
|
|
|
my $vals = shift || {}; |
4478
|
0
|
|
|
|
|
|
$self->{cfName} = undef; |
4479
|
0
|
|
|
|
|
|
$self->{start_token} = undef; |
4480
|
0
|
|
|
|
|
|
$self->{end_token} = undef; |
4481
|
0
|
|
|
|
|
|
$self->{keys_per_split} = undef; |
4482
|
0
|
0
|
|
|
|
|
if (UNIVERSAL::isa($vals,'HASH')) { |
4483
|
0
|
0
|
|
|
|
|
if (defined $vals->{cfName}) { |
4484
|
0
|
|
|
|
|
|
$self->{cfName} = $vals->{cfName}; |
4485
|
|
|
|
|
|
|
} |
4486
|
0
|
0
|
|
|
|
|
if (defined $vals->{start_token}) { |
4487
|
0
|
|
|
|
|
|
$self->{start_token} = $vals->{start_token}; |
4488
|
|
|
|
|
|
|
} |
4489
|
0
|
0
|
|
|
|
|
if (defined $vals->{end_token}) { |
4490
|
0
|
|
|
|
|
|
$self->{end_token} = $vals->{end_token}; |
4491
|
|
|
|
|
|
|
} |
4492
|
0
|
0
|
|
|
|
|
if (defined $vals->{keys_per_split}) { |
4493
|
0
|
|
|
|
|
|
$self->{keys_per_split} = $vals->{keys_per_split}; |
4494
|
|
|
|
|
|
|
} |
4495
|
|
|
|
|
|
|
} |
4496
|
0
|
|
|
|
|
|
return bless ($self, $classname); |
4497
|
|
|
|
|
|
|
} |
4498
|
|
|
|
|
|
|
|
4499
|
|
|
|
|
|
|
sub getName { |
4500
|
0
|
|
|
0
|
|
|
return 'Cassandra_describe_splits_args'; |
4501
|
|
|
|
|
|
|
} |
4502
|
|
|
|
|
|
|
|
4503
|
|
|
|
|
|
|
sub read { |
4504
|
0
|
|
|
0
|
|
|
my ($self, $input) = @_; |
4505
|
0
|
|
|
|
|
|
my $xfer = 0; |
4506
|
0
|
|
|
|
|
|
my $fname; |
4507
|
0
|
|
|
|
|
|
my $ftype = 0; |
4508
|
0
|
|
|
|
|
|
my $fid = 0; |
4509
|
0
|
|
|
|
|
|
$xfer += $input->readStructBegin(\$fname); |
4510
|
0
|
|
|
|
|
|
while (1) |
4511
|
|
|
|
|
|
|
{ |
4512
|
0
|
|
|
|
|
|
$xfer += $input->readFieldBegin(\$fname, \$ftype, \$fid); |
4513
|
0
|
0
|
|
|
|
|
if ($ftype == TType::STOP) { |
4514
|
0
|
|
|
|
|
|
last; |
4515
|
|
|
|
|
|
|
} |
4516
|
0
|
|
|
|
|
|
SWITCH: for($fid) |
4517
|
|
|
|
|
|
|
{ |
4518
|
0
|
0
|
|
|
|
|
/^1$/ && do{ if ($ftype == TType::STRING) { |
|
0
|
0
|
|
|
|
|
|
4519
|
0
|
|
|
|
|
|
$xfer += $input->readString(\$self->{cfName}); |
4520
|
|
|
|
|
|
|
} else { |
4521
|
0
|
|
|
|
|
|
$xfer += $input->skip($ftype); |
4522
|
|
|
|
|
|
|
} |
4523
|
0
|
|
|
|
|
|
last; }; |
4524
|
0
|
0
|
|
|
|
|
/^2$/ && do{ if ($ftype == TType::STRING) { |
|
0
|
0
|
|
|
|
|
|
4525
|
0
|
|
|
|
|
|
$xfer += $input->readString(\$self->{start_token}); |
4526
|
|
|
|
|
|
|
} else { |
4527
|
0
|
|
|
|
|
|
$xfer += $input->skip($ftype); |
4528
|
|
|
|
|
|
|
} |
4529
|
0
|
|
|
|
|
|
last; }; |
4530
|
0
|
0
|
|
|
|
|
/^3$/ && do{ if ($ftype == TType::STRING) { |
|
0
|
0
|
|
|
|
|
|
4531
|
0
|
|
|
|
|
|
$xfer += $input->readString(\$self->{end_token}); |
4532
|
|
|
|
|
|
|
} else { |
4533
|
0
|
|
|
|
|
|
$xfer += $input->skip($ftype); |
4534
|
|
|
|
|
|
|
} |
4535
|
0
|
|
|
|
|
|
last; }; |
4536
|
0
|
0
|
|
|
|
|
/^4$/ && do{ if ($ftype == TType::I32) { |
|
0
|
0
|
|
|
|
|
|
4537
|
0
|
|
|
|
|
|
$xfer += $input->readI32(\$self->{keys_per_split}); |
4538
|
|
|
|
|
|
|
} else { |
4539
|
0
|
|
|
|
|
|
$xfer += $input->skip($ftype); |
4540
|
|
|
|
|
|
|
} |
4541
|
0
|
|
|
|
|
|
last; }; |
4542
|
0
|
|
|
|
|
|
$xfer += $input->skip($ftype); |
4543
|
|
|
|
|
|
|
} |
4544
|
0
|
|
|
|
|
|
$xfer += $input->readFieldEnd(); |
4545
|
|
|
|
|
|
|
} |
4546
|
0
|
|
|
|
|
|
$xfer += $input->readStructEnd(); |
4547
|
0
|
|
|
|
|
|
return $xfer; |
4548
|
|
|
|
|
|
|
} |
4549
|
|
|
|
|
|
|
|
4550
|
|
|
|
|
|
|
sub write { |
4551
|
0
|
|
|
0
|
|
|
my ($self, $output) = @_; |
4552
|
0
|
|
|
|
|
|
my $xfer = 0; |
4553
|
0
|
|
|
|
|
|
$xfer += $output->writeStructBegin('Cassandra_describe_splits_args'); |
4554
|
0
|
0
|
|
|
|
|
if (defined $self->{cfName}) { |
4555
|
0
|
|
|
|
|
|
$xfer += $output->writeFieldBegin('cfName', TType::STRING, 1); |
4556
|
0
|
|
|
|
|
|
$xfer += $output->writeString($self->{cfName}); |
4557
|
0
|
|
|
|
|
|
$xfer += $output->writeFieldEnd(); |
4558
|
|
|
|
|
|
|
} |
4559
|
0
|
0
|
|
|
|
|
if (defined $self->{start_token}) { |
4560
|
0
|
|
|
|
|
|
$xfer += $output->writeFieldBegin('start_token', TType::STRING, 2); |
4561
|
0
|
|
|
|
|
|
$xfer += $output->writeString($self->{start_token}); |
4562
|
0
|
|
|
|
|
|
$xfer += $output->writeFieldEnd(); |
4563
|
|
|
|
|
|
|
} |
4564
|
0
|
0
|
|
|
|
|
if (defined $self->{end_token}) { |
4565
|
0
|
|
|
|
|
|
$xfer += $output->writeFieldBegin('end_token', TType::STRING, 3); |
4566
|
0
|
|
|
|
|
|
$xfer += $output->writeString($self->{end_token}); |
4567
|
0
|
|
|
|
|
|
$xfer += $output->writeFieldEnd(); |
4568
|
|
|
|
|
|
|
} |
4569
|
0
|
0
|
|
|
|
|
if (defined $self->{keys_per_split}) { |
4570
|
0
|
|
|
|
|
|
$xfer += $output->writeFieldBegin('keys_per_split', TType::I32, 4); |
4571
|
0
|
|
|
|
|
|
$xfer += $output->writeI32($self->{keys_per_split}); |
4572
|
0
|
|
|
|
|
|
$xfer += $output->writeFieldEnd(); |
4573
|
|
|
|
|
|
|
} |
4574
|
0
|
|
|
|
|
|
$xfer += $output->writeFieldStop(); |
4575
|
0
|
|
|
|
|
|
$xfer += $output->writeStructEnd(); |
4576
|
0
|
|
|
|
|
|
return $xfer; |
4577
|
|
|
|
|
|
|
} |
4578
|
|
|
|
|
|
|
|
4579
|
|
|
|
|
|
|
package Cassandra::Cassandra_describe_splits_result; |
4580
|
|
|
|
|
|
|
BEGIN { |
4581
|
1
|
|
|
1
|
|
17
|
$Cassandra::Cassandra_describe_splits_result::VERSION = '0.4.0'; |
4582
|
|
|
|
|
|
|
} |
4583
|
1
|
|
|
1
|
|
7
|
use base qw(Class::Accessor); |
|
1
|
|
|
|
|
1
|
|
|
1
|
|
|
|
|
680
|
|
4584
|
|
|
|
|
|
|
Cassandra::Cassandra_describe_splits_result->mk_accessors( qw( success ) ); |
4585
|
|
|
|
|
|
|
|
4586
|
|
|
|
|
|
|
sub new { |
4587
|
0
|
|
|
0
|
|
|
my $classname = shift; |
4588
|
0
|
|
|
|
|
|
my $self = {}; |
4589
|
0
|
|
0
|
|
|
|
my $vals = shift || {}; |
4590
|
0
|
|
|
|
|
|
$self->{success} = undef; |
4591
|
0
|
|
|
|
|
|
$self->{ire} = undef; |
4592
|
0
|
0
|
|
|
|
|
if (UNIVERSAL::isa($vals,'HASH')) { |
4593
|
0
|
0
|
|
|
|
|
if (defined $vals->{success}) { |
4594
|
0
|
|
|
|
|
|
$self->{success} = $vals->{success}; |
4595
|
|
|
|
|
|
|
} |
4596
|
0
|
0
|
|
|
|
|
if (defined $vals->{ire}) { |
4597
|
0
|
|
|
|
|
|
$self->{ire} = $vals->{ire}; |
4598
|
|
|
|
|
|
|
} |
4599
|
|
|
|
|
|
|
} |
4600
|
0
|
|
|
|
|
|
return bless ($self, $classname); |
4601
|
|
|
|
|
|
|
} |
4602
|
|
|
|
|
|
|
|
4603
|
|
|
|
|
|
|
sub getName { |
4604
|
0
|
|
|
0
|
|
|
return 'Cassandra_describe_splits_result'; |
4605
|
|
|
|
|
|
|
} |
4606
|
|
|
|
|
|
|
|
4607
|
|
|
|
|
|
|
sub read { |
4608
|
0
|
|
|
0
|
|
|
my ($self, $input) = @_; |
4609
|
0
|
|
|
|
|
|
my $xfer = 0; |
4610
|
0
|
|
|
|
|
|
my $fname; |
4611
|
0
|
|
|
|
|
|
my $ftype = 0; |
4612
|
0
|
|
|
|
|
|
my $fid = 0; |
4613
|
0
|
|
|
|
|
|
$xfer += $input->readStructBegin(\$fname); |
4614
|
0
|
|
|
|
|
|
while (1) |
4615
|
|
|
|
|
|
|
{ |
4616
|
0
|
|
|
|
|
|
$xfer += $input->readFieldBegin(\$fname, \$ftype, \$fid); |
4617
|
0
|
0
|
|
|
|
|
if ($ftype == TType::STOP) { |
4618
|
0
|
|
|
|
|
|
last; |
4619
|
|
|
|
|
|
|
} |
4620
|
0
|
|
|
|
|
|
SWITCH: for($fid) |
4621
|
|
|
|
|
|
|
{ |
4622
|
0
|
0
|
|
|
|
|
/^0$/ && do{ if ($ftype == TType::LIST) { |
|
0
|
0
|
|
|
|
|
|
4623
|
|
|
|
|
|
|
{ |
4624
|
0
|
|
|
|
|
|
my $_size203 = 0; |
|
0
|
|
|
|
|
|
|
4625
|
0
|
|
|
|
|
|
$self->{success} = []; |
4626
|
0
|
|
|
|
|
|
my $_etype206 = 0; |
4627
|
0
|
|
|
|
|
|
$xfer += $input->readListBegin(\$_etype206, \$_size203); |
4628
|
0
|
|
|
|
|
|
for (my $_i207 = 0; $_i207 < $_size203; ++$_i207) |
4629
|
|
|
|
|
|
|
{ |
4630
|
0
|
|
|
|
|
|
my $elem208 = undef; |
4631
|
0
|
|
|
|
|
|
$xfer += $input->readString(\$elem208); |
4632
|
0
|
|
|
|
|
|
push(@{$self->{success}},$elem208); |
|
0
|
|
|
|
|
|
|
4633
|
|
|
|
|
|
|
} |
4634
|
0
|
|
|
|
|
|
$xfer += $input->readListEnd(); |
4635
|
|
|
|
|
|
|
} |
4636
|
|
|
|
|
|
|
} else { |
4637
|
0
|
|
|
|
|
|
$xfer += $input->skip($ftype); |
4638
|
|
|
|
|
|
|
} |
4639
|
0
|
|
|
|
|
|
last; }; |
4640
|
0
|
0
|
|
|
|
|
/^1$/ && do{ if ($ftype == TType::STRUCT) { |
|
0
|
0
|
|
|
|
|
|
4641
|
0
|
|
|
|
|
|
$self->{ire} = new Cassandra::InvalidRequestException(); |
4642
|
0
|
|
|
|
|
|
$xfer += $self->{ire}->read($input); |
4643
|
|
|
|
|
|
|
} else { |
4644
|
0
|
|
|
|
|
|
$xfer += $input->skip($ftype); |
4645
|
|
|
|
|
|
|
} |
4646
|
0
|
|
|
|
|
|
last; }; |
4647
|
0
|
|
|
|
|
|
$xfer += $input->skip($ftype); |
4648
|
|
|
|
|
|
|
} |
4649
|
0
|
|
|
|
|
|
$xfer += $input->readFieldEnd(); |
4650
|
|
|
|
|
|
|
} |
4651
|
0
|
|
|
|
|
|
$xfer += $input->readStructEnd(); |
4652
|
0
|
|
|
|
|
|
return $xfer; |
4653
|
|
|
|
|
|
|
} |
4654
|
|
|
|
|
|
|
|
4655
|
|
|
|
|
|
|
sub write { |
4656
|
0
|
|
|
0
|
|
|
my ($self, $output) = @_; |
4657
|
0
|
|
|
|
|
|
my $xfer = 0; |
4658
|
0
|
|
|
|
|
|
$xfer += $output->writeStructBegin('Cassandra_describe_splits_result'); |
4659
|
0
|
0
|
|
|
|
|
if (defined $self->{success}) { |
4660
|
0
|
|
|
|
|
|
$xfer += $output->writeFieldBegin('success', TType::LIST, 0); |
4661
|
|
|
|
|
|
|
{ |
4662
|
0
|
|
|
|
|
|
$xfer += $output->writeListBegin(TType::STRING, scalar(@{$self->{success}})); |
|
0
|
|
|
|
|
|
|
|
0
|
|
|
|
|
|
|
4663
|
|
|
|
|
|
|
{ |
4664
|
0
|
|
|
|
|
|
foreach my $iter209 (@{$self->{success}}) |
|
0
|
|
|
|
|
|
|
|
0
|
|
|
|
|
|
|
4665
|
|
|
|
|
|
|
{ |
4666
|
0
|
|
|
|
|
|
$xfer += $output->writeString($iter209); |
4667
|
|
|
|
|
|
|
} |
4668
|
|
|
|
|
|
|
} |
4669
|
0
|
|
|
|
|
|
$xfer += $output->writeListEnd(); |
4670
|
|
|
|
|
|
|
} |
4671
|
0
|
|
|
|
|
|
$xfer += $output->writeFieldEnd(); |
4672
|
|
|
|
|
|
|
} |
4673
|
0
|
0
|
|
|
|
|
if (defined $self->{ire}) { |
4674
|
0
|
|
|
|
|
|
$xfer += $output->writeFieldBegin('ire', TType::STRUCT, 1); |
4675
|
0
|
|
|
|
|
|
$xfer += $self->{ire}->write($output); |
4676
|
0
|
|
|
|
|
|
$xfer += $output->writeFieldEnd(); |
4677
|
|
|
|
|
|
|
} |
4678
|
0
|
|
|
|
|
|
$xfer += $output->writeFieldStop(); |
4679
|
0
|
|
|
|
|
|
$xfer += $output->writeStructEnd(); |
4680
|
0
|
|
|
|
|
|
return $xfer; |
4681
|
|
|
|
|
|
|
} |
4682
|
|
|
|
|
|
|
|
4683
|
|
|
|
|
|
|
package Cassandra::Cassandra_system_add_column_family_args; |
4684
|
|
|
|
|
|
|
BEGIN { |
4685
|
1
|
|
|
1
|
|
19
|
$Cassandra::Cassandra_system_add_column_family_args::VERSION = '0.4.0'; |
4686
|
|
|
|
|
|
|
} |
4687
|
1
|
|
|
1
|
|
5
|
use base qw(Class::Accessor); |
|
1
|
|
|
|
|
4
|
|
|
1
|
|
|
|
|
492
|
|
4688
|
|
|
|
|
|
|
Cassandra::Cassandra_system_add_column_family_args->mk_accessors( qw( cf_def ) ); |
4689
|
|
|
|
|
|
|
|
4690
|
|
|
|
|
|
|
sub new { |
4691
|
0
|
|
|
0
|
|
|
my $classname = shift; |
4692
|
0
|
|
|
|
|
|
my $self = {}; |
4693
|
0
|
|
0
|
|
|
|
my $vals = shift || {}; |
4694
|
0
|
|
|
|
|
|
$self->{cf_def} = undef; |
4695
|
0
|
0
|
|
|
|
|
if (UNIVERSAL::isa($vals,'HASH')) { |
4696
|
0
|
0
|
|
|
|
|
if (defined $vals->{cf_def}) { |
4697
|
0
|
|
|
|
|
|
$self->{cf_def} = $vals->{cf_def}; |
4698
|
|
|
|
|
|
|
} |
4699
|
|
|
|
|
|
|
} |
4700
|
0
|
|
|
|
|
|
return bless ($self, $classname); |
4701
|
|
|
|
|
|
|
} |
4702
|
|
|
|
|
|
|
|
4703
|
|
|
|
|
|
|
sub getName { |
4704
|
0
|
|
|
0
|
|
|
return 'Cassandra_system_add_column_family_args'; |
4705
|
|
|
|
|
|
|
} |
4706
|
|
|
|
|
|
|
|
4707
|
|
|
|
|
|
|
sub read { |
4708
|
0
|
|
|
0
|
|
|
my ($self, $input) = @_; |
4709
|
0
|
|
|
|
|
|
my $xfer = 0; |
4710
|
0
|
|
|
|
|
|
my $fname; |
4711
|
0
|
|
|
|
|
|
my $ftype = 0; |
4712
|
0
|
|
|
|
|
|
my $fid = 0; |
4713
|
0
|
|
|
|
|
|
$xfer += $input->readStructBegin(\$fname); |
4714
|
0
|
|
|
|
|
|
while (1) |
4715
|
|
|
|
|
|
|
{ |
4716
|
0
|
|
|
|
|
|
$xfer += $input->readFieldBegin(\$fname, \$ftype, \$fid); |
4717
|
0
|
0
|
|
|
|
|
if ($ftype == TType::STOP) { |
4718
|
0
|
|
|
|
|
|
last; |
4719
|
|
|
|
|
|
|
} |
4720
|
0
|
|
|
|
|
|
SWITCH: for($fid) |
4721
|
|
|
|
|
|
|
{ |
4722
|
0
|
0
|
|
|
|
|
/^1$/ && do{ if ($ftype == TType::STRUCT) { |
|
0
|
0
|
|
|
|
|
|
4723
|
0
|
|
|
|
|
|
$self->{cf_def} = new Cassandra::CfDef(); |
4724
|
0
|
|
|
|
|
|
$xfer += $self->{cf_def}->read($input); |
4725
|
|
|
|
|
|
|
} else { |
4726
|
0
|
|
|
|
|
|
$xfer += $input->skip($ftype); |
4727
|
|
|
|
|
|
|
} |
4728
|
0
|
|
|
|
|
|
last; }; |
4729
|
0
|
|
|
|
|
|
$xfer += $input->skip($ftype); |
4730
|
|
|
|
|
|
|
} |
4731
|
0
|
|
|
|
|
|
$xfer += $input->readFieldEnd(); |
4732
|
|
|
|
|
|
|
} |
4733
|
0
|
|
|
|
|
|
$xfer += $input->readStructEnd(); |
4734
|
0
|
|
|
|
|
|
return $xfer; |
4735
|
|
|
|
|
|
|
} |
4736
|
|
|
|
|
|
|
|
4737
|
|
|
|
|
|
|
sub write { |
4738
|
0
|
|
|
0
|
|
|
my ($self, $output) = @_; |
4739
|
0
|
|
|
|
|
|
my $xfer = 0; |
4740
|
0
|
|
|
|
|
|
$xfer += $output->writeStructBegin('Cassandra_system_add_column_family_args'); |
4741
|
0
|
0
|
|
|
|
|
if (defined $self->{cf_def}) { |
4742
|
0
|
|
|
|
|
|
$xfer += $output->writeFieldBegin('cf_def', TType::STRUCT, 1); |
4743
|
0
|
|
|
|
|
|
$xfer += $self->{cf_def}->write($output); |
4744
|
0
|
|
|
|
|
|
$xfer += $output->writeFieldEnd(); |
4745
|
|
|
|
|
|
|
} |
4746
|
0
|
|
|
|
|
|
$xfer += $output->writeFieldStop(); |
4747
|
0
|
|
|
|
|
|
$xfer += $output->writeStructEnd(); |
4748
|
0
|
|
|
|
|
|
return $xfer; |
4749
|
|
|
|
|
|
|
} |
4750
|
|
|
|
|
|
|
|
4751
|
|
|
|
|
|
|
package Cassandra::Cassandra_system_add_column_family_result; |
4752
|
|
|
|
|
|
|
BEGIN { |
4753
|
1
|
|
|
1
|
|
19
|
$Cassandra::Cassandra_system_add_column_family_result::VERSION = '0.4.0'; |
4754
|
|
|
|
|
|
|
} |
4755
|
1
|
|
|
1
|
|
6
|
use base qw(Class::Accessor); |
|
1
|
|
|
|
|
1
|
|
|
1
|
|
|
|
|
742
|
|
4756
|
|
|
|
|
|
|
Cassandra::Cassandra_system_add_column_family_result->mk_accessors( qw( success ) ); |
4757
|
|
|
|
|
|
|
|
4758
|
|
|
|
|
|
|
sub new { |
4759
|
0
|
|
|
0
|
|
|
my $classname = shift; |
4760
|
0
|
|
|
|
|
|
my $self = {}; |
4761
|
0
|
|
0
|
|
|
|
my $vals = shift || {}; |
4762
|
0
|
|
|
|
|
|
$self->{success} = undef; |
4763
|
0
|
|
|
|
|
|
$self->{ire} = undef; |
4764
|
0
|
|
|
|
|
|
$self->{sde} = undef; |
4765
|
0
|
0
|
|
|
|
|
if (UNIVERSAL::isa($vals,'HASH')) { |
4766
|
0
|
0
|
|
|
|
|
if (defined $vals->{success}) { |
4767
|
0
|
|
|
|
|
|
$self->{success} = $vals->{success}; |
4768
|
|
|
|
|
|
|
} |
4769
|
0
|
0
|
|
|
|
|
if (defined $vals->{ire}) { |
4770
|
0
|
|
|
|
|
|
$self->{ire} = $vals->{ire}; |
4771
|
|
|
|
|
|
|
} |
4772
|
0
|
0
|
|
|
|
|
if (defined $vals->{sde}) { |
4773
|
0
|
|
|
|
|
|
$self->{sde} = $vals->{sde}; |
4774
|
|
|
|
|
|
|
} |
4775
|
|
|
|
|
|
|
} |
4776
|
0
|
|
|
|
|
|
return bless ($self, $classname); |
4777
|
|
|
|
|
|
|
} |
4778
|
|
|
|
|
|
|
|
4779
|
|
|
|
|
|
|
sub getName { |
4780
|
0
|
|
|
0
|
|
|
return 'Cassandra_system_add_column_family_result'; |
4781
|
|
|
|
|
|
|
} |
4782
|
|
|
|
|
|
|
|
4783
|
|
|
|
|
|
|
sub read { |
4784
|
0
|
|
|
0
|
|
|
my ($self, $input) = @_; |
4785
|
0
|
|
|
|
|
|
my $xfer = 0; |
4786
|
0
|
|
|
|
|
|
my $fname; |
4787
|
0
|
|
|
|
|
|
my $ftype = 0; |
4788
|
0
|
|
|
|
|
|
my $fid = 0; |
4789
|
0
|
|
|
|
|
|
$xfer += $input->readStructBegin(\$fname); |
4790
|
0
|
|
|
|
|
|
while (1) |
4791
|
|
|
|
|
|
|
{ |
4792
|
0
|
|
|
|
|
|
$xfer += $input->readFieldBegin(\$fname, \$ftype, \$fid); |
4793
|
0
|
0
|
|
|
|
|
if ($ftype == TType::STOP) { |
4794
|
0
|
|
|
|
|
|
last; |
4795
|
|
|
|
|
|
|
} |
4796
|
0
|
|
|
|
|
|
SWITCH: for($fid) |
4797
|
|
|
|
|
|
|
{ |
4798
|
0
|
0
|
|
|
|
|
/^0$/ && do{ if ($ftype == TType::STRING) { |
|
0
|
0
|
|
|
|
|
|
4799
|
0
|
|
|
|
|
|
$xfer += $input->readString(\$self->{success}); |
4800
|
|
|
|
|
|
|
} else { |
4801
|
0
|
|
|
|
|
|
$xfer += $input->skip($ftype); |
4802
|
|
|
|
|
|
|
} |
4803
|
0
|
|
|
|
|
|
last; }; |
4804
|
0
|
0
|
|
|
|
|
/^1$/ && do{ if ($ftype == TType::STRUCT) { |
|
0
|
0
|
|
|
|
|
|
4805
|
0
|
|
|
|
|
|
$self->{ire} = new Cassandra::InvalidRequestException(); |
4806
|
0
|
|
|
|
|
|
$xfer += $self->{ire}->read($input); |
4807
|
|
|
|
|
|
|
} else { |
4808
|
0
|
|
|
|
|
|
$xfer += $input->skip($ftype); |
4809
|
|
|
|
|
|
|
} |
4810
|
0
|
|
|
|
|
|
last; }; |
4811
|
0
|
0
|
|
|
|
|
/^2$/ && do{ if ($ftype == TType::STRUCT) { |
|
0
|
0
|
|
|
|
|
|
4812
|
0
|
|
|
|
|
|
$self->{sde} = new Cassandra::SchemaDisagreementException(); |
4813
|
0
|
|
|
|
|
|
$xfer += $self->{sde}->read($input); |
4814
|
|
|
|
|
|
|
} else { |
4815
|
0
|
|
|
|
|
|
$xfer += $input->skip($ftype); |
4816
|
|
|
|
|
|
|
} |
4817
|
0
|
|
|
|
|
|
last; }; |
4818
|
0
|
|
|
|
|
|
$xfer += $input->skip($ftype); |
4819
|
|
|
|
|
|
|
} |
4820
|
0
|
|
|
|
|
|
$xfer += $input->readFieldEnd(); |
4821
|
|
|
|
|
|
|
} |
4822
|
0
|
|
|
|
|
|
$xfer += $input->readStructEnd(); |
4823
|
0
|
|
|
|
|
|
return $xfer; |
4824
|
|
|
|
|
|
|
} |
4825
|
|
|
|
|
|
|
|
4826
|
|
|
|
|
|
|
sub write { |
4827
|
0
|
|
|
0
|
|
|
my ($self, $output) = @_; |
4828
|
0
|
|
|
|
|
|
my $xfer = 0; |
4829
|
0
|
|
|
|
|
|
$xfer += $output->writeStructBegin('Cassandra_system_add_column_family_result'); |
4830
|
0
|
0
|
|
|
|
|
if (defined $self->{success}) { |
4831
|
0
|
|
|
|
|
|
$xfer += $output->writeFieldBegin('success', TType::STRING, 0); |
4832
|
0
|
|
|
|
|
|
$xfer += $output->writeString($self->{success}); |
4833
|
0
|
|
|
|
|
|
$xfer += $output->writeFieldEnd(); |
4834
|
|
|
|
|
|
|
} |
4835
|
0
|
0
|
|
|
|
|
if (defined $self->{ire}) { |
4836
|
0
|
|
|
|
|
|
$xfer += $output->writeFieldBegin('ire', TType::STRUCT, 1); |
4837
|
0
|
|
|
|
|
|
$xfer += $self->{ire}->write($output); |
4838
|
0
|
|
|
|
|
|
$xfer += $output->writeFieldEnd(); |
4839
|
|
|
|
|
|
|
} |
4840
|
0
|
0
|
|
|
|
|
if (defined $self->{sde}) { |
4841
|
0
|
|
|
|
|
|
$xfer += $output->writeFieldBegin('sde', TType::STRUCT, 2); |
4842
|
0
|
|
|
|
|
|
$xfer += $self->{sde}->write($output); |
4843
|
0
|
|
|
|
|
|
$xfer += $output->writeFieldEnd(); |
4844
|
|
|
|
|
|
|
} |
4845
|
0
|
|
|
|
|
|
$xfer += $output->writeFieldStop(); |
4846
|
0
|
|
|
|
|
|
$xfer += $output->writeStructEnd(); |
4847
|
0
|
|
|
|
|
|
return $xfer; |
4848
|
|
|
|
|
|
|
} |
4849
|
|
|
|
|
|
|
|
4850
|
|
|
|
|
|
|
package Cassandra::Cassandra_system_drop_column_family_args; |
4851
|
|
|
|
|
|
|
BEGIN { |
4852
|
1
|
|
|
1
|
|
28
|
$Cassandra::Cassandra_system_drop_column_family_args::VERSION = '0.4.0'; |
4853
|
|
|
|
|
|
|
} |
4854
|
1
|
|
|
1
|
|
6
|
use base qw(Class::Accessor); |
|
1
|
|
|
|
|
2
|
|
|
1
|
|
|
|
|
442
|
|
4855
|
|
|
|
|
|
|
Cassandra::Cassandra_system_drop_column_family_args->mk_accessors( qw( column_family ) ); |
4856
|
|
|
|
|
|
|
|
4857
|
|
|
|
|
|
|
sub new { |
4858
|
0
|
|
|
0
|
|
|
my $classname = shift; |
4859
|
0
|
|
|
|
|
|
my $self = {}; |
4860
|
0
|
|
0
|
|
|
|
my $vals = shift || {}; |
4861
|
0
|
|
|
|
|
|
$self->{column_family} = undef; |
4862
|
0
|
0
|
|
|
|
|
if (UNIVERSAL::isa($vals,'HASH')) { |
4863
|
0
|
0
|
|
|
|
|
if (defined $vals->{column_family}) { |
4864
|
0
|
|
|
|
|
|
$self->{column_family} = $vals->{column_family}; |
4865
|
|
|
|
|
|
|
} |
4866
|
|
|
|
|
|
|
} |
4867
|
0
|
|
|
|
|
|
return bless ($self, $classname); |
4868
|
|
|
|
|
|
|
} |
4869
|
|
|
|
|
|
|
|
4870
|
|
|
|
|
|
|
sub getName { |
4871
|
0
|
|
|
0
|
|
|
return 'Cassandra_system_drop_column_family_args'; |
4872
|
|
|
|
|
|
|
} |
4873
|
|
|
|
|
|
|
|
4874
|
|
|
|
|
|
|
sub read { |
4875
|
0
|
|
|
0
|
|
|
my ($self, $input) = @_; |
4876
|
0
|
|
|
|
|
|
my $xfer = 0; |
4877
|
0
|
|
|
|
|
|
my $fname; |
4878
|
0
|
|
|
|
|
|
my $ftype = 0; |
4879
|
0
|
|
|
|
|
|
my $fid = 0; |
4880
|
0
|
|
|
|
|
|
$xfer += $input->readStructBegin(\$fname); |
4881
|
0
|
|
|
|
|
|
while (1) |
4882
|
|
|
|
|
|
|
{ |
4883
|
0
|
|
|
|
|
|
$xfer += $input->readFieldBegin(\$fname, \$ftype, \$fid); |
4884
|
0
|
0
|
|
|
|
|
if ($ftype == TType::STOP) { |
4885
|
0
|
|
|
|
|
|
last; |
4886
|
|
|
|
|
|
|
} |
4887
|
0
|
|
|
|
|
|
SWITCH: for($fid) |
4888
|
|
|
|
|
|
|
{ |
4889
|
0
|
0
|
|
|
|
|
/^1$/ && do{ if ($ftype == TType::STRING) { |
|
0
|
0
|
|
|
|
|
|
4890
|
0
|
|
|
|
|
|
$xfer += $input->readString(\$self->{column_family}); |
4891
|
|
|
|
|
|
|
} else { |
4892
|
0
|
|
|
|
|
|
$xfer += $input->skip($ftype); |
4893
|
|
|
|
|
|
|
} |
4894
|
0
|
|
|
|
|
|
last; }; |
4895
|
0
|
|
|
|
|
|
$xfer += $input->skip($ftype); |
4896
|
|
|
|
|
|
|
} |
4897
|
0
|
|
|
|
|
|
$xfer += $input->readFieldEnd(); |
4898
|
|
|
|
|
|
|
} |
4899
|
0
|
|
|
|
|
|
$xfer += $input->readStructEnd(); |
4900
|
0
|
|
|
|
|
|
return $xfer; |
4901
|
|
|
|
|
|
|
} |
4902
|
|
|
|
|
|
|
|
4903
|
|
|
|
|
|
|
sub write { |
4904
|
0
|
|
|
0
|
|
|
my ($self, $output) = @_; |
4905
|
0
|
|
|
|
|
|
my $xfer = 0; |
4906
|
0
|
|
|
|
|
|
$xfer += $output->writeStructBegin('Cassandra_system_drop_column_family_args'); |
4907
|
0
|
0
|
|
|
|
|
if (defined $self->{column_family}) { |
4908
|
0
|
|
|
|
|
|
$xfer += $output->writeFieldBegin('column_family', TType::STRING, 1); |
4909
|
0
|
|
|
|
|
|
$xfer += $output->writeString($self->{column_family}); |
4910
|
0
|
|
|
|
|
|
$xfer += $output->writeFieldEnd(); |
4911
|
|
|
|
|
|
|
} |
4912
|
0
|
|
|
|
|
|
$xfer += $output->writeFieldStop(); |
4913
|
0
|
|
|
|
|
|
$xfer += $output->writeStructEnd(); |
4914
|
0
|
|
|
|
|
|
return $xfer; |
4915
|
|
|
|
|
|
|
} |
4916
|
|
|
|
|
|
|
|
4917
|
|
|
|
|
|
|
package Cassandra::Cassandra_system_drop_column_family_result; |
4918
|
|
|
|
|
|
|
BEGIN { |
4919
|
1
|
|
|
1
|
|
20
|
$Cassandra::Cassandra_system_drop_column_family_result::VERSION = '0.4.0'; |
4920
|
|
|
|
|
|
|
} |
4921
|
1
|
|
|
1
|
|
5
|
use base qw(Class::Accessor); |
|
1
|
|
|
|
|
2
|
|
|
1
|
|
|
|
|
696
|
|
4922
|
|
|
|
|
|
|
Cassandra::Cassandra_system_drop_column_family_result->mk_accessors( qw( success ) ); |
4923
|
|
|
|
|
|
|
|
4924
|
|
|
|
|
|
|
sub new { |
4925
|
0
|
|
|
0
|
|
|
my $classname = shift; |
4926
|
0
|
|
|
|
|
|
my $self = {}; |
4927
|
0
|
|
0
|
|
|
|
my $vals = shift || {}; |
4928
|
0
|
|
|
|
|
|
$self->{success} = undef; |
4929
|
0
|
|
|
|
|
|
$self->{ire} = undef; |
4930
|
0
|
|
|
|
|
|
$self->{sde} = undef; |
4931
|
0
|
0
|
|
|
|
|
if (UNIVERSAL::isa($vals,'HASH')) { |
4932
|
0
|
0
|
|
|
|
|
if (defined $vals->{success}) { |
4933
|
0
|
|
|
|
|
|
$self->{success} = $vals->{success}; |
4934
|
|
|
|
|
|
|
} |
4935
|
0
|
0
|
|
|
|
|
if (defined $vals->{ire}) { |
4936
|
0
|
|
|
|
|
|
$self->{ire} = $vals->{ire}; |
4937
|
|
|
|
|
|
|
} |
4938
|
0
|
0
|
|
|
|
|
if (defined $vals->{sde}) { |
4939
|
0
|
|
|
|
|
|
$self->{sde} = $vals->{sde}; |
4940
|
|
|
|
|
|
|
} |
4941
|
|
|
|
|
|
|
} |
4942
|
0
|
|
|
|
|
|
return bless ($self, $classname); |
4943
|
|
|
|
|
|
|
} |
4944
|
|
|
|
|
|
|
|
4945
|
|
|
|
|
|
|
sub getName { |
4946
|
0
|
|
|
0
|
|
|
return 'Cassandra_system_drop_column_family_result'; |
4947
|
|
|
|
|
|
|
} |
4948
|
|
|
|
|
|
|
|
4949
|
|
|
|
|
|
|
sub read { |
4950
|
0
|
|
|
0
|
|
|
my ($self, $input) = @_; |
4951
|
0
|
|
|
|
|
|
my $xfer = 0; |
4952
|
0
|
|
|
|
|
|
my $fname; |
4953
|
0
|
|
|
|
|
|
my $ftype = 0; |
4954
|
0
|
|
|
|
|
|
my $fid = 0; |
4955
|
0
|
|
|
|
|
|
$xfer += $input->readStructBegin(\$fname); |
4956
|
0
|
|
|
|
|
|
while (1) |
4957
|
|
|
|
|
|
|
{ |
4958
|
0
|
|
|
|
|
|
$xfer += $input->readFieldBegin(\$fname, \$ftype, \$fid); |
4959
|
0
|
0
|
|
|
|
|
if ($ftype == TType::STOP) { |
4960
|
0
|
|
|
|
|
|
last; |
4961
|
|
|
|
|
|
|
} |
4962
|
0
|
|
|
|
|
|
SWITCH: for($fid) |
4963
|
|
|
|
|
|
|
{ |
4964
|
0
|
0
|
|
|
|
|
/^0$/ && do{ if ($ftype == TType::STRING) { |
|
0
|
0
|
|
|
|
|
|
4965
|
0
|
|
|
|
|
|
$xfer += $input->readString(\$self->{success}); |
4966
|
|
|
|
|
|
|
} else { |
4967
|
0
|
|
|
|
|
|
$xfer += $input->skip($ftype); |
4968
|
|
|
|
|
|
|
} |
4969
|
0
|
|
|
|
|
|
last; }; |
4970
|
0
|
0
|
|
|
|
|
/^1$/ && do{ if ($ftype == TType::STRUCT) { |
|
0
|
0
|
|
|
|
|
|
4971
|
0
|
|
|
|
|
|
$self->{ire} = new Cassandra::InvalidRequestException(); |
4972
|
0
|
|
|
|
|
|
$xfer += $self->{ire}->read($input); |
4973
|
|
|
|
|
|
|
} else { |
4974
|
0
|
|
|
|
|
|
$xfer += $input->skip($ftype); |
4975
|
|
|
|
|
|
|
} |
4976
|
0
|
|
|
|
|
|
last; }; |
4977
|
0
|
0
|
|
|
|
|
/^2$/ && do{ if ($ftype == TType::STRUCT) { |
|
0
|
0
|
|
|
|
|
|
4978
|
0
|
|
|
|
|
|
$self->{sde} = new Cassandra::SchemaDisagreementException(); |
4979
|
0
|
|
|
|
|
|
$xfer += $self->{sde}->read($input); |
4980
|
|
|
|
|
|
|
} else { |
4981
|
0
|
|
|
|
|
|
$xfer += $input->skip($ftype); |
4982
|
|
|
|
|
|
|
} |
4983
|
0
|
|
|
|
|
|
last; }; |
4984
|
0
|
|
|
|
|
|
$xfer += $input->skip($ftype); |
4985
|
|
|
|
|
|
|
} |
4986
|
0
|
|
|
|
|
|
$xfer += $input->readFieldEnd(); |
4987
|
|
|
|
|
|
|
} |
4988
|
0
|
|
|
|
|
|
$xfer += $input->readStructEnd(); |
4989
|
0
|
|
|
|
|
|
return $xfer; |
4990
|
|
|
|
|
|
|
} |
4991
|
|
|
|
|
|
|
|
4992
|
|
|
|
|
|
|
sub write { |
4993
|
0
|
|
|
0
|
|
|
my ($self, $output) = @_; |
4994
|
0
|
|
|
|
|
|
my $xfer = 0; |
4995
|
0
|
|
|
|
|
|
$xfer += $output->writeStructBegin('Cassandra_system_drop_column_family_result'); |
4996
|
0
|
0
|
|
|
|
|
if (defined $self->{success}) { |
4997
|
0
|
|
|
|
|
|
$xfer += $output->writeFieldBegin('success', TType::STRING, 0); |
4998
|
0
|
|
|
|
|
|
$xfer += $output->writeString($self->{success}); |
4999
|
0
|
|
|
|
|
|
$xfer += $output->writeFieldEnd(); |
5000
|
|
|
|
|
|
|
} |
5001
|
0
|
0
|
|
|
|
|
if (defined $self->{ire}) { |
5002
|
0
|
|
|
|
|
|
$xfer += $output->writeFieldBegin('ire', TType::STRUCT, 1); |
5003
|
0
|
|
|
|
|
|
$xfer += $self->{ire}->write($output); |
5004
|
0
|
|
|
|
|
|
$xfer += $output->writeFieldEnd(); |
5005
|
|
|
|
|
|
|
} |
5006
|
0
|
0
|
|
|
|
|
if (defined $self->{sde}) { |
5007
|
0
|
|
|
|
|
|
$xfer += $output->writeFieldBegin('sde', TType::STRUCT, 2); |
5008
|
0
|
|
|
|
|
|
$xfer += $self->{sde}->write($output); |
5009
|
0
|
|
|
|
|
|
$xfer += $output->writeFieldEnd(); |
5010
|
|
|
|
|
|
|
} |
5011
|
0
|
|
|
|
|
|
$xfer += $output->writeFieldStop(); |
5012
|
0
|
|
|
|
|
|
$xfer += $output->writeStructEnd(); |
5013
|
0
|
|
|
|
|
|
return $xfer; |
5014
|
|
|
|
|
|
|
} |
5015
|
|
|
|
|
|
|
|
5016
|
|
|
|
|
|
|
package Cassandra::Cassandra_system_add_keyspace_args; |
5017
|
|
|
|
|
|
|
BEGIN { |
5018
|
1
|
|
|
1
|
|
20
|
$Cassandra::Cassandra_system_add_keyspace_args::VERSION = '0.4.0'; |
5019
|
|
|
|
|
|
|
} |
5020
|
1
|
|
|
1
|
|
6
|
use base qw(Class::Accessor); |
|
1
|
|
|
|
|
2
|
|
|
1
|
|
|
|
|
404
|
|
5021
|
|
|
|
|
|
|
Cassandra::Cassandra_system_add_keyspace_args->mk_accessors( qw( ks_def ) ); |
5022
|
|
|
|
|
|
|
|
5023
|
|
|
|
|
|
|
sub new { |
5024
|
0
|
|
|
0
|
|
|
my $classname = shift; |
5025
|
0
|
|
|
|
|
|
my $self = {}; |
5026
|
0
|
|
0
|
|
|
|
my $vals = shift || {}; |
5027
|
0
|
|
|
|
|
|
$self->{ks_def} = undef; |
5028
|
0
|
0
|
|
|
|
|
if (UNIVERSAL::isa($vals,'HASH')) { |
5029
|
0
|
0
|
|
|
|
|
if (defined $vals->{ks_def}) { |
5030
|
0
|
|
|
|
|
|
$self->{ks_def} = $vals->{ks_def}; |
5031
|
|
|
|
|
|
|
} |
5032
|
|
|
|
|
|
|
} |
5033
|
0
|
|
|
|
|
|
return bless ($self, $classname); |
5034
|
|
|
|
|
|
|
} |
5035
|
|
|
|
|
|
|
|
5036
|
|
|
|
|
|
|
sub getName { |
5037
|
0
|
|
|
0
|
|
|
return 'Cassandra_system_add_keyspace_args'; |
5038
|
|
|
|
|
|
|
} |
5039
|
|
|
|
|
|
|
|
5040
|
|
|
|
|
|
|
sub read { |
5041
|
0
|
|
|
0
|
|
|
my ($self, $input) = @_; |
5042
|
0
|
|
|
|
|
|
my $xfer = 0; |
5043
|
0
|
|
|
|
|
|
my $fname; |
5044
|
0
|
|
|
|
|
|
my $ftype = 0; |
5045
|
0
|
|
|
|
|
|
my $fid = 0; |
5046
|
0
|
|
|
|
|
|
$xfer += $input->readStructBegin(\$fname); |
5047
|
0
|
|
|
|
|
|
while (1) |
5048
|
|
|
|
|
|
|
{ |
5049
|
0
|
|
|
|
|
|
$xfer += $input->readFieldBegin(\$fname, \$ftype, \$fid); |
5050
|
0
|
0
|
|
|
|
|
if ($ftype == TType::STOP) { |
5051
|
0
|
|
|
|
|
|
last; |
5052
|
|
|
|
|
|
|
} |
5053
|
0
|
|
|
|
|
|
SWITCH: for($fid) |
5054
|
|
|
|
|
|
|
{ |
5055
|
0
|
0
|
|
|
|
|
/^1$/ && do{ if ($ftype == TType::STRUCT) { |
|
0
|
0
|
|
|
|
|
|
5056
|
0
|
|
|
|
|
|
$self->{ks_def} = new Cassandra::KsDef(); |
5057
|
0
|
|
|
|
|
|
$xfer += $self->{ks_def}->read($input); |
5058
|
|
|
|
|
|
|
} else { |
5059
|
0
|
|
|
|
|
|
$xfer += $input->skip($ftype); |
5060
|
|
|
|
|
|
|
} |
5061
|
0
|
|
|
|
|
|
last; }; |
5062
|
0
|
|
|
|
|
|
$xfer += $input->skip($ftype); |
5063
|
|
|
|
|
|
|
} |
5064
|
0
|
|
|
|
|
|
$xfer += $input->readFieldEnd(); |
5065
|
|
|
|
|
|
|
} |
5066
|
0
|
|
|
|
|
|
$xfer += $input->readStructEnd(); |
5067
|
0
|
|
|
|
|
|
return $xfer; |
5068
|
|
|
|
|
|
|
} |
5069
|
|
|
|
|
|
|
|
5070
|
|
|
|
|
|
|
sub write { |
5071
|
0
|
|
|
0
|
|
|
my ($self, $output) = @_; |
5072
|
0
|
|
|
|
|
|
my $xfer = 0; |
5073
|
0
|
|
|
|
|
|
$xfer += $output->writeStructBegin('Cassandra_system_add_keyspace_args'); |
5074
|
0
|
0
|
|
|
|
|
if (defined $self->{ks_def}) { |
5075
|
0
|
|
|
|
|
|
$xfer += $output->writeFieldBegin('ks_def', TType::STRUCT, 1); |
5076
|
0
|
|
|
|
|
|
$xfer += $self->{ks_def}->write($output); |
5077
|
0
|
|
|
|
|
|
$xfer += $output->writeFieldEnd(); |
5078
|
|
|
|
|
|
|
} |
5079
|
0
|
|
|
|
|
|
$xfer += $output->writeFieldStop(); |
5080
|
0
|
|
|
|
|
|
$xfer += $output->writeStructEnd(); |
5081
|
0
|
|
|
|
|
|
return $xfer; |
5082
|
|
|
|
|
|
|
} |
5083
|
|
|
|
|
|
|
|
5084
|
|
|
|
|
|
|
package Cassandra::Cassandra_system_add_keyspace_result; |
5085
|
|
|
|
|
|
|
BEGIN { |
5086
|
1
|
|
|
1
|
|
26
|
$Cassandra::Cassandra_system_add_keyspace_result::VERSION = '0.4.0'; |
5087
|
|
|
|
|
|
|
} |
5088
|
1
|
|
|
1
|
|
5
|
use base qw(Class::Accessor); |
|
1
|
|
|
|
|
2
|
|
|
1
|
|
|
|
|
630
|
|
5089
|
|
|
|
|
|
|
Cassandra::Cassandra_system_add_keyspace_result->mk_accessors( qw( success ) ); |
5090
|
|
|
|
|
|
|
|
5091
|
|
|
|
|
|
|
sub new { |
5092
|
0
|
|
|
0
|
|
|
my $classname = shift; |
5093
|
0
|
|
|
|
|
|
my $self = {}; |
5094
|
0
|
|
0
|
|
|
|
my $vals = shift || {}; |
5095
|
0
|
|
|
|
|
|
$self->{success} = undef; |
5096
|
0
|
|
|
|
|
|
$self->{ire} = undef; |
5097
|
0
|
|
|
|
|
|
$self->{sde} = undef; |
5098
|
0
|
0
|
|
|
|
|
if (UNIVERSAL::isa($vals,'HASH')) { |
5099
|
0
|
0
|
|
|
|
|
if (defined $vals->{success}) { |
5100
|
0
|
|
|
|
|
|
$self->{success} = $vals->{success}; |
5101
|
|
|
|
|
|
|
} |
5102
|
0
|
0
|
|
|
|
|
if (defined $vals->{ire}) { |
5103
|
0
|
|
|
|
|
|
$self->{ire} = $vals->{ire}; |
5104
|
|
|
|
|
|
|
} |
5105
|
0
|
0
|
|
|
|
|
if (defined $vals->{sde}) { |
5106
|
0
|
|
|
|
|
|
$self->{sde} = $vals->{sde}; |
5107
|
|
|
|
|
|
|
} |
5108
|
|
|
|
|
|
|
} |
5109
|
0
|
|
|
|
|
|
return bless ($self, $classname); |
5110
|
|
|
|
|
|
|
} |
5111
|
|
|
|
|
|
|
|
5112
|
|
|
|
|
|
|
sub getName { |
5113
|
0
|
|
|
0
|
|
|
return 'Cassandra_system_add_keyspace_result'; |
5114
|
|
|
|
|
|
|
} |
5115
|
|
|
|
|
|
|
|
5116
|
|
|
|
|
|
|
sub read { |
5117
|
0
|
|
|
0
|
|
|
my ($self, $input) = @_; |
5118
|
0
|
|
|
|
|
|
my $xfer = 0; |
5119
|
0
|
|
|
|
|
|
my $fname; |
5120
|
0
|
|
|
|
|
|
my $ftype = 0; |
5121
|
0
|
|
|
|
|
|
my $fid = 0; |
5122
|
0
|
|
|
|
|
|
$xfer += $input->readStructBegin(\$fname); |
5123
|
0
|
|
|
|
|
|
while (1) |
5124
|
|
|
|
|
|
|
{ |
5125
|
0
|
|
|
|
|
|
$xfer += $input->readFieldBegin(\$fname, \$ftype, \$fid); |
5126
|
0
|
0
|
|
|
|
|
if ($ftype == TType::STOP) { |
5127
|
0
|
|
|
|
|
|
last; |
5128
|
|
|
|
|
|
|
} |
5129
|
0
|
|
|
|
|
|
SWITCH: for($fid) |
5130
|
|
|
|
|
|
|
{ |
5131
|
0
|
0
|
|
|
|
|
/^0$/ && do{ if ($ftype == TType::STRING) { |
|
0
|
0
|
|
|
|
|
|
5132
|
0
|
|
|
|
|
|
$xfer += $input->readString(\$self->{success}); |
5133
|
|
|
|
|
|
|
} else { |
5134
|
0
|
|
|
|
|
|
$xfer += $input->skip($ftype); |
5135
|
|
|
|
|
|
|
} |
5136
|
0
|
|
|
|
|
|
last; }; |
5137
|
0
|
0
|
|
|
|
|
/^1$/ && do{ if ($ftype == TType::STRUCT) { |
|
0
|
0
|
|
|
|
|
|
5138
|
0
|
|
|
|
|
|
$self->{ire} = new Cassandra::InvalidRequestException(); |
5139
|
0
|
|
|
|
|
|
$xfer += $self->{ire}->read($input); |
5140
|
|
|
|
|
|
|
} else { |
5141
|
0
|
|
|
|
|
|
$xfer += $input->skip($ftype); |
5142
|
|
|
|
|
|
|
} |
5143
|
0
|
|
|
|
|
|
last; }; |
5144
|
0
|
0
|
|
|
|
|
/^2$/ && do{ if ($ftype == TType::STRUCT) { |
|
0
|
0
|
|
|
|
|
|
5145
|
0
|
|
|
|
|
|
$self->{sde} = new Cassandra::SchemaDisagreementException(); |
5146
|
0
|
|
|
|
|
|
$xfer += $self->{sde}->read($input); |
5147
|
|
|
|
|
|
|
} else { |
5148
|
0
|
|
|
|
|
|
$xfer += $input->skip($ftype); |
5149
|
|
|
|
|
|
|
} |
5150
|
0
|
|
|
|
|
|
last; }; |
5151
|
0
|
|
|
|
|
|
$xfer += $input->skip($ftype); |
5152
|
|
|
|
|
|
|
} |
5153
|
0
|
|
|
|
|
|
$xfer += $input->readFieldEnd(); |
5154
|
|
|
|
|
|
|
} |
5155
|
0
|
|
|
|
|
|
$xfer += $input->readStructEnd(); |
5156
|
0
|
|
|
|
|
|
return $xfer; |
5157
|
|
|
|
|
|
|
} |
5158
|
|
|
|
|
|
|
|
5159
|
|
|
|
|
|
|
sub write { |
5160
|
0
|
|
|
0
|
|
|
my ($self, $output) = @_; |
5161
|
0
|
|
|
|
|
|
my $xfer = 0; |
5162
|
0
|
|
|
|
|
|
$xfer += $output->writeStructBegin('Cassandra_system_add_keyspace_result'); |
5163
|
0
|
0
|
|
|
|
|
if (defined $self->{success}) { |
5164
|
0
|
|
|
|
|
|
$xfer += $output->writeFieldBegin('success', TType::STRING, 0); |
5165
|
0
|
|
|
|
|
|
$xfer += $output->writeString($self->{success}); |
5166
|
0
|
|
|
|
|
|
$xfer += $output->writeFieldEnd(); |
5167
|
|
|
|
|
|
|
} |
5168
|
0
|
0
|
|
|
|
|
if (defined $self->{ire}) { |
5169
|
0
|
|
|
|
|
|
$xfer += $output->writeFieldBegin('ire', TType::STRUCT, 1); |
5170
|
0
|
|
|
|
|
|
$xfer += $self->{ire}->write($output); |
5171
|
0
|
|
|
|
|
|
$xfer += $output->writeFieldEnd(); |
5172
|
|
|
|
|
|
|
} |
5173
|
0
|
0
|
|
|
|
|
if (defined $self->{sde}) { |
5174
|
0
|
|
|
|
|
|
$xfer += $output->writeFieldBegin('sde', TType::STRUCT, 2); |
5175
|
0
|
|
|
|
|
|
$xfer += $self->{sde}->write($output); |
5176
|
0
|
|
|
|
|
|
$xfer += $output->writeFieldEnd(); |
5177
|
|
|
|
|
|
|
} |
5178
|
0
|
|
|
|
|
|
$xfer += $output->writeFieldStop(); |
5179
|
0
|
|
|
|
|
|
$xfer += $output->writeStructEnd(); |
5180
|
0
|
|
|
|
|
|
return $xfer; |
5181
|
|
|
|
|
|
|
} |
5182
|
|
|
|
|
|
|
|
5183
|
|
|
|
|
|
|
package Cassandra::Cassandra_system_drop_keyspace_args; |
5184
|
|
|
|
|
|
|
BEGIN { |
5185
|
1
|
|
|
1
|
|
21
|
$Cassandra::Cassandra_system_drop_keyspace_args::VERSION = '0.4.0'; |
5186
|
|
|
|
|
|
|
} |
5187
|
1
|
|
|
1
|
|
4
|
use base qw(Class::Accessor); |
|
1
|
|
|
|
|
3
|
|
|
1
|
|
|
|
|
399
|
|
5188
|
|
|
|
|
|
|
Cassandra::Cassandra_system_drop_keyspace_args->mk_accessors( qw( keyspace ) ); |
5189
|
|
|
|
|
|
|
|
5190
|
|
|
|
|
|
|
sub new { |
5191
|
0
|
|
|
0
|
|
|
my $classname = shift; |
5192
|
0
|
|
|
|
|
|
my $self = {}; |
5193
|
0
|
|
0
|
|
|
|
my $vals = shift || {}; |
5194
|
0
|
|
|
|
|
|
$self->{keyspace} = undef; |
5195
|
0
|
0
|
|
|
|
|
if (UNIVERSAL::isa($vals,'HASH')) { |
5196
|
0
|
0
|
|
|
|
|
if (defined $vals->{keyspace}) { |
5197
|
0
|
|
|
|
|
|
$self->{keyspace} = $vals->{keyspace}; |
5198
|
|
|
|
|
|
|
} |
5199
|
|
|
|
|
|
|
} |
5200
|
0
|
|
|
|
|
|
return bless ($self, $classname); |
5201
|
|
|
|
|
|
|
} |
5202
|
|
|
|
|
|
|
|
5203
|
|
|
|
|
|
|
sub getName { |
5204
|
0
|
|
|
0
|
|
|
return 'Cassandra_system_drop_keyspace_args'; |
5205
|
|
|
|
|
|
|
} |
5206
|
|
|
|
|
|
|
|
5207
|
|
|
|
|
|
|
sub read { |
5208
|
0
|
|
|
0
|
|
|
my ($self, $input) = @_; |
5209
|
0
|
|
|
|
|
|
my $xfer = 0; |
5210
|
0
|
|
|
|
|
|
my $fname; |
5211
|
0
|
|
|
|
|
|
my $ftype = 0; |
5212
|
0
|
|
|
|
|
|
my $fid = 0; |
5213
|
0
|
|
|
|
|
|
$xfer += $input->readStructBegin(\$fname); |
5214
|
0
|
|
|
|
|
|
while (1) |
5215
|
|
|
|
|
|
|
{ |
5216
|
0
|
|
|
|
|
|
$xfer += $input->readFieldBegin(\$fname, \$ftype, \$fid); |
5217
|
0
|
0
|
|
|
|
|
if ($ftype == TType::STOP) { |
5218
|
0
|
|
|
|
|
|
last; |
5219
|
|
|
|
|
|
|
} |
5220
|
0
|
|
|
|
|
|
SWITCH: for($fid) |
5221
|
|
|
|
|
|
|
{ |
5222
|
0
|
0
|
|
|
|
|
/^1$/ && do{ if ($ftype == TType::STRING) { |
|
0
|
0
|
|
|
|
|
|
5223
|
0
|
|
|
|
|
|
$xfer += $input->readString(\$self->{keyspace}); |
5224
|
|
|
|
|
|
|
} else { |
5225
|
0
|
|
|
|
|
|
$xfer += $input->skip($ftype); |
5226
|
|
|
|
|
|
|
} |
5227
|
0
|
|
|
|
|
|
last; }; |
5228
|
0
|
|
|
|
|
|
$xfer += $input->skip($ftype); |
5229
|
|
|
|
|
|
|
} |
5230
|
0
|
|
|
|
|
|
$xfer += $input->readFieldEnd(); |
5231
|
|
|
|
|
|
|
} |
5232
|
0
|
|
|
|
|
|
$xfer += $input->readStructEnd(); |
5233
|
0
|
|
|
|
|
|
return $xfer; |
5234
|
|
|
|
|
|
|
} |
5235
|
|
|
|
|
|
|
|
5236
|
|
|
|
|
|
|
sub write { |
5237
|
0
|
|
|
0
|
|
|
my ($self, $output) = @_; |
5238
|
0
|
|
|
|
|
|
my $xfer = 0; |
5239
|
0
|
|
|
|
|
|
$xfer += $output->writeStructBegin('Cassandra_system_drop_keyspace_args'); |
5240
|
0
|
0
|
|
|
|
|
if (defined $self->{keyspace}) { |
5241
|
0
|
|
|
|
|
|
$xfer += $output->writeFieldBegin('keyspace', TType::STRING, 1); |
5242
|
0
|
|
|
|
|
|
$xfer += $output->writeString($self->{keyspace}); |
5243
|
0
|
|
|
|
|
|
$xfer += $output->writeFieldEnd(); |
5244
|
|
|
|
|
|
|
} |
5245
|
0
|
|
|
|
|
|
$xfer += $output->writeFieldStop(); |
5246
|
0
|
|
|
|
|
|
$xfer += $output->writeStructEnd(); |
5247
|
0
|
|
|
|
|
|
return $xfer; |
5248
|
|
|
|
|
|
|
} |
5249
|
|
|
|
|
|
|
|
5250
|
|
|
|
|
|
|
package Cassandra::Cassandra_system_drop_keyspace_result; |
5251
|
|
|
|
|
|
|
BEGIN { |
5252
|
1
|
|
|
1
|
|
21
|
$Cassandra::Cassandra_system_drop_keyspace_result::VERSION = '0.4.0'; |
5253
|
|
|
|
|
|
|
} |
5254
|
1
|
|
|
1
|
|
99
|
use base qw(Class::Accessor); |
|
1
|
|
|
|
|
3
|
|
|
1
|
|
|
|
|
632
|
|
5255
|
|
|
|
|
|
|
Cassandra::Cassandra_system_drop_keyspace_result->mk_accessors( qw( success ) ); |
5256
|
|
|
|
|
|
|
|
5257
|
|
|
|
|
|
|
sub new { |
5258
|
0
|
|
|
0
|
|
|
my $classname = shift; |
5259
|
0
|
|
|
|
|
|
my $self = {}; |
5260
|
0
|
|
0
|
|
|
|
my $vals = shift || {}; |
5261
|
0
|
|
|
|
|
|
$self->{success} = undef; |
5262
|
0
|
|
|
|
|
|
$self->{ire} = undef; |
5263
|
0
|
|
|
|
|
|
$self->{sde} = undef; |
5264
|
0
|
0
|
|
|
|
|
if (UNIVERSAL::isa($vals,'HASH')) { |
5265
|
0
|
0
|
|
|
|
|
if (defined $vals->{success}) { |
5266
|
0
|
|
|
|
|
|
$self->{success} = $vals->{success}; |
5267
|
|
|
|
|
|
|
} |
5268
|
0
|
0
|
|
|
|
|
if (defined $vals->{ire}) { |
5269
|
0
|
|
|
|
|
|
$self->{ire} = $vals->{ire}; |
5270
|
|
|
|
|
|
|
} |
5271
|
0
|
0
|
|
|
|
|
if (defined $vals->{sde}) { |
5272
|
0
|
|
|
|
|
|
$self->{sde} = $vals->{sde}; |
5273
|
|
|
|
|
|
|
} |
5274
|
|
|
|
|
|
|
} |
5275
|
0
|
|
|
|
|
|
return bless ($self, $classname); |
5276
|
|
|
|
|
|
|
} |
5277
|
|
|
|
|
|
|
|
5278
|
|
|
|
|
|
|
sub getName { |
5279
|
0
|
|
|
0
|
|
|
return 'Cassandra_system_drop_keyspace_result'; |
5280
|
|
|
|
|
|
|
} |
5281
|
|
|
|
|
|
|
|
5282
|
|
|
|
|
|
|
sub read { |
5283
|
0
|
|
|
0
|
|
|
my ($self, $input) = @_; |
5284
|
0
|
|
|
|
|
|
my $xfer = 0; |
5285
|
0
|
|
|
|
|
|
my $fname; |
5286
|
0
|
|
|
|
|
|
my $ftype = 0; |
5287
|
0
|
|
|
|
|
|
my $fid = 0; |
5288
|
0
|
|
|
|
|
|
$xfer += $input->readStructBegin(\$fname); |
5289
|
0
|
|
|
|
|
|
while (1) |
5290
|
|
|
|
|
|
|
{ |
5291
|
0
|
|
|
|
|
|
$xfer += $input->readFieldBegin(\$fname, \$ftype, \$fid); |
5292
|
0
|
0
|
|
|
|
|
if ($ftype == TType::STOP) { |
5293
|
0
|
|
|
|
|
|
last; |
5294
|
|
|
|
|
|
|
} |
5295
|
0
|
|
|
|
|
|
SWITCH: for($fid) |
5296
|
|
|
|
|
|
|
{ |
5297
|
0
|
0
|
|
|
|
|
/^0$/ && do{ if ($ftype == TType::STRING) { |
|
0
|
0
|
|
|
|
|
|
5298
|
0
|
|
|
|
|
|
$xfer += $input->readString(\$self->{success}); |
5299
|
|
|
|
|
|
|
} else { |
5300
|
0
|
|
|
|
|
|
$xfer += $input->skip($ftype); |
5301
|
|
|
|
|
|
|
} |
5302
|
0
|
|
|
|
|
|
last; }; |
5303
|
0
|
0
|
|
|
|
|
/^1$/ && do{ if ($ftype == TType::STRUCT) { |
|
0
|
0
|
|
|
|
|
|
5304
|
0
|
|
|
|
|
|
$self->{ire} = new Cassandra::InvalidRequestException(); |
5305
|
0
|
|
|
|
|
|
$xfer += $self->{ire}->read($input); |
5306
|
|
|
|
|
|
|
} else { |
5307
|
0
|
|
|
|
|
|
$xfer += $input->skip($ftype); |
5308
|
|
|
|
|
|
|
} |
5309
|
0
|
|
|
|
|
|
last; }; |
5310
|
0
|
0
|
|
|
|
|
/^2$/ && do{ if ($ftype == TType::STRUCT) { |
|
0
|
0
|
|
|
|
|
|
5311
|
0
|
|
|
|
|
|
$self->{sde} = new Cassandra::SchemaDisagreementException(); |
5312
|
0
|
|
|
|
|
|
$xfer += $self->{sde}->read($input); |
5313
|
|
|
|
|
|
|
} else { |
5314
|
0
|
|
|
|
|
|
$xfer += $input->skip($ftype); |
5315
|
|
|
|
|
|
|
} |
5316
|
0
|
|
|
|
|
|
last; }; |
5317
|
0
|
|
|
|
|
|
$xfer += $input->skip($ftype); |
5318
|
|
|
|
|
|
|
} |
5319
|
0
|
|
|
|
|
|
$xfer += $input->readFieldEnd(); |
5320
|
|
|
|
|
|
|
} |
5321
|
0
|
|
|
|
|
|
$xfer += $input->readStructEnd(); |
5322
|
0
|
|
|
|
|
|
return $xfer; |
5323
|
|
|
|
|
|
|
} |
5324
|
|
|
|
|
|
|
|
5325
|
|
|
|
|
|
|
sub write { |
5326
|
0
|
|
|
0
|
|
|
my ($self, $output) = @_; |
5327
|
0
|
|
|
|
|
|
my $xfer = 0; |
5328
|
0
|
|
|
|
|
|
$xfer += $output->writeStructBegin('Cassandra_system_drop_keyspace_result'); |
5329
|
0
|
0
|
|
|
|
|
if (defined $self->{success}) { |
5330
|
0
|
|
|
|
|
|
$xfer += $output->writeFieldBegin('success', TType::STRING, 0); |
5331
|
0
|
|
|
|
|
|
$xfer += $output->writeString($self->{success}); |
5332
|
0
|
|
|
|
|
|
$xfer += $output->writeFieldEnd(); |
5333
|
|
|
|
|
|
|
} |
5334
|
0
|
0
|
|
|
|
|
if (defined $self->{ire}) { |
5335
|
0
|
|
|
|
|
|
$xfer += $output->writeFieldBegin('ire', TType::STRUCT, 1); |
5336
|
0
|
|
|
|
|
|
$xfer += $self->{ire}->write($output); |
5337
|
0
|
|
|
|
|
|
$xfer += $output->writeFieldEnd(); |
5338
|
|
|
|
|
|
|
} |
5339
|
0
|
0
|
|
|
|
|
if (defined $self->{sde}) { |
5340
|
0
|
|
|
|
|
|
$xfer += $output->writeFieldBegin('sde', TType::STRUCT, 2); |
5341
|
0
|
|
|
|
|
|
$xfer += $self->{sde}->write($output); |
5342
|
0
|
|
|
|
|
|
$xfer += $output->writeFieldEnd(); |
5343
|
|
|
|
|
|
|
} |
5344
|
0
|
|
|
|
|
|
$xfer += $output->writeFieldStop(); |
5345
|
0
|
|
|
|
|
|
$xfer += $output->writeStructEnd(); |
5346
|
0
|
|
|
|
|
|
return $xfer; |
5347
|
|
|
|
|
|
|
} |
5348
|
|
|
|
|
|
|
|
5349
|
|
|
|
|
|
|
package Cassandra::Cassandra_system_update_keyspace_args; |
5350
|
|
|
|
|
|
|
BEGIN { |
5351
|
1
|
|
|
1
|
|
16
|
$Cassandra::Cassandra_system_update_keyspace_args::VERSION = '0.4.0'; |
5352
|
|
|
|
|
|
|
} |
5353
|
1
|
|
|
1
|
|
5
|
use base qw(Class::Accessor); |
|
1
|
|
|
|
|
1
|
|
|
1
|
|
|
|
|
429
|
|
5354
|
|
|
|
|
|
|
Cassandra::Cassandra_system_update_keyspace_args->mk_accessors( qw( ks_def ) ); |
5355
|
|
|
|
|
|
|
|
5356
|
|
|
|
|
|
|
sub new { |
5357
|
0
|
|
|
0
|
|
|
my $classname = shift; |
5358
|
0
|
|
|
|
|
|
my $self = {}; |
5359
|
0
|
|
0
|
|
|
|
my $vals = shift || {}; |
5360
|
0
|
|
|
|
|
|
$self->{ks_def} = undef; |
5361
|
0
|
0
|
|
|
|
|
if (UNIVERSAL::isa($vals,'HASH')) { |
5362
|
0
|
0
|
|
|
|
|
if (defined $vals->{ks_def}) { |
5363
|
0
|
|
|
|
|
|
$self->{ks_def} = $vals->{ks_def}; |
5364
|
|
|
|
|
|
|
} |
5365
|
|
|
|
|
|
|
} |
5366
|
0
|
|
|
|
|
|
return bless ($self, $classname); |
5367
|
|
|
|
|
|
|
} |
5368
|
|
|
|
|
|
|
|
5369
|
|
|
|
|
|
|
sub getName { |
5370
|
0
|
|
|
0
|
|
|
return 'Cassandra_system_update_keyspace_args'; |
5371
|
|
|
|
|
|
|
} |
5372
|
|
|
|
|
|
|
|
5373
|
|
|
|
|
|
|
sub read { |
5374
|
0
|
|
|
0
|
|
|
my ($self, $input) = @_; |
5375
|
0
|
|
|
|
|
|
my $xfer = 0; |
5376
|
0
|
|
|
|
|
|
my $fname; |
5377
|
0
|
|
|
|
|
|
my $ftype = 0; |
5378
|
0
|
|
|
|
|
|
my $fid = 0; |
5379
|
0
|
|
|
|
|
|
$xfer += $input->readStructBegin(\$fname); |
5380
|
0
|
|
|
|
|
|
while (1) |
5381
|
|
|
|
|
|
|
{ |
5382
|
0
|
|
|
|
|
|
$xfer += $input->readFieldBegin(\$fname, \$ftype, \$fid); |
5383
|
0
|
0
|
|
|
|
|
if ($ftype == TType::STOP) { |
5384
|
0
|
|
|
|
|
|
last; |
5385
|
|
|
|
|
|
|
} |
5386
|
0
|
|
|
|
|
|
SWITCH: for($fid) |
5387
|
|
|
|
|
|
|
{ |
5388
|
0
|
0
|
|
|
|
|
/^1$/ && do{ if ($ftype == TType::STRUCT) { |
|
0
|
0
|
|
|
|
|
|
5389
|
0
|
|
|
|
|
|
$self->{ks_def} = new Cassandra::KsDef(); |
5390
|
0
|
|
|
|
|
|
$xfer += $self->{ks_def}->read($input); |
5391
|
|
|
|
|
|
|
} else { |
5392
|
0
|
|
|
|
|
|
$xfer += $input->skip($ftype); |
5393
|
|
|
|
|
|
|
} |
5394
|
0
|
|
|
|
|
|
last; }; |
5395
|
0
|
|
|
|
|
|
$xfer += $input->skip($ftype); |
5396
|
|
|
|
|
|
|
} |
5397
|
0
|
|
|
|
|
|
$xfer += $input->readFieldEnd(); |
5398
|
|
|
|
|
|
|
} |
5399
|
0
|
|
|
|
|
|
$xfer += $input->readStructEnd(); |
5400
|
0
|
|
|
|
|
|
return $xfer; |
5401
|
|
|
|
|
|
|
} |
5402
|
|
|
|
|
|
|
|
5403
|
|
|
|
|
|
|
sub write { |
5404
|
0
|
|
|
0
|
|
|
my ($self, $output) = @_; |
5405
|
0
|
|
|
|
|
|
my $xfer = 0; |
5406
|
0
|
|
|
|
|
|
$xfer += $output->writeStructBegin('Cassandra_system_update_keyspace_args'); |
5407
|
0
|
0
|
|
|
|
|
if (defined $self->{ks_def}) { |
5408
|
0
|
|
|
|
|
|
$xfer += $output->writeFieldBegin('ks_def', TType::STRUCT, 1); |
5409
|
0
|
|
|
|
|
|
$xfer += $self->{ks_def}->write($output); |
5410
|
0
|
|
|
|
|
|
$xfer += $output->writeFieldEnd(); |
5411
|
|
|
|
|
|
|
} |
5412
|
0
|
|
|
|
|
|
$xfer += $output->writeFieldStop(); |
5413
|
0
|
|
|
|
|
|
$xfer += $output->writeStructEnd(); |
5414
|
0
|
|
|
|
|
|
return $xfer; |
5415
|
|
|
|
|
|
|
} |
5416
|
|
|
|
|
|
|
|
5417
|
|
|
|
|
|
|
package Cassandra::Cassandra_system_update_keyspace_result; |
5418
|
|
|
|
|
|
|
BEGIN { |
5419
|
1
|
|
|
1
|
|
19
|
$Cassandra::Cassandra_system_update_keyspace_result::VERSION = '0.4.0'; |
5420
|
|
|
|
|
|
|
} |
5421
|
1
|
|
|
1
|
|
7
|
use base qw(Class::Accessor); |
|
1
|
|
|
|
|
1
|
|
|
1
|
|
|
|
|
625
|
|
5422
|
|
|
|
|
|
|
Cassandra::Cassandra_system_update_keyspace_result->mk_accessors( qw( success ) ); |
5423
|
|
|
|
|
|
|
|
5424
|
|
|
|
|
|
|
sub new { |
5425
|
0
|
|
|
0
|
|
|
my $classname = shift; |
5426
|
0
|
|
|
|
|
|
my $self = {}; |
5427
|
0
|
|
0
|
|
|
|
my $vals = shift || {}; |
5428
|
0
|
|
|
|
|
|
$self->{success} = undef; |
5429
|
0
|
|
|
|
|
|
$self->{ire} = undef; |
5430
|
0
|
|
|
|
|
|
$self->{sde} = undef; |
5431
|
0
|
0
|
|
|
|
|
if (UNIVERSAL::isa($vals,'HASH')) { |
5432
|
0
|
0
|
|
|
|
|
if (defined $vals->{success}) { |
5433
|
0
|
|
|
|
|
|
$self->{success} = $vals->{success}; |
5434
|
|
|
|
|
|
|
} |
5435
|
0
|
0
|
|
|
|
|
if (defined $vals->{ire}) { |
5436
|
0
|
|
|
|
|
|
$self->{ire} = $vals->{ire}; |
5437
|
|
|
|
|
|
|
} |
5438
|
0
|
0
|
|
|
|
|
if (defined $vals->{sde}) { |
5439
|
0
|
|
|
|
|
|
$self->{sde} = $vals->{sde}; |
5440
|
|
|
|
|
|
|
} |
5441
|
|
|
|
|
|
|
} |
5442
|
0
|
|
|
|
|
|
return bless ($self, $classname); |
5443
|
|
|
|
|
|
|
} |
5444
|
|
|
|
|
|
|
|
5445
|
|
|
|
|
|
|
sub getName { |
5446
|
0
|
|
|
0
|
|
|
return 'Cassandra_system_update_keyspace_result'; |
5447
|
|
|
|
|
|
|
} |
5448
|
|
|
|
|
|
|
|
5449
|
|
|
|
|
|
|
sub read { |
5450
|
0
|
|
|
0
|
|
|
my ($self, $input) = @_; |
5451
|
0
|
|
|
|
|
|
my $xfer = 0; |
5452
|
0
|
|
|
|
|
|
my $fname; |
5453
|
0
|
|
|
|
|
|
my $ftype = 0; |
5454
|
0
|
|
|
|
|
|
my $fid = 0; |
5455
|
0
|
|
|
|
|
|
$xfer += $input->readStructBegin(\$fname); |
5456
|
0
|
|
|
|
|
|
while (1) |
5457
|
|
|
|
|
|
|
{ |
5458
|
0
|
|
|
|
|
|
$xfer += $input->readFieldBegin(\$fname, \$ftype, \$fid); |
5459
|
0
|
0
|
|
|
|
|
if ($ftype == TType::STOP) { |
5460
|
0
|
|
|
|
|
|
last; |
5461
|
|
|
|
|
|
|
} |
5462
|
0
|
|
|
|
|
|
SWITCH: for($fid) |
5463
|
|
|
|
|
|
|
{ |
5464
|
0
|
0
|
|
|
|
|
/^0$/ && do{ if ($ftype == TType::STRING) { |
|
0
|
0
|
|
|
|
|
|
5465
|
0
|
|
|
|
|
|
$xfer += $input->readString(\$self->{success}); |
5466
|
|
|
|
|
|
|
} else { |
5467
|
0
|
|
|
|
|
|
$xfer += $input->skip($ftype); |
5468
|
|
|
|
|
|
|
} |
5469
|
0
|
|
|
|
|
|
last; }; |
5470
|
0
|
0
|
|
|
|
|
/^1$/ && do{ if ($ftype == TType::STRUCT) { |
|
0
|
0
|
|
|
|
|
|
5471
|
0
|
|
|
|
|
|
$self->{ire} = new Cassandra::InvalidRequestException(); |
5472
|
0
|
|
|
|
|
|
$xfer += $self->{ire}->read($input); |
5473
|
|
|
|
|
|
|
} else { |
5474
|
0
|
|
|
|
|
|
$xfer += $input->skip($ftype); |
5475
|
|
|
|
|
|
|
} |
5476
|
0
|
|
|
|
|
|
last; }; |
5477
|
0
|
0
|
|
|
|
|
/^2$/ && do{ if ($ftype == TType::STRUCT) { |
|
0
|
0
|
|
|
|
|
|
5478
|
0
|
|
|
|
|
|
$self->{sde} = new Cassandra::SchemaDisagreementException(); |
5479
|
0
|
|
|
|
|
|
$xfer += $self->{sde}->read($input); |
5480
|
|
|
|
|
|
|
} else { |
5481
|
0
|
|
|
|
|
|
$xfer += $input->skip($ftype); |
5482
|
|
|
|
|
|
|
} |
5483
|
0
|
|
|
|
|
|
last; }; |
5484
|
0
|
|
|
|
|
|
$xfer += $input->skip($ftype); |
5485
|
|
|
|
|
|
|
} |
5486
|
0
|
|
|
|
|
|
$xfer += $input->readFieldEnd(); |
5487
|
|
|
|
|
|
|
} |
5488
|
0
|
|
|
|
|
|
$xfer += $input->readStructEnd(); |
5489
|
0
|
|
|
|
|
|
return $xfer; |
5490
|
|
|
|
|
|
|
} |
5491
|
|
|
|
|
|
|
|
5492
|
|
|
|
|
|
|
sub write { |
5493
|
0
|
|
|
0
|
|
|
my ($self, $output) = @_; |
5494
|
0
|
|
|
|
|
|
my $xfer = 0; |
5495
|
0
|
|
|
|
|
|
$xfer += $output->writeStructBegin('Cassandra_system_update_keyspace_result'); |
5496
|
0
|
0
|
|
|
|
|
if (defined $self->{success}) { |
5497
|
0
|
|
|
|
|
|
$xfer += $output->writeFieldBegin('success', TType::STRING, 0); |
5498
|
0
|
|
|
|
|
|
$xfer += $output->writeString($self->{success}); |
5499
|
0
|
|
|
|
|
|
$xfer += $output->writeFieldEnd(); |
5500
|
|
|
|
|
|
|
} |
5501
|
0
|
0
|
|
|
|
|
if (defined $self->{ire}) { |
5502
|
0
|
|
|
|
|
|
$xfer += $output->writeFieldBegin('ire', TType::STRUCT, 1); |
5503
|
0
|
|
|
|
|
|
$xfer += $self->{ire}->write($output); |
5504
|
0
|
|
|
|
|
|
$xfer += $output->writeFieldEnd(); |
5505
|
|
|
|
|
|
|
} |
5506
|
0
|
0
|
|
|
|
|
if (defined $self->{sde}) { |
5507
|
0
|
|
|
|
|
|
$xfer += $output->writeFieldBegin('sde', TType::STRUCT, 2); |
5508
|
0
|
|
|
|
|
|
$xfer += $self->{sde}->write($output); |
5509
|
0
|
|
|
|
|
|
$xfer += $output->writeFieldEnd(); |
5510
|
|
|
|
|
|
|
} |
5511
|
0
|
|
|
|
|
|
$xfer += $output->writeFieldStop(); |
5512
|
0
|
|
|
|
|
|
$xfer += $output->writeStructEnd(); |
5513
|
0
|
|
|
|
|
|
return $xfer; |
5514
|
|
|
|
|
|
|
} |
5515
|
|
|
|
|
|
|
|
5516
|
|
|
|
|
|
|
package Cassandra::Cassandra_system_update_column_family_args; |
5517
|
|
|
|
|
|
|
BEGIN { |
5518
|
1
|
|
|
1
|
|
15
|
$Cassandra::Cassandra_system_update_column_family_args::VERSION = '0.4.0'; |
5519
|
|
|
|
|
|
|
} |
5520
|
1
|
|
|
1
|
|
5
|
use base qw(Class::Accessor); |
|
1
|
|
|
|
|
2
|
|
|
1
|
|
|
|
|
460
|
|
5521
|
|
|
|
|
|
|
Cassandra::Cassandra_system_update_column_family_args->mk_accessors( qw( cf_def ) ); |
5522
|
|
|
|
|
|
|
|
5523
|
|
|
|
|
|
|
sub new { |
5524
|
0
|
|
|
0
|
|
|
my $classname = shift; |
5525
|
0
|
|
|
|
|
|
my $self = {}; |
5526
|
0
|
|
0
|
|
|
|
my $vals = shift || {}; |
5527
|
0
|
|
|
|
|
|
$self->{cf_def} = undef; |
5528
|
0
|
0
|
|
|
|
|
if (UNIVERSAL::isa($vals,'HASH')) { |
5529
|
0
|
0
|
|
|
|
|
if (defined $vals->{cf_def}) { |
5530
|
0
|
|
|
|
|
|
$self->{cf_def} = $vals->{cf_def}; |
5531
|
|
|
|
|
|
|
} |
5532
|
|
|
|
|
|
|
} |
5533
|
0
|
|
|
|
|
|
return bless ($self, $classname); |
5534
|
|
|
|
|
|
|
} |
5535
|
|
|
|
|
|
|
|
5536
|
|
|
|
|
|
|
sub getName { |
5537
|
0
|
|
|
0
|
|
|
return 'Cassandra_system_update_column_family_args'; |
5538
|
|
|
|
|
|
|
} |
5539
|
|
|
|
|
|
|
|
5540
|
|
|
|
|
|
|
sub read { |
5541
|
0
|
|
|
0
|
|
|
my ($self, $input) = @_; |
5542
|
0
|
|
|
|
|
|
my $xfer = 0; |
5543
|
0
|
|
|
|
|
|
my $fname; |
5544
|
0
|
|
|
|
|
|
my $ftype = 0; |
5545
|
0
|
|
|
|
|
|
my $fid = 0; |
5546
|
0
|
|
|
|
|
|
$xfer += $input->readStructBegin(\$fname); |
5547
|
0
|
|
|
|
|
|
while (1) |
5548
|
|
|
|
|
|
|
{ |
5549
|
0
|
|
|
|
|
|
$xfer += $input->readFieldBegin(\$fname, \$ftype, \$fid); |
5550
|
0
|
0
|
|
|
|
|
if ($ftype == TType::STOP) { |
5551
|
0
|
|
|
|
|
|
last; |
5552
|
|
|
|
|
|
|
} |
5553
|
0
|
|
|
|
|
|
SWITCH: for($fid) |
5554
|
|
|
|
|
|
|
{ |
5555
|
0
|
0
|
|
|
|
|
/^1$/ && do{ if ($ftype == TType::STRUCT) { |
|
0
|
0
|
|
|
|
|
|
5556
|
0
|
|
|
|
|
|
$self->{cf_def} = new Cassandra::CfDef(); |
5557
|
0
|
|
|
|
|
|
$xfer += $self->{cf_def}->read($input); |
5558
|
|
|
|
|
|
|
} else { |
5559
|
0
|
|
|
|
|
|
$xfer += $input->skip($ftype); |
5560
|
|
|
|
|
|
|
} |
5561
|
0
|
|
|
|
|
|
last; }; |
5562
|
0
|
|
|
|
|
|
$xfer += $input->skip($ftype); |
5563
|
|
|
|
|
|
|
} |
5564
|
0
|
|
|
|
|
|
$xfer += $input->readFieldEnd(); |
5565
|
|
|
|
|
|
|
} |
5566
|
0
|
|
|
|
|
|
$xfer += $input->readStructEnd(); |
5567
|
0
|
|
|
|
|
|
return $xfer; |
5568
|
|
|
|
|
|
|
} |
5569
|
|
|
|
|
|
|
|
5570
|
|
|
|
|
|
|
sub write { |
5571
|
0
|
|
|
0
|
|
|
my ($self, $output) = @_; |
5572
|
0
|
|
|
|
|
|
my $xfer = 0; |
5573
|
0
|
|
|
|
|
|
$xfer += $output->writeStructBegin('Cassandra_system_update_column_family_args'); |
5574
|
0
|
0
|
|
|
|
|
if (defined $self->{cf_def}) { |
5575
|
0
|
|
|
|
|
|
$xfer += $output->writeFieldBegin('cf_def', TType::STRUCT, 1); |
5576
|
0
|
|
|
|
|
|
$xfer += $self->{cf_def}->write($output); |
5577
|
0
|
|
|
|
|
|
$xfer += $output->writeFieldEnd(); |
5578
|
|
|
|
|
|
|
} |
5579
|
0
|
|
|
|
|
|
$xfer += $output->writeFieldStop(); |
5580
|
0
|
|
|
|
|
|
$xfer += $output->writeStructEnd(); |
5581
|
0
|
|
|
|
|
|
return $xfer; |
5582
|
|
|
|
|
|
|
} |
5583
|
|
|
|
|
|
|
|
5584
|
|
|
|
|
|
|
package Cassandra::Cassandra_system_update_column_family_result; |
5585
|
|
|
|
|
|
|
BEGIN { |
5586
|
1
|
|
|
1
|
|
21
|
$Cassandra::Cassandra_system_update_column_family_result::VERSION = '0.4.0'; |
5587
|
|
|
|
|
|
|
} |
5588
|
1
|
|
|
1
|
|
5
|
use base qw(Class::Accessor); |
|
1
|
|
|
|
|
2
|
|
|
1
|
|
|
|
|
596
|
|
5589
|
|
|
|
|
|
|
Cassandra::Cassandra_system_update_column_family_result->mk_accessors( qw( success ) ); |
5590
|
|
|
|
|
|
|
|
5591
|
|
|
|
|
|
|
sub new { |
5592
|
0
|
|
|
0
|
|
|
my $classname = shift; |
5593
|
0
|
|
|
|
|
|
my $self = {}; |
5594
|
0
|
|
0
|
|
|
|
my $vals = shift || {}; |
5595
|
0
|
|
|
|
|
|
$self->{success} = undef; |
5596
|
0
|
|
|
|
|
|
$self->{ire} = undef; |
5597
|
0
|
|
|
|
|
|
$self->{sde} = undef; |
5598
|
0
|
0
|
|
|
|
|
if (UNIVERSAL::isa($vals,'HASH')) { |
5599
|
0
|
0
|
|
|
|
|
if (defined $vals->{success}) { |
5600
|
0
|
|
|
|
|
|
$self->{success} = $vals->{success}; |
5601
|
|
|
|
|
|
|
} |
5602
|
0
|
0
|
|
|
|
|
if (defined $vals->{ire}) { |
5603
|
0
|
|
|
|
|
|
$self->{ire} = $vals->{ire}; |
5604
|
|
|
|
|
|
|
} |
5605
|
0
|
0
|
|
|
|
|
if (defined $vals->{sde}) { |
5606
|
0
|
|
|
|
|
|
$self->{sde} = $vals->{sde}; |
5607
|
|
|
|
|
|
|
} |
5608
|
|
|
|
|
|
|
} |
5609
|
0
|
|
|
|
|
|
return bless ($self, $classname); |
5610
|
|
|
|
|
|
|
} |
5611
|
|
|
|
|
|
|
|
5612
|
|
|
|
|
|
|
sub getName { |
5613
|
0
|
|
|
0
|
|
|
return 'Cassandra_system_update_column_family_result'; |
5614
|
|
|
|
|
|
|
} |
5615
|
|
|
|
|
|
|
|
5616
|
|
|
|
|
|
|
sub read { |
5617
|
0
|
|
|
0
|
|
|
my ($self, $input) = @_; |
5618
|
0
|
|
|
|
|
|
my $xfer = 0; |
5619
|
0
|
|
|
|
|
|
my $fname; |
5620
|
0
|
|
|
|
|
|
my $ftype = 0; |
5621
|
0
|
|
|
|
|
|
my $fid = 0; |
5622
|
0
|
|
|
|
|
|
$xfer += $input->readStructBegin(\$fname); |
5623
|
0
|
|
|
|
|
|
while (1) |
5624
|
|
|
|
|
|
|
{ |
5625
|
0
|
|
|
|
|
|
$xfer += $input->readFieldBegin(\$fname, \$ftype, \$fid); |
5626
|
0
|
0
|
|
|
|
|
if ($ftype == TType::STOP) { |
5627
|
0
|
|
|
|
|
|
last; |
5628
|
|
|
|
|
|
|
} |
5629
|
0
|
|
|
|
|
|
SWITCH: for($fid) |
5630
|
|
|
|
|
|
|
{ |
5631
|
0
|
0
|
|
|
|
|
/^0$/ && do{ if ($ftype == TType::STRING) { |
|
0
|
0
|
|
|
|
|
|
5632
|
0
|
|
|
|
|
|
$xfer += $input->readString(\$self->{success}); |
5633
|
|
|
|
|
|
|
} else { |
5634
|
0
|
|
|
|
|
|
$xfer += $input->skip($ftype); |
5635
|
|
|
|
|
|
|
} |
5636
|
0
|
|
|
|
|
|
last; }; |
5637
|
0
|
0
|
|
|
|
|
/^1$/ && do{ if ($ftype == TType::STRUCT) { |
|
0
|
0
|
|
|
|
|
|
5638
|
0
|
|
|
|
|
|
$self->{ire} = new Cassandra::InvalidRequestException(); |
5639
|
0
|
|
|
|
|
|
$xfer += $self->{ire}->read($input); |
5640
|
|
|
|
|
|
|
} else { |
5641
|
0
|
|
|
|
|
|
$xfer += $input->skip($ftype); |
5642
|
|
|
|
|
|
|
} |
5643
|
0
|
|
|
|
|
|
last; }; |
5644
|
0
|
0
|
|
|
|
|
/^2$/ && do{ if ($ftype == TType::STRUCT) { |
|
0
|
0
|
|
|
|
|
|
5645
|
0
|
|
|
|
|
|
$self->{sde} = new Cassandra::SchemaDisagreementException(); |
5646
|
0
|
|
|
|
|
|
$xfer += $self->{sde}->read($input); |
5647
|
|
|
|
|
|
|
} else { |
5648
|
0
|
|
|
|
|
|
$xfer += $input->skip($ftype); |
5649
|
|
|
|
|
|
|
} |
5650
|
0
|
|
|
|
|
|
last; }; |
5651
|
0
|
|
|
|
|
|
$xfer += $input->skip($ftype); |
5652
|
|
|
|
|
|
|
} |
5653
|
0
|
|
|
|
|
|
$xfer += $input->readFieldEnd(); |
5654
|
|
|
|
|
|
|
} |
5655
|
0
|
|
|
|
|
|
$xfer += $input->readStructEnd(); |
5656
|
0
|
|
|
|
|
|
return $xfer; |
5657
|
|
|
|
|
|
|
} |
5658
|
|
|
|
|
|
|
|
5659
|
|
|
|
|
|
|
sub write { |
5660
|
0
|
|
|
0
|
|
|
my ($self, $output) = @_; |
5661
|
0
|
|
|
|
|
|
my $xfer = 0; |
5662
|
0
|
|
|
|
|
|
$xfer += $output->writeStructBegin('Cassandra_system_update_column_family_result'); |
5663
|
0
|
0
|
|
|
|
|
if (defined $self->{success}) { |
5664
|
0
|
|
|
|
|
|
$xfer += $output->writeFieldBegin('success', TType::STRING, 0); |
5665
|
0
|
|
|
|
|
|
$xfer += $output->writeString($self->{success}); |
5666
|
0
|
|
|
|
|
|
$xfer += $output->writeFieldEnd(); |
5667
|
|
|
|
|
|
|
} |
5668
|
0
|
0
|
|
|
|
|
if (defined $self->{ire}) { |
5669
|
0
|
|
|
|
|
|
$xfer += $output->writeFieldBegin('ire', TType::STRUCT, 1); |
5670
|
0
|
|
|
|
|
|
$xfer += $self->{ire}->write($output); |
5671
|
0
|
|
|
|
|
|
$xfer += $output->writeFieldEnd(); |
5672
|
|
|
|
|
|
|
} |
5673
|
0
|
0
|
|
|
|
|
if (defined $self->{sde}) { |
5674
|
0
|
|
|
|
|
|
$xfer += $output->writeFieldBegin('sde', TType::STRUCT, 2); |
5675
|
0
|
|
|
|
|
|
$xfer += $self->{sde}->write($output); |
5676
|
0
|
|
|
|
|
|
$xfer += $output->writeFieldEnd(); |
5677
|
|
|
|
|
|
|
} |
5678
|
0
|
|
|
|
|
|
$xfer += $output->writeFieldStop(); |
5679
|
0
|
|
|
|
|
|
$xfer += $output->writeStructEnd(); |
5680
|
0
|
|
|
|
|
|
return $xfer; |
5681
|
|
|
|
|
|
|
} |
5682
|
|
|
|
|
|
|
|
5683
|
|
|
|
|
|
|
package Cassandra::Cassandra_execute_cql_query_args; |
5684
|
|
|
|
|
|
|
BEGIN { |
5685
|
1
|
|
|
1
|
|
24
|
$Cassandra::Cassandra_execute_cql_query_args::VERSION = '0.4.0'; |
5686
|
|
|
|
|
|
|
} |
5687
|
1
|
|
|
1
|
|
6
|
use base qw(Class::Accessor); |
|
1
|
|
|
|
|
1
|
|
|
1
|
|
|
|
|
485
|
|
5688
|
|
|
|
|
|
|
Cassandra::Cassandra_execute_cql_query_args->mk_accessors( qw( query compression ) ); |
5689
|
|
|
|
|
|
|
|
5690
|
|
|
|
|
|
|
sub new { |
5691
|
0
|
|
|
0
|
|
|
my $classname = shift; |
5692
|
0
|
|
|
|
|
|
my $self = {}; |
5693
|
0
|
|
0
|
|
|
|
my $vals = shift || {}; |
5694
|
0
|
|
|
|
|
|
$self->{query} = undef; |
5695
|
0
|
|
|
|
|
|
$self->{compression} = undef; |
5696
|
0
|
0
|
|
|
|
|
if (UNIVERSAL::isa($vals,'HASH')) { |
5697
|
0
|
0
|
|
|
|
|
if (defined $vals->{query}) { |
5698
|
0
|
|
|
|
|
|
$self->{query} = $vals->{query}; |
5699
|
|
|
|
|
|
|
} |
5700
|
0
|
0
|
|
|
|
|
if (defined $vals->{compression}) { |
5701
|
0
|
|
|
|
|
|
$self->{compression} = $vals->{compression}; |
5702
|
|
|
|
|
|
|
} |
5703
|
|
|
|
|
|
|
} |
5704
|
0
|
|
|
|
|
|
return bless ($self, $classname); |
5705
|
|
|
|
|
|
|
} |
5706
|
|
|
|
|
|
|
|
5707
|
|
|
|
|
|
|
sub getName { |
5708
|
0
|
|
|
0
|
|
|
return 'Cassandra_execute_cql_query_args'; |
5709
|
|
|
|
|
|
|
} |
5710
|
|
|
|
|
|
|
|
5711
|
|
|
|
|
|
|
sub read { |
5712
|
0
|
|
|
0
|
|
|
my ($self, $input) = @_; |
5713
|
0
|
|
|
|
|
|
my $xfer = 0; |
5714
|
0
|
|
|
|
|
|
my $fname; |
5715
|
0
|
|
|
|
|
|
my $ftype = 0; |
5716
|
0
|
|
|
|
|
|
my $fid = 0; |
5717
|
0
|
|
|
|
|
|
$xfer += $input->readStructBegin(\$fname); |
5718
|
0
|
|
|
|
|
|
while (1) |
5719
|
|
|
|
|
|
|
{ |
5720
|
0
|
|
|
|
|
|
$xfer += $input->readFieldBegin(\$fname, \$ftype, \$fid); |
5721
|
0
|
0
|
|
|
|
|
if ($ftype == TType::STOP) { |
5722
|
0
|
|
|
|
|
|
last; |
5723
|
|
|
|
|
|
|
} |
5724
|
0
|
|
|
|
|
|
SWITCH: for($fid) |
5725
|
|
|
|
|
|
|
{ |
5726
|
0
|
0
|
|
|
|
|
/^1$/ && do{ if ($ftype == TType::STRING) { |
|
0
|
0
|
|
|
|
|
|
5727
|
0
|
|
|
|
|
|
$xfer += $input->readString(\$self->{query}); |
5728
|
|
|
|
|
|
|
} else { |
5729
|
0
|
|
|
|
|
|
$xfer += $input->skip($ftype); |
5730
|
|
|
|
|
|
|
} |
5731
|
0
|
|
|
|
|
|
last; }; |
5732
|
0
|
0
|
|
|
|
|
/^2$/ && do{ if ($ftype == TType::I32) { |
|
0
|
0
|
|
|
|
|
|
5733
|
0
|
|
|
|
|
|
$xfer += $input->readI32(\$self->{compression}); |
5734
|
|
|
|
|
|
|
} else { |
5735
|
0
|
|
|
|
|
|
$xfer += $input->skip($ftype); |
5736
|
|
|
|
|
|
|
} |
5737
|
0
|
|
|
|
|
|
last; }; |
5738
|
0
|
|
|
|
|
|
$xfer += $input->skip($ftype); |
5739
|
|
|
|
|
|
|
} |
5740
|
0
|
|
|
|
|
|
$xfer += $input->readFieldEnd(); |
5741
|
|
|
|
|
|
|
} |
5742
|
0
|
|
|
|
|
|
$xfer += $input->readStructEnd(); |
5743
|
0
|
|
|
|
|
|
return $xfer; |
5744
|
|
|
|
|
|
|
} |
5745
|
|
|
|
|
|
|
|
5746
|
|
|
|
|
|
|
sub write { |
5747
|
0
|
|
|
0
|
|
|
my ($self, $output) = @_; |
5748
|
0
|
|
|
|
|
|
my $xfer = 0; |
5749
|
0
|
|
|
|
|
|
$xfer += $output->writeStructBegin('Cassandra_execute_cql_query_args'); |
5750
|
0
|
0
|
|
|
|
|
if (defined $self->{query}) { |
5751
|
0
|
|
|
|
|
|
$xfer += $output->writeFieldBegin('query', TType::STRING, 1); |
5752
|
0
|
|
|
|
|
|
$xfer += $output->writeString($self->{query}); |
5753
|
0
|
|
|
|
|
|
$xfer += $output->writeFieldEnd(); |
5754
|
|
|
|
|
|
|
} |
5755
|
0
|
0
|
|
|
|
|
if (defined $self->{compression}) { |
5756
|
0
|
|
|
|
|
|
$xfer += $output->writeFieldBegin('compression', TType::I32, 2); |
5757
|
0
|
|
|
|
|
|
$xfer += $output->writeI32($self->{compression}); |
5758
|
0
|
|
|
|
|
|
$xfer += $output->writeFieldEnd(); |
5759
|
|
|
|
|
|
|
} |
5760
|
0
|
|
|
|
|
|
$xfer += $output->writeFieldStop(); |
5761
|
0
|
|
|
|
|
|
$xfer += $output->writeStructEnd(); |
5762
|
0
|
|
|
|
|
|
return $xfer; |
5763
|
|
|
|
|
|
|
} |
5764
|
|
|
|
|
|
|
|
5765
|
|
|
|
|
|
|
package Cassandra::Cassandra_execute_cql_query_result; |
5766
|
|
|
|
|
|
|
BEGIN { |
5767
|
1
|
|
|
1
|
|
21
|
$Cassandra::Cassandra_execute_cql_query_result::VERSION = '0.4.0'; |
5768
|
|
|
|
|
|
|
} |
5769
|
1
|
|
|
1
|
|
5
|
use base qw(Class::Accessor); |
|
1
|
|
|
|
|
2
|
|
|
1
|
|
|
|
|
820
|
|
5770
|
|
|
|
|
|
|
Cassandra::Cassandra_execute_cql_query_result->mk_accessors( qw( success ) ); |
5771
|
|
|
|
|
|
|
|
5772
|
|
|
|
|
|
|
sub new { |
5773
|
0
|
|
|
0
|
|
|
my $classname = shift; |
5774
|
0
|
|
|
|
|
|
my $self = {}; |
5775
|
0
|
|
0
|
|
|
|
my $vals = shift || {}; |
5776
|
0
|
|
|
|
|
|
$self->{success} = undef; |
5777
|
0
|
|
|
|
|
|
$self->{ire} = undef; |
5778
|
0
|
|
|
|
|
|
$self->{ue} = undef; |
5779
|
0
|
|
|
|
|
|
$self->{te} = undef; |
5780
|
0
|
|
|
|
|
|
$self->{sde} = undef; |
5781
|
0
|
0
|
|
|
|
|
if (UNIVERSAL::isa($vals,'HASH')) { |
5782
|
0
|
0
|
|
|
|
|
if (defined $vals->{success}) { |
5783
|
0
|
|
|
|
|
|
$self->{success} = $vals->{success}; |
5784
|
|
|
|
|
|
|
} |
5785
|
0
|
0
|
|
|
|
|
if (defined $vals->{ire}) { |
5786
|
0
|
|
|
|
|
|
$self->{ire} = $vals->{ire}; |
5787
|
|
|
|
|
|
|
} |
5788
|
0
|
0
|
|
|
|
|
if (defined $vals->{ue}) { |
5789
|
0
|
|
|
|
|
|
$self->{ue} = $vals->{ue}; |
5790
|
|
|
|
|
|
|
} |
5791
|
0
|
0
|
|
|
|
|
if (defined $vals->{te}) { |
5792
|
0
|
|
|
|
|
|
$self->{te} = $vals->{te}; |
5793
|
|
|
|
|
|
|
} |
5794
|
0
|
0
|
|
|
|
|
if (defined $vals->{sde}) { |
5795
|
0
|
|
|
|
|
|
$self->{sde} = $vals->{sde}; |
5796
|
|
|
|
|
|
|
} |
5797
|
|
|
|
|
|
|
} |
5798
|
0
|
|
|
|
|
|
return bless ($self, $classname); |
5799
|
|
|
|
|
|
|
} |
5800
|
|
|
|
|
|
|
|
5801
|
|
|
|
|
|
|
sub getName { |
5802
|
0
|
|
|
0
|
|
|
return 'Cassandra_execute_cql_query_result'; |
5803
|
|
|
|
|
|
|
} |
5804
|
|
|
|
|
|
|
|
5805
|
|
|
|
|
|
|
sub read { |
5806
|
0
|
|
|
0
|
|
|
my ($self, $input) = @_; |
5807
|
0
|
|
|
|
|
|
my $xfer = 0; |
5808
|
0
|
|
|
|
|
|
my $fname; |
5809
|
0
|
|
|
|
|
|
my $ftype = 0; |
5810
|
0
|
|
|
|
|
|
my $fid = 0; |
5811
|
0
|
|
|
|
|
|
$xfer += $input->readStructBegin(\$fname); |
5812
|
0
|
|
|
|
|
|
while (1) |
5813
|
|
|
|
|
|
|
{ |
5814
|
0
|
|
|
|
|
|
$xfer += $input->readFieldBegin(\$fname, \$ftype, \$fid); |
5815
|
0
|
0
|
|
|
|
|
if ($ftype == TType::STOP) { |
5816
|
0
|
|
|
|
|
|
last; |
5817
|
|
|
|
|
|
|
} |
5818
|
0
|
|
|
|
|
|
SWITCH: for($fid) |
5819
|
|
|
|
|
|
|
{ |
5820
|
0
|
0
|
|
|
|
|
/^0$/ && do{ if ($ftype == TType::STRUCT) { |
|
0
|
0
|
|
|
|
|
|
5821
|
0
|
|
|
|
|
|
$self->{success} = new Cassandra::CqlResult(); |
5822
|
0
|
|
|
|
|
|
$xfer += $self->{success}->read($input); |
5823
|
|
|
|
|
|
|
} else { |
5824
|
0
|
|
|
|
|
|
$xfer += $input->skip($ftype); |
5825
|
|
|
|
|
|
|
} |
5826
|
0
|
|
|
|
|
|
last; }; |
5827
|
0
|
0
|
|
|
|
|
/^1$/ && do{ if ($ftype == TType::STRUCT) { |
|
0
|
0
|
|
|
|
|
|
5828
|
0
|
|
|
|
|
|
$self->{ire} = new Cassandra::InvalidRequestException(); |
5829
|
0
|
|
|
|
|
|
$xfer += $self->{ire}->read($input); |
5830
|
|
|
|
|
|
|
} else { |
5831
|
0
|
|
|
|
|
|
$xfer += $input->skip($ftype); |
5832
|
|
|
|
|
|
|
} |
5833
|
0
|
|
|
|
|
|
last; }; |
5834
|
0
|
0
|
|
|
|
|
/^2$/ && do{ if ($ftype == TType::STRUCT) { |
|
0
|
0
|
|
|
|
|
|
5835
|
0
|
|
|
|
|
|
$self->{ue} = new Cassandra::UnavailableException(); |
5836
|
0
|
|
|
|
|
|
$xfer += $self->{ue}->read($input); |
5837
|
|
|
|
|
|
|
} else { |
5838
|
0
|
|
|
|
|
|
$xfer += $input->skip($ftype); |
5839
|
|
|
|
|
|
|
} |
5840
|
0
|
|
|
|
|
|
last; }; |
5841
|
0
|
0
|
|
|
|
|
/^3$/ && do{ if ($ftype == TType::STRUCT) { |
|
0
|
0
|
|
|
|
|
|
5842
|
0
|
|
|
|
|
|
$self->{te} = new Cassandra::TimedOutException(); |
5843
|
0
|
|
|
|
|
|
$xfer += $self->{te}->read($input); |
5844
|
|
|
|
|
|
|
} else { |
5845
|
0
|
|
|
|
|
|
$xfer += $input->skip($ftype); |
5846
|
|
|
|
|
|
|
} |
5847
|
0
|
|
|
|
|
|
last; }; |
5848
|
0
|
0
|
|
|
|
|
/^4$/ && do{ if ($ftype == TType::STRUCT) { |
|
0
|
0
|
|
|
|
|
|
5849
|
0
|
|
|
|
|
|
$self->{sde} = new Cassandra::SchemaDisagreementException(); |
5850
|
0
|
|
|
|
|
|
$xfer += $self->{sde}->read($input); |
5851
|
|
|
|
|
|
|
} else { |
5852
|
0
|
|
|
|
|
|
$xfer += $input->skip($ftype); |
5853
|
|
|
|
|
|
|
} |
5854
|
0
|
|
|
|
|
|
last; }; |
5855
|
0
|
|
|
|
|
|
$xfer += $input->skip($ftype); |
5856
|
|
|
|
|
|
|
} |
5857
|
0
|
|
|
|
|
|
$xfer += $input->readFieldEnd(); |
5858
|
|
|
|
|
|
|
} |
5859
|
0
|
|
|
|
|
|
$xfer += $input->readStructEnd(); |
5860
|
0
|
|
|
|
|
|
return $xfer; |
5861
|
|
|
|
|
|
|
} |
5862
|
|
|
|
|
|
|
|
5863
|
|
|
|
|
|
|
sub write { |
5864
|
0
|
|
|
0
|
|
|
my ($self, $output) = @_; |
5865
|
0
|
|
|
|
|
|
my $xfer = 0; |
5866
|
0
|
|
|
|
|
|
$xfer += $output->writeStructBegin('Cassandra_execute_cql_query_result'); |
5867
|
0
|
0
|
|
|
|
|
if (defined $self->{success}) { |
5868
|
0
|
|
|
|
|
|
$xfer += $output->writeFieldBegin('success', TType::STRUCT, 0); |
5869
|
0
|
|
|
|
|
|
$xfer += $self->{success}->write($output); |
5870
|
0
|
|
|
|
|
|
$xfer += $output->writeFieldEnd(); |
5871
|
|
|
|
|
|
|
} |
5872
|
0
|
0
|
|
|
|
|
if (defined $self->{ire}) { |
5873
|
0
|
|
|
|
|
|
$xfer += $output->writeFieldBegin('ire', TType::STRUCT, 1); |
5874
|
0
|
|
|
|
|
|
$xfer += $self->{ire}->write($output); |
5875
|
0
|
|
|
|
|
|
$xfer += $output->writeFieldEnd(); |
5876
|
|
|
|
|
|
|
} |
5877
|
0
|
0
|
|
|
|
|
if (defined $self->{ue}) { |
5878
|
0
|
|
|
|
|
|
$xfer += $output->writeFieldBegin('ue', TType::STRUCT, 2); |
5879
|
0
|
|
|
|
|
|
$xfer += $self->{ue}->write($output); |
5880
|
0
|
|
|
|
|
|
$xfer += $output->writeFieldEnd(); |
5881
|
|
|
|
|
|
|
} |
5882
|
0
|
0
|
|
|
|
|
if (defined $self->{te}) { |
5883
|
0
|
|
|
|
|
|
$xfer += $output->writeFieldBegin('te', TType::STRUCT, 3); |
5884
|
0
|
|
|
|
|
|
$xfer += $self->{te}->write($output); |
5885
|
0
|
|
|
|
|
|
$xfer += $output->writeFieldEnd(); |
5886
|
|
|
|
|
|
|
} |
5887
|
0
|
0
|
|
|
|
|
if (defined $self->{sde}) { |
5888
|
0
|
|
|
|
|
|
$xfer += $output->writeFieldBegin('sde', TType::STRUCT, 4); |
5889
|
0
|
|
|
|
|
|
$xfer += $self->{sde}->write($output); |
5890
|
0
|
|
|
|
|
|
$xfer += $output->writeFieldEnd(); |
5891
|
|
|
|
|
|
|
} |
5892
|
0
|
|
|
|
|
|
$xfer += $output->writeFieldStop(); |
5893
|
0
|
|
|
|
|
|
$xfer += $output->writeStructEnd(); |
5894
|
0
|
|
|
|
|
|
return $xfer; |
5895
|
|
|
|
|
|
|
} |
5896
|
|
|
|
|
|
|
|
5897
|
|
|
|
|
|
|
package Cassandra::CassandraIf; |
5898
|
|
|
|
|
|
|
BEGIN { |
5899
|
1
|
|
|
1
|
|
16
|
$Cassandra::CassandraIf::VERSION = '0.4.0'; |
5900
|
|
|
|
|
|
|
} |
5901
|
|
|
|
|
|
|
|
5902
|
1
|
|
|
1
|
|
6
|
use strict; |
|
1
|
|
|
|
|
2
|
|
|
1
|
|
|
|
|
1161
|
|
5903
|
|
|
|
|
|
|
|
5904
|
|
|
|
|
|
|
|
5905
|
|
|
|
|
|
|
sub login{ |
5906
|
0
|
|
|
0
|
|
|
my $self = shift; |
5907
|
0
|
|
|
|
|
|
my $auth_request = shift; |
5908
|
|
|
|
|
|
|
|
5909
|
0
|
|
|
|
|
|
die 'implement interface'; |
5910
|
|
|
|
|
|
|
} |
5911
|
|
|
|
|
|
|
|
5912
|
|
|
|
|
|
|
sub set_keyspace{ |
5913
|
0
|
|
|
0
|
|
|
my $self = shift; |
5914
|
0
|
|
|
|
|
|
my $keyspace = shift; |
5915
|
|
|
|
|
|
|
|
5916
|
0
|
|
|
|
|
|
die 'implement interface'; |
5917
|
|
|
|
|
|
|
} |
5918
|
|
|
|
|
|
|
|
5919
|
|
|
|
|
|
|
sub get{ |
5920
|
0
|
|
|
0
|
|
|
my $self = shift; |
5921
|
0
|
|
|
|
|
|
my $key = shift; |
5922
|
0
|
|
|
|
|
|
my $column_path = shift; |
5923
|
0
|
|
|
|
|
|
my $consistency_level = shift; |
5924
|
|
|
|
|
|
|
|
5925
|
0
|
|
|
|
|
|
die 'implement interface'; |
5926
|
|
|
|
|
|
|
} |
5927
|
|
|
|
|
|
|
|
5928
|
|
|
|
|
|
|
sub get_slice{ |
5929
|
0
|
|
|
0
|
|
|
my $self = shift; |
5930
|
0
|
|
|
|
|
|
my $key = shift; |
5931
|
0
|
|
|
|
|
|
my $column_parent = shift; |
5932
|
0
|
|
|
|
|
|
my $predicate = shift; |
5933
|
0
|
|
|
|
|
|
my $consistency_level = shift; |
5934
|
|
|
|
|
|
|
|
5935
|
0
|
|
|
|
|
|
die 'implement interface'; |
5936
|
|
|
|
|
|
|
} |
5937
|
|
|
|
|
|
|
|
5938
|
|
|
|
|
|
|
sub get_count{ |
5939
|
0
|
|
|
0
|
|
|
my $self = shift; |
5940
|
0
|
|
|
|
|
|
my $key = shift; |
5941
|
0
|
|
|
|
|
|
my $column_parent = shift; |
5942
|
0
|
|
|
|
|
|
my $predicate = shift; |
5943
|
0
|
|
|
|
|
|
my $consistency_level = shift; |
5944
|
|
|
|
|
|
|
|
5945
|
0
|
|
|
|
|
|
die 'implement interface'; |
5946
|
|
|
|
|
|
|
} |
5947
|
|
|
|
|
|
|
|
5948
|
|
|
|
|
|
|
sub multiget_slice{ |
5949
|
0
|
|
|
0
|
|
|
my $self = shift; |
5950
|
0
|
|
|
|
|
|
my $keys = shift; |
5951
|
0
|
|
|
|
|
|
my $column_parent = shift; |
5952
|
0
|
|
|
|
|
|
my $predicate = shift; |
5953
|
0
|
|
|
|
|
|
my $consistency_level = shift; |
5954
|
|
|
|
|
|
|
|
5955
|
0
|
|
|
|
|
|
die 'implement interface'; |
5956
|
|
|
|
|
|
|
} |
5957
|
|
|
|
|
|
|
|
5958
|
|
|
|
|
|
|
sub multiget_count{ |
5959
|
0
|
|
|
0
|
|
|
my $self = shift; |
5960
|
0
|
|
|
|
|
|
my $keys = shift; |
5961
|
0
|
|
|
|
|
|
my $column_parent = shift; |
5962
|
0
|
|
|
|
|
|
my $predicate = shift; |
5963
|
0
|
|
|
|
|
|
my $consistency_level = shift; |
5964
|
|
|
|
|
|
|
|
5965
|
0
|
|
|
|
|
|
die 'implement interface'; |
5966
|
|
|
|
|
|
|
} |
5967
|
|
|
|
|
|
|
|
5968
|
|
|
|
|
|
|
sub get_range_slices{ |
5969
|
0
|
|
|
0
|
|
|
my $self = shift; |
5970
|
0
|
|
|
|
|
|
my $column_parent = shift; |
5971
|
0
|
|
|
|
|
|
my $predicate = shift; |
5972
|
0
|
|
|
|
|
|
my $range = shift; |
5973
|
0
|
|
|
|
|
|
my $consistency_level = shift; |
5974
|
|
|
|
|
|
|
|
5975
|
0
|
|
|
|
|
|
die 'implement interface'; |
5976
|
|
|
|
|
|
|
} |
5977
|
|
|
|
|
|
|
|
5978
|
|
|
|
|
|
|
sub get_indexed_slices{ |
5979
|
0
|
|
|
0
|
|
|
my $self = shift; |
5980
|
0
|
|
|
|
|
|
my $column_parent = shift; |
5981
|
0
|
|
|
|
|
|
my $index_clause = shift; |
5982
|
0
|
|
|
|
|
|
my $column_predicate = shift; |
5983
|
0
|
|
|
|
|
|
my $consistency_level = shift; |
5984
|
|
|
|
|
|
|
|
5985
|
0
|
|
|
|
|
|
die 'implement interface'; |
5986
|
|
|
|
|
|
|
} |
5987
|
|
|
|
|
|
|
|
5988
|
|
|
|
|
|
|
sub insert{ |
5989
|
0
|
|
|
0
|
|
|
my $self = shift; |
5990
|
0
|
|
|
|
|
|
my $key = shift; |
5991
|
0
|
|
|
|
|
|
my $column_parent = shift; |
5992
|
0
|
|
|
|
|
|
my $column = shift; |
5993
|
0
|
|
|
|
|
|
my $consistency_level = shift; |
5994
|
|
|
|
|
|
|
|
5995
|
0
|
|
|
|
|
|
die 'implement interface'; |
5996
|
|
|
|
|
|
|
} |
5997
|
|
|
|
|
|
|
|
5998
|
|
|
|
|
|
|
sub add{ |
5999
|
0
|
|
|
0
|
|
|
my $self = shift; |
6000
|
0
|
|
|
|
|
|
my $key = shift; |
6001
|
0
|
|
|
|
|
|
my $column_parent = shift; |
6002
|
0
|
|
|
|
|
|
my $column = shift; |
6003
|
0
|
|
|
|
|
|
my $consistency_level = shift; |
6004
|
|
|
|
|
|
|
|
6005
|
0
|
|
|
|
|
|
die 'implement interface'; |
6006
|
|
|
|
|
|
|
} |
6007
|
|
|
|
|
|
|
|
6008
|
|
|
|
|
|
|
sub remove{ |
6009
|
0
|
|
|
0
|
|
|
my $self = shift; |
6010
|
0
|
|
|
|
|
|
my $key = shift; |
6011
|
0
|
|
|
|
|
|
my $column_path = shift; |
6012
|
0
|
|
|
|
|
|
my $timestamp = shift; |
6013
|
0
|
|
|
|
|
|
my $consistency_level = shift; |
6014
|
|
|
|
|
|
|
|
6015
|
0
|
|
|
|
|
|
die 'implement interface'; |
6016
|
|
|
|
|
|
|
} |
6017
|
|
|
|
|
|
|
|
6018
|
|
|
|
|
|
|
sub remove_counter{ |
6019
|
0
|
|
|
0
|
|
|
my $self = shift; |
6020
|
0
|
|
|
|
|
|
my $key = shift; |
6021
|
0
|
|
|
|
|
|
my $path = shift; |
6022
|
0
|
|
|
|
|
|
my $consistency_level = shift; |
6023
|
|
|
|
|
|
|
|
6024
|
0
|
|
|
|
|
|
die 'implement interface'; |
6025
|
|
|
|
|
|
|
} |
6026
|
|
|
|
|
|
|
|
6027
|
|
|
|
|
|
|
sub batch_mutate{ |
6028
|
0
|
|
|
0
|
|
|
my $self = shift; |
6029
|
0
|
|
|
|
|
|
my $mutation_map = shift; |
6030
|
0
|
|
|
|
|
|
my $consistency_level = shift; |
6031
|
|
|
|
|
|
|
|
6032
|
0
|
|
|
|
|
|
die 'implement interface'; |
6033
|
|
|
|
|
|
|
} |
6034
|
|
|
|
|
|
|
|
6035
|
|
|
|
|
|
|
sub truncate{ |
6036
|
0
|
|
|
0
|
|
|
my $self = shift; |
6037
|
0
|
|
|
|
|
|
my $cfname = shift; |
6038
|
|
|
|
|
|
|
|
6039
|
0
|
|
|
|
|
|
die 'implement interface'; |
6040
|
|
|
|
|
|
|
} |
6041
|
|
|
|
|
|
|
|
6042
|
|
|
|
|
|
|
sub describe_schema_versions{ |
6043
|
0
|
|
|
0
|
|
|
my $self = shift; |
6044
|
|
|
|
|
|
|
|
6045
|
0
|
|
|
|
|
|
die 'implement interface'; |
6046
|
|
|
|
|
|
|
} |
6047
|
|
|
|
|
|
|
|
6048
|
|
|
|
|
|
|
sub describe_keyspaces{ |
6049
|
0
|
|
|
0
|
|
|
my $self = shift; |
6050
|
|
|
|
|
|
|
|
6051
|
0
|
|
|
|
|
|
die 'implement interface'; |
6052
|
|
|
|
|
|
|
} |
6053
|
|
|
|
|
|
|
|
6054
|
|
|
|
|
|
|
sub describe_cluster_name{ |
6055
|
0
|
|
|
0
|
|
|
my $self = shift; |
6056
|
|
|
|
|
|
|
|
6057
|
0
|
|
|
|
|
|
die 'implement interface'; |
6058
|
|
|
|
|
|
|
} |
6059
|
|
|
|
|
|
|
|
6060
|
|
|
|
|
|
|
sub describe_version{ |
6061
|
0
|
|
|
0
|
|
|
my $self = shift; |
6062
|
|
|
|
|
|
|
|
6063
|
0
|
|
|
|
|
|
die 'implement interface'; |
6064
|
|
|
|
|
|
|
} |
6065
|
|
|
|
|
|
|
|
6066
|
|
|
|
|
|
|
sub describe_ring{ |
6067
|
0
|
|
|
0
|
|
|
my $self = shift; |
6068
|
0
|
|
|
|
|
|
my $keyspace = shift; |
6069
|
|
|
|
|
|
|
|
6070
|
0
|
|
|
|
|
|
die 'implement interface'; |
6071
|
|
|
|
|
|
|
} |
6072
|
|
|
|
|
|
|
|
6073
|
|
|
|
|
|
|
sub describe_partitioner{ |
6074
|
0
|
|
|
0
|
|
|
my $self = shift; |
6075
|
|
|
|
|
|
|
|
6076
|
0
|
|
|
|
|
|
die 'implement interface'; |
6077
|
|
|
|
|
|
|
} |
6078
|
|
|
|
|
|
|
|
6079
|
|
|
|
|
|
|
sub describe_snitch{ |
6080
|
0
|
|
|
0
|
|
|
my $self = shift; |
6081
|
|
|
|
|
|
|
|
6082
|
0
|
|
|
|
|
|
die 'implement interface'; |
6083
|
|
|
|
|
|
|
} |
6084
|
|
|
|
|
|
|
|
6085
|
|
|
|
|
|
|
sub describe_keyspace{ |
6086
|
0
|
|
|
0
|
|
|
my $self = shift; |
6087
|
0
|
|
|
|
|
|
my $keyspace = shift; |
6088
|
|
|
|
|
|
|
|
6089
|
0
|
|
|
|
|
|
die 'implement interface'; |
6090
|
|
|
|
|
|
|
} |
6091
|
|
|
|
|
|
|
|
6092
|
|
|
|
|
|
|
sub describe_splits{ |
6093
|
0
|
|
|
0
|
|
|
my $self = shift; |
6094
|
0
|
|
|
|
|
|
my $cfName = shift; |
6095
|
0
|
|
|
|
|
|
my $start_token = shift; |
6096
|
0
|
|
|
|
|
|
my $end_token = shift; |
6097
|
0
|
|
|
|
|
|
my $keys_per_split = shift; |
6098
|
|
|
|
|
|
|
|
6099
|
0
|
|
|
|
|
|
die 'implement interface'; |
6100
|
|
|
|
|
|
|
} |
6101
|
|
|
|
|
|
|
|
6102
|
|
|
|
|
|
|
sub system_add_column_family{ |
6103
|
0
|
|
|
0
|
|
|
my $self = shift; |
6104
|
0
|
|
|
|
|
|
my $cf_def = shift; |
6105
|
|
|
|
|
|
|
|
6106
|
0
|
|
|
|
|
|
die 'implement interface'; |
6107
|
|
|
|
|
|
|
} |
6108
|
|
|
|
|
|
|
|
6109
|
|
|
|
|
|
|
sub system_drop_column_family{ |
6110
|
0
|
|
|
0
|
|
|
my $self = shift; |
6111
|
0
|
|
|
|
|
|
my $column_family = shift; |
6112
|
|
|
|
|
|
|
|
6113
|
0
|
|
|
|
|
|
die 'implement interface'; |
6114
|
|
|
|
|
|
|
} |
6115
|
|
|
|
|
|
|
|
6116
|
|
|
|
|
|
|
sub system_add_keyspace{ |
6117
|
0
|
|
|
0
|
|
|
my $self = shift; |
6118
|
0
|
|
|
|
|
|
my $ks_def = shift; |
6119
|
|
|
|
|
|
|
|
6120
|
0
|
|
|
|
|
|
die 'implement interface'; |
6121
|
|
|
|
|
|
|
} |
6122
|
|
|
|
|
|
|
|
6123
|
|
|
|
|
|
|
sub system_drop_keyspace{ |
6124
|
0
|
|
|
0
|
|
|
my $self = shift; |
6125
|
0
|
|
|
|
|
|
my $keyspace = shift; |
6126
|
|
|
|
|
|
|
|
6127
|
0
|
|
|
|
|
|
die 'implement interface'; |
6128
|
|
|
|
|
|
|
} |
6129
|
|
|
|
|
|
|
|
6130
|
|
|
|
|
|
|
sub system_update_keyspace{ |
6131
|
0
|
|
|
0
|
|
|
my $self = shift; |
6132
|
0
|
|
|
|
|
|
my $ks_def = shift; |
6133
|
|
|
|
|
|
|
|
6134
|
0
|
|
|
|
|
|
die 'implement interface'; |
6135
|
|
|
|
|
|
|
} |
6136
|
|
|
|
|
|
|
|
6137
|
|
|
|
|
|
|
sub system_update_column_family{ |
6138
|
0
|
|
|
0
|
|
|
my $self = shift; |
6139
|
0
|
|
|
|
|
|
my $cf_def = shift; |
6140
|
|
|
|
|
|
|
|
6141
|
0
|
|
|
|
|
|
die 'implement interface'; |
6142
|
|
|
|
|
|
|
} |
6143
|
|
|
|
|
|
|
|
6144
|
|
|
|
|
|
|
sub execute_cql_query{ |
6145
|
0
|
|
|
0
|
|
|
my $self = shift; |
6146
|
0
|
|
|
|
|
|
my $query = shift; |
6147
|
0
|
|
|
|
|
|
my $compression = shift; |
6148
|
|
|
|
|
|
|
|
6149
|
0
|
|
|
|
|
|
die 'implement interface'; |
6150
|
|
|
|
|
|
|
} |
6151
|
|
|
|
|
|
|
|
6152
|
|
|
|
|
|
|
package Cassandra::CassandraRest; |
6153
|
|
|
|
|
|
|
BEGIN { |
6154
|
1
|
|
|
1
|
|
17
|
$Cassandra::CassandraRest::VERSION = '0.4.0'; |
6155
|
|
|
|
|
|
|
} |
6156
|
|
|
|
|
|
|
|
6157
|
1
|
|
|
1
|
|
16
|
use strict; |
|
1
|
|
|
|
|
2
|
|
|
1
|
|
|
|
|
2124
|
|
6158
|
|
|
|
|
|
|
|
6159
|
|
|
|
|
|
|
|
6160
|
|
|
|
|
|
|
sub new { |
6161
|
0
|
|
|
0
|
|
|
my ($classname, $impl) = @_; |
6162
|
0
|
|
|
|
|
|
my $self ={ impl => $impl }; |
6163
|
|
|
|
|
|
|
|
6164
|
0
|
|
|
|
|
|
return bless($self,$classname); |
6165
|
|
|
|
|
|
|
} |
6166
|
|
|
|
|
|
|
|
6167
|
|
|
|
|
|
|
sub login{ |
6168
|
0
|
|
|
0
|
|
|
my ($self, $request) = @_; |
6169
|
|
|
|
|
|
|
|
6170
|
0
|
0
|
|
|
|
|
my $auth_request = ($request->{'auth_request'}) ? $request->{'auth_request'} : undef; |
6171
|
0
|
|
|
|
|
|
return $self->{impl}->login($auth_request); |
6172
|
|
|
|
|
|
|
} |
6173
|
|
|
|
|
|
|
|
6174
|
|
|
|
|
|
|
sub set_keyspace{ |
6175
|
0
|
|
|
0
|
|
|
my ($self, $request) = @_; |
6176
|
|
|
|
|
|
|
|
6177
|
0
|
0
|
|
|
|
|
my $keyspace = ($request->{'keyspace'}) ? $request->{'keyspace'} : undef; |
6178
|
0
|
|
|
|
|
|
return $self->{impl}->set_keyspace($keyspace); |
6179
|
|
|
|
|
|
|
} |
6180
|
|
|
|
|
|
|
|
6181
|
|
|
|
|
|
|
sub get{ |
6182
|
0
|
|
|
0
|
|
|
my ($self, $request) = @_; |
6183
|
|
|
|
|
|
|
|
6184
|
0
|
0
|
|
|
|
|
my $key = ($request->{'key'}) ? $request->{'key'} : undef; |
6185
|
0
|
0
|
|
|
|
|
my $column_path = ($request->{'column_path'}) ? $request->{'column_path'} : undef; |
6186
|
0
|
0
|
|
|
|
|
my $consistency_level = ($request->{'consistency_level'}) ? $request->{'consistency_level'} : undef; |
6187
|
0
|
|
|
|
|
|
return $self->{impl}->get($key, $column_path, $consistency_level); |
6188
|
|
|
|
|
|
|
} |
6189
|
|
|
|
|
|
|
|
6190
|
|
|
|
|
|
|
sub get_slice{ |
6191
|
0
|
|
|
0
|
|
|
my ($self, $request) = @_; |
6192
|
|
|
|
|
|
|
|
6193
|
0
|
0
|
|
|
|
|
my $key = ($request->{'key'}) ? $request->{'key'} : undef; |
6194
|
0
|
0
|
|
|
|
|
my $column_parent = ($request->{'column_parent'}) ? $request->{'column_parent'} : undef; |
6195
|
0
|
0
|
|
|
|
|
my $predicate = ($request->{'predicate'}) ? $request->{'predicate'} : undef; |
6196
|
0
|
0
|
|
|
|
|
my $consistency_level = ($request->{'consistency_level'}) ? $request->{'consistency_level'} : undef; |
6197
|
0
|
|
|
|
|
|
return $self->{impl}->get_slice($key, $column_parent, $predicate, $consistency_level); |
6198
|
|
|
|
|
|
|
} |
6199
|
|
|
|
|
|
|
|
6200
|
|
|
|
|
|
|
sub get_count{ |
6201
|
0
|
|
|
0
|
|
|
my ($self, $request) = @_; |
6202
|
|
|
|
|
|
|
|
6203
|
0
|
0
|
|
|
|
|
my $key = ($request->{'key'}) ? $request->{'key'} : undef; |
6204
|
0
|
0
|
|
|
|
|
my $column_parent = ($request->{'column_parent'}) ? $request->{'column_parent'} : undef; |
6205
|
0
|
0
|
|
|
|
|
my $predicate = ($request->{'predicate'}) ? $request->{'predicate'} : undef; |
6206
|
0
|
0
|
|
|
|
|
my $consistency_level = ($request->{'consistency_level'}) ? $request->{'consistency_level'} : undef; |
6207
|
0
|
|
|
|
|
|
return $self->{impl}->get_count($key, $column_parent, $predicate, $consistency_level); |
6208
|
|
|
|
|
|
|
} |
6209
|
|
|
|
|
|
|
|
6210
|
|
|
|
|
|
|
sub multiget_slice{ |
6211
|
0
|
|
|
0
|
|
|
my ($self, $request) = @_; |
6212
|
|
|
|
|
|
|
|
6213
|
0
|
0
|
|
|
|
|
my $keys = ($request->{'keys'}) ? $request->{'keys'} : undef; |
6214
|
0
|
0
|
|
|
|
|
my $column_parent = ($request->{'column_parent'}) ? $request->{'column_parent'} : undef; |
6215
|
0
|
0
|
|
|
|
|
my $predicate = ($request->{'predicate'}) ? $request->{'predicate'} : undef; |
6216
|
0
|
0
|
|
|
|
|
my $consistency_level = ($request->{'consistency_level'}) ? $request->{'consistency_level'} : undef; |
6217
|
0
|
|
|
|
|
|
return $self->{impl}->multiget_slice($keys, $column_parent, $predicate, $consistency_level); |
6218
|
|
|
|
|
|
|
} |
6219
|
|
|
|
|
|
|
|
6220
|
|
|
|
|
|
|
sub multiget_count{ |
6221
|
0
|
|
|
0
|
|
|
my ($self, $request) = @_; |
6222
|
|
|
|
|
|
|
|
6223
|
0
|
0
|
|
|
|
|
my $keys = ($request->{'keys'}) ? $request->{'keys'} : undef; |
6224
|
0
|
0
|
|
|
|
|
my $column_parent = ($request->{'column_parent'}) ? $request->{'column_parent'} : undef; |
6225
|
0
|
0
|
|
|
|
|
my $predicate = ($request->{'predicate'}) ? $request->{'predicate'} : undef; |
6226
|
0
|
0
|
|
|
|
|
my $consistency_level = ($request->{'consistency_level'}) ? $request->{'consistency_level'} : undef; |
6227
|
0
|
|
|
|
|
|
return $self->{impl}->multiget_count($keys, $column_parent, $predicate, $consistency_level); |
6228
|
|
|
|
|
|
|
} |
6229
|
|
|
|
|
|
|
|
6230
|
|
|
|
|
|
|
sub get_range_slices{ |
6231
|
0
|
|
|
0
|
|
|
my ($self, $request) = @_; |
6232
|
|
|
|
|
|
|
|
6233
|
0
|
0
|
|
|
|
|
my $column_parent = ($request->{'column_parent'}) ? $request->{'column_parent'} : undef; |
6234
|
0
|
0
|
|
|
|
|
my $predicate = ($request->{'predicate'}) ? $request->{'predicate'} : undef; |
6235
|
0
|
0
|
|
|
|
|
my $range = ($request->{'range'}) ? $request->{'range'} : undef; |
6236
|
0
|
0
|
|
|
|
|
my $consistency_level = ($request->{'consistency_level'}) ? $request->{'consistency_level'} : undef; |
6237
|
0
|
|
|
|
|
|
return $self->{impl}->get_range_slices($column_parent, $predicate, $range, $consistency_level); |
6238
|
|
|
|
|
|
|
} |
6239
|
|
|
|
|
|
|
|
6240
|
|
|
|
|
|
|
sub get_indexed_slices{ |
6241
|
0
|
|
|
0
|
|
|
my ($self, $request) = @_; |
6242
|
|
|
|
|
|
|
|
6243
|
0
|
0
|
|
|
|
|
my $column_parent = ($request->{'column_parent'}) ? $request->{'column_parent'} : undef; |
6244
|
0
|
0
|
|
|
|
|
my $index_clause = ($request->{'index_clause'}) ? $request->{'index_clause'} : undef; |
6245
|
0
|
0
|
|
|
|
|
my $column_predicate = ($request->{'column_predicate'}) ? $request->{'column_predicate'} : undef; |
6246
|
0
|
0
|
|
|
|
|
my $consistency_level = ($request->{'consistency_level'}) ? $request->{'consistency_level'} : undef; |
6247
|
0
|
|
|
|
|
|
return $self->{impl}->get_indexed_slices($column_parent, $index_clause, $column_predicate, $consistency_level); |
6248
|
|
|
|
|
|
|
} |
6249
|
|
|
|
|
|
|
|
6250
|
|
|
|
|
|
|
sub insert{ |
6251
|
0
|
|
|
0
|
|
|
my ($self, $request) = @_; |
6252
|
|
|
|
|
|
|
|
6253
|
0
|
0
|
|
|
|
|
my $key = ($request->{'key'}) ? $request->{'key'} : undef; |
6254
|
0
|
0
|
|
|
|
|
my $column_parent = ($request->{'column_parent'}) ? $request->{'column_parent'} : undef; |
6255
|
0
|
0
|
|
|
|
|
my $column = ($request->{'column'}) ? $request->{'column'} : undef; |
6256
|
0
|
0
|
|
|
|
|
my $consistency_level = ($request->{'consistency_level'}) ? $request->{'consistency_level'} : undef; |
6257
|
0
|
|
|
|
|
|
return $self->{impl}->insert($key, $column_parent, $column, $consistency_level); |
6258
|
|
|
|
|
|
|
} |
6259
|
|
|
|
|
|
|
|
6260
|
|
|
|
|
|
|
sub add{ |
6261
|
0
|
|
|
0
|
|
|
my ($self, $request) = @_; |
6262
|
|
|
|
|
|
|
|
6263
|
0
|
0
|
|
|
|
|
my $key = ($request->{'key'}) ? $request->{'key'} : undef; |
6264
|
0
|
0
|
|
|
|
|
my $column_parent = ($request->{'column_parent'}) ? $request->{'column_parent'} : undef; |
6265
|
0
|
0
|
|
|
|
|
my $column = ($request->{'column'}) ? $request->{'column'} : undef; |
6266
|
0
|
0
|
|
|
|
|
my $consistency_level = ($request->{'consistency_level'}) ? $request->{'consistency_level'} : undef; |
6267
|
0
|
|
|
|
|
|
return $self->{impl}->add($key, $column_parent, $column, $consistency_level); |
6268
|
|
|
|
|
|
|
} |
6269
|
|
|
|
|
|
|
|
6270
|
|
|
|
|
|
|
sub remove{ |
6271
|
0
|
|
|
0
|
|
|
my ($self, $request) = @_; |
6272
|
|
|
|
|
|
|
|
6273
|
0
|
0
|
|
|
|
|
my $key = ($request->{'key'}) ? $request->{'key'} : undef; |
6274
|
0
|
0
|
|
|
|
|
my $column_path = ($request->{'column_path'}) ? $request->{'column_path'} : undef; |
6275
|
0
|
0
|
|
|
|
|
my $timestamp = ($request->{'timestamp'}) ? $request->{'timestamp'} : undef; |
6276
|
0
|
0
|
|
|
|
|
my $consistency_level = ($request->{'consistency_level'}) ? $request->{'consistency_level'} : undef; |
6277
|
0
|
|
|
|
|
|
return $self->{impl}->remove($key, $column_path, $timestamp, $consistency_level); |
6278
|
|
|
|
|
|
|
} |
6279
|
|
|
|
|
|
|
|
6280
|
|
|
|
|
|
|
sub remove_counter{ |
6281
|
0
|
|
|
0
|
|
|
my ($self, $request) = @_; |
6282
|
|
|
|
|
|
|
|
6283
|
0
|
0
|
|
|
|
|
my $key = ($request->{'key'}) ? $request->{'key'} : undef; |
6284
|
0
|
0
|
|
|
|
|
my $path = ($request->{'path'}) ? $request->{'path'} : undef; |
6285
|
0
|
0
|
|
|
|
|
my $consistency_level = ($request->{'consistency_level'}) ? $request->{'consistency_level'} : undef; |
6286
|
0
|
|
|
|
|
|
return $self->{impl}->remove_counter($key, $path, $consistency_level); |
6287
|
|
|
|
|
|
|
} |
6288
|
|
|
|
|
|
|
|
6289
|
|
|
|
|
|
|
sub batch_mutate{ |
6290
|
0
|
|
|
0
|
|
|
my ($self, $request) = @_; |
6291
|
|
|
|
|
|
|
|
6292
|
0
|
0
|
|
|
|
|
my $mutation_map = ($request->{'mutation_map'}) ? $request->{'mutation_map'} : undef; |
6293
|
0
|
0
|
|
|
|
|
my $consistency_level = ($request->{'consistency_level'}) ? $request->{'consistency_level'} : undef; |
6294
|
0
|
|
|
|
|
|
return $self->{impl}->batch_mutate($mutation_map, $consistency_level); |
6295
|
|
|
|
|
|
|
} |
6296
|
|
|
|
|
|
|
|
6297
|
|
|
|
|
|
|
sub truncate{ |
6298
|
0
|
|
|
0
|
|
|
my ($self, $request) = @_; |
6299
|
|
|
|
|
|
|
|
6300
|
0
|
0
|
|
|
|
|
my $cfname = ($request->{'cfname'}) ? $request->{'cfname'} : undef; |
6301
|
0
|
|
|
|
|
|
return $self->{impl}->truncate($cfname); |
6302
|
|
|
|
|
|
|
} |
6303
|
|
|
|
|
|
|
|
6304
|
|
|
|
|
|
|
sub describe_schema_versions{ |
6305
|
0
|
|
|
0
|
|
|
my ($self, $request) = @_; |
6306
|
|
|
|
|
|
|
|
6307
|
0
|
|
|
|
|
|
return $self->{impl}->describe_schema_versions(); |
6308
|
|
|
|
|
|
|
} |
6309
|
|
|
|
|
|
|
|
6310
|
|
|
|
|
|
|
sub describe_keyspaces{ |
6311
|
0
|
|
|
0
|
|
|
my ($self, $request) = @_; |
6312
|
|
|
|
|
|
|
|
6313
|
0
|
|
|
|
|
|
return $self->{impl}->describe_keyspaces(); |
6314
|
|
|
|
|
|
|
} |
6315
|
|
|
|
|
|
|
|
6316
|
|
|
|
|
|
|
sub describe_cluster_name{ |
6317
|
0
|
|
|
0
|
|
|
my ($self, $request) = @_; |
6318
|
|
|
|
|
|
|
|
6319
|
0
|
|
|
|
|
|
return $self->{impl}->describe_cluster_name(); |
6320
|
|
|
|
|
|
|
} |
6321
|
|
|
|
|
|
|
|
6322
|
|
|
|
|
|
|
sub describe_version{ |
6323
|
0
|
|
|
0
|
|
|
my ($self, $request) = @_; |
6324
|
|
|
|
|
|
|
|
6325
|
0
|
|
|
|
|
|
return $self->{impl}->describe_version(); |
6326
|
|
|
|
|
|
|
} |
6327
|
|
|
|
|
|
|
|
6328
|
|
|
|
|
|
|
sub describe_ring{ |
6329
|
0
|
|
|
0
|
|
|
my ($self, $request) = @_; |
6330
|
|
|
|
|
|
|
|
6331
|
0
|
0
|
|
|
|
|
my $keyspace = ($request->{'keyspace'}) ? $request->{'keyspace'} : undef; |
6332
|
0
|
|
|
|
|
|
return $self->{impl}->describe_ring($keyspace); |
6333
|
|
|
|
|
|
|
} |
6334
|
|
|
|
|
|
|
|
6335
|
|
|
|
|
|
|
sub describe_partitioner{ |
6336
|
0
|
|
|
0
|
|
|
my ($self, $request) = @_; |
6337
|
|
|
|
|
|
|
|
6338
|
0
|
|
|
|
|
|
return $self->{impl}->describe_partitioner(); |
6339
|
|
|
|
|
|
|
} |
6340
|
|
|
|
|
|
|
|
6341
|
|
|
|
|
|
|
sub describe_snitch{ |
6342
|
0
|
|
|
0
|
|
|
my ($self, $request) = @_; |
6343
|
|
|
|
|
|
|
|
6344
|
0
|
|
|
|
|
|
return $self->{impl}->describe_snitch(); |
6345
|
|
|
|
|
|
|
} |
6346
|
|
|
|
|
|
|
|
6347
|
|
|
|
|
|
|
sub describe_keyspace{ |
6348
|
0
|
|
|
0
|
|
|
my ($self, $request) = @_; |
6349
|
|
|
|
|
|
|
|
6350
|
0
|
0
|
|
|
|
|
my $keyspace = ($request->{'keyspace'}) ? $request->{'keyspace'} : undef; |
6351
|
0
|
|
|
|
|
|
return $self->{impl}->describe_keyspace($keyspace); |
6352
|
|
|
|
|
|
|
} |
6353
|
|
|
|
|
|
|
|
6354
|
|
|
|
|
|
|
sub describe_splits{ |
6355
|
0
|
|
|
0
|
|
|
my ($self, $request) = @_; |
6356
|
|
|
|
|
|
|
|
6357
|
0
|
0
|
|
|
|
|
my $cfName = ($request->{'cfName'}) ? $request->{'cfName'} : undef; |
6358
|
0
|
0
|
|
|
|
|
my $start_token = ($request->{'start_token'}) ? $request->{'start_token'} : undef; |
6359
|
0
|
0
|
|
|
|
|
my $end_token = ($request->{'end_token'}) ? $request->{'end_token'} : undef; |
6360
|
0
|
0
|
|
|
|
|
my $keys_per_split = ($request->{'keys_per_split'}) ? $request->{'keys_per_split'} : undef; |
6361
|
0
|
|
|
|
|
|
return $self->{impl}->describe_splits($cfName, $start_token, $end_token, $keys_per_split); |
6362
|
|
|
|
|
|
|
} |
6363
|
|
|
|
|
|
|
|
6364
|
|
|
|
|
|
|
sub system_add_column_family{ |
6365
|
0
|
|
|
0
|
|
|
my ($self, $request) = @_; |
6366
|
|
|
|
|
|
|
|
6367
|
0
|
0
|
|
|
|
|
my $cf_def = ($request->{'cf_def'}) ? $request->{'cf_def'} : undef; |
6368
|
0
|
|
|
|
|
|
return $self->{impl}->system_add_column_family($cf_def); |
6369
|
|
|
|
|
|
|
} |
6370
|
|
|
|
|
|
|
|
6371
|
|
|
|
|
|
|
sub system_drop_column_family{ |
6372
|
0
|
|
|
0
|
|
|
my ($self, $request) = @_; |
6373
|
|
|
|
|
|
|
|
6374
|
0
|
0
|
|
|
|
|
my $column_family = ($request->{'column_family'}) ? $request->{'column_family'} : undef; |
6375
|
0
|
|
|
|
|
|
return $self->{impl}->system_drop_column_family($column_family); |
6376
|
|
|
|
|
|
|
} |
6377
|
|
|
|
|
|
|
|
6378
|
|
|
|
|
|
|
sub system_add_keyspace{ |
6379
|
0
|
|
|
0
|
|
|
my ($self, $request) = @_; |
6380
|
|
|
|
|
|
|
|
6381
|
0
|
0
|
|
|
|
|
my $ks_def = ($request->{'ks_def'}) ? $request->{'ks_def'} : undef; |
6382
|
0
|
|
|
|
|
|
return $self->{impl}->system_add_keyspace($ks_def); |
6383
|
|
|
|
|
|
|
} |
6384
|
|
|
|
|
|
|
|
6385
|
|
|
|
|
|
|
sub system_drop_keyspace{ |
6386
|
0
|
|
|
0
|
|
|
my ($self, $request) = @_; |
6387
|
|
|
|
|
|
|
|
6388
|
0
|
0
|
|
|
|
|
my $keyspace = ($request->{'keyspace'}) ? $request->{'keyspace'} : undef; |
6389
|
0
|
|
|
|
|
|
return $self->{impl}->system_drop_keyspace($keyspace); |
6390
|
|
|
|
|
|
|
} |
6391
|
|
|
|
|
|
|
|
6392
|
|
|
|
|
|
|
sub system_update_keyspace{ |
6393
|
0
|
|
|
0
|
|
|
my ($self, $request) = @_; |
6394
|
|
|
|
|
|
|
|
6395
|
0
|
0
|
|
|
|
|
my $ks_def = ($request->{'ks_def'}) ? $request->{'ks_def'} : undef; |
6396
|
0
|
|
|
|
|
|
return $self->{impl}->system_update_keyspace($ks_def); |
6397
|
|
|
|
|
|
|
} |
6398
|
|
|
|
|
|
|
|
6399
|
|
|
|
|
|
|
sub system_update_column_family{ |
6400
|
0
|
|
|
0
|
|
|
my ($self, $request) = @_; |
6401
|
|
|
|
|
|
|
|
6402
|
0
|
0
|
|
|
|
|
my $cf_def = ($request->{'cf_def'}) ? $request->{'cf_def'} : undef; |
6403
|
0
|
|
|
|
|
|
return $self->{impl}->system_update_column_family($cf_def); |
6404
|
|
|
|
|
|
|
} |
6405
|
|
|
|
|
|
|
|
6406
|
|
|
|
|
|
|
sub execute_cql_query{ |
6407
|
0
|
|
|
0
|
|
|
my ($self, $request) = @_; |
6408
|
|
|
|
|
|
|
|
6409
|
0
|
0
|
|
|
|
|
my $query = ($request->{'query'}) ? $request->{'query'} : undef; |
6410
|
0
|
0
|
|
|
|
|
my $compression = ($request->{'compression'}) ? $request->{'compression'} : undef; |
6411
|
0
|
|
|
|
|
|
return $self->{impl}->execute_cql_query($query, $compression); |
6412
|
|
|
|
|
|
|
} |
6413
|
|
|
|
|
|
|
|
6414
|
|
|
|
|
|
|
package Cassandra::CassandraClient; |
6415
|
|
|
|
|
|
|
BEGIN { |
6416
|
1
|
|
|
1
|
|
23
|
$Cassandra::CassandraClient::VERSION = '0.4.0'; |
6417
|
|
|
|
|
|
|
} |
6418
|
|
|
|
|
|
|
|
6419
|
|
|
|
|
|
|
|
6420
|
1
|
|
|
1
|
|
7
|
use base qw(Cassandra::CassandraIf); |
|
1
|
|
|
|
|
2
|
|
|
1
|
|
|
|
|
202462
|
|
6421
|
|
|
|
|
|
|
sub new { |
6422
|
0
|
|
|
0
|
|
|
my ($classname, $input, $output) = @_; |
6423
|
0
|
|
|
|
|
|
my $self = {}; |
6424
|
0
|
|
|
|
|
|
$self->{input} = $input; |
6425
|
0
|
0
|
|
|
|
|
$self->{output} = defined $output ? $output : $input; |
6426
|
0
|
|
|
|
|
|
$self->{seqid} = 0; |
6427
|
0
|
|
|
|
|
|
return bless($self,$classname); |
6428
|
|
|
|
|
|
|
} |
6429
|
|
|
|
|
|
|
|
6430
|
|
|
|
|
|
|
sub login{ |
6431
|
0
|
|
|
0
|
|
|
my $self = shift; |
6432
|
0
|
|
|
|
|
|
my $auth_request = shift; |
6433
|
|
|
|
|
|
|
|
6434
|
0
|
|
|
|
|
|
$self->send_login($auth_request); |
6435
|
0
|
|
|
|
|
|
$self->recv_login(); |
6436
|
|
|
|
|
|
|
} |
6437
|
|
|
|
|
|
|
|
6438
|
|
|
|
|
|
|
sub send_login{ |
6439
|
0
|
|
|
0
|
|
|
my $self = shift; |
6440
|
0
|
|
|
|
|
|
my $auth_request = shift; |
6441
|
|
|
|
|
|
|
|
6442
|
0
|
|
|
|
|
|
$self->{output}->writeMessageBegin('login', TMessageType::CALL, $self->{seqid}); |
6443
|
0
|
|
|
|
|
|
my $args = new Cassandra::Cassandra_login_args(); |
6444
|
0
|
|
|
|
|
|
$args->{auth_request} = $auth_request; |
6445
|
0
|
|
|
|
|
|
$args->write($self->{output}); |
6446
|
0
|
|
|
|
|
|
$self->{output}->writeMessageEnd(); |
6447
|
0
|
|
|
|
|
|
$self->{output}->getTransport()->flush(); |
6448
|
|
|
|
|
|
|
} |
6449
|
|
|
|
|
|
|
|
6450
|
|
|
|
|
|
|
sub recv_login{ |
6451
|
0
|
|
|
0
|
|
|
my $self = shift; |
6452
|
|
|
|
|
|
|
|
6453
|
0
|
|
|
|
|
|
my $rseqid = 0; |
6454
|
0
|
|
|
|
|
|
my $fname; |
6455
|
0
|
|
|
|
|
|
my $mtype = 0; |
6456
|
|
|
|
|
|
|
|
6457
|
0
|
|
|
|
|
|
$self->{input}->readMessageBegin(\$fname, \$mtype, \$rseqid); |
6458
|
0
|
0
|
|
|
|
|
if ($mtype == TMessageType::EXCEPTION) { |
6459
|
0
|
|
|
|
|
|
my $x = new TApplicationException(); |
6460
|
0
|
|
|
|
|
|
$x->read($self->{input}); |
6461
|
0
|
|
|
|
|
|
$self->{input}->readMessageEnd(); |
6462
|
0
|
|
|
|
|
|
die $x; |
6463
|
|
|
|
|
|
|
} |
6464
|
0
|
|
|
|
|
|
my $result = new Cassandra::Cassandra_login_result(); |
6465
|
0
|
|
|
|
|
|
$result->read($self->{input}); |
6466
|
0
|
|
|
|
|
|
$self->{input}->readMessageEnd(); |
6467
|
|
|
|
|
|
|
|
6468
|
0
|
0
|
|
|
|
|
if (defined $result->{authnx}) { |
6469
|
0
|
|
|
|
|
|
die $result->{authnx}; |
6470
|
|
|
|
|
|
|
} |
6471
|
0
|
0
|
|
|
|
|
if (defined $result->{authzx}) { |
6472
|
0
|
|
|
|
|
|
die $result->{authzx}; |
6473
|
|
|
|
|
|
|
} |
6474
|
0
|
|
|
|
|
|
return; |
6475
|
|
|
|
|
|
|
} |
6476
|
|
|
|
|
|
|
sub set_keyspace{ |
6477
|
0
|
|
|
0
|
|
|
my $self = shift; |
6478
|
0
|
|
|
|
|
|
my $keyspace = shift; |
6479
|
|
|
|
|
|
|
|
6480
|
0
|
|
|
|
|
|
$self->send_set_keyspace($keyspace); |
6481
|
0
|
|
|
|
|
|
$self->recv_set_keyspace(); |
6482
|
|
|
|
|
|
|
} |
6483
|
|
|
|
|
|
|
|
6484
|
|
|
|
|
|
|
sub send_set_keyspace{ |
6485
|
0
|
|
|
0
|
|
|
my $self = shift; |
6486
|
0
|
|
|
|
|
|
my $keyspace = shift; |
6487
|
|
|
|
|
|
|
|
6488
|
0
|
|
|
|
|
|
$self->{output}->writeMessageBegin('set_keyspace', TMessageType::CALL, $self->{seqid}); |
6489
|
0
|
|
|
|
|
|
my $args = new Cassandra::Cassandra_set_keyspace_args(); |
6490
|
0
|
|
|
|
|
|
$args->{keyspace} = $keyspace; |
6491
|
0
|
|
|
|
|
|
$args->write($self->{output}); |
6492
|
0
|
|
|
|
|
|
$self->{output}->writeMessageEnd(); |
6493
|
0
|
|
|
|
|
|
$self->{output}->getTransport()->flush(); |
6494
|
|
|
|
|
|
|
} |
6495
|
|
|
|
|
|
|
|
6496
|
|
|
|
|
|
|
sub recv_set_keyspace{ |
6497
|
0
|
|
|
0
|
|
|
my $self = shift; |
6498
|
|
|
|
|
|
|
|
6499
|
0
|
|
|
|
|
|
my $rseqid = 0; |
6500
|
0
|
|
|
|
|
|
my $fname; |
6501
|
0
|
|
|
|
|
|
my $mtype = 0; |
6502
|
|
|
|
|
|
|
|
6503
|
0
|
|
|
|
|
|
$self->{input}->readMessageBegin(\$fname, \$mtype, \$rseqid); |
6504
|
0
|
0
|
|
|
|
|
if ($mtype == TMessageType::EXCEPTION) { |
6505
|
0
|
|
|
|
|
|
my $x = new TApplicationException(); |
6506
|
0
|
|
|
|
|
|
$x->read($self->{input}); |
6507
|
0
|
|
|
|
|
|
$self->{input}->readMessageEnd(); |
6508
|
0
|
|
|
|
|
|
die $x; |
6509
|
|
|
|
|
|
|
} |
6510
|
0
|
|
|
|
|
|
my $result = new Cassandra::Cassandra_set_keyspace_result(); |
6511
|
0
|
|
|
|
|
|
$result->read($self->{input}); |
6512
|
0
|
|
|
|
|
|
$self->{input}->readMessageEnd(); |
6513
|
|
|
|
|
|
|
|
6514
|
0
|
0
|
|
|
|
|
if (defined $result->{ire}) { |
6515
|
0
|
|
|
|
|
|
die $result->{ire}; |
6516
|
|
|
|
|
|
|
} |
6517
|
0
|
|
|
|
|
|
return; |
6518
|
|
|
|
|
|
|
} |
6519
|
|
|
|
|
|
|
sub get{ |
6520
|
0
|
|
|
0
|
|
|
my $self = shift; |
6521
|
0
|
|
|
|
|
|
my $key = shift; |
6522
|
0
|
|
|
|
|
|
my $column_path = shift; |
6523
|
0
|
|
|
|
|
|
my $consistency_level = shift; |
6524
|
|
|
|
|
|
|
|
6525
|
0
|
|
|
|
|
|
$self->send_get($key, $column_path, $consistency_level); |
6526
|
0
|
|
|
|
|
|
return $self->recv_get(); |
6527
|
|
|
|
|
|
|
} |
6528
|
|
|
|
|
|
|
|
6529
|
|
|
|
|
|
|
sub send_get{ |
6530
|
0
|
|
|
0
|
|
|
my $self = shift; |
6531
|
0
|
|
|
|
|
|
my $key = shift; |
6532
|
0
|
|
|
|
|
|
my $column_path = shift; |
6533
|
0
|
|
|
|
|
|
my $consistency_level = shift; |
6534
|
|
|
|
|
|
|
|
6535
|
0
|
|
|
|
|
|
$self->{output}->writeMessageBegin('get', TMessageType::CALL, $self->{seqid}); |
6536
|
0
|
|
|
|
|
|
my $args = new Cassandra::Cassandra_get_args(); |
6537
|
0
|
|
|
|
|
|
$args->{key} = $key; |
6538
|
0
|
|
|
|
|
|
$args->{column_path} = $column_path; |
6539
|
0
|
|
|
|
|
|
$args->{consistency_level} = $consistency_level; |
6540
|
0
|
|
|
|
|
|
$args->write($self->{output}); |
6541
|
0
|
|
|
|
|
|
$self->{output}->writeMessageEnd(); |
6542
|
0
|
|
|
|
|
|
$self->{output}->getTransport()->flush(); |
6543
|
|
|
|
|
|
|
} |
6544
|
|
|
|
|
|
|
|
6545
|
|
|
|
|
|
|
sub recv_get{ |
6546
|
0
|
|
|
0
|
|
|
my $self = shift; |
6547
|
|
|
|
|
|
|
|
6548
|
0
|
|
|
|
|
|
my $rseqid = 0; |
6549
|
0
|
|
|
|
|
|
my $fname; |
6550
|
0
|
|
|
|
|
|
my $mtype = 0; |
6551
|
|
|
|
|
|
|
|
6552
|
0
|
|
|
|
|
|
$self->{input}->readMessageBegin(\$fname, \$mtype, \$rseqid); |
6553
|
0
|
0
|
|
|
|
|
if ($mtype == TMessageType::EXCEPTION) { |
6554
|
0
|
|
|
|
|
|
my $x = new TApplicationException(); |
6555
|
0
|
|
|
|
|
|
$x->read($self->{input}); |
6556
|
0
|
|
|
|
|
|
$self->{input}->readMessageEnd(); |
6557
|
0
|
|
|
|
|
|
die $x; |
6558
|
|
|
|
|
|
|
} |
6559
|
0
|
|
|
|
|
|
my $result = new Cassandra::Cassandra_get_result(); |
6560
|
0
|
|
|
|
|
|
$result->read($self->{input}); |
6561
|
0
|
|
|
|
|
|
$self->{input}->readMessageEnd(); |
6562
|
|
|
|
|
|
|
|
6563
|
0
|
0
|
|
|
|
|
if (defined $result->{success} ) { |
6564
|
0
|
|
|
|
|
|
return $result->{success}; |
6565
|
|
|
|
|
|
|
} |
6566
|
0
|
0
|
|
|
|
|
if (defined $result->{ire}) { |
6567
|
0
|
|
|
|
|
|
die $result->{ire}; |
6568
|
|
|
|
|
|
|
} |
6569
|
0
|
0
|
|
|
|
|
if (defined $result->{nfe}) { |
6570
|
0
|
|
|
|
|
|
die $result->{nfe}; |
6571
|
|
|
|
|
|
|
} |
6572
|
0
|
0
|
|
|
|
|
if (defined $result->{ue}) { |
6573
|
0
|
|
|
|
|
|
die $result->{ue}; |
6574
|
|
|
|
|
|
|
} |
6575
|
0
|
0
|
|
|
|
|
if (defined $result->{te}) { |
6576
|
0
|
|
|
|
|
|
die $result->{te}; |
6577
|
|
|
|
|
|
|
} |
6578
|
0
|
|
|
|
|
|
die "get failed: unknown result"; |
6579
|
|
|
|
|
|
|
} |
6580
|
|
|
|
|
|
|
sub get_slice{ |
6581
|
0
|
|
|
0
|
|
|
my $self = shift; |
6582
|
0
|
|
|
|
|
|
my $key = shift; |
6583
|
0
|
|
|
|
|
|
my $column_parent = shift; |
6584
|
0
|
|
|
|
|
|
my $predicate = shift; |
6585
|
0
|
|
|
|
|
|
my $consistency_level = shift; |
6586
|
|
|
|
|
|
|
|
6587
|
0
|
|
|
|
|
|
$self->send_get_slice($key, $column_parent, $predicate, $consistency_level); |
6588
|
0
|
|
|
|
|
|
return $self->recv_get_slice(); |
6589
|
|
|
|
|
|
|
} |
6590
|
|
|
|
|
|
|
|
6591
|
|
|
|
|
|
|
sub send_get_slice{ |
6592
|
0
|
|
|
0
|
|
|
my $self = shift; |
6593
|
0
|
|
|
|
|
|
my $key = shift; |
6594
|
0
|
|
|
|
|
|
my $column_parent = shift; |
6595
|
0
|
|
|
|
|
|
my $predicate = shift; |
6596
|
0
|
|
|
|
|
|
my $consistency_level = shift; |
6597
|
|
|
|
|
|
|
|
6598
|
0
|
|
|
|
|
|
$self->{output}->writeMessageBegin('get_slice', TMessageType::CALL, $self->{seqid}); |
6599
|
0
|
|
|
|
|
|
my $args = new Cassandra::Cassandra_get_slice_args(); |
6600
|
0
|
|
|
|
|
|
$args->{key} = $key; |
6601
|
0
|
|
|
|
|
|
$args->{column_parent} = $column_parent; |
6602
|
0
|
|
|
|
|
|
$args->{predicate} = $predicate; |
6603
|
0
|
|
|
|
|
|
$args->{consistency_level} = $consistency_level; |
6604
|
0
|
|
|
|
|
|
$args->write($self->{output}); |
6605
|
0
|
|
|
|
|
|
$self->{output}->writeMessageEnd(); |
6606
|
0
|
|
|
|
|
|
$self->{output}->getTransport()->flush(); |
6607
|
|
|
|
|
|
|
} |
6608
|
|
|
|
|
|
|
|
6609
|
|
|
|
|
|
|
sub recv_get_slice{ |
6610
|
0
|
|
|
0
|
|
|
my $self = shift; |
6611
|
|
|
|
|
|
|
|
6612
|
0
|
|
|
|
|
|
my $rseqid = 0; |
6613
|
0
|
|
|
|
|
|
my $fname; |
6614
|
0
|
|
|
|
|
|
my $mtype = 0; |
6615
|
|
|
|
|
|
|
|
6616
|
0
|
|
|
|
|
|
$self->{input}->readMessageBegin(\$fname, \$mtype, \$rseqid); |
6617
|
0
|
0
|
|
|
|
|
if ($mtype == TMessageType::EXCEPTION) { |
6618
|
0
|
|
|
|
|
|
my $x = new TApplicationException(); |
6619
|
0
|
|
|
|
|
|
$x->read($self->{input}); |
6620
|
0
|
|
|
|
|
|
$self->{input}->readMessageEnd(); |
6621
|
0
|
|
|
|
|
|
die $x; |
6622
|
|
|
|
|
|
|
} |
6623
|
0
|
|
|
|
|
|
my $result = new Cassandra::Cassandra_get_slice_result(); |
6624
|
0
|
|
|
|
|
|
$result->read($self->{input}); |
6625
|
0
|
|
|
|
|
|
$self->{input}->readMessageEnd(); |
6626
|
|
|
|
|
|
|
|
6627
|
0
|
0
|
|
|
|
|
if (defined $result->{success} ) { |
6628
|
0
|
|
|
|
|
|
return $result->{success}; |
6629
|
|
|
|
|
|
|
} |
6630
|
0
|
0
|
|
|
|
|
if (defined $result->{ire}) { |
6631
|
0
|
|
|
|
|
|
die $result->{ire}; |
6632
|
|
|
|
|
|
|
} |
6633
|
0
|
0
|
|
|
|
|
if (defined $result->{ue}) { |
6634
|
0
|
|
|
|
|
|
die $result->{ue}; |
6635
|
|
|
|
|
|
|
} |
6636
|
0
|
0
|
|
|
|
|
if (defined $result->{te}) { |
6637
|
0
|
|
|
|
|
|
die $result->{te}; |
6638
|
|
|
|
|
|
|
} |
6639
|
0
|
|
|
|
|
|
die "get_slice failed: unknown result"; |
6640
|
|
|
|
|
|
|
} |
6641
|
|
|
|
|
|
|
sub get_count{ |
6642
|
0
|
|
|
0
|
|
|
my $self = shift; |
6643
|
0
|
|
|
|
|
|
my $key = shift; |
6644
|
0
|
|
|
|
|
|
my $column_parent = shift; |
6645
|
0
|
|
|
|
|
|
my $predicate = shift; |
6646
|
0
|
|
|
|
|
|
my $consistency_level = shift; |
6647
|
|
|
|
|
|
|
|
6648
|
0
|
|
|
|
|
|
$self->send_get_count($key, $column_parent, $predicate, $consistency_level); |
6649
|
0
|
|
|
|
|
|
return $self->recv_get_count(); |
6650
|
|
|
|
|
|
|
} |
6651
|
|
|
|
|
|
|
|
6652
|
|
|
|
|
|
|
sub send_get_count{ |
6653
|
0
|
|
|
0
|
|
|
my $self = shift; |
6654
|
0
|
|
|
|
|
|
my $key = shift; |
6655
|
0
|
|
|
|
|
|
my $column_parent = shift; |
6656
|
0
|
|
|
|
|
|
my $predicate = shift; |
6657
|
0
|
|
|
|
|
|
my $consistency_level = shift; |
6658
|
|
|
|
|
|
|
|
6659
|
0
|
|
|
|
|
|
$self->{output}->writeMessageBegin('get_count', TMessageType::CALL, $self->{seqid}); |
6660
|
0
|
|
|
|
|
|
my $args = new Cassandra::Cassandra_get_count_args(); |
6661
|
0
|
|
|
|
|
|
$args->{key} = $key; |
6662
|
0
|
|
|
|
|
|
$args->{column_parent} = $column_parent; |
6663
|
0
|
|
|
|
|
|
$args->{predicate} = $predicate; |
6664
|
0
|
|
|
|
|
|
$args->{consistency_level} = $consistency_level; |
6665
|
0
|
|
|
|
|
|
$args->write($self->{output}); |
6666
|
0
|
|
|
|
|
|
$self->{output}->writeMessageEnd(); |
6667
|
0
|
|
|
|
|
|
$self->{output}->getTransport()->flush(); |
6668
|
|
|
|
|
|
|
} |
6669
|
|
|
|
|
|
|
|
6670
|
|
|
|
|
|
|
sub recv_get_count{ |
6671
|
0
|
|
|
0
|
|
|
my $self = shift; |
6672
|
|
|
|
|
|
|
|
6673
|
0
|
|
|
|
|
|
my $rseqid = 0; |
6674
|
0
|
|
|
|
|
|
my $fname; |
6675
|
0
|
|
|
|
|
|
my $mtype = 0; |
6676
|
|
|
|
|
|
|
|
6677
|
0
|
|
|
|
|
|
$self->{input}->readMessageBegin(\$fname, \$mtype, \$rseqid); |
6678
|
0
|
0
|
|
|
|
|
if ($mtype == TMessageType::EXCEPTION) { |
6679
|
0
|
|
|
|
|
|
my $x = new TApplicationException(); |
6680
|
0
|
|
|
|
|
|
$x->read($self->{input}); |
6681
|
0
|
|
|
|
|
|
$self->{input}->readMessageEnd(); |
6682
|
0
|
|
|
|
|
|
die $x; |
6683
|
|
|
|
|
|
|
} |
6684
|
0
|
|
|
|
|
|
my $result = new Cassandra::Cassandra_get_count_result(); |
6685
|
0
|
|
|
|
|
|
$result->read($self->{input}); |
6686
|
0
|
|
|
|
|
|
$self->{input}->readMessageEnd(); |
6687
|
|
|
|
|
|
|
|
6688
|
0
|
0
|
|
|
|
|
if (defined $result->{success} ) { |
6689
|
0
|
|
|
|
|
|
return $result->{success}; |
6690
|
|
|
|
|
|
|
} |
6691
|
0
|
0
|
|
|
|
|
if (defined $result->{ire}) { |
6692
|
0
|
|
|
|
|
|
die $result->{ire}; |
6693
|
|
|
|
|
|
|
} |
6694
|
0
|
0
|
|
|
|
|
if (defined $result->{ue}) { |
6695
|
0
|
|
|
|
|
|
die $result->{ue}; |
6696
|
|
|
|
|
|
|
} |
6697
|
0
|
0
|
|
|
|
|
if (defined $result->{te}) { |
6698
|
0
|
|
|
|
|
|
die $result->{te}; |
6699
|
|
|
|
|
|
|
} |
6700
|
0
|
|
|
|
|
|
die "get_count failed: unknown result"; |
6701
|
|
|
|
|
|
|
} |
6702
|
|
|
|
|
|
|
sub multiget_slice{ |
6703
|
0
|
|
|
0
|
|
|
my $self = shift; |
6704
|
0
|
|
|
|
|
|
my $keys = shift; |
6705
|
0
|
|
|
|
|
|
my $column_parent = shift; |
6706
|
0
|
|
|
|
|
|
my $predicate = shift; |
6707
|
0
|
|
|
|
|
|
my $consistency_level = shift; |
6708
|
|
|
|
|
|
|
|
6709
|
0
|
|
|
|
|
|
$self->send_multiget_slice($keys, $column_parent, $predicate, $consistency_level); |
6710
|
0
|
|
|
|
|
|
return $self->recv_multiget_slice(); |
6711
|
|
|
|
|
|
|
} |
6712
|
|
|
|
|
|
|
|
6713
|
|
|
|
|
|
|
sub send_multiget_slice{ |
6714
|
0
|
|
|
0
|
|
|
my $self = shift; |
6715
|
0
|
|
|
|
|
|
my $keys = shift; |
6716
|
0
|
|
|
|
|
|
my $column_parent = shift; |
6717
|
0
|
|
|
|
|
|
my $predicate = shift; |
6718
|
0
|
|
|
|
|
|
my $consistency_level = shift; |
6719
|
|
|
|
|
|
|
|
6720
|
0
|
|
|
|
|
|
$self->{output}->writeMessageBegin('multiget_slice', TMessageType::CALL, $self->{seqid}); |
6721
|
0
|
|
|
|
|
|
my $args = new Cassandra::Cassandra_multiget_slice_args(); |
6722
|
0
|
|
|
|
|
|
$args->{keys} = $keys; |
6723
|
0
|
|
|
|
|
|
$args->{column_parent} = $column_parent; |
6724
|
0
|
|
|
|
|
|
$args->{predicate} = $predicate; |
6725
|
0
|
|
|
|
|
|
$args->{consistency_level} = $consistency_level; |
6726
|
0
|
|
|
|
|
|
$args->write($self->{output}); |
6727
|
0
|
|
|
|
|
|
$self->{output}->writeMessageEnd(); |
6728
|
0
|
|
|
|
|
|
$self->{output}->getTransport()->flush(); |
6729
|
|
|
|
|
|
|
} |
6730
|
|
|
|
|
|
|
|
6731
|
|
|
|
|
|
|
sub recv_multiget_slice{ |
6732
|
0
|
|
|
0
|
|
|
my $self = shift; |
6733
|
|
|
|
|
|
|
|
6734
|
0
|
|
|
|
|
|
my $rseqid = 0; |
6735
|
0
|
|
|
|
|
|
my $fname; |
6736
|
0
|
|
|
|
|
|
my $mtype = 0; |
6737
|
|
|
|
|
|
|
|
6738
|
0
|
|
|
|
|
|
$self->{input}->readMessageBegin(\$fname, \$mtype, \$rseqid); |
6739
|
0
|
0
|
|
|
|
|
if ($mtype == TMessageType::EXCEPTION) { |
6740
|
0
|
|
|
|
|
|
my $x = new TApplicationException(); |
6741
|
0
|
|
|
|
|
|
$x->read($self->{input}); |
6742
|
0
|
|
|
|
|
|
$self->{input}->readMessageEnd(); |
6743
|
0
|
|
|
|
|
|
die $x; |
6744
|
|
|
|
|
|
|
} |
6745
|
0
|
|
|
|
|
|
my $result = new Cassandra::Cassandra_multiget_slice_result(); |
6746
|
0
|
|
|
|
|
|
$result->read($self->{input}); |
6747
|
0
|
|
|
|
|
|
$self->{input}->readMessageEnd(); |
6748
|
|
|
|
|
|
|
|
6749
|
0
|
0
|
|
|
|
|
if (defined $result->{success} ) { |
6750
|
0
|
|
|
|
|
|
return $result->{success}; |
6751
|
|
|
|
|
|
|
} |
6752
|
0
|
0
|
|
|
|
|
if (defined $result->{ire}) { |
6753
|
0
|
|
|
|
|
|
die $result->{ire}; |
6754
|
|
|
|
|
|
|
} |
6755
|
0
|
0
|
|
|
|
|
if (defined $result->{ue}) { |
6756
|
0
|
|
|
|
|
|
die $result->{ue}; |
6757
|
|
|
|
|
|
|
} |
6758
|
0
|
0
|
|
|
|
|
if (defined $result->{te}) { |
6759
|
0
|
|
|
|
|
|
die $result->{te}; |
6760
|
|
|
|
|
|
|
} |
6761
|
0
|
|
|
|
|
|
die "multiget_slice failed: unknown result"; |
6762
|
|
|
|
|
|
|
} |
6763
|
|
|
|
|
|
|
sub multiget_count{ |
6764
|
0
|
|
|
0
|
|
|
my $self = shift; |
6765
|
0
|
|
|
|
|
|
my $keys = shift; |
6766
|
0
|
|
|
|
|
|
my $column_parent = shift; |
6767
|
0
|
|
|
|
|
|
my $predicate = shift; |
6768
|
0
|
|
|
|
|
|
my $consistency_level = shift; |
6769
|
|
|
|
|
|
|
|
6770
|
0
|
|
|
|
|
|
$self->send_multiget_count($keys, $column_parent, $predicate, $consistency_level); |
6771
|
0
|
|
|
|
|
|
return $self->recv_multiget_count(); |
6772
|
|
|
|
|
|
|
} |
6773
|
|
|
|
|
|
|
|
6774
|
|
|
|
|
|
|
sub send_multiget_count{ |
6775
|
0
|
|
|
0
|
|
|
my $self = shift; |
6776
|
0
|
|
|
|
|
|
my $keys = shift; |
6777
|
0
|
|
|
|
|
|
my $column_parent = shift; |
6778
|
0
|
|
|
|
|
|
my $predicate = shift; |
6779
|
0
|
|
|
|
|
|
my $consistency_level = shift; |
6780
|
|
|
|
|
|
|
|
6781
|
0
|
|
|
|
|
|
$self->{output}->writeMessageBegin('multiget_count', TMessageType::CALL, $self->{seqid}); |
6782
|
0
|
|
|
|
|
|
my $args = new Cassandra::Cassandra_multiget_count_args(); |
6783
|
0
|
|
|
|
|
|
$args->{keys} = $keys; |
6784
|
0
|
|
|
|
|
|
$args->{column_parent} = $column_parent; |
6785
|
0
|
|
|
|
|
|
$args->{predicate} = $predicate; |
6786
|
0
|
|
|
|
|
|
$args->{consistency_level} = $consistency_level; |
6787
|
0
|
|
|
|
|
|
$args->write($self->{output}); |
6788
|
0
|
|
|
|
|
|
$self->{output}->writeMessageEnd(); |
6789
|
0
|
|
|
|
|
|
$self->{output}->getTransport()->flush(); |
6790
|
|
|
|
|
|
|
} |
6791
|
|
|
|
|
|
|
|
6792
|
|
|
|
|
|
|
sub recv_multiget_count{ |
6793
|
0
|
|
|
0
|
|
|
my $self = shift; |
6794
|
|
|
|
|
|
|
|
6795
|
0
|
|
|
|
|
|
my $rseqid = 0; |
6796
|
0
|
|
|
|
|
|
my $fname; |
6797
|
0
|
|
|
|
|
|
my $mtype = 0; |
6798
|
|
|
|
|
|
|
|
6799
|
0
|
|
|
|
|
|
$self->{input}->readMessageBegin(\$fname, \$mtype, \$rseqid); |
6800
|
0
|
0
|
|
|
|
|
if ($mtype == TMessageType::EXCEPTION) { |
6801
|
0
|
|
|
|
|
|
my $x = new TApplicationException(); |
6802
|
0
|
|
|
|
|
|
$x->read($self->{input}); |
6803
|
0
|
|
|
|
|
|
$self->{input}->readMessageEnd(); |
6804
|
0
|
|
|
|
|
|
die $x; |
6805
|
|
|
|
|
|
|
} |
6806
|
0
|
|
|
|
|
|
my $result = new Cassandra::Cassandra_multiget_count_result(); |
6807
|
0
|
|
|
|
|
|
$result->read($self->{input}); |
6808
|
0
|
|
|
|
|
|
$self->{input}->readMessageEnd(); |
6809
|
|
|
|
|
|
|
|
6810
|
0
|
0
|
|
|
|
|
if (defined $result->{success} ) { |
6811
|
0
|
|
|
|
|
|
return $result->{success}; |
6812
|
|
|
|
|
|
|
} |
6813
|
0
|
0
|
|
|
|
|
if (defined $result->{ire}) { |
6814
|
0
|
|
|
|
|
|
die $result->{ire}; |
6815
|
|
|
|
|
|
|
} |
6816
|
0
|
0
|
|
|
|
|
if (defined $result->{ue}) { |
6817
|
0
|
|
|
|
|
|
die $result->{ue}; |
6818
|
|
|
|
|
|
|
} |
6819
|
0
|
0
|
|
|
|
|
if (defined $result->{te}) { |
6820
|
0
|
|
|
|
|
|
die $result->{te}; |
6821
|
|
|
|
|
|
|
} |
6822
|
0
|
|
|
|
|
|
die "multiget_count failed: unknown result"; |
6823
|
|
|
|
|
|
|
} |
6824
|
|
|
|
|
|
|
sub get_range_slices{ |
6825
|
0
|
|
|
0
|
|
|
my $self = shift; |
6826
|
0
|
|
|
|
|
|
my $column_parent = shift; |
6827
|
0
|
|
|
|
|
|
my $predicate = shift; |
6828
|
0
|
|
|
|
|
|
my $range = shift; |
6829
|
0
|
|
|
|
|
|
my $consistency_level = shift; |
6830
|
|
|
|
|
|
|
|
6831
|
0
|
|
|
|
|
|
$self->send_get_range_slices($column_parent, $predicate, $range, $consistency_level); |
6832
|
0
|
|
|
|
|
|
return $self->recv_get_range_slices(); |
6833
|
|
|
|
|
|
|
} |
6834
|
|
|
|
|
|
|
|
6835
|
|
|
|
|
|
|
sub send_get_range_slices{ |
6836
|
0
|
|
|
0
|
|
|
my $self = shift; |
6837
|
0
|
|
|
|
|
|
my $column_parent = shift; |
6838
|
0
|
|
|
|
|
|
my $predicate = shift; |
6839
|
0
|
|
|
|
|
|
my $range = shift; |
6840
|
0
|
|
|
|
|
|
my $consistency_level = shift; |
6841
|
|
|
|
|
|
|
|
6842
|
0
|
|
|
|
|
|
$self->{output}->writeMessageBegin('get_range_slices', TMessageType::CALL, $self->{seqid}); |
6843
|
0
|
|
|
|
|
|
my $args = new Cassandra::Cassandra_get_range_slices_args(); |
6844
|
0
|
|
|
|
|
|
$args->{column_parent} = $column_parent; |
6845
|
0
|
|
|
|
|
|
$args->{predicate} = $predicate; |
6846
|
0
|
|
|
|
|
|
$args->{range} = $range; |
6847
|
0
|
|
|
|
|
|
$args->{consistency_level} = $consistency_level; |
6848
|
0
|
|
|
|
|
|
$args->write($self->{output}); |
6849
|
0
|
|
|
|
|
|
$self->{output}->writeMessageEnd(); |
6850
|
0
|
|
|
|
|
|
$self->{output}->getTransport()->flush(); |
6851
|
|
|
|
|
|
|
} |
6852
|
|
|
|
|
|
|
|
6853
|
|
|
|
|
|
|
sub recv_get_range_slices{ |
6854
|
0
|
|
|
0
|
|
|
my $self = shift; |
6855
|
|
|
|
|
|
|
|
6856
|
0
|
|
|
|
|
|
my $rseqid = 0; |
6857
|
0
|
|
|
|
|
|
my $fname; |
6858
|
0
|
|
|
|
|
|
my $mtype = 0; |
6859
|
|
|
|
|
|
|
|
6860
|
0
|
|
|
|
|
|
$self->{input}->readMessageBegin(\$fname, \$mtype, \$rseqid); |
6861
|
0
|
0
|
|
|
|
|
if ($mtype == TMessageType::EXCEPTION) { |
6862
|
0
|
|
|
|
|
|
my $x = new TApplicationException(); |
6863
|
0
|
|
|
|
|
|
$x->read($self->{input}); |
6864
|
0
|
|
|
|
|
|
$self->{input}->readMessageEnd(); |
6865
|
0
|
|
|
|
|
|
die $x; |
6866
|
|
|
|
|
|
|
} |
6867
|
0
|
|
|
|
|
|
my $result = new Cassandra::Cassandra_get_range_slices_result(); |
6868
|
0
|
|
|
|
|
|
$result->read($self->{input}); |
6869
|
0
|
|
|
|
|
|
$self->{input}->readMessageEnd(); |
6870
|
|
|
|
|
|
|
|
6871
|
0
|
0
|
|
|
|
|
if (defined $result->{success} ) { |
6872
|
0
|
|
|
|
|
|
return $result->{success}; |
6873
|
|
|
|
|
|
|
} |
6874
|
0
|
0
|
|
|
|
|
if (defined $result->{ire}) { |
6875
|
0
|
|
|
|
|
|
die $result->{ire}; |
6876
|
|
|
|
|
|
|
} |
6877
|
0
|
0
|
|
|
|
|
if (defined $result->{ue}) { |
6878
|
0
|
|
|
|
|
|
die $result->{ue}; |
6879
|
|
|
|
|
|
|
} |
6880
|
0
|
0
|
|
|
|
|
if (defined $result->{te}) { |
6881
|
0
|
|
|
|
|
|
die $result->{te}; |
6882
|
|
|
|
|
|
|
} |
6883
|
0
|
|
|
|
|
|
die "get_range_slices failed: unknown result"; |
6884
|
|
|
|
|
|
|
} |
6885
|
|
|
|
|
|
|
sub get_indexed_slices{ |
6886
|
0
|
|
|
0
|
|
|
my $self = shift; |
6887
|
0
|
|
|
|
|
|
my $column_parent = shift; |
6888
|
0
|
|
|
|
|
|
my $index_clause = shift; |
6889
|
0
|
|
|
|
|
|
my $column_predicate = shift; |
6890
|
0
|
|
|
|
|
|
my $consistency_level = shift; |
6891
|
|
|
|
|
|
|
|
6892
|
0
|
|
|
|
|
|
$self->send_get_indexed_slices($column_parent, $index_clause, $column_predicate, $consistency_level); |
6893
|
0
|
|
|
|
|
|
return $self->recv_get_indexed_slices(); |
6894
|
|
|
|
|
|
|
} |
6895
|
|
|
|
|
|
|
|
6896
|
|
|
|
|
|
|
sub send_get_indexed_slices{ |
6897
|
0
|
|
|
0
|
|
|
my $self = shift; |
6898
|
0
|
|
|
|
|
|
my $column_parent = shift; |
6899
|
0
|
|
|
|
|
|
my $index_clause = shift; |
6900
|
0
|
|
|
|
|
|
my $column_predicate = shift; |
6901
|
0
|
|
|
|
|
|
my $consistency_level = shift; |
6902
|
|
|
|
|
|
|
|
6903
|
0
|
|
|
|
|
|
$self->{output}->writeMessageBegin('get_indexed_slices', TMessageType::CALL, $self->{seqid}); |
6904
|
0
|
|
|
|
|
|
my $args = new Cassandra::Cassandra_get_indexed_slices_args(); |
6905
|
0
|
|
|
|
|
|
$args->{column_parent} = $column_parent; |
6906
|
0
|
|
|
|
|
|
$args->{index_clause} = $index_clause; |
6907
|
0
|
|
|
|
|
|
$args->{column_predicate} = $column_predicate; |
6908
|
0
|
|
|
|
|
|
$args->{consistency_level} = $consistency_level; |
6909
|
0
|
|
|
|
|
|
$args->write($self->{output}); |
6910
|
0
|
|
|
|
|
|
$self->{output}->writeMessageEnd(); |
6911
|
0
|
|
|
|
|
|
$self->{output}->getTransport()->flush(); |
6912
|
|
|
|
|
|
|
} |
6913
|
|
|
|
|
|
|
|
6914
|
|
|
|
|
|
|
sub recv_get_indexed_slices{ |
6915
|
0
|
|
|
0
|
|
|
my $self = shift; |
6916
|
|
|
|
|
|
|
|
6917
|
0
|
|
|
|
|
|
my $rseqid = 0; |
6918
|
0
|
|
|
|
|
|
my $fname; |
6919
|
0
|
|
|
|
|
|
my $mtype = 0; |
6920
|
|
|
|
|
|
|
|
6921
|
0
|
|
|
|
|
|
$self->{input}->readMessageBegin(\$fname, \$mtype, \$rseqid); |
6922
|
0
|
0
|
|
|
|
|
if ($mtype == TMessageType::EXCEPTION) { |
6923
|
0
|
|
|
|
|
|
my $x = new TApplicationException(); |
6924
|
0
|
|
|
|
|
|
$x->read($self->{input}); |
6925
|
0
|
|
|
|
|
|
$self->{input}->readMessageEnd(); |
6926
|
0
|
|
|
|
|
|
die $x; |
6927
|
|
|
|
|
|
|
} |
6928
|
0
|
|
|
|
|
|
my $result = new Cassandra::Cassandra_get_indexed_slices_result(); |
6929
|
0
|
|
|
|
|
|
$result->read($self->{input}); |
6930
|
0
|
|
|
|
|
|
$self->{input}->readMessageEnd(); |
6931
|
|
|
|
|
|
|
|
6932
|
0
|
0
|
|
|
|
|
if (defined $result->{success} ) { |
6933
|
0
|
|
|
|
|
|
return $result->{success}; |
6934
|
|
|
|
|
|
|
} |
6935
|
0
|
0
|
|
|
|
|
if (defined $result->{ire}) { |
6936
|
0
|
|
|
|
|
|
die $result->{ire}; |
6937
|
|
|
|
|
|
|
} |
6938
|
0
|
0
|
|
|
|
|
if (defined $result->{ue}) { |
6939
|
0
|
|
|
|
|
|
die $result->{ue}; |
6940
|
|
|
|
|
|
|
} |
6941
|
0
|
0
|
|
|
|
|
if (defined $result->{te}) { |
6942
|
0
|
|
|
|
|
|
die $result->{te}; |
6943
|
|
|
|
|
|
|
} |
6944
|
0
|
|
|
|
|
|
die "get_indexed_slices failed: unknown result"; |
6945
|
|
|
|
|
|
|
} |
6946
|
|
|
|
|
|
|
sub insert{ |
6947
|
0
|
|
|
0
|
|
|
my $self = shift; |
6948
|
0
|
|
|
|
|
|
my $key = shift; |
6949
|
0
|
|
|
|
|
|
my $column_parent = shift; |
6950
|
0
|
|
|
|
|
|
my $column = shift; |
6951
|
0
|
|
|
|
|
|
my $consistency_level = shift; |
6952
|
|
|
|
|
|
|
|
6953
|
0
|
|
|
|
|
|
$self->send_insert($key, $column_parent, $column, $consistency_level); |
6954
|
0
|
|
|
|
|
|
$self->recv_insert(); |
6955
|
|
|
|
|
|
|
} |
6956
|
|
|
|
|
|
|
|
6957
|
|
|
|
|
|
|
sub send_insert{ |
6958
|
0
|
|
|
0
|
|
|
my $self = shift; |
6959
|
0
|
|
|
|
|
|
my $key = shift; |
6960
|
0
|
|
|
|
|
|
my $column_parent = shift; |
6961
|
0
|
|
|
|
|
|
my $column = shift; |
6962
|
0
|
|
|
|
|
|
my $consistency_level = shift; |
6963
|
|
|
|
|
|
|
|
6964
|
0
|
|
|
|
|
|
$self->{output}->writeMessageBegin('insert', TMessageType::CALL, $self->{seqid}); |
6965
|
0
|
|
|
|
|
|
my $args = new Cassandra::Cassandra_insert_args(); |
6966
|
0
|
|
|
|
|
|
$args->{key} = $key; |
6967
|
0
|
|
|
|
|
|
$args->{column_parent} = $column_parent; |
6968
|
0
|
|
|
|
|
|
$args->{column} = $column; |
6969
|
0
|
|
|
|
|
|
$args->{consistency_level} = $consistency_level; |
6970
|
0
|
|
|
|
|
|
$args->write($self->{output}); |
6971
|
0
|
|
|
|
|
|
$self->{output}->writeMessageEnd(); |
6972
|
0
|
|
|
|
|
|
$self->{output}->getTransport()->flush(); |
6973
|
|
|
|
|
|
|
} |
6974
|
|
|
|
|
|
|
|
6975
|
|
|
|
|
|
|
sub recv_insert{ |
6976
|
0
|
|
|
0
|
|
|
my $self = shift; |
6977
|
|
|
|
|
|
|
|
6978
|
0
|
|
|
|
|
|
my $rseqid = 0; |
6979
|
0
|
|
|
|
|
|
my $fname; |
6980
|
0
|
|
|
|
|
|
my $mtype = 0; |
6981
|
|
|
|
|
|
|
|
6982
|
0
|
|
|
|
|
|
$self->{input}->readMessageBegin(\$fname, \$mtype, \$rseqid); |
6983
|
0
|
0
|
|
|
|
|
if ($mtype == TMessageType::EXCEPTION) { |
6984
|
0
|
|
|
|
|
|
my $x = new TApplicationException(); |
6985
|
0
|
|
|
|
|
|
$x->read($self->{input}); |
6986
|
0
|
|
|
|
|
|
$self->{input}->readMessageEnd(); |
6987
|
0
|
|
|
|
|
|
die $x; |
6988
|
|
|
|
|
|
|
} |
6989
|
0
|
|
|
|
|
|
my $result = new Cassandra::Cassandra_insert_result(); |
6990
|
0
|
|
|
|
|
|
$result->read($self->{input}); |
6991
|
0
|
|
|
|
|
|
$self->{input}->readMessageEnd(); |
6992
|
|
|
|
|
|
|
|
6993
|
0
|
0
|
|
|
|
|
if (defined $result->{ire}) { |
6994
|
0
|
|
|
|
|
|
die $result->{ire}; |
6995
|
|
|
|
|
|
|
} |
6996
|
0
|
0
|
|
|
|
|
if (defined $result->{ue}) { |
6997
|
0
|
|
|
|
|
|
die $result->{ue}; |
6998
|
|
|
|
|
|
|
} |
6999
|
0
|
0
|
|
|
|
|
if (defined $result->{te}) { |
7000
|
0
|
|
|
|
|
|
die $result->{te}; |
7001
|
|
|
|
|
|
|
} |
7002
|
0
|
|
|
|
|
|
return; |
7003
|
|
|
|
|
|
|
} |
7004
|
|
|
|
|
|
|
sub add{ |
7005
|
0
|
|
|
0
|
|
|
my $self = shift; |
7006
|
0
|
|
|
|
|
|
my $key = shift; |
7007
|
0
|
|
|
|
|
|
my $column_parent = shift; |
7008
|
0
|
|
|
|
|
|
my $column = shift; |
7009
|
0
|
|
|
|
|
|
my $consistency_level = shift; |
7010
|
|
|
|
|
|
|
|
7011
|
0
|
|
|
|
|
|
$self->send_add($key, $column_parent, $column, $consistency_level); |
7012
|
0
|
|
|
|
|
|
$self->recv_add(); |
7013
|
|
|
|
|
|
|
} |
7014
|
|
|
|
|
|
|
|
7015
|
|
|
|
|
|
|
sub send_add{ |
7016
|
0
|
|
|
0
|
|
|
my $self = shift; |
7017
|
0
|
|
|
|
|
|
my $key = shift; |
7018
|
0
|
|
|
|
|
|
my $column_parent = shift; |
7019
|
0
|
|
|
|
|
|
my $column = shift; |
7020
|
0
|
|
|
|
|
|
my $consistency_level = shift; |
7021
|
|
|
|
|
|
|
|
7022
|
0
|
|
|
|
|
|
$self->{output}->writeMessageBegin('add', TMessageType::CALL, $self->{seqid}); |
7023
|
0
|
|
|
|
|
|
my $args = new Cassandra::Cassandra_add_args(); |
7024
|
0
|
|
|
|
|
|
$args->{key} = $key; |
7025
|
0
|
|
|
|
|
|
$args->{column_parent} = $column_parent; |
7026
|
0
|
|
|
|
|
|
$args->{column} = $column; |
7027
|
0
|
|
|
|
|
|
$args->{consistency_level} = $consistency_level; |
7028
|
0
|
|
|
|
|
|
$args->write($self->{output}); |
7029
|
0
|
|
|
|
|
|
$self->{output}->writeMessageEnd(); |
7030
|
0
|
|
|
|
|
|
$self->{output}->getTransport()->flush(); |
7031
|
|
|
|
|
|
|
} |
7032
|
|
|
|
|
|
|
|
7033
|
|
|
|
|
|
|
sub recv_add{ |
7034
|
0
|
|
|
0
|
|
|
my $self = shift; |
7035
|
|
|
|
|
|
|
|
7036
|
0
|
|
|
|
|
|
my $rseqid = 0; |
7037
|
0
|
|
|
|
|
|
my $fname; |
7038
|
0
|
|
|
|
|
|
my $mtype = 0; |
7039
|
|
|
|
|
|
|
|
7040
|
0
|
|
|
|
|
|
$self->{input}->readMessageBegin(\$fname, \$mtype, \$rseqid); |
7041
|
0
|
0
|
|
|
|
|
if ($mtype == TMessageType::EXCEPTION) { |
7042
|
0
|
|
|
|
|
|
my $x = new TApplicationException(); |
7043
|
0
|
|
|
|
|
|
$x->read($self->{input}); |
7044
|
0
|
|
|
|
|
|
$self->{input}->readMessageEnd(); |
7045
|
0
|
|
|
|
|
|
die $x; |
7046
|
|
|
|
|
|
|
} |
7047
|
0
|
|
|
|
|
|
my $result = new Cassandra::Cassandra_add_result(); |
7048
|
0
|
|
|
|
|
|
$result->read($self->{input}); |
7049
|
0
|
|
|
|
|
|
$self->{input}->readMessageEnd(); |
7050
|
|
|
|
|
|
|
|
7051
|
0
|
0
|
|
|
|
|
if (defined $result->{ire}) { |
7052
|
0
|
|
|
|
|
|
die $result->{ire}; |
7053
|
|
|
|
|
|
|
} |
7054
|
0
|
0
|
|
|
|
|
if (defined $result->{ue}) { |
7055
|
0
|
|
|
|
|
|
die $result->{ue}; |
7056
|
|
|
|
|
|
|
} |
7057
|
0
|
0
|
|
|
|
|
if (defined $result->{te}) { |
7058
|
0
|
|
|
|
|
|
die $result->{te}; |
7059
|
|
|
|
|
|
|
} |
7060
|
0
|
|
|
|
|
|
return; |
7061
|
|
|
|
|
|
|
} |
7062
|
|
|
|
|
|
|
sub remove{ |
7063
|
0
|
|
|
0
|
|
|
my $self = shift; |
7064
|
0
|
|
|
|
|
|
my $key = shift; |
7065
|
0
|
|
|
|
|
|
my $column_path = shift; |
7066
|
0
|
|
|
|
|
|
my $timestamp = shift; |
7067
|
0
|
|
|
|
|
|
my $consistency_level = shift; |
7068
|
|
|
|
|
|
|
|
7069
|
0
|
|
|
|
|
|
$self->send_remove($key, $column_path, $timestamp, $consistency_level); |
7070
|
0
|
|
|
|
|
|
$self->recv_remove(); |
7071
|
|
|
|
|
|
|
} |
7072
|
|
|
|
|
|
|
|
7073
|
|
|
|
|
|
|
sub send_remove{ |
7074
|
0
|
|
|
0
|
|
|
my $self = shift; |
7075
|
0
|
|
|
|
|
|
my $key = shift; |
7076
|
0
|
|
|
|
|
|
my $column_path = shift; |
7077
|
0
|
|
|
|
|
|
my $timestamp = shift; |
7078
|
0
|
|
|
|
|
|
my $consistency_level = shift; |
7079
|
|
|
|
|
|
|
|
7080
|
0
|
|
|
|
|
|
$self->{output}->writeMessageBegin('remove', TMessageType::CALL, $self->{seqid}); |
7081
|
0
|
|
|
|
|
|
my $args = new Cassandra::Cassandra_remove_args(); |
7082
|
0
|
|
|
|
|
|
$args->{key} = $key; |
7083
|
0
|
|
|
|
|
|
$args->{column_path} = $column_path; |
7084
|
0
|
|
|
|
|
|
$args->{timestamp} = $timestamp; |
7085
|
0
|
|
|
|
|
|
$args->{consistency_level} = $consistency_level; |
7086
|
0
|
|
|
|
|
|
$args->write($self->{output}); |
7087
|
0
|
|
|
|
|
|
$self->{output}->writeMessageEnd(); |
7088
|
0
|
|
|
|
|
|
$self->{output}->getTransport()->flush(); |
7089
|
|
|
|
|
|
|
} |
7090
|
|
|
|
|
|
|
|
7091
|
|
|
|
|
|
|
sub recv_remove{ |
7092
|
0
|
|
|
0
|
|
|
my $self = shift; |
7093
|
|
|
|
|
|
|
|
7094
|
0
|
|
|
|
|
|
my $rseqid = 0; |
7095
|
0
|
|
|
|
|
|
my $fname; |
7096
|
0
|
|
|
|
|
|
my $mtype = 0; |
7097
|
|
|
|
|
|
|
|
7098
|
0
|
|
|
|
|
|
$self->{input}->readMessageBegin(\$fname, \$mtype, \$rseqid); |
7099
|
0
|
0
|
|
|
|
|
if ($mtype == TMessageType::EXCEPTION) { |
7100
|
0
|
|
|
|
|
|
my $x = new TApplicationException(); |
7101
|
0
|
|
|
|
|
|
$x->read($self->{input}); |
7102
|
0
|
|
|
|
|
|
$self->{input}->readMessageEnd(); |
7103
|
0
|
|
|
|
|
|
die $x; |
7104
|
|
|
|
|
|
|
} |
7105
|
0
|
|
|
|
|
|
my $result = new Cassandra::Cassandra_remove_result(); |
7106
|
0
|
|
|
|
|
|
$result->read($self->{input}); |
7107
|
0
|
|
|
|
|
|
$self->{input}->readMessageEnd(); |
7108
|
|
|
|
|
|
|
|
7109
|
0
|
0
|
|
|
|
|
if (defined $result->{ire}) { |
7110
|
0
|
|
|
|
|
|
die $result->{ire}; |
7111
|
|
|
|
|
|
|
} |
7112
|
0
|
0
|
|
|
|
|
if (defined $result->{ue}) { |
7113
|
0
|
|
|
|
|
|
die $result->{ue}; |
7114
|
|
|
|
|
|
|
} |
7115
|
0
|
0
|
|
|
|
|
if (defined $result->{te}) { |
7116
|
0
|
|
|
|
|
|
die $result->{te}; |
7117
|
|
|
|
|
|
|
} |
7118
|
0
|
|
|
|
|
|
return; |
7119
|
|
|
|
|
|
|
} |
7120
|
|
|
|
|
|
|
sub remove_counter{ |
7121
|
0
|
|
|
0
|
|
|
my $self = shift; |
7122
|
0
|
|
|
|
|
|
my $key = shift; |
7123
|
0
|
|
|
|
|
|
my $path = shift; |
7124
|
0
|
|
|
|
|
|
my $consistency_level = shift; |
7125
|
|
|
|
|
|
|
|
7126
|
0
|
|
|
|
|
|
$self->send_remove_counter($key, $path, $consistency_level); |
7127
|
0
|
|
|
|
|
|
$self->recv_remove_counter(); |
7128
|
|
|
|
|
|
|
} |
7129
|
|
|
|
|
|
|
|
7130
|
|
|
|
|
|
|
sub send_remove_counter{ |
7131
|
0
|
|
|
0
|
|
|
my $self = shift; |
7132
|
0
|
|
|
|
|
|
my $key = shift; |
7133
|
0
|
|
|
|
|
|
my $path = shift; |
7134
|
0
|
|
|
|
|
|
my $consistency_level = shift; |
7135
|
|
|
|
|
|
|
|
7136
|
0
|
|
|
|
|
|
$self->{output}->writeMessageBegin('remove_counter', TMessageType::CALL, $self->{seqid}); |
7137
|
0
|
|
|
|
|
|
my $args = new Cassandra::Cassandra_remove_counter_args(); |
7138
|
0
|
|
|
|
|
|
$args->{key} = $key; |
7139
|
0
|
|
|
|
|
|
$args->{path} = $path; |
7140
|
0
|
|
|
|
|
|
$args->{consistency_level} = $consistency_level; |
7141
|
0
|
|
|
|
|
|
$args->write($self->{output}); |
7142
|
0
|
|
|
|
|
|
$self->{output}->writeMessageEnd(); |
7143
|
0
|
|
|
|
|
|
$self->{output}->getTransport()->flush(); |
7144
|
|
|
|
|
|
|
} |
7145
|
|
|
|
|
|
|
|
7146
|
|
|
|
|
|
|
sub recv_remove_counter{ |
7147
|
0
|
|
|
0
|
|
|
my $self = shift; |
7148
|
|
|
|
|
|
|
|
7149
|
0
|
|
|
|
|
|
my $rseqid = 0; |
7150
|
0
|
|
|
|
|
|
my $fname; |
7151
|
0
|
|
|
|
|
|
my $mtype = 0; |
7152
|
|
|
|
|
|
|
|
7153
|
0
|
|
|
|
|
|
$self->{input}->readMessageBegin(\$fname, \$mtype, \$rseqid); |
7154
|
0
|
0
|
|
|
|
|
if ($mtype == TMessageType::EXCEPTION) { |
7155
|
0
|
|
|
|
|
|
my $x = new TApplicationException(); |
7156
|
0
|
|
|
|
|
|
$x->read($self->{input}); |
7157
|
0
|
|
|
|
|
|
$self->{input}->readMessageEnd(); |
7158
|
0
|
|
|
|
|
|
die $x; |
7159
|
|
|
|
|
|
|
} |
7160
|
0
|
|
|
|
|
|
my $result = new Cassandra::Cassandra_remove_counter_result(); |
7161
|
0
|
|
|
|
|
|
$result->read($self->{input}); |
7162
|
0
|
|
|
|
|
|
$self->{input}->readMessageEnd(); |
7163
|
|
|
|
|
|
|
|
7164
|
0
|
0
|
|
|
|
|
if (defined $result->{ire}) { |
7165
|
0
|
|
|
|
|
|
die $result->{ire}; |
7166
|
|
|
|
|
|
|
} |
7167
|
0
|
0
|
|
|
|
|
if (defined $result->{ue}) { |
7168
|
0
|
|
|
|
|
|
die $result->{ue}; |
7169
|
|
|
|
|
|
|
} |
7170
|
0
|
0
|
|
|
|
|
if (defined $result->{te}) { |
7171
|
0
|
|
|
|
|
|
die $result->{te}; |
7172
|
|
|
|
|
|
|
} |
7173
|
0
|
|
|
|
|
|
return; |
7174
|
|
|
|
|
|
|
} |
7175
|
|
|
|
|
|
|
sub batch_mutate{ |
7176
|
0
|
|
|
0
|
|
|
my $self = shift; |
7177
|
0
|
|
|
|
|
|
my $mutation_map = shift; |
7178
|
0
|
|
|
|
|
|
my $consistency_level = shift; |
7179
|
|
|
|
|
|
|
|
7180
|
0
|
|
|
|
|
|
$self->send_batch_mutate($mutation_map, $consistency_level); |
7181
|
0
|
|
|
|
|
|
$self->recv_batch_mutate(); |
7182
|
|
|
|
|
|
|
} |
7183
|
|
|
|
|
|
|
|
7184
|
|
|
|
|
|
|
sub send_batch_mutate{ |
7185
|
0
|
|
|
0
|
|
|
my $self = shift; |
7186
|
0
|
|
|
|
|
|
my $mutation_map = shift; |
7187
|
0
|
|
|
|
|
|
my $consistency_level = shift; |
7188
|
|
|
|
|
|
|
|
7189
|
0
|
|
|
|
|
|
$self->{output}->writeMessageBegin('batch_mutate', TMessageType::CALL, $self->{seqid}); |
7190
|
0
|
|
|
|
|
|
my $args = new Cassandra::Cassandra_batch_mutate_args(); |
7191
|
0
|
|
|
|
|
|
$args->{mutation_map} = $mutation_map; |
7192
|
0
|
|
|
|
|
|
$args->{consistency_level} = $consistency_level; |
7193
|
0
|
|
|
|
|
|
$args->write($self->{output}); |
7194
|
0
|
|
|
|
|
|
$self->{output}->writeMessageEnd(); |
7195
|
0
|
|
|
|
|
|
$self->{output}->getTransport()->flush(); |
7196
|
|
|
|
|
|
|
} |
7197
|
|
|
|
|
|
|
|
7198
|
|
|
|
|
|
|
sub recv_batch_mutate{ |
7199
|
0
|
|
|
0
|
|
|
my $self = shift; |
7200
|
|
|
|
|
|
|
|
7201
|
0
|
|
|
|
|
|
my $rseqid = 0; |
7202
|
0
|
|
|
|
|
|
my $fname; |
7203
|
0
|
|
|
|
|
|
my $mtype = 0; |
7204
|
|
|
|
|
|
|
|
7205
|
0
|
|
|
|
|
|
$self->{input}->readMessageBegin(\$fname, \$mtype, \$rseqid); |
7206
|
0
|
0
|
|
|
|
|
if ($mtype == TMessageType::EXCEPTION) { |
7207
|
0
|
|
|
|
|
|
my $x = new TApplicationException(); |
7208
|
0
|
|
|
|
|
|
$x->read($self->{input}); |
7209
|
0
|
|
|
|
|
|
$self->{input}->readMessageEnd(); |
7210
|
0
|
|
|
|
|
|
die $x; |
7211
|
|
|
|
|
|
|
} |
7212
|
0
|
|
|
|
|
|
my $result = new Cassandra::Cassandra_batch_mutate_result(); |
7213
|
0
|
|
|
|
|
|
$result->read($self->{input}); |
7214
|
0
|
|
|
|
|
|
$self->{input}->readMessageEnd(); |
7215
|
|
|
|
|
|
|
|
7216
|
0
|
0
|
|
|
|
|
if (defined $result->{ire}) { |
7217
|
0
|
|
|
|
|
|
die $result->{ire}; |
7218
|
|
|
|
|
|
|
} |
7219
|
0
|
0
|
|
|
|
|
if (defined $result->{ue}) { |
7220
|
0
|
|
|
|
|
|
die $result->{ue}; |
7221
|
|
|
|
|
|
|
} |
7222
|
0
|
0
|
|
|
|
|
if (defined $result->{te}) { |
7223
|
0
|
|
|
|
|
|
die $result->{te}; |
7224
|
|
|
|
|
|
|
} |
7225
|
0
|
|
|
|
|
|
return; |
7226
|
|
|
|
|
|
|
} |
7227
|
|
|
|
|
|
|
sub truncate{ |
7228
|
0
|
|
|
0
|
|
|
my $self = shift; |
7229
|
0
|
|
|
|
|
|
my $cfname = shift; |
7230
|
|
|
|
|
|
|
|
7231
|
0
|
|
|
|
|
|
$self->send_truncate($cfname); |
7232
|
0
|
|
|
|
|
|
$self->recv_truncate(); |
7233
|
|
|
|
|
|
|
} |
7234
|
|
|
|
|
|
|
|
7235
|
|
|
|
|
|
|
sub send_truncate{ |
7236
|
0
|
|
|
0
|
|
|
my $self = shift; |
7237
|
0
|
|
|
|
|
|
my $cfname = shift; |
7238
|
|
|
|
|
|
|
|
7239
|
0
|
|
|
|
|
|
$self->{output}->writeMessageBegin('truncate', TMessageType::CALL, $self->{seqid}); |
7240
|
0
|
|
|
|
|
|
my $args = new Cassandra::Cassandra_truncate_args(); |
7241
|
0
|
|
|
|
|
|
$args->{cfname} = $cfname; |
7242
|
0
|
|
|
|
|
|
$args->write($self->{output}); |
7243
|
0
|
|
|
|
|
|
$self->{output}->writeMessageEnd(); |
7244
|
0
|
|
|
|
|
|
$self->{output}->getTransport()->flush(); |
7245
|
|
|
|
|
|
|
} |
7246
|
|
|
|
|
|
|
|
7247
|
|
|
|
|
|
|
sub recv_truncate{ |
7248
|
0
|
|
|
0
|
|
|
my $self = shift; |
7249
|
|
|
|
|
|
|
|
7250
|
0
|
|
|
|
|
|
my $rseqid = 0; |
7251
|
0
|
|
|
|
|
|
my $fname; |
7252
|
0
|
|
|
|
|
|
my $mtype = 0; |
7253
|
|
|
|
|
|
|
|
7254
|
0
|
|
|
|
|
|
$self->{input}->readMessageBegin(\$fname, \$mtype, \$rseqid); |
7255
|
0
|
0
|
|
|
|
|
if ($mtype == TMessageType::EXCEPTION) { |
7256
|
0
|
|
|
|
|
|
my $x = new TApplicationException(); |
7257
|
0
|
|
|
|
|
|
$x->read($self->{input}); |
7258
|
0
|
|
|
|
|
|
$self->{input}->readMessageEnd(); |
7259
|
0
|
|
|
|
|
|
die $x; |
7260
|
|
|
|
|
|
|
} |
7261
|
0
|
|
|
|
|
|
my $result = new Cassandra::Cassandra_truncate_result(); |
7262
|
0
|
|
|
|
|
|
$result->read($self->{input}); |
7263
|
0
|
|
|
|
|
|
$self->{input}->readMessageEnd(); |
7264
|
|
|
|
|
|
|
|
7265
|
0
|
0
|
|
|
|
|
if (defined $result->{ire}) { |
7266
|
0
|
|
|
|
|
|
die $result->{ire}; |
7267
|
|
|
|
|
|
|
} |
7268
|
0
|
0
|
|
|
|
|
if (defined $result->{ue}) { |
7269
|
0
|
|
|
|
|
|
die $result->{ue}; |
7270
|
|
|
|
|
|
|
} |
7271
|
0
|
|
|
|
|
|
return; |
7272
|
|
|
|
|
|
|
} |
7273
|
|
|
|
|
|
|
sub describe_schema_versions{ |
7274
|
0
|
|
|
0
|
|
|
my $self = shift; |
7275
|
|
|
|
|
|
|
|
7276
|
0
|
|
|
|
|
|
$self->send_describe_schema_versions(); |
7277
|
0
|
|
|
|
|
|
return $self->recv_describe_schema_versions(); |
7278
|
|
|
|
|
|
|
} |
7279
|
|
|
|
|
|
|
|
7280
|
|
|
|
|
|
|
sub send_describe_schema_versions{ |
7281
|
0
|
|
|
0
|
|
|
my $self = shift; |
7282
|
|
|
|
|
|
|
|
7283
|
0
|
|
|
|
|
|
$self->{output}->writeMessageBegin('describe_schema_versions', TMessageType::CALL, $self->{seqid}); |
7284
|
0
|
|
|
|
|
|
my $args = new Cassandra::Cassandra_describe_schema_versions_args(); |
7285
|
0
|
|
|
|
|
|
$args->write($self->{output}); |
7286
|
0
|
|
|
|
|
|
$self->{output}->writeMessageEnd(); |
7287
|
0
|
|
|
|
|
|
$self->{output}->getTransport()->flush(); |
7288
|
|
|
|
|
|
|
} |
7289
|
|
|
|
|
|
|
|
7290
|
|
|
|
|
|
|
sub recv_describe_schema_versions{ |
7291
|
0
|
|
|
0
|
|
|
my $self = shift; |
7292
|
|
|
|
|
|
|
|
7293
|
0
|
|
|
|
|
|
my $rseqid = 0; |
7294
|
0
|
|
|
|
|
|
my $fname; |
7295
|
0
|
|
|
|
|
|
my $mtype = 0; |
7296
|
|
|
|
|
|
|
|
7297
|
0
|
|
|
|
|
|
$self->{input}->readMessageBegin(\$fname, \$mtype, \$rseqid); |
7298
|
0
|
0
|
|
|
|
|
if ($mtype == TMessageType::EXCEPTION) { |
7299
|
0
|
|
|
|
|
|
my $x = new TApplicationException(); |
7300
|
0
|
|
|
|
|
|
$x->read($self->{input}); |
7301
|
0
|
|
|
|
|
|
$self->{input}->readMessageEnd(); |
7302
|
0
|
|
|
|
|
|
die $x; |
7303
|
|
|
|
|
|
|
} |
7304
|
0
|
|
|
|
|
|
my $result = new Cassandra::Cassandra_describe_schema_versions_result(); |
7305
|
0
|
|
|
|
|
|
$result->read($self->{input}); |
7306
|
0
|
|
|
|
|
|
$self->{input}->readMessageEnd(); |
7307
|
|
|
|
|
|
|
|
7308
|
0
|
0
|
|
|
|
|
if (defined $result->{success} ) { |
7309
|
0
|
|
|
|
|
|
return $result->{success}; |
7310
|
|
|
|
|
|
|
} |
7311
|
0
|
0
|
|
|
|
|
if (defined $result->{ire}) { |
7312
|
0
|
|
|
|
|
|
die $result->{ire}; |
7313
|
|
|
|
|
|
|
} |
7314
|
0
|
|
|
|
|
|
die "describe_schema_versions failed: unknown result"; |
7315
|
|
|
|
|
|
|
} |
7316
|
|
|
|
|
|
|
sub describe_keyspaces{ |
7317
|
0
|
|
|
0
|
|
|
my $self = shift; |
7318
|
|
|
|
|
|
|
|
7319
|
0
|
|
|
|
|
|
$self->send_describe_keyspaces(); |
7320
|
0
|
|
|
|
|
|
return $self->recv_describe_keyspaces(); |
7321
|
|
|
|
|
|
|
} |
7322
|
|
|
|
|
|
|
|
7323
|
|
|
|
|
|
|
sub send_describe_keyspaces{ |
7324
|
0
|
|
|
0
|
|
|
my $self = shift; |
7325
|
|
|
|
|
|
|
|
7326
|
0
|
|
|
|
|
|
$self->{output}->writeMessageBegin('describe_keyspaces', TMessageType::CALL, $self->{seqid}); |
7327
|
0
|
|
|
|
|
|
my $args = new Cassandra::Cassandra_describe_keyspaces_args(); |
7328
|
0
|
|
|
|
|
|
$args->write($self->{output}); |
7329
|
0
|
|
|
|
|
|
$self->{output}->writeMessageEnd(); |
7330
|
0
|
|
|
|
|
|
$self->{output}->getTransport()->flush(); |
7331
|
|
|
|
|
|
|
} |
7332
|
|
|
|
|
|
|
|
7333
|
|
|
|
|
|
|
sub recv_describe_keyspaces{ |
7334
|
0
|
|
|
0
|
|
|
my $self = shift; |
7335
|
|
|
|
|
|
|
|
7336
|
0
|
|
|
|
|
|
my $rseqid = 0; |
7337
|
0
|
|
|
|
|
|
my $fname; |
7338
|
0
|
|
|
|
|
|
my $mtype = 0; |
7339
|
|
|
|
|
|
|
|
7340
|
0
|
|
|
|
|
|
$self->{input}->readMessageBegin(\$fname, \$mtype, \$rseqid); |
7341
|
0
|
0
|
|
|
|
|
if ($mtype == TMessageType::EXCEPTION) { |
7342
|
0
|
|
|
|
|
|
my $x = new TApplicationException(); |
7343
|
0
|
|
|
|
|
|
$x->read($self->{input}); |
7344
|
0
|
|
|
|
|
|
$self->{input}->readMessageEnd(); |
7345
|
0
|
|
|
|
|
|
die $x; |
7346
|
|
|
|
|
|
|
} |
7347
|
0
|
|
|
|
|
|
my $result = new Cassandra::Cassandra_describe_keyspaces_result(); |
7348
|
0
|
|
|
|
|
|
$result->read($self->{input}); |
7349
|
0
|
|
|
|
|
|
$self->{input}->readMessageEnd(); |
7350
|
|
|
|
|
|
|
|
7351
|
0
|
0
|
|
|
|
|
if (defined $result->{success} ) { |
7352
|
0
|
|
|
|
|
|
return $result->{success}; |
7353
|
|
|
|
|
|
|
} |
7354
|
0
|
0
|
|
|
|
|
if (defined $result->{ire}) { |
7355
|
0
|
|
|
|
|
|
die $result->{ire}; |
7356
|
|
|
|
|
|
|
} |
7357
|
0
|
|
|
|
|
|
die "describe_keyspaces failed: unknown result"; |
7358
|
|
|
|
|
|
|
} |
7359
|
|
|
|
|
|
|
sub describe_cluster_name{ |
7360
|
0
|
|
|
0
|
|
|
my $self = shift; |
7361
|
|
|
|
|
|
|
|
7362
|
0
|
|
|
|
|
|
$self->send_describe_cluster_name(); |
7363
|
0
|
|
|
|
|
|
return $self->recv_describe_cluster_name(); |
7364
|
|
|
|
|
|
|
} |
7365
|
|
|
|
|
|
|
|
7366
|
|
|
|
|
|
|
sub send_describe_cluster_name{ |
7367
|
0
|
|
|
0
|
|
|
my $self = shift; |
7368
|
|
|
|
|
|
|
|
7369
|
0
|
|
|
|
|
|
$self->{output}->writeMessageBegin('describe_cluster_name', TMessageType::CALL, $self->{seqid}); |
7370
|
0
|
|
|
|
|
|
my $args = new Cassandra::Cassandra_describe_cluster_name_args(); |
7371
|
0
|
|
|
|
|
|
$args->write($self->{output}); |
7372
|
0
|
|
|
|
|
|
$self->{output}->writeMessageEnd(); |
7373
|
0
|
|
|
|
|
|
$self->{output}->getTransport()->flush(); |
7374
|
|
|
|
|
|
|
} |
7375
|
|
|
|
|
|
|
|
7376
|
|
|
|
|
|
|
sub recv_describe_cluster_name{ |
7377
|
0
|
|
|
0
|
|
|
my $self = shift; |
7378
|
|
|
|
|
|
|
|
7379
|
0
|
|
|
|
|
|
my $rseqid = 0; |
7380
|
0
|
|
|
|
|
|
my $fname; |
7381
|
0
|
|
|
|
|
|
my $mtype = 0; |
7382
|
|
|
|
|
|
|
|
7383
|
0
|
|
|
|
|
|
$self->{input}->readMessageBegin(\$fname, \$mtype, \$rseqid); |
7384
|
0
|
0
|
|
|
|
|
if ($mtype == TMessageType::EXCEPTION) { |
7385
|
0
|
|
|
|
|
|
my $x = new TApplicationException(); |
7386
|
0
|
|
|
|
|
|
$x->read($self->{input}); |
7387
|
0
|
|
|
|
|
|
$self->{input}->readMessageEnd(); |
7388
|
0
|
|
|
|
|
|
die $x; |
7389
|
|
|
|
|
|
|
} |
7390
|
0
|
|
|
|
|
|
my $result = new Cassandra::Cassandra_describe_cluster_name_result(); |
7391
|
0
|
|
|
|
|
|
$result->read($self->{input}); |
7392
|
0
|
|
|
|
|
|
$self->{input}->readMessageEnd(); |
7393
|
|
|
|
|
|
|
|
7394
|
0
|
0
|
|
|
|
|
if (defined $result->{success} ) { |
7395
|
0
|
|
|
|
|
|
return $result->{success}; |
7396
|
|
|
|
|
|
|
} |
7397
|
0
|
|
|
|
|
|
die "describe_cluster_name failed: unknown result"; |
7398
|
|
|
|
|
|
|
} |
7399
|
|
|
|
|
|
|
sub describe_version{ |
7400
|
0
|
|
|
0
|
|
|
my $self = shift; |
7401
|
|
|
|
|
|
|
|
7402
|
0
|
|
|
|
|
|
$self->send_describe_version(); |
7403
|
0
|
|
|
|
|
|
return $self->recv_describe_version(); |
7404
|
|
|
|
|
|
|
} |
7405
|
|
|
|
|
|
|
|
7406
|
|
|
|
|
|
|
sub send_describe_version{ |
7407
|
0
|
|
|
0
|
|
|
my $self = shift; |
7408
|
|
|
|
|
|
|
|
7409
|
0
|
|
|
|
|
|
$self->{output}->writeMessageBegin('describe_version', TMessageType::CALL, $self->{seqid}); |
7410
|
0
|
|
|
|
|
|
my $args = new Cassandra::Cassandra_describe_version_args(); |
7411
|
0
|
|
|
|
|
|
$args->write($self->{output}); |
7412
|
0
|
|
|
|
|
|
$self->{output}->writeMessageEnd(); |
7413
|
0
|
|
|
|
|
|
$self->{output}->getTransport()->flush(); |
7414
|
|
|
|
|
|
|
} |
7415
|
|
|
|
|
|
|
|
7416
|
|
|
|
|
|
|
sub recv_describe_version{ |
7417
|
0
|
|
|
0
|
|
|
my $self = shift; |
7418
|
|
|
|
|
|
|
|
7419
|
0
|
|
|
|
|
|
my $rseqid = 0; |
7420
|
0
|
|
|
|
|
|
my $fname; |
7421
|
0
|
|
|
|
|
|
my $mtype = 0; |
7422
|
|
|
|
|
|
|
|
7423
|
0
|
|
|
|
|
|
$self->{input}->readMessageBegin(\$fname, \$mtype, \$rseqid); |
7424
|
0
|
0
|
|
|
|
|
if ($mtype == TMessageType::EXCEPTION) { |
7425
|
0
|
|
|
|
|
|
my $x = new TApplicationException(); |
7426
|
0
|
|
|
|
|
|
$x->read($self->{input}); |
7427
|
0
|
|
|
|
|
|
$self->{input}->readMessageEnd(); |
7428
|
0
|
|
|
|
|
|
die $x; |
7429
|
|
|
|
|
|
|
} |
7430
|
0
|
|
|
|
|
|
my $result = new Cassandra::Cassandra_describe_version_result(); |
7431
|
0
|
|
|
|
|
|
$result->read($self->{input}); |
7432
|
0
|
|
|
|
|
|
$self->{input}->readMessageEnd(); |
7433
|
|
|
|
|
|
|
|
7434
|
0
|
0
|
|
|
|
|
if (defined $result->{success} ) { |
7435
|
0
|
|
|
|
|
|
return $result->{success}; |
7436
|
|
|
|
|
|
|
} |
7437
|
0
|
|
|
|
|
|
die "describe_version failed: unknown result"; |
7438
|
|
|
|
|
|
|
} |
7439
|
|
|
|
|
|
|
sub describe_ring{ |
7440
|
0
|
|
|
0
|
|
|
my $self = shift; |
7441
|
0
|
|
|
|
|
|
my $keyspace = shift; |
7442
|
|
|
|
|
|
|
|
7443
|
0
|
|
|
|
|
|
$self->send_describe_ring($keyspace); |
7444
|
0
|
|
|
|
|
|
return $self->recv_describe_ring(); |
7445
|
|
|
|
|
|
|
} |
7446
|
|
|
|
|
|
|
|
7447
|
|
|
|
|
|
|
sub send_describe_ring{ |
7448
|
0
|
|
|
0
|
|
|
my $self = shift; |
7449
|
0
|
|
|
|
|
|
my $keyspace = shift; |
7450
|
|
|
|
|
|
|
|
7451
|
0
|
|
|
|
|
|
$self->{output}->writeMessageBegin('describe_ring', TMessageType::CALL, $self->{seqid}); |
7452
|
0
|
|
|
|
|
|
my $args = new Cassandra::Cassandra_describe_ring_args(); |
7453
|
0
|
|
|
|
|
|
$args->{keyspace} = $keyspace; |
7454
|
0
|
|
|
|
|
|
$args->write($self->{output}); |
7455
|
0
|
|
|
|
|
|
$self->{output}->writeMessageEnd(); |
7456
|
0
|
|
|
|
|
|
$self->{output}->getTransport()->flush(); |
7457
|
|
|
|
|
|
|
} |
7458
|
|
|
|
|
|
|
|
7459
|
|
|
|
|
|
|
sub recv_describe_ring{ |
7460
|
0
|
|
|
0
|
|
|
my $self = shift; |
7461
|
|
|
|
|
|
|
|
7462
|
0
|
|
|
|
|
|
my $rseqid = 0; |
7463
|
0
|
|
|
|
|
|
my $fname; |
7464
|
0
|
|
|
|
|
|
my $mtype = 0; |
7465
|
|
|
|
|
|
|
|
7466
|
0
|
|
|
|
|
|
$self->{input}->readMessageBegin(\$fname, \$mtype, \$rseqid); |
7467
|
0
|
0
|
|
|
|
|
if ($mtype == TMessageType::EXCEPTION) { |
7468
|
0
|
|
|
|
|
|
my $x = new TApplicationException(); |
7469
|
0
|
|
|
|
|
|
$x->read($self->{input}); |
7470
|
0
|
|
|
|
|
|
$self->{input}->readMessageEnd(); |
7471
|
0
|
|
|
|
|
|
die $x; |
7472
|
|
|
|
|
|
|
} |
7473
|
0
|
|
|
|
|
|
my $result = new Cassandra::Cassandra_describe_ring_result(); |
7474
|
0
|
|
|
|
|
|
$result->read($self->{input}); |
7475
|
0
|
|
|
|
|
|
$self->{input}->readMessageEnd(); |
7476
|
|
|
|
|
|
|
|
7477
|
0
|
0
|
|
|
|
|
if (defined $result->{success} ) { |
7478
|
0
|
|
|
|
|
|
return $result->{success}; |
7479
|
|
|
|
|
|
|
} |
7480
|
0
|
0
|
|
|
|
|
if (defined $result->{ire}) { |
7481
|
0
|
|
|
|
|
|
die $result->{ire}; |
7482
|
|
|
|
|
|
|
} |
7483
|
0
|
|
|
|
|
|
die "describe_ring failed: unknown result"; |
7484
|
|
|
|
|
|
|
} |
7485
|
|
|
|
|
|
|
sub describe_partitioner{ |
7486
|
0
|
|
|
0
|
|
|
my $self = shift; |
7487
|
|
|
|
|
|
|
|
7488
|
0
|
|
|
|
|
|
$self->send_describe_partitioner(); |
7489
|
0
|
|
|
|
|
|
return $self->recv_describe_partitioner(); |
7490
|
|
|
|
|
|
|
} |
7491
|
|
|
|
|
|
|
|
7492
|
|
|
|
|
|
|
sub send_describe_partitioner{ |
7493
|
0
|
|
|
0
|
|
|
my $self = shift; |
7494
|
|
|
|
|
|
|
|
7495
|
0
|
|
|
|
|
|
$self->{output}->writeMessageBegin('describe_partitioner', TMessageType::CALL, $self->{seqid}); |
7496
|
0
|
|
|
|
|
|
my $args = new Cassandra::Cassandra_describe_partitioner_args(); |
7497
|
0
|
|
|
|
|
|
$args->write($self->{output}); |
7498
|
0
|
|
|
|
|
|
$self->{output}->writeMessageEnd(); |
7499
|
0
|
|
|
|
|
|
$self->{output}->getTransport()->flush(); |
7500
|
|
|
|
|
|
|
} |
7501
|
|
|
|
|
|
|
|
7502
|
|
|
|
|
|
|
sub recv_describe_partitioner{ |
7503
|
0
|
|
|
0
|
|
|
my $self = shift; |
7504
|
|
|
|
|
|
|
|
7505
|
0
|
|
|
|
|
|
my $rseqid = 0; |
7506
|
0
|
|
|
|
|
|
my $fname; |
7507
|
0
|
|
|
|
|
|
my $mtype = 0; |
7508
|
|
|
|
|
|
|
|
7509
|
0
|
|
|
|
|
|
$self->{input}->readMessageBegin(\$fname, \$mtype, \$rseqid); |
7510
|
0
|
0
|
|
|
|
|
if ($mtype == TMessageType::EXCEPTION) { |
7511
|
0
|
|
|
|
|
|
my $x = new TApplicationException(); |
7512
|
0
|
|
|
|
|
|
$x->read($self->{input}); |
7513
|
0
|
|
|
|
|
|
$self->{input}->readMessageEnd(); |
7514
|
0
|
|
|
|
|
|
die $x; |
7515
|
|
|
|
|
|
|
} |
7516
|
0
|
|
|
|
|
|
my $result = new Cassandra::Cassandra_describe_partitioner_result(); |
7517
|
0
|
|
|
|
|
|
$result->read($self->{input}); |
7518
|
0
|
|
|
|
|
|
$self->{input}->readMessageEnd(); |
7519
|
|
|
|
|
|
|
|
7520
|
0
|
0
|
|
|
|
|
if (defined $result->{success} ) { |
7521
|
0
|
|
|
|
|
|
return $result->{success}; |
7522
|
|
|
|
|
|
|
} |
7523
|
0
|
|
|
|
|
|
die "describe_partitioner failed: unknown result"; |
7524
|
|
|
|
|
|
|
} |
7525
|
|
|
|
|
|
|
sub describe_snitch{ |
7526
|
0
|
|
|
0
|
|
|
my $self = shift; |
7527
|
|
|
|
|
|
|
|
7528
|
0
|
|
|
|
|
|
$self->send_describe_snitch(); |
7529
|
0
|
|
|
|
|
|
return $self->recv_describe_snitch(); |
7530
|
|
|
|
|
|
|
} |
7531
|
|
|
|
|
|
|
|
7532
|
|
|
|
|
|
|
sub send_describe_snitch{ |
7533
|
0
|
|
|
0
|
|
|
my $self = shift; |
7534
|
|
|
|
|
|
|
|
7535
|
0
|
|
|
|
|
|
$self->{output}->writeMessageBegin('describe_snitch', TMessageType::CALL, $self->{seqid}); |
7536
|
0
|
|
|
|
|
|
my $args = new Cassandra::Cassandra_describe_snitch_args(); |
7537
|
0
|
|
|
|
|
|
$args->write($self->{output}); |
7538
|
0
|
|
|
|
|
|
$self->{output}->writeMessageEnd(); |
7539
|
0
|
|
|
|
|
|
$self->{output}->getTransport()->flush(); |
7540
|
|
|
|
|
|
|
} |
7541
|
|
|
|
|
|
|
|
7542
|
|
|
|
|
|
|
sub recv_describe_snitch{ |
7543
|
0
|
|
|
0
|
|
|
my $self = shift; |
7544
|
|
|
|
|
|
|
|
7545
|
0
|
|
|
|
|
|
my $rseqid = 0; |
7546
|
0
|
|
|
|
|
|
my $fname; |
7547
|
0
|
|
|
|
|
|
my $mtype = 0; |
7548
|
|
|
|
|
|
|
|
7549
|
0
|
|
|
|
|
|
$self->{input}->readMessageBegin(\$fname, \$mtype, \$rseqid); |
7550
|
0
|
0
|
|
|
|
|
if ($mtype == TMessageType::EXCEPTION) { |
7551
|
0
|
|
|
|
|
|
my $x = new TApplicationException(); |
7552
|
0
|
|
|
|
|
|
$x->read($self->{input}); |
7553
|
0
|
|
|
|
|
|
$self->{input}->readMessageEnd(); |
7554
|
0
|
|
|
|
|
|
die $x; |
7555
|
|
|
|
|
|
|
} |
7556
|
0
|
|
|
|
|
|
my $result = new Cassandra::Cassandra_describe_snitch_result(); |
7557
|
0
|
|
|
|
|
|
$result->read($self->{input}); |
7558
|
0
|
|
|
|
|
|
$self->{input}->readMessageEnd(); |
7559
|
|
|
|
|
|
|
|
7560
|
0
|
0
|
|
|
|
|
if (defined $result->{success} ) { |
7561
|
0
|
|
|
|
|
|
return $result->{success}; |
7562
|
|
|
|
|
|
|
} |
7563
|
0
|
|
|
|
|
|
die "describe_snitch failed: unknown result"; |
7564
|
|
|
|
|
|
|
} |
7565
|
|
|
|
|
|
|
sub describe_keyspace{ |
7566
|
0
|
|
|
0
|
|
|
my $self = shift; |
7567
|
0
|
|
|
|
|
|
my $keyspace = shift; |
7568
|
|
|
|
|
|
|
|
7569
|
0
|
|
|
|
|
|
$self->send_describe_keyspace($keyspace); |
7570
|
0
|
|
|
|
|
|
return $self->recv_describe_keyspace(); |
7571
|
|
|
|
|
|
|
} |
7572
|
|
|
|
|
|
|
|
7573
|
|
|
|
|
|
|
sub send_describe_keyspace{ |
7574
|
0
|
|
|
0
|
|
|
my $self = shift; |
7575
|
0
|
|
|
|
|
|
my $keyspace = shift; |
7576
|
|
|
|
|
|
|
|
7577
|
0
|
|
|
|
|
|
$self->{output}->writeMessageBegin('describe_keyspace', TMessageType::CALL, $self->{seqid}); |
7578
|
0
|
|
|
|
|
|
my $args = new Cassandra::Cassandra_describe_keyspace_args(); |
7579
|
0
|
|
|
|
|
|
$args->{keyspace} = $keyspace; |
7580
|
0
|
|
|
|
|
|
$args->write($self->{output}); |
7581
|
0
|
|
|
|
|
|
$self->{output}->writeMessageEnd(); |
7582
|
0
|
|
|
|
|
|
$self->{output}->getTransport()->flush(); |
7583
|
|
|
|
|
|
|
} |
7584
|
|
|
|
|
|
|
|
7585
|
|
|
|
|
|
|
sub recv_describe_keyspace{ |
7586
|
0
|
|
|
0
|
|
|
my $self = shift; |
7587
|
|
|
|
|
|
|
|
7588
|
0
|
|
|
|
|
|
my $rseqid = 0; |
7589
|
0
|
|
|
|
|
|
my $fname; |
7590
|
0
|
|
|
|
|
|
my $mtype = 0; |
7591
|
|
|
|
|
|
|
|
7592
|
0
|
|
|
|
|
|
$self->{input}->readMessageBegin(\$fname, \$mtype, \$rseqid); |
7593
|
0
|
0
|
|
|
|
|
if ($mtype == TMessageType::EXCEPTION) { |
7594
|
0
|
|
|
|
|
|
my $x = new TApplicationException(); |
7595
|
0
|
|
|
|
|
|
$x->read($self->{input}); |
7596
|
0
|
|
|
|
|
|
$self->{input}->readMessageEnd(); |
7597
|
0
|
|
|
|
|
|
die $x; |
7598
|
|
|
|
|
|
|
} |
7599
|
0
|
|
|
|
|
|
my $result = new Cassandra::Cassandra_describe_keyspace_result(); |
7600
|
0
|
|
|
|
|
|
$result->read($self->{input}); |
7601
|
0
|
|
|
|
|
|
$self->{input}->readMessageEnd(); |
7602
|
|
|
|
|
|
|
|
7603
|
0
|
0
|
|
|
|
|
if (defined $result->{success} ) { |
7604
|
0
|
|
|
|
|
|
return $result->{success}; |
7605
|
|
|
|
|
|
|
} |
7606
|
0
|
0
|
|
|
|
|
if (defined $result->{nfe}) { |
7607
|
0
|
|
|
|
|
|
die $result->{nfe}; |
7608
|
|
|
|
|
|
|
} |
7609
|
0
|
0
|
|
|
|
|
if (defined $result->{ire}) { |
7610
|
0
|
|
|
|
|
|
die $result->{ire}; |
7611
|
|
|
|
|
|
|
} |
7612
|
0
|
|
|
|
|
|
die "describe_keyspace failed: unknown result"; |
7613
|
|
|
|
|
|
|
} |
7614
|
|
|
|
|
|
|
sub describe_splits{ |
7615
|
0
|
|
|
0
|
|
|
my $self = shift; |
7616
|
0
|
|
|
|
|
|
my $cfName = shift; |
7617
|
0
|
|
|
|
|
|
my $start_token = shift; |
7618
|
0
|
|
|
|
|
|
my $end_token = shift; |
7619
|
0
|
|
|
|
|
|
my $keys_per_split = shift; |
7620
|
|
|
|
|
|
|
|
7621
|
0
|
|
|
|
|
|
$self->send_describe_splits($cfName, $start_token, $end_token, $keys_per_split); |
7622
|
0
|
|
|
|
|
|
return $self->recv_describe_splits(); |
7623
|
|
|
|
|
|
|
} |
7624
|
|
|
|
|
|
|
|
7625
|
|
|
|
|
|
|
sub send_describe_splits{ |
7626
|
0
|
|
|
0
|
|
|
my $self = shift; |
7627
|
0
|
|
|
|
|
|
my $cfName = shift; |
7628
|
0
|
|
|
|
|
|
my $start_token = shift; |
7629
|
0
|
|
|
|
|
|
my $end_token = shift; |
7630
|
0
|
|
|
|
|
|
my $keys_per_split = shift; |
7631
|
|
|
|
|
|
|
|
7632
|
0
|
|
|
|
|
|
$self->{output}->writeMessageBegin('describe_splits', TMessageType::CALL, $self->{seqid}); |
7633
|
0
|
|
|
|
|
|
my $args = new Cassandra::Cassandra_describe_splits_args(); |
7634
|
0
|
|
|
|
|
|
$args->{cfName} = $cfName; |
7635
|
0
|
|
|
|
|
|
$args->{start_token} = $start_token; |
7636
|
0
|
|
|
|
|
|
$args->{end_token} = $end_token; |
7637
|
0
|
|
|
|
|
|
$args->{keys_per_split} = $keys_per_split; |
7638
|
0
|
|
|
|
|
|
$args->write($self->{output}); |
7639
|
0
|
|
|
|
|
|
$self->{output}->writeMessageEnd(); |
7640
|
0
|
|
|
|
|
|
$self->{output}->getTransport()->flush(); |
7641
|
|
|
|
|
|
|
} |
7642
|
|
|
|
|
|
|
|
7643
|
|
|
|
|
|
|
sub recv_describe_splits{ |
7644
|
0
|
|
|
0
|
|
|
my $self = shift; |
7645
|
|
|
|
|
|
|
|
7646
|
0
|
|
|
|
|
|
my $rseqid = 0; |
7647
|
0
|
|
|
|
|
|
my $fname; |
7648
|
0
|
|
|
|
|
|
my $mtype = 0; |
7649
|
|
|
|
|
|
|
|
7650
|
0
|
|
|
|
|
|
$self->{input}->readMessageBegin(\$fname, \$mtype, \$rseqid); |
7651
|
0
|
0
|
|
|
|
|
if ($mtype == TMessageType::EXCEPTION) { |
7652
|
0
|
|
|
|
|
|
my $x = new TApplicationException(); |
7653
|
0
|
|
|
|
|
|
$x->read($self->{input}); |
7654
|
0
|
|
|
|
|
|
$self->{input}->readMessageEnd(); |
7655
|
0
|
|
|
|
|
|
die $x; |
7656
|
|
|
|
|
|
|
} |
7657
|
0
|
|
|
|
|
|
my $result = new Cassandra::Cassandra_describe_splits_result(); |
7658
|
0
|
|
|
|
|
|
$result->read($self->{input}); |
7659
|
0
|
|
|
|
|
|
$self->{input}->readMessageEnd(); |
7660
|
|
|
|
|
|
|
|
7661
|
0
|
0
|
|
|
|
|
if (defined $result->{success} ) { |
7662
|
0
|
|
|
|
|
|
return $result->{success}; |
7663
|
|
|
|
|
|
|
} |
7664
|
0
|
0
|
|
|
|
|
if (defined $result->{ire}) { |
7665
|
0
|
|
|
|
|
|
die $result->{ire}; |
7666
|
|
|
|
|
|
|
} |
7667
|
0
|
|
|
|
|
|
die "describe_splits failed: unknown result"; |
7668
|
|
|
|
|
|
|
} |
7669
|
|
|
|
|
|
|
sub system_add_column_family{ |
7670
|
0
|
|
|
0
|
|
|
my $self = shift; |
7671
|
0
|
|
|
|
|
|
my $cf_def = shift; |
7672
|
|
|
|
|
|
|
|
7673
|
0
|
|
|
|
|
|
$self->send_system_add_column_family($cf_def); |
7674
|
0
|
|
|
|
|
|
return $self->recv_system_add_column_family(); |
7675
|
|
|
|
|
|
|
} |
7676
|
|
|
|
|
|
|
|
7677
|
|
|
|
|
|
|
sub send_system_add_column_family{ |
7678
|
0
|
|
|
0
|
|
|
my $self = shift; |
7679
|
0
|
|
|
|
|
|
my $cf_def = shift; |
7680
|
|
|
|
|
|
|
|
7681
|
0
|
|
|
|
|
|
$self->{output}->writeMessageBegin('system_add_column_family', TMessageType::CALL, $self->{seqid}); |
7682
|
0
|
|
|
|
|
|
my $args = new Cassandra::Cassandra_system_add_column_family_args(); |
7683
|
0
|
|
|
|
|
|
$args->{cf_def} = $cf_def; |
7684
|
0
|
|
|
|
|
|
$args->write($self->{output}); |
7685
|
0
|
|
|
|
|
|
$self->{output}->writeMessageEnd(); |
7686
|
0
|
|
|
|
|
|
$self->{output}->getTransport()->flush(); |
7687
|
|
|
|
|
|
|
} |
7688
|
|
|
|
|
|
|
|
7689
|
|
|
|
|
|
|
sub recv_system_add_column_family{ |
7690
|
0
|
|
|
0
|
|
|
my $self = shift; |
7691
|
|
|
|
|
|
|
|
7692
|
0
|
|
|
|
|
|
my $rseqid = 0; |
7693
|
0
|
|
|
|
|
|
my $fname; |
7694
|
0
|
|
|
|
|
|
my $mtype = 0; |
7695
|
|
|
|
|
|
|
|
7696
|
0
|
|
|
|
|
|
$self->{input}->readMessageBegin(\$fname, \$mtype, \$rseqid); |
7697
|
0
|
0
|
|
|
|
|
if ($mtype == TMessageType::EXCEPTION) { |
7698
|
0
|
|
|
|
|
|
my $x = new TApplicationException(); |
7699
|
0
|
|
|
|
|
|
$x->read($self->{input}); |
7700
|
0
|
|
|
|
|
|
$self->{input}->readMessageEnd(); |
7701
|
0
|
|
|
|
|
|
die $x; |
7702
|
|
|
|
|
|
|
} |
7703
|
0
|
|
|
|
|
|
my $result = new Cassandra::Cassandra_system_add_column_family_result(); |
7704
|
0
|
|
|
|
|
|
$result->read($self->{input}); |
7705
|
0
|
|
|
|
|
|
$self->{input}->readMessageEnd(); |
7706
|
|
|
|
|
|
|
|
7707
|
0
|
0
|
|
|
|
|
if (defined $result->{success} ) { |
7708
|
0
|
|
|
|
|
|
return $result->{success}; |
7709
|
|
|
|
|
|
|
} |
7710
|
0
|
0
|
|
|
|
|
if (defined $result->{ire}) { |
7711
|
0
|
|
|
|
|
|
die $result->{ire}; |
7712
|
|
|
|
|
|
|
} |
7713
|
0
|
0
|
|
|
|
|
if (defined $result->{sde}) { |
7714
|
0
|
|
|
|
|
|
die $result->{sde}; |
7715
|
|
|
|
|
|
|
} |
7716
|
0
|
|
|
|
|
|
die "system_add_column_family failed: unknown result"; |
7717
|
|
|
|
|
|
|
} |
7718
|
|
|
|
|
|
|
sub system_drop_column_family{ |
7719
|
0
|
|
|
0
|
|
|
my $self = shift; |
7720
|
0
|
|
|
|
|
|
my $column_family = shift; |
7721
|
|
|
|
|
|
|
|
7722
|
0
|
|
|
|
|
|
$self->send_system_drop_column_family($column_family); |
7723
|
0
|
|
|
|
|
|
return $self->recv_system_drop_column_family(); |
7724
|
|
|
|
|
|
|
} |
7725
|
|
|
|
|
|
|
|
7726
|
|
|
|
|
|
|
sub send_system_drop_column_family{ |
7727
|
0
|
|
|
0
|
|
|
my $self = shift; |
7728
|
0
|
|
|
|
|
|
my $column_family = shift; |
7729
|
|
|
|
|
|
|
|
7730
|
0
|
|
|
|
|
|
$self->{output}->writeMessageBegin('system_drop_column_family', TMessageType::CALL, $self->{seqid}); |
7731
|
0
|
|
|
|
|
|
my $args = new Cassandra::Cassandra_system_drop_column_family_args(); |
7732
|
0
|
|
|
|
|
|
$args->{column_family} = $column_family; |
7733
|
0
|
|
|
|
|
|
$args->write($self->{output}); |
7734
|
0
|
|
|
|
|
|
$self->{output}->writeMessageEnd(); |
7735
|
0
|
|
|
|
|
|
$self->{output}->getTransport()->flush(); |
7736
|
|
|
|
|
|
|
} |
7737
|
|
|
|
|
|
|
|
7738
|
|
|
|
|
|
|
sub recv_system_drop_column_family{ |
7739
|
0
|
|
|
0
|
|
|
my $self = shift; |
7740
|
|
|
|
|
|
|
|
7741
|
0
|
|
|
|
|
|
my $rseqid = 0; |
7742
|
0
|
|
|
|
|
|
my $fname; |
7743
|
0
|
|
|
|
|
|
my $mtype = 0; |
7744
|
|
|
|
|
|
|
|
7745
|
0
|
|
|
|
|
|
$self->{input}->readMessageBegin(\$fname, \$mtype, \$rseqid); |
7746
|
0
|
0
|
|
|
|
|
if ($mtype == TMessageType::EXCEPTION) { |
7747
|
0
|
|
|
|
|
|
my $x = new TApplicationException(); |
7748
|
0
|
|
|
|
|
|
$x->read($self->{input}); |
7749
|
0
|
|
|
|
|
|
$self->{input}->readMessageEnd(); |
7750
|
0
|
|
|
|
|
|
die $x; |
7751
|
|
|
|
|
|
|
} |
7752
|
0
|
|
|
|
|
|
my $result = new Cassandra::Cassandra_system_drop_column_family_result(); |
7753
|
0
|
|
|
|
|
|
$result->read($self->{input}); |
7754
|
0
|
|
|
|
|
|
$self->{input}->readMessageEnd(); |
7755
|
|
|
|
|
|
|
|
7756
|
0
|
0
|
|
|
|
|
if (defined $result->{success} ) { |
7757
|
0
|
|
|
|
|
|
return $result->{success}; |
7758
|
|
|
|
|
|
|
} |
7759
|
0
|
0
|
|
|
|
|
if (defined $result->{ire}) { |
7760
|
0
|
|
|
|
|
|
die $result->{ire}; |
7761
|
|
|
|
|
|
|
} |
7762
|
0
|
0
|
|
|
|
|
if (defined $result->{sde}) { |
7763
|
0
|
|
|
|
|
|
die $result->{sde}; |
7764
|
|
|
|
|
|
|
} |
7765
|
0
|
|
|
|
|
|
die "system_drop_column_family failed: unknown result"; |
7766
|
|
|
|
|
|
|
} |
7767
|
|
|
|
|
|
|
sub system_add_keyspace{ |
7768
|
0
|
|
|
0
|
|
|
my $self = shift; |
7769
|
0
|
|
|
|
|
|
my $ks_def = shift; |
7770
|
|
|
|
|
|
|
|
7771
|
0
|
|
|
|
|
|
$self->send_system_add_keyspace($ks_def); |
7772
|
0
|
|
|
|
|
|
return $self->recv_system_add_keyspace(); |
7773
|
|
|
|
|
|
|
} |
7774
|
|
|
|
|
|
|
|
7775
|
|
|
|
|
|
|
sub send_system_add_keyspace{ |
7776
|
0
|
|
|
0
|
|
|
my $self = shift; |
7777
|
0
|
|
|
|
|
|
my $ks_def = shift; |
7778
|
|
|
|
|
|
|
|
7779
|
0
|
|
|
|
|
|
$self->{output}->writeMessageBegin('system_add_keyspace', TMessageType::CALL, $self->{seqid}); |
7780
|
0
|
|
|
|
|
|
my $args = new Cassandra::Cassandra_system_add_keyspace_args(); |
7781
|
0
|
|
|
|
|
|
$args->{ks_def} = $ks_def; |
7782
|
0
|
|
|
|
|
|
$args->write($self->{output}); |
7783
|
0
|
|
|
|
|
|
$self->{output}->writeMessageEnd(); |
7784
|
0
|
|
|
|
|
|
$self->{output}->getTransport()->flush(); |
7785
|
|
|
|
|
|
|
} |
7786
|
|
|
|
|
|
|
|
7787
|
|
|
|
|
|
|
sub recv_system_add_keyspace{ |
7788
|
0
|
|
|
0
|
|
|
my $self = shift; |
7789
|
|
|
|
|
|
|
|
7790
|
0
|
|
|
|
|
|
my $rseqid = 0; |
7791
|
0
|
|
|
|
|
|
my $fname; |
7792
|
0
|
|
|
|
|
|
my $mtype = 0; |
7793
|
|
|
|
|
|
|
|
7794
|
0
|
|
|
|
|
|
$self->{input}->readMessageBegin(\$fname, \$mtype, \$rseqid); |
7795
|
0
|
0
|
|
|
|
|
if ($mtype == TMessageType::EXCEPTION) { |
7796
|
0
|
|
|
|
|
|
my $x = new TApplicationException(); |
7797
|
0
|
|
|
|
|
|
$x->read($self->{input}); |
7798
|
0
|
|
|
|
|
|
$self->{input}->readMessageEnd(); |
7799
|
0
|
|
|
|
|
|
die $x; |
7800
|
|
|
|
|
|
|
} |
7801
|
0
|
|
|
|
|
|
my $result = new Cassandra::Cassandra_system_add_keyspace_result(); |
7802
|
0
|
|
|
|
|
|
$result->read($self->{input}); |
7803
|
0
|
|
|
|
|
|
$self->{input}->readMessageEnd(); |
7804
|
|
|
|
|
|
|
|
7805
|
0
|
0
|
|
|
|
|
if (defined $result->{success} ) { |
7806
|
0
|
|
|
|
|
|
return $result->{success}; |
7807
|
|
|
|
|
|
|
} |
7808
|
0
|
0
|
|
|
|
|
if (defined $result->{ire}) { |
7809
|
0
|
|
|
|
|
|
die $result->{ire}; |
7810
|
|
|
|
|
|
|
} |
7811
|
0
|
0
|
|
|
|
|
if (defined $result->{sde}) { |
7812
|
0
|
|
|
|
|
|
die $result->{sde}; |
7813
|
|
|
|
|
|
|
} |
7814
|
0
|
|
|
|
|
|
die "system_add_keyspace failed: unknown result"; |
7815
|
|
|
|
|
|
|
} |
7816
|
|
|
|
|
|
|
sub system_drop_keyspace{ |
7817
|
0
|
|
|
0
|
|
|
my $self = shift; |
7818
|
0
|
|
|
|
|
|
my $keyspace = shift; |
7819
|
|
|
|
|
|
|
|
7820
|
0
|
|
|
|
|
|
$self->send_system_drop_keyspace($keyspace); |
7821
|
0
|
|
|
|
|
|
return $self->recv_system_drop_keyspace(); |
7822
|
|
|
|
|
|
|
} |
7823
|
|
|
|
|
|
|
|
7824
|
|
|
|
|
|
|
sub send_system_drop_keyspace{ |
7825
|
0
|
|
|
0
|
|
|
my $self = shift; |
7826
|
0
|
|
|
|
|
|
my $keyspace = shift; |
7827
|
|
|
|
|
|
|
|
7828
|
0
|
|
|
|
|
|
$self->{output}->writeMessageBegin('system_drop_keyspace', TMessageType::CALL, $self->{seqid}); |
7829
|
0
|
|
|
|
|
|
my $args = new Cassandra::Cassandra_system_drop_keyspace_args(); |
7830
|
0
|
|
|
|
|
|
$args->{keyspace} = $keyspace; |
7831
|
0
|
|
|
|
|
|
$args->write($self->{output}); |
7832
|
0
|
|
|
|
|
|
$self->{output}->writeMessageEnd(); |
7833
|
0
|
|
|
|
|
|
$self->{output}->getTransport()->flush(); |
7834
|
|
|
|
|
|
|
} |
7835
|
|
|
|
|
|
|
|
7836
|
|
|
|
|
|
|
sub recv_system_drop_keyspace{ |
7837
|
0
|
|
|
0
|
|
|
my $self = shift; |
7838
|
|
|
|
|
|
|
|
7839
|
0
|
|
|
|
|
|
my $rseqid = 0; |
7840
|
0
|
|
|
|
|
|
my $fname; |
7841
|
0
|
|
|
|
|
|
my $mtype = 0; |
7842
|
|
|
|
|
|
|
|
7843
|
0
|
|
|
|
|
|
$self->{input}->readMessageBegin(\$fname, \$mtype, \$rseqid); |
7844
|
0
|
0
|
|
|
|
|
if ($mtype == TMessageType::EXCEPTION) { |
7845
|
0
|
|
|
|
|
|
my $x = new TApplicationException(); |
7846
|
0
|
|
|
|
|
|
$x->read($self->{input}); |
7847
|
0
|
|
|
|
|
|
$self->{input}->readMessageEnd(); |
7848
|
0
|
|
|
|
|
|
die $x; |
7849
|
|
|
|
|
|
|
} |
7850
|
0
|
|
|
|
|
|
my $result = new Cassandra::Cassandra_system_drop_keyspace_result(); |
7851
|
0
|
|
|
|
|
|
$result->read($self->{input}); |
7852
|
0
|
|
|
|
|
|
$self->{input}->readMessageEnd(); |
7853
|
|
|
|
|
|
|
|
7854
|
0
|
0
|
|
|
|
|
if (defined $result->{success} ) { |
7855
|
0
|
|
|
|
|
|
return $result->{success}; |
7856
|
|
|
|
|
|
|
} |
7857
|
0
|
0
|
|
|
|
|
if (defined $result->{ire}) { |
7858
|
0
|
|
|
|
|
|
die $result->{ire}; |
7859
|
|
|
|
|
|
|
} |
7860
|
0
|
0
|
|
|
|
|
if (defined $result->{sde}) { |
7861
|
0
|
|
|
|
|
|
die $result->{sde}; |
7862
|
|
|
|
|
|
|
} |
7863
|
0
|
|
|
|
|
|
die "system_drop_keyspace failed: unknown result"; |
7864
|
|
|
|
|
|
|
} |
7865
|
|
|
|
|
|
|
sub system_update_keyspace{ |
7866
|
0
|
|
|
0
|
|
|
my $self = shift; |
7867
|
0
|
|
|
|
|
|
my $ks_def = shift; |
7868
|
|
|
|
|
|
|
|
7869
|
0
|
|
|
|
|
|
$self->send_system_update_keyspace($ks_def); |
7870
|
0
|
|
|
|
|
|
return $self->recv_system_update_keyspace(); |
7871
|
|
|
|
|
|
|
} |
7872
|
|
|
|
|
|
|
|
7873
|
|
|
|
|
|
|
sub send_system_update_keyspace{ |
7874
|
0
|
|
|
0
|
|
|
my $self = shift; |
7875
|
0
|
|
|
|
|
|
my $ks_def = shift; |
7876
|
|
|
|
|
|
|
|
7877
|
0
|
|
|
|
|
|
$self->{output}->writeMessageBegin('system_update_keyspace', TMessageType::CALL, $self->{seqid}); |
7878
|
0
|
|
|
|
|
|
my $args = new Cassandra::Cassandra_system_update_keyspace_args(); |
7879
|
0
|
|
|
|
|
|
$args->{ks_def} = $ks_def; |
7880
|
0
|
|
|
|
|
|
$args->write($self->{output}); |
7881
|
0
|
|
|
|
|
|
$self->{output}->writeMessageEnd(); |
7882
|
0
|
|
|
|
|
|
$self->{output}->getTransport()->flush(); |
7883
|
|
|
|
|
|
|
} |
7884
|
|
|
|
|
|
|
|
7885
|
|
|
|
|
|
|
sub recv_system_update_keyspace{ |
7886
|
0
|
|
|
0
|
|
|
my $self = shift; |
7887
|
|
|
|
|
|
|
|
7888
|
0
|
|
|
|
|
|
my $rseqid = 0; |
7889
|
0
|
|
|
|
|
|
my $fname; |
7890
|
0
|
|
|
|
|
|
my $mtype = 0; |
7891
|
|
|
|
|
|
|
|
7892
|
0
|
|
|
|
|
|
$self->{input}->readMessageBegin(\$fname, \$mtype, \$rseqid); |
7893
|
0
|
0
|
|
|
|
|
if ($mtype == TMessageType::EXCEPTION) { |
7894
|
0
|
|
|
|
|
|
my $x = new TApplicationException(); |
7895
|
0
|
|
|
|
|
|
$x->read($self->{input}); |
7896
|
0
|
|
|
|
|
|
$self->{input}->readMessageEnd(); |
7897
|
0
|
|
|
|
|
|
die $x; |
7898
|
|
|
|
|
|
|
} |
7899
|
0
|
|
|
|
|
|
my $result = new Cassandra::Cassandra_system_update_keyspace_result(); |
7900
|
0
|
|
|
|
|
|
$result->read($self->{input}); |
7901
|
0
|
|
|
|
|
|
$self->{input}->readMessageEnd(); |
7902
|
|
|
|
|
|
|
|
7903
|
0
|
0
|
|
|
|
|
if (defined $result->{success} ) { |
7904
|
0
|
|
|
|
|
|
return $result->{success}; |
7905
|
|
|
|
|
|
|
} |
7906
|
0
|
0
|
|
|
|
|
if (defined $result->{ire}) { |
7907
|
0
|
|
|
|
|
|
die $result->{ire}; |
7908
|
|
|
|
|
|
|
} |
7909
|
0
|
0
|
|
|
|
|
if (defined $result->{sde}) { |
7910
|
0
|
|
|
|
|
|
die $result->{sde}; |
7911
|
|
|
|
|
|
|
} |
7912
|
0
|
|
|
|
|
|
die "system_update_keyspace failed: unknown result"; |
7913
|
|
|
|
|
|
|
} |
7914
|
|
|
|
|
|
|
sub system_update_column_family{ |
7915
|
0
|
|
|
0
|
|
|
my $self = shift; |
7916
|
0
|
|
|
|
|
|
my $cf_def = shift; |
7917
|
|
|
|
|
|
|
|
7918
|
0
|
|
|
|
|
|
$self->send_system_update_column_family($cf_def); |
7919
|
0
|
|
|
|
|
|
return $self->recv_system_update_column_family(); |
7920
|
|
|
|
|
|
|
} |
7921
|
|
|
|
|
|
|
|
7922
|
|
|
|
|
|
|
sub send_system_update_column_family{ |
7923
|
0
|
|
|
0
|
|
|
my $self = shift; |
7924
|
0
|
|
|
|
|
|
my $cf_def = shift; |
7925
|
|
|
|
|
|
|
|
7926
|
0
|
|
|
|
|
|
$self->{output}->writeMessageBegin('system_update_column_family', TMessageType::CALL, $self->{seqid}); |
7927
|
0
|
|
|
|
|
|
my $args = new Cassandra::Cassandra_system_update_column_family_args(); |
7928
|
0
|
|
|
|
|
|
$args->{cf_def} = $cf_def; |
7929
|
0
|
|
|
|
|
|
$args->write($self->{output}); |
7930
|
0
|
|
|
|
|
|
$self->{output}->writeMessageEnd(); |
7931
|
0
|
|
|
|
|
|
$self->{output}->getTransport()->flush(); |
7932
|
|
|
|
|
|
|
} |
7933
|
|
|
|
|
|
|
|
7934
|
|
|
|
|
|
|
sub recv_system_update_column_family{ |
7935
|
0
|
|
|
0
|
|
|
my $self = shift; |
7936
|
|
|
|
|
|
|
|
7937
|
0
|
|
|
|
|
|
my $rseqid = 0; |
7938
|
0
|
|
|
|
|
|
my $fname; |
7939
|
0
|
|
|
|
|
|
my $mtype = 0; |
7940
|
|
|
|
|
|
|
|
7941
|
0
|
|
|
|
|
|
$self->{input}->readMessageBegin(\$fname, \$mtype, \$rseqid); |
7942
|
0
|
0
|
|
|
|
|
if ($mtype == TMessageType::EXCEPTION) { |
7943
|
0
|
|
|
|
|
|
my $x = new TApplicationException(); |
7944
|
0
|
|
|
|
|
|
$x->read($self->{input}); |
7945
|
0
|
|
|
|
|
|
$self->{input}->readMessageEnd(); |
7946
|
0
|
|
|
|
|
|
die $x; |
7947
|
|
|
|
|
|
|
} |
7948
|
0
|
|
|
|
|
|
my $result = new Cassandra::Cassandra_system_update_column_family_result(); |
7949
|
0
|
|
|
|
|
|
$result->read($self->{input}); |
7950
|
0
|
|
|
|
|
|
$self->{input}->readMessageEnd(); |
7951
|
|
|
|
|
|
|
|
7952
|
0
|
0
|
|
|
|
|
if (defined $result->{success} ) { |
7953
|
0
|
|
|
|
|
|
return $result->{success}; |
7954
|
|
|
|
|
|
|
} |
7955
|
0
|
0
|
|
|
|
|
if (defined $result->{ire}) { |
7956
|
0
|
|
|
|
|
|
die $result->{ire}; |
7957
|
|
|
|
|
|
|
} |
7958
|
0
|
0
|
|
|
|
|
if (defined $result->{sde}) { |
7959
|
0
|
|
|
|
|
|
die $result->{sde}; |
7960
|
|
|
|
|
|
|
} |
7961
|
0
|
|
|
|
|
|
die "system_update_column_family failed: unknown result"; |
7962
|
|
|
|
|
|
|
} |
7963
|
|
|
|
|
|
|
sub execute_cql_query{ |
7964
|
0
|
|
|
0
|
|
|
my $self = shift; |
7965
|
0
|
|
|
|
|
|
my $query = shift; |
7966
|
0
|
|
|
|
|
|
my $compression = shift; |
7967
|
|
|
|
|
|
|
|
7968
|
0
|
|
|
|
|
|
$self->send_execute_cql_query($query, $compression); |
7969
|
0
|
|
|
|
|
|
return $self->recv_execute_cql_query(); |
7970
|
|
|
|
|
|
|
} |
7971
|
|
|
|
|
|
|
|
7972
|
|
|
|
|
|
|
sub send_execute_cql_query{ |
7973
|
0
|
|
|
0
|
|
|
my $self = shift; |
7974
|
0
|
|
|
|
|
|
my $query = shift; |
7975
|
0
|
|
|
|
|
|
my $compression = shift; |
7976
|
|
|
|
|
|
|
|
7977
|
0
|
|
|
|
|
|
$self->{output}->writeMessageBegin('execute_cql_query', TMessageType::CALL, $self->{seqid}); |
7978
|
0
|
|
|
|
|
|
my $args = new Cassandra::Cassandra_execute_cql_query_args(); |
7979
|
0
|
|
|
|
|
|
$args->{query} = $query; |
7980
|
0
|
|
|
|
|
|
$args->{compression} = $compression; |
7981
|
0
|
|
|
|
|
|
$args->write($self->{output}); |
7982
|
0
|
|
|
|
|
|
$self->{output}->writeMessageEnd(); |
7983
|
0
|
|
|
|
|
|
$self->{output}->getTransport()->flush(); |
7984
|
|
|
|
|
|
|
} |
7985
|
|
|
|
|
|
|
|
7986
|
|
|
|
|
|
|
sub recv_execute_cql_query{ |
7987
|
0
|
|
|
0
|
|
|
my $self = shift; |
7988
|
|
|
|
|
|
|
|
7989
|
0
|
|
|
|
|
|
my $rseqid = 0; |
7990
|
0
|
|
|
|
|
|
my $fname; |
7991
|
0
|
|
|
|
|
|
my $mtype = 0; |
7992
|
|
|
|
|
|
|
|
7993
|
0
|
|
|
|
|
|
$self->{input}->readMessageBegin(\$fname, \$mtype, \$rseqid); |
7994
|
0
|
0
|
|
|
|
|
if ($mtype == TMessageType::EXCEPTION) { |
7995
|
0
|
|
|
|
|
|
my $x = new TApplicationException(); |
7996
|
0
|
|
|
|
|
|
$x->read($self->{input}); |
7997
|
0
|
|
|
|
|
|
$self->{input}->readMessageEnd(); |
7998
|
0
|
|
|
|
|
|
die $x; |
7999
|
|
|
|
|
|
|
} |
8000
|
0
|
|
|
|
|
|
my $result = new Cassandra::Cassandra_execute_cql_query_result(); |
8001
|
0
|
|
|
|
|
|
$result->read($self->{input}); |
8002
|
0
|
|
|
|
|
|
$self->{input}->readMessageEnd(); |
8003
|
|
|
|
|
|
|
|
8004
|
0
|
0
|
|
|
|
|
if (defined $result->{success} ) { |
8005
|
0
|
|
|
|
|
|
return $result->{success}; |
8006
|
|
|
|
|
|
|
} |
8007
|
0
|
0
|
|
|
|
|
if (defined $result->{ire}) { |
8008
|
0
|
|
|
|
|
|
die $result->{ire}; |
8009
|
|
|
|
|
|
|
} |
8010
|
0
|
0
|
|
|
|
|
if (defined $result->{ue}) { |
8011
|
0
|
|
|
|
|
|
die $result->{ue}; |
8012
|
|
|
|
|
|
|
} |
8013
|
0
|
0
|
|
|
|
|
if (defined $result->{te}) { |
8014
|
0
|
|
|
|
|
|
die $result->{te}; |
8015
|
|
|
|
|
|
|
} |
8016
|
0
|
0
|
|
|
|
|
if (defined $result->{sde}) { |
8017
|
0
|
|
|
|
|
|
die $result->{sde}; |
8018
|
|
|
|
|
|
|
} |
8019
|
0
|
|
|
|
|
|
die "execute_cql_query failed: unknown result"; |
8020
|
|
|
|
|
|
|
} |
8021
|
|
|
|
|
|
|
package Cassandra::CassandraProcessor; |
8022
|
|
|
|
|
|
|
BEGIN { |
8023
|
1
|
|
|
1
|
|
25
|
$Cassandra::CassandraProcessor::VERSION = '0.4.0'; |
8024
|
|
|
|
|
|
|
} |
8025
|
|
|
|
|
|
|
|
8026
|
1
|
|
|
1
|
|
15
|
use strict; |
|
1
|
|
|
|
|
2
|
|
|
1
|
|
|
|
|
8867
|
|
8027
|
|
|
|
|
|
|
|
8028
|
|
|
|
|
|
|
|
8029
|
|
|
|
|
|
|
sub new { |
8030
|
0
|
|
|
0
|
|
|
my ($classname, $handler) = @_; |
8031
|
0
|
|
|
|
|
|
my $self = {}; |
8032
|
0
|
|
|
|
|
|
$self->{handler} = $handler; |
8033
|
0
|
|
|
|
|
|
return bless ($self, $classname); |
8034
|
|
|
|
|
|
|
} |
8035
|
|
|
|
|
|
|
|
8036
|
|
|
|
|
|
|
sub process { |
8037
|
0
|
|
|
0
|
|
|
my ($self, $input, $output) = @_; |
8038
|
0
|
|
|
|
|
|
my $rseqid = 0; |
8039
|
0
|
|
|
|
|
|
my $fname = undef; |
8040
|
0
|
|
|
|
|
|
my $mtype = 0; |
8041
|
|
|
|
|
|
|
|
8042
|
0
|
|
|
|
|
|
$input->readMessageBegin(\$fname, \$mtype, \$rseqid); |
8043
|
0
|
|
|
|
|
|
my $methodname = 'process_'.$fname; |
8044
|
0
|
0
|
|
|
|
|
if (!$self->can($methodname)) { |
8045
|
0
|
|
|
|
|
|
$input->skip(TType::STRUCT); |
8046
|
0
|
|
|
|
|
|
$input->readMessageEnd(); |
8047
|
0
|
|
|
|
|
|
my $x = new TApplicationException('Function '.$fname.' not implemented.', TApplicationException::UNKNOWN_METHOD); |
8048
|
0
|
|
|
|
|
|
$output->writeMessageBegin($fname, TMessageType::EXCEPTION, $rseqid); |
8049
|
0
|
|
|
|
|
|
$x->write($output); |
8050
|
0
|
|
|
|
|
|
$output->writeMessageEnd(); |
8051
|
0
|
|
|
|
|
|
$output->getTransport()->flush(); |
8052
|
0
|
|
|
|
|
|
return; |
8053
|
|
|
|
|
|
|
} |
8054
|
0
|
|
|
|
|
|
$self->$methodname($rseqid, $input, $output); |
8055
|
0
|
|
|
|
|
|
return 1; |
8056
|
|
|
|
|
|
|
} |
8057
|
|
|
|
|
|
|
|
8058
|
|
|
|
|
|
|
sub process_login { |
8059
|
0
|
|
|
0
|
|
|
my ($self, $seqid, $input, $output) = @_; |
8060
|
0
|
|
|
|
|
|
my $args = new Cassandra::Cassandra_login_args(); |
8061
|
0
|
|
|
|
|
|
$args->read($input); |
8062
|
0
|
|
|
|
|
|
$input->readMessageEnd(); |
8063
|
0
|
|
|
|
|
|
my $result = new Cassandra::Cassandra_login_result(); |
8064
|
0
|
|
|
|
|
|
eval { |
8065
|
0
|
|
|
|
|
|
$self->{handler}->login($args->auth_request); |
8066
|
0
|
0
|
|
|
|
|
}; if( UNIVERSAL::isa($@,'Cassandra::AuthenticationException') ){ |
8067
|
0
|
|
|
|
|
|
$result->{authnx} = $@; |
8068
|
0
|
0
|
|
|
|
|
}; if( UNIVERSAL::isa($@,'Cassandra::AuthorizationException') ){ |
8069
|
0
|
|
|
|
|
|
$result->{authzx} = $@; |
8070
|
|
|
|
|
|
|
} |
8071
|
0
|
|
|
|
|
|
$output->writeMessageBegin('login', TMessageType::REPLY, $seqid); |
8072
|
0
|
|
|
|
|
|
$result->write($output); |
8073
|
0
|
|
|
|
|
|
$output->writeMessageEnd(); |
8074
|
0
|
|
|
|
|
|
$output->getTransport()->flush(); |
8075
|
|
|
|
|
|
|
} |
8076
|
|
|
|
|
|
|
|
8077
|
|
|
|
|
|
|
sub process_set_keyspace { |
8078
|
0
|
|
|
0
|
|
|
my ($self, $seqid, $input, $output) = @_; |
8079
|
0
|
|
|
|
|
|
my $args = new Cassandra::Cassandra_set_keyspace_args(); |
8080
|
0
|
|
|
|
|
|
$args->read($input); |
8081
|
0
|
|
|
|
|
|
$input->readMessageEnd(); |
8082
|
0
|
|
|
|
|
|
my $result = new Cassandra::Cassandra_set_keyspace_result(); |
8083
|
0
|
|
|
|
|
|
eval { |
8084
|
0
|
|
|
|
|
|
$self->{handler}->set_keyspace($args->keyspace); |
8085
|
0
|
0
|
|
|
|
|
}; if( UNIVERSAL::isa($@,'Cassandra::InvalidRequestException') ){ |
8086
|
0
|
|
|
|
|
|
$result->{ire} = $@; |
8087
|
|
|
|
|
|
|
} |
8088
|
0
|
|
|
|
|
|
$output->writeMessageBegin('set_keyspace', TMessageType::REPLY, $seqid); |
8089
|
0
|
|
|
|
|
|
$result->write($output); |
8090
|
0
|
|
|
|
|
|
$output->writeMessageEnd(); |
8091
|
0
|
|
|
|
|
|
$output->getTransport()->flush(); |
8092
|
|
|
|
|
|
|
} |
8093
|
|
|
|
|
|
|
|
8094
|
|
|
|
|
|
|
sub process_get { |
8095
|
0
|
|
|
0
|
|
|
my ($self, $seqid, $input, $output) = @_; |
8096
|
0
|
|
|
|
|
|
my $args = new Cassandra::Cassandra_get_args(); |
8097
|
0
|
|
|
|
|
|
$args->read($input); |
8098
|
0
|
|
|
|
|
|
$input->readMessageEnd(); |
8099
|
0
|
|
|
|
|
|
my $result = new Cassandra::Cassandra_get_result(); |
8100
|
0
|
|
|
|
|
|
eval { |
8101
|
0
|
|
|
|
|
|
$result->{success} = $self->{handler}->get($args->key, $args->column_path, $args->consistency_level); |
8102
|
0
|
0
|
|
|
|
|
}; if( UNIVERSAL::isa($@,'Cassandra::InvalidRequestException') ){ |
8103
|
0
|
|
|
|
|
|
$result->{ire} = $@; |
8104
|
0
|
0
|
|
|
|
|
}; if( UNIVERSAL::isa($@,'Cassandra::NotFoundException') ){ |
8105
|
0
|
|
|
|
|
|
$result->{nfe} = $@; |
8106
|
0
|
0
|
|
|
|
|
}; if( UNIVERSAL::isa($@,'Cassandra::UnavailableException') ){ |
8107
|
0
|
|
|
|
|
|
$result->{ue} = $@; |
8108
|
0
|
0
|
|
|
|
|
}; if( UNIVERSAL::isa($@,'Cassandra::TimedOutException') ){ |
8109
|
0
|
|
|
|
|
|
$result->{te} = $@; |
8110
|
|
|
|
|
|
|
} |
8111
|
0
|
|
|
|
|
|
$output->writeMessageBegin('get', TMessageType::REPLY, $seqid); |
8112
|
0
|
|
|
|
|
|
$result->write($output); |
8113
|
0
|
|
|
|
|
|
$output->writeMessageEnd(); |
8114
|
0
|
|
|
|
|
|
$output->getTransport()->flush(); |
8115
|
|
|
|
|
|
|
} |
8116
|
|
|
|
|
|
|
|
8117
|
|
|
|
|
|
|
sub process_get_slice { |
8118
|
0
|
|
|
0
|
|
|
my ($self, $seqid, $input, $output) = @_; |
8119
|
0
|
|
|
|
|
|
my $args = new Cassandra::Cassandra_get_slice_args(); |
8120
|
0
|
|
|
|
|
|
$args->read($input); |
8121
|
0
|
|
|
|
|
|
$input->readMessageEnd(); |
8122
|
0
|
|
|
|
|
|
my $result = new Cassandra::Cassandra_get_slice_result(); |
8123
|
0
|
|
|
|
|
|
eval { |
8124
|
0
|
|
|
|
|
|
$result->{success} = $self->{handler}->get_slice($args->key, $args->column_parent, $args->predicate, $args->consistency_level); |
8125
|
0
|
0
|
|
|
|
|
}; if( UNIVERSAL::isa($@,'Cassandra::InvalidRequestException') ){ |
8126
|
0
|
|
|
|
|
|
$result->{ire} = $@; |
8127
|
0
|
0
|
|
|
|
|
}; if( UNIVERSAL::isa($@,'Cassandra::UnavailableException') ){ |
8128
|
0
|
|
|
|
|
|
$result->{ue} = $@; |
8129
|
0
|
0
|
|
|
|
|
}; if( UNIVERSAL::isa($@,'Cassandra::TimedOutException') ){ |
8130
|
0
|
|
|
|
|
|
$result->{te} = $@; |
8131
|
|
|
|
|
|
|
} |
8132
|
0
|
|
|
|
|
|
$output->writeMessageBegin('get_slice', TMessageType::REPLY, $seqid); |
8133
|
0
|
|
|
|
|
|
$result->write($output); |
8134
|
0
|
|
|
|
|
|
$output->writeMessageEnd(); |
8135
|
0
|
|
|
|
|
|
$output->getTransport()->flush(); |
8136
|
|
|
|
|
|
|
} |
8137
|
|
|
|
|
|
|
|
8138
|
|
|
|
|
|
|
sub process_get_count { |
8139
|
0
|
|
|
0
|
|
|
my ($self, $seqid, $input, $output) = @_; |
8140
|
0
|
|
|
|
|
|
my $args = new Cassandra::Cassandra_get_count_args(); |
8141
|
0
|
|
|
|
|
|
$args->read($input); |
8142
|
0
|
|
|
|
|
|
$input->readMessageEnd(); |
8143
|
0
|
|
|
|
|
|
my $result = new Cassandra::Cassandra_get_count_result(); |
8144
|
0
|
|
|
|
|
|
eval { |
8145
|
0
|
|
|
|
|
|
$result->{success} = $self->{handler}->get_count($args->key, $args->column_parent, $args->predicate, $args->consistency_level); |
8146
|
0
|
0
|
|
|
|
|
}; if( UNIVERSAL::isa($@,'Cassandra::InvalidRequestException') ){ |
8147
|
0
|
|
|
|
|
|
$result->{ire} = $@; |
8148
|
0
|
0
|
|
|
|
|
}; if( UNIVERSAL::isa($@,'Cassandra::UnavailableException') ){ |
8149
|
0
|
|
|
|
|
|
$result->{ue} = $@; |
8150
|
0
|
0
|
|
|
|
|
}; if( UNIVERSAL::isa($@,'Cassandra::TimedOutException') ){ |
8151
|
0
|
|
|
|
|
|
$result->{te} = $@; |
8152
|
|
|
|
|
|
|
} |
8153
|
0
|
|
|
|
|
|
$output->writeMessageBegin('get_count', TMessageType::REPLY, $seqid); |
8154
|
0
|
|
|
|
|
|
$result->write($output); |
8155
|
0
|
|
|
|
|
|
$output->writeMessageEnd(); |
8156
|
0
|
|
|
|
|
|
$output->getTransport()->flush(); |
8157
|
|
|
|
|
|
|
} |
8158
|
|
|
|
|
|
|
|
8159
|
|
|
|
|
|
|
sub process_multiget_slice { |
8160
|
0
|
|
|
0
|
|
|
my ($self, $seqid, $input, $output) = @_; |
8161
|
0
|
|
|
|
|
|
my $args = new Cassandra::Cassandra_multiget_slice_args(); |
8162
|
0
|
|
|
|
|
|
$args->read($input); |
8163
|
0
|
|
|
|
|
|
$input->readMessageEnd(); |
8164
|
0
|
|
|
|
|
|
my $result = new Cassandra::Cassandra_multiget_slice_result(); |
8165
|
0
|
|
|
|
|
|
eval { |
8166
|
0
|
|
|
|
|
|
$result->{success} = $self->{handler}->multiget_slice($args->keys, $args->column_parent, $args->predicate, $args->consistency_level); |
8167
|
0
|
0
|
|
|
|
|
}; if( UNIVERSAL::isa($@,'Cassandra::InvalidRequestException') ){ |
8168
|
0
|
|
|
|
|
|
$result->{ire} = $@; |
8169
|
0
|
0
|
|
|
|
|
}; if( UNIVERSAL::isa($@,'Cassandra::UnavailableException') ){ |
8170
|
0
|
|
|
|
|
|
$result->{ue} = $@; |
8171
|
0
|
0
|
|
|
|
|
}; if( UNIVERSAL::isa($@,'Cassandra::TimedOutException') ){ |
8172
|
0
|
|
|
|
|
|
$result->{te} = $@; |
8173
|
|
|
|
|
|
|
} |
8174
|
0
|
|
|
|
|
|
$output->writeMessageBegin('multiget_slice', TMessageType::REPLY, $seqid); |
8175
|
0
|
|
|
|
|
|
$result->write($output); |
8176
|
0
|
|
|
|
|
|
$output->writeMessageEnd(); |
8177
|
0
|
|
|
|
|
|
$output->getTransport()->flush(); |
8178
|
|
|
|
|
|
|
} |
8179
|
|
|
|
|
|
|
|
8180
|
|
|
|
|
|
|
sub process_multiget_count { |
8181
|
0
|
|
|
0
|
|
|
my ($self, $seqid, $input, $output) = @_; |
8182
|
0
|
|
|
|
|
|
my $args = new Cassandra::Cassandra_multiget_count_args(); |
8183
|
0
|
|
|
|
|
|
$args->read($input); |
8184
|
0
|
|
|
|
|
|
$input->readMessageEnd(); |
8185
|
0
|
|
|
|
|
|
my $result = new Cassandra::Cassandra_multiget_count_result(); |
8186
|
0
|
|
|
|
|
|
eval { |
8187
|
0
|
|
|
|
|
|
$result->{success} = $self->{handler}->multiget_count($args->keys, $args->column_parent, $args->predicate, $args->consistency_level); |
8188
|
0
|
0
|
|
|
|
|
}; if( UNIVERSAL::isa($@,'Cassandra::InvalidRequestException') ){ |
8189
|
0
|
|
|
|
|
|
$result->{ire} = $@; |
8190
|
0
|
0
|
|
|
|
|
}; if( UNIVERSAL::isa($@,'Cassandra::UnavailableException') ){ |
8191
|
0
|
|
|
|
|
|
$result->{ue} = $@; |
8192
|
0
|
0
|
|
|
|
|
}; if( UNIVERSAL::isa($@,'Cassandra::TimedOutException') ){ |
8193
|
0
|
|
|
|
|
|
$result->{te} = $@; |
8194
|
|
|
|
|
|
|
} |
8195
|
0
|
|
|
|
|
|
$output->writeMessageBegin('multiget_count', TMessageType::REPLY, $seqid); |
8196
|
0
|
|
|
|
|
|
$result->write($output); |
8197
|
0
|
|
|
|
|
|
$output->writeMessageEnd(); |
8198
|
0
|
|
|
|
|
|
$output->getTransport()->flush(); |
8199
|
|
|
|
|
|
|
} |
8200
|
|
|
|
|
|
|
|
8201
|
|
|
|
|
|
|
sub process_get_range_slices { |
8202
|
0
|
|
|
0
|
|
|
my ($self, $seqid, $input, $output) = @_; |
8203
|
0
|
|
|
|
|
|
my $args = new Cassandra::Cassandra_get_range_slices_args(); |
8204
|
0
|
|
|
|
|
|
$args->read($input); |
8205
|
0
|
|
|
|
|
|
$input->readMessageEnd(); |
8206
|
0
|
|
|
|
|
|
my $result = new Cassandra::Cassandra_get_range_slices_result(); |
8207
|
0
|
|
|
|
|
|
eval { |
8208
|
0
|
|
|
|
|
|
$result->{success} = $self->{handler}->get_range_slices($args->column_parent, $args->predicate, $args->range, $args->consistency_level); |
8209
|
0
|
0
|
|
|
|
|
}; if( UNIVERSAL::isa($@,'Cassandra::InvalidRequestException') ){ |
8210
|
0
|
|
|
|
|
|
$result->{ire} = $@; |
8211
|
0
|
0
|
|
|
|
|
}; if( UNIVERSAL::isa($@,'Cassandra::UnavailableException') ){ |
8212
|
0
|
|
|
|
|
|
$result->{ue} = $@; |
8213
|
0
|
0
|
|
|
|
|
}; if( UNIVERSAL::isa($@,'Cassandra::TimedOutException') ){ |
8214
|
0
|
|
|
|
|
|
$result->{te} = $@; |
8215
|
|
|
|
|
|
|
} |
8216
|
0
|
|
|
|
|
|
$output->writeMessageBegin('get_range_slices', TMessageType::REPLY, $seqid); |
8217
|
0
|
|
|
|
|
|
$result->write($output); |
8218
|
0
|
|
|
|
|
|
$output->writeMessageEnd(); |
8219
|
0
|
|
|
|
|
|
$output->getTransport()->flush(); |
8220
|
|
|
|
|
|
|
} |
8221
|
|
|
|
|
|
|
|
8222
|
|
|
|
|
|
|
sub process_get_indexed_slices { |
8223
|
0
|
|
|
0
|
|
|
my ($self, $seqid, $input, $output) = @_; |
8224
|
0
|
|
|
|
|
|
my $args = new Cassandra::Cassandra_get_indexed_slices_args(); |
8225
|
0
|
|
|
|
|
|
$args->read($input); |
8226
|
0
|
|
|
|
|
|
$input->readMessageEnd(); |
8227
|
0
|
|
|
|
|
|
my $result = new Cassandra::Cassandra_get_indexed_slices_result(); |
8228
|
0
|
|
|
|
|
|
eval { |
8229
|
0
|
|
|
|
|
|
$result->{success} = $self->{handler}->get_indexed_slices($args->column_parent, $args->index_clause, $args->column_predicate, $args->consistency_level); |
8230
|
0
|
0
|
|
|
|
|
}; if( UNIVERSAL::isa($@,'Cassandra::InvalidRequestException') ){ |
8231
|
0
|
|
|
|
|
|
$result->{ire} = $@; |
8232
|
0
|
0
|
|
|
|
|
}; if( UNIVERSAL::isa($@,'Cassandra::UnavailableException') ){ |
8233
|
0
|
|
|
|
|
|
$result->{ue} = $@; |
8234
|
0
|
0
|
|
|
|
|
}; if( UNIVERSAL::isa($@,'Cassandra::TimedOutException') ){ |
8235
|
0
|
|
|
|
|
|
$result->{te} = $@; |
8236
|
|
|
|
|
|
|
} |
8237
|
0
|
|
|
|
|
|
$output->writeMessageBegin('get_indexed_slices', TMessageType::REPLY, $seqid); |
8238
|
0
|
|
|
|
|
|
$result->write($output); |
8239
|
0
|
|
|
|
|
|
$output->writeMessageEnd(); |
8240
|
0
|
|
|
|
|
|
$output->getTransport()->flush(); |
8241
|
|
|
|
|
|
|
} |
8242
|
|
|
|
|
|
|
|
8243
|
|
|
|
|
|
|
sub process_insert { |
8244
|
0
|
|
|
0
|
|
|
my ($self, $seqid, $input, $output) = @_; |
8245
|
0
|
|
|
|
|
|
my $args = new Cassandra::Cassandra_insert_args(); |
8246
|
0
|
|
|
|
|
|
$args->read($input); |
8247
|
0
|
|
|
|
|
|
$input->readMessageEnd(); |
8248
|
0
|
|
|
|
|
|
my $result = new Cassandra::Cassandra_insert_result(); |
8249
|
0
|
|
|
|
|
|
eval { |
8250
|
0
|
|
|
|
|
|
$self->{handler}->insert($args->key, $args->column_parent, $args->column, $args->consistency_level); |
8251
|
0
|
0
|
|
|
|
|
}; if( UNIVERSAL::isa($@,'Cassandra::InvalidRequestException') ){ |
8252
|
0
|
|
|
|
|
|
$result->{ire} = $@; |
8253
|
0
|
0
|
|
|
|
|
}; if( UNIVERSAL::isa($@,'Cassandra::UnavailableException') ){ |
8254
|
0
|
|
|
|
|
|
$result->{ue} = $@; |
8255
|
0
|
0
|
|
|
|
|
}; if( UNIVERSAL::isa($@,'Cassandra::TimedOutException') ){ |
8256
|
0
|
|
|
|
|
|
$result->{te} = $@; |
8257
|
|
|
|
|
|
|
} |
8258
|
0
|
|
|
|
|
|
$output->writeMessageBegin('insert', TMessageType::REPLY, $seqid); |
8259
|
0
|
|
|
|
|
|
$result->write($output); |
8260
|
0
|
|
|
|
|
|
$output->writeMessageEnd(); |
8261
|
0
|
|
|
|
|
|
$output->getTransport()->flush(); |
8262
|
|
|
|
|
|
|
} |
8263
|
|
|
|
|
|
|
|
8264
|
|
|
|
|
|
|
sub process_add { |
8265
|
0
|
|
|
0
|
|
|
my ($self, $seqid, $input, $output) = @_; |
8266
|
0
|
|
|
|
|
|
my $args = new Cassandra::Cassandra_add_args(); |
8267
|
0
|
|
|
|
|
|
$args->read($input); |
8268
|
0
|
|
|
|
|
|
$input->readMessageEnd(); |
8269
|
0
|
|
|
|
|
|
my $result = new Cassandra::Cassandra_add_result(); |
8270
|
0
|
|
|
|
|
|
eval { |
8271
|
0
|
|
|
|
|
|
$self->{handler}->add($args->key, $args->column_parent, $args->column, $args->consistency_level); |
8272
|
0
|
0
|
|
|
|
|
}; if( UNIVERSAL::isa($@,'Cassandra::InvalidRequestException') ){ |
8273
|
0
|
|
|
|
|
|
$result->{ire} = $@; |
8274
|
0
|
0
|
|
|
|
|
}; if( UNIVERSAL::isa($@,'Cassandra::UnavailableException') ){ |
8275
|
0
|
|
|
|
|
|
$result->{ue} = $@; |
8276
|
0
|
0
|
|
|
|
|
}; if( UNIVERSAL::isa($@,'Cassandra::TimedOutException') ){ |
8277
|
0
|
|
|
|
|
|
$result->{te} = $@; |
8278
|
|
|
|
|
|
|
} |
8279
|
0
|
|
|
|
|
|
$output->writeMessageBegin('add', TMessageType::REPLY, $seqid); |
8280
|
0
|
|
|
|
|
|
$result->write($output); |
8281
|
0
|
|
|
|
|
|
$output->writeMessageEnd(); |
8282
|
0
|
|
|
|
|
|
$output->getTransport()->flush(); |
8283
|
|
|
|
|
|
|
} |
8284
|
|
|
|
|
|
|
|
8285
|
|
|
|
|
|
|
sub process_remove { |
8286
|
0
|
|
|
0
|
|
|
my ($self, $seqid, $input, $output) = @_; |
8287
|
0
|
|
|
|
|
|
my $args = new Cassandra::Cassandra_remove_args(); |
8288
|
0
|
|
|
|
|
|
$args->read($input); |
8289
|
0
|
|
|
|
|
|
$input->readMessageEnd(); |
8290
|
0
|
|
|
|
|
|
my $result = new Cassandra::Cassandra_remove_result(); |
8291
|
0
|
|
|
|
|
|
eval { |
8292
|
0
|
|
|
|
|
|
$self->{handler}->remove($args->key, $args->column_path, $args->timestamp, $args->consistency_level); |
8293
|
0
|
0
|
|
|
|
|
}; if( UNIVERSAL::isa($@,'Cassandra::InvalidRequestException') ){ |
8294
|
0
|
|
|
|
|
|
$result->{ire} = $@; |
8295
|
0
|
0
|
|
|
|
|
}; if( UNIVERSAL::isa($@,'Cassandra::UnavailableException') ){ |
8296
|
0
|
|
|
|
|
|
$result->{ue} = $@; |
8297
|
0
|
0
|
|
|
|
|
}; if( UNIVERSAL::isa($@,'Cassandra::TimedOutException') ){ |
8298
|
0
|
|
|
|
|
|
$result->{te} = $@; |
8299
|
|
|
|
|
|
|
} |
8300
|
0
|
|
|
|
|
|
$output->writeMessageBegin('remove', TMessageType::REPLY, $seqid); |
8301
|
0
|
|
|
|
|
|
$result->write($output); |
8302
|
0
|
|
|
|
|
|
$output->writeMessageEnd(); |
8303
|
0
|
|
|
|
|
|
$output->getTransport()->flush(); |
8304
|
|
|
|
|
|
|
} |
8305
|
|
|
|
|
|
|
|
8306
|
|
|
|
|
|
|
sub process_remove_counter { |
8307
|
0
|
|
|
0
|
|
|
my ($self, $seqid, $input, $output) = @_; |
8308
|
0
|
|
|
|
|
|
my $args = new Cassandra::Cassandra_remove_counter_args(); |
8309
|
0
|
|
|
|
|
|
$args->read($input); |
8310
|
0
|
|
|
|
|
|
$input->readMessageEnd(); |
8311
|
0
|
|
|
|
|
|
my $result = new Cassandra::Cassandra_remove_counter_result(); |
8312
|
0
|
|
|
|
|
|
eval { |
8313
|
0
|
|
|
|
|
|
$self->{handler}->remove_counter($args->key, $args->path, $args->consistency_level); |
8314
|
0
|
0
|
|
|
|
|
}; if( UNIVERSAL::isa($@,'Cassandra::InvalidRequestException') ){ |
8315
|
0
|
|
|
|
|
|
$result->{ire} = $@; |
8316
|
0
|
0
|
|
|
|
|
}; if( UNIVERSAL::isa($@,'Cassandra::UnavailableException') ){ |
8317
|
0
|
|
|
|
|
|
$result->{ue} = $@; |
8318
|
0
|
0
|
|
|
|
|
}; if( UNIVERSAL::isa($@,'Cassandra::TimedOutException') ){ |
8319
|
0
|
|
|
|
|
|
$result->{te} = $@; |
8320
|
|
|
|
|
|
|
} |
8321
|
0
|
|
|
|
|
|
$output->writeMessageBegin('remove_counter', TMessageType::REPLY, $seqid); |
8322
|
0
|
|
|
|
|
|
$result->write($output); |
8323
|
0
|
|
|
|
|
|
$output->writeMessageEnd(); |
8324
|
0
|
|
|
|
|
|
$output->getTransport()->flush(); |
8325
|
|
|
|
|
|
|
} |
8326
|
|
|
|
|
|
|
|
8327
|
|
|
|
|
|
|
sub process_batch_mutate { |
8328
|
0
|
|
|
0
|
|
|
my ($self, $seqid, $input, $output) = @_; |
8329
|
0
|
|
|
|
|
|
my $args = new Cassandra::Cassandra_batch_mutate_args(); |
8330
|
0
|
|
|
|
|
|
$args->read($input); |
8331
|
0
|
|
|
|
|
|
$input->readMessageEnd(); |
8332
|
0
|
|
|
|
|
|
my $result = new Cassandra::Cassandra_batch_mutate_result(); |
8333
|
0
|
|
|
|
|
|
eval { |
8334
|
0
|
|
|
|
|
|
$self->{handler}->batch_mutate($args->mutation_map, $args->consistency_level); |
8335
|
0
|
0
|
|
|
|
|
}; if( UNIVERSAL::isa($@,'Cassandra::InvalidRequestException') ){ |
8336
|
0
|
|
|
|
|
|
$result->{ire} = $@; |
8337
|
0
|
0
|
|
|
|
|
}; if( UNIVERSAL::isa($@,'Cassandra::UnavailableException') ){ |
8338
|
0
|
|
|
|
|
|
$result->{ue} = $@; |
8339
|
0
|
0
|
|
|
|
|
}; if( UNIVERSAL::isa($@,'Cassandra::TimedOutException') ){ |
8340
|
0
|
|
|
|
|
|
$result->{te} = $@; |
8341
|
|
|
|
|
|
|
} |
8342
|
0
|
|
|
|
|
|
$output->writeMessageBegin('batch_mutate', TMessageType::REPLY, $seqid); |
8343
|
0
|
|
|
|
|
|
$result->write($output); |
8344
|
0
|
|
|
|
|
|
$output->writeMessageEnd(); |
8345
|
0
|
|
|
|
|
|
$output->getTransport()->flush(); |
8346
|
|
|
|
|
|
|
} |
8347
|
|
|
|
|
|
|
|
8348
|
|
|
|
|
|
|
sub process_truncate { |
8349
|
0
|
|
|
0
|
|
|
my ($self, $seqid, $input, $output) = @_; |
8350
|
0
|
|
|
|
|
|
my $args = new Cassandra::Cassandra_truncate_args(); |
8351
|
0
|
|
|
|
|
|
$args->read($input); |
8352
|
0
|
|
|
|
|
|
$input->readMessageEnd(); |
8353
|
0
|
|
|
|
|
|
my $result = new Cassandra::Cassandra_truncate_result(); |
8354
|
0
|
|
|
|
|
|
eval { |
8355
|
0
|
|
|
|
|
|
$self->{handler}->truncate($args->cfname); |
8356
|
0
|
0
|
|
|
|
|
}; if( UNIVERSAL::isa($@,'Cassandra::InvalidRequestException') ){ |
8357
|
0
|
|
|
|
|
|
$result->{ire} = $@; |
8358
|
0
|
0
|
|
|
|
|
}; if( UNIVERSAL::isa($@,'Cassandra::UnavailableException') ){ |
8359
|
0
|
|
|
|
|
|
$result->{ue} = $@; |
8360
|
|
|
|
|
|
|
} |
8361
|
0
|
|
|
|
|
|
$output->writeMessageBegin('truncate', TMessageType::REPLY, $seqid); |
8362
|
0
|
|
|
|
|
|
$result->write($output); |
8363
|
0
|
|
|
|
|
|
$output->writeMessageEnd(); |
8364
|
0
|
|
|
|
|
|
$output->getTransport()->flush(); |
8365
|
|
|
|
|
|
|
} |
8366
|
|
|
|
|
|
|
|
8367
|
|
|
|
|
|
|
sub process_describe_schema_versions { |
8368
|
0
|
|
|
0
|
|
|
my ($self, $seqid, $input, $output) = @_; |
8369
|
0
|
|
|
|
|
|
my $args = new Cassandra::Cassandra_describe_schema_versions_args(); |
8370
|
0
|
|
|
|
|
|
$args->read($input); |
8371
|
0
|
|
|
|
|
|
$input->readMessageEnd(); |
8372
|
0
|
|
|
|
|
|
my $result = new Cassandra::Cassandra_describe_schema_versions_result(); |
8373
|
0
|
|
|
|
|
|
eval { |
8374
|
0
|
|
|
|
|
|
$result->{success} = $self->{handler}->describe_schema_versions(); |
8375
|
0
|
0
|
|
|
|
|
}; if( UNIVERSAL::isa($@,'Cassandra::InvalidRequestException') ){ |
8376
|
0
|
|
|
|
|
|
$result->{ire} = $@; |
8377
|
|
|
|
|
|
|
} |
8378
|
0
|
|
|
|
|
|
$output->writeMessageBegin('describe_schema_versions', TMessageType::REPLY, $seqid); |
8379
|
0
|
|
|
|
|
|
$result->write($output); |
8380
|
0
|
|
|
|
|
|
$output->writeMessageEnd(); |
8381
|
0
|
|
|
|
|
|
$output->getTransport()->flush(); |
8382
|
|
|
|
|
|
|
} |
8383
|
|
|
|
|
|
|
|
8384
|
|
|
|
|
|
|
sub process_describe_keyspaces { |
8385
|
0
|
|
|
0
|
|
|
my ($self, $seqid, $input, $output) = @_; |
8386
|
0
|
|
|
|
|
|
my $args = new Cassandra::Cassandra_describe_keyspaces_args(); |
8387
|
0
|
|
|
|
|
|
$args->read($input); |
8388
|
0
|
|
|
|
|
|
$input->readMessageEnd(); |
8389
|
0
|
|
|
|
|
|
my $result = new Cassandra::Cassandra_describe_keyspaces_result(); |
8390
|
0
|
|
|
|
|
|
eval { |
8391
|
0
|
|
|
|
|
|
$result->{success} = $self->{handler}->describe_keyspaces(); |
8392
|
0
|
0
|
|
|
|
|
}; if( UNIVERSAL::isa($@,'Cassandra::InvalidRequestException') ){ |
8393
|
0
|
|
|
|
|
|
$result->{ire} = $@; |
8394
|
|
|
|
|
|
|
} |
8395
|
0
|
|
|
|
|
|
$output->writeMessageBegin('describe_keyspaces', TMessageType::REPLY, $seqid); |
8396
|
0
|
|
|
|
|
|
$result->write($output); |
8397
|
0
|
|
|
|
|
|
$output->writeMessageEnd(); |
8398
|
0
|
|
|
|
|
|
$output->getTransport()->flush(); |
8399
|
|
|
|
|
|
|
} |
8400
|
|
|
|
|
|
|
|
8401
|
|
|
|
|
|
|
sub process_describe_cluster_name { |
8402
|
0
|
|
|
0
|
|
|
my ($self, $seqid, $input, $output) = @_; |
8403
|
0
|
|
|
|
|
|
my $args = new Cassandra::Cassandra_describe_cluster_name_args(); |
8404
|
0
|
|
|
|
|
|
$args->read($input); |
8405
|
0
|
|
|
|
|
|
$input->readMessageEnd(); |
8406
|
0
|
|
|
|
|
|
my $result = new Cassandra::Cassandra_describe_cluster_name_result(); |
8407
|
0
|
|
|
|
|
|
$result->{success} = $self->{handler}->describe_cluster_name(); |
8408
|
0
|
|
|
|
|
|
$output->writeMessageBegin('describe_cluster_name', TMessageType::REPLY, $seqid); |
8409
|
0
|
|
|
|
|
|
$result->write($output); |
8410
|
0
|
|
|
|
|
|
$output->writeMessageEnd(); |
8411
|
0
|
|
|
|
|
|
$output->getTransport()->flush(); |
8412
|
|
|
|
|
|
|
} |
8413
|
|
|
|
|
|
|
|
8414
|
|
|
|
|
|
|
sub process_describe_version { |
8415
|
0
|
|
|
0
|
|
|
my ($self, $seqid, $input, $output) = @_; |
8416
|
0
|
|
|
|
|
|
my $args = new Cassandra::Cassandra_describe_version_args(); |
8417
|
0
|
|
|
|
|
|
$args->read($input); |
8418
|
0
|
|
|
|
|
|
$input->readMessageEnd(); |
8419
|
0
|
|
|
|
|
|
my $result = new Cassandra::Cassandra_describe_version_result(); |
8420
|
0
|
|
|
|
|
|
$result->{success} = $self->{handler}->describe_version(); |
8421
|
0
|
|
|
|
|
|
$output->writeMessageBegin('describe_version', TMessageType::REPLY, $seqid); |
8422
|
0
|
|
|
|
|
|
$result->write($output); |
8423
|
0
|
|
|
|
|
|
$output->writeMessageEnd(); |
8424
|
0
|
|
|
|
|
|
$output->getTransport()->flush(); |
8425
|
|
|
|
|
|
|
} |
8426
|
|
|
|
|
|
|
|
8427
|
|
|
|
|
|
|
sub process_describe_ring { |
8428
|
0
|
|
|
0
|
|
|
my ($self, $seqid, $input, $output) = @_; |
8429
|
0
|
|
|
|
|
|
my $args = new Cassandra::Cassandra_describe_ring_args(); |
8430
|
0
|
|
|
|
|
|
$args->read($input); |
8431
|
0
|
|
|
|
|
|
$input->readMessageEnd(); |
8432
|
0
|
|
|
|
|
|
my $result = new Cassandra::Cassandra_describe_ring_result(); |
8433
|
0
|
|
|
|
|
|
eval { |
8434
|
0
|
|
|
|
|
|
$result->{success} = $self->{handler}->describe_ring($args->keyspace); |
8435
|
0
|
0
|
|
|
|
|
}; if( UNIVERSAL::isa($@,'Cassandra::InvalidRequestException') ){ |
8436
|
0
|
|
|
|
|
|
$result->{ire} = $@; |
8437
|
|
|
|
|
|
|
} |
8438
|
0
|
|
|
|
|
|
$output->writeMessageBegin('describe_ring', TMessageType::REPLY, $seqid); |
8439
|
0
|
|
|
|
|
|
$result->write($output); |
8440
|
0
|
|
|
|
|
|
$output->writeMessageEnd(); |
8441
|
0
|
|
|
|
|
|
$output->getTransport()->flush(); |
8442
|
|
|
|
|
|
|
} |
8443
|
|
|
|
|
|
|
|
8444
|
|
|
|
|
|
|
sub process_describe_partitioner { |
8445
|
0
|
|
|
0
|
|
|
my ($self, $seqid, $input, $output) = @_; |
8446
|
0
|
|
|
|
|
|
my $args = new Cassandra::Cassandra_describe_partitioner_args(); |
8447
|
0
|
|
|
|
|
|
$args->read($input); |
8448
|
0
|
|
|
|
|
|
$input->readMessageEnd(); |
8449
|
0
|
|
|
|
|
|
my $result = new Cassandra::Cassandra_describe_partitioner_result(); |
8450
|
0
|
|
|
|
|
|
$result->{success} = $self->{handler}->describe_partitioner(); |
8451
|
0
|
|
|
|
|
|
$output->writeMessageBegin('describe_partitioner', TMessageType::REPLY, $seqid); |
8452
|
0
|
|
|
|
|
|
$result->write($output); |
8453
|
0
|
|
|
|
|
|
$output->writeMessageEnd(); |
8454
|
0
|
|
|
|
|
|
$output->getTransport()->flush(); |
8455
|
|
|
|
|
|
|
} |
8456
|
|
|
|
|
|
|
|
8457
|
|
|
|
|
|
|
sub process_describe_snitch { |
8458
|
0
|
|
|
0
|
|
|
my ($self, $seqid, $input, $output) = @_; |
8459
|
0
|
|
|
|
|
|
my $args = new Cassandra::Cassandra_describe_snitch_args(); |
8460
|
0
|
|
|
|
|
|
$args->read($input); |
8461
|
0
|
|
|
|
|
|
$input->readMessageEnd(); |
8462
|
0
|
|
|
|
|
|
my $result = new Cassandra::Cassandra_describe_snitch_result(); |
8463
|
0
|
|
|
|
|
|
$result->{success} = $self->{handler}->describe_snitch(); |
8464
|
0
|
|
|
|
|
|
$output->writeMessageBegin('describe_snitch', TMessageType::REPLY, $seqid); |
8465
|
0
|
|
|
|
|
|
$result->write($output); |
8466
|
0
|
|
|
|
|
|
$output->writeMessageEnd(); |
8467
|
0
|
|
|
|
|
|
$output->getTransport()->flush(); |
8468
|
|
|
|
|
|
|
} |
8469
|
|
|
|
|
|
|
|
8470
|
|
|
|
|
|
|
sub process_describe_keyspace { |
8471
|
0
|
|
|
0
|
|
|
my ($self, $seqid, $input, $output) = @_; |
8472
|
0
|
|
|
|
|
|
my $args = new Cassandra::Cassandra_describe_keyspace_args(); |
8473
|
0
|
|
|
|
|
|
$args->read($input); |
8474
|
0
|
|
|
|
|
|
$input->readMessageEnd(); |
8475
|
0
|
|
|
|
|
|
my $result = new Cassandra::Cassandra_describe_keyspace_result(); |
8476
|
0
|
|
|
|
|
|
eval { |
8477
|
0
|
|
|
|
|
|
$result->{success} = $self->{handler}->describe_keyspace($args->keyspace); |
8478
|
0
|
0
|
|
|
|
|
}; if( UNIVERSAL::isa($@,'Cassandra::NotFoundException') ){ |
8479
|
0
|
|
|
|
|
|
$result->{nfe} = $@; |
8480
|
0
|
0
|
|
|
|
|
}; if( UNIVERSAL::isa($@,'Cassandra::InvalidRequestException') ){ |
8481
|
0
|
|
|
|
|
|
$result->{ire} = $@; |
8482
|
|
|
|
|
|
|
} |
8483
|
0
|
|
|
|
|
|
$output->writeMessageBegin('describe_keyspace', TMessageType::REPLY, $seqid); |
8484
|
0
|
|
|
|
|
|
$result->write($output); |
8485
|
0
|
|
|
|
|
|
$output->writeMessageEnd(); |
8486
|
0
|
|
|
|
|
|
$output->getTransport()->flush(); |
8487
|
|
|
|
|
|
|
} |
8488
|
|
|
|
|
|
|
|
8489
|
|
|
|
|
|
|
sub process_describe_splits { |
8490
|
0
|
|
|
0
|
|
|
my ($self, $seqid, $input, $output) = @_; |
8491
|
0
|
|
|
|
|
|
my $args = new Cassandra::Cassandra_describe_splits_args(); |
8492
|
0
|
|
|
|
|
|
$args->read($input); |
8493
|
0
|
|
|
|
|
|
$input->readMessageEnd(); |
8494
|
0
|
|
|
|
|
|
my $result = new Cassandra::Cassandra_describe_splits_result(); |
8495
|
0
|
|
|
|
|
|
eval { |
8496
|
0
|
|
|
|
|
|
$result->{success} = $self->{handler}->describe_splits($args->cfName, $args->start_token, $args->end_token, $args->keys_per_split); |
8497
|
0
|
0
|
|
|
|
|
}; if( UNIVERSAL::isa($@,'Cassandra::InvalidRequestException') ){ |
8498
|
0
|
|
|
|
|
|
$result->{ire} = $@; |
8499
|
|
|
|
|
|
|
} |
8500
|
0
|
|
|
|
|
|
$output->writeMessageBegin('describe_splits', TMessageType::REPLY, $seqid); |
8501
|
0
|
|
|
|
|
|
$result->write($output); |
8502
|
0
|
|
|
|
|
|
$output->writeMessageEnd(); |
8503
|
0
|
|
|
|
|
|
$output->getTransport()->flush(); |
8504
|
|
|
|
|
|
|
} |
8505
|
|
|
|
|
|
|
|
8506
|
|
|
|
|
|
|
sub process_system_add_column_family { |
8507
|
0
|
|
|
0
|
|
|
my ($self, $seqid, $input, $output) = @_; |
8508
|
0
|
|
|
|
|
|
my $args = new Cassandra::Cassandra_system_add_column_family_args(); |
8509
|
0
|
|
|
|
|
|
$args->read($input); |
8510
|
0
|
|
|
|
|
|
$input->readMessageEnd(); |
8511
|
0
|
|
|
|
|
|
my $result = new Cassandra::Cassandra_system_add_column_family_result(); |
8512
|
0
|
|
|
|
|
|
eval { |
8513
|
0
|
|
|
|
|
|
$result->{success} = $self->{handler}->system_add_column_family($args->cf_def); |
8514
|
0
|
0
|
|
|
|
|
}; if( UNIVERSAL::isa($@,'Cassandra::InvalidRequestException') ){ |
8515
|
0
|
|
|
|
|
|
$result->{ire} = $@; |
8516
|
0
|
0
|
|
|
|
|
}; if( UNIVERSAL::isa($@,'Cassandra::SchemaDisagreementException') ){ |
8517
|
0
|
|
|
|
|
|
$result->{sde} = $@; |
8518
|
|
|
|
|
|
|
} |
8519
|
0
|
|
|
|
|
|
$output->writeMessageBegin('system_add_column_family', TMessageType::REPLY, $seqid); |
8520
|
0
|
|
|
|
|
|
$result->write($output); |
8521
|
0
|
|
|
|
|
|
$output->writeMessageEnd(); |
8522
|
0
|
|
|
|
|
|
$output->getTransport()->flush(); |
8523
|
|
|
|
|
|
|
} |
8524
|
|
|
|
|
|
|
|
8525
|
|
|
|
|
|
|
sub process_system_drop_column_family { |
8526
|
0
|
|
|
0
|
|
|
my ($self, $seqid, $input, $output) = @_; |
8527
|
0
|
|
|
|
|
|
my $args = new Cassandra::Cassandra_system_drop_column_family_args(); |
8528
|
0
|
|
|
|
|
|
$args->read($input); |
8529
|
0
|
|
|
|
|
|
$input->readMessageEnd(); |
8530
|
0
|
|
|
|
|
|
my $result = new Cassandra::Cassandra_system_drop_column_family_result(); |
8531
|
0
|
|
|
|
|
|
eval { |
8532
|
0
|
|
|
|
|
|
$result->{success} = $self->{handler}->system_drop_column_family($args->column_family); |
8533
|
0
|
0
|
|
|
|
|
}; if( UNIVERSAL::isa($@,'Cassandra::InvalidRequestException') ){ |
8534
|
0
|
|
|
|
|
|
$result->{ire} = $@; |
8535
|
0
|
0
|
|
|
|
|
}; if( UNIVERSAL::isa($@,'Cassandra::SchemaDisagreementException') ){ |
8536
|
0
|
|
|
|
|
|
$result->{sde} = $@; |
8537
|
|
|
|
|
|
|
} |
8538
|
0
|
|
|
|
|
|
$output->writeMessageBegin('system_drop_column_family', TMessageType::REPLY, $seqid); |
8539
|
0
|
|
|
|
|
|
$result->write($output); |
8540
|
0
|
|
|
|
|
|
$output->writeMessageEnd(); |
8541
|
0
|
|
|
|
|
|
$output->getTransport()->flush(); |
8542
|
|
|
|
|
|
|
} |
8543
|
|
|
|
|
|
|
|
8544
|
|
|
|
|
|
|
sub process_system_add_keyspace { |
8545
|
0
|
|
|
0
|
|
|
my ($self, $seqid, $input, $output) = @_; |
8546
|
0
|
|
|
|
|
|
my $args = new Cassandra::Cassandra_system_add_keyspace_args(); |
8547
|
0
|
|
|
|
|
|
$args->read($input); |
8548
|
0
|
|
|
|
|
|
$input->readMessageEnd(); |
8549
|
0
|
|
|
|
|
|
my $result = new Cassandra::Cassandra_system_add_keyspace_result(); |
8550
|
0
|
|
|
|
|
|
eval { |
8551
|
0
|
|
|
|
|
|
$result->{success} = $self->{handler}->system_add_keyspace($args->ks_def); |
8552
|
0
|
0
|
|
|
|
|
}; if( UNIVERSAL::isa($@,'Cassandra::InvalidRequestException') ){ |
8553
|
0
|
|
|
|
|
|
$result->{ire} = $@; |
8554
|
0
|
0
|
|
|
|
|
}; if( UNIVERSAL::isa($@,'Cassandra::SchemaDisagreementException') ){ |
8555
|
0
|
|
|
|
|
|
$result->{sde} = $@; |
8556
|
|
|
|
|
|
|
} |
8557
|
0
|
|
|
|
|
|
$output->writeMessageBegin('system_add_keyspace', TMessageType::REPLY, $seqid); |
8558
|
0
|
|
|
|
|
|
$result->write($output); |
8559
|
0
|
|
|
|
|
|
$output->writeMessageEnd(); |
8560
|
0
|
|
|
|
|
|
$output->getTransport()->flush(); |
8561
|
|
|
|
|
|
|
} |
8562
|
|
|
|
|
|
|
|
8563
|
|
|
|
|
|
|
sub process_system_drop_keyspace { |
8564
|
0
|
|
|
0
|
|
|
my ($self, $seqid, $input, $output) = @_; |
8565
|
0
|
|
|
|
|
|
my $args = new Cassandra::Cassandra_system_drop_keyspace_args(); |
8566
|
0
|
|
|
|
|
|
$args->read($input); |
8567
|
0
|
|
|
|
|
|
$input->readMessageEnd(); |
8568
|
0
|
|
|
|
|
|
my $result = new Cassandra::Cassandra_system_drop_keyspace_result(); |
8569
|
0
|
|
|
|
|
|
eval { |
8570
|
0
|
|
|
|
|
|
$result->{success} = $self->{handler}->system_drop_keyspace($args->keyspace); |
8571
|
0
|
0
|
|
|
|
|
}; if( UNIVERSAL::isa($@,'Cassandra::InvalidRequestException') ){ |
8572
|
0
|
|
|
|
|
|
$result->{ire} = $@; |
8573
|
0
|
0
|
|
|
|
|
}; if( UNIVERSAL::isa($@,'Cassandra::SchemaDisagreementException') ){ |
8574
|
0
|
|
|
|
|
|
$result->{sde} = $@; |
8575
|
|
|
|
|
|
|
} |
8576
|
0
|
|
|
|
|
|
$output->writeMessageBegin('system_drop_keyspace', TMessageType::REPLY, $seqid); |
8577
|
0
|
|
|
|
|
|
$result->write($output); |
8578
|
0
|
|
|
|
|
|
$output->writeMessageEnd(); |
8579
|
0
|
|
|
|
|
|
$output->getTransport()->flush(); |
8580
|
|
|
|
|
|
|
} |
8581
|
|
|
|
|
|
|
|
8582
|
|
|
|
|
|
|
sub process_system_update_keyspace { |
8583
|
0
|
|
|
0
|
|
|
my ($self, $seqid, $input, $output) = @_; |
8584
|
0
|
|
|
|
|
|
my $args = new Cassandra::Cassandra_system_update_keyspace_args(); |
8585
|
0
|
|
|
|
|
|
$args->read($input); |
8586
|
0
|
|
|
|
|
|
$input->readMessageEnd(); |
8587
|
0
|
|
|
|
|
|
my $result = new Cassandra::Cassandra_system_update_keyspace_result(); |
8588
|
0
|
|
|
|
|
|
eval { |
8589
|
0
|
|
|
|
|
|
$result->{success} = $self->{handler}->system_update_keyspace($args->ks_def); |
8590
|
0
|
0
|
|
|
|
|
}; if( UNIVERSAL::isa($@,'Cassandra::InvalidRequestException') ){ |
8591
|
0
|
|
|
|
|
|
$result->{ire} = $@; |
8592
|
0
|
0
|
|
|
|
|
}; if( UNIVERSAL::isa($@,'Cassandra::SchemaDisagreementException') ){ |
8593
|
0
|
|
|
|
|
|
$result->{sde} = $@; |
8594
|
|
|
|
|
|
|
} |
8595
|
0
|
|
|
|
|
|
$output->writeMessageBegin('system_update_keyspace', TMessageType::REPLY, $seqid); |
8596
|
0
|
|
|
|
|
|
$result->write($output); |
8597
|
0
|
|
|
|
|
|
$output->writeMessageEnd(); |
8598
|
0
|
|
|
|
|
|
$output->getTransport()->flush(); |
8599
|
|
|
|
|
|
|
} |
8600
|
|
|
|
|
|
|
|
8601
|
|
|
|
|
|
|
sub process_system_update_column_family { |
8602
|
0
|
|
|
0
|
|
|
my ($self, $seqid, $input, $output) = @_; |
8603
|
0
|
|
|
|
|
|
my $args = new Cassandra::Cassandra_system_update_column_family_args(); |
8604
|
0
|
|
|
|
|
|
$args->read($input); |
8605
|
0
|
|
|
|
|
|
$input->readMessageEnd(); |
8606
|
0
|
|
|
|
|
|
my $result = new Cassandra::Cassandra_system_update_column_family_result(); |
8607
|
0
|
|
|
|
|
|
eval { |
8608
|
0
|
|
|
|
|
|
$result->{success} = $self->{handler}->system_update_column_family($args->cf_def); |
8609
|
0
|
0
|
|
|
|
|
}; if( UNIVERSAL::isa($@,'Cassandra::InvalidRequestException') ){ |
8610
|
0
|
|
|
|
|
|
$result->{ire} = $@; |
8611
|
0
|
0
|
|
|
|
|
}; if( UNIVERSAL::isa($@,'Cassandra::SchemaDisagreementException') ){ |
8612
|
0
|
|
|
|
|
|
$result->{sde} = $@; |
8613
|
|
|
|
|
|
|
} |
8614
|
0
|
|
|
|
|
|
$output->writeMessageBegin('system_update_column_family', TMessageType::REPLY, $seqid); |
8615
|
0
|
|
|
|
|
|
$result->write($output); |
8616
|
0
|
|
|
|
|
|
$output->writeMessageEnd(); |
8617
|
0
|
|
|
|
|
|
$output->getTransport()->flush(); |
8618
|
|
|
|
|
|
|
} |
8619
|
|
|
|
|
|
|
|
8620
|
|
|
|
|
|
|
sub process_execute_cql_query { |
8621
|
0
|
|
|
0
|
|
|
my ($self, $seqid, $input, $output) = @_; |
8622
|
0
|
|
|
|
|
|
my $args = new Cassandra::Cassandra_execute_cql_query_args(); |
8623
|
0
|
|
|
|
|
|
$args->read($input); |
8624
|
0
|
|
|
|
|
|
$input->readMessageEnd(); |
8625
|
0
|
|
|
|
|
|
my $result = new Cassandra::Cassandra_execute_cql_query_result(); |
8626
|
0
|
|
|
|
|
|
eval { |
8627
|
0
|
|
|
|
|
|
$result->{success} = $self->{handler}->execute_cql_query($args->query, $args->compression); |
8628
|
0
|
0
|
|
|
|
|
}; if( UNIVERSAL::isa($@,'Cassandra::InvalidRequestException') ){ |
8629
|
0
|
|
|
|
|
|
$result->{ire} = $@; |
8630
|
0
|
0
|
|
|
|
|
}; if( UNIVERSAL::isa($@,'Cassandra::UnavailableException') ){ |
8631
|
0
|
|
|
|
|
|
$result->{ue} = $@; |
8632
|
0
|
0
|
|
|
|
|
}; if( UNIVERSAL::isa($@,'Cassandra::TimedOutException') ){ |
8633
|
0
|
|
|
|
|
|
$result->{te} = $@; |
8634
|
0
|
0
|
|
|
|
|
}; if( UNIVERSAL::isa($@,'Cassandra::SchemaDisagreementException') ){ |
8635
|
0
|
|
|
|
|
|
$result->{sde} = $@; |
8636
|
|
|
|
|
|
|
} |
8637
|
0
|
|
|
|
|
|
$output->writeMessageBegin('execute_cql_query', TMessageType::REPLY, $seqid); |
8638
|
0
|
|
|
|
|
|
$result->write($output); |
8639
|
0
|
|
|
|
|
|
$output->writeMessageEnd(); |
8640
|
0
|
|
|
|
|
|
$output->getTransport()->flush(); |
8641
|
|
|
|
|
|
|
} |
8642
|
|
|
|
|
|
|
|
8643
|
|
|
|
|
|
|
1; |