Gecko [ 122.154.134.11 ]

Name	Size	Permission
ange-ftp.elc	116.81 KB	-rw-r--r--
browse-url.el.xdg	57.99 KB	-rw-r--r--
browse-url.elc	46.94 KB	-rw-r--r--
dbus.elc	28.38 KB	-rw-r--r--
dig.elc	5.08 KB	-rw-r--r--
dns.elc	11.33 KB	-rw-r--r--
eudc-bob.elc	9.11 KB	-rw-r--r--
eudc-export.elc	5.9 KB	-rw-r--r--
eudc-hotlist.elc	5.71 KB	-rw-r--r--
eudc-vars.elc	14.61 KB	-rw-r--r--
eudc.elc	32.17 KB	-rw-r--r--
eudcb-bbdb.elc	5.41 KB	-rw-r--r--
eudcb-ldap.elc	5.18 KB	-rw-r--r--
eudcb-mab.elc	2.88 KB	-rw-r--r--
eudcb-ph.elc	6.44 KB	-rw-r--r--
goto-addr.elc	9.28 KB	-rw-r--r--
hmac-def.elc	2.07 KB	-rw-r--r--
hmac-md5.elc	2.15 KB	-rw-r--r--
imap.elc	104.58 KB	-rw-r--r--
ldap.elc	14.29 KB	-rw-r--r--
mairix.elc	24.37 KB	-rw-r--r--
net-utils.elc	25.21 KB	-rw-r--r--
netrc.elc	4.79 KB	-rw-r--r--
newst-backend.elc	66.66 KB	-rw-r--r--
newst-plainview.elc	51.17 KB	-rw-r--r--
newst-reader.elc	28.81 KB	-rw-r--r--
newst-ticker.elc	7.82 KB	-rw-r--r--
newst-treeview.elc	67.9 KB	-rw-r--r--
newsticker.elc	1.01 KB	-rw-r--r--
ntlm.elc	12.39 KB	-rw-r--r--
quickurl.elc	16.54 KB	-rw-r--r--
rcirc.elc	89.27 KB	-rw-r--r--
rcompile.elc	3.51 KB	-rw-r--r--
rlogin.elc	10.63 KB	-rw-r--r--
sasl-cram.elc	1.25 KB	-rw-r--r--
sasl-digest.elc	3.75 KB	-rw-r--r--
sasl-ntlm.elc	1.82 KB	-rw-r--r--
sasl.elc	7.39 KB	-rw-r--r--
snmp-mode.elc	15.08 KB	-rw-r--r--
socks.elc	16.21 KB	-rw-r--r--
telnet.elc	9.03 KB	-rw-r--r--
tls.elc	8.04 KB	-rw-r--r--
tramp-cache.elc	8.96 KB	-rw-r--r--
tramp-cmds.elc	9.4 KB	-rw-r--r--
tramp-compat.elc	6 KB	-rw-r--r--
tramp-fish.elc	54.2 KB	-rw-r--r--
tramp-ftp.elc	5.33 KB	-rw-r--r--
tramp-gw.elc	13.27 KB	-rw-r--r--
tramp-smb.elc	50.78 KB	-rw-r--r--
tramp-uu.elc	1.88 KB	-rw-r--r--
tramp.elc	278.99 KB	-rw-r--r--
trampver.elc	1.06 KB	-rw-r--r--
webjump.elc	13.86 KB	-rw-r--r--
xesam.elc	24.5 KB	-rw-r--r--
zeroconf.elc	17.98 KB	-rw-r--r--

Code Editor : dbus.elc

;ELC���
;;; Compiled by mockbuild@c6b8.bsys.dev.centos.org on Thu Feb 19 13:04:30 2015
;;; from file /builddir/build/BUILD/emacs-23.1/lisp/net/dbus.el
;;; in Emacs version 23.1.1
;;; with all optimizations.

;;; This file uses dynamic docstrings, first added in Emacs 19.29.
(if (and (boundp 'emacs-version)
	 (< (aref emacs-version (1- (length emacs-version))) ?A)
	 (or (and (boundp 'epoch::version) epoch::version)
	     (string-lessp emacs-version "19.29")))
    (error "`dbus.el' was compiled for Emacs 19.29 or later"))

;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;

(require 'xml)
#@46 The bus name used to talk to the bus itself.
(defconst dbus-service-dbus "org.freedesktop.DBus" (#$ . 618))
#@49 The object path used to talk to the bus itself.
(defconst dbus-path-dbus "/org/freedesktop/DBus" (#$ . 732))
#@85 The interface exported by the object with `dbus-service-dbus' and `dbus-path-dbus'.
(defconst dbus-interface-dbus "org.freedesktop.DBus" (#$ . 847))
#@33 The interface for peer objects.
(defconst dbus-interface-peer (concat dbus-interface-dbus ".Peer") (#$ . 1002))
#@52 The interface supported by introspectable objects.
(defconst dbus-interface-introspectable (concat dbus-interface-dbus ".Introspectable") (#$ . 1120))
#@37 The interface for property objects.
(defconst dbus-interface-properties (concat dbus-interface-dbus ".Properties") (#$ . 1277))
#@39 The well known service name of Emacs.
(defconst dbus-service-emacs "org.gnu.Emacs" (#$ . 1411))
#@37 The object path head used by Emacs.
(defconst dbus-path-emacs "/org/gnu/Emacs" (#$ . 1513))
#@43 This value is never a valid message type.
(defconst dbus-message-type-invalid 0 (#$ . 1611))
#@40 Message type of a method call message.
(defconst dbus-message-type-method-call 1 (#$ . 1710))
#@42 Message type of a method return message.
(defconst dbus-message-type-method-return 2 (#$ . 1810))
#@41 Message type of an error reply message.
(defconst dbus-message-type-error 3 (#$ . 1914))
#@35 Message type of a signal message.
(defconst dbus-message-type-signal 4 (#$ . 2009))
#@132 Execute BODY; signal D-Bus error when `dbus-debug' is non-nil.
Otherwise, return result of last form in BODY, or all other errors.
(defalias 'dbus-ignore-errors '(macro . #[(&rest body) "\301\302\303B\304BBB\207" [body condition-case err progn ((dbus-error (when dbus-debug (signal (car err) (cdr err)))))] 4 (#$ . 2100)]))
(byte-code "\300\301\302\303#\210\300\301\304\305#\210\306\307\310\"\207" [put dbus-ignore-errors lisp-indent-function 0 edebug-form-spec (form body) font-lock-add-keywords emacs-lisp-mode ("\\<dbus-ignore-errors\\>")] 4)
#@193 Functions to be called when a D-Bus error happens in the event handler.
Every function must accept two arguments, the event and the error variable
catched in `condition-case' by `dbus-error'.
(defvar dbus-event-error-hooks nil (#$ . 2654))
(byte-code "\301\302\303\"\301\207" [dbus-registered-functions-table make-hash-table :test equal] 3)
#@307 Hash table for temporary storing arguments of reply messages.
A key in this hash table is a list (BUS SERIAL).  BUS is either the
symbol `:system' or the symbol `:session'.  SERIAL is the serial number
of the reply message.  See `dbus-call-method-non-blocking-handler' and
`dbus-call-method-non-blocking'.
(defvar dbus-return-values-table (make-hash-table :test 'equal) (#$ . 3003))
#@195 Returns all registered member registrations to D-Bus.
The return value is a list, with elements of kind (KEY . VALUE).
See `dbus-registered-functions-table' for a description of the
hash table.
(defalias 'dbus-list-hash-table #[nil "\302\303\304	\"\210)\207" [result dbus-registered-functions-table nil maphash #[(key value) "\302\303	B\304#\207" [key value add-to-list result append] 4]] 3 (#$ . 3393)])
#@193 Unregister OBJECT from D-Bus.
OBJECT must be the result of a preceding `dbus-register-method'
or `dbus-register-signal' call.  It returns `t' if OBJECT has
been unregistered, `nil' otherwise.
(defalias 'dbus-unregister-object #[(object) ":\203�@\203�A:\204�\304\305\306D\"\210@\307	\n\"\211:\203O�@AA@\232\2045�A\211\202 �\310	\311@\307	\n\"\"\n#\204I�\312	\n\"\210\313\211\202 �*\207" [object key dbus-registered-functions-table value signal wrong-type-argument D-Bus gethash puthash delete remhash t] 8 (#$ . 3808)])
#@197 Handler for reply messages of asynchronous D-Bus message calls.
It calls the function stored in `dbus-registered-functions-table'.
The result will be made available in `dbus-return-values-table'.
(defalias 'dbus-call-method-non-blocking-handler #[(&rest args) "\303\304!\305!D	G\306U\203�	@\202�	\n#\207" [last-input-event args dbus-return-values-table puthash dbus-event-bus-name dbus-event-serial-number 1] 4 (#$ . 4351)])
#@358 Call METHOD on the D-Bus BUS, but don't block the event queue.
This is necessary for communicating to registered D-Bus methods,
which are running in the same Emacs process.

The arguments are the same as in `dbus-call-method'.

usage: (dbus-call-method-non-blocking
         BUS SERVICE PATH INTERFACE METHOD
         &optional :timeout TIMEOUT &rest ARGS)
(defalias 'dbus-call-method-non-blocking #[(bus service path interface method &rest args) "\306\307	\n\f\310
&\311\312#\204 �\313\312\211\314#\210\202
�\311\312#\315\"\210)\207" [bus service path interface method args apply dbus-call-method-asynchronously dbus-call-method-non-blocking-handler gethash nil read-event 0.1 remhash key dbus-return-values-table] 9 (#$ . 4787)])
#@446 Reapplies all member registrations to D-Bus.
This handler is applied when a "NameOwnerChanged" signal has
arrived.  SERVICE is the object name for which the name owner has
been changed.  OLD-OWNER is the previous owner of SERVICE, or the
empty string if SERVICE was not owned yet.  NEW-OWNER is the new
owner of SERVICE, or the empty string if SERVICE looses any name owner.

usage: (dbus-name-owner-changed-handler service old-owner new-owner)
(defalias 'dbus-name-owner-changed-handler #[(&rest args) "\306 \307\216	G\310U\203L�	@;\203L�	\211A@);\203L�	\211AA)@;\203L�	@	\211A@)	\211AA)@\311\312
\"?\205H�\313\314\315!\"+\202[�\205[�\316\317\320\321\"	B\"*\207" [save-match-data-internal args x new-owner old-owner service match-data ((byte-code "\301\302\"\207" [save-match-data-internal set-match-data evaporate] 3)) 3 string-match "^:" maphash #[(key value) "\305\211\2035�\n@	@\230\203.�\306\f	AD!\210\307\f@	A@\310	8\fA@\310\f8\311	8&\210\nA\211\204�*\305\207" [value elt #1=#:--cl-dolist-temp-- old-owner key nil dbus-unregister-object dbus-register-signal 2 3] 9] copy-hash-table signal dbus-error format "Wrong arguments of %s.NameOwnerChanged" dbus-registered-functions-table dbus-debug dbus-interface-dbus] 6 (#$ . 5543)])
#@87 Transforms STRING to list (:array :byte c1 :byte c2 ...).
STRING shall be UTF8 coded.
(defalias 'dbus-string-to-byte-array #[(string) "\304G!\203	�\305\207\306\307\306\")\306\211\203*�@\307	\310\nD\"A\211\204�\306\307\311	\"+\207" [string result elt #1=#:--cl-dolist-temp-- zerop (:array :signature "y") nil append :byte (:array)] 5 (#$ . 6807)])
#@99 Transforms BYTE-ARRAY into UTF8 coded string.
BYTE-ARRAY must be a list of structure (c1 c2 ...).
(defalias 'dbus-byte-array-to-string #[(byte-array) "\301\302\"\207" [byte-array apply string] 3 (#$ . 7174)])
#@636 Escape an arbitrary STRING so it follows the rules for a C identifier.
The escaped string can be used as object path component, interface element
component, bus name component or member name in D-Bus.

The escaping consists of replacing all non-alphanumerics, and the
first character if it's a digit, with an underscore and two
lower-case hex digits:

"0123abc_xyz\x01\xff" -> "_30123abc_5fxyz_01_ff"

i.e. similar to URI encoding, but with "_" taking the role of "%",
and a smaller allowed set. As a special case, "" is escaped to
"_".

Returns the escaped string.  Algorithm taken from
telepathy-glib's `tp-escape-as-identifier'.
(defalias 'dbus-escape-as-identifier #[(string) "\301G!\203	�\302\207\303\304\305#\207" [string zerop "_" replace-regexp-in-string "^[0-9]\\|[^A-Za-z0-9]" #[(x) "\301\302\303H\"\207" [x format "_%2x" 0] 4]] 4 (#$ . 7391)])
#@116 Retrieve the original string from the encoded STRING.
STRING must have been coded with `dbus-escape-as-identifier'
(defalias 'dbus-unescape-from-identifier #[(string) "\301\230\203�\302\207\303\304\305#\207" [string "_" "" replace-regexp-in-string "_.." #[(x) "\301\302\303\304\305O\306\"\"\207" [x format "%c" string-to-number 1 nil 16] 6]] 4 (#$ . 8259)])
#@842 Checks whether EVENT is a well formed D-Bus event.
EVENT is a list which starts with symbol `dbus-event':

(dbus-event BUS TYPE SERIAL SERVICE PATH INTERFACE MEMBER HANDLER &rest ARGS)

BUS identifies the D-Bus the message is coming from.  It is
either the symbol `:system' or the symbol `:session'.  TYPE is
the D-Bus message type which has caused the event, SERIAL is the
serial number of the received D-Bus message.  SERVICE and PATH
are the unique name and the object path of the D-Bus object
emitting the message.  INTERFACE and MEMBER denote the message
which has been sent.  HANDLER is the function which has been
registered for this message.  ARGS are the arguments passed to
HANDLER, when it is called during event handling in
`dbus-handle-event'.

This function raises a `dbus-error' signal in case the event is
not well formed.
(defalias 'dbus-check-event #[(event) "\203	�\305\306	\"\210	<\205\225�	@\307=\205\225�	A@9\205\225�\310\311	8!\205\225�\n\311	8W\205\225�\310\312	8!\205\225�\311	8U\204K�\f\311	8U\204K�\313	8;\205\225�\311	8U\204b�\f\311	8U\204b�\314	8;\205\225�\311	8U\204y�\f\311	8U\204y�\315	8;\205\225�\311	8U\204\220�\f\311	8U\204\220�\316	8;\205\225�\317\320	8!?\205\237�\321\322\323	D\"\207" [dbus-debug event dbus-message-type-invalid dbus-message-type-method-return dbus-message-type-error message "DBus-Event %s" dbus-event natnump 2 3 4 5 6 7 functionp 8 signal dbus-error "Not a valid D-Bus event"] 4 (#$ . 8628)])
#@221 Handle events from the D-Bus.
EVENT is a D-Bus event, see `dbus-check-event'.  HANDLER, being
part of the event, is called with arguments ARGS.
If the HANDLER returns an `dbus-error', it is propagated as return message.
(defalias 'dbus-handle-event #[(event) "\300\301\302\217\207" [err (byte-code "\304\305	!\210\n\306	8U\203�\307\310\311	\233\"\210\312\313	8\311	\233\"\306	8U\205*�\314\315\316\217)\207" [result event dbus-message-type-error dbus-message-type-method-call nil dbus-check-event 2 signal dbus-error 9 apply 8 err (byte-code "\302\303A@\3048\3058	:\203�	\202�	C%\207" [event result apply dbus-method-return-internal 3 4] 6) ((dbus-error (byte-code "\205\n�\302	@	A\"\207" [dbus-debug err signal] 3)))] 4) ((dbus-error (byte-code "\305	8U\203
�\302\306\307\217\210\310\311	\n#\210\204�\f\305	8U\205%�\312\n@\nA\"\207" [dbus-message-type-method-call event err dbus-debug dbus-message-type-error 2 (byte-code "\303A@\3048\3058	\211A@)$\207" [event err x dbus-method-error-internal 3 4] 6) ((dbus-error (byte-code "\203�\302	@	A\"\210\302\207" [dbus-debug err signal] 3))) run-hook-with-args dbus-event-error-hooks signal] 4)))] 3 (#$ . 10092) "e"])
#@245 Return the bus name the event is coming from.
The result is either the symbol `:system' or the symbol `:session'.
EVENT is a D-Bus event, see `dbus-check-event'.  This function
raises a `dbus-error' signal in case the event is not well
formed.
(defalias 'dbus-event-bus-name #[(event) "\301!\210A@\207" [event dbus-check-event] 2 (#$ . 11280)])
#@216 Return the message type of the corresponding D-Bus message.
The result is a number.  EVENT is a D-Bus event, see
`dbus-check-event'.  This function raises a `dbus-error' signal
in case the event is not well formed.
(defalias 'dbus-event-message-type #[(event) "\301!\210\3028\207" [event dbus-check-event 2] 2 (#$ . 11634)])
#@278 Return the serial number of the corresponding D-Bus message.
The result is a number.  The serial number is needed for
generating a reply message.  EVENT is a D-Bus event, see
`dbus-check-event'.  This function raises a `dbus-error' signal
in case the event is not well formed.
(defalias 'dbus-event-serial-number #[(event) "\301!\210\3028\207" [event dbus-check-event 3] 2 (#$ . 11968)])
#@217 Return the name of the D-Bus object the event is coming from.
The result is a string.  EVENT is a D-Bus event, see `dbus-check-event'.
This function raises a `dbus-error' signal in case the event is
not well formed.
(defalias 'dbus-event-service-name #[(event) "\301!\210\3028\207" [event dbus-check-event 4] 2 (#$ . 12365)])
#@224 Return the object path of the D-Bus object the event is coming from.
The result is a string.  EVENT is a D-Bus event, see `dbus-check-event'.
This function raises a `dbus-error' signal in case the event is
not well formed.
(defalias 'dbus-event-path-name #[(event) "\301!\210\3028\207" [event dbus-check-event 5] 2 (#$ . 12700)])
#@227 Return the interface name of the D-Bus object the event is coming from.
The result is a string.  EVENT is a D-Bus event, see `dbus-check-event'.
This function raises a `dbus-error' signal in case the event is
not well formed.
(defalias 'dbus-event-interface-name #[(event) "\301!\210\3028\207" [event dbus-check-event 6] 2 (#$ . 13039)])
#@253 Return the member name the event is coming from.
It is either a signal name or a method name. The result is is a
string.  EVENT is a D-Bus event, see `dbus-check-event'.  This
function raises a `dbus-error' signal in case the event is not
well formed.
(defalias 'dbus-event-member-name #[(event) "\301!\210\3028\207" [event dbus-check-event 7] 2 (#$ . 13386)])
#@164 Return the D-Bus service names which can be activated as list.
The result is a list of strings, which is `nil' when there are no
activatable service names at all.
(defalias 'dbus-list-activatable-names #[nil "\300\301\302\217\207" [err (dbus-call-method :system dbus-service-dbus dbus-path-dbus dbus-interface-dbus "ListActivatableNames") ((dbus-error (byte-code "\205\n�\302	@	A\"\207" [dbus-debug err signal] 3)))] 3 (#$ . 13756)])
#@265 Return the service names registered at D-Bus BUS.
The result is a list of strings, which is `nil' when there are no
registered service names at all.  Well known names are strings
like "org.freedesktop.DBus".  Names starting with ":" are
unique names for services.
(defalias 'dbus-list-names #[(bus) "\300\301\302\217\207" [err (dbus-call-method bus dbus-service-dbus dbus-path-dbus dbus-interface-dbus "ListNames") ((dbus-error (byte-code "\205\n�\302	@	A\"\207" [dbus-debug err signal] 3)))] 3 (#$ . 14198)])
#@121 Retrieve all services which correspond to a known name in BUS.
A service has a known name if it doesn't start with ":".
(defalias 'dbus-list-known-names #[(bus) "\304\305	!\304\211\203%�@\211\306\307O\310\230\204�\311\300\n\312#\210A\211\204\f�\304+\207" [result bus name #1=#:--cl-dolist-temp-- nil dbus-list-names 0 1 ":" add-to-list append] 5 (#$ . 14716)])
#@174 Return the unique names registered at D-Bus BUS and queued for SERVICE.
The result is a list of strings, or `nil' when there are no
queued name owners service names at all.
(defalias 'dbus-list-queued-owners #[(bus service) "\300\301\302\217\207" [err (byte-code "\305	\n\306\f&\207" [bus dbus-service-dbus dbus-path-dbus dbus-interface-dbus service dbus-call-method "ListQueuedOwners"] 7) ((dbus-error (byte-code "\205\n�\302	@	A\"\207" [dbus-debug err signal] 3)))] 3 (#$ . 15094)])
#@126 Return the name owner of SERVICE registered at D-Bus BUS.
The result is either a string, or `nil' if there is no name owner.
(defalias 'dbus-get-name-owner #[(bus service) "\300\301\302\217\207" [err (byte-code "\305	\n\306\f&\207" [bus dbus-service-dbus dbus-path-dbus dbus-interface-dbus service dbus-call-method "GetNameOwner"] 7) ((dbus-error (byte-code "\205\n�\302	@	A\"\207" [dbus-debug err signal] 3)))] 3 (#$ . 15590)])
#@52 Check whether SERVICE is registered for D-Bus BUS.
(defalias 'dbus-ping #[(bus service) "\300\301\302\217\207" [nil (byte-code "\304	\n\305%?\207" [bus service dbus-path-dbus dbus-interface-peer dbus-call-method "Ping"] 6) ((dbus-error))] 3 (#$ . 16029)])
#@352 This function returns all interfaces and sub-nodes of SERVICE,
registered at object path PATH at bus BUS.

BUS must be either the symbol `:system' or the symbol `:session'.
SERVICE must be a known service name, and PATH must be a valid
object path.  The last two parameters are strings.  The result,
the introspection data, is a string in XML format.
(defalias 'dbus-introspect #[(bus service path) "\300\301\302\217\207" [err (dbus-call-method-non-blocking bus service path dbus-interface-introspectable "Introspect") ((dbus-error (byte-code "\205\n�\302	@	A\"\207" [dbus-debug err signal] 3)))] 3 (#$ . 16294)])
#@238 Return the introspection data of SERVICE in D-Bus BUS at object path PATH.
The data are a parsed list.  The root object is a "node",
representing the object path PATH.  The root object can contain
"interface" and further "node" objects.
(defalias 'dbus-introspect-xml #[(bus service path) "\301\302\303\217\211@)\207" [node nil (byte-code "\304\305!rq\210\306\216\307	\n#c\210\310ed\"+\207" [#1=#:temp-buffer bus service path generate-new-buffer " *temp*" ((byte-code "\301!\203\n�\302!\210\301\207" [#1# buffer-name kill-buffer] 2)) dbus-introspect xml-parse-region] 4) ((error))] 4 (#$ . 16916)])
#@147 Return the ATTRIBUTE value of D-Bus introspection OBJECT.
ATTRIBUTE must be a string according to the attribute names in
the D-Bus specification.
(defalias 'dbus-introspect-get-attribute #[(object attribute) "\302\303	!\"\207" [object attribute xml-get-attribute-or-nil intern] 4 (#$ . 17528)])
#@167 Return all node names of SERVICE in D-Bus BUS at object path PATH.
It returns a list of strings.  The node names stand for further
object paths of the D-Bus service.
(defalias 'dbus-introspect-get-node-names #[(bus service path) "\306	\n#\307\310\f\311\"\307\211\203*�@\312\303\313
\314\"\315#\210A\211\204�\307,\207" [bus service path result object elt dbus-introspect-xml nil xml-get-children node add-to-list dbus-introspect-get-attribute "name" append #1=#:--cl-dolist-temp--] 6 (#$ . 17831)])
#@141 Return all node names of SERVICE in D-Bus BUS at object path PATH.
It returns a list of strings, which are further object paths of SERVICE.
(defalias 'dbus-introspect-get-all-nodes #[(bus service path) "C\306\n#\307\211\203'�
@\310\f\"\311	\312\n\f#\"
A\211\204�\307	+\207" [path result bus service elt #1=#:--cl-dolist-temp-- dbus-introspect-get-node-names nil expand-file-name append dbus-introspect-get-all-nodes] 7 (#$ . 18352)])
#@368 Return all interface names of SERVICE in D-Bus BUS at object path PATH.
It returns a list of strings.

There will be always the default interface
"org.freedesktop.DBus.Introspectable".  Another default
interface is "org.freedesktop.DBus.Properties".  If present,
"interface" objects can also have "property" objects as
children, beside "method" and "signal" objects.
(defalias 'dbus-introspect-get-interface-names #[(bus service path) "\306	\n#\307\310\f\311\"\307\211\203*�@\312\303\313
\314\"\315#\210A\211\204�\307,\207" [bus service path result object elt dbus-introspect-xml nil xml-get-children interface add-to-list dbus-introspect-get-attribute "name" append #1=#:--cl-dolist-temp--] 6 (#$ . 18807)])
#@306 Return the INTERFACE of SERVICE in D-Bus BUS at object path PATH.
The return value is an XML object.  INTERFACE must be a string,
element of the list returned by
`dbus-introspect-get-interface-names'.  The resulting
"interface" object can contain "method", "signal",
"property" and "annotation" children.
(defalias 'dbus-introspect-get-interface #[(bus service path interface) "\305\306	\n#\304\"\211\203�\f\307@\310\"\230\204�A\211\204
�@)\207" [bus service path elt interface xml-get-children dbus-introspect-xml dbus-introspect-get-attribute "name"] 6 (#$ . 19539)])
#@115 Return a list of strings of all method names of INTERFACE.
SERVICE is a service of D-Bus BUS at object path PATH.
(defalias 'dbus-introspect-get-method-names #[(bus service path interface) "\306	\n$\307\310
\311\"\307\211\203.�@\312\304\313\314\"\315#\210A\211\204�\307\f,\207" [bus service path interface result object dbus-introspect-get-interface nil xml-get-children method add-to-list dbus-introspect-get-attribute "name" append elt #1=#:--cl-dolist-temp--] 6 (#$ . 20124)])
#@293 Return method METHOD of interface INTERFACE as XML object.
It must be located at SERVICE in D-Bus BUS at object path PATH.
METHOD must be a string, element of the list returned by
`dbus-introspect-get-method-names'.  The resulting "method"
object can contain "arg" and "annotation" children.
(defalias 'dbus-introspect-get-method #[(bus service path interface method) "\306\307	\n$\305\"\211\203�
\310\f@\311\"\230\204�\fA\211\204�\f@)\207" [bus service path interface elt method xml-get-children dbus-introspect-get-interface dbus-introspect-get-attribute "name"] 7 (#$ . 20632)])
#@115 Return a list of strings of all signal names of INTERFACE.
SERVICE is a service of D-Bus BUS at object path PATH.
(defalias 'dbus-introspect-get-signal-names #[(bus service path interface) "\306	\n$\307\310
\311\"\307\211\203.�@\312\304\313\314\"\315#\210A\211\204�\307\f,\207" [bus service path interface result object dbus-introspect-get-interface nil xml-get-children signal add-to-list dbus-introspect-get-attribute "name" append elt #1=#:--cl-dolist-temp--] 6 (#$ . 21228)])
#@293 Return signal SIGNAL of interface INTERFACE as XML object.
It must be located at SERVICE in D-Bus BUS at object path PATH.
SIGNAL must be a string, element of the list returned by
`dbus-introspect-get-signal-names'.  The resulting "signal"
object can contain "arg" and "annotation" children.
(defalias 'dbus-introspect-get-signal #[(bus service path interface signal) "\306\307	\n$\305\"\211\203�
\310\f@\311\"\230\204�\fA\211\204�\f@)\207" [bus service path interface elt signal xml-get-children dbus-introspect-get-interface dbus-introspect-get-attribute "name"] 7 (#$ . 21736)])
#@117 Return a list of strings of all property names of INTERFACE.
SERVICE is a service of D-Bus BUS at object path PATH.
(defalias 'dbus-introspect-get-property-names #[(bus service path interface) "\306	\n$\307\310
\311\"\307\211\203.�@\312\304\313\314\"\315#\210A\211\204�\307\f,\207" [bus service path interface result object dbus-introspect-get-interface nil xml-get-children property add-to-list dbus-introspect-get-attribute "name" append elt #1=#:--cl-dolist-temp--] 6 (#$ . 22332)])
#@287 This function returns PROPERTY of INTERFACE as XML object.
It must be located at SERVICE in D-Bus BUS at object path PATH.
PROPERTY must be a string, element of the list returned by
`dbus-introspect-get-property-names'.  The resulting PROPERTY
object can contain "annotation" children.
(defalias 'dbus-introspect-get-property #[(bus service path interface property) "\306\307	\n$\305\"\211\203�
\310\f@\311\"\230\204�\fA\211\204�\f@)\207" [bus service path interface elt property xml-get-children dbus-introspect-get-interface dbus-introspect-get-attribute "name"] 7 (#$ . 22846)])
#@210 Return all annotation names as list of strings.
If NAME is `nil', the annotations are children of INTERFACE,
otherwise NAME must be a "method", "signal", or "property"
object, where the annotations belong to.
(defalias 'dbus-introspect-get-annotation-names #[(bus service path interface &optional name) "\203\"�\306	\n\f%\206(�\307	\n\f%\206(�\310	\n\f%\202(�\311	\n\f$\312\313\314\"\312\211\203R�@\315\305\316\317\"\320#\210A\211\204:�\312
,\207" [name bus service path interface result dbus-introspect-get-method dbus-introspect-get-signal dbus-introspect-get-property dbus-introspect-get-interface nil xml-get-children annotation add-to-list dbus-introspect-get-attribute "name" append object elt #1=#:--cl-dolist-temp--] 6 (#$ . 23442)])
#@200 Return ANNOTATION as XML object.
If NAME is `nil', ANNOTATION is a child of INTERFACE, otherwise
NAME must be the name of a "method", "signal", or
"property" object, where the ANNOTATION belongs to.
(defalias 'dbus-introspect-get-annotation #[(bus service path interface name annotation) "\306\203#�\307	\n\f%\206)�\310	\n\f%\206)�\311	\n\f%\202)�\312	\n\f$\313\"\211\203B�\314
@\315\"\230\204B�
A\211\2040�
@)\207" [name bus service path interface elt xml-get-children dbus-introspect-get-method dbus-introspect-get-signal dbus-introspect-get-property dbus-introspect-get-interface annotation dbus-introspect-get-attribute "name"] 8 (#$ . 24220)])
#@216 Return a list of all argument names as list of strings.
NAME must be a "method" or "signal" object.

Argument names are optional, the function can return `nil'
therefore, even if the method or signal has arguments.
(defalias 'dbus-introspect-get-argument-names #[(bus service path interface name) "\306	\n\f%\206�\307	\n\f%\310\311\312\"\310\211\203;�@\313\305\314\315\"\316#\210A\211\204#�\310
,\207" [bus service path interface name result dbus-introspect-get-method dbus-introspect-get-signal nil xml-get-children arg add-to-list dbus-introspect-get-attribute "name" append object elt #1=#:--cl-dolist-temp--] 6 (#$ . 24888)])
#@173 Return argument ARG as XML object.
NAME must be a "method" or "signal" object.  ARG must be a
string, element of the list returned by `dbus-introspect-get-argument-names'.
(defalias 'dbus-introspect-get-argument #[(bus service path interface name arg) "\306\307	\n\f%\206�\310	\n\f%\311\"\211\203+�	\312
@\313\"\230\204+�
A\211\204�
@)\207" [bus service path interface name elt xml-get-children dbus-introspect-get-method dbus-introspect-get-signal arg dbus-introspect-get-attribute "name"] 8 (#$ . 25551)])
#@256 Return signature of a `method' or `signal', represented by NAME, as string.
If NAME is a `method', DIRECTION can be either "in" or "out".
If DIRECTION is `nil', "in" is assumed.

If NAME is a `signal', and DIRECTION is non-`nil', DIRECTION must
be "out".
(defalias 'dbus-introspect-get-signature #[(bus service path interface name &optional direction) "\306	\n\f%\206�\307	\n\f%\310
\311\"\312\230\203$�;\204$�\313\310
\311\"\314\230\2030�\315\316\317\320	\n\f%\321#)\207" [bus service path interface name object dbus-introspect-get-method dbus-introspect-get-signal dbus-introspect-get-attribute "name" "method" "in" "signal" nil mapconcat #[(x) "\306	\n\f
&\f;\203�\f\307\310\"\230\203$�\307\311\"\202%�\312)\207" [bus service path interface name x dbus-introspect-get-argument dbus-introspect-get-attribute "direction" "type" #1="" arg direction] 7] dbus-introspect-get-argument-names #1# direction] 8 (#$ . 26075)])
#@162 Return the value of PROPERTY of INTERFACE.
It will be checked at BUS, SERVICE, PATH.  The result can be any
valid D-Bus value, or `nil' if there is no PROPERTY.
(defalias 'dbus-get-property #[(bus service path interface property) "\300\301\302\217\207" [err (byte-code "\306\307	\n\310$\235\205�\311	\n\306\f
&@\207" [bus service path dbus-interface-properties interface property "Get" dbus-introspect-get-method-names "org.freedesktop.DBus.Properties" dbus-call-method] 8) ((dbus-error (byte-code "\205\n�\302	@	A\"\207" [dbus-debug err signal] 3)))] 3 (#$ . 27028)])
#@181 Set value of PROPERTY of INTERFACE to VALUE.
It will be checked at BUS, SERVICE, PATH.  When the value has
been set successful, the result is VALUE.  Otherwise, `nil' is
returned.
(defalias 'dbus-set-property #[(bus service path interface property value) "\300\301\302\217\207" [err (byte-code "\306\307	\n\310$\235\2050�\311\312	\n\f%\313\"\314\230\2050�\315	\n
\306\f\316D&\210\317	\n\f%\207" [bus service path interface property dbus-interface-properties "Set" dbus-introspect-get-method-names "org.freedesktop.DBus.Properties" dbus-introspect-get-attribute dbus-introspect-get-property "access" "readwrite" dbus-call-method :variant dbus-get-property value] 10) ((dbus-error (byte-code "\205\n�\302	@	A\"\207" [dbus-debug err signal] 3)))] 3 (#$ . 27610)])
#@207 Return all properties of INTERFACE at BUS, SERVICE, PATH.
The result is a list of entries.  Every entry is a cons of the
name of the property, and its value.  If there are no properties,
`nil' is returned.
(defalias 'dbus-get-all-properties #[(bus service path interface) "\300\301\302\217\207" [err (byte-code "\306\307	\n\f$\306\211\203+�@\310\300
\311	\n\f
%B\312#\210A\211\204�\306+\207" [result bus service path interface property nil dbus-introspect-get-property-names add-to-list dbus-get-property append #1=#:--cl-dolist-temp--] 10) ((dbus-error (byte-code "\205\n�\302	@	A\"\207" [dbus-debug err signal] 3)))] 3 (#$ . 28389)])
(provide 'dbus)

${this.title}

Code Editor : dbus.elc