;;;SWIG wrapper code starts here (cl:defmacro defanonenum (&body enums) "Converts anonymous enums to defconstants." `(cl:progn ,@(cl:loop for value in enums for index = 0 then (cl:1+ index) when (cl:listp value) do (cl:setf index (cl:second value) value (cl:first value)) collect `(cl:defconstant ,value ,index)))) (cl:eval-when (:compile-toplevel :load-toplevel) (cl:unless (cl:fboundp 'swig-lispify) (cl:defun swig-lispify (name flag cl:&optional (package cl:*package*)) (cl:labels ((helper (lst last rest cl:&aux (c (cl:car lst))) (cl:cond ((cl:null lst) rest) ((cl:upper-case-p c) (helper (cl:cdr lst) 'upper (cl:case last ((lower digit) (cl:list* c #\- rest)) (cl:t (cl:cons c rest))))) ((cl:lower-case-p c) (helper (cl:cdr lst) 'lower (cl:cons (cl:char-upcase c) rest))) ((cl:digit-char-p c) (helper (cl:cdr lst) 'digit (cl:case last ((upper lower) (cl:list* c #\- rest)) (cl:t (cl:cons c rest))))) ((cl:char-equal c #\_) (helper (cl:cdr lst) '_ (cl:cons #\- rest))) (cl:t (cl:error "Invalid character: ~A" c))))) (cl:let ((fix (cl:case flag ((constant enumvalue) "+") (variable "*") (cl:t "")))) (cl:intern (cl:concatenate 'cl:string fix (cl:nreverse (helper (cl:concatenate 'cl:list name) cl:nil cl:nil)) fix) package)))))) ;;;SWIG wrapper code ends here (cl:defconstant DBUS_INSIDE_DBUS_H 1) (cl:export 'DBUS_INSIDE_DBUS_H) (cl:defconstant TRUE 1) (cl:export 'TRUE) (cl:defconstant FALSE 0) (cl:export 'FALSE) (cl:defconstant DBUS_HAVE_INT64 1) (cl:export 'DBUS_HAVE_INT64) (cl:defconstant __DARWIN_UNIX03 0) (cl:export '__DARWIN_UNIX03) (cl:defconstant __DARWIN_LONG_DOUBLE_IS_DOUBLE 0) (cl:export '__DARWIN_LONG_DOUBLE_IS_DOUBLE) (cffi:defcunion __mbstate_t (__mbstate8 :pointer) (_mbstateL :long-long)) (cl:export '__mbstate_t) (cl:export '__mbstate8) (cl:export '_mbstateL) (cl:defconstant __PTHREAD_SIZE__ 596) (cl:export '__PTHREAD_SIZE__) (cl:defconstant __PTHREAD_ATTR_SIZE__ 36) (cl:export '__PTHREAD_ATTR_SIZE__) (cl:defconstant __PTHREAD_MUTEXATTR_SIZE__ 8) (cl:export '__PTHREAD_MUTEXATTR_SIZE__) (cl:defconstant __PTHREAD_MUTEX_SIZE__ 40) (cl:export '__PTHREAD_MUTEX_SIZE__) (cl:defconstant __PTHREAD_CONDATTR_SIZE__ 4) (cl:export '__PTHREAD_CONDATTR_SIZE__) (cl:defconstant __PTHREAD_COND_SIZE__ 24) (cl:export '__PTHREAD_COND_SIZE__) (cl:defconstant __PTHREAD_ONCE_SIZE__ 4) (cl:export '__PTHREAD_ONCE_SIZE__) (cl:defconstant __PTHREAD_RWLOCK_SIZE__ 124) (cl:export '__PTHREAD_RWLOCK_SIZE__) (cl:defconstant __PTHREAD_RWLOCKATTR_SIZE__ 12) (cl:export '__PTHREAD_RWLOCKATTR_SIZE__) (cffi:defcstruct __darwin_pthread_handler_rec (__routine :pointer) (__arg :pointer) (__next :pointer)) (cl:export '__darwin_pthread_handler_rec) (cl:export '__routine) (cl:export '__arg) (cl:export '__next) (cffi:defcstruct _opaque_pthread_attr_t (__sig :long) (__opaque :pointer)) (cl:export '_opaque_pthread_attr_t) (cl:export '__sig) (cl:export '__opaque) (cffi:defcstruct _opaque_pthread_cond_t (__sig :long) (__opaque :pointer)) (cl:export '_opaque_pthread_cond_t) (cl:export '__sig) (cl:export '__opaque) (cffi:defcstruct _opaque_pthread_condattr_t (__sig :long) (__opaque :pointer)) (cl:export '_opaque_pthread_condattr_t) (cl:export '__sig) (cl:export '__opaque) (cffi:defcstruct _opaque_pthread_mutex_t (__sig :long) (__opaque :pointer)) (cl:export '_opaque_pthread_mutex_t) (cl:export '__sig) (cl:export '__opaque) (cffi:defcstruct _opaque_pthread_mutexattr_t (__sig :long) (__opaque :pointer)) (cl:export '_opaque_pthread_mutexattr_t) (cl:export '__sig) (cl:export '__opaque) (cffi:defcstruct _opaque_pthread_once_t (__sig :long) (__opaque :pointer)) (cl:export '_opaque_pthread_once_t) (cl:export '__sig) (cl:export '__opaque) (cffi:defcstruct _opaque_pthread_rwlock_t (__sig :long) (__opaque :pointer)) (cl:export '_opaque_pthread_rwlock_t) (cl:export '__sig) (cl:export '__opaque) (cffi:defcstruct _opaque_pthread_rwlockattr_t (__sig :long) (__opaque :pointer)) (cl:export '_opaque_pthread_rwlockattr_t) (cl:export '__sig) (cl:export '__opaque) (cffi:defcstruct _opaque_pthread_t (__sig :long) (__cleanup_stack :pointer) (__opaque :pointer)) (cl:export '_opaque_pthread_t) (cl:export '__sig) (cl:export '__cleanup_stack) (cl:export '__opaque) (cffi:defcstruct sigaltstack (ss_sp :pointer) (ss_size :unsigned-long) (ss_flags :int)) (cl:export 'sigaltstack) (cl:export 'ss_sp) (cl:export 'ss_size) (cl:export 'ss_flags) (cffi:defcstruct ucontext (uc_onstack :int) (uc_sigmask :unsigned-int) (uc_stack sigaltstack) (uc_link :pointer) (uc_mcsize :unsigned-long) (uc_mcontext :pointer)) (cl:export 'ucontext) (cl:export 'uc_onstack) (cl:export 'uc_sigmask) (cl:export 'uc_stack) (cl:export 'uc_link) (cl:export 'uc_mcsize) (cl:export 'uc_mcontext) (cffi:defcstruct ucontext64 (uc_onstack :int) (uc_sigmask :unsigned-int) (uc_stack sigaltstack) (uc_link :pointer) (uc_mcsize :unsigned-long) (uc_mcontext64 :pointer)) (cl:export 'ucontext64) (cl:export 'uc_onstack) (cl:export 'uc_sigmask) (cl:export 'uc_stack) (cl:export 'uc_link) (cl:export 'uc_mcsize) (cl:export 'uc_mcontext64) (cl:defconstant __DARWIN_WCHAR_MAX #x7fffffff) (cl:export '__DARWIN_WCHAR_MAX) (cl:defconstant __DARWIN_WCHAR_MIN (cl:- #x7fffffff 1)) (cl:export '__DARWIN_WCHAR_MIN) (cffi:defcstruct DBusError (name :string) (message :string) (dummy1 :unsigned-int) (dummy2 :unsigned-int) (dummy3 :unsigned-int) (dummy4 :unsigned-int) (dummy5 :unsigned-int) (padding1 :pointer)) (cl:export 'DBusError) (cl:export 'name) (cl:export 'message) (cl:export 'dummy1) (cl:export 'dummy2) (cl:export 'dummy3) (cl:export 'dummy4) (cl:export 'dummy5) (cl:export 'padding1) (cffi:defcfun ("dbus_error_init" dbus_error_init) :void (error :pointer)) (cl:export 'dbus_error_init) (cffi:defcfun ("dbus_error_free" dbus_error_free) :void (error :pointer)) (cl:export 'dbus_error_free) (cffi:defcfun ("dbus_set_error" dbus_set_error) :void (error :pointer) (name :string) (message :string) &rest) (cl:export 'dbus_set_error) (cffi:defcfun ("dbus_set_error_const" dbus_set_error_const) :void (error :pointer) (name :string) (message :string)) (cl:export 'dbus_set_error_const) (cffi:defcfun ("dbus_move_error" dbus_move_error) :void (src :pointer) (dest :pointer)) (cl:export 'dbus_move_error) (cffi:defcfun ("dbus_error_has_name" dbus_error_has_name) :unsigned-int (error :pointer) (name :string)) (cl:export 'dbus_error_has_name) (cffi:defcfun ("dbus_error_is_set" dbus_error_is_set) :unsigned-int (error :pointer)) (cl:export 'dbus_error_is_set) (cffi:defcfun ("dbus_parse_address" dbus_parse_address) :unsigned-int (address :string) (entry :pointer) (array_len :pointer) (error :pointer)) (cl:export 'dbus_parse_address) (cffi:defcfun ("dbus_address_entry_get_value" dbus_address_entry_get_value) :string (entry :pointer) (key :string)) (cl:export 'dbus_address_entry_get_value) (cffi:defcfun ("dbus_address_entry_get_method" dbus_address_entry_get_method) :string (entry :pointer)) (cl:export 'dbus_address_entry_get_method) (cffi:defcfun ("dbus_address_entries_free" dbus_address_entries_free) :void (entries :pointer)) (cl:export 'dbus_address_entries_free) (cffi:defcfun ("dbus_address_escape_value" dbus_address_escape_value) :string (value :string)) (cl:export 'dbus_address_escape_value) (cffi:defcfun ("dbus_address_unescape_value" dbus_address_unescape_value) :string (value :string) (error :pointer)) (cl:export 'dbus_address_unescape_value) (cffi:defcfun ("dbus_malloc" dbus_malloc) :pointer (bytes :unsigned-long)) (cl:export 'dbus_malloc) (cffi:defcfun ("dbus_malloc0" dbus_malloc0) :pointer (bytes :unsigned-long)) (cl:export 'dbus_malloc0) (cffi:defcfun ("dbus_realloc" dbus_realloc) :pointer (memory :pointer) (bytes :unsigned-long)) (cl:export 'dbus_realloc) (cffi:defcfun ("dbus_free" dbus_free) :void (memory :pointer)) (cl:export 'dbus_free) (cffi:defcfun ("dbus_free_string_array" dbus_free_string_array) :void (str_array :pointer)) (cl:export 'dbus_free_string_array) (cffi:defcfun ("dbus_shutdown" dbus_shutdown) :void) (cl:export 'dbus_shutdown) (cffi:defcstruct DBusMessageIter (dummy1 :pointer) (dummy2 :pointer) (dummy3 :unsigned-int) (dummy4 :int) (dummy5 :int) (dummy6 :int) (dummy7 :int) (dummy8 :int) (dummy9 :int) (dummy10 :int) (dummy11 :int) (pad1 :int) (pad2 :int) (pad3 :pointer)) (cl:export 'DBusMessageIter) (cl:export 'dummy1) (cl:export 'dummy2) (cl:export 'dummy3) (cl:export 'dummy4) (cl:export 'dummy5) (cl:export 'dummy6) (cl:export 'dummy7) (cl:export 'dummy8) (cl:export 'dummy9) (cl:export 'dummy10) (cl:export 'dummy11) (cl:export 'pad1) (cl:export 'pad2) (cl:export 'pad3) (cffi:defcfun ("dbus_message_new" dbus_message_new) :pointer (message_type :int)) (cl:export 'dbus_message_new) (cffi:defcfun ("dbus_message_new_method_call" dbus_message_new_method_call) :pointer (bus_name :string) (path :string) (interface :string) (method :string)) (cl:export 'dbus_message_new_method_call) (cffi:defcfun ("dbus_message_new_method_return" dbus_message_new_method_return) :pointer (method_call :pointer)) (cl:export 'dbus_message_new_method_return) (cffi:defcfun ("dbus_message_new_signal" dbus_message_new_signal) :pointer (path :string) (interface :string) (name :string)) (cl:export 'dbus_message_new_signal) (cffi:defcfun ("dbus_message_new_error" dbus_message_new_error) :pointer (reply_to :pointer) (error_name :string) (error_message :string)) (cl:export 'dbus_message_new_error) (cffi:defcfun ("dbus_message_new_error_printf" dbus_message_new_error_printf) :pointer (reply_to :pointer) (error_name :string) (error_format :string) &rest) (cl:export 'dbus_message_new_error_printf) (cffi:defcfun ("dbus_message_copy" dbus_message_copy) :pointer (message :pointer)) (cl:export 'dbus_message_copy) (cffi:defcfun ("dbus_message_ref" dbus_message_ref) :pointer (message :pointer)) (cl:export 'dbus_message_ref) (cffi:defcfun ("dbus_message_unref" dbus_message_unref) :void (message :pointer)) (cl:export 'dbus_message_unref) (cffi:defcfun ("dbus_message_get_type" dbus_message_get_type) :int (message :pointer)) (cl:export 'dbus_message_get_type) (cffi:defcfun ("dbus_message_set_path" dbus_message_set_path) :unsigned-int (message :pointer) (object_path :string)) (cl:export 'dbus_message_set_path) (cffi:defcfun ("dbus_message_get_path" dbus_message_get_path) :string (message :pointer)) (cl:export 'dbus_message_get_path) (cffi:defcfun ("dbus_message_has_path" dbus_message_has_path) :unsigned-int (message :pointer) (object_path :string)) (cl:export 'dbus_message_has_path) (cffi:defcfun ("dbus_message_set_interface" dbus_message_set_interface) :unsigned-int (message :pointer) (interface :string)) (cl:export 'dbus_message_set_interface) (cffi:defcfun ("dbus_message_get_interface" dbus_message_get_interface) :string (message :pointer)) (cl:export 'dbus_message_get_interface) (cffi:defcfun ("dbus_message_has_interface" dbus_message_has_interface) :unsigned-int (message :pointer) (interface :string)) (cl:export 'dbus_message_has_interface) (cffi:defcfun ("dbus_message_set_member" dbus_message_set_member) :unsigned-int (message :pointer) (member :string)) (cl:export 'dbus_message_set_member) (cffi:defcfun ("dbus_message_get_member" dbus_message_get_member) :string (message :pointer)) (cl:export 'dbus_message_get_member) (cffi:defcfun ("dbus_message_has_member" dbus_message_has_member) :unsigned-int (message :pointer) (member :string)) (cl:export 'dbus_message_has_member) (cffi:defcfun ("dbus_message_set_error_name" dbus_message_set_error_name) :unsigned-int (message :pointer) (name :string)) (cl:export 'dbus_message_set_error_name) (cffi:defcfun ("dbus_message_get_error_name" dbus_message_get_error_name) :string (message :pointer)) (cl:export 'dbus_message_get_error_name) (cffi:defcfun ("dbus_message_set_destination" dbus_message_set_destination) :unsigned-int (message :pointer) (destination :string)) (cl:export 'dbus_message_set_destination) (cffi:defcfun ("dbus_message_get_destination" dbus_message_get_destination) :string (message :pointer)) (cl:export 'dbus_message_get_destination) (cffi:defcfun ("dbus_message_set_sender" dbus_message_set_sender) :unsigned-int (message :pointer) (sender :string)) (cl:export 'dbus_message_set_sender) (cffi:defcfun ("dbus_message_get_sender" dbus_message_get_sender) :string (message :pointer)) (cl:export 'dbus_message_get_sender) (cffi:defcfun ("dbus_message_get_signature" dbus_message_get_signature) :string (message :pointer)) (cl:export 'dbus_message_get_signature) (cffi:defcfun ("dbus_message_set_no_reply" dbus_message_set_no_reply) :void (message :pointer) (no_reply :unsigned-int)) (cl:export 'dbus_message_set_no_reply) (cffi:defcfun ("dbus_message_get_no_reply" dbus_message_get_no_reply) :unsigned-int (message :pointer)) (cl:export 'dbus_message_get_no_reply) (cffi:defcfun ("dbus_message_is_method_call" dbus_message_is_method_call) :unsigned-int (message :pointer) (interface :string) (method :string)) (cl:export 'dbus_message_is_method_call) (cffi:defcfun ("dbus_message_is_signal" dbus_message_is_signal) :unsigned-int (message :pointer) (interface :string) (signal_name :string)) (cl:export 'dbus_message_is_signal) (cffi:defcfun ("dbus_message_is_error" dbus_message_is_error) :unsigned-int (message :pointer) (error_name :string)) (cl:export 'dbus_message_is_error) (cffi:defcfun ("dbus_message_has_destination" dbus_message_has_destination) :unsigned-int (message :pointer) (bus_name :string)) (cl:export 'dbus_message_has_destination) (cffi:defcfun ("dbus_message_has_sender" dbus_message_has_sender) :unsigned-int (message :pointer) (unique_bus_name :string)) (cl:export 'dbus_message_has_sender) (cffi:defcfun ("dbus_message_has_signature" dbus_message_has_signature) :unsigned-int (message :pointer) (signature :string)) (cl:export 'dbus_message_has_signature) (cffi:defcfun ("dbus_message_get_serial" dbus_message_get_serial) :unsigned-int (message :pointer)) (cl:export 'dbus_message_get_serial) (cffi:defcfun ("dbus_message_set_reply_serial" dbus_message_set_reply_serial) :unsigned-int (message :pointer) (reply_serial :unsigned-int)) (cl:export 'dbus_message_set_reply_serial) (cffi:defcfun ("dbus_message_get_reply_serial" dbus_message_get_reply_serial) :unsigned-int (message :pointer)) (cl:export 'dbus_message_get_reply_serial) (cffi:defcfun ("dbus_message_set_auto_start" dbus_message_set_auto_start) :void (message :pointer) (auto_start :unsigned-int)) (cl:export 'dbus_message_set_auto_start) (cffi:defcfun ("dbus_message_get_auto_start" dbus_message_get_auto_start) :unsigned-int (message :pointer)) (cl:export 'dbus_message_get_auto_start) (cffi:defcfun ("dbus_message_get_path_decomposed" dbus_message_get_path_decomposed) :unsigned-int (message :pointer) (path :pointer)) (cl:export 'dbus_message_get_path_decomposed) (cffi:defcfun ("dbus_message_append_args" dbus_message_append_args) :unsigned-int (message :pointer) (first_arg_type :int) &rest) (cl:export 'dbus_message_append_args) (cffi:defcfun ("dbus_message_append_args_valist" dbus_message_append_args_valist) :unsigned-int (message :pointer) (first_arg_type :int) (var_args :pointer)) (cl:export 'dbus_message_append_args_valist) (cffi:defcfun ("dbus_message_get_args" dbus_message_get_args) :unsigned-int (message :pointer) (error :pointer) (first_arg_type :int) &rest) (cl:export 'dbus_message_get_args) (cffi:defcfun ("dbus_message_get_args_valist" dbus_message_get_args_valist) :unsigned-int (message :pointer) (error :pointer) (first_arg_type :int) (var_args :pointer)) (cl:export 'dbus_message_get_args_valist) (cffi:defcfun ("dbus_message_iter_init" dbus_message_iter_init) :unsigned-int (message :pointer) (iter :pointer)) (cl:export 'dbus_message_iter_init) (cffi:defcfun ("dbus_message_iter_has_next" dbus_message_iter_has_next) :unsigned-int (iter :pointer)) (cl:export 'dbus_message_iter_has_next) (cffi:defcfun ("dbus_message_iter_next" dbus_message_iter_next) :unsigned-int (iter :pointer)) (cl:export 'dbus_message_iter_next) (cffi:defcfun ("dbus_message_iter_get_signature" dbus_message_iter_get_signature) :string (iter :pointer)) (cl:export 'dbus_message_iter_get_signature) (cffi:defcfun ("dbus_message_iter_get_arg_type" dbus_message_iter_get_arg_type) :int (iter :pointer)) (cl:export 'dbus_message_iter_get_arg_type) (cffi:defcfun ("dbus_message_iter_get_element_type" dbus_message_iter_get_element_type) :int (iter :pointer)) (cl:export 'dbus_message_iter_get_element_type) (cffi:defcfun ("dbus_message_iter_recurse" dbus_message_iter_recurse) :void (iter :pointer) (sub :pointer)) (cl:export 'dbus_message_iter_recurse) (cffi:defcfun ("dbus_message_iter_get_basic" dbus_message_iter_get_basic) :void (iter :pointer) (value :pointer)) (cl:export 'dbus_message_iter_get_basic) (cffi:defcfun ("dbus_message_iter_get_array_len" dbus_message_iter_get_array_len) :int (iter :pointer)) (cl:export 'dbus_message_iter_get_array_len) (cffi:defcfun ("dbus_message_iter_get_fixed_array" dbus_message_iter_get_fixed_array) :void (iter :pointer) (value :pointer) (n_elements :pointer)) (cl:export 'dbus_message_iter_get_fixed_array) (cffi:defcfun ("dbus_message_iter_init_append" dbus_message_iter_init_append) :void (message :pointer) (iter :pointer)) (cl:export 'dbus_message_iter_init_append) (cffi:defcfun ("dbus_message_iter_append_basic" dbus_message_iter_append_basic) :unsigned-int (iter :pointer) (type :int) (value :pointer)) (cl:export 'dbus_message_iter_append_basic) (cffi:defcfun ("dbus_message_iter_append_fixed_array" dbus_message_iter_append_fixed_array) :unsigned-int (iter :pointer) (element_type :int) (value :pointer) (n_elements :int)) (cl:export 'dbus_message_iter_append_fixed_array) (cffi:defcfun ("dbus_message_iter_open_container" dbus_message_iter_open_container) :unsigned-int (iter :pointer) (type :int) (contained_signature :string) (sub :pointer)) (cl:export 'dbus_message_iter_open_container) (cffi:defcfun ("dbus_message_iter_close_container" dbus_message_iter_close_container) :unsigned-int (iter :pointer) (sub :pointer)) (cl:export 'dbus_message_iter_close_container) (cffi:defcfun ("dbus_set_error_from_message" dbus_set_error_from_message) :unsigned-int (error :pointer) (message :pointer)) (cl:export 'dbus_set_error_from_message) (cffi:defcfun ("dbus_message_allocate_data_slot" dbus_message_allocate_data_slot) :unsigned-int (slot_p :pointer)) (cl:export 'dbus_message_allocate_data_slot) (cffi:defcfun ("dbus_message_free_data_slot" dbus_message_free_data_slot) :void (slot_p :pointer)) (cl:export 'dbus_message_free_data_slot) (cffi:defcfun ("dbus_message_set_data" dbus_message_set_data) :unsigned-int (message :pointer) (slot :int) (data :pointer) (free_data_func :pointer)) (cl:export 'dbus_message_set_data) (cffi:defcfun ("dbus_message_get_data" dbus_message_get_data) :pointer (message :pointer) (slot :int)) (cl:export 'dbus_message_get_data) (cffi:defcfun ("dbus_message_type_from_string" dbus_message_type_from_string) :int (type_str :string)) (cl:export 'dbus_message_type_from_string) (cffi:defcfun ("dbus_message_type_to_string" dbus_message_type_to_string) :string (type :int)) (cl:export 'dbus_message_type_to_string) (cffi:defcenum DBusBusType :DBUS_BUS_SESSION :DBUS_BUS_SYSTEM :DBUS_BUS_STARTER) (cl:export 'DBusBusType) (cffi:defcenum DBusHandlerResult :DBUS_HANDLER_RESULT_HANDLED :DBUS_HANDLER_RESULT_NOT_YET_HANDLED :DBUS_HANDLER_RESULT_NEED_MEMORY) (cl:export 'DBusHandlerResult) (cl:defconstant DBUS_SERVICE_DBUS "org.freedesktop.DBus") (cl:export 'DBUS_SERVICE_DBUS) (cl:defconstant DBUS_PATH_DBUS "org/freedesktop/DBus") (cl:export 'DBUS_PATH_DBUS) (cl:defconstant DBUS_PATH_LOCAL "org/freedesktop/DBus/Local") (cl:export 'DBUS_PATH_LOCAL) (cl:defconstant DBUS_INTERFACE_DBUS "org.freedesktop.DBus") (cl:export 'DBUS_INTERFACE_DBUS) (cl:defconstant DBUS_INTERFACE_INTROSPECTABLE "org.freedesktop.DBus.Introspectable") (cl:export 'DBUS_INTERFACE_INTROSPECTABLE) (cl:defconstant DBUS_INTERFACE_PROPERTIES "org.freedesktop.DBus.Properties") (cl:export 'DBUS_INTERFACE_PROPERTIES) (cl:defconstant DBUS_INTERFACE_PEER "org.freedesktop.DBus.Peer") (cl:export 'DBUS_INTERFACE_PEER) (cl:defconstant DBUS_INTERFACE_LOCAL "org.freedesktop.DBus.Local") (cl:export 'DBUS_INTERFACE_LOCAL) (cl:defconstant DBUS_NAME_FLAG_ALLOW_REPLACEMENT #x1) (cl:export 'DBUS_NAME_FLAG_ALLOW_REPLACEMENT) (cl:defconstant DBUS_NAME_FLAG_REPLACE_EXISTING #x2) (cl:export 'DBUS_NAME_FLAG_REPLACE_EXISTING) (cl:defconstant DBUS_NAME_FLAG_DO_NOT_QUEUE #x4) (cl:export 'DBUS_NAME_FLAG_DO_NOT_QUEUE) (cl:defconstant DBUS_REQUEST_NAME_REPLY_PRIMARY_OWNER 1) (cl:export 'DBUS_REQUEST_NAME_REPLY_PRIMARY_OWNER) (cl:defconstant DBUS_REQUEST_NAME_REPLY_IN_QUEUE 2) (cl:export 'DBUS_REQUEST_NAME_REPLY_IN_QUEUE) (cl:defconstant DBUS_REQUEST_NAME_REPLY_EXISTS 3) (cl:export 'DBUS_REQUEST_NAME_REPLY_EXISTS) (cl:defconstant DBUS_REQUEST_NAME_REPLY_ALREADY_OWNER 4) (cl:export 'DBUS_REQUEST_NAME_REPLY_ALREADY_OWNER) (cl:defconstant DBUS_RELEASE_NAME_REPLY_RELEASED 1) (cl:export 'DBUS_RELEASE_NAME_REPLY_RELEASED) (cl:defconstant DBUS_RELEASE_NAME_REPLY_NON_EXISTENT 2) (cl:export 'DBUS_RELEASE_NAME_REPLY_NON_EXISTENT) (cl:defconstant DBUS_RELEASE_NAME_REPLY_NOT_OWNER 3) (cl:export 'DBUS_RELEASE_NAME_REPLY_NOT_OWNER) (cl:defconstant DBUS_START_REPLY_SUCCESS 1) (cl:export 'DBUS_START_REPLY_SUCCESS) (cl:defconstant DBUS_START_REPLY_ALREADY_RUNNING 2) (cl:export 'DBUS_START_REPLY_ALREADY_RUNNING) (cffi:defcenum DBusWatchFlags (:DBUS_WATCH_READABLE 1) (:DBUS_WATCH_WRITABLE 2) (:DBUS_WATCH_ERROR 4) (:DBUS_WATCH_HANGUP 8)) (cl:export 'DBusWatchFlags) (cffi:defcenum DBusDispatchStatus :DBUS_DISPATCH_DATA_REMAINS :DBUS_DISPATCH_COMPLETE :DBUS_DISPATCH_NEED_MEMORY) (cl:export 'DBusDispatchStatus) (cffi:defcfun ("dbus_connection_open" dbus_connection_open) :pointer (address :string) (error :pointer)) (cl:export 'dbus_connection_open) (cffi:defcfun ("dbus_connection_open_private" dbus_connection_open_private) :pointer (address :string) (error :pointer)) (cl:export 'dbus_connection_open_private) (cffi:defcfun ("dbus_connection_ref" dbus_connection_ref) :pointer (connection :pointer)) (cl:export 'dbus_connection_ref) (cffi:defcfun ("dbus_connection_unref" dbus_connection_unref) :void (connection :pointer)) (cl:export 'dbus_connection_unref) (cffi:defcfun ("dbus_connection_close" dbus_connection_close) :void (connection :pointer)) (cl:export 'dbus_connection_close) (cffi:defcfun ("dbus_connection_get_is_connected" dbus_connection_get_is_connected) :unsigned-int (connection :pointer)) (cl:export 'dbus_connection_get_is_connected) (cffi:defcfun ("dbus_connection_get_is_authenticated" dbus_connection_get_is_authenticated) :unsigned-int (connection :pointer)) (cl:export 'dbus_connection_get_is_authenticated) (cffi:defcfun ("dbus_connection_set_exit_on_disconnect" dbus_connection_set_exit_on_disconnect) :void (connection :pointer) (exit_on_disconnect :unsigned-int)) (cl:export 'dbus_connection_set_exit_on_disconnect) (cffi:defcfun ("dbus_connection_flush" dbus_connection_flush) :void (connection :pointer)) (cl:export 'dbus_connection_flush) (cffi:defcfun ("dbus_connection_read_write_dispatch" dbus_connection_read_write_dispatch) :unsigned-int (connection :pointer) (timeout_milliseconds :int)) (cl:export 'dbus_connection_read_write_dispatch) (cffi:defcfun ("dbus_connection_read_write" dbus_connection_read_write) :unsigned-int (connection :pointer) (timeout_milliseconds :int)) (cl:export 'dbus_connection_read_write) (cffi:defcfun ("dbus_connection_borrow_message" dbus_connection_borrow_message) :pointer (connection :pointer)) (cl:export 'dbus_connection_borrow_message) (cffi:defcfun ("dbus_connection_return_message" dbus_connection_return_message) :void (connection :pointer) (message :pointer)) (cl:export 'dbus_connection_return_message) (cffi:defcfun ("dbus_connection_steal_borrowed_message" dbus_connection_steal_borrowed_message) :void (connection :pointer) (message :pointer)) (cl:export 'dbus_connection_steal_borrowed_message) (cffi:defcfun ("dbus_connection_pop_message" dbus_connection_pop_message) :pointer (connection :pointer)) (cl:export 'dbus_connection_pop_message) (cffi:defcfun ("dbus_connection_get_dispatch_status" dbus_connection_get_dispatch_status) DBusDispatchStatus (connection :pointer)) (cl:export 'dbus_connection_get_dispatch_status) (cffi:defcfun ("dbus_connection_dispatch" dbus_connection_dispatch) DBusDispatchStatus (connection :pointer)) (cl:export 'dbus_connection_dispatch) (cffi:defcfun ("dbus_connection_has_messages_to_send" dbus_connection_has_messages_to_send) :unsigned-int (connection :pointer)) (cl:export 'dbus_connection_has_messages_to_send) (cffi:defcfun ("dbus_connection_send" dbus_connection_send) :unsigned-int (connection :pointer) (message :pointer) (client_serial :pointer)) (cl:export 'dbus_connection_send) (cffi:defcfun ("dbus_connection_send_with_reply" dbus_connection_send_with_reply) :unsigned-int (connection :pointer) (message :pointer) (pending_return :pointer) (timeout_milliseconds :int)) (cl:export 'dbus_connection_send_with_reply) (cffi:defcfun ("dbus_connection_send_with_reply_and_block" dbus_connection_send_with_reply_and_block) :pointer (connection :pointer) (message :pointer) (timeout_milliseconds :int) (error :pointer)) (cl:export 'dbus_connection_send_with_reply_and_block) (cffi:defcfun ("dbus_connection_set_watch_functions" dbus_connection_set_watch_functions) :unsigned-int (connection :pointer) (add_function :pointer) (remove_function :pointer) (toggled_function :pointer) (data :pointer) (free_data_function :pointer)) (cl:export 'dbus_connection_set_watch_functions) (cffi:defcfun ("dbus_connection_set_timeout_functions" dbus_connection_set_timeout_functions) :unsigned-int (connection :pointer) (add_function :pointer) (remove_function :pointer) (toggled_function :pointer) (data :pointer) (free_data_function :pointer)) (cl:export 'dbus_connection_set_timeout_functions) (cffi:defcfun ("dbus_connection_set_wakeup_main_function" dbus_connection_set_wakeup_main_function) :void (connection :pointer) (wakeup_main_function :pointer) (data :pointer) (free_data_function :pointer)) (cl:export 'dbus_connection_set_wakeup_main_function) (cffi:defcfun ("dbus_connection_set_dispatch_status_function" dbus_connection_set_dispatch_status_function) :void (connection :pointer) (function :pointer) (data :pointer) (free_data_function :pointer)) (cl:export 'dbus_connection_set_dispatch_status_function) (cffi:defcfun ("dbus_connection_get_unix_user" dbus_connection_get_unix_user) :unsigned-int (connection :pointer) (uid :pointer)) (cl:export 'dbus_connection_get_unix_user) (cffi:defcfun ("dbus_connection_get_unix_process_id" dbus_connection_get_unix_process_id) :unsigned-int (connection :pointer) (pid :pointer)) (cl:export 'dbus_connection_get_unix_process_id) (cffi:defcfun ("dbus_connection_set_unix_user_function" dbus_connection_set_unix_user_function) :void (connection :pointer) (function :pointer) (data :pointer) (free_data_function :pointer)) (cl:export 'dbus_connection_set_unix_user_function) (cffi:defcfun ("dbus_connection_set_route_peer_messages" dbus_connection_set_route_peer_messages) :void (connection :pointer) (value :unsigned-int)) (cl:export 'dbus_connection_set_route_peer_messages) (cffi:defcfun ("dbus_connection_add_filter" dbus_connection_add_filter) :unsigned-int (connection :pointer) (function :pointer) (user_data :pointer) (free_data_function :pointer)) (cl:export 'dbus_connection_add_filter) (cffi:defcfun ("dbus_connection_remove_filter" dbus_connection_remove_filter) :void (connection :pointer) (function :pointer) (user_data :pointer)) (cl:export 'dbus_connection_remove_filter) (cffi:defcfun ("dbus_connection_allocate_data_slot" dbus_connection_allocate_data_slot) :unsigned-int (slot_p :pointer)) (cl:export 'dbus_connection_allocate_data_slot) (cffi:defcfun ("dbus_connection_free_data_slot" dbus_connection_free_data_slot) :void (slot_p :pointer)) (cl:export 'dbus_connection_free_data_slot) (cffi:defcfun ("dbus_connection_set_data" dbus_connection_set_data) :unsigned-int (connection :pointer) (slot :int) (data :pointer) (free_data_func :pointer)) (cl:export 'dbus_connection_set_data) (cffi:defcfun ("dbus_connection_get_data" dbus_connection_get_data) :pointer (connection :pointer) (slot :int)) (cl:export 'dbus_connection_get_data) (cffi:defcfun ("dbus_connection_set_change_sigpipe" dbus_connection_set_change_sigpipe) :void (will_modify_sigpipe :unsigned-int)) (cl:export 'dbus_connection_set_change_sigpipe) (cffi:defcfun ("dbus_connection_set_max_message_size" dbus_connection_set_max_message_size) :void (connection :pointer) (size :long)) (cl:export 'dbus_connection_set_max_message_size) (cffi:defcfun ("dbus_connection_get_max_message_size" dbus_connection_get_max_message_size) :long (connection :pointer)) (cl:export 'dbus_connection_get_max_message_size) (cffi:defcfun ("dbus_connection_set_max_received_size" dbus_connection_set_max_received_size) :void (connection :pointer) (size :long)) (cl:export 'dbus_connection_set_max_received_size) (cffi:defcfun ("dbus_connection_get_max_received_size" dbus_connection_get_max_received_size) :long (connection :pointer)) (cl:export 'dbus_connection_get_max_received_size) (cffi:defcfun ("dbus_connection_get_outgoing_size" dbus_connection_get_outgoing_size) :long (connection :pointer)) (cl:export 'dbus_connection_get_outgoing_size) (cffi:defcfun ("dbus_connection_preallocate_send" dbus_connection_preallocate_send) :pointer (connection :pointer)) (cl:export 'dbus_connection_preallocate_send) (cffi:defcfun ("dbus_connection_free_preallocated_send" dbus_connection_free_preallocated_send) :void (connection :pointer) (preallocated :pointer)) (cl:export 'dbus_connection_free_preallocated_send) (cffi:defcfun ("dbus_connection_send_preallocated" dbus_connection_send_preallocated) :void (connection :pointer) (preallocated :pointer) (message :pointer) (client_serial :pointer)) (cl:export 'dbus_connection_send_preallocated) (cffi:defcstruct DBusObjectPathVTable (unregister_function :pointer) (message_function :pointer) (dbus_internal_pad1 :pointer) (dbus_internal_pad2 :pointer) (dbus_internal_pad3 :pointer) (dbus_internal_pad4 :pointer)) (cl:export 'DBusObjectPathVTable) (cl:export 'unregister_function) (cl:export 'message_function) (cl:export 'dbus_internal_pad1) (cl:export 'dbus_internal_pad2) (cl:export 'dbus_internal_pad3) (cl:export 'dbus_internal_pad4) (cffi:defcfun ("dbus_connection_register_object_path" dbus_connection_register_object_path) :unsigned-int (connection :pointer) (path :string) (vtable :pointer) (user_data :pointer)) (cl:export 'dbus_connection_register_object_path) (cffi:defcfun ("dbus_connection_register_fallback" dbus_connection_register_fallback) :unsigned-int (connection :pointer) (path :string) (vtable :pointer) (user_data :pointer)) (cl:export 'dbus_connection_register_fallback) (cffi:defcfun ("dbus_connection_unregister_object_path" dbus_connection_unregister_object_path) :unsigned-int (connection :pointer) (path :string)) (cl:export 'dbus_connection_unregister_object_path) (cffi:defcfun ("dbus_connection_get_object_path_data" dbus_connection_get_object_path_data) :unsigned-int (connection :pointer) (path :string) (data_p :pointer)) (cl:export 'dbus_connection_get_object_path_data) (cffi:defcfun ("dbus_connection_list_registered" dbus_connection_list_registered) :unsigned-int (connection :pointer) (parent_path :string) (child_entries :pointer)) (cl:export 'dbus_connection_list_registered) (cffi:defcfun ("dbus_connection_get_unix_fd" dbus_connection_get_unix_fd) :unsigned-int (connection :pointer) (fd :pointer)) (cl:export 'dbus_connection_get_unix_fd) (cffi:defcfun ("dbus_connection_get_socket" dbus_connection_get_socket) :unsigned-int (connection :pointer) (fd :pointer)) (cl:export 'dbus_connection_get_socket) (cffi:defcfun ("dbus_watch_get_fd" dbus_watch_get_fd) :int (watch :pointer)) (cl:export 'dbus_watch_get_fd) (cffi:defcfun ("dbus_watch_get_flags" dbus_watch_get_flags) :unsigned-int (watch :pointer)) (cl:export 'dbus_watch_get_flags) (cffi:defcfun ("dbus_watch_get_data" dbus_watch_get_data) :pointer (watch :pointer)) (cl:export 'dbus_watch_get_data) (cffi:defcfun ("dbus_watch_set_data" dbus_watch_set_data) :void (watch :pointer) (data :pointer) (free_data_function :pointer)) (cl:export 'dbus_watch_set_data) (cffi:defcfun ("dbus_watch_handle" dbus_watch_handle) :unsigned-int (watch :pointer) (flags :unsigned-int)) (cl:export 'dbus_watch_handle) (cffi:defcfun ("dbus_watch_get_enabled" dbus_watch_get_enabled) :unsigned-int (watch :pointer)) (cl:export 'dbus_watch_get_enabled) (cffi:defcfun ("dbus_timeout_get_interval" dbus_timeout_get_interval) :int (timeout :pointer)) (cl:export 'dbus_timeout_get_interval) (cffi:defcfun ("dbus_timeout_get_data" dbus_timeout_get_data) :pointer (timeout :pointer)) (cl:export 'dbus_timeout_get_data) (cffi:defcfun ("dbus_timeout_set_data" dbus_timeout_set_data) :void (timeout :pointer) (data :pointer) (free_data_function :pointer)) (cl:export 'dbus_timeout_set_data) (cffi:defcfun ("dbus_timeout_handle" dbus_timeout_handle) :unsigned-int (timeout :pointer)) (cl:export 'dbus_timeout_handle) (cffi:defcfun ("dbus_timeout_get_enabled" dbus_timeout_get_enabled) :unsigned-int (timeout :pointer)) (cl:export 'dbus_timeout_get_enabled) (cffi:defcfun ("dbus_bus_get" dbus_bus_get) :pointer (type DBusBusType) (error :pointer)) (cl:export 'dbus_bus_get) (cffi:defcfun ("dbus_bus_get_private" dbus_bus_get_private) :pointer (type DBusBusType) (error :pointer)) (cl:export 'dbus_bus_get_private) (cffi:defcfun ("dbus_bus_register" dbus_bus_register) :unsigned-int (connection :pointer) (error :pointer)) (cl:export 'dbus_bus_register) (cffi:defcfun ("dbus_bus_set_unique_name" dbus_bus_set_unique_name) :unsigned-int (connection :pointer) (unique_name :string)) (cl:export 'dbus_bus_set_unique_name) (cffi:defcfun ("dbus_bus_get_unique_name" dbus_bus_get_unique_name) :string (connection :pointer)) (cl:export 'dbus_bus_get_unique_name) (cffi:defcfun ("dbus_bus_get_unix_user" dbus_bus_get_unix_user) :unsigned-long (connection :pointer) (name :string) (error :pointer)) (cl:export 'dbus_bus_get_unix_user) (cffi:defcfun ("dbus_bus_request_name" dbus_bus_request_name) :int (connection :pointer) (name :string) (flags :unsigned-int) (error :pointer)) (cl:export 'dbus_bus_request_name) (cffi:defcfun ("dbus_bus_release_name" dbus_bus_release_name) :int (connection :pointer) (name :string) (error :pointer)) (cl:export 'dbus_bus_release_name) (cffi:defcfun ("dbus_bus_name_has_owner" dbus_bus_name_has_owner) :unsigned-int (connection :pointer) (name :string) (error :pointer)) (cl:export 'dbus_bus_name_has_owner) (cffi:defcfun ("dbus_bus_start_service_by_name" dbus_bus_start_service_by_name) :unsigned-int (connection :pointer) (name :string) (flags :unsigned-int) (reply :pointer) (error :pointer)) (cl:export 'dbus_bus_start_service_by_name) (cffi:defcfun ("dbus_bus_add_match" dbus_bus_add_match) :void (connection :pointer) (rule :string) (error :pointer)) (cl:export 'dbus_bus_add_match) (cffi:defcfun ("dbus_bus_remove_match" dbus_bus_remove_match) :void (connection :pointer) (rule :string) (error :pointer)) (cl:export 'dbus_bus_remove_match) (cffi:defcfun ("dbus_get_local_machine_id" dbus_get_local_machine_id) :string) (cl:export 'dbus_get_local_machine_id) (cffi:defcfun ("dbus_pending_call_ref" dbus_pending_call_ref) :pointer (pending :pointer)) (cl:export 'dbus_pending_call_ref) (cffi:defcfun ("dbus_pending_call_unref" dbus_pending_call_unref) :void (pending :pointer)) (cl:export 'dbus_pending_call_unref) (cffi:defcfun ("dbus_pending_call_set_notify" dbus_pending_call_set_notify) :unsigned-int (pending :pointer) (function :pointer) (user_data :pointer) (free_user_data :pointer)) (cl:export 'dbus_pending_call_set_notify) (cffi:defcfun ("dbus_pending_call_cancel" dbus_pending_call_cancel) :void (pending :pointer)) (cl:export 'dbus_pending_call_cancel) (cffi:defcfun ("dbus_pending_call_get_completed" dbus_pending_call_get_completed) :unsigned-int (pending :pointer)) (cl:export 'dbus_pending_call_get_completed) (cffi:defcfun ("dbus_pending_call_steal_reply" dbus_pending_call_steal_reply) :pointer (pending :pointer)) (cl:export 'dbus_pending_call_steal_reply) (cffi:defcfun ("dbus_pending_call_block" dbus_pending_call_block) :void (pending :pointer)) (cl:export 'dbus_pending_call_block) (cffi:defcfun ("dbus_pending_call_allocate_data_slot" dbus_pending_call_allocate_data_slot) :unsigned-int (slot_p :pointer)) (cl:export 'dbus_pending_call_allocate_data_slot) (cffi:defcfun ("dbus_pending_call_free_data_slot" dbus_pending_call_free_data_slot) :void (slot_p :pointer)) (cl:export 'dbus_pending_call_free_data_slot) (cffi:defcfun ("dbus_pending_call_set_data" dbus_pending_call_set_data) :unsigned-int (pending :pointer) (slot :int) (data :pointer) (free_data_func :pointer)) (cl:export 'dbus_pending_call_set_data) (cffi:defcfun ("dbus_pending_call_get_data" dbus_pending_call_get_data) :pointer (pending :pointer) (slot :int)) (cl:export 'dbus_pending_call_get_data) (cl:defconstant DBUS_LITTLE_ENDIAN #\0) (cl:export 'DBUS_LITTLE_ENDIAN) (cl:defconstant DBUS_BIG_ENDIAN #\) (cl:export 'DBUS_BIG_ENDIAN) (cl:defconstant DBUS_MAJOR_PROTOCOL_VERSION 1) (cl:export 'DBUS_MAJOR_PROTOCOL_VERSION) (cl:defconstant DBUS_TYPE_INVALID_AS_STRING "\0") (cl:export 'DBUS_TYPE_INVALID_AS_STRING) (cl:defconstant DBUS_TYPE_BYTE_AS_STRING "y") (cl:export 'DBUS_TYPE_BYTE_AS_STRING) (cl:defconstant DBUS_TYPE_BOOLEAN_AS_STRING "b") (cl:export 'DBUS_TYPE_BOOLEAN_AS_STRING) (cl:defconstant DBUS_TYPE_INT16_AS_STRING "n") (cl:export 'DBUS_TYPE_INT16_AS_STRING) (cl:defconstant DBUS_TYPE_UINT16_AS_STRING "q") (cl:export 'DBUS_TYPE_UINT16_AS_STRING) (cl:defconstant DBUS_TYPE_INT32_AS_STRING "i") (cl:export 'DBUS_TYPE_INT32_AS_STRING) (cl:defconstant DBUS_TYPE_UINT32_AS_STRING "u") (cl:export 'DBUS_TYPE_UINT32_AS_STRING) (cl:defconstant DBUS_TYPE_INT64_AS_STRING "x") (cl:export 'DBUS_TYPE_INT64_AS_STRING) (cl:defconstant DBUS_TYPE_UINT64_AS_STRING "t") (cl:export 'DBUS_TYPE_UINT64_AS_STRING) (cl:defconstant DBUS_TYPE_DOUBLE_AS_STRING "d") (cl:export 'DBUS_TYPE_DOUBLE_AS_STRING) (cl:defconstant DBUS_TYPE_STRING_AS_STRING "s") (cl:export 'DBUS_TYPE_STRING_AS_STRING) (cl:defconstant DBUS_TYPE_OBJECT_PATH_AS_STRING "o") (cl:export 'DBUS_TYPE_OBJECT_PATH_AS_STRING) (cl:defconstant DBUS_TYPE_SIGNATURE_AS_STRING "g") (cl:export 'DBUS_TYPE_SIGNATURE_AS_STRING) (cl:defconstant DBUS_TYPE_ARRAY_AS_STRING "a") (cl:export 'DBUS_TYPE_ARRAY_AS_STRING) (cl:defconstant DBUS_TYPE_VARIANT_AS_STRING "v") (cl:export 'DBUS_TYPE_VARIANT_AS_STRING) (cl:defconstant DBUS_TYPE_STRUCT_AS_STRING "r") (cl:export 'DBUS_TYPE_STRUCT_AS_STRING) (cl:defconstant DBUS_TYPE_DICT_ENTRY_AS_STRING "e") (cl:export 'DBUS_TYPE_DICT_ENTRY_AS_STRING) (cl:defconstant DBUS_NUMBER_OF_TYPES 16) (cl:export 'DBUS_NUMBER_OF_TYPES) (cl:defconstant DBUS_STRUCT_BEGIN_CHAR_AS_STRING "(") (cl:export 'DBUS_STRUCT_BEGIN_CHAR_AS_STRING) (cl:defconstant DBUS_STRUCT_END_CHAR_AS_STRING ")") (cl:export 'DBUS_STRUCT_END_CHAR_AS_STRING) (cl:defconstant DBUS_DICT_ENTRY_BEGIN_CHAR_AS_STRING "{") (cl:export 'DBUS_DICT_ENTRY_BEGIN_CHAR_AS_STRING) (cl:defconstant DBUS_DICT_ENTRY_END_CHAR_AS_STRING "}") (cl:export 'DBUS_DICT_ENTRY_END_CHAR_AS_STRING) (cl:defconstant DBUS_MAXIMUM_NAME_LENGTH 255) (cl:export 'DBUS_MAXIMUM_NAME_LENGTH) (cl:defconstant DBUS_MAXIMUM_SIGNATURE_LENGTH 255) (cl:export 'DBUS_MAXIMUM_SIGNATURE_LENGTH) (cl:defconstant DBUS_MAXIMUM_MATCH_RULE_LENGTH 1024) (cl:export 'DBUS_MAXIMUM_MATCH_RULE_LENGTH) (cl:defconstant DBUS_MAXIMUM_MATCH_RULE_ARG_NUMBER 63) (cl:export 'DBUS_MAXIMUM_MATCH_RULE_ARG_NUMBER) (cl:defconstant DBUS_MAXIMUM_ARRAY_LENGTH 67108864) (cl:export 'DBUS_MAXIMUM_ARRAY_LENGTH) (cl:defconstant DBUS_MAXIMUM_ARRAY_LENGTH_BITS 26) (cl:export 'DBUS_MAXIMUM_ARRAY_LENGTH_BITS) (cl:defconstant DBUS_MAXIMUM_MESSAGE_LENGTH (cl:* 67108864 2)) (cl:export 'DBUS_MAXIMUM_MESSAGE_LENGTH) (cl:defconstant DBUS_MAXIMUM_MESSAGE_LENGTH_BITS 27) (cl:export 'DBUS_MAXIMUM_MESSAGE_LENGTH_BITS) (cl:defconstant DBUS_MAXIMUM_TYPE_RECURSION_DEPTH 32) (cl:export 'DBUS_MAXIMUM_TYPE_RECURSION_DEPTH) (cl:defconstant DBUS_MESSAGE_TYPE_INVALID 0) (cl:export 'DBUS_MESSAGE_TYPE_INVALID) (cl:defconstant DBUS_MESSAGE_TYPE_METHOD_CALL 1) (cl:export 'DBUS_MESSAGE_TYPE_METHOD_CALL) (cl:defconstant DBUS_MESSAGE_TYPE_METHOD_RETURN 2) (cl:export 'DBUS_MESSAGE_TYPE_METHOD_RETURN) (cl:defconstant DBUS_MESSAGE_TYPE_ERROR 3) (cl:export 'DBUS_MESSAGE_TYPE_ERROR) (cl:defconstant DBUS_MESSAGE_TYPE_SIGNAL 4) (cl:export 'DBUS_MESSAGE_TYPE_SIGNAL) (cl:defconstant DBUS_HEADER_FLAG_NO_REPLY_EXPECTED #x1) (cl:export 'DBUS_HEADER_FLAG_NO_REPLY_EXPECTED) (cl:defconstant DBUS_HEADER_FLAG_NO_AUTO_START #x2) (cl:export 'DBUS_HEADER_FLAG_NO_AUTO_START) (cl:defconstant DBUS_HEADER_FIELD_INVALID 0) (cl:export 'DBUS_HEADER_FIELD_INVALID) (cl:defconstant DBUS_HEADER_FIELD_PATH 1) (cl:export 'DBUS_HEADER_FIELD_PATH) (cl:defconstant DBUS_HEADER_FIELD_INTERFACE 2) (cl:export 'DBUS_HEADER_FIELD_INTERFACE) (cl:defconstant DBUS_HEADER_FIELD_MEMBER 3) (cl:export 'DBUS_HEADER_FIELD_MEMBER) (cl:defconstant DBUS_HEADER_FIELD_ERROR_NAME 4) (cl:export 'DBUS_HEADER_FIELD_ERROR_NAME) (cl:defconstant DBUS_HEADER_FIELD_REPLY_SERIAL 5) (cl:export 'DBUS_HEADER_FIELD_REPLY_SERIAL) (cl:defconstant DBUS_HEADER_FIELD_DESTINATION 6) (cl:export 'DBUS_HEADER_FIELD_DESTINATION) (cl:defconstant DBUS_HEADER_FIELD_SENDER 7) (cl:export 'DBUS_HEADER_FIELD_SENDER) (cl:defconstant DBUS_HEADER_FIELD_SIGNATURE 8) (cl:export 'DBUS_HEADER_FIELD_SIGNATURE) (cl:defconstant DBUS_HEADER_FIELD_LAST 8) (cl:export 'DBUS_HEADER_FIELD_LAST) (cl:defconstant DBUS_HEADER_SIGNATURE "yyyyuua(yv)") (cl:export 'DBUS_HEADER_SIGNATURE) (cl:defconstant DBUS_MINIMUM_HEADER_SIZE 16) (cl:export 'DBUS_MINIMUM_HEADER_SIZE) (cl:defconstant DBUS_ERROR_FAILED "org.freedesktop.DBus.Error.Failed") (cl:export 'DBUS_ERROR_FAILED) (cl:defconstant DBUS_ERROR_NO_MEMORY "org.freedesktop.DBus.Error.NoMemory") (cl:export 'DBUS_ERROR_NO_MEMORY) (cl:defconstant DBUS_ERROR_SERVICE_UNKNOWN "org.freedesktop.DBus.Error.ServiceUnknown") (cl:export 'DBUS_ERROR_SERVICE_UNKNOWN) (cl:defconstant DBUS_ERROR_NAME_HAS_NO_OWNER "org.freedesktop.DBus.Error.NameHasNoOwner") (cl:export 'DBUS_ERROR_NAME_HAS_NO_OWNER) (cl:defconstant DBUS_ERROR_NO_REPLY "org.freedesktop.DBus.Error.NoReply") (cl:export 'DBUS_ERROR_NO_REPLY) (cl:defconstant DBUS_ERROR_IO_ERROR "org.freedesktop.DBus.Error.IOError") (cl:export 'DBUS_ERROR_IO_ERROR) (cl:defconstant DBUS_ERROR_BAD_ADDRESS "org.freedesktop.DBus.Error.BadAddress") (cl:export 'DBUS_ERROR_BAD_ADDRESS) (cl:defconstant DBUS_ERROR_NOT_SUPPORTED "org.freedesktop.DBus.Error.NotSupported") (cl:export 'DBUS_ERROR_NOT_SUPPORTED) (cl:defconstant DBUS_ERROR_LIMITS_EXCEEDED "org.freedesktop.DBus.Error.LimitsExceeded") (cl:export 'DBUS_ERROR_LIMITS_EXCEEDED) (cl:defconstant DBUS_ERROR_ACCESS_DENIED "org.freedesktop.DBus.Error.AccessDenied") (cl:export 'DBUS_ERROR_ACCESS_DENIED) (cl:defconstant DBUS_ERROR_AUTH_FAILED "org.freedesktop.DBus.Error.AuthFailed") (cl:export 'DBUS_ERROR_AUTH_FAILED) (cl:defconstant DBUS_ERROR_NO_SERVER "org.freedesktop.DBus.Error.NoServer") (cl:export 'DBUS_ERROR_NO_SERVER) (cl:defconstant DBUS_ERROR_TIMEOUT "org.freedesktop.DBus.Error.Timeout") (cl:export 'DBUS_ERROR_TIMEOUT) (cl:defconstant DBUS_ERROR_NO_NETWORK "org.freedesktop.DBus.Error.NoNetwork") (cl:export 'DBUS_ERROR_NO_NETWORK) (cl:defconstant DBUS_ERROR_ADDRESS_IN_USE "org.freedesktop.DBus.Error.AddressInUse") (cl:export 'DBUS_ERROR_ADDRESS_IN_USE) (cl:defconstant DBUS_ERROR_DISCONNECTED "org.freedesktop.DBus.Error.Disconnected") (cl:export 'DBUS_ERROR_DISCONNECTED) (cl:defconstant DBUS_ERROR_INVALID_ARGS "org.freedesktop.DBus.Error.InvalidArgs") (cl:export 'DBUS_ERROR_INVALID_ARGS) (cl:defconstant DBUS_ERROR_FILE_NOT_FOUND "org.freedesktop.DBus.Error.FileNotFound") (cl:export 'DBUS_ERROR_FILE_NOT_FOUND) (cl:defconstant DBUS_ERROR_FILE_EXISTS "org.freedesktop.DBus.Error.FileExists") (cl:export 'DBUS_ERROR_FILE_EXISTS) (cl:defconstant DBUS_ERROR_UNKNOWN_METHOD "org.freedesktop.DBus.Error.UnknownMethod") (cl:export 'DBUS_ERROR_UNKNOWN_METHOD) (cl:defconstant DBUS_ERROR_TIMED_OUT "org.freedesktop.DBus.Error.TimedOut") (cl:export 'DBUS_ERROR_TIMED_OUT) (cl:defconstant DBUS_ERROR_MATCH_RULE_NOT_FOUND "org.freedesktop.DBus.Error.MatchRuleNotFound") (cl:export 'DBUS_ERROR_MATCH_RULE_NOT_FOUND) (cl:defconstant DBUS_ERROR_MATCH_RULE_INVALID "org.freedesktop.DBus.Error.MatchRuleInvalid") (cl:export 'DBUS_ERROR_MATCH_RULE_INVALID) (cl:defconstant DBUS_ERROR_SPAWN_EXEC_FAILED "org.freedesktop.DBus.Error.Spawn.ExecFailed") (cl:export 'DBUS_ERROR_SPAWN_EXEC_FAILED) (cl:defconstant DBUS_ERROR_SPAWN_FORK_FAILED "org.freedesktop.DBus.Error.Spawn.ForkFailed") (cl:export 'DBUS_ERROR_SPAWN_FORK_FAILED) (cl:defconstant DBUS_ERROR_SPAWN_CHILD_EXITED "org.freedesktop.DBus.Error.Spawn.ChildExited") (cl:export 'DBUS_ERROR_SPAWN_CHILD_EXITED) (cl:defconstant DBUS_ERROR_SPAWN_CHILD_SIGNALED "org.freedesktop.DBus.Error.Spawn.ChildSignaled") (cl:export 'DBUS_ERROR_SPAWN_CHILD_SIGNALED) (cl:defconstant DBUS_ERROR_SPAWN_FAILED "org.freedesktop.DBus.Error.Spawn.Failed") (cl:export 'DBUS_ERROR_SPAWN_FAILED) (cl:defconstant DBUS_ERROR_UNIX_PROCESS_ID_UNKNOWN "org.freedesktop.DBus.Error.UnixProcessIdUnknown") (cl:export 'DBUS_ERROR_UNIX_PROCESS_ID_UNKNOWN) (cl:defconstant DBUS_ERROR_INVALID_SIGNATURE "org.freedesktop.DBus.Error.InvalidSignature") (cl:export 'DBUS_ERROR_INVALID_SIGNATURE) (cl:defconstant DBUS_ERROR_INVALID_FILE_CONTENT "org.freedesktop.DBus.Error.InvalidFileContent") (cl:export 'DBUS_ERROR_INVALID_FILE_CONTENT) (cl:defconstant DBUS_ERROR_SELINUX_SECURITY_CONTEXT_UNKNOWN "org.freedesktop.DBus.Error.SELinuxSecurityContextUnknown") (cl:export 'DBUS_ERROR_SELINUX_SECURITY_CONTEXT_UNKNOWN) (cl:defconstant DBUS_INTROSPECT_1_0_XML_NAMESPACE (cl:/ "http:" "www.freedesktop.org" "standards" "dbus")) (cl:export 'DBUS_INTROSPECT_1_0_XML_NAMESPACE) (cl:defconstant DBUS_INTROSPECT_1_0_XML_PUBLIC_IDENTIFIER (cl:/ "-" "freedesktop" (cl:- "DTD D" "BUS Object Introspection 1.0") "EN")) (cl:export 'DBUS_INTROSPECT_1_0_XML_PUBLIC_IDENTIFIER) (cl:defconstant DBUS_INTROSPECT_1_0_XML_SYSTEM_IDENTIFIER (cl:/ "http:" "www.freedesktop.org" "standards" "dbus" "1.0" "introspect.dtd")) (cl:export 'DBUS_INTROSPECT_1_0_XML_SYSTEM_IDENTIFIER) (cl:defconstant DBUS_INTROSPECT_1_0_XML_DOCTYPE_DECL_NODE (cl:/ (cl:- "\n")) (cl:export 'DBUS_INTROSPECT_1_0_XML_DOCTYPE_DECL_NODE) (cffi:defcfun ("dbus_server_listen" dbus_server_listen) :pointer (address :string) (error :pointer)) (cl:export 'dbus_server_listen) (cffi:defcfun ("dbus_server_ref" dbus_server_ref) :pointer (server :pointer)) (cl:export 'dbus_server_ref) (cffi:defcfun ("dbus_server_unref" dbus_server_unref) :void (server :pointer)) (cl:export 'dbus_server_unref) (cffi:defcfun ("dbus_server_disconnect" dbus_server_disconnect) :void (server :pointer)) (cl:export 'dbus_server_disconnect) (cffi:defcfun ("dbus_server_get_is_connected" dbus_server_get_is_connected) :unsigned-int (server :pointer)) (cl:export 'dbus_server_get_is_connected) (cffi:defcfun ("dbus_server_get_address" dbus_server_get_address) :string (server :pointer)) (cl:export 'dbus_server_get_address) (cffi:defcfun ("dbus_server_set_new_connection_function" dbus_server_set_new_connection_function) :void (server :pointer) (function :pointer) (data :pointer) (free_data_function :pointer)) (cl:export 'dbus_server_set_new_connection_function) (cffi:defcfun ("dbus_server_set_watch_functions" dbus_server_set_watch_functions) :unsigned-int (server :pointer) (add_function :pointer) (remove_function :pointer) (toggled_function :pointer) (data :pointer) (free_data_function :pointer)) (cl:export 'dbus_server_set_watch_functions) (cffi:defcfun ("dbus_server_set_timeout_functions" dbus_server_set_timeout_functions) :unsigned-int (server :pointer) (add_function :pointer) (remove_function :pointer) (toggled_function :pointer) (data :pointer) (free_data_function :pointer)) (cl:export 'dbus_server_set_timeout_functions) (cffi:defcfun ("dbus_server_set_auth_mechanisms" dbus_server_set_auth_mechanisms) :unsigned-int (server :pointer) (mechanisms :pointer)) (cl:export 'dbus_server_set_auth_mechanisms) (cffi:defcfun ("dbus_server_allocate_data_slot" dbus_server_allocate_data_slot) :unsigned-int (slot_p :pointer)) (cl:export 'dbus_server_allocate_data_slot) (cffi:defcfun ("dbus_server_free_data_slot" dbus_server_free_data_slot) :void (slot_p :pointer)) (cl:export 'dbus_server_free_data_slot) (cffi:defcfun ("dbus_server_set_data" dbus_server_set_data) :unsigned-int (server :pointer) (slot :int) (data :pointer) (free_data_func :pointer)) (cl:export 'dbus_server_set_data) (cffi:defcfun ("dbus_server_get_data" dbus_server_get_data) :pointer (server :pointer) (slot :int)) (cl:export 'dbus_server_get_data) (cffi:defcstruct DBusSignatureIter (dummy1 :pointer) (dummy2 :pointer) (dummy8 :unsigned-int) (dummy12 :int) (dummy17 :int)) (cl:export 'DBusSignatureIter) (cl:export 'dummy1) (cl:export 'dummy2) (cl:export 'dummy8) (cl:export 'dummy12) (cl:export 'dummy17) (cffi:defcfun ("dbus_signature_iter_init" dbus_signature_iter_init) :void (iter :pointer) (signature :string)) (cl:export 'dbus_signature_iter_init) (cffi:defcfun ("dbus_signature_iter_get_current_type" dbus_signature_iter_get_current_type) :int (iter :pointer)) (cl:export 'dbus_signature_iter_get_current_type) (cffi:defcfun ("dbus_signature_iter_get_signature" dbus_signature_iter_get_signature) :string (iter :pointer)) (cl:export 'dbus_signature_iter_get_signature) (cffi:defcfun ("dbus_signature_iter_get_element_type" dbus_signature_iter_get_element_type) :int (iter :pointer)) (cl:export 'dbus_signature_iter_get_element_type) (cffi:defcfun ("dbus_signature_iter_next" dbus_signature_iter_next) :unsigned-int (iter :pointer)) (cl:export 'dbus_signature_iter_next) (cffi:defcfun ("dbus_signature_iter_recurse" dbus_signature_iter_recurse) :void (iter :pointer) (subiter :pointer)) (cl:export 'dbus_signature_iter_recurse) (cffi:defcfun ("dbus_signature_validate" dbus_signature_validate) :unsigned-int (signature :string) (error :pointer)) (cl:export 'dbus_signature_validate) (cffi:defcfun ("dbus_signature_validate_single" dbus_signature_validate_single) :unsigned-int (signature :string) (error :pointer)) (cl:export 'dbus_signature_validate_single) (cffi:defcfun ("dbus_type_is_basic" dbus_type_is_basic) :unsigned-int (typecode :int)) (cl:export 'dbus_type_is_basic) (cffi:defcfun ("dbus_type_is_container" dbus_type_is_container) :unsigned-int (typecode :int)) (cl:export 'dbus_type_is_container) (cffi:defcfun ("dbus_type_is_fixed" dbus_type_is_fixed) :unsigned-int (typecode :int)) (cl:export 'dbus_type_is_fixed) (cffi:defcenum DBusThreadFunctionsMask (:DBUS_THREAD_FUNCTIONS_MUTEX_NEW_MASK (cl:ash 1 0)) (:DBUS_THREAD_FUNCTIONS_MUTEX_FREE_MASK (cl:ash 1 1)) (:DBUS_THREAD_FUNCTIONS_MUTEX_LOCK_MASK (cl:ash 1 2)) (:DBUS_THREAD_FUNCTIONS_MUTEX_UNLOCK_MASK (cl:ash 1 3)) (:DBUS_THREAD_FUNCTIONS_CONDVAR_NEW_MASK (cl:ash 1 4)) (:DBUS_THREAD_FUNCTIONS_CONDVAR_FREE_MASK (cl:ash 1 5)) (:DBUS_THREAD_FUNCTIONS_CONDVAR_WAIT_MASK (cl:ash 1 6)) (:DBUS_THREAD_FUNCTIONS_CONDVAR_WAIT_TIMEOUT_MASK (cl:ash 1 7)) (:DBUS_THREAD_FUNCTIONS_CONDVAR_WAKE_ONE_MASK (cl:ash 1 8)) (:DBUS_THREAD_FUNCTIONS_CONDVAR_WAKE_ALL_MASK (cl:ash 1 9)) (:DBUS_THREAD_FUNCTIONS_RECURSIVE_MUTEX_NEW_MASK (cl:ash 1 10)) (:DBUS_THREAD_FUNCTIONS_RECURSIVE_MUTEX_FREE_MASK (cl:ash 1 11)) (:DBUS_THREAD_FUNCTIONS_RECURSIVE_MUTEX_LOCK_MASK (cl:ash 1 12)) (:DBUS_THREAD_FUNCTIONS_RECURSIVE_MUTEX_UNLOCK_MASK (cl:ash 1 13)) (:DBUS_THREAD_FUNCTIONS_ALL_MASK (cl:- (cl:ash 1 14) 1))) (cl:export 'DBusThreadFunctionsMask) (cffi:defcstruct DBusThreadFunctions (mask :unsigned-int) (mutex_new :pointer) (mutex_free :pointer) (mutex_lock :pointer) (mutex_unlock :pointer) (condvar_new :pointer) (condvar_free :pointer) (condvar_wait :pointer) (condvar_wait_timeout :pointer) (condvar_wake_one :pointer) (condvar_wake_all :pointer) (recursive_mutex_new :pointer) (recursive_mutex_free :pointer) (recursive_mutex_lock :pointer) (recursive_mutex_unlock :pointer) (padding1 :pointer) (padding2 :pointer) (padding3 :pointer) (padding4 :pointer)) (cl:export 'DBusThreadFunctions) (cl:export 'mask) (cl:export 'mutex_new) (cl:export 'mutex_free) (cl:export 'mutex_lock) (cl:export 'mutex_unlock) (cl:export 'condvar_new) (cl:export 'condvar_free) (cl:export 'condvar_wait) (cl:export 'condvar_wait_timeout) (cl:export 'condvar_wake_one) (cl:export 'condvar_wake_all) (cl:export 'recursive_mutex_new) (cl:export 'recursive_mutex_free) (cl:export 'recursive_mutex_lock) (cl:export 'recursive_mutex_unlock) (cl:export 'padding1) (cl:export 'padding2) (cl:export 'padding3) (cl:export 'padding4) (cffi:defcfun ("dbus_threads_init" dbus_threads_init) :unsigned-int (functions :pointer)) (cl:export 'dbus_threads_init) (cffi:defcfun ("dbus_threads_init_default" dbus_threads_init_default) :unsigned-int) (cl:export 'dbus_threads_init_default)