ikan Uploader :
Directory : /usr/share/emacs/25.2/lisp/net/
Upload File : |
| Current File : //usr/share/emacs/25.2/lisp/net/tramp-gvfs.elc |
;ELC
;;; Compiled
;;; in Emacs version 25.2.1
;;; with all optimizations.
;;; This file uses dynamic docstrings, first added in Emacs 19.29.
;;; This file does not contain utf-8 non-ASCII characters,
;;; and so can be loaded in Emacs versions earlier than 23.
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
(byte-code "\304\305!\210\304\306!\210\304\307!\210\304\310!\210\304\311!\210\312\300\313\314\315\305\316\317\320\321& \210\322\323\324\"\210\312\325\326\327\315\305\316\330\320\331& \210\332\333!\203Z \334\211\203Y \n@\335 \"\204R \322\303 \334B\"\210\nA\211\204A *\334\207" [tramp-gvfs-methods elt --dolist-tail-- tramp-methods require tramp dbus url-parse url-util zeroconf custom-declare-variable '("afp" "dav" "davs" "obex" "sftp" "synce") "List of methods for remote files, accessed with GVFS." :group :version "25.1" :type (repeat (choice (const "afp") (const "dav") (const "davs") (const "ftp") (const "obex") (const "sftp") (const "smb") (const "synce"))) add-to-list tramp-default-user-alist ("\\`synce\\'" nil nil) tramp-gvfs-zeroconf-domain "local" "Zeroconf domain to be used for discovering services, like host names." "23.2" string featurep dbusbind nil assoc] 11)
#@44 The preceding object path for own objects.
(defconst tramp-gvfs-path-tramp (concat dbus-path-emacs "/Tramp") (#$ . 1296))
#@41 The well known name of the GVFS daemon.
(defconst tramp-gvfs-service-daemon "org.gtk.vfs.Daemon" (#$ . 1424))
#@33 Non-nil when GVFS is available.
(defconst tramp-gvfs-enabled (byte-code "\30019 \301\302!\2057 \303\304!\204 \305\304!\2057 \304\306!\2057 \303\304!\204( \305\304!\2057 \304\307!\2057 \310\311!\2067 \310\312!0\207\210\313\207" [(error) featurep dbusbind subrp dbus-get-unique-name functionp :system :session tramp-compat-process-running-p "gvfs-fuse-daemon" "gvfsd-fuse" nil] 2) (#$ . 1540))
#@37 The object path of the GVFS daemon.
(defconst tramp-gvfs-path-mounttracker "/org/gtk/vfs/mounttracker" (#$ . 1939))
#@50 The mount tracking interface in the GVFS daemon.
(defconst tramp-gvfs-interface-mounttracker "org.gtk.vfs.MountTracker" (#$ . 2061))
#@64 The list of supported methods of the mount tracking interface.
(defconst tramp-gvfs-methods-mounttracker (byte-code "\205\n \304\305 \n $\207" [tramp-gvfs-enabled tramp-gvfs-service-daemon tramp-gvfs-path-mounttracker tramp-gvfs-interface-mounttracker dbus-introspect-get-method-names :session] 5) (#$ . 2200))
#@72 The name of the "listMounts" method.
It has been changed in GVFS 1.14.
(defconst tramp-gvfs-listmounts (byte-code "\301\235\203 \301\207\302\207" [tramp-gvfs-methods-mounttracker "ListMounts" "listMounts"] 2) (#$ . 2518))
#@75 The name of the "mountLocation" method.
It has been changed in GVFS 1.14.
(defconst tramp-gvfs-mountlocation (byte-code "\301\235\203 \301\207\302\207" [tramp-gvfs-methods-mounttracker "MountLocation" "mountLocation"] 2) (#$ . 2748))
#@86 The D-Bus signature of the "mountLocation" method.
It has been changed in GVFS 1.14.
(defconst tramp-gvfs-mountlocation-signature (byte-code "\205 \305\306 \n \f%\207" [tramp-gvfs-enabled tramp-gvfs-service-daemon tramp-gvfs-path-mounttracker tramp-gvfs-interface-mounttracker tramp-gvfs-mountlocation dbus-introspect-get-signature :session] 6) (#$ . 2990))
#@62 Used by the dbus-proxying implementation of GMountOperation.
(defconst tramp-gvfs-interface-mountoperation "org.gtk.vfs.MountOperation" (#$ . 3356))
#@32 Operation requires a password.
(defconst tramp-gvfs-password-need-password 1 (#$ . 3511))
#@32 Operation requires a username.
(defconst tramp-gvfs-password-need-username 2 (#$ . 3607))
#@30 Operation requires a domain.
(defconst tramp-gvfs-password-need-domain 4 (#$ . 3703))
#@37 Operation supports saving settings.
(defconst tramp-gvfs-password-saving-supported 8 (#$ . 3795))
#@37 Operation supports anonymous users.
(defconst tramp-gvfs-password-anonymous-supported 16 (#$ . 3899))
#@43 The well known name of the BLUEZ service.
(defconst tramp-bluez-service "org.bluez" (#$ . 4007))
#@44 The manager interface of the BLUEZ daemon.
(defconst tramp-bluez-interface-manager "org.bluez.Manager" (#$ . 4110))
#@44 The adapter interface of the BLUEZ daemon.
(defconst tramp-bluez-interface-adapter "org.bluez.Adapter" (#$ . 4232))
#@214 Defines seconds since last bluetooth device discovery before rescanning.
A value of 0 would require an immediate discovery during hostname
completion, nil means to use always cached values for discovered
devices.
(custom-declare-variable 'tramp-bluez-discover-devices-timeout 60 '(#$ . 4355) :group 'tramp :version "23.2" :type '(choice (const nil) integer))
#@95 Indicator for a running bluetooth device discovery.
It keeps the timestamp of last discovery.
(defvar tramp-bluez-discovery nil (#$ . 4720))
#@76 Alist of detected bluetooth devices.
Every entry is a list (NAME ADDRESS).
(defvar tramp-bluez-devices nil (#$ . 4867))
#@41 The well known name of the HAL service.
(defconst tramp-hal-service "org.freedesktop.Hal" (#$ . 4993))
#@44 The object path of the HAL daemon manager.
(defconst tramp-hal-path-manager "/org/freedesktop/Hal/Manager" (#$ . 5102))
#@42 The manager interface of the HAL daemon.
(defconst tramp-hal-interface-manager "org.freedesktop.Hal.Manager" (#$ . 5228))
#@41 The device interface of the HAL daemon.
(defconst tramp-hal-interface-device "org.freedesktop.Hal.Device" (#$ . 5356))
#@130 Alist of handler functions for Tramp GVFS method.
Operations not mentioned here will be handled by the default Emacs primitives.
(defconst tramp-gvfs-file-name-handler-alist '((access-file . ignore) (add-name-to-file . tramp-gvfs-handle-copy-file) (copy-file . tramp-gvfs-handle-copy-file) (delete-directory . tramp-gvfs-handle-delete-directory) (delete-file . tramp-gvfs-handle-delete-file) (directory-file-name . tramp-handle-directory-file-name) (directory-files . tramp-handle-directory-files) (directory-files-and-attributes . tramp-handle-directory-files-and-attributes) (dired-call-process . ignore) (dired-compress-file . ignore) (dired-uncache . tramp-handle-dired-uncache) (expand-file-name . tramp-gvfs-handle-expand-file-name) (file-accessible-directory-p . tramp-handle-file-accessible-directory-p) (file-acl . ignore) (file-attributes . tramp-gvfs-handle-file-attributes) (file-directory-p . tramp-gvfs-handle-file-directory-p) (file-equal-p . tramp-handle-file-equal-p) (file-executable-p . tramp-gvfs-handle-file-executable-p) (file-exists-p . tramp-handle-file-exists-p) (file-in-directory-p . tramp-handle-file-in-directory-p) (file-local-copy . tramp-gvfs-handle-file-local-copy) (file-modes . tramp-handle-file-modes) (file-name-all-completions . tramp-gvfs-handle-file-name-all-completions) (file-name-as-directory . tramp-handle-file-name-as-directory) (file-name-completion . tramp-handle-file-name-completion) (file-name-directory . tramp-handle-file-name-directory) (file-name-nondirectory . tramp-handle-file-name-nondirectory) (file-newer-than-file-p . tramp-handle-file-newer-than-file-p) (file-notify-add-watch . tramp-gvfs-handle-file-notify-add-watch) (file-notify-rm-watch . tramp-handle-file-notify-rm-watch) (file-notify-valid-p . tramp-handle-file-notify-valid-p) (file-ownership-preserved-p . ignore) (file-readable-p . tramp-gvfs-handle-file-readable-p) (file-regular-p . tramp-handle-file-regular-p) (file-remote-p . tramp-handle-file-remote-p) (file-selinux-context . ignore) (file-symlink-p . tramp-handle-file-symlink-p) (file-writable-p . tramp-gvfs-handle-file-writable-p) (find-backup-file-name . tramp-handle-find-backup-file-name) (insert-directory . tramp-handle-insert-directory) (insert-file-contents . tramp-handle-insert-file-contents) (load . tramp-handle-load) (make-auto-save-file-name . tramp-handle-make-auto-save-file-name) (make-directory . tramp-gvfs-handle-make-directory) (make-directory-internal . ignore) (make-symbolic-link . tramp-handle-make-symbolic-link) (process-file . ignore) (rename-file . tramp-gvfs-handle-rename-file) (set-file-acl . ignore) (set-file-modes . ignore) (set-file-selinux-context . ignore) (set-file-times . ignore) (set-visited-file-modtime . tramp-handle-set-visited-file-modtime) (shell-command . ignore) (start-file-process . ignore) (substitute-in-file-name . tramp-handle-substitute-in-file-name) (unhandled-file-name-directory . tramp-handle-unhandled-file-name-directory) (vc-registered . ignore) (verify-visited-file-modtime . tramp-handle-verify-visited-file-modtime) (write-region . tramp-gvfs-handle-write-region)) (#$ . 5482))
#@54 Check if it's a filename handled by the GVFS daemon.
(defalias 'tramp-gvfs-file-name-p #[(filename) "\303!\205 \304\305!!\211;\205 \n\235)\207" [filename method tramp-gvfs-methods tramp-tramp-file-p tramp-file-name-method tramp-dissect-file-name] 4 (#$ . 8617)])
(put 'tramp-gvfs-file-name-p 'byte-optimizer 'byte-compile-inline-expand)
#@131 Invoke the GVFS related OPERATION.
First arg specifies the OPERATION, second arg is a list of arguments to
pass to the OPERATION.
(defalias 'tramp-gvfs-file-name-handler #[(operation &rest args) "\204 \306\307\306\310\311 \312\313!\203 \313\202 \314\n %\210+\315\f
\"\211 \2037 \316 \317\216\310A \"*\202; \320\f \")\207" [tramp-gvfs-enabled args format vec-or-proc operation tramp-gvfs-file-name-handler-alist nil "Package `tramp-gvfs' not supported" apply tramp-error fboundp user-error error assoc match-data #[nil "\301\302\"\207" [save-match-data-internal set-match-data evaporate] 3] tramp-run-real-handler fn save-match-data-internal] 7 (#$ . 8967)])
(byte-code "\300\301!\203
\302\303\304\305B\"\210\300\207" [featurep dbusbind add-to-list tramp-foreign-file-name-handler-alist tramp-gvfs-file-name-p tramp-gvfs-file-name-handler] 4)
#@65 Like `dbus-string-to-byte-array' but add trailing \0 if needed.
(defalias 'tramp-gvfs-dbus-string-to-byte-array #[(string) "\302\303\304\"\203 \301\305!P\202 !\207" [tramp-gvfs-mountlocation-signature string dbus-string-to-byte-array string-match "^(aya{sv})" 0] 4 (#$ . 9829)])
#@68 Like `dbus-byte-array-to-string' but remove trailing \0 if exists.
(defalias 'tramp-gvfs-dbus-byte-array-to-string #[(byte-array) ":\203 @:\204 \202 @\301:\203' \302!@\303U\203' \304!\202( !)\207" [byte-array dbus-byte-array-to-string last 0 butlast] 3 (#$ . 10119)])
#@70 Convert a D-Bus message into readable UTF8 strings, used for traces.
(defalias 'tramp-gvfs-stringify-dbus-message #[(message) ":\203 \301@!\203 \302\303\304!\"\207:\203 \305\306\"\207;\203' \302\303\"\207\207" [message characterp format "%S" tramp-gvfs-dbus-byte-array-to-string mapcar tramp-gvfs-stringify-dbus-message] 4 (#$ . 10405)])
#@339 Apply a D-Bus call on bus BUS.
If SYNCHRONOUS is non-nil, the call is synchronously. Otherwise,
it is an asynchronous call, with `ignore' as callback function.
The other arguments have the same meaning as with `dbus-call-method'
or `dbus-call-method-asynchronously'. Additionally, the call
will be traced by Tramp with trace level 6.
(defalias 'with-tramp-dbus-call-method '(macro . #[(vec synchronous bus service path interface method &rest args) "\306\307\310\311BBD\312\313\314 \n \f
\257\310\314\nB\314\315\nBBFED\316BB\317\320BB\321\317\322BB\323BBBBB\207" [synchronous bus service path interface method let func if ('dbus-call-method 'dbus-call-method-asynchronously) args append list 'ignore (result) tramp-message (6 "%s %s" func args) (setq result (apply func args)) (6 "%s" (tramp-gvfs-stringify-dbus-message result)) (result) vec] 11 (#$ . 10761)]))
(byte-code "\300\301\302\303#\210\300\301\304\305#\210\306\307\310\"\207" [put with-tramp-dbus-call-method lisp-indent-function 2 edebug-form-spec (form symbolp body) tramp-compat-font-lock-add-keywords emacs-lisp-mode ("\\<with-tramp-dbus-call-method\\>")] 4)
#@158 Current Tramp file name to be used, as vector.
It is needed when D-Bus signals or errors arrive, because there
is no information where to trace the message.
(defvar tramp-gvfs-dbus-event-vector nil (#$ . 11903))
#@78 Called when a D-Bus error message arrives, see `dbus-event-error-functions'.
(defalias 'tramp-gvfs-dbus-event-error #[(event err) "\205Z\306\307 C \3101\227 \f7X\205\223 \311 8\312\2169\203O \f\313X\203O \314\315\f\316U\2035 \317\202J \f\320U\203? \317\202J \f\321U\203I \322\202J \323 P\n#\2107\324Y\205\222 \325
!\203f \316 7\326
\327\330#)\f\320U\203\201 \316 7r\331
!q\210 \332P\333\n\334 C\"*\335
!\205\222 \314\336
\337\340\f\" P\n$*0\202\233 \210\202\234 \210,\341\342:A@C 6 \330 9
\211 \203g
\306\332\343\344\345!! ;\346\216; ;\347 \210)r;q\210\334 +C \3501^\f7X\205Z\311 8\351\2169\203\f\313X\203\314\315\f\316U\203\374 \317\202\f\320U\203\317\202\f\321U\203\322\202\323 P\n#\2107\324Y\205Y\325
!\203-\316 7\326
\327\330#)\f\320U\203H\316 7r\331
!q\210 \332P\333\n\334 C\"*\335
!\205Y\314\336
\337\340\f\" P\n$*0\202b\210\202c\210,\202\2457\306Y\203\245< =r\343\352!q\210p\353 \210=<\330\211>?\354\211@\354 A B\355 \210\356\357!\210+\211 C ;\347 \210\360C!\210+)
\203O
\320\342\3616\211\362N\314\363 \n#E!C \3641I\f7X\205E\311 8\365\2169\203\f\313X\203\314\315\f\316U\203\347\317\202\374\f\320U\203\361\317\202\374\f\321U\203\373\322\202\374\323 P\n#\2107\324Y\205D\325
!\203\316 7\326
\327\330#)\f\320U\2033\316 7r\331
!q\210 \332P\333\n\334 C\"*\335
!\205D\314\336
\337\340\f\" P\n$*0\202M\210\202N\210,\3666\314\363 \n#C\"-\207" [tramp-gvfs-dbus-event-vector event arguments fmt-string level vec-or-proc 10 "%S" (error) match-data #[nil "\301\302\"\207" [save-match-data-internal set-match-data evaporate] 3] 3 apply message 0 "" 1 2 "Warning: " "Tramp: " 4 processp tramp-get-connection-property "vector" nil tramp-get-connection-buffer "\n%s" append buffer-string vectorp tramp-debug-message format "(%d) # " file-error "%s" get-buffer-create generate-new-buffer-name " *string-output*" #[nil "\301!\207" [standard-output kill-buffer] 2] backtrace (error) #[nil "\301\302\"\207" [save-match-data-internal set-match-data evaporate] 3] "*debug tramp*" kill-all-local-variables t erase-buffer run-hooks temp-buffer-setup-hook internal-temp-output-buffer-show error-message-string error-message format-message (error) #[nil "\301\302\"\207" [save-match-data-internal set-match-data evaporate] 3] signal tramp-verbose save-match-data-internal tramp-message-show-message err standard-output default-directory #1=#:old-dir buffer-read-only buffer-file-name buffer-undo-list inhibit-modification-hooks inhibit-read-only #2=#:buf] 11 (#$ . 12121)])
(byte-code "\300\301\302!\203 \302\202\f \303\304\"\207" [add-hook boundp dbus-event-error-functions dbus-event-error-hooks tramp-gvfs-dbus-event-error] 3)
#@728 Copy or rename a remote file.
OP must be `copy' or `rename' and indicates the operation to perform.
FILENAME specifies the file to copy or rename, NEWNAME is the name of
the new file (for copy) or the new name of the file (for rename).
OK-IF-ALREADY-EXISTS means don't barf if NEWNAME exists already.
KEEP-DATE means to make sure that NEWNAME has the same timestamp
as FILENAME. PRESERVE-UID-GID, when non-nil, instructs to keep
the uid and gid if both files are on the same host.
PRESERVE-EXTENDED-ATTRIBUTES is ignored.
This function is invoked by `tramp-gvfs-handle-copy-file' and
`tramp-gvfs-handle-rename-file'. It is an error if OP is neither
of `copy' and `rename'. FILENAME and NEWNAME must be absolute
file names.
(defalias 'tramp-gvfs-do-copy-or-rename-file #[(op filename newname &optional ok-if-already-exists keep-date preserve-uid-gid preserve-extended-attributes) "\306>\204 \307\310\"\210\311 !\311\n!\312 \n\"\313\314\315\"!\316=\203% \317\202& \320\316=\2030 \321\2021 \322 @ A B\323B\203D \202E \n! C\324C! D\325C! E\326C! F\327C! G\330C! HI\204}\331\n!\203}C\332\333\nC J K L M\334 NM\211 M\203XM\335\336\337\340\341!! O\342\216O O\343 \210)rOq\210\344 +C J K P M\3451OPQX\205K\346 R\347\216N\203\371 P\350X\203\371 \351\352P\353U\203\333 \354\202\362 P\355U\203\346 \354\202\362 P\356U\203\361 \357\202\362 \360KPJ#\210Q\361Y\205J\362M!\203\353 Q\363M\364\334#M)P\355U\2034\353 Qr\365M!q\210K\336PK\366J\344 C\"J*\367M!\205J\351\370M\314\371P\"KPJ$*0\202S\210\202T\210,\202\230Q\335Y\203\230S Tr\337\372!q\210p\373 \210TS\334\211UV\374\211W\374 X Y\375 \210\376\377!\210+\211 Z O\343 \210\201m Z!\210+)M\203kM\355\201n \201o L\211\201p N\351\201q KJ#E!C J K P M\201r 1ePQX\205a\346 R\201s \216N\203P\350X\203\351\352P\353U\203\361\354\202P\355U\203\374\354\202P\356U\203\357\202\360KPJ#\210Q\361Y\205`\362M!\203)\353 Q\363M\364\334#M)P\355U\203J\353 Qr\365M!q\210K\336PK\366J\344 C\"J*\367M!\205`\351\370M\314\371P\"KPJ$*0\202i\210\202j\210,\201L L\351\201q KJ#C\"\210-@\203\215\363C\201t \334#\204\323B\203\260 \311 !\205\254\324\323 !!\211 D;\205\253D[\235))\203\323A\203\240\n\311 !\205\317\324\323 !!\211 D;\205\316D[\235))\204\240 \334 \\ ]\334 ^\201u \201v J\334 ^\201w \201x !\203\377\201y \201x \201z N@!\206\262\201{ \201| !\203$\201} \201| !\204 \201~ \201| !\205\262\201| \202\262\201 \201\200 !\211 _\2057\201\201 _!)\203I\201\202 \201 \201\200 !!\202\262\201 \201\203 !\211 _\205\\\201\201 _!)\203n\201\202 \201 \201\203 !!\202\262\201 \201\204 !\211 _\205\201\201\201 _!)\203\223\201\202 \201 \201\204 !!\202\262\331\201\205 !\203\245\201\202 \201\205 !\202\262\352\201\206 !\210\201\202 \201\207 !)\" `\201\210 ]\374\" a\334 b\201\211 1\355\201} \201\212 !\204\334\201~ \201\212 !\205\346\201\212 `\\a#\211b0\202*\210\201\213 1 \201\214 `!aPb\\\203\201\215 b!\210\202\201\216 \354\334b\334\201\217 %\210\3340\202$\210\202\356\203+\202\356\210b. cd\203W\201}
!\204F\201~
!\203\223
c\374efd&\210\202\223f\203z\201}
!\204l\201~
!\203\223
c\374ef%\210\202\223\201}
!\204\212\201~
!\203\223
c\374e$\210\201\220 c\nI#)\202/C\353\201\221 \314\201\222 \n$C J K P M\201\223 1ZPQX\205V\346 R\201\224 \216N\203P\350X\203\351\352P\353U\203\346\354\202\375P\355U\203\361\354\202\375P\356U\203\374\357\202\375\360KPJ#\210Q\361Y\205U\362M!\203 \353 Q\363M\364\334#M)P\355U\203?\353 Qr\365M!q\210K\336PK\366J\344 C\"J*\367M!\205U\351\370M\314\371P\"KPJ$*0\202^\210\202_\210,\201\225 N\205\261\353Q\350^X\205\261\201\226 1\257\201} \201\227 !\204\213\201~ \201\227 !\205\227\201\227 \314\201\222 \n$!\211 g\205\252\201\230 \350\201\231 \201\232 g$)0\202\261\210\334 h i\201\233 \216\351\201\234 C\f\366\316=\205\325e\204\321f\205\325\201\235 C\201\236 !\201\236 \n!D\"$\204\242@\203\372@\203\206\363C\201t \334#\203\206r\365C!q\210eb\210\334C\201\237 \201\240 \201\241 D J K L M j\201\242 k\201\243 \216\201\244 j!\2035j\206P\362M!\203E\201\245 M!\206P\367M!\205P\365M! j\367M!\203^M\206mj\205mrjq\210\323S!) l\201\246 \216\351\201\247 MLKJ%\210. \202\242\201\250 C\201t \374#\210\201\251 \nIefd&\210\201\252 i+B\203\360\201\253 =\203\360\323 ! C\324C! D\325C! E\326C! F\327C! G\330C! H\201\254 C\201\255 G!\"\210\201\254 CG\"\210.A\205/\323\n! C\324C! D\325C! E\326C! F\327C! G\330C! H\201\254 C\201\255 G!\"\210\201\254 CG\"..\f\207" [op filename newname msg-operation gvfs-operation file-operation (copy rename) error "Unknown operation `%s', must be `copy' or `rename'" tramp-tramp-file-p tramp-equal-remote intern format "%s-file" copy "gvfs-copy" "gvfs-move" "Copying" "Renaming" tramp-dissect-file-name tramp-file-name-method tramp-file-name-user tramp-file-name-host tramp-file-name-localname tramp-file-name-hop file-exists-p file-already-exists "File %s already exists" nil 10 "\n%s" get-buffer-create generate-new-buffer-name " *string-output*" #[nil "\301!\207" [standard-output kill-buffer] 2] backtrace buffer-string (error) match-data #[nil "\301\302\"\207" [save-match-data-internal set-match-data evaporate] 3] 3 apply message 0 #5="" 1 2 #6="Warning: " #7="Tramp: " 4 processp tramp-get-connection-property #8="vector" tramp-get-connection-buffer append vectorp tramp-debug-message #9="(%d) # " "*debug tramp*" kill-all-local-variables t erase-buffer run-hooks temp-buffer-setup-hook equal-remote t2 t1 v method user host localname hop ok-if-already-exists arguments fmt-string signal vec-or-proc tramp-message-show-message standard-output level tramp-verbose save-match-data-internal default-directory #1=#:old-dir buffer-read-only buffer-file-name buffer-undo-list inhibit-modification-hooks inhibit-read-only #2=#:buf tramp-gvfs-methods dir-flag f file-name-handler-alist d prefix extension result tmpfile preserve-extended-attributes keep-date preserve-uid-gid pr tm cookie buf #3=#:wconfig vec internal-temp-output-buffer-show "%s" error-message-string error-message format-message (error) #[nil "\301\302\"\207" [save-match-data-internal set-match-data evaporate] 3] "direct-copy-failed" expand-file-name tramp-temp-name-prefix boundp temporary-file-directory eval standard-value fboundp temp-directory subrp functionp getenv "TEMP" file-directory-p file-name-as-directory "TMP" "TMPDIR" "c:/temp" "Neither `temporary-file-directory' nor `temp-directory' is defined -- using /tmp." "/tmp" file-name-extension (error) make-temp-file (file-already-exists) make-temp-name make-directory write-region silent rename-file "%s..." #4="%s %s to %s" (error) #[nil "\301\302\"\207" [save-match-data-internal set-match-data evaporate] 3] "failed" (error) make-progress-reporter run-at-time 0.1 tramp-progress-reporter-update #[nil "\203 \306\307!\204 \310\307!\203 \307!\210 \311\312\313\314\n \f$
D $ % & '\3151\306 &(X\205\302 \316 )\317\216*\203p &\320X\203p \321\322&\311U\203R \323\202i &\324U\203] \323\202i &\325U\203h \326\202i \327%P$#\210(\330Y\205\301 \331'!\203\212 \311 (\332'\333\334#')&\324U\203\253 \311 (r\335'!q\210%\336P%\337$\340 C\"$*\341'!\205\301 \321\342'\313\343&\"%P$$*0\202\310 \210\334,\207" [tm v msg-operation filename newname cookie subrp cancel-timer functionp 0 "%s...%s" format #4# (error) match-data #[nil "\301\302\"\207" [save-match-data-internal set-match-data evaporate] 3] 3 apply message #5# 1 2 #6# #7# 4 processp tramp-get-connection-property #8# nil tramp-get-connection-buffer "\n%s" append buffer-string vectorp tramp-debug-message #9# arguments fmt-string level vec-or-proc tramp-verbose save-match-data-internal tramp-message-show-message] 8] tramp-gvfs-send-command "--preserve" tramp-gvfs-url-file-name file-error "%s failed, see buffer `%s' for details." buffer-name current-window-configuration #[nil "\301!\207" [#3# set-window-configuration] 2] bufferp process-buffer #[nil "\203, \203, \n\306U\204, \307 \204, \310 \203, \311\312\313\f
#\210\314!\210\315 \210\316\317!\210)\320\321\322\"\323\"@\232\205@ \324 \241\207" [buf tramp-message-show-message tramp-verbose enable-recursive-minibuffers fmt-string arguments 0 tramp-completion-mode-p current-message t apply message pop-to-buffer discard-input sit-for 30 butlast append nil 2 current-time vec tramp-current-connection] 4] tramp-error tramp-set-connection-property tramp-gvfs-do-copy-or-rename-file "done" rename tramp-flush-file-property file-name-directory] 11 (#$ . 14837)])
#@35 Like `copy-file' for Tramp files.
(defalias 'tramp-gvfs-handle-copy-file #[(filename newname &optional ok-if-already-exists keep-date preserve-uid-gid preserve-extended-attributes) "\306!\306 !\307!\204 \307 !\203 \310\311 \n \f
&\207
\203/ \312\313 \n \f
\257\"\207\f\203> \312\313 \n \f\257\"\207\312\313 \n F\"\207" [filename newname ok-if-already-exists keep-date preserve-uid-gid preserve-extended-attributes expand-file-name tramp-tramp-file-p tramp-gvfs-do-copy-or-rename-file copy tramp-run-real-handler copy-file] 8 (#$ . 23484)])
#@42 Like `delete-directory' for Tramp files.
(defalias 'tramp-gvfs-handle-delete-directory #[(directory &optional recursive trash) "\203 \306 !\204 \307\310\311 \312\313#\"\210\314 !\315\n!\316\n! \317\n! \320\n! &\321\n! '\322\n\323&!\"\210\324\n&\"\210\325\n(\203K )\203K \326\202L \327\330 !#?\205\306 r\331\n!q\210eb\210\332\n\333\334 C * + , - .\335 /\336\216\337.!\203 .\206\230 \340-!\203\215 \341-!\206\230 \342-!\205\230 \331-! .\342-!\203\246 -\206\265 .\205\265 r.q\210\3140!) 1\343\216\344\345-,+*%. .\207" [recursive directory v method user host file-symlink-p mapc #[(file) "\303!@\304=\203 \305 \n#\207\306\n\"\207" [file recursive trash file-attributes t tramp-compat-delete-directory tramp-compat-delete-file] 4] directory-files full "^\\([^.]\\|\\.\\([^.]\\|\\..\\)\\).*" tramp-dissect-file-name tramp-file-name-method tramp-file-name-user tramp-file-name-host tramp-file-name-localname tramp-file-name-hop tramp-flush-file-property file-name-directory tramp-flush-directory-property tramp-gvfs-send-command "gvfs-trash" "gvfs-rm" tramp-gvfs-url-file-name tramp-get-connection-buffer nil file-error "Couldn't delete %s" current-window-configuration #[nil "\301!\207" [#1=#:wconfig set-window-configuration] 2] bufferp processp process-buffer vectorp #[nil "\203, \203, \n\306U\204, \307 \204, \310 \203, \311\312\313\f
#\210\314!\210\315 \210\316\317!\210)\320\321\322\"\323\"@\232\205@ \324 \241\207" [buf tramp-message-show-message tramp-verbose enable-recursive-minibuffers fmt-string arguments 0 tramp-completion-mode-p current-message t apply message pop-to-buffer discard-input sit-for 30 butlast append nil 2 current-time vec tramp-current-connection] 4] apply tramp-error localname hop trash delete-by-moving-to-trash arguments fmt-string signal vec-or-proc buf #1# default-directory vec] 6 (#$ . 24043)])
#@37 Like `delete-file' for Tramp files.
(defalias 'tramp-gvfs-handle-delete-file #[(filename &optional trash) "\306!\307 !\310 !\311 ! \312 ! \313 ! \314 \315
!\"\210\314
\"\210\316 \2035 !\2035 \317\2026 \320\321!#?\205\260 r\322 !q\210eb\210\323 \324\325C \" # $ % &\326 '\327\216\330&!\203i &\206\202 \331%!\203w \332%!\206\202 \333%!\205\202 \322%! &\333%!\203\220 %\206\237 &\205\237 r&q\210\306(!) )\334\216\335\336%$#\"%. .\207" [filename v method user host localname tramp-dissect-file-name tramp-file-name-method tramp-file-name-user tramp-file-name-host tramp-file-name-localname tramp-file-name-hop tramp-flush-file-property file-name-directory tramp-gvfs-send-command "gvfs-trash" "gvfs-rm" tramp-gvfs-url-file-name tramp-get-connection-buffer nil file-error "Couldn't delete %s" current-window-configuration #[nil "\301!\207" [#1=#:wconfig set-window-configuration] 2] bufferp processp process-buffer vectorp #[nil "\203, \203, \n\306U\204, \307 \204, \310 \203, \311\312\313\f
#\210\314!\210\315 \210\316\317!\210)\320\321\322\"\323\"@\232\205@ \324 \241\207" [buf tramp-message-show-message tramp-verbose enable-recursive-minibuffers fmt-string arguments 0 tramp-completion-mode-p current-message t apply message pop-to-buffer discard-input sit-for 30 butlast append nil 2 current-time vec tramp-current-connection] 4] apply tramp-error hop trash delete-by-moving-to-trash arguments fmt-string signal vec-or-proc buf #1# default-directory vec] 6 (#$ . 25919)])
#@42 Like `expand-file-name' for Tramp files.
(defalias 'tramp-gvfs-handle-expand-file-name #[(name &optional dir) "\206 \206 \306\307\n!\204 \310!\nP\311\n!\204# \312\313\n\314D\"\207\315\n!\316 ! \317 ! \320 ! @\321 ! A\322 ! B\323\324A\"\203h \325 C\326\216\327\330\f
@\306B%!\210*\331\332 \306\333\334$\314\335A\336%A\323\337A\"\203 \340\341\nC D E F G\314 HG\211 G\203VG\342\343\344\345\346!! I\347\216I I\350 \210)rIq\210\351 +C D E J G\3521MJKX\205I\325 C\353\216H\203\367 J\354X\203\367 \355\356J\357U\203\331 \360\202\360 J\336U\203\344 \360\202\360 J\361U\203\357 \362\202\360 \363EPD#\210K\364Y\205H\365G!\203\357 K\366G\367\314#G)J\336U\2032\357 Kr\370G!q\210E\343PE\371D\351 C\"D*\372G!\205H\355\373G\374\375J\"EPD$*0\202Q\210\202R\210,\202\232K\342Y\203\232 Lr\344\376!q\210p\377 \210L\314\211MN\335\211O\335 P Q\201S \210\201T \201U !\210+\211 R I\350 \210\201V R!\210+)G\203mG\336\201W \201X F\211\201Y N\355\201Z ED#E!C D E J G\201[ 1gJKX\205c\325 C\201\\ \216H\203J\354X\203\355\356J\357U\203\363\360\202\nJ\336U\203\376\360\202\nJ\361U\203 \362\202\n\363EPD#\210K\364Y\205b\365G!\203+\357 K\366G\367\314#G)J\336U\203L\357 Kr\370G!q\210E\343PE\371D\351 C\"D*\372G!\205b\355\373G\374\375J\"EPD$*0\202k\210\202l\210,\201F F\355\201Z ED#C\"\210-\312\307AC\"\204\216\306APA\323\201] \f\"\203\256\323\201^ A\"\203\301\331\306\335\211A\336%A\202\301\323\201_ A\"\203\301\331\306\335\211A$A\323\201` A\"\203\327\331\306\335\211A$A\202\301\201a \f
@\312\313AC\"$.\207" [dir default-directory name v method user "/" file-name-absolute-p file-name-as-directory tramp-tramp-file-p tramp-run-real-handler expand-file-name nil tramp-dissect-file-name tramp-file-name-method tramp-file-name-user tramp-file-name-host tramp-file-name-localname tramp-file-name-hop string-match "\\`\\(~\\)\\(/\\|\\'\\)" match-data #[nil "\301\302\"\207" [save-match-data-internal set-match-data evaporate] 3] tramp-gvfs-maybe-open-connection vector replace-match tramp-get-file-property "default-location" "~" t 1 "\\`\\(~[^/]*\\)\\(.*\\)\\'" file-error "Cannot expand tilde in file `%s'" 10 "\n%s" get-buffer-create generate-new-buffer-name " *string-output*" #[nil "\301!\207" [standard-output kill-buffer] 2] backtrace buffer-string (error) #[nil "\301\302\"\207" [save-match-data-internal set-match-data evaporate] 3] 3 apply message 0 "" 2 "Warning: " "Tramp: " 4 processp tramp-get-connection-property "vector" tramp-get-connection-buffer append vectorp tramp-debug-message format "(%d) # " "*debug tramp*" kill-all-local-variables host localname hop save-match-data-internal arguments fmt-string signal vec-or-proc tramp-message-show-message standard-output level tramp-verbose #1=#:old-dir buffer-read-only buffer-file-name buffer-undo-list inhibit-modification-hooks inhibit-read-only #2=#:buf erase-buffer run-hooks temp-buffer-setup-hook internal-temp-output-buffer-show "%s" error-message-string error-message format-message (error) #[nil "\301\302\"\207" [save-match-data-internal set-match-data evaporate] 3] "^\\(afp\\|smb\\)$" "^/[^/]+\\(/\\.\\./?\\)" "^/\\.\\./?" "//" tramp-make-tramp-file-name] 11 (#$ . 27436)])
#@41 Like `file-attributes' for Tramp files.
(defalias 'tramp-gvfs-handle-file-attributes #[(filename &optional id-format) "\204 \306\3071 \310\nB\311\211\211\211\211\211\211\211\211\211\211\211 @ A B C D E F G H\312I! J\313J! K\314J! L\315J! M\316J! N\317J! O\320N!\203\317\321JN\322\323\"\324$\211 P\324=\203\311J\325\326NC Q R S T\3271 SUX\205\330 V\331\216W\203\307 S\332X\203\307 \333\334S\335U\203\251 \336\202\300 S\337U\203\264 \336\202\300 S\340U\203\277 \341\202\300 \342RPQ#\210U\343Y\205\344T!\203\341 \335 U\345T\346\311#T)S\337U\203\335 Ur\347T!q\210R\350PR\351Q\352 C\"Q*\353T!\205\333\354T\322\355S\"RPQ$*0\202!\210\202\"\210,\356J\357\360I!#\210r\347J!q\210eb\210\361\362\311\363#\205\267eb\210\361\364\311\363#\205K\363Heb\210\361\365\311\363#\205[\366\337!Geb\210\361\367\311\363#\203p\370\366\337!!\202q\335Feb\210\306=\203\220\361\371\311\363#\203\214\370\366\337!!\202\237\372\202\237\361\373\311\363#\203\236\366\337!\202\237\374E\306=\203\273\361\375\311\363#\203\267\370\366\337!!\202\312\372\202\312\361\376\311\363#\203\311\366\337!\202\312\374Deb\210\361\377\311\363#\203\343\201X \370\366\337!!!\202\346\201Y Ceb\210\361\201Z \311\363#\203\201X \370\366\337!!!\202\201[ Beb\210\361\201\\ \311\363#\203 \201X \370\366\337!!!\202\"\201] Aeb\210\361\201^ \311\363#\2039\370\366\337!!\202:\335@eb\210\361\201_ \311\363#\203U\201` \370\366\337!!!\202cH\203`\201a \202c\201b eb\210\361\201c \311\363#\203y\370\366\337!!\202\201d J!eb\210\361\201e \311\363#\203\225\370\366\337!!\202\233\201f J!H\206\243GFEDCBA@
\311\f \257\f)P\201g JN\322\323\"P$\210P)\202 J\325\326NC Q R S T\201h 1\201SUX\205}\330 V\201i \216W\203+S\332X\203+\333\334S\335U\203
\336\202$S\337U\203\336\202$S\340U\203#\341\202$\342RPQ#\210U\343Y\205|\344T!\203E\335 U\345T\346\311#T)S\337U\203f\335 Ur\347T!q\210R\350PR\351Q\352 C\"Q*\353T!\205|\333\354T\322\355S\"RPQ$*0\202\205\210\202\206\210,\356J\357\360I!#\210r\347J!q\210eb\210\361\362\311\363#\205eb\210\361\364\311\363#\205\257\363Heb\210\361\365\311\363#\205\277\366\337!Geb\210\361\367\311\363#\203\324\370\366\337!!\202\325\335Feb\210\306=\203\364\361\371\311\363#\203\360\370\366\337!!\202\372\202\361\373\311\363#\203\366\337!\202\374E\306=\203 \361\375\311\363#\203\370\366\337!!\202.\372\202.\361\376\311\363#\203-\366\337!\202.\374Deb\210\361\377\311\363#\203G\201X \370\366\337!!!\202J\201Y Ceb\210\361\201Z \311\363#\203e\201X \370\366\337!!!\202h\201[ Beb\210\361\201\\ \311\363#\203\203\201X \370\366\337!!!\202\206\201] Aeb\210\361\201^ \311\363#\203\235\370\366\337!!\202\236\335@eb\210\361\201_ \311\363#\203\271\201` \370\366\337!!!\202\307H\203\304\201a \202\307\201b eb\210\361\201c \311\363#\203\335\370\366\337!!\202\343\201d J!eb\210\361\201e \311\363#\203\371\370\366\337!!\202\377\201f J!H\206GFEDCBA@
\311\f \257\f).0\207\210\311\207" [id-format last-coding-system-used process-environment res-device res-inode res-filemodes integer (error) "LC_MESSAGES=C" nil tramp-dissect-file-name tramp-file-name-method tramp-file-name-user tramp-file-name-host tramp-file-name-localname tramp-file-name-hop file-name-absolute-p tramp-get-file-property format "file-attributes-%s" undef 5 "file attributes: %s" (error) match-data #[nil "\301\302\"\207" [save-match-data-internal set-match-data evaporate] 3] 3 apply message 0 "" 1 2 "Warning: " "Tramp: " 4 processp tramp-get-connection-property "vector" tramp-get-connection-buffer "\n%s" append buffer-string vectorp tramp-debug-message "(%d) # " tramp-gvfs-send-command "gvfs-info" tramp-gvfs-url-file-name re-search-forward "attributes:" t "type: directory" "standard::symlink-target: \\(.+\\)$" match-string "unix::nlink: \\([0-9]+\\)" string-to-number "unix::uid: \\([0-9]+\\)" -1 "owner::user: \\(.+\\)$" "UNKNOWN" "unix::gid: \\([0-9]+\\)" "owner::group: \\(.+\\)$" "time::access: \\([0-9]+\\)" res-size res-change res-mod res-access res-gid res-uid res-numlinks res-symlink-target dirp filename v method user host localname hop value arguments fmt-string level vec-or-proc tramp-verbose save-match-data-internal tramp-message-show-message seconds-to-time (0 0) "time::modified: \\([0-9]+\\)" (0 0) "time::changed: \\([0-9]+\\)" (0 0) "standard::size: \\([0-9]+\\)" "unix::mode: \\([0-9]+\\)" tramp-file-mode-from-int "drwx------" "-rwx------" "unix::inode: \\([0-9]+\\)" tramp-get-inode "unix::device: \\([0-9]+\\)" tramp-get-device tramp-set-file-property (error) #[nil "\301\302\"\207" [save-match-data-internal set-match-data evaporate] 3]] 15 (#$ . 30701)])
#@42 Like `file-directory-p' for Tramp files.
(defalias 'tramp-gvfs-handle-file-directory-p #[(filename) "\301!@\302=\207" [filename file-attributes t] 2 (#$ . 35436)])
#@43 Like `file-executable-p' for Tramp files.
(defalias 'tramp-gvfs-handle-file-executable-p #[(filename) "\306!\307 !\310 !\311 ! \312 ! \313 ! \314
!\203A \315
\316\317$\211 \317=\203; \320 \321\"\322
\316$\210)\202E \320 \321\".\207" [filename v method user host localname tramp-dissect-file-name tramp-file-name-method tramp-file-name-user tramp-file-name-host tramp-file-name-localname tramp-file-name-hop file-name-absolute-p tramp-get-file-property "file-executable-p" undef tramp-check-cached-permissions 120 tramp-set-file-property hop value] 6 (#$ . 35607)])
#@41 Like `file-local-copy' for Tramp files.
(defalias 'tramp-gvfs-handle-file-local-copy #[(filename) "\306!\307 !\310 !\311 ! \312 ! \313 ! @\314 A B\314 C\315\316J\314 C\317\320!\2037 \321\320\322N@!\206\254 \323\324!\203N \325\324!\204I \326\324!\205\254 \324 \202\254 \327\330!\211 D\205[ \331D!)\203g \332\327\330!!\202\254 \327\333!\211 D\205t \331D!)\203\200 \332\327\333!!\202\254 \327\334!\211 D\205\215 \331D!)\203\231 \332\327\334!!\202\254 \335\336!\203\245 \332\336!\202\254 \337\340!\210\332\341!)\" E\342B\343\" F\314 G\3441\331 \325\345!\204\312 \326\345!\205\322 \345EAF#\211G0\202\f\210\3461\347E!FPGA\203\364 \350G!\210\202\375 \351\352\314G\314\353%\210\3140\202\210\202\332 \203
\202\332 \210G. H\335!\204V \354\355C I J K L\314 ML\211 L\203L\356\357\360\361\362!! N\363\216N N\364 \210)rNq\210\365 +C I J O L\3661\nOPX\205\367 Q\370\216M\203\240O\371X\203\240\372\337O\373U\203\202\352\202\231O\374U\203\215\352\202\231O\375U\203\230\376\202\231\377JPI#\210P\201Z Y\205\201[ L!\203\302\373 P\201\\ L\201] \314#L)O\374U\203\347\373 Pr\201^ L!q\210J\357PJ\201_ I\365 C\"I*\201` L!\205\372\201a L\201b \201c O\"JPI$*0\202\210\202\210,\202]P\356Y\203]R Sr\360\201d !q\210p\201e \210SR\314\211TU\343\211V\343 W X\201f \210\201g \201h !\210+\211 Y N\364 \210\201i Y!\210+)L\203DL\374\201j \201k K\211\201l N\372\201m JI#E!C I J O L\201n 1>OPX\205:\367 Q\201o \216M\203\324O\371X\203\324\372\337O\373U\203\266\352\202\315O\374U\203\301\352\202\315O\375U\203\314\376\202\315\377JPI#\210P\201Z Y\2059\201[ L!\203\366\373 P\201\\ L\201] \314#L)O\374U\203\373 Pr\201^ L!q\210J\357PJ\201_ I\365 C\"I*\201` L!\2059\372\201a L\201b \201c O\"JPI$*0\202B\210\202C\210,\201K K\372\201m JI#C\"\210-\201p H\343\211$\210H.\207" [filename v method user host localname tramp-dissect-file-name tramp-file-name-method tramp-file-name-user tramp-file-name-host tramp-file-name-localname tramp-file-name-hop nil expand-file-name tramp-temp-name-prefix boundp temporary-file-directory eval standard-value fboundp temp-directory subrp functionp getenv "TEMP" file-directory-p file-name-as-directory "TMP" "TMPDIR" file-exists-p "c:/temp" message "Neither `temporary-file-directory' nor `temp-directory' is defined -- using /tmp." "/tmp" file-name-extension t (error) make-temp-file (file-already-exists) make-temp-name make-directory write-region "" silent file-error "Cannot make local copy of non-existing file `%s'" 10 "\n%s" get-buffer-create generate-new-buffer-name " *string-output*" #[nil "\301!\207" [standard-output kill-buffer] 2] backtrace buffer-string (error) match-data #[nil "\301\302\"\207" [save-match-data-internal set-match-data evaporate] 3] 3 apply 0 1 2 "Warning: " "Tramp: " hop dir-flag f file-name-handler-alist d prefix extension result tmpfile arguments fmt-string signal vec-or-proc tramp-message-show-message standard-output level tramp-verbose save-match-data-internal default-directory #1=#:old-dir buffer-read-only buffer-file-name buffer-undo-list inhibit-modification-hooks inhibit-read-only #2=#:buf 4 processp tramp-get-connection-property "vector" tramp-get-connection-buffer append vectorp tramp-debug-message format "(%d) # " "*debug tramp*" kill-all-local-variables erase-buffer run-hooks temp-buffer-setup-hook internal-temp-output-buffer-show "%s" error-message-string error-message format-message (error) #[nil "\301\302\"\207" [save-match-data-internal set-match-data evaporate] 3] copy-file] 11 (#$ . 36193)])
#@51 Like `file-name-all-completions' for Tramp files.
(defalias 'tramp-gvfs-handle-file-name-all-completions #[(filename directory) "\306 \307\216\310\311 \"*?\205\300 \312\313\n!!\314 ! \315 ! \316 ! .\317 ! /\320 ! 0\321 \322\3231\2066 2 1\324\325\322\326\327 G\330\331#\"\"@)\206\274 \332\333 3 4\334 \335\336\337\n!$\210\340\341! 5r5q\210\342\216\343\344 !!\210db\210\331y\345U\203\242 `\346 {3\310 3\"\203m \347\3133\n\"!\203\230 3\311P4B4\202m 34B4\202m +\350 /\351\352$\210\353\3544\"\210\350 / P\3554$*\"\".\207" [save-match-data-internal filename directory v method user match-data #[nil "\301\302\"\207" [save-match-data-internal set-match-data evaporate] 3] string-match "/" tramp-dissect-file-name expand-file-name tramp-file-name-method tramp-file-name-user tramp-file-name-host tramp-file-name-localname tramp-file-name-hop all-completions mapcar list apply append #[(x) "\305 \n\306 OP\307\310$\211 \205 \fC)\207" [v localname filename x cache-hit tramp-get-file-property 0 "file-name-all-completions" nil] 7] tramp-compat-number-sequence 1 -1 ("." "..") nil tramp-gvfs-send-command "gvfs-ls" "-h" tramp-gvfs-url-file-name generate-new-buffer " *temp*" #[nil "\301!\205 \302!\207" [#1=#:temp-buffer buffer-name kill-buffer] 2] insert-buffer-substring tramp-get-connection-buffer 0 point-at-eol file-directory-p tramp-set-file-property "file-exists-p" t mapc #[(entry) "\303 \nP\304\305$\207" [v localname entry tramp-set-file-property "file-exists-p" t] 5] "file-name-all-completions" host localname hop remote-file-name-inhibit-cache tramp-completion-reread-directory-timeout entry result #1#] 12 (#$ . 39797)])
#@47 Like `file-notify-add-watch' for Tramp files.
(defalias 'tramp-gvfs-handle-file-notify-add-watch #[(file-name flags _callback) "\306!\307!\310 !\311 !\312 ! \313 ! \314 ! @\315!\203 \316\317C A B < C\320 DC\211 C\203 C\321\322\323\324\325!! E\326\216E E\327 \210)rEq\210\330 +C A B F C\3311 FGX\205\374 \332 H\333\216D\203\252 F\334X\203\252 \335\336F\337U\203\214 \340\202\243 F\341U\203\227 \340\202\243 F\342U\203\242 \343\202\243 \344BPA#\210G\345Y\205\373 \346C!\203\304 \337 G\347C\350\320#C)F\341U\203\345 \337 Gr\351C!q\210B\322PB\352A\330 C\"A*\353C!\205\373 \335\354C\355\356F\"BPA$*0\202\210\202\210,\202GG\321Y\203GI Jr\323\357!q\210p\360 \210JI\320\211KL\361\211M\361 N O\362 \210\363\364!\210+\211 P E\327 \210\365P!\210+)C\203C\341\366\367<\211\370N\335\371BA#E!C A B F C\3721FGX\205\332 H\373\216D\203\262F\334X\203\262\335\336F\337U\203\224\340\202\253F\341U\203\237\340\202\253F\342U\203\252\343\202\253\344BPA#\210G\345Y\205\346C!\203\314\337 G\347C\350\320#C)F\341U\203\355\337 Gr\351C!q\210B\322PB\352A\330 C\"A*\353C!\205\335\354C\355\356F\"BPA$*0\202\f\210\202
\210,\374<\335\371BA#C\"\210-\375! I\376Q>\2035\377Q>\2035\201T \202L\376Q>\203B\201U \202L\377Q>\205L\201V R\201W \201X \201Y \201Z !\201X \201[ !$ S\346S!\204r \316\317C A B < C\320 DC\211 C\203YC\321\322\323\324\325!! E\201\\ \216E E\327 \210)rEq\210\330 +C A B F C\201] 1PFGX\205L\332 H\201^ \216D\203\372F\334X\203\372\335\336F\337U\203\334\340\202\363F\341U\203\347\340\202\363F\342U\203\362\343\202\363\344BPA#\210G\345Y\205K\346C!\203\337 G\347C\350\320#C)F\341U\2035\337 Gr\351C!q\210B\322PB\352A\330 C\"A*\353C!\205K\335\354C\355\356F\"BPA$*0\202T\210\202U\210,\202\227G\321Y\203\227I Jr\323\357!q\210p\360 \210JI\320\211KL\361\211M\361 N O\362 \210\363\364!\210+\211 P E\327 \210\365P!\210+)C\203bC\341\366\367<\211\370N\335\371BA#E!C A B F C\201_ 1\\FGX\205X\332 H\201` \216D\203F\334X\203\335\336F\337U\203\350\340\202\377F\341U\203\363\340\202\377F\342U\203\376\343\202\377\344BPA#\210G\345Y\205W\346C!\203 \337 G\347C\350\320#C)F\341U\203A\337 Gr\351C!q\210B\322PB\352A\330 C\"A*\353C!\205W\335\354C\355\356F\"BPA$*0\202`\210\202a\210,\374<\335\371BA#C\"-\202\211 \201a \201b \201c \201d \201e S!\201f #SD A B F C\201g 17FGX\2053\332 H\201h \216D\203\341F\334X\203\341\335\336F\337U\203\303\340\202\332F\341U\203\316\340\202\332F\342U\203\331\343\202\332\344BPA#\210G\345Y\2052\346C!\203\373\337 G\347C\350\320#C)F\341U\203 \337 Gr\351C!q\210B\322PB\352A\330 C\"A*\353C!\2052\335\354C\355\356F\"BPA$*0\202;\210\202<\210,\201i S\350 #\210\201j S\201R R#\210\201j S\201k
#\210\201l S\320\"\210\201m S\201n \"\210\201o S\341\"\210\201p S!\201q >\204\207 \316\317C A B < C\320 DC\211 C\203pC\321\322\323\324\325!! E\201r \216E E\327 \210)rEq\210\330 +C A B F C\201s 1gFGX\205c\332 H\201t \216D\203F\334X\203\335\336F\337U\203\363\340\202\nF\341U\203\376\340\202\nF\342U\203 \343\202\n\344BPA#\210G\345Y\205b\346C!\203+\337 G\347C\350\320#C)F\341U\203L\337 Gr\351C!q\210B\322PB\352A\330 C\"A*\353C!\205b\335\354C\355\356F\"BPA$*0\202k\210\202l\210,\202\256G\321Y\203\256I Jr\323\357!q\210p\360 \210JI\320\211KL\361\211M\361 N O\362 \210\363\364!\210+\211 P E\327 \210\365P!\210+)C\203yC\341\366\367<\211\370N\335\371BA#E!C A B F C\201u 1sFGX\205o\332 H\201v \216D\203 F\334X\203 \335\336F\337U\203\377\340\202F\341U\203\n\340\202F\342U\203\343\202\344BPA#\210G\345Y\205n\346C!\2037\337 G\347C\350\320#C)F\341U\203X\337 Gr\351C!q\210B\322PB\352A\330 C\"A*\353C!\205n\335\354C\355\356F\"BPA$*0\202w\210\202x\210,\374<\335\371BA#C\"\210-S. \207" [file-name v method user host localname expand-file-name tramp-dissect-file-name tramp-file-name-method tramp-file-name-user tramp-file-name-host tramp-file-name-localname tramp-file-name-hop file-directory-p file-notify-error "Monitoring not supported for `%s'" nil 10 "\n%s" get-buffer-create generate-new-buffer-name " *string-output*" #[nil "\301!\207" [standard-output kill-buffer] 2] backtrace buffer-string (error) match-data #[nil "\301\302\"\207" [save-match-data-internal set-match-data evaporate] 3] 3 apply message 0 "" 1 2 "Warning: " "Tramp: " 4 processp tramp-get-connection-property "vector" tramp-get-connection-buffer append vectorp tramp-debug-message format "(%d) # " "*debug tramp*" kill-all-local-variables t erase-buffer run-hooks temp-buffer-setup-hook internal-temp-output-buffer-show "%s" error-message-string error-message format-message (error) #[nil "\301\302\"\207" [save-match-data-internal set-match-data evaporate] 3] signal file-name-directory change attribute-change hop arguments fmt-string vec-or-proc tramp-message-show-message standard-output level tramp-verbose save-match-data-internal default-directory #1=#:old-dir buffer-read-only buffer-file-name buffer-undo-list inhibit-modification-hooks inhibit-read-only #2=#:buf flags events p (created changed changes-done-hint moved deleted attribute-changed) (created changed changes-done-hint moved deleted) (attribute-changed) start-process "gvfs-monitor-file" generate-new-buffer " *gvfs-monitor-file*" tramp-gvfs-url-file-name #[nil "\301!\207" [standard-output kill-buffer] 2] (error) #[nil "\301\302\"\207" [save-match-data-internal set-match-data evaporate] 3] (error) #[nil "\301\302\"\207" [save-match-data-internal set-match-data evaporate] 3] 6 "Run `%s', %S" mapconcat identity process-command " " (error) #[nil "\301\302\"\207" [save-match-data-internal set-match-data evaporate] 3] tramp-set-connection-property tramp-compat-process-put watch-name tramp-compat-set-process-query-on-exit-flag set-process-filter tramp-gvfs-monitor-file-process-filter tramp-accept-process-output process-status (run open) #[nil "\301!\207" [standard-output kill-buffer] 2] (error) #[nil "\301\302\"\207" [save-match-data-internal set-match-data evaporate] 3] (error) #[nil "\301\302\"\207" [save-match-data-internal set-match-data evaporate] 3]] 11 (#$ . 41453)])
#@80 Read output from "gvfs-monitor-file" and add corresponding file-notify events.
(defalias 'tramp-gvfs-monitor-file-process-filter #[(proc string) "\306\301\"r\307!q\210\n)\310\311 !! \203\305 \312\313 C @ A B\3141\277 ACX\205\273 \315 D\316\216E\203l A\317X\203l \320\321A\322U\203O \323\202f A\324U\203Z \323\202f A\325U\203e \326\202f \327@P
#\210C\330Y\205\272 \331B!\203\206 \322 C\332B\333\334#B)A\324U\203\245 \322 Cr\335B!q\210@\336P@\337
\340 C\"*\341B!\205\272 \320\342B\343\344A\"@P
$*0\202\303 \210\202\304 \210,\345\346FD @ A B\3471nACX\205j\315 D\350\216E\203A\317X\203\320\321A\322U\203\376 \323\202A\324U\203 \323\202A\325U\203\326\202\327@P
#\210C\330Y\205i\331B!\2035\322 C\332B\333\334#B)A\324U\203T\322 Cr\335B!q\210@\336P@\337
\340 C\"*\341B!\205i\320\342B\343\344A\"@P
$*0\202r\210\202s\210, FPF\351\352\353F#F\354\355F\"\203\216\356!\210\354\357F\"\203\373\360\324F\"\361\351\362\363\360\325F\"\227#! G H\364\323\334\211F$F\354\fH\"\203\305\364 \334\211H$H\354\365H\"\203\342\364\366\367\360\324H\"\370\"!\334\211H$H\202\305\371\372!\204\356\373\372!\203\367\372GHE!\210*\202\216FG\322U\203\334FF\203\271\312\374FC @ A B\3751\263ACX\205\257\315 D\376\216E\203`A\317X\203`\320\321A\322U\203C\323\202ZA\324U\203N\323\202ZA\325U\203Y\326\202Z\327@P
#\210C\330Y\205\256\331B!\203z\322 C\332B\333\334#B)A\324U\203\231\322 Cr\335B!q\210@\336P@\337
\340 C\"*\341B!\205\256\320\342B\343\344A\"@P
$*0\202\267\210\202\270\210,\377\301F#+\207" [proc rest-string default-directory dd ddu arguments tramp-compat-process-get process-buffer regexp-quote tramp-gvfs-url-file-name 10 "Previous string:\n%s" (error) match-data #[nil "\301\302\"\207" [save-match-data-internal set-match-data evaporate] 3] 3 apply message 0 "" 1 2 "Warning: " "Tramp: " 4 processp tramp-get-connection-property "vector" nil tramp-get-connection-buffer "\n%s" append buffer-string vectorp tramp-debug-message format "(%d) # " 6 "%S\n%s" (error) #[nil "\301\302\"\207" [save-match-data-internal set-match-data evaporate] 3] tramp-compat-replace-regexp-in-string "ATTRIB CHANGED" "ATTRIBUTE_CHANGED" string-match "Monitoring not supported" delete-process "^[\n
]*File Monitor Event:[\n
]+File = \\([^\n
]+\\)[\n
]+Event = \\([^[:blank:]]+\\)[\n
]+" match-string intern-soft "_" "-" replace-match "%\\([0-9A-F]\\{2\\}\\)" char-to-string string-to-number 16 subrp file-notify-callback functionp "Rest string:\n%s" (error) #[nil "\301\302\"\207" [save-match-data-internal set-match-data evaporate] 3] tramp-compat-process-put fmt-string level vec-or-proc tramp-verbose save-match-data-internal tramp-message-show-message string action file] 8 (#$ . 47756)])
#@41 Like `file-readable-p' for Tramp files.
(defalias 'tramp-gvfs-handle-file-readable-p #[(filename) "\306!\307 !\310 !\311 ! \312 ! \313 ! \314
!\203A \315
\316\317$\211 \317=\203; \320 \321\"\322
\316$\210)\202E \320 \321\".\207" [filename v method user host localname tramp-dissect-file-name tramp-file-name-method tramp-file-name-user tramp-file-name-host tramp-file-name-localname tramp-file-name-hop file-name-absolute-p tramp-get-file-property "file-executable-p" undef tramp-check-cached-permissions 114 tramp-set-file-property hop value] 6 (#$ . 50556)])
#@41 Like `file-writable-p' for Tramp files.
(defalias 'tramp-gvfs-handle-file-writable-p #[(filename) "\306!\307 !\310 !\311 ! \312 ! \313 ! \314
!\203W \315
\316\317$\211 \317=\203Q \320!\203: \321 \322\"\202G \323\324!!\205G \325\324!!\326
\316$\210)\202q \320!\203d \321 \322\"\202q \323\324!!\205q \325\324!!.\207" [filename v method user host localname tramp-dissect-file-name tramp-file-name-method tramp-file-name-user tramp-file-name-host tramp-file-name-localname tramp-file-name-hop file-name-absolute-p tramp-get-file-property "file-writable-p" undef file-exists-p tramp-check-cached-permissions 119 file-directory-p file-name-directory file-writable-p tramp-set-file-property hop value] 6 (#$ . 51138)])
#@40 Like `make-directory' for Tramp files.
(defalias 'tramp-gvfs-handle-make-directory #[(dir &optional parents) "\306\307!!\310!\311 !\312 !\313 ! \314 ! \315 ! @\316 \317
!\"\210\320
\"\210\321 A\322\216\317! BC\203I \323B!\204I \324BC\"\210\325 \326\327!#?\205Z \330\331C D E F G\332 HG\211 G\203:G\333\334\335\336\337!! I\340\216I I\341 \210)rIq\210\342 +C D E J G\34311JKX\205-\321 A\344\216H\203\333 J\345X\203\333 \346\347J\350U\203\275 \351\202\324 J\352U\203\310 \351\202\324 J\353U\203\323 \354\202\324 \355EPD#\210K\356Y\205,\357G!\203\365 \350 K\360G\361\332#G)J\352U\203\350 Kr\362G!q\210E\334PE\363D\342 C\"D*\364G!\205,\346\365G\366\367J\"EPD$*0\2025\210\2026\210,\202xK\333Y\203xL Mr\335\370!q\210p\371 \210ML\332\211NO\372\211P\372 Q R\373 \210\374\375!\210+\211 S I\341 \210\376S!\210+)G\203IG\352\377\201T F\211\201U N\346\201V ED#E!C D E J G\201W 1CJKX\205?\321 A\201X \216H\203\355J\345X\203\355\346\347J\350U\203\317\351\202\346J\352U\203\332\351\202\346J\353U\203\345\354\202\346\355EPD#\210K\356Y\205>\357G!\203\350 K\360G\361\332#G)J\352U\203(\350 Kr\362G!q\210E\334PE\363D\342 C\"D*\364G!\205>\346\365G\366\367J\"EPD$*0\202G\210\202H\210,\201F F\346\201V ED#C\"-. \207" [dir v method user host localname directory-file-name expand-file-name tramp-dissect-file-name tramp-file-name-method tramp-file-name-user tramp-file-name-host tramp-file-name-localname tramp-file-name-hop tramp-flush-file-property file-name-directory tramp-flush-directory-property match-data #[nil "\301\302\"\207" [save-match-data-internal set-match-data evaporate] 3] file-directory-p make-directory tramp-gvfs-send-command "gvfs-mkdir" tramp-gvfs-url-file-name file-error "Couldn't make directory %s" nil 10 "\n%s" get-buffer-create generate-new-buffer-name " *string-output*" #[nil "\301!\207" [standard-output kill-buffer] 2] backtrace buffer-string (error) #[nil "\301\302\"\207" [save-match-data-internal set-match-data evaporate] 3] 3 apply message 0 "" 1 2 "Warning: " "Tramp: " 4 processp tramp-get-connection-property "vector" tramp-get-connection-buffer append vectorp tramp-debug-message format "(%d) # " "*debug tramp*" kill-all-local-variables t erase-buffer run-hooks temp-buffer-setup-hook internal-temp-output-buffer-show "%s" hop save-match-data-internal ldir parents arguments fmt-string signal vec-or-proc tramp-message-show-message standard-output level tramp-verbose default-directory #1=#:old-dir buffer-read-only buffer-file-name buffer-undo-list inhibit-modification-hooks inhibit-read-only #2=#:buf error-message-string error-message format-message (error) #[nil "\301\302\"\207" [save-match-data-internal set-match-data evaporate] 3]] 11 (#$ . 51877)])
#@37 Like `rename-file' for Tramp files.
(defalias 'tramp-gvfs-handle-rename-file #[(filename newname &optional ok-if-already-exists) "\303!\303 !\304!\204 \304 !\203 \305\306 \n\307\211&\207\310\311 \nE\"\207" [filename newname ok-if-already-exists expand-file-name tramp-tramp-file-p tramp-gvfs-do-copy-or-rename-file rename t tramp-run-real-handler rename-file] 7 (#$ . 54677)])
#@38 Like `write-region' for Tramp files.
(defalias 'tramp-gvfs-handle-write-region #[(start end filename &optional append visit lockname confirm) "\306!\307 !\310 !\311 ! \312 ! \313 ! @A\203%\314!\203%\315\316\317\"!\204% \320\321\322 B C = D\322 ED\211 D\203D\323\324\325\326\327!! F\330\216F F\331 \210)rFq\210\332 +C B C G D\3331 GHX\205\334 I\335\216E\203\263 G\336X\203\263 \337\340G\341U\203\225 \342\202\254 G\343U\203\240 \342\202\254 G\344U\203\253 \345\202\254 \346CPB#\210H\347Y\205\350D!\203\315 \341 H\351D\352\322#D)G\343U\203\356 \341 Hr\353D!q\210C\324PC\354B\332 C\"B*\355D!\205\337\356D\316\357G\"CPB$*0\202
\210\202\210,\202PH\323Y\203PJ Kr\325\360!q\210p\361 \210KJ\322\211LM\362\211N\362 O P\363 \210\364\365!\210+\211 Q F\331 \210\366Q!\210+)D\203D\343\367\370=\211\371N\337\372CB#E!C B C G D\3731GHX\205
\334 I\374\216E\203\273G\336X\203\273\337\340G\341U\203\235\342\202\264G\343U\203\250\342\202\264G\344U\203\263\345\202\264\346CPB#\210H\347Y\205\f\350D!\203\325\341 H\351D\352\322#D)G\343U\203\366\341 Hr\353D!q\210C\324PC\354B\332 C\"B*\355D!\205\f\337\356D\316\357G\"CPB$*0\202\210\202\210,\375=\337\372CB#C\"\210-\322 R S\322 T\376\377J\322 T\201^ \201_ !\203M\201` \201_ \201a N@!\206 \201b \201c !\203r\201d \201c !\204k\201e \201c !\205 \201c \202 \201f \201g !\211 U\205\205\201h U!)\203\227\201i \201f \201g !!\202 \201f \201j !\211 U\205\252\201h U!)\203\274\201i \201f \201j !!\202 \201f \201k !\211 U\205\317\201h U!)\203\341\201i \201f \201k !!\202 \314\201l !\203\363\201i \201l !\202 \340\201m !\210\201i \201n !)\" V\201o S\362\" W\322 X\201p 1;\201d \201q !\204*\201e \201q !\2054\201q VRW#\211X0\202x\210\201r 1n\201s V!WPXR\203\\\201t X!\210\202i\201u \342\322X\322\201v %\210\3220\202r\210\202<\203y\202<\210X. Y,\203\225\314!\203\225\201w Y\201x #\210\201y \201u A\203\264Z[Y,\201z \\A\257\202\303Z[Y,\201z \\\257\"\210\201{ 1\331\201| Y\201} #0\202\345\210\201~ Y!\210 \320\201 C B C = D\322 ED\211 D\203\317D\323\324\325\326\327!! F\201\200 \216F F\331 \210)rFq\210\332 +C B C G D\201\201 1\306GHX\205\302\334 I\201\202 \216E\203pG\336X\203p\337\340G\341U\203R\342\202iG\343U\203]\342\202iG\344U\203h\345\202i\346CPB#\210H\347Y\205\301\350D!\203\212\341 H\351D\352\322#D)G\343U\203\253\341 Hr\353D!q\210C\324PC\354B\332 C\"B*\355D!\205\301\337\356D\316\357G\"CPB$*0\202\312\210\202\313\210,\202
H\323Y\203
J Kr\325\360!q\210p\361 \210KJ\322\211LM\362\211N\362 O P\363 \210\364\365!\210+\211 Q F\331 \210\366Q!\210+)D\203\330D\343\367\370=\211\371N\337\372CB#E!C B C G D\201\203 1\322GHX\205\316\334 I\201\204 \216E\203|G\336X\203|\337\340G\341U\203^\342\202uG\343U\203i\342\202uG\344U\203t\345\202u\346CPB#\210H\347Y\205\315\350D!\203\226\341 H\351D\352\322#D)G\343U\203\267\341 Hr\353D!q\210C\324PC\354B\332 C\"B*\355D!\205\315\337\356D\316\357G\"CPB$*0\202\326\210\202\327\210,\375=\337\372CB#C\"-\210)\201\205 \201\206
!\"\210\201\205
\"\210]\362=\204];\203\201\207 \201\210 \201\211 !8!\210]\362=\204&]\203&];\203\336 \341\201\212 C B C G D\201\213 1\330GHX\205\324\334 I\201\214 \216E\203\202G\336X\203\202\337\340G\341U\203d\342\202{G\343U\203o\342\202{G\344U\203z\345\202{\346CPB#\210H\347Y\205\323\350D!\203\234\341 H\351D\352\322#D)G\343U\203\275\341 Hr\353D!q\210C\324PC\354B\332 C\"B*\355D!\205\323\337\356D\316\357G\"CPB$*0\202\334\210\202\335\210,\364\201\215 !.\207" [filename v method user host localname tramp-dissect-file-name tramp-file-name-method tramp-file-name-user tramp-file-name-host tramp-file-name-localname tramp-file-name-hop file-exists-p y-or-n-p format "File %s exists; overwrite anyway? " file-error "File not overwritten" nil 10 "\n%s" get-buffer-create generate-new-buffer-name " *string-output*" #[nil "\301!\207" [standard-output kill-buffer] 2] backtrace buffer-string (error) match-data #[nil "\301\302\"\207" [save-match-data-internal set-match-data evaporate] 3] 3 apply message 0 "" 1 2 "Warning: " "Tramp: " 4 processp tramp-get-connection-property "vector" tramp-get-connection-buffer append vectorp tramp-debug-message "(%d) # " "*debug tramp*" kill-all-local-variables t erase-buffer run-hooks temp-buffer-setup-hook internal-temp-output-buffer-show "%s" error-message-string error-message format-message (error) #[nil "\301\302\"\207" [save-match-data-internal set-match-data evaporate] 3] signal expand-file-name tramp-temp-name-prefix hop confirm arguments fmt-string vec-or-proc tramp-message-show-message standard-output level tramp-verbose save-match-data-internal default-directory #1=#:old-dir buffer-read-only buffer-file-name buffer-undo-list inhibit-modification-hooks inhibit-read-only #2=#:buf dir-flag f file-name-handler-alist d prefix extension result tmpfile start end lockname visit boundp temporary-file-directory eval standard-value fboundp temp-directory subrp functionp getenv "TEMP" file-directory-p file-name-as-directory "TMP" "TMPDIR" "c:/temp" "Neither `temporary-file-directory' nor `temp-directory' is defined -- using /tmp." "/tmp" file-name-extension (error) make-temp-file (file-already-exists) make-temp-name make-directory write-region silent copy-file ok tramp-run-real-handler no-message (error) rename-file ok-if-already-exists delete-file "Couldn't write region to `%s'" #[nil "\301!\207" [standard-output kill-buffer] 2] (error) #[nil "\301\302\"\207" [save-match-data-internal set-match-data evaporate] 3] (error) #[nil "\301\302\"\207" [save-match-data-internal set-match-data evaporate] 3] tramp-flush-file-property file-name-directory set-visited-file-modtime 5 file-attributes "Wrote %s" (error) #[nil "\301\302\"\207" [save-match-data-internal set-match-data evaporate] 3] tramp-handle-write-region-hook] 11 (#$ . 55069)])
#@32 Return FILENAME in URL syntax.
(defalias 'tramp-gvfs-url-file-name #[(filename) "\306B\307\310\311\n!\203u \312\n!\313 ! \314 ! \315 ! 5\316 ! 6\317 ! 7
\203? \3208
\"\203? \321\322
\"\323\321\324
\"Q\f
\205G \325
!\326 !\327 !6\205V \3256! 9 5 :\330\331:
\30759\n\307\211\332\307\332&\f. \202\213 \325\333\n!!\330\331\334\307\211\211\211\n\307\211\332\307\332&\f)!\311\n!\203b\312\n!\313 ! \314 ! \315 ! 5\316 ! 6\317 ! 7 \335\336\n D ; < = >\3371[=?X\205W\340 @\341\216A\203=\342X\203\343\344=\345U\203\347 \346\202\376 =\324U\203\362 \346\202\376 =\322U\203\375 \347\202\376 \350<P;#\210?\351Y\205V\352>!\203 \345 ?\353>\354\307#>)=\324U\203@\345 ?r\355>!q\210<\356P<\357;\360 C\";*\361>!\205V\343\362>\363\364=\"<P;$*0\202_\210\202`\210.\n *\207" [url-unreserved-chars result filename v method user 47 nil url-recreate-url tramp-tramp-file-p tramp-dissect-file-name tramp-file-name-method tramp-file-name-user tramp-file-name-host tramp-file-name-localname tramp-file-name-hop string-match match-string 2 ";" 1 url-hexify-string tramp-file-name-real-host tramp-file-name-port vector cl-struct-url t file-truename "file" 10 "remote file `%s' is URL `%s'" (error) match-data #[nil "\301\302\"\207" [save-match-data-internal set-match-data evaporate] 3] 3 apply message 0 "" "Warning: " "Tramp: " 4 processp tramp-get-connection-property "vector" tramp-get-connection-buffer "\n%s" append buffer-string vectorp tramp-debug-message format "(%d) # " host localname hop tramp-user-with-domain-regexp portspec type arguments fmt-string level vec-or-proc tramp-verbose save-match-data-internal tramp-message-show-message] 14 (#$ . 61098)])
#@43 Create a D-Bus object path from FILENAME.
(defalias 'tramp-gvfs-object-path #[(filename) "\302\303! \"\207" [filename tramp-gvfs-path-tramp expand-file-name dbus-escape-as-identifier] 3 (#$ . 62795)])
#@44 Retrieve file name from D-Bus OBJECT-PATH.
(defalias 'tramp-gvfs-file-name #[(object-path) "\301\302\303\304#!\207" [object-path dbus-unescape-from-identifier tramp-compat-replace-regexp-in-string "^.*/\\([^/]+\\)$" "\\1"] 5 (#$ . 63003)])
#@69 Return bluetooth device address from a given bluetooth DEVICE name.
(defalias 'tramp-bluez-address #[(device) ";\205 \302 \"\203 \303\304\"\207\305\306 \"A@\207" [device tramp-ipv6-regexp string-match match-string 0 assoc tramp-bluez-list-devices] 3 (#$ . 63250)])
#@141 Return bluetooth device name from a given bluetooth device ADDRESS.
ADDRESS can have the form "xx:xx:xx:xx:xx:xx" or "[xx:xx:xx:xx:xx:xx]".
(defalias 'tramp-bluez-device #[(address) ";\205; \304\305\"\203 \306\307\310\211$\202 \311\312 \311\211\2037 @\304\nA@\"\2030 \n@ A\211\204! \311 +\207" [address result item --dolist-tail-- string-match "[][]" replace-match "" t nil tramp-bluez-list-devices] 6 (#$ . 63528)])
#@73 Implementation for the "org.gtk.vfs.MountOperation.askPassword" method.
(defalias 'tramp-gvfs-handler-askpassword #[(message user domain flags) "\306\307!!\310\311\312\313\n\"\203 \314\315\316\n\"!\202 \317 #\320 \3211l\322 ! \323
! 9\324
! :\325
! ;\326
! <\327
! =>G\330U\203W \331?@\"\330U\204W \332\333!>AG\330U\203o \331?B\"\330U\204o \332\334!A
\335\336\n>A?F C D E F\3371!EGX\205 \340 H\341\216I\203\313 E\342X\203\313 \343\302E\330U\203\255 \344\202\304 E\316U\203\270 \344\202\304 E\345U\203\303 \346\202\304 \347DPC#\210G\350Y\205 \351F!\203\345 \330 G\352F\353\320#F)E\316U\203\330 Gr\354F!q\210D\355PD\356C\357 C\"C*\360F!\205 \343\361F\310\362E\"DPC$*0\202%\210\202&\210,\352
\363\320#\2043\364
!\2109J>K;L\365\366
! \"\211;\203Z\367\320\f\370
!A\320\330\257\202f\320\367\344\370
!A\320\330\257.0\202v\210\320\367\344\211\211\320\330\257+\207" [last-input-event filename message pw-prompt password l tramp-gvfs-file-name dbus-event-path-name format "%s for %s " string-match "\\([pP]assword\\|[pP]assphrase\\)" capitalize match-string 1 "Password" nil (quit) tramp-dissect-file-name tramp-file-name-method tramp-file-name-user tramp-file-name-host tramp-file-name-localname tramp-file-name-hop 0 logand read-string "User name: " "Domain name: " 6 "%S %S %S %d" (error) match-data #[nil "\301\302\"\207" [save-match-data-internal set-match-data evaporate] 3] 3 apply "" 2 "Warning: " "Tramp: " 4 processp tramp-get-connection-property "vector" tramp-get-connection-buffer "\n%s" append buffer-string vectorp tramp-debug-message "(%d) # " "first-password-request" tramp-clear-passwd tramp-read-passwd tramp-get-connection-process t tramp-file-name-real-user l-method l-user l-host l-localname l-hop user flags tramp-gvfs-password-need-username domain tramp-gvfs-password-need-domain arguments fmt-string level vec-or-proc tramp-verbose save-match-data-internal tramp-message-show-message tramp-current-method tramp-current-user tramp-current-host] 8 (#$ . 63966)])
#@73 Implementation for the "org.gtk.vfs.MountOperation.askQuestion" method.
(defalias 'tramp-gvfs-handler-askquestion #[(message choices) "\306 \307\216\310\311\3121\347\313\314\315 !!! \316\f! \317\f! <\320\f! =\321\f! >\322\f! ?\f\323\324@D A B C D\3251\334 CEX\205\330 \326 F\327\216G\203\206 C\330X\203\206 \331\332C\333U\203h \334\202 C\335U\203s \334\202 C\336U\203~ \337\202 \340BPA#\210E\341Y\205\327 \342D!\203\240 \333 E\343D\344\311#D)C\335U\203\301 \333 Er\345D!q\210B\346PB\347A\350 C\"A*\351D!\205\327 \331\352D\353\354C\"BPA$*0\202\340 \210\202\341 \210,\355\356! HrHq\210\357\216\334\311 I J\360\216J\203\361 I\332\362J\"\210c\210\363p!\210\364@@\365P!\203\333\202 \335\f\323\366 C A B C D\3671\311CEX\205\305\326 F\370\216G\203sC\330X\203s\331\332C\333U\203U\334\202lC\335U\203`\334\202lC\336U\203k\337\202l\340BPA#\210E\341Y\205\304\342D!\203\215\333 E\343D\344\311#D)C\335U\203\256\333 Er\345D!q\210B\346PB\347A\350 C\"A*\351D!\205\304\331\352D\353\354C\"BPA$*0\202\315\210\202\316\210.\n \333U\204\335\371\f\372\373\372$\210\310\311 E.0\202\354\210\311\310\333E,\207" [#1=#:wconfig choice enable-recursive-minibuffers last-input-event v method current-window-configuration #[nil "\301!\207" [#1# set-window-configuration] 2] t nil (quit) tramp-dissect-file-name tramp-gvfs-file-name dbus-event-path-name tramp-file-name-method tramp-file-name-user tramp-file-name-host tramp-file-name-localname tramp-file-name-hop 6 "%S %S" (error) match-data #[nil "\301\302\"\207" [save-match-data-internal set-match-data evaporate] 3] 3 apply message 0 "" 1 2 "Warning: " "Tramp: " 4 processp tramp-get-connection-property "vector" tramp-get-connection-buffer "\n%s" append buffer-string vectorp tramp-debug-message format "(%d) # " generate-new-buffer " *temp*" #[nil "\301!\205 \302!\207" [#2=#:temp-buffer buffer-name kill-buffer] 2] #[nil "\205 \203
\302\303 \"\207\302\304!\207" [#3=#:with-temp-message #4=#:current-message message #5="%s" nil] 3] current-message #5# pop-to-buffer yes-or-no-p " " "%d" (error) #[nil "\301\302\"\207" [save-match-data-internal set-match-data evaporate] 3] tramp-set-file-property "/" "fuse-mountpoint" user host localname hop choices arguments fmt-string level vec-or-proc tramp-verbose save-match-data-internal tramp-message-show-message #2# #4# #3#] 6 (#$ . 66016)])
#@109 Signal handler for the "org.gtk.vfs.MountTracker.mounted" and
"org.gtk.vfs.MountTracker.unmounted" signals.
(defalias 'tramp-gvfs-handler-mounted-unmounted #[(mount-info) "\3061\307! \n@;\203 \nA\211\202 \310\nA@! \nAA@ \310\nAAA@! @\310\311\312
A@\"A@! A\310\311\313
A@\"A@! B\310\311\314
A@\"A@! C\310\311\315
A@\"\206_ \311\316
A@\"A@! D\310\311\317
A@\"A@! E\310\311\320
A@\"A@! F\310
@!\310\311\321
A@\"A@\206\224 \311\322
A@\"A@!P G\323\324A\"\203\247 \325\326A\"AA\327\230\203\264 \330D!DA\331\230\203\305 F\332\230\203\305 \333ACG\334U\204\326 BHCQBEG\334U\204\347 DIEQD\335\336ABD\337$! J\340J! A\341J! B\342J! D\343J! K\344J! LJ\345\346 \347 !D M N O P\3501\302OQX\205\276\351 R\352\216S\203lO\353X\203l\354\355O\334U\203N\337\202eO\326U\203Y\337\202eO\356U\203d\357\202e\360NPM#\210Q\361Y\205\275\362P!\203\206\334 Q\363P\364\365#P)O\326U\203\247\334 Qr\366P!q\210N\367PN\370M\371 C\"M*\372P!\205\275\354\373P\374\375O\"NPM$*0\202\306\210\202\307\210,\376J\377\201T \201U $\210 \227\201V \230\203\351\376J\377\201W \365$\202G\377\230\204\373\376J\377\201X G$\210\376J\377\201W \f$\210\376J\377\201Y @$.0\207\210\365\207" [last-input-event mount-info elt signal-name fuse-mountpoint mount-spec (error) dbus-event-member-name tramp-gvfs-dbus-byte-array-to-string assoc "type" "user" "domain" "host" "server" "port" "ssl" "share" "volume" string-match "^\\(afp\\|smb\\)" match-string 1 "obex" tramp-bluez-device "dav" "true" "davs" 0 tramp-dissect-file-name tramp-make-tramp-file-name "" tramp-file-name-method tramp-file-name-user tramp-file-name-host tramp-file-name-localname tramp-file-name-hop 6 "%s %s" tramp-gvfs-stringify-dbus-message (error) match-data #[nil "\301\302\"\207" [save-match-data-internal set-match-data evaporate] 3] 3 apply message 2 "Warning: " "Tramp: " 4 processp tramp-get-connection-property "vector" nil tramp-get-connection-buffer "\n%s" append buffer-string vectorp tramp-debug-message format "(%d) # " tramp-set-file-property "/" default-location method user domain host port ssl prefix tramp-prefix-domain-format tramp-prefix-port-format v localname hop arguments fmt-string level vec-or-proc tramp-verbose save-match-data-internal tramp-message-show-message "list-mounts" undef "unmounted" "fuse-mountpoint" "prefix" "default-location"] 7 (#$ . 68435)])
(byte-code "\203, \303\304\305 \n\306\307&\210\303\304\305 \n\310\307&\210\303\304\305 \n\311\307&\210\303\304\305 \n\312\307&\210\305\207" [tramp-gvfs-enabled tramp-gvfs-path-mounttracker tramp-gvfs-interface-mounttracker dbus-register-signal :session nil "mounted" tramp-gvfs-handler-mounted-unmounted "Mounted" "unmounted" "Unmounted"] 7)
#@49 Check, whether the location is already mounted.
(defalias 'tramp-gvfs-connection-mounted-p #[(vec) "\306\307\310\311$\206\325\3122\325\313\307!\203\264\306\307\314\315$\211\315=\203\257\316\317\320\n \f
\257\311\"\311 @ A B\321\322BAD C D E F\3231\341 EGX\205\335 \324 H\325\216I\203\213 E\326X\203\213 \327\330E\331U\203m \332\202\204 E\333U\203x \332\202\204 E\334U\203\203 \335\202\204 \336DPC#\210G\337Y\205\334 \340F!\203\245 \331 G\341F\342\311#F)E\333U\203\306 \331 Gr\343F!q\210D\344PD\317C\345 C\"C*\346F!\205\334 \327\347F\350\351E\"DPC$*0\202\345 \210\202\346 \210,\327BA\"@\321\352\353@!C C D E F\3541\236EGX\205\232\324 H\355\216I\203HE\326X\203H\327\330E\331U\203*\332\202AE\333U\2035\332\202AE\334U\203@\335\202A\336DPC#\210G\337Y\205\231\340F!\203b\331 G\341F\342\311#F)E\333U\203\203\331 Gr\343F!q\210D\344PD\317C\345 C\"C*\346F!\205\231\327\347F\350\351E\"DPC$*0\202\242\210\202\243\210,@+\356\307\314 $\210 )\202;\316\317\320\n \f
\257\311\"\311 @ A B\321\322BAD C D E F\3571uEGX\205q\324 H\360\216I\203 E\326X\203 \327\330E\331U\203\332\202E\333U\203\f\332\202E\334U\203\335\202\336DPC#\210G\337Y\205p\340F!\2039\331 G\341F\342\311#F)E\333U\203Z\331 Gr\343F!q\210D\344PD\317C\345 C\"C*\346F!\205p\327\347F\350\351E\"DPC$*0\202y\210\202z\210,\327BA\"@\321\352\353@!C C D E F\36112EGX\205.\324 H\362\216I\203\334E\326X\203\334\327\330E\331U\203\276\332\202\325E\333U\203\311\332\202\325E\334U\203\324\335\202\325\336DPC#\210G\337Y\205-\340F!\203\366\331 G\341F\342\311#F)E\333U\203\331 Gr\343F!q\210D\344PD\317C\345 C\"C*\346F!\205-\327\347F\350\351E\"DPC$*0\2026\210\2027\210,@+\311 J\211 K\203\317K@\211J@;\203XJA\211J\202J\363JA@! LJAA@ M\363JAAA@! N\363\364\365MA@\"A@! O\363\364\366MA@\"A@! P\363\364\367MA@\"A@! Q\363\364\370MA@\"\206\252\364\371MA@\"A@! R\363\364\372MA@\"A@! S\363\364\373MA@\"A@! T\363M@!\363\364\374MA@\"A@\206\344\364\375MA@\"A@!P U\376\377O\"\203\371\201X \333O\"OO\201Y \230\203\n\201Z R!RO\201[ \230\203!T\201\\ \230\203!\201] OO\201^ \230\203=PG\331U\203=\201_ !\206;\332PQG\331U\204NPVQQPSG\331U\204_RWSQRO\201` !\230\203\304P\201_ !\206u\332\230\203\304R\201a !\230\203\304\376\201b \201c U!P\201d !\"\203\304U\307\230\204\251\356\307\201e U$\210\356\307\310L$\210\356\307\201f N$\210\201g \312\201h \"\210.\nKA\211K\204D\311J*\3110\207" [vec value tramp-gvfs-service-daemon tramp-gvfs-path-mounttracker tramp-gvfs-interface-mounttracker tramp-gvfs-listmounts tramp-get-file-property "/" "fuse-mountpoint" nil mounted file-name-absolute-p "list-mounts" undef dbus-call-method append :session 6 "%s %s" (error) match-data #[nil "\301\302\"\207" [save-match-data-internal set-match-data evaporate] 3] 3 apply message 0 "" 1 2 "Warning: " "Tramp: " 4 processp tramp-get-connection-property "vector" tramp-get-connection-buffer "\n%s" buffer-string vectorp tramp-debug-message format "(%d) # " "%s" tramp-gvfs-stringify-dbus-message (error) #[nil "\301\302\"\207" [save-match-data-internal set-match-data evaporate] 3] tramp-set-file-property (error) #[nil "\301\302\"\207" [save-match-data-internal set-match-data evaporate] 3] (error) #[nil "\301\302\"\207" [save-match-data-internal set-match-data evaporate] 3] tramp-gvfs-dbus-byte-array-to-string assoc "type" "user" "domain" "host" "server" "port" "ssl" "share" "volume" string-match "^\\(afp\\|smb\\)" result args func arguments fmt-string level vec-or-proc tramp-verbose save-match-data-internal tramp-message-show-message elt --dolist-tail-- fuse-mountpoint mount-spec default-location method user domain host port ssl prefix tramp-prefix-domain-format tramp-prefix-port-format match-string "obex" tramp-bluez-device "dav" "true" "davs" "synce" tramp-file-name-user tramp-file-name-method tramp-file-name-host "^" regexp-quote tramp-file-name-localname "prefix" "default-location" throw t] 8 (#$ . 71176)])
#@104 Construct a mount-spec entry to be used in a mount_spec.
It was "a(say)", but has changed to "a{sv})".
(defalias 'tramp-gvfs-mount-spec-entry #[(key value) "\303\304\"\203 \305 \306\307\n!DE\207\310 \307\n!E\207" [tramp-gvfs-mountlocation-signature key value string-match "^(aya{sv})" :dict-entry :variant tramp-gvfs-dbus-string-to-byte-array :struct] 5 (#$ . 75263)])
#@67 Return a mount-spec for "org.gtk.vfs.MountTracker.mountLocation".
(defalias 'tramp-gvfs-mount-spec #[(vec) "\306!\307!\310!\311! \312! \313! .\314\315.\"\205& \316\317.\" /\314\320 \"\2050 \321 0\322\323 \324\230\203K \325\326\327\"\325\330\f\"\325\331/\"E\202\232 \332\230\203b \325\326 \"\325\333\334\335\f!\336Q\"D\202\232 \314\337 \"\203z \325\326\340\"\325\333\f\"\325\3410\"E\202\232 \342\230\203\221 \325\326\343\"\325\333\f\"\325\344/\"E\202\232 \325\326 \"\325\333\f\"D\n\205\243 \325\345\n\"C \205\254 \325\346 \"C
\205\267 \325\347\350
!\"C$B 1\314\337 \"\203\322 \314\351.\"\203\322 \316\352.\"\202\323 \353 2\354\3552!1E.\n\207" [vec method user domain host port tramp-file-name-method tramp-file-name-real-user tramp-file-name-domain tramp-file-name-real-host tramp-file-name-port tramp-file-name-localname string-match "^/?\\([^/]+\\)" match-string 1 "^davs" "false" :array append "smb" tramp-gvfs-mount-spec-entry "type" "smb-share" "server" "share" "obex" "host" "[" tramp-bluez-address "]" "\\`dav" "dav" "ssl" "afp" "afp-volume" "volume" "user" "domain" "port" number-to-string "^/?[^/]+" 0 "/" :struct tramp-gvfs-dbus-string-to-byte-array localname share ssl mount-spec mount-pref] 9 (#$ . 75640)])
#@163 Maybe open a connection VEC.
Does not do anything if a connection is already open, but re-opens the
connection if a previous connection has died for some reason.
(defalias 'tramp-gvfs-maybe-open-connection #[(vec) "\306!\210\307\310!!\204& \311\312\313!\314\310!\315\316\317\320\321\316&\n\322\n\323\"\210)\324!\204\\\325!\326! \327! \330! @\331\332 \f
\333$! A \334\230\203`@\335\230\203`\336\337\323 B C D E\323 FE\211 E\2039E\340\341\342\343\344!! G\345\216G G\346 \210)rGq\210\347 +C B C H E\35010HIX\205,\351 J\352\216F\203\332 H\353X\203\332 \354\355H\356U\203\274 \333\202\323 H\357U\203\307 \333\202\323 H\360U\203\322 \361\202\323 \362CPB#\210I\363Y\205+\364E!\203\364 \356 I\365E\366\323#E)H\357U\203\356 Ir\310E!q\210C\341PC\367B\347 C\"B*\370E!\205+\354\371E\372\373H\"CPB$*0\2024\210\2025\210,\202{I\340Y\203{K Lr\342\374!q\210p\375 \210LK\323\211MN\316\211O\316 P Q\376 \210\377\201e !\210+\211 R G\346 \210\201f R!\210+)E\203NE\357\201g \201h D\211\201i N\354\201j CB#E!C B C H E\201k 1HHIX\205D\351 J\201l \216F\203\362H\353X\203\362\354\355H\356U\203\324\333\202\353H\357U\203\337\333\202\353H\360U\203\352\361\202\353\362CPB#\210I\363Y\205C\364E!\203\f\356 I\365E\366\323#E)H\357U\203-\356 Ir\310E!q\210C\341PC\367B\347 C\"B*\370E!\205C\354\371E\372\373H\"CPB$*0\202L\210\202M\210,\201D D\354\201j CB#C\"\210- \201m \230\203\203@\335\230\203\203\336\201n \323 B C D E\323 FE\211 E\203\\E\340\341\342\343\344!! G\201o \216G G\346 \210)rGq\210\347 +C B C H E\201p 1SHIX\205O\351 J\201q \216F\203\375H\353X\203\375\354\355H\356U\203\337\333\202\366H\357U\203\352\333\202\366H\360U\203\365\361\202\366\362CPB#\210I\363Y\205N\364E!\203\356 I\365E\366\323#E)H\357U\2038\356 Ir\310E!q\210C\341PC\367B\347 C\"B*\370E!\205N\354\371E\372\373H\"CPB$*0\202W\210\202X\210,\202\236I\340Y\203\236K Lr\342\374!q\210p\375 \210LK\323\211MN\316\211O\316 P Q\376 \210\377\201e !\210+\211 R G\346 \210\201f R!\210+)E\203qE\357\201g \201h D\211\201i N\354\201j CB#E!C B C H E\201r 1kHIX\205g\351 J\201s \216F\203H\353X\203\354\355H\356U\203\367\333\202H\357U\203\333\202H\360U\203
\361\202\362CPB#\210I\363Y\205f\364E!\203/\356 I\365E\366\323#E)H\357U\203P\356 Ir\310E!q\210C\341PC\367B\347 C\"B*\370E!\205f\354\371E\372\373H\"CPB$*0\202o\210\202p\210,\201D D\354\201j CB#C\"\210-\353\201t \fG\356U\203\231\372\201u
#\202\241\372\201v \f
$C B C H E\201w 1MHIX\205I\351 J\201x \216F\203\367H\353X\203\367\354\355H\356U\203\331\333\202\360H\357U\203\344\333\202\360H\360U\203\357\361\202\360\362CPB#\210I\363Y\205H\364E!\203\356 I\365E\366\323#E)H\357U\2032\356 Ir\310E!q\210C\341PC\367B\347 C\"B*\370E!\205H\354\371E\372\373H\"CPB$*0\202Q\210\202R\210,\201y F\205\265\353I\353^X\205\265\201z 1\263\201{ \201| !\204~\201} \201| !\205\233\201| \fG\356U\203\222\372\201u
#\202\232\372\201v \f
$!\211 S\205\256\201~ \353\201 \201\200 S$)0\202\265\210\323 T U\201\201 \216\201\202 \201\203 \316#\210\201\204 \201\205 VAW\201\206 \201\207 &\210\201\204 \201\205 VAW\201\210 \201\207 &\210\201\204 \201\205 VAW\201\211 \201\212 &\210\201\204 \201\205 VAW\201\213 \201\212 &\210\201\214 \201\215 X\"\203\345\201\216 \367\201\205 YZ[\\\257\201\217 \201\220 !\201\221 \201\222 \201\223 \201\205 !\201\224 A\257E\"\323 ] ^ _\201\225 \201\226 _^D B C H E\201\227 1HIX\205\351 J\201\230 \216F\203\276H\353X\203\276\354\355H\356U\203\240\333\202\267H\357U\203\253\333\202\267H\360U\203\266\361\202\267\362CPB#\210I\363Y\205\364E!\203\330\356 I\365E\366\323#E)H\357U\203\371\356 Ir\310E!q\210C\341PC\367B\347 C\"B*\370E!\205\354\371E\372\373H\"CPB$*0\202\210\202\210,\354_^\"]\201\225 \201g \201\231 ]!C B C H E\201\232 1\333HIX\205\327\351 J\201\233 \216F\203\205H\353X\203\205\354\355H\356U\203g\333\202~H\357U\203r\333\202~H\360U\203}\361\202~\362CPB#\210I\363Y\205\326\364E!\203\237\356 I\365E\366\323#E)H\357U\203\300\356 Ir\310E!q\210C\341PC\367B\347 C\"B*\370E!\205\326\354\371E\372\373H\"CPB$*0\202\337\210\202\340\210.\202\234 \201\216 \367\201\205 YZ[\\\257\201\217 \201\220 !\201\222 \201\223 \201\205 !\201\224 A\257\"\323 ] ^ _\201\225 \201\226 _^D B C H E\201\234 1\316HIX\205\312\351 J\201\235 \216F\203xH\353X\203x\354\355H\356U\203Z\333\202qH\357U\203e\333\202qH\360U\203p\361\202q\362CPB#\210I\363Y\205\311\364E!\203\222\356 I\365E\366\323#E)H\357U\203\263\356 Ir\310E!q\210C\341PC\367B\347 C\"B*\370E!\205\311\354\371E\372\373H\"CPB$*0\202\322\210\202\323\210,\354_^\"]\201\225 \201g \201\231 ]!C B C H E\201\236 1\225 HIX\205\221 \351 J\201\237 \216F\203? H\353X\203? \354\355H\356U\203! \333\2028 H\357U\203, \333\2028 H\360U\2037 \361\2028 \362CPB#\210I\363Y\205\220 \364E!\203Y \356 I\365E\366\323#E)H\357U\203z \356 Ir\310E!q\210C\341PC\367B\347 C\"B*\370E!\205\220 \354\371E\372\373H\"CPB$*0\202\231 \210\202\232 \210.\201\240 2\340 \201\241 \201\242 \201` \"\206\262 `\323\201\243 #\211 abB b\201\244 \216\201\245 \335\201\246 \323$?\205\336 \201\247 \323\211\201\250 #\210\202\303 +0\211 c\201\240 =\203#\326!G\356U\203\f\f\336\201\251
D B C D E\323 FE\211 E\203\342\nE\340\341\342\343\344!! G\201\252 \216G G\346 \210)rGq\210\347 +C B C H E\201\253 1\331\nHIX\205\325\n\351 J\201\254 \216F\203\203\nH\353X\203\203\n\354\355H\356U\203e\n\333\202|\nH\357U\203p\n\333\202|\nH\360U\203{\n\361\202|\n\362CPB#\210I\363Y\205\324\n\364E!\203\235\n\356 I\365E\366\323#E)H\357U\203\276\n\356 Ir\310E!q\210C\341PC\367B\347 C\"B*\370E!\205\324\n\354\371E\372\373H\"CPB$*0\202\335\n\210\202\336\n\210,\202$ I\340Y\203$ K Lr\342\374!q\210p\375 \210LK\323\211MN\316\211O\316 P Q\376 \210\377\201e !\210+\211 R G\346 \210\201f R!\210+)E\203\367 E\357\201g \201h D\211\201i N\354\201j CB#E!C B C H E\201\255 1\361 HIX\205\355 \351 J\201\256 \216F\203\233 H\353X\203\233 \354\355H\356U\203} \333\202\224 H\357U\203\210 \333\202\224 H\360U\203\223 \361\202\224 \362CPB#\210I\363Y\205\354 \364E!\203\265 \356 I\365E\366\323#E)H\357U\203\326 \356 Ir\310E!q\210C\341PC\367B\347 C\"B*\370E!\205\354 \354\371E\372\373H\"CPB$*0\202\365 \210\202\366 \210,\201D D\354\201j CB#C\"\210-\202#\336\201\257 \f
E B C D E\323 FE\211 E\203\374\fE\340\341\342\343\344!! G\201\260 \216G G\346 \210)rGq\210\347 +C B C H E\201\261 1\363\fHIX\205\357\f\351 J\201\262 \216F\203\235\fH\353X\203\235\f\354\355H\356U\203\f\333\202\226\fH\357U\203\212\f\333\202\226\fH\360U\203\225\f\361\202\226\f\362CPB#\210I\363Y\205\356\f\364E!\203\267\f\356 I\365E\366\323#E)H\357U\203\330\f\356 Ir\310E!q\210C\341PC\367B\347 C\"B*\370E!\205\356\f\354\371E\372\373H\"CPB$*0\202\367\f\210\202\370\f\210,\202>
I\340Y\203>
K Lr\342\374!q\210p\375 \210LK\323\211MN\316\211O\316 P Q\376 \210\377\201e !\210+\211 R G\346 \210\201f R!\210+)E\203E\357\201g \201h D\211\201i N\354\201j CB#E!C B C H E\201\263 1 HIX\205\351 J\201\264 \216F\203\265
H\353X\203\265
\354\355H\356U\203\227
\333\202\256
H\357U\203\242
\333\202\256
H\360U\203\255
\361\202\256
\362CPB#\210I\363Y\205\364E!\203\317
\356 I\365E\366\323#E)H\357U\203\360
\356 Ir\310E!q\210C\341PC\367B\347 C\"B*\370E!\205\354\371E\372\373H\"CPB$*0\202\210\202\210,\201D D\354\201j CB#C\"\210-)\201\245 \335\201\246 \333$\335\230\203G\336\201\265 \323 B C D E\323 FE\211 E\203 E\340\341\342\343\344!! G\201\266 \216G G\346 \210)rGq\210\347 +C B C H E\201\267 1HIX\205\351 J\201\270 \216F\203\301H\353X\203\301\354\355H\356U\203\243\333\202\272H\357U\203\256\333\202\272H\360U\203\271\361\202\272\362CPB#\210I\363Y\205\364E!\203\333\356 I\365E\366\323#E)H\357U\203\374\356 Ir\310E!q\210C\341PC\367B\347 C\"B*\370E!\205\354\371E\372\373H\"CPB$*0\202\210\202 \210,\202bI\340Y\203bK Lr\342\374!q\210p\375 \210LK\323\211MN\316\211O\316 P Q\376 \210\377\201e !\210+\211 R G\346 \210\201f R!\210+)E\2035E\357\201g \201h D\211\201i N\354\201j CB#E!C B C H E\201\271 1/HIX\205+\351 J\201\272 \216F\203\331H\353X\203\331\354\355H\356U\203\273\333\202\322H\357U\203\306\333\202\322H\360U\203\321\361\202\322\362CPB#\210I\363Y\205*\364E!\203\363\356 I\365E\366\323#E)H\357U\203\356 Ir\310E!q\210C\341PC\367B\347 C\"B*\370E!\205*\354\371E\372\373H\"CPB$*0\2023\210\2024\210,\201D D\354\201j CB#C\"\210-\201\202 \201\273 !\201\274 \316#\210\201\275 U.\365\201\276 \201\277 #\211 d\201\277 =\203\203\201\300 \201\301 !d\201\202 \201\276 d#\210)\365\201\302 \201\277 #\211 d\201\277 =\203\253\201\303 \201\301 !d\201\202 \201\302 d#\210)\365\201\304 \201\277 #\211 d\201\277 =\203\323\201\300 \201\305 !d\201\202 \201\304 d#\210)\365\201\306 \201\277 #\211 d\201\277 =\203\373\201\303 \201\305 !d\201\202 \201\306 d#\210d)\207" [vec tramp-gvfs-dbus-event-vector p method user host tramp-check-proper-method-and-host get-buffer-process tramp-get-connection-buffer make-network-process :name tramp-buffer-name :buffer :server t :host local :service tramp-compat-set-process-query-on-exit-flag nil tramp-gvfs-connection-mounted-p tramp-file-name-method tramp-file-name-user tramp-file-name-host tramp-file-name-localname tramp-gvfs-object-path tramp-make-tramp-file-name #5="" "smb" "/" file-error "Filename must contain a Windows share" 10 "\n%s" get-buffer-create generate-new-buffer-name " *string-output*" #[nil "\301!\207" [standard-output kill-buffer] 2] backtrace buffer-string (error) match-data #[nil "\301\302\"\207" [save-match-data-internal set-match-data evaporate] 3] 3 apply message 0 1 2 #6="Warning: " #7="Tramp: " 4 processp tramp-get-connection-property #8="vector" append vectorp tramp-debug-message format #9="(%d) # " "*debug tramp*" kill-all-local-variables erase-buffer run-hooks localname object-path arguments fmt-string signal vec-or-proc tramp-message-show-message standard-output level tramp-verbose save-match-data-internal default-directory #1=#:old-dir buffer-read-only buffer-file-name buffer-undo-list inhibit-modification-hooks inhibit-read-only #2=#:buf pr tm cookie dbus-service-emacs tramp-gvfs-interface-mountoperation tramp-gvfs-mountlocation-signature tramp-gvfs-service-daemon tramp-gvfs-path-mounttracker tramp-gvfs-interface-mounttracker tramp-gvfs-mountlocation result args func tramp-connection-timeout -with-timeout-timer- with-timeout-timers -with-timeout-value- value temp-buffer-setup-hook internal-temp-output-buffer-show "%s" error-message-string error-message format-message (error) #[nil "\301\302\"\207" [save-match-data-internal set-match-data evaporate] 3] "afp" "Filename must contain an AFP volume" #[nil "\301!\207" [standard-output kill-buffer] 2] (error) #[nil "\301\302\"\207" [save-match-data-internal set-match-data evaporate] 3] (error) #[nil "\301\302\"\207" [save-match-data-internal set-match-data evaporate] 3] "%s..." #3="Opening connection for %s using %s" #4="Opening connection for %s@%s using %s" (error) #[nil "\301\302\"\207" [save-match-data-internal set-match-data evaporate] 3] "failed" (error) subrp make-progress-reporter functionp run-at-time 0.1 tramp-progress-reporter-update #[nil "\203 \306\307!\204 \310\307!\203 \307!\210 \311\312\nG\313U\203& \314\315 \f#\202, \314\316\n \f$
D % & ' (\3171\325 ')X\205\321 \320 *\321\216+\203 '\311X\203 \322\323'\313U\203a \324\202x '\325U\203l \324\202x '\326U\203w \327\202x \330&P%#\210)\331Y\205\320 \332(!\203\231 \313 )\333(\334\335#()'\325U\203\272 \313 )r\336(!q\210&\337P&\340%\341 C\"%*\342(!\205\320 \322\343(\314\344'\"&P%$*0\202\327 \210\335,\207" [tm vec user host method cookie subrp cancel-timer functionp 3 "%s...%s" 0 format #3# #4# (error) match-data #[nil "\301\302\"\207" [save-match-data-internal set-match-data evaporate] 3] apply message #5# 1 2 #6# #7# 4 processp tramp-get-connection-property #8# nil tramp-get-connection-buffer "\n%s" append buffer-string vectorp tramp-debug-message #9# arguments fmt-string level vec-or-proc tramp-verbose save-match-data-internal tramp-message-show-message] 8] tramp-set-connection-property "first-password-request" dbus-register-method :session "askPassword" tramp-gvfs-handler-askpassword "AskPassword" "askQuestion" tramp-gvfs-handler-askquestion "AskQuestion" string-match "(so)$" dbus-call-method-asynchronously ignore tramp-gvfs-mount-spec :struct :string dbus-get-unique-name :object-path 6 "%s %s" (error) #[nil "\301\302\"\207" [save-match-data-internal set-match-data evaporate] 3] tramp-gvfs-stringify-dbus-message (error) #[nil "\301\302\"\207" [save-match-data-internal set-match-data evaporate] 3] (error) #[nil "\301\302\"\207" [save-match-data-internal set-match-data evaporate] 3] (error) #[nil "\301\302\"\207" [save-match-data-internal set-match-data evaporate] 3] #10=#:timeout run-with-timer tramp-get-method-parameter #[nil "\300\301\211\"\207" [throw #10#] 3] #[nil "\301!\207" [-with-timeout-timer- cancel-timer] 2] tramp-get-file-property "fuse-mountpoint" read-event 0.1 "Timeout reached mounting %s using %s" #[nil "\301!\207" [standard-output kill-buffer] 2] (error) #[nil "\301\302\"\207" [save-match-data-internal set-match-data evaporate] 3] (error) #[nil "\301\302\"\207" [save-match-data-internal set-match-data evaporate] 3] "Timeout reached mounting %s@%s using %s" #[nil "\301!\207" [standard-output kill-buffer] 2] (error) #[nil "\301\302\"\207" [save-match-data-internal set-match-data evaporate] 3] (error) #[nil "\301\302\"\207" [save-match-data-internal set-match-data evaporate] 3] "FUSE mount denied" #[nil "\301!\207" [standard-output kill-buffer] 2] (error) #[nil "\301\302\"\207" [save-match-data-internal set-match-data evaporate] 3] (error) #[nil "\301\302\"\207" [save-match-data-internal set-match-data evaporate] 3] tramp-get-connection-process "connected" "done" "uid-integer" undef tramp-get-local-uid integer "gid-integer" tramp-get-local-gid "uid-string" string "gid-string"] 12 (#$ . 76886)])
#@179 Send the COMMAND with its ARGS to connection VEC.
COMMAND is usually a command from the gvfs-* utilities.
`call-process' is applied, and it returns t if the return code is zero.
(defalias 'tramp-gvfs-send-command #[(vec command &rest args) "r\303!q\210\304!\210\305 \210\306\307 \310\311\310\n&\312U)\207" [vec command args tramp-get-connection-buffer tramp-gvfs-maybe-open-connection erase-buffer apply tramp-call-process nil t 0] 8 (#$ . 91272)])
#@309 Return all discovered bluetooth devices as list.
Every entry is a list (NAME ADDRESS).
If `tramp-bluez-discover-devices-timeout' is an integer, and the last
discovery happened more time before indicated there, a rescan will be
started, which lasts some ten seconds. Otherwise, cached results will
be used.
(defalias 'tramp-bluez-list-devices #[nil "\250\203 \250\203 \306\307 \"V\203 \310\n\204:\311\312\313 \314\f\315\257\310\"\310 8 9:\316\31798D ; < = >\3201\333 =?X\205\327 \321 @\322\216A\203\205 =\323X\203\205 \324\325=\326U\203g \327\202~ =\330U\203r \327\202~ =\331U\203} \332\202~ \333<P;#\210?\334Y\205\326 \335>!\203\237 \326 ?\336>\337\310#>)=\330U\203\300 \326 ?r\340>!q\210<\341P<\312;\342 C\";*\343>!\205\326 \324\344>\345\346=\"<P;$*0\202\337 \210\202\340 \210,\32498\":\316\347\350
!C ; < = >\3511\227=?X\205\223\321 @\352\216A\203A=\323X\203A\324\325=\326U\203#\327\202:=\330U\203.\327\202:=\331U\2039\332\202:\333<P;#\210?\334Y\205\222\335>!\203[\326 ?\336>\337\310#>)=\330U\203|\326 ?r\340>!q\210<\341P<\312;\342 C\";*\343>!\205\222\324\344>\345\346=\"<P;$*0\202\233\210\202\234\210,
+ B\310\353\354\312\313 BC\355\257\356C\"\310 8 9:\316\31798D ; < = >\3571i=?X\205e\321 @\360\216A\203=\323X\203\324\325=\326U\203\365\327\202\f=\330U\203 \327\202\f=\331U\203 \332\202\f\333<P;#\210?\334Y\205d\335>!\203-\326 ?\336>\337\310#>)=\330U\203N\326 ?r\340>!q\210<\341P<\312;\342 C\";*\343>!\205d\324\344>\345\346=\"<P;$*0\202m\210\202n\210,\32498\":\316\347\350
!C ; < = >\3611%=?X\205!\321 @\362\216A\203\317=\323X\203\317\324\325=\326U\203\261\327\202\310=\330U\203\274\327\202\310=\331U\203\307\332\202\310\333<P;#\210?\334Y\205 \335>!\203\351\326 ?\336>\337\310#>)=\330U\203\n\326 ?r\340>!q\210<\341P<\312;\342 C\";*\343>!\205 \324\344>\345\346=\"<P;$*0\202)\210\202*\210. \2039\363\310\211\364#\210\202,)\307 :\365\347\nC ; < = >\3661\352=?X\205\346\321 @\367\216A\203\224=\323X\203\224\324\325=\326U\203v\327\202\215=\330U\203\201\327\202\215=\331U\203\214\332\202\215\333<P;#\210?\334Y\205\345\335>!\203\256\326 ?\336>\337\310#>)=\330U\203\317\326 ?r\340>!q\210<\341P<\312;\342 C\";*\343>!\205\345\324\344>\345\346=\"<P;$*0\202\356\210\202\357\210,\n\207" [tramp-bluez-discover-devices-timeout tramp-bluez-discovery tramp-bluez-devices tramp-bluez-service tramp-bluez-interface-manager result tramp-time-diff current-time nil dbus-call-method append :system "/" "DefaultAdapter" 6 "%s %s" (error) match-data #[nil "\301\302\"\207" [save-match-data-internal set-match-data evaporate] 3] 3 apply message 0 "" 1 2 "Warning: " "Tramp: " 4 processp tramp-get-connection-property "vector" tramp-get-connection-buffer "\n%s" buffer-string vectorp tramp-debug-message format "(%d) # " "%s" tramp-gvfs-stringify-dbus-message (error) #[nil "\301\302\"\207" [save-match-data-internal set-match-data evaporate] 3] t dbus-call-method-asynchronously "StartDiscovery" ignore (error) #[nil "\301\302\"\207" [save-match-data-internal set-match-data evaporate] 3] (error) #[nil "\301\302\"\207" [save-match-data-internal set-match-data evaporate] 3] read-event 0.1 10 (error) #[nil "\301\302\"\207" [save-match-data-internal set-match-data evaporate] 3] args func tramp-gvfs-dbus-event-vector arguments fmt-string level vec-or-proc tramp-verbose save-match-data-internal tramp-message-show-message object-path tramp-bluez-interface-adapter] 7 (#$ . 91732)])
#@68 Signal handler for the "org.bluez.Adapter.PropertyChanged" signal.
(defalias 'tramp-bluez-property-changed #[(property value) "\306\307 \nD ,\3101\233
-X\205\227 \311 .\312\216/\203M
\313X\203M \314\315
\316U\2033 \317\202H
\320U\203= \317\202H
\321U\203G \322\202H \323\fP #\210-\324Y\205\226 \325,!\203g \316 -\326,\327\330#,)
\320U\203\203 \316 -r\331,!q\210\f\332P\333 \334 C\"*\335,!\205\226 \314\336,\337\340
\"\fP $*0\202\237 \210\202\240 \210, \341\230\205\n@?\205\3300\342\333\3431\3442!3\345\257\330\"\330 4 5 6\306\30765D ,\3461d
-X\205`\311 .\347\216/\203
\313X\203\314\315
\316U\203\374 \317\202
\320U\203\317\202
\321U\203\322\202\323\fP #\210-\324Y\205_\325,!\2030\316 -\326,\327\330#,)
\320U\203L\316 -r\331,!q\210\f\332P\333 \334 C\"*\335,!\205_\314\336,\337\340
\"\fP $*0\202h\210\202i\210,\31465\"4\306\350\3514!C ,\3521
-X\205 \311 .\353\216/\203\301
\313X\203\301\314\315
\316U\203\247\317\202\274
\320U\203\261\317\202\274
\321U\203\273\322\202\274\323\fP #\210-\324Y\205\n\325,!\203\333\316 -\326,\327\330#,)
\320U\203\367\316 -r\331,!q\210\f\332P\333 \334 C\"*\335,!\205\n\314\336,\337\340
\"\fP $*0\202\210\202\210,4+\207" [tramp-gvfs-dbus-event-vector property value arguments fmt-string level 6 "%s %s" (error) match-data #[nil "\301\302\"\207" [save-match-data-internal set-match-data evaporate] 3] 3 apply message 0 "" 1 2 "Warning: " "Tramp: " 4 processp tramp-get-connection-property "vector" nil tramp-get-connection-buffer "\n%s" append buffer-string vectorp tramp-debug-message format "(%d) # " "Discovering" dbus-call-method :system dbus-event-path-name "StopDiscovery" (error) #[nil "\301\302\"\207" [save-match-data-internal set-match-data evaporate] 3] "%s" tramp-gvfs-stringify-dbus-message (error) #[nil "\301\302\"\207" [save-match-data-internal set-match-data evaporate] 3] vec-or-proc tramp-verbose save-match-data-internal tramp-message-show-message tramp-bluez-discovery tramp-bluez-service last-input-event tramp-bluez-interface-adapter result args func] 7 (#$ . 95333)])
(byte-code "\203 \302\303\304\211 \305\306&\210\304\207" [tramp-gvfs-enabled tramp-bluez-interface-adapter dbus-register-signal :system nil "PropertyChanged" tramp-bluez-property-changed] 7)
#@64 Signal handler for the "org.bluez.Adapter.DeviceFound" signal.
(defalias 'tramp-bluez-device-found #[(device args) "\306\307 \nD $\3101\233
%X\205\227 \311 &\312\216'\203M
\313X\203M \314\315
\316U\2033 \317\202H
\320U\203= \317\202H
\321U\203G \322\202H \323\fP #\210%\324Y\205\226 \325$!\203g \316 %\326$\327\330#$)
\320U\203\203 \316 %r\331$!q\210\f\332P\333 \334 C\"*\335$!\205\226 \314\336$\337\340
\"\fP $*0\202\237 \210\202\240 \210,\341\342\n\"A@@\341\343\n\"A@@ (\211 )(D\211 *+\235\203\305 +\202\315 *+B\211++\207" [tramp-gvfs-dbus-event-vector device args arguments fmt-string level 6 "%s %s" (error) match-data #[nil "\301\302\"\207" [save-match-data-internal set-match-data evaporate] 3] 3 apply message 0 "" 1 2 "Warning: " "Tramp: " 4 processp tramp-get-connection-property "vector" nil tramp-get-connection-buffer "\n%s" append buffer-string vectorp tramp-debug-message format "(%d) # " assoc "Alias" "Address" vec-or-proc tramp-verbose save-match-data-internal tramp-message-show-message address alias #1=#:x tramp-bluez-devices] 7 (#$ . 97663)])
(byte-code "\203 \302\303\304\211 \305\306&\210\304\207" [tramp-gvfs-enabled tramp-bluez-interface-adapter dbus-register-signal :system nil "DeviceFound" tramp-bluez-device-found] 7)
#@55 Return a list of (nil host) tuples allowed to access.
(defalias 'tramp-bluez-parse-device-names #[(_ignore) "\300\301\302 \"\207" [mapcar #[(x) "\301@D\207" [x nil] 2] tramp-bluez-list-devices] 3 (#$ . 98946)])
(byte-code "\203 \302\303!\235\203 \304\305\306\"\210\302\207" [tramp-gvfs-enabled tramp-bluez-service dbus-list-known-names :system tramp-set-completion-function "obex" ((tramp-bluez-parse-device-names ""))] 3)
#@56 Return a list of (user host) tuples allowed to access.
(defalias 'tramp-zeroconf-parse-device-names #[(service) "\301\302\303!\"\207" [service mapcar #[(x) "\306!\307!\310!\311 \203 \312\313\f
$\n\2032 \314\315\n@\"\203+ \316\317\n@\"\nA\211\204 \f,D\207" [x user text port host tramp-prefix-port-regexp zeroconf-service-host zeroconf-service-port zeroconf-service-txt nil format "%s%s%d" string-match "u=\\(.+\\)$" match-string 1] 6] zeroconf-list-services] 4 (#$ . 99380)])
#@120 Return a list of (user host) tuples allowed to access.
This uses "avahi-browse" in case D-Bus is not enabled in Avahi.
(defalias 'tramp-gvfs-parse-device-names #[(service) "\3021 \303\304!\204 \305\304!\205 \304\306\307\310\"!\311\312\313$0\202! \210\314\315\316\317 \"!)\207" [service result (error) subrp split-string functionp shell-command-to-string format "avahi-browse -trkp %s" "[\n
]+" omit "^\\+;.*$" nil tramp-compat-delete-dups mapcar #[(x) "\306\307\"\310 8\311 8\312\306!\204 \313\306!\205! \306\314 8\315\316\317$ \320 \f\203= \321\322\f@\"\2036 \323\324\f@\"\fA\211\204(
\n-D\207" [x list host port text user split-string ";" 6 8 subrp functionp 9 "\" \"" omit "\"" nil string-match "u=\\(.+\\)$" match-string 1] 6]] 5 (#$ . 99878)])
(byte-code "\203T \303 !\210\304 \203/ \305\306\307\"\210\305\310\311\"\210\305\312\313\"\210\305\314\315\"\210\316\n\235\203T \305\316\317\"\210\202T \320\321!\203T \305\306\322\"\210\305\310\323\"\210\305\312\324\"\210\305\314\325\"\210\316\n\235\203T \305\316\326\"\210\303\207" [tramp-gvfs-enabled tramp-gvfs-zeroconf-domain tramp-gvfs-methods zeroconf-init zeroconf-list-service-types tramp-set-completion-function "afp" ((tramp-zeroconf-parse-device-names "_afpovertcp._tcp")) "dav" ((tramp-zeroconf-parse-device-names "_webdav._tcp")) "davs" ((tramp-zeroconf-parse-device-names "_webdav._tcp")) "sftp" ((tramp-zeroconf-parse-device-names "_ssh._tcp") (tramp-zeroconf-parse-device-names "_workstation._tcp")) "smb" ((tramp-zeroconf-parse-device-names "_smb._tcp")) executable-find "avahi-browse" ((tramp-gvfs-parse-device-names "_afpovertcp._tcp")) ((tramp-gvfs-parse-device-names "_webdav._tcp")) ((tramp-gvfs-parse-device-names "_webdav._tcp")) ((tramp-gvfs-parse-device-names "_ssh._tcp") (tramp-gvfs-parse-device-names "_workstation._tcp")) ((tramp-gvfs-parse-device-names "_smb._tcp"))] 3)
#@86 Return all discovered synce devices as list.
They are retrieved from the hal daemon.
(defalias 'tramp-synce-list-devices #[nil "\306\307\310\311 \n \312\257\306\"\306 78\313\3147
D 9 : ; <\3151\301 ;=X\205\275 \316 >\317\216?\203k ;\320X\203k \321\322;\323U\203M \324\202d ;\325U\203X \324\202d ;\326U\203c \327\202d \330:P9#\210=\331Y\205\274 \332<!\203\205 \323 =\333<\334\306#<);\325U\203\246 \323 =r\335<!q\210:\336P:\3109\337 C\"9*\340<!\205\274 \321\341<\342\343;\":P9$*0\202\305 \210\202\306 \210,\3217
\"8\313\344\345\f!C 9 : ; <\3461|;=X\205x\316 >\347\216?\203&;\320X\203&\321\322;\323U\203\324\202 ;\325U\203\324\202 ;\326U\203 \327\202 \330:P9#\210=\331Y\205w\332<!\203@\323 =\333<\334\306#<);\325U\203a\323 =r\335<!q\210:\336P:\3109\337 C\"9*\340<!\205w\321\341<\342\343;\":P9$*0\202\200\210\202\201\210,\f+\306 @\211 A\203\266A@@\307\310\311 @B\350\257\351C\"\306 78\313\3147
D 9 : ; <\3521T;=X\205P\316 >\353\216?\203\376;\320X\203\376\321\322;\323U\203\340\324\202\367;\325U\203\353\324\202\367;\326U\203\366\327\202\367\330:P9#\210=\331Y\205O\332<!\203\323 =\333<\334\306#<);\325U\2039\323 =r\335<!q\210:\336P:\3109\337 C\"9*\340<!\205O\321\341<\342\343;\":P9$*0\202X\210\202Y\210,\3217
\"8\313\344\345\f!C 9 : ; <\3541;=X\205 \316 >\355\216?\203\271;\320X\203\271\321\322;\323U\203\233\324\202\262;\325U\203\246\324\202\262;\326U\203\261\327\202\262\330:P9#\210=\331Y\205\n\332<!\203\323\323 =\333<\334\306#<);\325U\203\364\323 =r\335<!q\210:\336P:\3109\337 C\"9*\340<!\205\n\321\341<\342\343;\":P9$*0\202\210\202\210,\f+\203\255\307\310\311 @B\356\257\357C\"\306 78\313\3147
D 9 : ; <\3601\334;=X\205\330\316 >\361\216?\203\206;\320X\203\206\321\322;\323U\203h\324\202;\325U\203s\324\202;\326U\203~\327\202\330:P9#\210=\331Y\205\327\332<!\203\240\323 =\333<\334\306#<);\325U\203\301\323 =r\335<!q\210:\336P:\3109\337 C\"9*\340<!\205\327\321\341<\342\343;\":P9$*0\202\340\210\202\341\210,\3217
\"8\313\344\345\f!C 9 : ; <\3621\227;=X\205\223\316 >\363\216?\203A;\320X\203A\321\322;\323U\203#\324\202:;\325U\203.\324\202:;\326U\2039\327\202:\330:P9#\210=\331Y\205\222\332<!\203[\323 =\333<\334\306#<);\325U\203|\323 =r\335<!q\210:\336P:\3109\337 C\"9*\340<!\205\222\321\341<\342\343;\":P9$*0\202\233\210\202\234\210,\f+\211 C\235\204\254CB)AA\211A\204\215*8\364\344C 9 : ; <\3651d;=X\205`\316 >\366\216?\203;\320X\203\321\322;\323U\203\360\324\202;\325U\203\373\324\202;\326U\203\327\202\330:P9#\210=\331Y\205_\332<!\203(\323 =\333<\334\306#<);\325U\203I\323 =r\335<!q\210:\336P:\3109\337 C\"9*\340<!\205_\321\341<\342\343;\":P9$*0\202h\210\202i\210,)\207" [tramp-synce-devices tramp-hal-service tramp-hal-path-manager tramp-hal-interface-manager result args nil dbus-call-method append :system "GetAllDevices" 6 "%s %s" (error) match-data #[nil "\301\302\"\207" [save-match-data-internal set-match-data evaporate] 3] 3 apply message 0 "" 1 2 "Warning: " "Tramp: " 4 processp tramp-get-connection-property "vector" tramp-get-connection-buffer "\n%s" buffer-string vectorp tramp-debug-message format "(%d) # " "%s" tramp-gvfs-stringify-dbus-message (error) #[nil "\301\302\"\207" [save-match-data-internal set-match-data evaporate] 3] "PropertyExists" "sync.plugin" (error) #[nil "\301\302\"\207" [save-match-data-internal set-match-data evaporate] 3] (error) #[nil "\301\302\"\207" [save-match-data-internal set-match-data evaporate] 3] "GetPropertyString" "pda.pocketpc.name" (error) #[nil "\301\302\"\207" [save-match-data-internal set-match-data evaporate] 3] (error) #[nil "\301\302\"\207" [save-match-data-internal set-match-data evaporate] 3] 10 (error) #[nil "\301\302\"\207" [save-match-data-internal set-match-data evaporate] 3] func tramp-gvfs-dbus-event-vector arguments fmt-string level vec-or-proc tramp-verbose save-match-data-internal tramp-message-show-message device --dolist-tail-- tramp-hal-interface-device prop] 8 (#$ . 101748)])
#@55 Return a list of (nil host) tuples allowed to access.
(defalias 'tramp-synce-parse-device-names #[(_ignore) "\300\301\302 \"\207" [mapcar #[(x) "\301D\207" [x nil] 2] tramp-synce-list-devices] 3 (#$ . 105959)])
(byte-code "\203 \301\302\303\"\210\304\305\306\"\210\307\310!\207" [tramp-gvfs-enabled tramp-set-completion-function "synce" ((tramp-synce-parse-device-names "")) add-hook tramp-unload-hook #[nil "\300\301\302\"\207" [unload-feature tramp-gvfs force] 3] provide tramp-gvfs] 3)
Kontol Shell Bypass