File: typemap

package info (click to toggle)
libapache-ssllookup-perl 2.00-04-4
  • links: PTS, VCS
  • area: main
  • in suites: bookworm, sid, trixie
  • size: 212 kB
  • sloc: perl: 209; ansic: 10; makefile: 9; sh: 5
file content (241 lines) | stat: -rwxr-xr-x 7,596 bytes parent folder | download | duplicates (4)
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
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
180
181
182
183
184
185
186
187
188
189
190
191
192
193
194
195
196
197
198
199
200
201
202
203
204
205
206
207
208
209
210
211
212
213
214
215
216
217
218
219
220
221
222
223
224
225
226
227
228
229
230
231
232
233
234
235
236
237
238
239
240
241
# mod_perl 1.99_17's typemap, plus our Apache::SSLLookup

Apache::SSLLookup           T_APACHEOBJ
APR::ArrayHeader            T_PTROBJ
APR::Brigade                T_PTROBJ
APR::Bucket                 T_PTROBJ
APR::BucketAlloc            T_PTROBJ
APR::BucketType             T_PTROBJ
APR::ExplodedTime           T_PTROBJ
APR::Finfo                  T_PTROBJ
APR::Getopt                 T_PTROBJ
APR::GetoptOption           T_PTROBJ
APR::Hash                   T_PTROBJ
APR::HashIndex              T_PTROBJ
APR::InAddr                 T_PTROBJ
APR::IpSubnet               T_PTROBJ
APR::MD5                    T_PTROBJ
APR::Mmap                   T_PTROBJ
APR::Pool                   T_POOLOBJ
APR::Process                T_PTROBJ
APR::SHA1                   T_PTROBJ
APR::SockAddr               T_PTROBJ
APR::SockInfo               T_PTROBJ
APR::Socket                 T_PTROBJ
APR::Table                  T_HASHOBJ
APR::TableEntry             T_PTROBJ
APR::ThreadMutex            T_PTROBJ
APR::URI                    T_PTROBJ
APR::UUID                   T_PTROBJ
Apache2::CmdParms            T_PTROBJ
Apache2::Command             T_PTROBJ
Apache2::ConfVector          T_PTROBJ
Apache2::ConfigFile          T_PTROBJ
Apache2::Connection          T_PTROBJ
Apache2::Directive           T_PTROBJ
Apache2::Filter              T_PTROBJ
Apache2::FilterRec           T_PTROBJ
Apache2::FilterType          T_PTROBJ
Apache2::MethodList          T_PTROBJ
Apache2::Module              T_PTROBJ
Apache2::OutputFilter        T_PTROBJ
Apache2::PipedLog            T_PTROBJ
Apache2::Process             T_PTROBJ
Apache2::RequestRec          T_APACHEOBJ
Apache2::ServerAddr          T_PTROBJ
Apache2::ServerRec           T_PTROBJ
Apache2::SubRequest          T_PTROBJ
I32                         T_IV
I32 *                       T_IV
SV *                        T_SV
U32                         T_UV
U32 *                       T_UV
ap_conn_keepalive_e         T_IV
ap_input_mode_t             T_IV
ap_input_mode_t *           T_IV
ap_mgmt_type_e              T_IV
ap_scoreboard_e             T_IV
apr_byte_t                  T_CHAR
apr_byte_t *                T_CHAR
apr_dev_t                   T_NV
apr_dev_t *                 T_NV
apr_fileperms_t             T_IV
apr_fileperms_t *           T_IV
apr_filetype_e              T_IV
apr_gid_t                   T_IV
apr_gid_t *                 T_IV
apr_ino_t                   T_IV
apr_ino_t *                 T_IV
apr_int16_t                 T_IV
apr_int16_t *               T_IV
apr_int32_t                 T_IV
apr_int32_t *               T_IV
apr_int64_t                 T_NV
apr_int64_t *               T_NV
apr_interval_time_t         T_NV
apr_interval_time_t *       T_NV
apr_lockmech_e              T_IV
apr_locktype_e              T_IV
apr_off_t                   T_IV
apr_off_t *                 T_IV
apr_port_t                  T_IV
apr_port_t *                T_IV
apr_read_type_e             T_IV
apr_size_t                  T_UV
apr_size_t *                T_UV
apr_socklen_t               T_IV
apr_socklen_t *             T_IV
apr_ssize_t                 T_IV
apr_ssize_t *               T_IV
apr_status_t                T_IV
apr_status_t *              T_IV
apr_time_t                  T_APR_TIME
apr_time_t *                T_NV
apr_uid_t                   T_IV
apr_uid_t *                 T_IV
apr_uint16_t                T_IV
apr_uint16_t *              T_IV
apr_uint32_t                T_IV
apr_uint32_t *              T_IV
apr_uint64_t                T_NV
apr_uint64_t *              T_NV
char                        T_CHAR
char *                      T_PV
char const *                T_PV
const ap_input_mode_t *     T_IV
const apr_byte_t *          T_CHAR
const apr_dev_t *           T_NV
const apr_fileperms_t *     T_IV
const apr_gid_t *           T_IV
const apr_ino_t *           T_IV
const apr_int16_t *         T_IV
const apr_int32_t *         T_IV
const apr_int64_t *         T_NV
const apr_interval_time_t * T_NV
const apr_off_t *           T_IV
const apr_port_t *          T_IV
const apr_size_t *          T_UV
const apr_socklen_t *       T_IV
const apr_ssize_t *         T_IV
const apr_status_t *        T_IV
const apr_time_t *          T_NV
const apr_uid_t *           T_IV
const apr_uint16_t *        T_IV
const apr_uint32_t *        T_IV
const apr_uint64_t *        T_NV
const char                  T_CHAR
const char *                T_PV
const gid_t *               T_IV
const pid_t *               T_IV
const size_t *              T_IV
const time_t *              T_NV
const uid_t *               T_IV
const unsigned char         T_U_CHAR
const unsigned char *       T_PV
const void *                T_PTR
double                      T_NV
enum cmd_how                T_IV
gid_t                       T_IV
gid_t *                     T_IV
int                         T_IV
int *                       T_PTR
long                        T_IV
long int                    T_IV
pid_t                       T_IV
pid_t *                     T_IV
signed int                  T_IV
size_t                      T_IV
time_t                      T_NV
time_t *                    T_NV
uid_t                       T_IV
uid_t *                     T_IV
unsigned                    T_UV
unsigned char               T_U_CHAR
unsigned char *             T_PV
unsigned int                T_UV
unsigned long               T_UV
void                        T_VOID
void *                      T_PTR
TYPEMAP
void *			T_VPTR
char_len *              T_CHAR_LEN
const char_len *        T_CONST_CHAR_LEN

######################################################################
OUTPUT
T_POOLOBJ
        sv_setref_pv($arg, \"${ntype}\", (void*)$var);

T_APACHEOBJ
	sv_setref_pv($arg, \"${ntype}\", (void*)$var);

T_HASHOBJ
	$arg = modperl_hash_tie(aTHX_ \"${ntype}\", $arg, $var);

T_VPTR
	sv_setiv($arg, PTR2IV($var));

T_APR_TIME
	sv_setnv($arg, (NV)(apr_time_sec($var)));

T_UVOBJ
	modperl_perl_sv_setref_uv(aTHX_ $arg, \"${ntype}\", (UV)$var);

######################################################################
INPUT
T_PTROBJ
	if (SvROK($arg) && sv_derived_from($arg, \"${ntype}\")) {
	    IV tmp = SvIV((SV*)SvRV($arg));
	    $var = INT2PTR($type,tmp);
	}
	else {
	    Perl_croak(aTHX_ SvROK($arg) ?
                       \"$var is not of type ${ntype}\" :
                       \"$var is not a blessed reference\");
        }

T_POOLOBJ
	if (SvROK($arg) && sv_derived_from($arg, \"${ntype}\")) {
	    IV tmp = SvIV((SV*)SvRV($arg));
            if (tmp == 0) {
                Perl_croak(aTHX_ \"invalid pool object (already destroyed?)\");
            }
	    $var = INT2PTR($type,tmp);
	}
	else {
	    Perl_croak(aTHX_ SvROK($arg) ?
                       \"$var is not of type ${ntype}\" :
                       \"$var is not a blessed reference\");
        }

T_UVOBJ
	if (SvROK($arg) && sv_derived_from($arg, \"${ntype}\")) {
	    UV tmp = SvUV((SV*)SvRV($arg));
	    $var = ($type)tmp;
	}
	else {
	    Perl_croak(aTHX_ SvROK($arg) ?
                       \"$var is not of type ${ntype}\" :
                       \"$var is not a blessed reference\");
        }

T_APACHEOBJ
	$var = modperl_xs_sv2request_rec(aTHX_ $arg, \"$ntype\", cv)

T_HASHOBJ
	$var = modperl_hash_tied_object(aTHX_ \"${ntype}\", $arg)

T_APACHEREF
	$var = modperl_xs_sv2request_rec(aTHX_ $arg, \"$ntype\", cv)

T_VPTR
	$var = INT2PTR($type,SvIV(SvROK($arg) ? SvRV($arg) : $arg))

T_APR_TIME
	$var = (apr_time_t)(apr_time_from_sec(SvNV($arg)))

T_CHAR_LEN
        $var = (char *)SvPV($arg, ${var}_len)

T_CONST_CHAR_LEN
        $var = (const char *)SvPV($arg, ${var}_len)