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
|
TYPEMAP
SSL_METHOD * T_IV
SSL_CTX * T_IV
SSL_SESSION * T_IV
SSL * T_IV
RSA * T_IV
DH * T_IV
X509 * T_IV
X509_CRL * T_IV
X509_LOOKUP * T_IV
X509_NAME * T_IV
X509_EXTENSION * T_IV
BIO * T_IV
BIO_METHOD * T_IV
EVP_PKEY * T_IV
const EVP_MD * T_IV
CERT * T_IV
LHASH * T_IV
struct lhash_st_SSL_SESSION * T_IV
struct cert_st * T_IV
X509_STORE_CTX * T_IV
ASN1_UTCTIME * T_IV
ASN1_OCTET_STRING * T_IV
EVP_PKEY * T_IV
const char * T_PV
const unsigned char * T_PV
CRYPTO_EX_new * T_IV
CRYPTO_EX_dup * T_IV
CRYPTO_EX_free * T_IV
SSL_CIPHER * T_IV
int * T_IV
COMP_METHOD * T_IV
X509_STORE * T_IV
X509_NAME_STACK * T_IV
ENGINE * T_IV
pem_password_cb * T_IV
generate_key_cb * T_IV
callback_ret_int * T_IV
callback_no_ret * T_IV
cb_ssl_int_int_ret_void * T_IV
cb_ssl_int_int_ret_RSA * T_IV
cb_ssl_int_int_ret_DH * T_IV
perl_filehandle_t T_PERL_IO_HANDLE
INPUT
T_PERL_IO_HANDLE
if ($arg && SvOK($arg) && SvROK($arg)) {
$var = ($type)PerlIO_fileno( IoIFP( sv_2io(SvRV($arg)) ) );
} else {
$var = ($type)SvIV($arg);
}
|
