| line |
true |
false |
branch |
|
15
|
0 |
30 |
if (!SvPOK(key)) croak("FATAL: key must be string/buffer scalar"); |
|
16
|
30 |
0 |
k = (unsigned char *) SvPVbyte(key, k_len); |
|
19
|
0 |
30 |
if (!RETVAL) croak("FATAL: Newz failed"); |
|
22
|
0 |
30 |
if (rv != CRYPT_OK) { |
|
39
|
0 |
0 |
if (!RETVAL) croak("FATAL: Newz failed"); |
|
52
|
42 |
34 |
for(i = 1; i < items; i++) { |
|
53
|
34 |
8 |
in_data = (unsigned char *)SvPVbyte(ST(i), in_data_len); |
|
54
|
34 |
8 |
if (in_data_len > 0) { |
|
56
|
0 |
34 |
if (rv != CRYPT_OK) croak("FATAL: pelican_process failed: %s", error_to_string(rv)); |
|
59
|
0 |
34 |
XPUSHs(ST(0)); /* return self */ |
|
77
|
0 |
30 |
if (rv != CRYPT_OK) croak("FATAL: pelican_done failed: %s", error_to_string(rv)); |
|
79
|
1 |
29 |
if (ix == 3) { |
|
81
|
0 |
1 |
if (rv != CRYPT_OK) croak("FATAL: base64url_encode failed: %s", error_to_string(rv)); |
|
84
|
1 |
28 |
else if (ix == 2) { |
|
86
|
0 |
1 |
if (rv != CRYPT_OK) croak("FATAL: base64_encode failed: %s", error_to_string(rv)); |
|
89
|
14 |
14 |
else if (ix == 1) { |
|
91
|
0 |
14 |
if (rv != CRYPT_OK) croak("FATAL: base16_encode failed: %s", error_to_string(rv)); |
|
111
|
52 |
0 |
unsigned char *k = (unsigned char *)SvPVbyte(key, klen); |
|
120
|
0 |
52 |
if (rv != CRYPT_OK) croak("FATAL: pelican_init failed: %s", error_to_string(rv)); |
|
121
|
60 |
52 |
for (i = 1; i < items; i++) { |
|
122
|
44 |
16 |
in = (unsigned char *)SvPVbyte(ST(i), inlen); |
|
123
|
44 |
16 |
if (inlen > 0) { |
|
125
|
0 |
44 |
if (rv != CRYPT_OK) croak("FATAL: pelican_process failed: %s", error_to_string(rv)); |
|
129
|
0 |
52 |
if (rv != CRYPT_OK) croak("FATAL: pelican_done failed: %s", error_to_string(rv)); |
|
132
|
13 |
39 |
if (ix == 3) { |
|
134
|
0 |
13 |
if (rv != CRYPT_OK) croak("FATAL: base64url_encode failed: %s", error_to_string(rv)); |
|
137
|
13 |
26 |
else if (ix == 2) { |
|
139
|
0 |
13 |
if (rv != CRYPT_OK) croak("FATAL: base64_encode failed: %s", error_to_string(rv)); |
|
142
|
13 |
13 |
else if (ix == 1) { |
|
144
|
0 |
13 |
if (rv != CRYPT_OK) croak("FATAL: base16_encode failed: %s", error_to_string(rv)); |