| line |
true |
false |
branch |
|
365
|
0 |
0 |
} while (--blocks); |
|
399
|
0 |
0 |
if (ctx->bytes_low < len) /* wrap around */ |
|
402
|
0 |
0 |
if (fill) { |
|
404
|
0 |
0 |
if (len < missing) { |
|
415
|
0 |
0 |
if (blocks) |
|
417
|
0 |
0 |
if ( (len &= 0x3F)) { |
|
427
|
0 |
0 |
STRLEN padlen = (fill < 56 ? 56 : 120) - fill; |
|
459
|
0 |
0 |
if (!sv_derived_from(sv, "Digest::MD5")) |
|
462
|
0 |
0 |
for (mg = SvMAGIC(SvRV(sv)); mg; mg = mg->mg_moremagic) { |
|
463
|
0 |
0 |
if (mg->mg_type == PERL_MAGIC_ext |
|
464
|
0 |
0 |
&& mg->mg_virtual == (const MGVTBL *)&vtbl_md5) { |
|
502
|
0 |
0 |
while (from < end) { |
|
522
|
0 |
0 |
if (from == end) { |
|
582
|
0 |
0 |
if (!SvROK(xclass)) { |
|
621
|
0 |
0 |
for (i = 1; i < items; i++) { |
|
625
|
0 |
0 |
if (had_utf8) sv_utf8_upgrade(ST(i)); |
|
643
|
0 |
0 |
if (fh) { |
|
648
|
0 |
0 |
if (fill) { |
|
654
|
0 |
0 |
if ( (n = PerlIO_read(fh, buffer, missing)) > 0) |
|
661
|
0 |
0 |
while ( (n = PerlIO_read(fh, buffer, sizeof(buffer))) > 0) { |
|
667
|
0 |
0 |
if (PerlIO_error(fh)) { |
|
698
|
0 |
0 |
if (items > 2) { |
|
708
|
0 |
0 |
if (items == 4) { |
|
713
|
0 |
0 |
} else if (items != 1) { |
|
722
|
0 |
0 |
EXTEND(SP, 3); |
|
727
|
0 |
0 |
if ((ctx->bytes_low & 0x3F) == 0) |
|
749
|
0 |
0 |
if ((PL_dowarn & G_WARN_ON) || ckWARN(WARN_SYNTAX)) { |
|
|
0 |
0 |
if ((PL_dowarn & G_WARN_ON) || ckWARN(WARN_SYNTAX)) { |
|
751
|
0 |
0 |
if (items == 1) { |
|
752
|
0 |
0 |
if (SvROK(ST(0))) { |
|
755
|
0 |
0 |
if (SvOBJECT(sv) && (name = HvNAME(SvSTASH(sv))) |
|
|
0 |
0 |
if (SvOBJECT(sv) && (name = HvNAME(SvSTASH(sv))) |
|
|
0 |
0 |
if (SvOBJECT(sv) && (name = HvNAME(SvSTASH(sv))) |
|
|
0 |
0 |
if (SvOBJECT(sv) && (name = HvNAME(SvSTASH(sv))) |
|
|
0 |
0 |
if (SvOBJECT(sv) && (name = HvNAME(SvSTASH(sv))) |
|
|
0 |
0 |
if (SvOBJECT(sv) && (name = HvNAME(SvSTASH(sv))) |
|
|
0 |
0 |
if (SvOBJECT(sv) && (name = HvNAME(SvSTASH(sv))) |
|
|
0 |
0 |
if (SvOBJECT(sv) && (name = HvNAME(SvSTASH(sv))) |
|
756
|
0 |
0 |
&& strEQ(name, "Digest::MD5")) |
|
762
|
0 |
0 |
else if (items > 1) { |
|
764
|
0 |
0 |
if (len == 11 && memEQ("Digest::MD5", data, 11)) { |
|
|
0 |
0 |
if (len == 11 && memEQ("Digest::MD5", data, 11)) { |
|
767
|
0 |
0 |
else if (SvROK(ST(0))) { |
|
770
|
0 |
0 |
if (SvOBJECT(sv) && (name = HvNAME(SvSTASH(sv))) |
|
|
0 |
0 |
if (SvOBJECT(sv) && (name = HvNAME(SvSTASH(sv))) |
|
|
0 |
0 |
if (SvOBJECT(sv) && (name = HvNAME(SvSTASH(sv))) |
|
|
0 |
0 |
if (SvOBJECT(sv) && (name = HvNAME(SvSTASH(sv))) |
|
|
0 |
0 |
if (SvOBJECT(sv) && (name = HvNAME(SvSTASH(sv))) |
|
|
0 |
0 |
if (SvOBJECT(sv) && (name = HvNAME(SvSTASH(sv))) |
|
|
0 |
0 |
if (SvOBJECT(sv) && (name = HvNAME(SvSTASH(sv))) |
|
|
0 |
0 |
if (SvOBJECT(sv) && (name = HvNAME(SvSTASH(sv))) |
|
771
|
0 |
0 |
&& strEQ(name, "Digest::MD5")) |
|
775
|
0 |
0 |
if (msg) { |
|
776
|
0 |
0 |
const char *f = (ix == F_BIN) ? "md5" : |
|
|
0 |
0 |
const char *f = (ix == F_BIN) ? "md5" : |
|
782
|
0 |
0 |
for (i = 0; i < items; i++) { |
|
786
|
0 |
0 |
if (had_utf8) sv_utf8_upgrade(ST(i)); |