line |
true |
false |
branch |
199
|
3069 |
3 |
if (SvLEN (sv) > SvCUR (sv) + 1) |
213
|
0 |
0 |
return idx <= 23 ? 3 |
|
0 |
0 |
return idx <= 23 ? 3 |
|
0 |
0 |
return idx <= 23 ? 3 |
|
0 |
0 |
return idx <= 23 ? 3 |
240
|
12523 |
7101 |
if (ecb_expect_false ((uintptr_t)(enc->end - enc->cur) < len)) |
243
|
12523 |
0 |
SvGROW (enc->sv, cur + (len < (cur >> 2) ? cur >> 2 : len) + 1); |
|
5989 |
6534 |
SvGROW (enc->sv, cur + (len < (cur >> 2) ? cur >> 2 : len) + 1); |
264
|
7003 |
6179 |
if (ecb_expect_true (len < LENGTH_EXT1)) |
266
|
1236 |
4943 |
else if (ecb_expect_true (len <= 0xffU)) |
271
|
4834 |
109 |
else if (len <= 0xffffU) |
277
|
109 |
0 |
else if (len <= 0xffffffffU) |
303
|
0 |
242 |
if (SvIsUV (sv)) |
305
|
182 |
60 |
else if (SvIVX (sv) >= 0) |
324
|
23 |
9 |
for (p = (U8 *)str; p < pend; ++p) |
330
|
23 |
9 |
for (p = (U8 *)str; p < pend; ++p) |
331
|
14 |
9 |
if (*p < 0x80) |
343
|
9 |
6394 |
if (ecb_expect_false (upgrade_utf8)) |
344
|
9 |
0 |
if (!utf8) |
350
|
3076 |
3318 |
encode_uint (enc, utf8 ? MAJOR_TEXT : MAJOR_BYTES, len); |
359
|
0 |
6403 |
if (ecb_expect_false (enc->cbor.flags & F_PACK_STRINGS)) |
363
|
0 |
0 |
if (SvOK (*svp)) |
|
0 |
0 |
if (SvOK (*svp)) |
|
0 |
0 |
if (SvOK (*svp)) |
367
|
0 |
0 |
encode_uint (enc, MAJOR_POS_INT, SvUV (*svp)); |
370
|
0 |
0 |
else if (len >= minimum_string_length (enc->stringref_idx)) |
390
|
0 |
0 |
if (!ecb_big_endian ()) |
406
|
3 |
0 |
if (!ecb_big_endian ()) |
422
|
8 |
0 |
if (!ecb_big_endian ()) |
432
|
3 |
3 |
encode_ch (enc, istrue ? MAJOR_MISC | SIMPLE_TRUE : MAJOR_MISC | SIMPLE_FALSE); |
439
|
0 |
0 |
if (enc->depth >= enc->cbor.max_depth) |
447
|
0 |
0 |
if (!SvROK (sv) || SvTYPE (SvRV (sv)) != SVt_PVAV) |
|
0 |
0 |
if (!SvROK (sv) || SvTYPE (SvRV (sv)) != SVt_PVAV) |
453
|
0 |
0 |
if (!(len & 1)) |
458
|
0 |
0 |
for (i = 0; i <= len; ++i) |
461
|
0 |
0 |
encode_sv (enc, svp ? *svp : &PL_sv_undef); |
475
|
0 |
0 |
char *str = SvPVbyte (sv, len); |
486
|
0 |
0 |
char *str = SvPVbyte (sv, len); |
494
|
0 |
0 |
char *str = SvPVutf8 (sv, len); |
501
|
0 |
0 |
case AS_FLOAT16: encode_float16 (enc, SvNV (sv)); break; |
502
|
0 |
0 |
case AS_FLOAT32: encode_float32 (enc, SvNV (sv)); break; |
503
|
0 |
0 |
case AS_FLOAT64: encode_float64 (enc, SvNV (sv)); break; |
517
|
0 |
6291 |
if (enc->depth >= enc->cbor.max_depth) |
524
|
0 |
6291 |
if (ecb_expect_false (SvMAGICAL (av))) |
525
|
0 |
0 |
for (i = 0; i <= len; ++i) |
528
|
0 |
0 |
encode_sv (enc, svp ? *svp : &PL_sv_undef); |
531
|
6415 |
6291 |
for (i = 0; i <= len; ++i) |
534
|
6415 |
0 |
encode_sv (enc, sv ? sv : &PL_sv_undef); |
545
|
0 |
16 |
if (enc->depth >= enc->cbor.max_depth) |
553
|
0 |
16 |
if (ecb_expect_false (mg)) |
558
|
15 |
16 |
while ((he = hv_iternext (hv))) |
560
|
0 |
15 |
if (HeKLEN (he) == HEf_SVKEY) |
561
|
0 |
0 |
encode_sv (enc, HeSVKEY (he)); |
|
0 |
0 |
encode_sv (enc, HeSVKEY (he)); |
565
|
0 |
15 |
encode_sv (enc, ecb_expect_false (mg) ? hv_iterval (hv, he) : HeVAL (he)); |
568
|
0 |
16 |
if (ecb_expect_false (mg)) |
578
|
0 |
6746 |
SvGETMAGIC (sv); |
|
0 |
0 |
SvGETMAGIC (sv); |
582
|
437 |
6309 |
if (ecb_expect_false (SvOBJECT (sv))) |
596
|
6 |
431 |
if (stash == boolean_stash) |
598
|
6 |
0 |
encode_bool (enc, SvIV (sv)); |
601
|
3 |
428 |
else if (stash == error_stash) |
606
|
212 |
216 |
else if (stash == tagged_stash) |
608
|
0 |
212 |
if (svt != SVt_PVAV) |
615
|
0 |
212 |
encode_uint (enc, MAJOR_TAG, SvUV (*av_fetch ((AV *)sv, 0, 1))); |
621
|
0 |
0 |
encode_forced (enc, SvUV (*av_fetch ((AV *)sv, 1, 1)), *av_fetch ((AV *)sv, 0, 1)); |
632
|
113 |
6412 |
if (ecb_expect_false (SvREFCNT (sv) > 1) |
633
|
6 |
107 |
&& ecb_expect_false (enc->cbor.flags & F_ALLOW_SHARING)) |
635
|
2 |
4 |
if (ecb_expect_false (!enc->shareable)) |
640
|
2 |
4 |
if (SvOK (*svp)) |
|
2 |
0 |
if (SvOK (*svp)) |
|
0 |
2 |
if (SvOK (*svp)) |
643
|
0 |
4 |
encode_uint (enc, MAJOR_POS_INT, SvUV (*svp)); |
654
|
212 |
6309 |
if (ecb_expect_false (SvOBJECT (sv))) |
659
|
0 |
212 |
if (enc->cbor.flags & F_FORBID_OBJECTS) |
660
|
0 |
0 |
croak ("encountered object '%s', but forbid_objects is enabled", |
662
|
209 |
3 |
else if ((method = gv_fetchmethod_autoload (stash, "TO_CBOR", 0))) |
667
|
0 |
209 |
PUSHMARK (SP); |
669
|
0 |
209 |
XPUSHs (sv_bless (sv_2mortal (newRV_inc (sv)), stash)); |
677
|
202 |
7 |
if (SvROK (TOPs) && SvRV (TOPs) == sv) |
|
0 |
202 |
if (SvROK (TOPs) && SvRV (TOPs) == sv) |
678
|
0 |
0 |
croak ("%s::TO_CBOR method returned same object as was passed instead of a new one", HvNAME (stash)); |
|
0 |
0 |
croak ("%s::TO_CBOR method returned same object as was passed instead of a new one", HvNAME (stash)); |
|
0 |
0 |
croak ("%s::TO_CBOR method returned same object as was passed instead of a new one", HvNAME (stash)); |
|
0 |
0 |
croak ("%s::TO_CBOR method returned same object as was passed instead of a new one", HvNAME (stash)); |
|
0 |
0 |
croak ("%s::TO_CBOR method returned same object as was passed instead of a new one", HvNAME (stash)); |
|
0 |
0 |
croak ("%s::TO_CBOR method returned same object as was passed instead of a new one", HvNAME (stash)); |
684
|
209 |
0 |
FREETMPS; LEAVE; |
686
|
3 |
0 |
else if ((method = gv_fetchmethod_autoload (stash, "FREEZE", 0)) != 0) |
691
|
0 |
3 |
PUSHMARK (SP); |
692
|
0 |
3 |
EXTEND (SP, 2); |
702
|
2 |
1 |
if (count == 1 && SvROK (TOPs) && SvRV (TOPs) == sv) |
|
0 |
2 |
if (count == 1 && SvROK (TOPs) && SvRV (TOPs) == sv) |
|
0 |
0 |
if (count == 1 && SvROK (TOPs) && SvRV (TOPs) == sv) |
703
|
0 |
0 |
croak ("%s::FREEZE(CBOR) method returned same object as was passed instead of a new one", HvNAME (stash)); |
|
0 |
0 |
croak ("%s::FREEZE(CBOR) method returned same object as was passed instead of a new one", HvNAME (stash)); |
|
0 |
0 |
croak ("%s::FREEZE(CBOR) method returned same object as was passed instead of a new one", HvNAME (stash)); |
|
0 |
0 |
croak ("%s::FREEZE(CBOR) method returned same object as was passed instead of a new one", HvNAME (stash)); |
|
0 |
0 |
croak ("%s::FREEZE(CBOR) method returned same object as was passed instead of a new one", HvNAME (stash)); |
|
0 |
0 |
croak ("%s::FREEZE(CBOR) method returned same object as was passed instead of a new one", HvNAME (stash)); |
707
|
3 |
0 |
encode_strref (enc, 0, HvNAMEUTF8 (stash), HvNAME (stash), HvNAMELEN (stash)); |
|
3 |
0 |
encode_strref (enc, 0, HvNAMEUTF8 (stash), HvNAME (stash), HvNAMELEN (stash)); |
|
0 |
3 |
encode_strref (enc, 0, HvNAMEUTF8 (stash), HvNAME (stash), HvNAMELEN (stash)); |
|
0 |
0 |
encode_strref (enc, 0, HvNAMEUTF8 (stash), HvNAME (stash), HvNAMELEN (stash)); |
|
3 |
0 |
encode_strref (enc, 0, HvNAMEUTF8 (stash), HvNAME (stash), HvNAMELEN (stash)); |
|
0 |
3 |
encode_strref (enc, 0, HvNAMEUTF8 (stash), HvNAME (stash), HvNAMELEN (stash)); |
|
3 |
0 |
encode_strref (enc, 0, HvNAMEUTF8 (stash), HvNAME (stash), HvNAMELEN (stash)); |
|
3 |
0 |
encode_strref (enc, 0, HvNAMEUTF8 (stash), HvNAME (stash), HvNAMELEN (stash)); |
|
0 |
3 |
encode_strref (enc, 0, HvNAMEUTF8 (stash), HvNAME (stash), HvNAMELEN (stash)); |
|
0 |
0 |
encode_strref (enc, 0, HvNAMEUTF8 (stash), HvNAME (stash), HvNAMELEN (stash)); |
|
3 |
0 |
encode_strref (enc, 0, HvNAMEUTF8 (stash), HvNAME (stash), HvNAMELEN (stash)); |
|
0 |
3 |
encode_strref (enc, 0, HvNAMEUTF8 (stash), HvNAME (stash), HvNAMELEN (stash)); |
|
3 |
0 |
encode_strref (enc, 0, HvNAMEUTF8 (stash), HvNAME (stash), HvNAMELEN (stash)); |
|
3 |
0 |
encode_strref (enc, 0, HvNAMEUTF8 (stash), HvNAME (stash), HvNAMELEN (stash)); |
|
0 |
3 |
encode_strref (enc, 0, HvNAMEUTF8 (stash), HvNAME (stash), HvNAMELEN (stash)); |
|
0 |
0 |
encode_strref (enc, 0, HvNAMEUTF8 (stash), HvNAME (stash), HvNAMELEN (stash)); |
|
3 |
0 |
encode_strref (enc, 0, HvNAMEUTF8 (stash), HvNAME (stash), HvNAMELEN (stash)); |
|
0 |
3 |
encode_strref (enc, 0, HvNAMEUTF8 (stash), HvNAME (stash), HvNAMELEN (stash)); |
|
0 |
3 |
encode_strref (enc, 0, HvNAMEUTF8 (stash), HvNAME (stash), HvNAMELEN (stash)); |
712
|
5 |
3 |
for (i = 0; i < count; ++i) |
720
|
3 |
0 |
FREETMPS; LEAVE; |
723
|
0 |
0 |
croak ("encountered object '%s', but no TO_CBOR or FREEZE methods available on it", |
726
|
16 |
6293 |
else if (svt == SVt_PVHV) |
728
|
6291 |
2 |
else if (svt == SVt_PVAV) |
744
|
0 |
11 |
if (ecb_expect_false (nv == (NV)(U32)nv)) |
747
|
3 |
8 |
else if (ecb_expect_false (nv == (float)nv)) |
756
|
0 |
13392 |
SvGETMAGIC (sv); |
|
0 |
0 |
SvGETMAGIC (sv); |
758
|
6385 |
7007 |
if (SvPOKp (sv)) |
761
|
6385 |
0 |
char *str = SvPV (sv, len); |
764
|
11 |
6996 |
else if (SvNOKp (sv)) |
766
|
242 |
6754 |
else if (SvIOKp (sv)) |
768
|
6746 |
8 |
else if (SvROK (sv)) |
770
|
8 |
0 |
else if (!SvOK (sv)) |
|
8 |
0 |
else if (!SvOK (sv)) |
|
8 |
0 |
else if (!SvOK (sv)) |
772
|
0 |
0 |
else if (enc->cbor.flags & F_ALLOW_UNKNOWN) |
775
|
0 |
0 |
croak ("encountered perl type (%s,0x%x) that CBOR cannot handle, check your input data", |
791
|
0 |
6534 |
if (cbor->flags & F_PACK_STRINGS) |
803
|
3072 |
3462 |
if (enc.cbor.flags & F_SHRINK) |
831
|
0 |
0 |
if (!dec->err) |
833
|
0 |
0 |
dec->err_sv = newSVsv (ERRSV); |
839
|
0 |
0 |
dec->err = SvPVutf8_nolen (dec->err_sv); |
847
|
5 |
0 |
if (!dec->err) |
872
|
6964 |
6290 |
if (ecb_expect_true (m < LENGTH_EXT1)) |
874
|
1275 |
5015 |
else if (ecb_expect_true (m == LENGTH_EXT1)) |
876
|
0 |
1275 |
WANT (1); |
880
|
4856 |
159 |
else if (ecb_expect_true (m == LENGTH_EXT2)) |
882
|
0 |
4856 |
WANT (2); |
887
|
134 |
25 |
else if (ecb_expect_true (m == LENGTH_EXT4)) |
889
|
0 |
134 |
WANT (4); |
896
|
25 |
0 |
else if (ecb_expect_true (m == LENGTH_EXT8)) |
898
|
0 |
25 |
WANT (8); |
929
|
0 |
6312 |
DEC_INC_DEPTH; |
931
|
8 |
6304 |
if (*dec->cur == (MAJOR_ARRAY | MINOR_INDEF)) |
937
|
0 |
47 |
WANT (1); |
939
|
39 |
8 |
if (*dec->cur == (MAJOR_MISC | MINOR_INDEF) || dec->err) |
|
0 |
39 |
if (*dec->cur == (MAJOR_MISC | MINOR_INDEF) || dec->err) |
952
|
0 |
6304 |
WANT (len); // complexity check for av_fill - need at least one byte per value, do not allow supersize arrays |
955
|
6441 |
6304 |
for (i = 0; i < len; ++i) |
974
|
17 |
0 |
if (ecb_expect_true (!dec->stringref)) |
975
|
1 |
16 |
if (ecb_expect_true ((U8)(*dec->cur - MAJOR_BYTES) <= LENGTH_EXT8)) |
980
|
0 |
1 |
WANT (len); |
987
|
16 |
0 |
else if (ecb_expect_true ((U8)(*dec->cur - MAJOR_TEXT) <= LENGTH_EXT8)) |
992
|
0 |
16 |
WANT (len); |
995
|
1 |
15 |
if (ecb_expect_false (dec->cbor.flags & F_VALIDATE_UTF8)) |
996
|
1 |
0 |
if (!cbor_is_utf8_string ((U8 *)key, len)) |
|
1 |
0 |
if (!cbor_is_utf8_string ((U8 *)key, len)) |
1012
|
0 |
0 |
if (ecb_expect_false (SvAMAGIC (k))) |
|
0 |
0 |
if (ecb_expect_false (SvAMAGIC (k))) |
|
0 |
0 |
if (ecb_expect_false (SvAMAGIC (k))) |
|
0 |
0 |
if (ecb_expect_false (SvAMAGIC (k))) |
1017
|
0 |
0 |
PUSHMARK (SP); |
1018
|
0 |
0 |
EXTEND (SP, 3); |
1027
|
0 |
0 |
FREETMPS; LEAVE; |
1029
|
0 |
0 |
if (SvTRUE (ERRSV)) |
|
0 |
0 |
if (SvTRUE (ERRSV)) |
|
0 |
0 |
if (SvTRUE (ERRSV)) |
|
0 |
0 |
if (SvTRUE (ERRSV)) |
|
0 |
0 |
if (SvTRUE (ERRSV)) |
|
0 |
0 |
if (SvTRUE (ERRSV)) |
|
0 |
0 |
if (SvTRUE (ERRSV)) |
|
0 |
0 |
if (SvTRUE (ERRSV)) |
|
0 |
0 |
if (SvTRUE (ERRSV)) |
|
0 |
0 |
if (SvTRUE (ERRSV)) |
|
0 |
0 |
if (SvTRUE (ERRSV)) |
|
0 |
0 |
if (SvTRUE (ERRSV)) |
|
0 |
0 |
if (SvTRUE (ERRSV)) |
|
0 |
0 |
if (SvTRUE (ERRSV)) |
|
0 |
0 |
if (SvTRUE (ERRSV)) |
|
0 |
0 |
if (SvTRUE (ERRSV)) |
|
0 |
0 |
if (SvTRUE (ERRSV)) |
|
0 |
0 |
if (SvTRUE (ERRSV)) |
|
0 |
0 |
if (SvTRUE (ERRSV)) |
|
0 |
0 |
if (SvTRUE (ERRSV)) |
|
0 |
0 |
if (SvTRUE (ERRSV)) |
|
0 |
0 |
if (SvTRUE (ERRSV)) |
|
0 |
0 |
if (SvTRUE (ERRSV)) |
|
0 |
0 |
if (SvTRUE (ERRSV)) |
|
0 |
0 |
if (SvTRUE (ERRSV)) |
|
0 |
0 |
if (SvTRUE (ERRSV)) |
|
0 |
0 |
if (SvTRUE (ERRSV)) |
|
0 |
0 |
if (SvTRUE (ERRSV)) |
|
0 |
0 |
if (SvTRUE (ERRSV)) |
|
0 |
0 |
if (SvTRUE (ERRSV)) |
|
0 |
0 |
if (SvTRUE (ERRSV)) |
|
0 |
0 |
if (SvTRUE (ERRSV)) |
|
0 |
0 |
if (SvTRUE (ERRSV)) |
1047
|
0 |
12 |
DEC_INC_DEPTH; |
1049
|
2 |
10 |
if (*dec->cur == (MAJOR_MAP | MINOR_INDEF)) |
1055
|
0 |
5 |
WANT (1); |
1057
|
3 |
2 |
if (*dec->cur == (MAJOR_MISC | MINOR_INDEF) || dec->err) |
|
0 |
3 |
if (*dec->cur == (MAJOR_MISC | MINOR_INDEF) || dec->err) |
1070
|
0 |
10 |
WANT (pairs); // complexity check - need at least one byte per value, do not allow supersize hashes |
1072
|
14 |
10 |
while (pairs--) |
1090
|
10 |
6381 |
if (ecb_expect_false ((*dec->cur & MINOR_MASK) == MINOR_INDEF)) |
1101
|
0 |
39 |
WANT (1); |
1103
|
10 |
29 |
if ((*dec->cur - major) > LENGTH_EXT8) |
1104
|
10 |
0 |
if (*dec->cur == (MAJOR_MISC | MINOR_INDEF)) |
1114
|
0 |
29 |
WANT (len); |
1123
|
0 |
6381 |
WANT (len); |
1127
|
0 |
6381 |
if (ecb_expect_false (dec->stringref) |
1128
|
0 |
0 |
&& SvCUR (sv) >= minimum_string_length (AvFILLp (dec->stringref) + 1)) |
1132
|
3090 |
3301 |
if (utf8) |
1134
|
2 |
3088 |
if (ecb_expect_false (dec->cbor.flags & F_VALIDATE_UTF8)) |
1135
|
2 |
0 |
if (!cbor_is_utf8_string (SvPVX (sv), SvCUR (sv))) |
|
2 |
0 |
if (!cbor_is_utf8_string (SvPVX (sv), SvCUR (sv))) |
1154
|
0 |
220 |
WANT (1); |
1183
|
0 |
0 |
if ((*dec->cur >> MAJOR_SHIFT) != (MAJOR_POS_INT >> MAJOR_SHIFT)) |
1188
|
0 |
0 |
if (!dec->stringref || idx >= (UV)(1 + AvFILLp (dec->stringref))) |
|
0 |
0 |
if (!dec->stringref || idx >= (UV)(1 + AvFILLp (dec->stringref))) |
1197
|
4 |
0 |
if (ecb_expect_false (!dec->shareable)) |
1200
|
2 |
2 |
if (ecb_expect_false (dec->cbor.flags & (F_ALLOW_CYCLES | F_ALLOW_WEAK_CYCLES))) |
1214
|
2 |
2 |
for (i = 0; i <= AvFILLp (av); ++i) |
1218
|
1 |
1 |
if (dec->cbor.flags & F_ALLOW_WEAK_CYCLES) |
1219
|
1 |
1 |
for (i = 0; i <= AvFILLp (av); ++i) |
1238
|
0 |
6 |
if ((*dec->cur >> MAJOR_SHIFT) != (MAJOR_POS_INT >> MAJOR_SHIFT)) |
1243
|
6 |
0 |
if (!dec->shareable || idx >= (UV)(1 + AvFILLp (dec->shareable))) |
|
0 |
6 |
if (!dec->shareable || idx >= (UV)(1 + AvFILLp (dec->shareable))) |
1250
|
2 |
4 |
if (ecb_expect_false (SvTYPE (sv) == SVt_PVAV)) |
1256
|
1 |
3 |
else if (ecb_expect_false (sv == &PL_sv_undef)) // not yet decoded, but cycles not allowed |
1265
|
0 |
2 |
if (dec->cbor.flags & F_FORBID_OBJECTS) |
1270
|
2 |
0 |
if (!SvROK (sv) || SvTYPE (SvRV (sv)) != SVt_PVAV) |
|
0 |
2 |
if (!SvROK (sv) || SvTYPE (SvRV (sv)) != SVt_PVAV) |
1277
|
0 |
2 |
if (!stash) |
1282
|
0 |
2 |
if (!method) |
1288
|
0 |
2 |
PUSHMARK (SP); |
1289
|
2 |
0 |
EXTEND (SP, len + 1); |
|
0 |
2 |
EXTEND (SP, len + 1); |
1296
|
4 |
2 |
for (i = 1; i < len; ++i) |
1303
|
2 |
0 |
if (SvTRUE (ERRSV)) |
|
2 |
0 |
if (SvTRUE (ERRSV)) |
|
2 |
0 |
if (SvTRUE (ERRSV)) |
|
0 |
2 |
if (SvTRUE (ERRSV)) |
|
0 |
0 |
if (SvTRUE (ERRSV)) |
|
2 |
0 |
if (SvTRUE (ERRSV)) |
|
0 |
2 |
if (SvTRUE (ERRSV)) |
|
0 |
0 |
if (SvTRUE (ERRSV)) |
|
0 |
0 |
if (SvTRUE (ERRSV)) |
|
0 |
0 |
if (SvTRUE (ERRSV)) |
|
0 |
0 |
if (SvTRUE (ERRSV)) |
|
2 |
0 |
if (SvTRUE (ERRSV)) |
|
2 |
0 |
if (SvTRUE (ERRSV)) |
|
2 |
0 |
if (SvTRUE (ERRSV)) |
|
2 |
0 |
if (SvTRUE (ERRSV)) |
|
2 |
0 |
if (SvTRUE (ERRSV)) |
|
2 |
0 |
if (SvTRUE (ERRSV)) |
|
2 |
0 |
if (SvTRUE (ERRSV)) |
|
0 |
2 |
if (SvTRUE (ERRSV)) |
|
0 |
0 |
if (SvTRUE (ERRSV)) |
|
0 |
0 |
if (SvTRUE (ERRSV)) |
|
0 |
0 |
if (SvTRUE (ERRSV)) |
|
0 |
0 |
if (SvTRUE (ERRSV)) |
|
0 |
0 |
if (SvTRUE (ERRSV)) |
|
0 |
0 |
if (SvTRUE (ERRSV)) |
|
0 |
0 |
if (SvTRUE (ERRSV)) |
|
0 |
0 |
if (SvTRUE (ERRSV)) |
|
0 |
0 |
if (SvTRUE (ERRSV)) |
|
0 |
0 |
if (SvTRUE (ERRSV)) |
|
0 |
0 |
if (SvTRUE (ERRSV)) |
|
0 |
0 |
if (SvTRUE (ERRSV)) |
|
0 |
0 |
if (SvTRUE (ERRSV)) |
|
0 |
2 |
if (SvTRUE (ERRSV)) |
1305
|
0 |
0 |
FREETMPS; LEAVE; |
1314
|
2 |
0 |
FREETMPS; LEAVE; |
1327
|
0 |
208 |
PUSHMARK (SP); |
1328
|
0 |
208 |
EXTEND (SP, 2); |
1333
|
0 |
208 |
int count = call_sv (dec->cbor.filter ? dec->cbor.filter : default_filter, G_ARRAY | G_EVAL); |
1336
|
208 |
0 |
if (SvTRUE (ERRSV)) |
|
208 |
0 |
if (SvTRUE (ERRSV)) |
|
208 |
0 |
if (SvTRUE (ERRSV)) |
|
0 |
208 |
if (SvTRUE (ERRSV)) |
|
0 |
0 |
if (SvTRUE (ERRSV)) |
|
208 |
0 |
if (SvTRUE (ERRSV)) |
|
0 |
208 |
if (SvTRUE (ERRSV)) |
|
0 |
0 |
if (SvTRUE (ERRSV)) |
|
0 |
0 |
if (SvTRUE (ERRSV)) |
|
0 |
0 |
if (SvTRUE (ERRSV)) |
|
0 |
0 |
if (SvTRUE (ERRSV)) |
|
208 |
0 |
if (SvTRUE (ERRSV)) |
|
208 |
0 |
if (SvTRUE (ERRSV)) |
|
208 |
0 |
if (SvTRUE (ERRSV)) |
|
208 |
0 |
if (SvTRUE (ERRSV)) |
|
208 |
0 |
if (SvTRUE (ERRSV)) |
|
208 |
0 |
if (SvTRUE (ERRSV)) |
|
208 |
0 |
if (SvTRUE (ERRSV)) |
|
0 |
208 |
if (SvTRUE (ERRSV)) |
|
0 |
0 |
if (SvTRUE (ERRSV)) |
|
0 |
0 |
if (SvTRUE (ERRSV)) |
|
0 |
0 |
if (SvTRUE (ERRSV)) |
|
0 |
0 |
if (SvTRUE (ERRSV)) |
|
0 |
0 |
if (SvTRUE (ERRSV)) |
|
0 |
0 |
if (SvTRUE (ERRSV)) |
|
0 |
0 |
if (SvTRUE (ERRSV)) |
|
0 |
0 |
if (SvTRUE (ERRSV)) |
|
0 |
0 |
if (SvTRUE (ERRSV)) |
|
0 |
0 |
if (SvTRUE (ERRSV)) |
|
0 |
0 |
if (SvTRUE (ERRSV)) |
|
0 |
0 |
if (SvTRUE (ERRSV)) |
|
0 |
0 |
if (SvTRUE (ERRSV)) |
|
0 |
208 |
if (SvTRUE (ERRSV)) |
1339
|
0 |
0 |
FREETMPS; LEAVE; |
1343
|
207 |
1 |
if (count) |
1364
|
207 |
1 |
FREETMPS; LEAVE; |
1379
|
0 |
13257 |
WANT (1); |
1414
|
0 |
5 |
WANT (2); |
1425
|
0 |
4 |
WANT (4); |
1429
|
4 |
0 |
if (!ecb_big_endian ()) |
1438
|
0 |
8 |
WANT (8); |
1442
|
8 |
0 |
if (!ecb_big_endian ()) |
1469
|
6547 |
0 |
char *data = SvPVbyte (string, len); |
1471
|
6546 |
1 |
if (len > cbor->max_size && cbor->max_size) |
|
0 |
6546 |
if (len > cbor->max_size && cbor->max_size) |
1481
|
213 |
6334 |
if (offset_return) |
1484
|
6334 |
213 |
if (!(offset_return || !sv)) |
|
6334 |
0 |
if (!(offset_return || !sv)) |
1485
|
1 |
6333 |
if (dec.cur != dec.end && !dec.err) |
|
0 |
1 |
if (dec.cur != dec.end && !dec.err) |
1488
|
5 |
6542 |
if (dec.err) |
1490
|
1 |
4 |
if (dec.shareable) |
1496
|
1 |
1 |
for (i = av_len (dec.shareable) + 1; i--; ) |
1497
|
1 |
0 |
if ((svp = av_fetch (dec.shareable, i, 0))) |
1503
|
0 |
5 |
if (dec.err_sv) |
1524
|
428 |
0 |
SvPV (cborstr, cur); |
1526
|
370 |
118 |
while (ecb_expect_true (self->incr_need <= cur)) |
1543
|
19 |
351 |
if (ecb_expect_false (ilen < 0)) |
1545
|
0 |
19 |
if (m != MINOR_INDEF) |
1548
|
10 |
9 |
if (*p == (MAJOR_MISC | MINOR_INDEF)) |
1550
|
1 |
9 |
if (count >= 0) |
1564
|
64 |
287 |
if (ecb_expect_false (self->incr_need > cur)) |
1582
|
118 |
88 |
if (ecb_expect_false (ilen)) |
1588
|
335 |
118 |
} while (--ilen); |
1598
|
33 |
137 |
if (ecb_expect_false (self->incr_need > cur)) |
1607
|
18 |
18 |
if (len) |
1620
|
236 |
36 |
if (count > 0) |
1622
|
239 |
24 |
while (!--count) |
1624
|
212 |
27 |
if (!AvFILLp (self->incr_count)) |
1679
|
0 |
9238 |
XPUSHs (sv_2mortal (sv_bless ( |
|
0 |
9238 |
XPUSHs (sv_2mortal (sv_bless ( |
1699
|
6153 |
0 |
if (enable) |
1704
|
0 |
6153 |
XPUSHs (ST (0)); |
1720
|
0 |
0 |
XPUSHs (boolSV (self->flags & ix)); |
|
0 |
0 |
XPUSHs (boolSV (self->flags & ix)); |
1725
|
0 |
0 |
XPUSHs (ST (0)); |
1736
|
0 |
2 |
XPUSHs (ST (0)); |
1747
|
0 |
0 |
self->filter = filter ? newSVsv (filter) : filter; |
1748
|
0 |
0 |
XPUSHs (ST (0)); |
1752
|
0 |
0 |
RETVAL = self->filter ? self->filter : NEWSV (0, 0); |
1759
|
0 |
6155 |
XPUSHs (scalar); |
1764
|
0 |
3083 |
XPUSHs (cborstr); |
1772
|
0 |
0 |
EXTEND (SP, 2); |
1782
|
0 |
216 |
if (SvUTF8 (cborstr)) |
1785
|
62 |
154 |
if (!self->incr_count) |
1796
|
215 |
213 |
if (!incr_parse (self, cborstr)) |
1798
|
215 |
0 |
if (self->incr_need > self->max_size && self->max_size) |
|
1 |
214 |
if (self->incr_need > self->max_size && self->max_size) |
1809
|
0 |
212 |
XPUSHs (sv); |
1819
|
212 |
0 |
while (ix); |
1845
|
0 |
379 |
XPUSHs (scalar); |
1854
|
0 |
3247 |
XPUSHs (cborstr); |