line |
stmt |
bran |
cond |
sub |
pod |
time |
code |
1
|
|
|
|
|
|
|
package JSON::RPC2::AnyEvent::Constants; |
2
|
5
|
|
|
5
|
|
102
|
use 5.010; |
|
5
|
|
|
|
|
18
|
|
|
5
|
|
|
|
|
194
|
|
3
|
5
|
|
|
5
|
|
30
|
use strict; |
|
5
|
|
|
|
|
10
|
|
|
5
|
|
|
|
|
193
|
|
4
|
5
|
|
|
5
|
|
23
|
use warnings; |
|
5
|
|
|
|
|
10
|
|
|
5
|
|
|
|
|
310
|
|
5
|
|
|
|
|
|
|
|
6
|
|
|
|
|
|
|
|
7
|
|
|
|
|
|
|
my %constants; |
8
|
|
|
|
|
|
|
BEGIN{ |
9
|
|
|
|
|
|
|
# Based upon JSON-RPC spec 2.0 - http://www.jsonrpc.org/specification |
10
|
5
|
|
|
5
|
|
151
|
%constants = ( |
11
|
|
|
|
|
|
|
ERR_PARSE_ERROR => -32700, # Invalid JSON was received by the server. |
12
|
|
|
|
|
|
|
# An error occurred on the server while parsing the JSON text. |
13
|
|
|
|
|
|
|
ERR_INVALID_REQUEST => -32600, # The JSON sent is not a valid Request object. |
14
|
|
|
|
|
|
|
ERR_METHOD_NOT_FOUND => -32601, # The method does not exist / is not available. |
15
|
|
|
|
|
|
|
ERR_INVALID_PARAMS => -32602, # Invalid method parameter(s). |
16
|
|
|
|
|
|
|
ERR_INTERNAL_ERROR => -32603, # Internal JSON-RPC error. |
17
|
|
|
|
|
|
|
ERR_SERVER_ERROR => -32000, # -32000 to -32099: Reserved for implementation-defined server-errors. |
18
|
|
|
|
|
|
|
); |
19
|
|
|
|
|
|
|
} |
20
|
|
|
|
|
|
|
|
21
|
5
|
|
|
5
|
|
25
|
use constant \%constants; |
|
5
|
|
|
|
|
7
|
|
|
5
|
|
|
|
|
507
|
|
22
|
|
|
|
|
|
|
|
23
|
5
|
|
|
5
|
|
5455
|
use parent qw(Exporter); |
|
5
|
|
|
|
|
1580
|
|
|
5
|
|
|
|
|
26
|
|
24
|
|
|
|
|
|
|
our @EXPORT_OK = keys %constants; |
25
|
|
|
|
|
|
|
our %EXPORT_TAGS = (all => [@EXPORT_OK]); |
26
|
|
|
|
|
|
|
|
27
|
|
|
|
|
|
|
|
28
|
|
|
|
|
|
|
1; |