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
|
TYPEMAP
const char * T_PV
DBusConnection* O_OBJECT_connection
DBusServer* O_OBJECT_server
DBusMessage* O_OBJECT_message
DBusPendingCall* O_OBJECT_pendingcall
DBusWatch* O_OBJECT_watch
DBusTimeout* O_OBJECT_timeout
DBusMessageIter* O_OBJECT_messageiter
DBusBusType T_IV
dbus_bool_t T_BOOL
dbus_int16_t T_IV
dbus_uint16_t T_UV
dbus_int32_t T_IV
dbus_uint32_t T_UV
dbus_int64_t T_DBUS_INT64
dbus_uint64_t T_DBUS_UINT64
INPUT
T_DBUS_INT64
$var = _dbus_parse_int64($arg);
OUTPUT
T_DBUS_INT64
$arg = _dbus_format_int64($var);
INPUT
T_DBUS_UINT64
$var = _dbus_parse_uint64($arg);
OUTPUT
T_DBUS_UINT64
$arg = _dbus_format_uint64($var);
INPUT
O_OBJECT_connection
if (sv_isobject($arg) && (SvTYPE(SvRV($arg)) == SVt_PVMG))
$var = ($type)SvIV((SV*)SvRV( $arg ));
else {
warn( \"${Package}::$func_name() -- $var is not a blessed SV reference\" );
XSRETURN_UNDEF;
}
OUTPUT
O_OBJECT_connection
sv_setref_pv( $arg, "Net::DBus::Binding::C::Connection", (void*)$var );
INPUT
O_OBJECT_server
if (sv_isobject($arg) && (SvTYPE(SvRV($arg)) == SVt_PVMG))
$var = ($type)SvIV((SV*)SvRV( $arg ));
else {
warn( \"${Package}::$func_name() -- $var is not a blessed SV reference\" );
XSRETURN_UNDEF;
}
OUTPUT
O_OBJECT_server
sv_setref_pv( $arg, "Net::DBus::Binding::C::Server", (void*)$var );
INPUT
O_OBJECT_message
if (sv_isobject($arg) && (SvTYPE(SvRV($arg)) == SVt_PVMG))
$var = ($type)SvIV((SV*)SvRV( $arg ));
else {
warn( \"${Package}::$func_name() -- $var is not a blessed SV reference\" );
XSRETURN_UNDEF;
}
OUTPUT
O_OBJECT_message
sv_setref_pv( $arg, "Net::DBus::Binding::C::Message", (void*)$var );
INPUT
O_OBJECT_pendingcall
if (sv_isobject($arg) && (SvTYPE(SvRV($arg)) == SVt_PVMG))
$var = ($type)SvIV((SV*)SvRV( $arg ));
else {
warn( \"${Package}::$func_name() -- $var is not a blessed SV reference\" );
XSRETURN_UNDEF;
}
OUTPUT
O_OBJECT_pendingcall
sv_setref_pv( $arg, "Net::DBus::Binding::C::PendingCall", (void*)$var );
INPUT
O_OBJECT_watch
if (sv_isobject($arg) && (SvTYPE(SvRV($arg)) == SVt_PVMG))
$var = ($type)SvIV((SV*)SvRV( $arg ));
else {
warn( \"${Package}::$func_name() -- $var is not a blessed SV reference\" );
XSRETURN_UNDEF;
}
OUTPUT
O_OBJECT_watch
sv_setref_pv( $arg, "Net::DBus::Binding::C::Watch", (void*)$var );
INPUT
O_OBJECT_timeout
if (sv_isobject($arg) && (SvTYPE(SvRV($arg)) == SVt_PVMG))
$var = ($type)SvIV((SV*)SvRV( $arg ));
else {
warn( \"${Package}::$func_name() -- $var is not a blessed SV reference\" );
XSRETURN_UNDEF;
}
OUTPUT
O_OBJECT_timeout
sv_setref_pv( $arg, "Net::DBus::Binding::C::Timeout", (void*)$var );
INPUT
O_OBJECT_messageiter
if (sv_isobject($arg) && (SvTYPE(SvRV($arg)) == SVt_PVMG))
$var = ($type)SvIV((SV*)SvRV( $arg ));
else {
warn( \"${Package}::$func_name() -- $var is not a blessed SV reference\" );
XSRETURN_UNDEF;
}
OUTPUT
O_OBJECT_messageiter
sv_setref_pv( $arg, "Net::DBus::Binding::Iterator", (void*)$var );
|
