blob: 0e29f87c474bfe6a7977aff3faa093bab1523d0c (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
|
### see http://perldoc.perl.org/perlxstypemap.html
###########################
TYPEMAP
Crypt::Cipher T_PTROBJ
Crypt::Digest T_PTROBJ
Crypt::Checksum::Adler32 T_PTROBJ
Crypt::Checksum::CRC32 T_PTROBJ
Crypt::AuthEnc::CCM T_PTROBJ
Crypt::AuthEnc::EAX T_PTROBJ
Crypt::AuthEnc::GCM T_PTROBJ
Crypt::AuthEnc::OCB T_PTROBJ
Crypt::Mac::F9 T_PTROBJ
Crypt::Mac::HMAC T_PTROBJ
Crypt::Mac::OMAC T_PTROBJ
Crypt::Mac::Pelican T_PTROBJ
Crypt::Mac::PMAC T_PTROBJ
Crypt::Mac::XCBC T_PTROBJ
Crypt::Mode::CBC T_PTROBJ
Crypt::Mode::CFB T_PTROBJ
Crypt::Mode::CTR T_PTROBJ
Crypt::Mode::ECB T_PTROBJ
Crypt::Mode::F8 T_PTROBJ
Crypt::Mode::LRW T_PTROBJ
Crypt::Mode::OFB T_PTROBJ
Crypt::Mode::XTS T_PTROBJ
Crypt::PRNG T_PTROBJ
Crypt::PK::RSA T_PTROBJ
Crypt::PK::DSA T_PTROBJ
Crypt::PK::ECC T_PTROBJ
Crypt::PK::DH T_PTROBJ
Math::BigInt::LTM T_PTROBJ
#pointer with automatic NULL<->undef conversion on input/output
unsigned char * T_PTR_OR_NULL
char * T_STR_OR_NULL
const char * T_STR_OR_NULL
#perl 5.6.2 hack
STRLEN T_UV
###########################
INPUT
T_PTR_OR_NULL
$var = (SvIOK($arg)) ? INT2PTR($type,SvIVX($arg)) : NULL;
T_STR_OR_NULL
$var = (SvOK($arg)) ? SvPV_nolen($arg) : NULL;
###########################
OUTPUT
T_PTR_OR_NULL
if ($var==NULL) XSRETURN_UNDEF;
else sv_setiv($arg, PTR2IV($var));
T_STR_OR_NULL
if ($var==NULL) XSRETURN_UNDEF;
else sv_setpv($arg, $var);
|