%PDF-
%PDF-
Mini Shell
Mini Shell
;ELC
;;; Compiled
;;; in Emacs version 27.2
;;; 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 "\300\301!\210\300\302!\210\300\303!\210\300\304!\207" [require tramp dbus url-parse url-util] 2)
#@33 Non-nil when GVFS is available.
(defconst tramp-gvfs-enabled (byte-code "\3011: \302\303!\2058 \304\305\306\"\2058 \307\310!\2058 \310\311!\2058 \307\310!\2058 \310\312!\2058 \313X\2068 \314\315!\2068 \314\316!0\207\210\317\207" [emacs-major-version (error) featurep dbusbind autoload zeroconf-init "zeroconf" functionp dbus-get-unique-name :system :session 25 tramp-compat-process-running-p "gvfs-fuse-daemon" "gvfsd-fuse" nil] 3) (#$ . 517))
(byte-code "\300\301\302\303\304DD\305\306\307\310\311\312\313& \207" [custom-declare-variable tramp-gvfs-methods funcall function #[0 "\300\207" [("afp" "dav" "davs" "gdrive" "nextcloud" "sftp")] 1] "List of methods for remote files, accessed with GVFS." :group tramp :version "27.1" :type (repeat (choice (const "afp") (const "dav") (const "davs") (const "ftp") (const "gdrive") (const "http") (const "https") (const "nextcloud") (const "sftp") (const "smb")))] 10)
#@70 List of methods which require registration at GNOME Online Accounts.
(defconst tramp-goa-methods '("gdrive" "nextcloud") (#$ . 1436))
(byte-code "\203\f \304\305!\235\204 \n\211\203 \211@\306 \"A\266\202\202
\210\307\310\311\"\210\312\313\314\315\316DD\317\320\321\322\323\324\325& \210\326\327!\203A \307\310\330\"\210\304\207" [tramp-gvfs-enabled tramp-goa-service tramp-goa-methods tramp-gvfs-methods dbus-list-known-names :session delete add-hook tramp--startup-hook #[0 "\301\302\"\205 \303\304\305\306\307\310\"E\"\210\303\311\312\"\207" [user-mail-address string-match "\\(.+\\)@\\(\\(?:gmail\\|googlemail\\)\\.com\\)" add-to-list tramp-default-user-alist "\\`gdrive\\'" nil match-string 1 tramp-default-host-alist ("\\`gdrive\\'" nil (\, (match-string 2 user-mail-address)))] 7] custom-declare-variable tramp-gvfs-zeroconf-domain funcall function #[0 "\300\207" [#1="local"] 1 #1#] "Zeroconf domain to be used for discovering services, like host names." :group tramp :version "23.2" :type string featurep dbusbind #[0 "\211\205 \211@\302 \"\204 \303\301\304B\"\210A\266\202\202 \207" [tramp-gvfs-methods tramp-methods assoc add-to-list nil] 6]] 10)
#@44 The preceding object path for own objects.
(defconst tramp-gvfs-path-tramp (concat dbus-path-emacs "/Tramp") (#$ . 2617))
#@41 The well known name of the GVFS daemon.
(defconst tramp-gvfs-service-daemon "org.gtk.vfs.Daemon" (#$ . 2745))
#@37 The object path of the GVFS daemon.
(defconst tramp-gvfs-path-mounttracker "/org/gtk/vfs/mounttracker" (#$ . 2861))
#@50 The mount tracking interface in the GVFS daemon.
(defconst tramp-gvfs-interface-mounttracker "org.gtk.vfs.MountTracker" (#$ . 2983))
#@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) (#$ . 3122))
#@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) (#$ . 3440))
#@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) (#$ . 3670))
#@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) (#$ . 3912))
#@62 Used by the dbus-proxying implementation of GMountOperation.
(defconst tramp-gvfs-interface-mountoperation "org.gtk.vfs.MountOperation" (#$ . 4278))
#@32 Operation requires a password.
(defconst tramp-gvfs-password-need-password 1 (#$ . 4433))
#@32 Operation requires a username.
(defconst tramp-gvfs-password-need-username 2 (#$ . 4529))
#@30 Operation requires a domain.
(defconst tramp-gvfs-password-need-domain 4 (#$ . 4625))
#@37 Operation supports saving settings.
(defconst tramp-gvfs-password-saving-supported 8 (#$ . 4717))
#@37 Operation supports anonymous users.
(defconst tramp-gvfs-password-anonymous-supported 16 (#$ . 4821))
#@59 The well known name of the GNOME Online Accounts service.
(defconst tramp-goa-service "org.gnome.OnlineAccounts" (#$ . 4929))
#@47 The object path of the GNOME Online Accounts.
(defconst tramp-goa-path "/org/gnome/OnlineAccounts" (#$ . 5061))
#@56 The object path of the GNOME Online Accounts accounts.
(defconst tramp-goa-path-accounts (concat tramp-goa-path "/Accounts") (#$ . 5179))
#@55 The documents interface of the GNOME Online Accounts.
(defconst tramp-goa-interface-documents "org.gnome.OnlineAccounts.Documents" (#$ . 5323))
#@54 The printers interface of the GNOME Online Accounts.
(defconst tramp-goa-interface-printers "org.gnome.OnlineAccounts.Printers" (#$ . 5473))
#@51 The files interface of the GNOME Online Accounts.
(defconst tramp-goa-interface-files "org.gnome.OnlineAccounts.Files" (#$ . 5620))
#@54 The contacts interface of the GNOME Online Accounts.
(defconst tramp-goa-interface-contacts "org.gnome.OnlineAccounts.Contacts" (#$ . 5758))
#@54 The calendar interface of the GNOME Online Accounts.
(defconst tramp-goa-interface-calendar "org.gnome.OnlineAccounts.Calendar" (#$ . 5905))
#@57 The oauth2based interface of the GNOME Online Accounts.
(defconst tramp-goa-interface-oauth2based "org.gnome.OnlineAccounts.OAuth2Based" (#$ . 6052))
#@53 The account interface of the GNOME Online Accounts.
(defconst tramp-goa-interface-account "org.gnome.OnlineAccounts.Account" (#$ . 6208))
#@72 Regexp matching GNOME Online Accounts "PresentationIdentity" property.
(defconst tramp-goa-identity-regexp (concat "^\\(" tramp-user-regexp "\\)?@\\(" tramp-host-regexp "\\)?\\(?::\\(" tramp-port-regexp "\\)\\)?") (#$ . 6352))
#@50 The mail interface of the GNOME Online Accounts.
(defconst tramp-goa-interface-mail "org.gnome.OnlineAccounts.Mail" (#$ . 6585))
#@50 The chat interface of the GNOME Online Accounts.
(defconst tramp-goa-interface-chat "org.gnome.OnlineAccounts.Chat" (#$ . 6720))
#@52 The photos interface of the GNOME Online Accounts.
(defconst tramp-goa-interface-photos "org.gnome.OnlineAccounts.Photos" (#$ . 6855))
#@55 The object path of the GNOME Online Accounts manager.
(defconst tramp-goa-path-manager (concat tramp-goa-path "/Manager") (#$ . 6996))
#@53 The manager interface of the GNOME Online Accounts.
(defconst tramp-goa-interface-documents "org.gnome.OnlineAccounts.Manager" (#$ . 7137))
#@73 compiler-macro for inlining `tramp-goa-name-p'.
(fn CL-WHOLE-ARG CL-X)
(defalias 'tramp-goa-name-p--cmacro #[514 "\300\301\302\303\211\211&\207" [cl--defsubst-expand (cl-x) (cl-block tramp-goa-name-p (and (memq (car-safe cl-x) cl-struct-tramp-goa-name-tags) t)) nil] 9 (#$ . 7283)])
(put 'tramp-goa-name-p 'compiler-macro 'tramp-goa-name-p--cmacro)
#@13
(fn CL-X)
(defalias 'tramp-goa-name-p #[257 "\211\242>\205 \301\207" [cl-struct-tramp-goa-name-tags t] 3 (#$ . 7642)])
(byte-code "\300\301\302\303#\304\305\306\301#\207" [function-put tramp-goa-name-p side-effect-free error-free put tramp-goa-name cl-deftype-satisfies] 5)
#@78 compiler-macro for inlining `tramp-goa-name-method'.
(fn CL-WHOLE-ARG CL-X)
(defalias 'tramp-goa-name-method--cmacro #[514 "\300\301\302\303\211\211&\207" [cl--defsubst-expand (cl-x) (cl-block tramp-goa-name-method (progn (or (tramp-goa-name-p cl-x) (signal 'wrong-type-argument (list 'tramp-goa-name cl-x))) (nth 1 cl-x))) nil] 9 (#$ . 7926)])
(put 'tramp-goa-name-method 'compiler-macro 'tramp-goa-name-method--cmacro)
#@66 Access slot "method" of `tramp-goa-name' struct CL-X.
(fn CL-X)
(defalias 'tramp-goa-name-method #[257 "\211\242>\204 \301\302\303D\"\210\211A@\207" [cl-struct-tramp-goa-name-tags signal wrong-type-argument tramp-goa-name] 5 (#$ . 8357)])
(byte-code "\300\301\302\303#\300\207" [function-put tramp-goa-name-method side-effect-free t] 4)
#@76 compiler-macro for inlining `tramp-goa-name-user'.
(fn CL-WHOLE-ARG CL-X)
(defalias 'tramp-goa-name-user--cmacro #[514 "\300\301\302\303\211\211&\207" [cl--defsubst-expand (cl-x) (cl-block tramp-goa-name-user (progn (or (tramp-goa-name-p cl-x) (signal 'wrong-type-argument (list 'tramp-goa-name cl-x))) (nth 2 cl-x))) nil] 9 (#$ . 8704)])
(put 'tramp-goa-name-user 'compiler-macro 'tramp-goa-name-user--cmacro)
#@64 Access slot "user" of `tramp-goa-name' struct CL-X.
(fn CL-X)
(defalias 'tramp-goa-name-user #[257 "\211\242>\204 \301\302\303D\"\210\3048\207" [cl-struct-tramp-goa-name-tags signal wrong-type-argument tramp-goa-name 2] 5 (#$ . 9125)])
(byte-code "\300\301\302\303#\300\207" [function-put tramp-goa-name-user side-effect-free t] 4)
#@76 compiler-macro for inlining `tramp-goa-name-host'.
(fn CL-WHOLE-ARG CL-X)
(defalias 'tramp-goa-name-host--cmacro #[514 "\300\301\302\303\211\211&\207" [cl--defsubst-expand (cl-x) (cl-block tramp-goa-name-host (progn (or (tramp-goa-name-p cl-x) (signal 'wrong-type-argument (list 'tramp-goa-name cl-x))) (nth 3 cl-x))) nil] 9 (#$ . 9468)])
(put 'tramp-goa-name-host 'compiler-macro 'tramp-goa-name-host--cmacro)
#@64 Access slot "host" of `tramp-goa-name' struct CL-X.
(fn CL-X)
(defalias 'tramp-goa-name-host #[257 "\211\242>\204 \301\302\303D\"\210\3048\207" [cl-struct-tramp-goa-name-tags signal wrong-type-argument tramp-goa-name 3] 5 (#$ . 9889)])
(byte-code "\300\301\302\303#\300\207" [function-put tramp-goa-name-host side-effect-free t] 4)
#@76 compiler-macro for inlining `tramp-goa-name-port'.
(fn CL-WHOLE-ARG CL-X)
(defalias 'tramp-goa-name-port--cmacro #[514 "\300\301\302\303\211\211&\207" [cl--defsubst-expand (cl-x) (cl-block tramp-goa-name-port (progn (or (tramp-goa-name-p cl-x) (signal 'wrong-type-argument (list 'tramp-goa-name cl-x))) (nth 4 cl-x))) nil] 9 (#$ . 10232)])
(put 'tramp-goa-name-port 'compiler-macro 'tramp-goa-name-port--cmacro)
#@64 Access slot "port" of `tramp-goa-name' struct CL-X.
(fn CL-X)
(defalias 'tramp-goa-name-port #[257 "\211\242>\204 \301\302\303D\"\210\3048\207" [cl-struct-tramp-goa-name-tags signal wrong-type-argument tramp-goa-name 4] 5 (#$ . 10654)])
(byte-code "\300\301\302\303#\304\305\306\"\207" [function-put tramp-goa-name-port side-effect-free t defalias copy-tramp-goa-name copy-sequence] 4)
#@104 compiler-macro for inlining `make-tramp-goa-name'.
(fn CL-WHOLE &cl-quote &key METHOD USER HOST PORT)
(defalias 'make-tramp-goa-name--cmacro #[385 "\300\301\"A@\300\302\"A@\300\303\"A@\300\304\"A@\211\203D \211@\305>\203, \211AA\262\202 \306>A@\203; \307\262\202 \310\311@\"\210\202 \210\312\313\314\307 \307 & \207" [plist-member :method :user :host :port (:method :user :host :port :allow-other-keys) :allow-other-keys nil error "Keyword argument %s not one of (:method :user :host :port)" cl--defsubst-expand (method user host port) (cl-block make-tramp-goa-name (list 'tramp-goa-name method user host port))] 16 (#$ . 11052)])
(put 'make-tramp-goa-name 'compiler-macro 'make-tramp-goa-name--cmacro)
#@84 Constructor for objects of type `tramp-goa-name'.
(fn &key METHOD USER HOST PORT)
(defalias 'make-tramp-goa-name #[128 "\300\301\"A@\300\302\"A@\300\303\"A@\300\304\"A@\211\203D \211@\305>\203, \211AA\262\202 \306>A@\203; \307\262\202 \310\311@\"\210\202 \210\312\257\207" [plist-member :method :user :host :port (:method :user :host :port :allow-other-keys) :allow-other-keys nil error "Keyword argument %s not one of (:method :user :host :port)" tramp-goa-name] 10 (#$ . 11783)])
(byte-code "\300\301\302\303#\304\305\306\211\307\303\310\311\305\306& \207" [function-put make-tramp-goa-name side-effect-free t cl-struct-define tramp-goa-name nil list ((cl-tag-slot) (method) (user) (host) (port)) cl-struct-tramp-goa-name-tags] 11)
#@66 List of cons cells, mapping "gvfs-<command>" to "gio <command>".
(defconst tramp-gvfs-gio-mapping '(("gvfs-copy" . "copy") ("gvfs-info" . "info") ("gvfs-ls" . "list") ("gvfs-mkdir" . "mkdir") ("gvfs-monitor-file" . "monitor") ("gvfs-mount" . "mount") ("gvfs-move" . "move") ("gvfs-rm" . "remove") ("gvfs-set-attribute" . "set") ("gvfs-trash" . "trash")) (#$ . 12542))
#@23 GVFS file attributes.
(defconst tramp-gvfs-file-attributes '("name" "type" "standard::display-name" "standard::symlink-target" "standard::is-volatile" "unix::nlink" "unix::uid" "owner::user" "unix::gid" "owner::group" "time::access" "time::modified" "time::changed" "standard::size" "unix::mode" "access::can-read" "access::can-write" "access::can-execute" "unix::inode" "unix::device") (#$ . 12916))
#@54 Regexp to parse GVFS file attributes with `gvfs-ls'.
(defconst tramp-gvfs-file-attributes-with-gvfs-ls-regexp (byte-code "\301\302\303\"\304Q\207" [tramp-gvfs-file-attributes "[[:blank:]]" regexp-opt t "=\\(.+?\\)"] 4) (#$ . 13323))
#@56 Regexp to parse GVFS file attributes with `gvfs-info'.
(defconst tramp-gvfs-file-attributes-with-gvfs-info-regexp (byte-code "\301\302\303\"\304Q\207" [tramp-gvfs-file-attributes "^[[:blank:]]*" regexp-opt t ":[[:blank:]]+\\(.*\\)$"] 4) (#$ . 13563))
#@30 GVFS file system attributes.
(defconst tramp-gvfs-file-system-attributes '("filesystem::free" "filesystem::size" "filesystem::used") (#$ . 13821))
#@63 Regexp to parse GVFS file system attributes with `gvfs-info'.
(defconst tramp-gvfs-file-system-attributes-regexp (byte-code "\301\302\303\"\304Q\207" [tramp-gvfs-file-system-attributes "^[[:blank:]]*" regexp-opt t ":[[:blank:]]+\\(.*\\)$"] 4) (#$ . 13974))
#@50 Default prefix for owncloud / nextcloud methods.
(defconst tramp-gvfs-nextcloud-default-prefix "/remote.php/webdav" (#$ . 14238))
#@60 Regexp of default prefix for owncloud / nextcloud methods.
(defconst tramp-gvfs-nextcloud-default-prefix-regexp (byte-code "\301!\302P\207" [tramp-gvfs-nextcloud-default-prefix regexp-quote "$"] 2) (#$ . 14374))
#@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 . tramp-handle-access-file) (add-name-to-file . tramp-handle-add-name-to-file) (copy-directory . tramp-handle-copy-directory) (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-compress-file . ignore) (dired-uncache . tramp-handle-dired-uncache) (exec-path . ignore) (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-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-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-case-insensitive-p . tramp-handle-file-name-case-insensitive-p) (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 . tramp-handle-file-selinux-context) (file-symlink-p . tramp-handle-file-symlink-p) (file-system-info . tramp-gvfs-handle-file-system-info) (file-truename . tramp-handle-file-truename) (file-writable-p . tramp-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-nearby-temp-file . tramp-handle-make-nearby-temp-file) (make-process . 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 . tramp-gvfs-handle-set-file-modes) (set-file-selinux-context . ignore) (set-file-times . tramp-gvfs-handle-set-file-times) (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) (temporary-file-directory . tramp-handle-temporary-file-directory) (tramp-set-file-uid-gid . tramp-gvfs-handle-set-file-uid-gid) (unhandled-file-name-directory . ignore) (vc-registered . ignore) (verify-visited-file-modtime . tramp-handle-verify-visited-file-modtime) (write-region . tramp-handle-write-region)) (#$ . 14594))
#@69 Check if it's a FILENAME handled by the GVFS daemon.
(fn FILENAME)
(defalias 'tramp-gvfs-file-name-p #[257 "\302!\205& \303!\211\242>\204 \304\305\306D\"\210\211A@\262\211;\205$ \211 \235\262\207" [cl-struct-tramp-file-name-tags tramp-gvfs-methods tramp-tramp-file-p tramp-dissect-file-name signal wrong-type-argument tramp-file-name] 6 (#$ . 18201)])
(put 'tramp-gvfs-file-name-p 'byte-optimizer 'byte-compile-inline-expand)
#@167 Invoke the GVFS related OPERATION and ARGS.
First arg specifies the OPERATION, second arg is a list of arguments to
pass to the OPERATION.
(fn OPERATION &rest ARGS)
(defalias 'tramp-gvfs-file-name-handler #[385 "\204 \302\303\304\"\210\305 \"\211\203* \306 \307\310\311\312\313!\314\"\315$\216\316A\")\262\202. \317\"\207" [tramp-gvfs-enabled tramp-gvfs-file-name-handler-alist tramp-user-error nil "Package `tramp-gvfs' not supported" assoc match-data make-byte-code 0 "\301\300\302\"\207" vconcat vector [set-match-data evaporate] 3 apply tramp-run-real-handler] 10 (#$ . 18642)])
(byte-code "\300\301!\203 \302\303\304\"\210\300\207" [featurep dbusbind add-hook tramp--startup-hook #[0 "\300\301\302\"\207" [tramp-register-foreign-file-name-handler tramp-gvfs-file-name-p tramp-gvfs-file-name-handler] 3]] 3)
#@78 Like `dbus-string-to-byte-array' but add trailing \0 if needed.
(fn STRING)
(defalias 'tramp-gvfs-dbus-string-to-byte-array #[257 "\301\302\303\"\203 \304\305!P\202 !\207" [tramp-gvfs-mountlocation-signature dbus-string-to-byte-array string-match "^(aya{sv})" string 0] 5 (#$ . 19471)])
#@117 Like `dbus-byte-array-to-string' but remove trailing \0 if exists.
Return nil for null BYTE-ARRAY.
(fn BYTE-ARRAY)
(defalias 'tramp-gvfs-dbus-byte-array-to-string #[257 "\211:\203 \211@:\204 \211\202 \211@\211\205, \300:\203* \301!@\302U\203* \303!\202+ !\207" [dbus-byte-array-to-string last 0 butlast] 5 (#$ . 19771)])
#@84 Convert a D-Bus MESSAGE into readable UTF8 strings, used for traces.
(fn MESSAGE)
(defalias 'tramp-gvfs-stringify-dbus-message #[257 "\211:\203 \300@!\203 \301\302\303!\"\207\211:\203( \211A:\204( \304@!\304A!B\207\211:\2032 \305\304\"\207\211;\203< \301\302\"\207\207" [characterp format "%S" tramp-gvfs-dbus-byte-array-to-string tramp-gvfs-stringify-dbus-message mapcar] 5 (#$ . 20106)])
#@116 Apply a D-Bus function FUNC from dbus.el.
The call will be traced by Tramp with trace level 6.
(fn VEC FUNC ARGS)
(defalias 'tramp-dbus-function #[771 "\303\304\305BC\3061\245 X\205\237 \203B \307X\203B \310\311\312U\203( \313\202= \314U\2032 \313\202= \315U\203< \316\202= \317P#\210\320Y\205\237 \312\314U\203 \3211z r\322!\203a \323!\202e \324\325\"q\210\326P\262\327\330 C\"\211\262)0\202~ \210\202 \210\322!\203\213 \331\332\"\262)\242\n>\205\237 \310\333\334\335\"P$0\266\204\202\251 \210\303\266\204\210\310\"\262\304\305\336!D\3061UX\205O \203\362 \307X\203\362 \310\311\312U\203\330 \313\202\355 \314U\203\342 \313\202\355 \315U\203\354 \316\202\355 \317P#\210\320Y\205O\312\314U\203/\3211*r\322!\203\323!\202\324\325\"q\210\326P\262\327\330 C\"\211\262)0\202.\210\202/\210\322!\203;\331\332\"\262)\242\n>\205O\310\333\334\335\"P$0\266\204\202Y\210\303\266\204\210\211\207" [tramp-verbose tramp-message-show-message cl-struct-tramp-file-name-tags nil 6 "%s" (error) 3 apply message 0 "" 1 2 "Warning: " "Tramp: " 4 (error) processp process-buffer tramp-get-connection-buffer dont-create "\n%s" append buffer-string process-get vector tramp-debug-message format "(%d) # " tramp-gvfs-stringify-dbus-message] 14 (#$ . 20512)])
#@338 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'.
(fn VEC SYNCHRONOUS BUS SERVICE PATH INTERFACE METHOD &rest ARGS)
(defalias 'with-tramp-dbus-call-method '(macro . #[1927 "\300\301\302 \303BBD\304\305\306\n\n\n\n\n\257\302\f\306B\306\307\nBBFEDD\310\n\311BBE\207" [let func if (#'dbus-call-method #'dbus-call-method-asynchronously) args append list 'ignore tramp-dbus-function (func args)] 19 (#$ . 21833)]))
(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) font-lock-add-keywords emacs-lisp-mode ("\\<with-tramp-dbus-call-method\\>")] 4)
#@127 Return all properties of INTERFACE.
The call will be traced by Tramp with trace level 6.
(fn VEC BUS SERVICE PATH INTERFACE)
(defalias 'with-tramp-dbus-get-all-properties '(macro . #[1285 "\300\301\302\303\304\n\n\nFFE\302\305\304 \257FE\207" [when member tramp-dbus-function #'dbus-introspect-get-interface-names list #'dbus-get-all-properties] 15 (#$ . 22731)]))
(byte-code "\300\301\302\303#\210\300\301\304\305#\210\306\307\310\"\207" [put with-tramp-dbus-get-all-properties lisp-indent-function 1 edebug-form-spec (form symbolp body) font-lock-add-keywords emacs-lisp-mode ("\\<with-tramp-dbus-get-all-properties\\>")] 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 (#$ . 23382))
#@94 Called when a D-Bus error message arrives, see `dbus-event-error-functions'.
(fn EVENT ERR)
(defalias 'tramp-gvfs-dbus-event-error #[514 "\205\204\306\307C\3101\246 X\205\240 \n\203C \311X\203C \312\313\314U\203) \315\202> \316U\2033 \315\202> \317U\203= \320\202> \321P#\210 \322Y\205\240 \314\316U\203\200 \3231{ r\324!\203b \325!\202f \326\327\"q\210\330P\262\331\332 C\"\211\262)0\202 \210\202\200 \210\324!\203\214 \333\334\"\262)\242 >\205\240 \312\335\336\337\"P$0\266\204\202\252 \210\340\266\204\210\341\342A@C\340\211 \343Y\205\255\211\203|\211\343\330\344\345! \346\216
\347 \210)r
q\210\332 +C\3501u X\205o\n\203\311X\203\312\313\314U\203\370 \315\202
\316U\203\315\202
\317U\203\f\320\202
\321P#\210 \322Y\205o\314\316U\203O\3511Jr\324!\2031\325!\2025\326\327\"q\210\330P\262\331\332 C\"\211\262)0\202N\210\202O\210\324!\203[\333\334\"\262)\242 >\205o\312\335\336\337\"P$0\266\205\202\257\210\340\266\205\202\2577r\352\353!q\210p\354 \2107\340\21189\355\211:\355 ; <\356 \210\357\360!\210+\211 \347 \361!\210)\266\202\262\210\211\204\273C\262\342\262\203t\316\342\362\211\363N\312\364 #E!C\3501o X\205i\n\203\f\311X\203\f\312\313\314U\203\362\315\202\316U\203\374\315\202\317U\203\320\202\321P#\210 \322Y\205i\314\316U\203I\3511Dr\324!\203+\325!\202/\326\327\"q\210\330P\262\331\332 C\"\211\262)0\202H\210\202I\210\324!\203U\333\334\"\262)\242 >\205i\312\335\336\337\"P$0\266\204\202s\210\340\266\204\210\365\366\312\364#!C\"*\266\204\207" [tramp-gvfs-dbus-event-vector tramp-verbose tramp-message-show-message cl-struct-tramp-file-name-tags signal-hook-function standard-output 6 "%S" (error) 3 apply message 0 "" 1 2 "Warning: " "Tramp: " 4 (error) processp process-buffer tramp-get-connection-buffer dont-create "\n%s" append buffer-string process-get vector tramp-debug-message format "(%d) # " nil file-error "%s" 10 generate-new-buffer " *string-output*" #[0 "\301!\207" [standard-output kill-buffer] 2] backtrace (error) (error) get-buffer-create "*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 signal substring-no-properties default-directory buffer-read-only buffer-file-name buffer-undo-list inhibit-modification-hooks inhibit-read-only] 17 (#$ . 23600)])
(byte-code "\300\301\302\"\210\300\303\304\"\207" [add-hook dbus-event-error-functions tramp-gvfs-dbus-event-error tramp-gvfs-unload-hook #[0 "\300\301\302\"\207" [remove-hook dbus-event-error-functions tramp-gvfs-dbus-event-error] 3]] 3)
#@841 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.
(fn OP FILENAME NEWNAME &optional OK-IF-ALREADY-EXISTS KEEP-DATE PRESERVE-UID-GID PRESERVE-EXTENDED-ATTRIBUTES)
(defalias 'tramp-gvfs-do-copy-or-rename-file #[1795 "C\306>\204 \307\310 \"\210\211\311\242!\240\210\312\242!\2036 \313\242\314$\210\315=\205> \316\242\317\"\202> \320\242!\320!\321\242 \"\n\322=\203O \323\202P \324 \322=\203[ \325\202\\ \326\327\203g \242\202i !\211\242>\204x \330\331\332D\"\210\211A@\242>\204\211 \330\331\332D\"\210\3338\242>\204\232 \330\331\332D\"\210\3348\242>\204\254 \330\331\332D\"\210\3358\242>\204\276 \330\331\332D\"\210\3368\242>\204\320 \330\331\332D\"\210\3378\242>\204\344 \330\331\332 D\"\210\3408\341\242!\204\347 \342 \343\242E\344\211\f\345Y\205\211\203\305\211\345\346\347\350! \351\216
\352 \210)r
q\210\353 +C\3541\276\fX\205\270 \203[\334X\203[\355\356\357U\203A\360\202V\361U\203K\360\202V\333U\203U\362\202V\363P#\210\f\335Y\205\270\357 \361U\203\230\3641\223r\365!\203z\366!\202~\367\370\"q\210\346P\262\371\353 C\"\211\262)0\202\227\210\202\230\210\365!\203\244\372\373\"\262)\242>\205\270\355\374\375\376\"P$0\266\205\202\210\344\266\205\202@r\377\201H !q\210p\201I \210@\344\211AB\314\211C\314 D E\201J \210\201K \201L !\210+\211 \352 \201M !\210)\266\202\262\210\211\204C\262\201N \262\203\323\361\201N \201O \211\201P N\355\201Q #E!C\3541\316\fX\205\310 \203k\334X\203k\355\356\357U\203Q\360\202f\361U\203[\360\202f\333U\203e\362\202f\363P#\210\f\335Y\205\310\357 \361U\203\250\3641\243r\365!\203\212\366!\202\216\367\370\"q\210\346P\262\371\353 C\"\211\262)0\202\247\210\202\250\210\365!\203\264\372\373\"\262)\242>\205\310\355\374\375\376\"P$0\266\204\202\322\210\344\266\204\210\330\201R \355\201Q #!C\"*\266\204\347\341!\203\347\201S \344\211\211\f\345Y\205\211\203\305\211\345\346\347\350! \351\216
\352 \210)r
q\210\353 +C\3541\276\fX\205\270 \203[\334X\203[\355\356\357U\203A\360\202V\361U\203K\360\202V\333U\203U\362\202V\363P#\210\f\335Y\205\270\357 \361U\203\230\3641\223r\365!\203z\366!\202~\367\370\"q\210\346P\262\371\353 C\"\211\262)0\202\227\210\202\230\210\365!\203\244\372\373\"\262)\242>\205\270\355\374\375\376\"P$0\266\205\202\210\344\266\205\202@r\377\201H !q\210p\201I \210@\344\211AB\314\211C\314 D E\201J \210\201K \201L !\210+\211 \352 \201M !\210)\266\202\262\210\211\204C\262\201N \262\203\323\361\201N \201O \211\201P N\355\201Q #E!C\3541\316\fX\205\310 \203k\334X\203k\355\356\357U\203Q\360\202f\361U\203[\360\202f\333U\203e\362\202f\363P#\210\f\335Y\205\310\357 \361U\203\250\3641\243r\365!\203\212\366!\202\216\367\370\"q\210\346P\262\371\353 C\"\211\262)0\202\247\210\202\250\210\365!\203\264\372\373\"\262)\242>\205\310\355\374\375\376\"P$0\266\204\202\322\210\344\266\204\210\330\201R \355\201Q #!C\"*\266\312!\203\356\201T !\204\356\201U \201V C\344\211\f\345Y\205 \211\203\314\211\345\346\347\350! \351\216
\352 \210)r
q\210\353 +C\3541\305\fX\205\277 \203b\334X\203b\355\356\357U\203H\360\202]\361U\203R\360\202]\333U\203\\\362\202]\363P#\210\f\335Y\205\277\357 \361U\203\237\3641\232r\365!\203\201\366!\202\205\367\370\"q\210\346P\262\371\353 C\"\211\262)0\202\236\210\202\237\210\365!\203\253\372\373\"\262)\242>\205\277\355\374\375\376\"P$0\266\205\202 \210\344\266\205\202 @r\377\201H !q\210p\201I \210@\344\211AB\314\211C\314 D E\201J \210\201K \201L !\210+\211 \352 \201M !\210)\266\202\262\210\211\204C\262\201N \262\203\332\361\201N \201O \211\201P N\355\201Q #E!C\3541\325\fX\205\317 \203r\334X\203r\355\356\357U\203X\360\202m\361U\203b\360\202m\333U\203l\362\202m\363P#\210\f\335Y\205\317\357 \361U\203\257\3641\252r\365!\203\221\366!\202\225\367\370\"q\210\346P\262\371\353 C\"\211\262)0\202\256\210\202\257\210\365!\203\273\372\373\"\262)\242>\205\317\355\374\375\376\"P$0\266\204\202\331\210\344\266\204\210\330\201R \355\201Q #!C\"*\266\n\203 \201W \201X \344#\204g\f\2034
\242\320!\205/\327!\211\242>\204 \330\331\332D\"\210\211A@\262\211;\205-\211F\235\262\262\203g \203\305\320!\205b\327!\211\242>\204R\330\331\332D\"\210\211A@\262\211;\205`\211F\235\262\262\204\305
\242\344\211 G\201Y \201Z J\201[ \201\\ \201] N@!\"\201^ \314\"\201_ #)\266\204\322=\203\255\201` \242\314&\210\202\267\201a \242\314#\210\201a #\262\202: \357\201b \375\201c
\242$C\201d 1y\fX\205s \203\334X\203\355\356\357U\203\372\360\202\361U\203\360\202\333U\203\362\202\363P#\210\f\335Y\205s\357 \361U\203S\201e 1Nr\365!\2035\366!\2029\367\370\"q\210\346P\262\371\353 C\"\211\262)0\202R\210\202S\210\365!\203_\372\373\"\262)\242>\205s\355\374\375\376\"P$0\266\204\202}\210\344\266\204\210\201f C \205\262\357\f\334^X\205\262\201g \375\201c \f\242$\344\211#\211\205\260\201h \334\201i \201j $\262\201k \357\201l \201m \373\n\n&\201n \"\345$\216\355\201o \371\322=\205\357\204\354\205\357\201p \201q \242!\201q !D\"$\2033 \f\203 \n\201o \n\201r \201q !#\204 \n\322=\204 \n\201o \n\201r \201q \242!#\203 \n\f\203J \f\203\351 \201W \n\201X \344#\203\351 r\367\n!q\210eb\210\344\n\201U \201s \201t D\201u \201k \357\201v \201m \373!\201w \"\333$\216\201x !\203\211 \206\237 \365!\203\225 \366!\206\237 \242>\205\237 \367!\242>\203\252 \206\267 \211\205\267 r\211q\210\327@!)\201k \357\201y \201m \373 $\201z \"\335$\216\355\201{ %)\266\202)\266)\202 \n\201| \n\201X \314#\210\201} \242&\210\201~ \240\210)\266\f\203\252\n\315=\203\252\n\327\242!\211\242>\2041\n\330\331\332D\"\210\211A@\242>\204B\n\330\331\332D\"\210\3338\242>\204S\n\330\331\332D\"\210\3348\242>\204e\n\330\331\332D\"\210\3358\242>\204w\n\330\331\332D\"\210\3368\242>\204\211\n\330\331\332D\"\210\3378\242>\204\235\n\330\331\332 D\"\210\3408\201 \"\266 \205: \327!\211\242>\204\301\n\330\331\332D\"\210\211A@\242>\204\322\n\330\331\332D\"\210\3338\242>\204\343\n\330\331\332D\"\210\3348\242>\204\365\n\330\331\332D\"\210\3358\242>\204 \330\331\332D\"\210\3368\242>\204 \330\331\332D\"\210\3378\242>\204- \330\331\332 D\"\210\3408\201 \"\266\210\266\210\266\205\207" [cl-struct-tramp-file-name-tags tramp-file-missing signal-hook-function tramp-message-show-message tramp-verbose standard-output (copy rename) error "Unknown operation `%s', must be `copy' or `rename'" file-truename file-directory-p copy-directory t rename delete-directory recursive tramp-tramp-file-p tramp-equal-remote copy "gvfs-copy" "gvfs-move" "Copying" "Renaming" tramp-dissect-file-name signal wrong-type-argument tramp-file-name 2 3 4 5 6 7 file-exists-p "%s file" "No such file or directory" nil 10 "\n%s" generate-new-buffer " *string-output*" #[0 "\301!\207" [standard-output kill-buffer] 2] backtrace buffer-string (error) apply message 0 #3="" 1 "Warning: " "Tramp: " (error) processp process-buffer tramp-get-connection-buffer dont-create append process-get vector tramp-debug-message format "(%d) # " get-buffer-create default-directory buffer-read-only buffer-file-name buffer-undo-list inhibit-modification-hooks inhibit-read-only tramp-gvfs-methods file-name-handler-alist "*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 substring-no-properties file-already-exists tramp-compat-directory-name-p file-error "File is a directory %s" tramp-get-connection-property "direct-copy-failed" expand-file-name tramp-temp-name-prefix eval temporary-file-directory standard-value file-name-extension make-temp-file copy-file rename-file "%s..." #1="%s %s to %s" #2=(error) #4=(error) "failed" make-progress-reporter run-at-time 0.1 tramp-progress-reporter-update make-byte-code "\305\203 \306\305!\210\303\307\310\311\312\302\300\242\301$\304\242D\3131\263 \"X\205\261 #\203Q \314X\203Q \315\316\307U\2037 \317\202L \320U\203A \317\202L \321U\203K \322\202L \323P#\210\"\324Y\205\261 \307 \"\320U\203\220 \3251\213 r\326!\203r \327!\202v \330\331\"q\210\332P\262\333\334 C\"\211\262)0\202\217 \210\202\220 \210\326!\203\234 \335\336\"\262)\242$>\205\261 \315\337\311\340\"P$0\207\210\341\207" vconcat [cancel-timer 0 "%s...%s" format #1# #2# 3 apply message #3# 1 2 "Warning: " "Tramp: " 4 #4# processp process-buffer tramp-get-connection-buffer dont-create "\n%s" append buffer-string process-get vector tramp-debug-message "(%d) # " nil tramp-verbose tramp-message-show-message cl-struct-tramp-file-name-tags] tramp-gvfs-send-command ("--preserve") tramp-gvfs-url-file-name "gvfs-info" "%s failed, see buffer `%s' for details." buffer-name current-window-configuration "\301\300!\207" [set-window-configuration] bufferp "\302\203- \f\203-
\306U\204- \307 \204- \310 \203- \311 \312\313\300\301#\210\314\302!\210\315 \210\316\317!\210)\320\303@\"\205; \321 \241\207" [tramp-message-show-message tramp-verbose 0 tramp-completion-mode-p current-message t apply message pop-to-buffer discard-input sit-for 30 tramp-file-name-equal-p current-time enable-recursive-minibuffers tramp-current-connection] tramp-error tramp-set-connection-property tramp-gvfs-do-copy-or-rename-file "done" tramp-flush-file-properties] 40 (#$ . 26312)])
#@145 Like `copy-file' for Tramp files.
(fn FILENAME NEWNAME &optional OK-IF-ALREADY-EXISTS KEEP-DATE PRESERVE-UID-GID PRESERVE-EXTENDED-ATTRIBUTES)
(defalias 'tramp-gvfs-handle-copy-file #[1538 "\300!\262\300!\262\301!\204 \301!\203) \302\303&\207\304\305\257\"\207" [expand-file-name tramp-tramp-file-p tramp-gvfs-do-copy-or-rename-file copy tramp-run-real-handler copy-file] 14 (#$ . 36747)])
#@84 Like `delete-directory' for Tramp files.
(fn DIRECTORY &optional RECURSIVE TRASH)
(defalias 'tramp-gvfs-handle-delete-directory #[769 "\306!\211\242>\204 \307\310\311D\"\210\211A@\242>\204\" \307\310\311D\"\210\3128\242>\2043 \307\310\311D\"\210\3138\242>\204E \307\310\311D\"\210\3148\242>\204W \307\310\311D\"\210\3158\242>\204i \307\310\311D\"\210\3168\242>\204} \307\310\311 D\"\210\3178 \203\250 \320 !\204\250 \321\322\323\324\325\326\"\327\"\315\330%\331
\332 #\"\210\202\224\331 \333 #\203\224\334\335
C\333\211\f\336Y\205\263\211\203\202\211\336\337\340\341! \342\216
\343 \210)r
q\210\344 +C\3451{\fX\205u \203\313X\203\346\347\350U\203\376 \351\202\352U\203\351\202\312U\203\353\202\354P#\210\f\314Y\205u\350 \352U\203U\3551Pr\356!\2037\357!\202;\360\361\"q\210\337P\262\362\344 C\"\211\262)0\202T\210\202U\210\356!\203a\363\326\"\262)\242>\205u\346\364\365\366\"P$0\266\205\202\265\210\333\266\205\202\265@r\367\370!q\210p\371 \210@\333\211AB\372\211C\372 D E\373 \210\374\375!\210+\211 \343 \376!\210)\266\202\262\210\211\204\301C\262\377\262\203\200\352\377\201G \211\201H N\346\201I #E!C\3451{\fX\205u \203\313X\203\346\347\350U\203\376\351\202\352U\203\351\202\312U\203\353\202\354P#\210\f\314Y\205u\350 \352U\203U\3551Pr\356!\2037\357!\202;\360\361\"q\210\337P\262\362\344 C\"\211\262)0\202T\210\202U\210\356!\203a\363\326\"\262)\242>\205u\346\364\365\366\"P$0\266\204\202\210\333\266\204\210\307\201J \346\201I #!C\"*\266\201K \"\210\201L \n\203\261F\203\261\201M \202\264\201N \201O !#?\205Mr\360!q\210eb\210\333\334\201P C\201Q \322\350\201R \325\326!\201S \"\312$\216\201T !\203\364\206\n\356!\203 \357!\206\n\242>\205\n\360!\242>\203\206\"\211\205\"r\211q\210\306@!)\322\350\201U \325\326 $\201V \"\314$\216\346\201W %)\266\202)\266\206)\207" [cl-struct-tramp-file-name-tags directory-files-no-dot-files-regexp signal-hook-function tramp-message-show-message tramp-verbose standard-output tramp-dissect-file-name signal wrong-type-argument tramp-file-name 2 3 4 5 6 7 file-symlink-p mapc make-byte-code 257 "\302!\211@\262\303=\203 \304\300\301#\207\305\301\"\207" vconcat vector [file-attributes t delete-directory delete-file] "\n\n(fn FILE)" directory-files full nil file-error "Couldn't delete non-empty %s" 10 "\n%s" generate-new-buffer " *string-output*" #[0 "\301!\207" [standard-output kill-buffer] 2] backtrace buffer-string (error) apply message 0 "" 1 "Warning: " "Tramp: " (error) processp process-buffer tramp-get-connection-buffer dont-create append process-get tramp-debug-message format "(%d) # " get-buffer-create "*debug tramp*" kill-all-local-variables t erase-buffer run-hooks temp-buffer-setup-hook internal-temp-output-buffer-show "%s" default-directory buffer-read-only buffer-file-name buffer-undo-list inhibit-modification-hooks inhibit-read-only delete-by-moving-to-trash error-message-string error-message format-message substring-no-properties tramp-flush-directory-properties tramp-gvfs-send-command "gvfs-trash" "gvfs-rm" tramp-gvfs-url-file-name "Couldn't delete %s" current-window-configuration "\301\300!\207" [set-window-configuration] bufferp "\302\203- \f\203-
\306U\204- \307 \204- \310 \203- \311 \312\313\300\301#\210\314\302!\210\315 \210\316\317!\210)\320\303@\"\205; \321 \241\207" [tramp-message-show-message tramp-verbose 0 tramp-completion-mode-p current-message t apply message pop-to-buffer discard-input sit-for 30 tramp-file-name-equal-p current-time enable-recursive-minibuffers tramp-current-connection] tramp-error] 28 (#$ . 37179)])
#@68 Like `delete-file' for Tramp files.
(fn FILENAME &optional TRASH)
(defalias 'tramp-gvfs-handle-delete-file #[513 "\303!\211\242>\204 \304\305\306D\"\210\211A@\242>\204\" \304\305\306D\"\210\3078\242>\2043 \304\305\306D\"\210\3108\242>\204E \304\305\306D\"\210\3118\242>\204W \304\305\306D\"\210\3128\242>\204i \304\305\306D\"\210\3138\242>\204} \304\305\306 D\"\210\3148\315\"\210\316\n\203\227 \203\227 \317\202\230 \320\321
!#?\205 r\322!q\210eb\210\323\324\325
C\326 \327\330\331\332\333!\334\"\307$\216\335!\203\314 \206\342 \336!\203\330 \337!\206\342 \242>\205\342 \322!\242>\203\355 \206\371 \211\205\371 r\211q\210\303\n!)\327\330\340\332\333 $\341\"\311$\216\342\343%)\266\202)\266\206)\207" [cl-struct-tramp-file-name-tags delete-by-moving-to-trash default-directory tramp-dissect-file-name signal wrong-type-argument tramp-file-name 2 3 4 5 6 7 tramp-flush-file-properties 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 make-byte-code 0 "\301\300!\207" vconcat vector [set-window-configuration] bufferp processp process-buffer "\302\203- \f\203-
\306U\204- \307 \204- \310 \203- \311 \312\313\300\301#\210\314\302!\210\315 \210\316\317!\210)\320\303@\"\205; \321 \241\207" [tramp-message-show-message tramp-verbose 0 tramp-completion-mode-p current-message t apply message pop-to-buffer discard-input sit-for 30 tramp-file-name-equal-p current-time enable-recursive-minibuffers tramp-current-connection] apply tramp-error] 27 (#$ . 40948)])
#@67 Like `expand-file-name' for Tramp files.
(fn NAME &optional DIR)
(defalias 'tramp-gvfs-handle-expand-file-name #[513 "\211\206 \206 \306\262G\307U\203 \310\262\311!\204\" \312!P\262\313!\204/ \314\315\316D\"\207\317!\211\242 >\204@ \320\321\322D\"\210\211A@\242 >\204Q \320\321\322D\"\210\3238\242 >\204b \320\321\322D\"\210\3248\242 >\204t \320\321\322D\"\210\3258\242 >\204\206 \320\321\322D\"\210\3268\242 >\204\230 \320\321\322D\"\210\3278\242 >\204\254 \320\321\322 D\"\210\3308\331\332\"\203\350 \333 \334\307\335\336\337!\340\"\324$\216\341\322 \306 \257!\210)\210\342\343 \344\345#\316\346\347%\262\350\316\346\331#)\266\203\203\370\351\352\fC\316\211
\353Y\205\211\203\321\211\353\354\355\356! @\357\216@ @\360 \210)r@q\210\361 +C\3621\312
X\205\304\f\203c\324X\203c\363\364\307U\203I\365\202^\347U\203S\365\202^\323U\203]\366\202^\367P#\210
\325Y\205\304\307 \347U\203\240\3701\233r\371!\203\202\372!\202\206\373\374\"q\210\354P\262\375\361 C\"\211\262)0\202\237\210\202\240\210\371!\203\254\376\337\"\262)\242 >\205\304\363\377\201F \201G \"P$0\266\205\202\210\316\266\205\202r\201H \201I !q\210p\201J \210\316\211AB\346\211C\346 D E\201K \210\201L \201M !\210+\211 @\360 \201N !\210)\266\202\262\210\211\204 C\262\201O \262\203\344\347\201O \201P \211\201Q N\363\201R #E!C\3621\337
X\205\331\f\203x\324X\203x\363\364\307U\203^\365\202s\347U\203h\365\202s\323U\203r\366\202s\367P#\210
\325Y\205\331\307 \347U\203\265\3701\260r\371!\203\227\372!\202\233\373\374\"q\210\354P\262\375\361 C\"\211\262)0\202\264\210\202\265\210\371!\203\301\376\337\"\262)\242 >\205\331\363\377\201F \201G \"P$0\266\204\202\343\210\316\266\204\210\320\201S \363\201R #!C\"*\266\314\311C\"\204\306P\262\201T \316\346\331#)\266\203\203-\331\201U \"\203>\342\306\346\211\347%\262\202>\331\201V \"\203>\342\306\346\211$\262\331\201W \"\203R\342\306\346\211$\262\202>\201X \314\315C\"\"\207" [default-directory cl-struct-tramp-file-name-tags inhibit-changing-match-data signal-hook-function tramp-message-show-message tramp-verbose "/" 0 "." file-name-absolute-p file-name-as-directory tramp-tramp-file-p tramp-run-real-handler expand-file-name nil tramp-dissect-file-name signal wrong-type-argument tramp-file-name 2 3 4 5 6 7 string-match "\\`\\(~\\)\\(/\\|\\'\\)" match-data make-byte-code "\301\300\302\"\207" vconcat vector [set-match-data evaporate] tramp-gvfs-maybe-open-connection replace-match tramp-get-connection-property "default-location" "~" t 1 "\\`\\(~[^/]*\\)\\(.*\\)\\'" file-error "Cannot expand tilde in file `%s'" 10 "\n%s" generate-new-buffer " *string-output*" #[0 "\301!\207" [standard-output kill-buffer] 2] backtrace buffer-string (error) apply message "" "Warning: " "Tramp: " (error) processp process-buffer tramp-get-connection-buffer dont-create append process-get tramp-debug-message standard-output buffer-read-only buffer-file-name buffer-undo-list inhibit-modification-hooks inhibit-read-only format "(%d) # " get-buffer-create "*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 substring-no-properties "^\\(afp\\|davs?\\|smb\\)$" "^/[^/]+\\(/\\.\\./?\\)" "^/\\.\\./?" "//" tramp-make-tramp-file-name] 25 (#$ . 42606)])
#@84 Return GVFS attributes association list of all files in DIRECTORY.
(fn DIRECTORY)
(defalias 'tramp-gvfs-get-directory-attributes #[257 "\306\307!\211\242 >\204 \310\311\312D\"\210\211A@\242 >\204& \310\311\312D\"\210\3138\242 >\2047 \310\311\312D\"\210\3148\242 >\204I \310\311\312D\"\210\3158\242 >\204[ \310\311\312D\"\210\3168\242 >\204m \310\311\312D\"\210\3178\242 >\204\201 \310\311\312 D\"\210\3208\321!\203\327\322\323\324$\211\324=\203\321\316\325C\3261;\nX\2055 \203\330 \314X\203\330 \327\330\331U\203\276 \332\202\323 \333U\203\310 \332\202\323 \313U\203\322 \334\202\323 \335P#\210\n\315Y\2055\331\333U\203\3361r\337!\203\367 \340!\202\373 \341\342\"q\210\343P\262\344\345 C\"\211\262)0\202\210\202\210\337!\203!\346\347\"\262)\242 >\2055\327\350\351\352\"P$0\266\204\202?\210\306\266\204\210\353 \354\355\356\357\"\360\230?\205Q\361\362\f\363\364\365#\266\202\366!&\210r\341 !q\210eb\210\367\370
P!\203\302\371\372\314!B\373\372\313!B\374\372\333!BE\314\225Tb\210\367
\375
\376R!\203\245\372\333!\372\313!BB\262\313\225b\210\202\211\377\201@ \"\206\262\377\374\"A\237B B\262 \210\306y\210\202l) \262\201A \323$\210\211\262\202\316\325C\3261z\nX\205t \203\314X\203\327\330\331U\203\375\332\202\333U\203\332\202\313U\203\334\202\335P#\210\n\315Y\205t\331\333U\203T\3361Or\337!\2036\340!\202:\341\342\"q\210\343P\262\344\345 C\"\211\262)0\202S\210\202T\210\337!\203`\346\347\"\262)\242 >\205t\327\350\351\352\"P$0\266\204\202~\210\306\266\204\210\353\354\355\356\357\"\360\230?\205\220\361\362\f\363\364\365#\266\202\366!&\210r\341!q\210eb\210\367\370
P!\203\371\372\314!B\373\372\313!B\374\372\333!BE\314\225Tb\210\367
\375
\376R!\203\344\372\333!\372\313!BB\262\313\225b\210\202\310\377\201@ \"\206\361\377\374\"A\237B\nB\262\n\210\306y\210\202\253)\266\210)\207" [last-coding-system-used cl-struct-tramp-file-name-tags tramp-verbose tramp-message-show-message tramp-gvfs-file-attributes tramp-gvfs-file-attributes-with-gvfs-ls-regexp nil tramp-dissect-file-name signal wrong-type-argument tramp-file-name 2 3 4 5 6 7 file-name-absolute-p tramp-get-file-property "directory-attributes" undef "directory gvfs attributes: %s" (error) apply message 0 "" 1 "Warning: " "Tramp: " (error) processp process-buffer tramp-get-connection-buffer dont-create "\n%s" append buffer-string process-get vector tramp-debug-message format "(%d) # " tramp-gvfs-send-command "gvfs-ls" "-h" file-remote-p method "gdrive" "-n" "-a" "," mapconcat identity tramp-gvfs-url-file-name looking-at "^\\(.+\\)[[:blank:]]\\([[:digit:]]+\\)[[:blank:]](\\(.+?\\))" "type" match-string "standard::size" "name" "\\(" "\\|$\\)" assoc "standard::display-name" tramp-set-file-property] 24 (#$ . 46097)])
#@149 Return GVFS attributes association list of FILENAME.
If FILE-SYSTEM is non-nil, return file system attributes.
(fn FILENAME &optional FILE-SYSTEM)
(defalias 'tramp-gvfs-get-root-attributes #[513 "\306\307!\211\242 >\204 \310\311\312D\"\210\211A@\242 >\204& \310\311\312D\"\210\3138\242 >\2047 \310\311\312D\"\210\3148\242 >\204I \310\311\312D\"\210\3158\242 >\204[ \310\311\312D\"\210\3168\242 >\204m \310\311\312D\"\210\3178\242 >\204\201 \310\311\312 D\"\210\3208\321!\203\267\322
\203\230 \323\202\231 \324\325$\211\325=\203\261\316\326\203\256 \327\202\257 \330D\3311O\nX\205I \203\354 \314X\203\354 \332\333\334U\203\322 \330\202\347 \335U\203\334 \330\202\347 \313U\203\346 \336\202\347 \337P#\210\n\315Y\205I\334\335U\203)\3401$r\341!\203 \342!\202\343\344\"q\210\345P\262\346\347 C\"\211\262)0\202(\210\202)\210\341!\2035\350\351\"\262)\242 >\205I\332\352\353\354\"P$0\266\204\202S\210\306\266\204\210 \203g\355 \356\357\360!$\210\202q\355 \356\360!#\210r\343 !q\210eb\210\361\f\203\205\f\202\206
\306\362#\203\233\363\335!\363\313!B\nB\262\n\202{ )\262\364 \203\255\323\202\256\324$\210\211\262\202\263\316\326
\203\304\327\202\305\330D\3311d\nX\205^ \203\314X\203\332\333\334U\203\347\330\202\374\335U\203\361\330\202\374\313U\203\373\336\202\374\337P#\210\n\315Y\205^\334\335U\203>\34019r\341!\203 \342!\202$\343\344\"q\210\345P\262\346\347 C\"\211\262)0\202=\210\202>\210\341!\203J\350\351\"\262)\242 >\205^\332\352\353\354\"P$0\266\204\202h\210\306\266\204\210\n\203|\355\356\357\360!$\210\202\206\355\356\360!#\210r\343!q\210eb\210\361 \203\232\f\202\233
\306\362#\203\260\363\335!\363\313!B B\262 \202\220)\266\210)\207" [last-coding-system-used cl-struct-tramp-file-name-tags tramp-verbose tramp-message-show-message tramp-gvfs-file-system-attributes-regexp tramp-gvfs-file-attributes-with-gvfs-info-regexp nil tramp-dissect-file-name signal wrong-type-argument tramp-file-name 2 3 4 5 6 7 file-name-absolute-p tramp-get-file-property "file-system-attributes" "file-attributes" undef "file%s gvfs attributes: %s" " system" "" (error) apply message 0 1 "Warning: " "Tramp: " (error) processp process-buffer tramp-get-connection-buffer dont-create "\n%s" append buffer-string process-get vector tramp-debug-message format "(%d) # " tramp-gvfs-send-command "gvfs-info" "--filesystem" tramp-gvfs-url-file-name re-search-forward t match-string tramp-set-file-property] 23 (#$ . 48973)])
#@69 Return GVFS attributes association list of FILENAME.
(fn FILENAME)
(defalias 'tramp-gvfs-get-file-attributes #[257 "\303\304!!\262\305!\211\242>\204 \306\307\310D\"\210\211A@\242>\204) \306\307\310D\"\210\3118\242>\204: \306\307\310D\"\210\3128\242>\204L \306\307\310D\"\210\3138\242>\204^ \306\307\310D\"\210\3148\242>\204p \306\307\310D\"\210\3158\242>\204\204 \306\307\310 D\"\210\3168\317\211?\205\220 \320!\211\211?\205\234 \321\322\320!\")\266\202\203\272 \211G\311U\203\264 \323\202\270 \324\311\"\262\325!P)\266\203\262\326\317\327\330#)\266\203\203\345 \331\317\327\330#)\266\203\204\353 \323\230\203\362 \332 !\202\376 \333\334\n!\335\336\f!!\"\207" [cl-struct-tramp-file-name-tags file-name-handler-alist inhibit-changing-match-data directory-file-name expand-file-name tramp-dissect-file-name signal wrong-type-argument tramp-file-name 2 3 4 5 6 7 nil file-local-name string-prefix-p "/:" "/" substring file-remote-p "^\\(afp\\|davs?\\|smb\\)$" t string-match "^/?\\([^/]+\\)$" tramp-gvfs-get-root-attributes assoc file-name-nondirectory tramp-gvfs-get-directory-attributes file-name-directory] 18 (#$ . 51560)])
#@76 Like `file-attributes' for Tramp files.
(fn FILENAME &optional ID-FORMAT)
(defalias 'tramp-gvfs-handle-file-attributes #[513 "\211\204 \301\262\302!\303\211\211\211\211\211\211\211\211\211\211\211\f\205\236\304\305\"A\306\232\205' \307\262\f\304\310\"A\311\232?\205; \304\312\"A\262 \n;\203N \313\314\315\316#\317\"\262 \320\304\321\"A\206Y \322!\262\n
\301=\203r \320\304\323\"A\206n \324!\202\205 \304\325\"A\206\205 \304\323\"A\206\205 \262
\301=\203\235 \320\304\326\"A\206\231 \324!\202\260 \304\327\"A\206\260 \304\326\"A\206\260 \262\330\320\304\331\"A\206\276 \322!!\262\330\320\304\332\"A\206\316 \322!!\262\330\320\304\333\"A\206\336 \322!!\262\320\304\334\"A\206\355 \322!\262\304\335\"A\211\203\336\320!!\202H\337\340\203
\341\202
\203\342\202\343\304\344\"A\345\232\203&\343\202'\346\304\347\"A\345\232\2036\343\2027\350\304\351\"A\345\232\203F\343\202G\352%\262\262\304\353\"A\211\203\\\320!\202b\354\355!!\262\262\304\356\"A\211\203v\320!\202|\357\355!!\262\262 \206\207\n\n\n\n\n\n\n\n\n\303 \257\f\207" [tramp-unknown-id-string integer tramp-gvfs-get-file-attributes nil assoc "type" "directory" t "standard::is-volatile" "TRUE" "standard::symlink-target" decode-coding-string replace-regexp-in-string "\\\\x\\([[:xdigit:]]\\{2\\}\\)" #[257 "\300\301\302\303\"\304\"!\207" [unibyte-string string-to-number match-string 1 16] 6 "\n\n(fn X)"] utf-8 string-to-number "unix::nlink" "0" "unix::uid" "-1" "owner::user" "unix::gid" "owner::group" seconds-to-time "time::access" "time::modified" "time::changed" "standard::size" "unix::mode" tramp-file-mode-from-int format "%s%s%s%s------" "d" "l" "-" "access::can-read" "FALSE" "r" "access::can-write" "w" "access::can-execute" "x" "unix::inode" tramp-get-inode tramp-dissect-file-name "unix::device" tramp-get-device] 27 (#$ . 52756)])
#@58 Like `file-executable-p' for Tramp files.
(fn FILENAME)
(defalias 'tramp-gvfs-handle-file-executable-p #[257 "\301!\211\242>\204 \302\303\304D\"\210\211A@\242>\204\" \302\303\304D\"\210\3058\242>\2043 \302\303\304D\"\210\3068\242>\204E \302\303\304D\"\210\3078\242>\204W \302\303\304D\"\210\3108\242>\204i \302\303\304D\"\210\3118\242>\204} \302\303\304 D\"\210\3128\313!\203\260 \314\315\316$\211\316=\203\252 \317\n!\205\240 \320 \321\"\262\322 \315$\210\211\262\202\274 \317 !\205\274 \320\321\"\207" [cl-struct-tramp-file-name-tags tramp-dissect-file-name signal wrong-type-argument tramp-file-name 2 3 4 5 6 7 file-name-absolute-p tramp-get-file-property "file-executable-p" undef file-exists-p tramp-check-cached-permissions 120 tramp-set-file-property] 15 (#$ . 54670)])
#@76 Like `file-name-all-completions' for Tramp files.
(fn FILENAME DIRECTORY)
(defalias 'tramp-gvfs-handle-file-name-all-completions #[514 "\302\303\304\305#)\266\203?\205 \306\307\310!!\211\242 >\204& \311\312\313D\"\210\211A@\242 >\2047 \311\312\313D\"\210\3148\242 >\204H \311\312\313D\"\210\3158\242 >\204Z \311\312\313D\"\210\3168\242 >\204l \311\312\313D\"\210\3178\242 >\204~ \311\312\313D\"\210\3208\242 >\204\222 \311\312\313 D\"\210\3218\322!\203\353 \323\324\325$\211\325=\203\345 \326\327
!\211\203\326 \211@\330\331\"A\332\230\203\311 \333@!B\262\202\317 \211@B\262A\266\202\202\256 \262\262\262\334 \324$\210\211\262\202 \326\327\f!\211\203\211@\330\331\"A\332\230\203 \333@!B\262\202\211@B\262A\266\202\202\360 \262\262\266\210\"\207" [inhibit-changing-match-data cl-struct-tramp-file-name-tags "/" nil t string-match all-completions tramp-dissect-file-name expand-file-name signal wrong-type-argument tramp-file-name 2 3 4 5 6 7 file-name-absolute-p tramp-get-file-property "file-name-all-completions" undef ("./" "../") tramp-gvfs-get-directory-attributes assoc "type" "directory" file-name-as-directory tramp-set-file-property] 19 (#$ . 55503)])
#@78 Like `file-notify-add-watch' for Tramp files.
(fn FILE-NAME FLAGS CALLBACK)
(defalias 'tramp-gvfs-handle-file-notify-add-watch #[771 "\306!\262\307!\211\242>\204 \310\311\312D\"\210\211A@\242>\204' \310\311\312D\"\210\3138\242>\2048 \310\311\312D\"\210\3148\242>\204J \310\311\312D\"\210\3158\242>\204\\ \310\311\312D\"\210\3168\242>\204n \310\311\312D\"\210\3178\242>\204\202 \310\311\312 D\"\210\3208\321!\203\224 \322 !\203k\323\324
C\325\211 \326Y\205\224\211\203e\211\326\327\330\331! \332\216\f \333 \210)r\fq\210\334 +C\3351^ X\205X\n\203\373 \314X\203\373 \336\337\340U\203\341 \341\202\366 \342U\203\353 \341\202\366 \313U\203\365 \343\202\366 \344P#\210 \315Y\205X\340\342U\2038\34513r\346!\203\347!\202 \350\351\"q\210\327P\262\352\334 C\"\211\262)0\2027\210\2028\210\346!\203D\353\354\"\262)\242>\205X\336\355\356\357\"P$0\266\205\202\226\210\325\266\205\202\226
r\360\361!q\210p\362 \210\325\211@A\363\211B\363 C D\364 \210\365\366!\210+\211 \333 \367!\210)\266\202\262\210\211\204\242C\262\370\262\203[\342\370\371\211\372N\336\373 #E!C\3351V X\205P\n\203\363\314X\203\363\336\337\340U\203\331\341\202\356\342U\203\343\341\202\356\313U\203\355\343\202\356\344P#\210 \315Y\205P\340\342U\2030\3451+r\346!\203\347!\202\350\351\"q\210\327P\262\352\334 C\"\211\262)0\202/\210\2020\210\346!\203<\353\354\"\262)\242>\205P\336\355\356\357\"P$0\266\204\202Z\210\325\266\204\210\310\374\336\373#!C\"*\266\375 ! \376\n>\203\204\377\n>\203\204\201E \202\233\376\n>\203\221\201F \202\233\377\n>\205\233\201G \336\201H \201I \330\201J !\201K \201L \201M !E$\346!\204\225 \323\324C\325\211 \326Y\205\273\211\203\214\211\326\327\330\331! \332\216\f \333 \210)r\fq\210\334 +C\3351\205 X\205\n\203\"\314X\203\"\336\337\340U\203\341\202 \342U\203\341\202 \313U\203 \343\202 \344P#\210 \315Y\205\340\342U\203_\3451Zr\346!\203A\347!\202E\350\351\"q\210\327P\262\352\334 C\"\211\262)0\202^\210\202_\210\346!\203k\353\354\"\262)\242>\205\336\355\356\357\"P$0\266\205\202\275\210\325\266\205\202\275
r\360\361!q\210p\362 \210\325\211@A\363\211B\363 C D\364 \210\365\366!\210+\211 \333 \367!\210)\266\202\262\210\211\204\311C\262\370\262\203\202\342\370\371\211\372N\336\373 #E!C\3351} X\205w\n\203\314X\203\336\337\340U\203 \341\202\342U\203\n\341\202\313U\203\343\202\344P#\210 \315Y\205w\340\342U\203W\3451Rr\346!\2039\347!\202=\350\351\"q\210\327P\262\352\334 C\"\211\262)0\202V\210\202W\210\346!\203c\353\354\"\262)\242>\205w\336\355\356\357\"P$0\266\204\202\201\210\325\266\204\210\310\374\336\373#!C\"*\266\204\202\201 \317\201N \201O !\201P \201Q \201R #\266\202D\201S 1Q X\205K\n\203\354\314X\203\354\336\337\340U\203\322\341\202\347\342U\203\334\341\202\347\313U\203\346\343\202\347\344P#\210 \315Y\205K\340\342U\203+\201T 1&r\346!\203
\347!\202\350\351\"q\210\327P\262\352\334 C\"\211\262)0\202*\210\202+\210\346!\2037\353\354\"\262)\242>\205K\336\355\356\357\"P$0\266\204\202U\210\325\266\204\210\201U \354\f#\210\201U \201V #\210\201U \201W #\210\201U \201X \201Y #\210\201Z \325\"\210\201[ \201\\ \"\210\201] \201^ \"\210\201_ \340\"\204\231\201` !\204\200\211\323\324C\325\211 \326Y\205\251\211\203z\211\326\327\330\331! \332\216\f \333 \210)r\fq\210\334 +C\3351s X\205m\n\203\314X\203\336\337\340U\203\366\341\202 \342U\203 \341\202 \313U\203\n\343\202 \344P#\210 \315Y\205m\340\342U\203M\3451Hr\346!\203/\347!\2023\350\351\"q\210\327P\262\352\334 C\"\211\262)0\202L\210\202M\210\346!\203Y\353\354\"\262)\242>\205m\336\355\356\357\"P$0\266\205\202\253\210\325\266\205\202\253
r\360\361!q\210p\362 \210\325\211@A\363\211B\363 C D\364 \210\365\366!\210+\211 \333 \367!\210)\266\202\262\210\211\204\267C\262\370\262\203p\342\370\371\211\372N\336\373 #E!C\3351k X\205e\n\203\314X\203\336\337\340U\203\356\341\202\342U\203\370\341\202\313U\203\343\202\344P#\210 \315Y\205e\340\342U\203E\3451@r\346!\203'\347!\202+\350\351\"q\210\327P\262\352\334 C\"\211\262)0\202D\210\202E\210\346!\203Q\353\354\"\262)\242>\205e\336\355\356\357\"P$0\266\204\202o\210\325\266\204\210\310\374\336\373#!C\"*\266\211)\266\202\207" [cl-struct-tramp-file-name-tags signal-hook-function tramp-message-show-message tramp-verbose standard-output default-directory expand-file-name tramp-dissect-file-name signal wrong-type-argument tramp-file-name 2 3 4 5 6 7 tramp-gvfs-gio-tool-p file-directory-p file-notify-error "Monitoring not supported for `%s'" nil 10 "\n%s" generate-new-buffer " *string-output*" #[0 "\301!\207" [standard-output kill-buffer] 2] backtrace buffer-string (error) apply message 0 "" 1 "Warning: " "Tramp: " (error) processp process-buffer tramp-get-connection-buffer dont-create append process-get vector tramp-debug-message format "(%d) # " get-buffer-create "*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 substring-no-properties file-name-directory change attribute-change buffer-read-only buffer-file-name buffer-undo-list inhibit-modification-hooks inhibit-read-only (created changed changes-done-hint moved deleted attribute-changed) (created changed changes-done-hint moved deleted) (attribute-changed) start-process "gvfs-monitor" " *gvfs-monitor*" "gio" "monitor" tramp-gvfs-url-file-name "Run `%s', %S" process-command " " mapconcat identity (error) (error) process-put events watch-name adjust-window-size-function ignore set-process-query-on-exit-flag set-process-filter tramp-gvfs-monitor-process-filter set-process-sentinel tramp-file-notify-process-sentinel tramp-accept-process-output process-live-p] 28 (#$ . 56740)])
#@100 Read output from "gvfs-monitor-file" and add corresponding `file-notify' events.
(fn PROC STRING)
(defalias 'tramp-gvfs-monitor-process-filter #[514 "\305\306\"\305\307\"r\310!q\210)\311\312!!\203\300 \313\314C\3151\273 X\205\265 \n\203X \316X\203X \317\320\321U\203> \322\202S \323U\203H \322\202S \324U\203R \325\202S \326P#\210 \327Y\205\265 \321\323U\203\225 \3301\220 r\331!\203w \310!\202{ \332\333\"q\210\334P\262\335\336 C\"\211\262)0\202\224 \210\202\225 \210\331!\203\241 \305\337\"\262)\242 >\205\265 \317\340\341\342\"P$0\266\204\202\277 \210\343\266\204\210\344\345D\3151e X\205_\n\203\316X\203\317\320\321U\203\350 \322\202\375 \323U\203\362 \322\202\375 \324U\203\374 \325\202\375 \326P#\210 \327Y\205_\321\323U\203?\3301:r\331!\203!\310!\202%\332\333\"q\210\334P\262\335\336 C\"\211\262)0\202>\210\202?\210\331!\203K\305\337\"\262)\242 >\205_\317\340\341\342\"P$0\266\204\202i\210\343\266\204\210P\262\346\347\350#\262\346\351\352#\262\346\353\354#\262\355\343\356 \357#)\266\203\203\234\360!\210\357\361\"\203E\362\323\"\362\327\"\363\362\324 \"!\364\322\343\211 $\262\357\"\203\316\364\343\211$\262\365\343\356 \357#)\266\203\203\346\366!\262\202\316\357\206\355\322\"\203\371\364\343\211$\262\365\206\377\322\343\356 \357#)\266\203\203\366!\262\202\371\211\367>\203*\305\n\370\"\230\203*\360 !\210\211\235\203@\371\372!\203@\372 F!\210\266\202\234G\321U\203O\343\262\203\373\313\373C\3151\366 X\205\360\n\203\223\316X\203\223\317\320\321U\203y\322\202\216\323U\203\203\322\202\216\324U\203\215\325\202\216\326P#\210 \327Y\205\360\321\323U\203\320\3301\313r\331!\203\262\310!\202\266\332\333\"q\210\334P\262\335\336 C\"\211\262)0\202\317\210\202\320\210\331!\203\334\305\337\"\262)\242 >\205\360\317\340\341\342\"P$0\266\204\202\372\210\343\266\204\210\374\307#\207" [default-directory tramp-verbose tramp-message-show-message cl-struct-tramp-file-name-tags inhibit-changing-match-data process-get events rest-string process-buffer regexp-quote tramp-gvfs-url-file-name 10 "Previous string:\n%s" (error) 3 apply message 0 "" 1 2 "Warning: " "Tramp: " 4 (error) processp tramp-get-connection-buffer dont-create "\n%s" append buffer-string vector tramp-debug-message format "(%d) # " nil 6 "%S\n%s" replace-regexp-in-string "attributes changed" "attribute-changed" "changes done" "changes-done-hint" "renamed to" "moved" "Monitoring not supported\\|No locations given" t string-match delete-process "^.+:[[:space:]]\\(.+\\):[[:space:]]\\(attribute-changed\\|c\\(?:hange\\(?:d\\|s-done-hint\\)\\|reated\\)\\|deleted\\|moved\\|pre-unmount\\|unmounted\\)\\([[:space:]]\\(.+\\)\\)?$" match-string intern-soft replace-match "%\\([0-9A-F]\\{2\\}\\)" url-unhex-string (moved deleted) watch-name functionp file-notify-callback "Rest string:\n%s" process-put] 16 (#$ . 62824)])
#@56 Like `file-readable-p' for Tramp files.
(fn FILENAME)
(defalias 'tramp-gvfs-handle-file-readable-p #[257 "\301!\211\242>\204 \302\303\304D\"\210\211A@\242>\204\" \302\303\304D\"\210\3058\242>\2043 \302\303\304D\"\210\3068\242>\204E \302\303\304D\"\210\3078\242>\204W \302\303\304D\"\210\3108\242>\204i \302\303\304D\"\210\3118\242>\204} \302\303\304 D\"\210\3128\313!\203\350 \314\315\316$\211\316=\203\342 \317\n!\205\330 \320 \321\"\206\330 \322\n!;\203\271 \323\324 !\322\f!P!\206\330 \325 \326\"\327 \326\"\3058\262U?\205\330 \330\331\332\f!\"A\333\230?\262\334 \315$\210\211\262\202,\317 !\205,\320\321\"\206,\322 !;\203
\323\324\n!\322 !P!\206,\325\326\"\327\n\326\"\3058\262U?\205,\330\331\332 !\"A\333\230?\207" [cl-struct-tramp-file-name-tags tramp-dissect-file-name signal wrong-type-argument tramp-file-name 2 3 4 5 6 7 file-name-absolute-p tramp-get-file-property "file-readable-p" undef file-exists-p tramp-check-cached-permissions 114 file-symlink-p file-readable-p file-remote-p tramp-gvfs-get-remote-uid integer file-attributes assoc "access::can-read" tramp-gvfs-get-file-attributes "FALSE" tramp-set-file-property] 15 (#$ . 65829)])
#@57 Like `file-system-info' for Tramp files.
(fn FILENAME)
(defalias 'tramp-gvfs-handle-file-system-info #[257 "\301\302!!\262\303!\211\242>\204 \304\305\306D\"\210\211A@\242>\204) \304\305\306D\"\210\3078\242>\204: \304\305\306D\"\210\3108\242>\204L \304\305\306D\"\210\3118\242>\204^ \304\305\306D\"\210\3128\242>\204p \304\305\306D\"\210\3138\242>\204\204 \304\305\306 D\"\210\3148\315\316#\210\317 \320\"\321\322\"A\321\323\"A\321\324\"A\204\257 \204\257 \211\205\315 \325\206\265 \326!\325\206\274 \326!\325\206\303 \326!\325\206\312 \326!ZE\266\204\207" [cl-struct-tramp-file-name-tags directory-file-name expand-file-name tramp-dissect-file-name signal wrong-type-argument tramp-file-name 2 3 4 5 6 7 tramp-flush-file-property "file-system-attributes" tramp-gvfs-get-root-attributes file-system assoc "filesystem::size" "filesystem::used" "filesystem::free" string-to-number "0"] 18 (#$ . 67058)])
#@68 Like `make-directory' for Tramp files.
(fn DIR &optional PARENTS)
(defalias 'tramp-gvfs-handle-make-directory #[513 "\306\307!!\262\310!\211\242>\204 \311\312\313D\"\210\211A@\242>\204) \311\312\313D\"\210\3148\242>\204: \311\312\313D\"\210\3158\242>\204L \311\312\313D\"\210\3168\242>\204^ \311\312\313D\"\210\3178\242>\204p \311\312\313D\"\210\3208\242>\204\204 \311\312\313 D\"\210\3218\204k\322\n!\203k\323\324\fC\325\211 \326Y\205\224\211\203e\211\326\327\330\331! \332\216\f \333 \210)r\fq\210\334 +C\3351^ X\205X\n\203\373 \315X\203\373 \336\337\340U\203\341 \341\202\366 \342U\203\353 \341\202\366 \314U\203\365 \343\202\366 \344P#\210 \316Y\205X\340\342U\2038\34513r\346!\203\347!\202 \350\351\"q\210\327P\262\352\334 C\"\211\262)0\2027\210\2028\210\346!\203D\353\354\"\262)\242>\205X\336\355\356\357\"P$0\266\205\202\226\210\325\266\205\202\226
r\360\361!q\210p\362 \210\325\211@A\363\211B\363 C D\364 \210\365\366!\210+\211 \333 \367!\210)\266\202\262\210\211\204\242C\262\370\262\203[\342\370\371\211\372N\336\373 #E!C\3351V X\205P\n\203\363\315X\203\363\336\337\340U\203\331\341\202\356\342U\203\343\341\202\356\314U\203\355\343\202\356\344P#\210 \316Y\205P\340\342U\2030\3451+r\346!\203\347!\202\350\351\"q\210\327P\262\352\334 C\"\211\262)0\202/\210\2020\210\346!\203<\353\354\"\262)\242>\205P\336\355\356\357\"P$0\266\204\202Z\210\325\266\204\210\311\374\336\373#!C\"*\266\375\"\210\376 \377\340\201E \201F \354!\201G \"\315$\216\201H !\n\203\240\201I !\204\240\201J \f\"\210\201K \n\201L \201M !#\206\275\n\205\275\201I \f!?\205\234 \201N \201O C\325\211 \326Y\205\305\211\203\226\211\326\327\330\331! \332\216\f \333 \210)r\fq\210\334 +C\3351\217 X\205\211\n\203,\315X\203,\336\337\340U\203\341\202'\342U\203 \341\202'\314U\203&\343\202'\344P#\210 \316Y\205\211\340\342U\203i\3451dr\346!\203K\347!\202O\350\351\"q\210\327P\262\352\334 C\"\211\262)0\202h\210\202i\210\346!\203u\353\354\"\262)\242>\205\211\336\355\356\357\"P$0\266\205\202\307\210\325\266\205\202\307
r\360\361!q\210p\362 \210\325\211@A\363\211B\363 C D\364 \210\365\366!\210+\211 \333 \367!\210)\266\202\262\210\211\204\323C\262\370\262\203\214\342\370\371\211\372N\336\373 #E!C\3351\207 X\205\201\n\203$\315X\203$\336\337\340U\203\n\341\202 \342U\203\341\202 \314U\203 \343\202 \344P#\210 \316Y\205\201\340\342U\203a\3451\\r\346!\203C\347!\202G\350\351\"q\210\327P\262\352\334 C\"\211\262)0\202`\210\202a\210\346!\203m\353\354\"\262)\242>\205\201\336\355\356\357\"P$0\266\204\202\213\210\325\266\204\210\311\374\336\373#!C\"*\266\204\262)\262\207" [cl-struct-tramp-file-name-tags signal-hook-function tramp-message-show-message tramp-verbose standard-output default-directory directory-file-name expand-file-name tramp-dissect-file-name signal wrong-type-argument tramp-file-name 2 3 4 5 6 7 file-exists-p file-already-exists "Directory already exists %s" nil 10 "\n%s" generate-new-buffer " *string-output*" #[0 "\301!\207" [standard-output kill-buffer] 2] backtrace buffer-string (error) apply message 0 "" 1 "Warning: " "Tramp: " (error) processp process-buffer tramp-get-connection-buffer dont-create append process-get vector tramp-debug-message format "(%d) # " get-buffer-create "*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 substring-no-properties tramp-flush-directory-properties match-data make-byte-code buffer-read-only buffer-file-name buffer-undo-list inhibit-modification-hooks inhibit-read-only "\301\300\302\"\207" vconcat [set-match-data evaporate] file-name-directory file-directory-p make-directory tramp-gvfs-send-command "gvfs-mkdir" tramp-gvfs-url-file-name file-error "Couldn't make directory %s"] 27 (#$ . 68015)])
#@91 Like `rename-file' for Tramp files.
(fn FILENAME NEWNAME &optional OK-IF-ALREADY-EXISTS)
(defalias 'tramp-gvfs-handle-rename-file #[770 "\300!\262\300!\262\301!\204 \301!\203 \302\303\304\305&\207\306\307E\"\207" [expand-file-name tramp-tramp-file-p tramp-gvfs-do-copy-or-rename-file rename keep-date preserve-uid-gid tramp-run-real-handler rename-file] 10 (#$ . 72090)])
#@75 Like `set-file-modes' for Tramp files.
(fn FILENAME MODE &optional FLAG)
(defalias 'tramp-gvfs-handle-set-file-modes #[770 "\301!\211\242>\204 \302\303\304D\"\210\211A@\242>\204\" \302\303\304D\"\210\3058\242>\2043 \302\303\304D\"\210\3068\242>\204E \302\303\304D\"\210\3078\242>\204W \302\303\304D\"\210\3108\242>\204i \302\303\304D\"\210\3118\242>\204} \302\303\304 D\"\210\3128\313\"\210\314\315\316\317\320\321!!\322\323!&\207" [cl-struct-tramp-file-name-tags tramp-dissect-file-name signal wrong-type-argument tramp-file-name 2 3 4 5 6 7 tramp-flush-file-properties tramp-gvfs-send-command "gvfs-set-attribute" "-t" "uint32" tramp-gvfs-url-file-name tramp-make-tramp-file-name "unix::mode" number-to-string] 20 (#$ . 72484)])
#@75 Like `set-file-times' for Tramp files.
(fn FILENAME &optional TIME FLAG)
(defalias 'tramp-gvfs-handle-set-file-times #[769 "\303!\211\242>\204 \304\305\306D\"\210\211A@\242>\204\" \304\305\306D\"\210\3078\242>\2043 \304\305\306D\"\210\3108\242>\204E \304\305\306D\"\210\3118\242>\204W \304\305\306D\"\210\3128\242>\204i \304\305\306D\"\210\3138\242>\204} \304\305\306 D\"\210\3148\315\"\210 \203\234 \316\n \"\204\234 \316\n\n\"\203\241 \317 \202\243 \320 \321\322\323\324\325!!\326\327\330 \"&\262\207" [cl-struct-tramp-file-name-tags tramp-time-doesnt-exist tramp-time-dont-know tramp-dissect-file-name signal wrong-type-argument tramp-file-name 2 3 4 5 6 7 tramp-flush-file-properties tramp-compat-time-equal-p current-time tramp-gvfs-send-command "gvfs-set-attribute" "-t" "uint64" tramp-gvfs-url-file-name tramp-make-tramp-file-name "time::modified" format-time-string "%s"] 22 (#$ . 73266)])
#@81 Like `tramp-set-file-uid-gid' for Tramp files.
(fn FILENAME &optional UID GID)
(defalias 'tramp-gvfs-set-file-uid-gid #[769 "\301!\211\242>\204 \302\303\304D\"\210\211A@\242>\204\" \302\303\304D\"\210\3058\242>\2043 \302\303\304D\"\210\3068\242>\204E \302\303\304D\"\210\3078\242>\204W \302\303\304D\"\210\3108\242>\204i \302\303\304D\"\210\3118\242>\204} \302\303\304 D\"\210\3128\313\"\210\314\n!\203\242 \315\316\317\320\321\322!!\323\324!&\210\314 !\205\274 \315\316\317\320\321\322!!\325\324!&\207" [cl-struct-tramp-file-name-tags tramp-dissect-file-name signal wrong-type-argument tramp-file-name 2 3 4 5 6 7 tramp-flush-file-properties natnump tramp-gvfs-send-command "gvfs-set-attribute" "-t" "uint32" tramp-gvfs-url-file-name tramp-make-tramp-file-name "unix::uid" number-to-string "unix::gid"] 20 (#$ . 74219)])
#@47 Return FILENAME in URL syntax.
(fn FILENAME)
(defalias 'tramp-gvfs-url-file-name #[257 "\211\305\211?\205 \306!\211\211?\205 \307\310\306!\")\266\202\2032 \211G\311U\203, \312\2020 \313\311\"\262\314!P)\266\203\262\315 B\305\316\317!\2039\320!\211\242\n>\204Z \321\322\323D\"\210\211A@\242\n>\204k \321\322\323D\"\210\3118\242\n>\204| \321\322\323D\"\210\3248\242\n>\204\216 \321\322\323D\"\210\3258\242\n>\204\240 \321\322\323D\"\210\3268\242\n>\204\262 \321\322\323D\"\210\3278\242\n>\204\306 \321\322\323 D\"\210\3308\331\230\203\324 \332\262\333\230\203\346 \334\262\335!P\262\203\365 \203\365 \336Q\262\205 \337!\205\337!;\203\340!\202\205 \337!\341\342\305\305\211\343\305\343\211&
\266\205\266\210\202Q\337\344!!\341\342\345\305\211\211\211\305\211\343\305\343\211&
\262!\262\317!\203\207\320!\211\242\n>\204k\321\322\323D\"\210\211A@\242\n>\204|\321\322\323D\"\210\3118\242\n>\204\215\321\322\323D\"\210\3248\242\n>\204\237\321\322\323D\"\210\3258\242\n>\204\261\321\322\323D\"\210\3268\242\n>\204\303\321\322\323D\"\210\3278\242\n>\204\327\321\322\323 D\"\210\3308\346\347
\fD\3501\201 X\205{\f\203 \324X\203 \351\352\353U\203\354\202\355U\203\354\202\311U\203\356\202\357P#\210 \325Y\205{\353\355U\203[\3601Vr\361!\203=\362!\202A\363\364\"q\210\365P\262\366\367 C\"\211\262)0\202Z\210\202[\210\361!\203g\370\371\"\262)\242\n>\205{\351\372\373\374\"P$0\266\204\202\205\210\305\266\204\266 )\207" [file-name-handler-alist url-unreserved-chars cl-struct-tramp-file-name-tags tramp-verbose tramp-message-show-message nil file-local-name string-prefix-p "/:" 2 "/" substring file-remote-p 47 url-recreate-url tramp-tramp-file-p tramp-dissect-file-name signal wrong-type-argument tramp-file-name 3 4 5 6 7 "gdrive" "google-drive" "nextcloud" "davs" tramp-gvfs-get-remote-prefix ";" url-hexify-string string-to-number record url t file-truename "file" 10 "remote file `%s' is URL `%s'" (error) apply message 0 "" 1 "Warning: " "Tramp: " (error) processp process-buffer tramp-get-connection-buffer dont-create "\n%s" append buffer-string process-get vector tramp-debug-message format "(%d) # "] 31 (#$ . 75101)])
#@58 Create a D-Bus object path from FILENAME.
(fn FILENAME)
(defalias 'tramp-gvfs-object-path #[257 "\301\302!\"\207" [tramp-gvfs-path-tramp expand-file-name dbus-escape-as-identifier] 4 (#$ . 77413)])
#@62 Retrieve file name from D-Bus OBJECT-PATH.
(fn OBJECT-PATH)
(defalias 'tramp-gvfs-file-name #[257 "\300\301\302\303#!\207" [dbus-unescape-from-identifier replace-regexp-in-string "^.*/\\([^/]+\\)$" "\\1"] 6 (#$ . 77620)])
#@105 Implementation for the "org.gtk.vfs.MountOperation.askPassword" method.
(fn MESSAGE USER DOMAIN FLAGS)
(defalias 'tramp-gvfs-handler-askpassword #[1028 "\306\307!!\310\311\312\313\"\203 \314\315\316 \"!\202 \317#\320\3211\341\322!\211\242 >\2042 \323\324\325D\"\210\211A@\242 >\204C \323\324\325D\"\210\3268\242 >\204T \323\324\325D\"\210\3278\242 >\204f \323\324\325D\"\210\3308\242 >\204x \323\324\325D\"\210\3318\242 >\204\212 \323\324\325D\"\210\3328\242 >\204\236 \323\324\325 D\"\210\3338
G\334U\203\271 \335\f\n\"\334U\204\271 \336\337!\262\fG\334U\203\320 \335\f \"\334U\204\320 \336\340!\262
\332\341F\3421z\fX\205t
\203\327X\203\343\344\334U\203\375 \345\202\316U\203\345\202\326U\203\346\202\347P#\210\f\330Y\205t\334 \316U\203T\3501Or\351!\2036\352!\202:\353\354\"q\210\355P\262\356\357 C\"\211\262)0\202S\210\202T\210\351!\203`\360\361\"\262)\242 >\205t\343\362\310\363\"P$0\266\204\202~\210\320\266\204\210\364\365\320#\204\215\366!\210\367\370 ! \"\262 ;\203\276\371\320\n\n\242 >\204\261\323\324\325
D\"\210\326 8\320\334\257\202\333\320\371\345\n\242 >\204\321\323\324\325
D\"\210\326 8\320\334\257\266\2100\202\353\210\320\371\345\211\211\320\334\257\207" [last-input-event cl-struct-tramp-file-name-tags tramp-gvfs-password-need-username tramp-gvfs-password-need-domain tramp-verbose tramp-message-show-message 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 signal wrong-type-argument tramp-file-name 2 3 4 5 6 7 0 logand read-string "User name: " "Domain name: " "%S %S %S %d" (error) apply message "" "Warning: " "Tramp: " (error) processp process-buffer tramp-get-connection-buffer dont-create "\n%s" append buffer-string process-get vector tramp-debug-message "(%d) # " tramp-get-connection-property "first-password-request" tramp-clear-passwd tramp-read-passwd tramp-get-connection-process t] 25 (#$ . 77851)])
#@95 Implementation for the "org.gtk.vfs.MountOperation.askQuestion" method.
(fn MESSAGE CHOICES)
(defalias 'tramp-gvfs-handler-askquestion #[514 "\306 \307\310\311\312\313!\314\"\315$\216\316\205 ?\317\320\321\322 !!!\211\242\f>\204/ \323\324\325D\"\210\211A@\242\f>\204@ \323\324\325D\"\210\3158\242\f>\204Q \323\324\325D\"\210\3268\242\f>\204c \323\324\325D\"\210\3278\242\f>\204u \323\324\325D\"\210\3308\242\f>\204\207 \323\324\325D\"\210\3318\242\f>\204\233 \323\324\325 D\"\210\3328\331\333D\3341F
X\205@@\203\343 \326X\203\343 \335\336\310U\203\311 \337\202\336 \340U\203\323 \337\202\336 \315U\203\335 \341\202\336 \342P#\210
\327Y\205@\310 \340U\203 \3431r\344!\203\345!\202\346\347\"q\210\350P\262\351\352 C\"\211\262)0\202 \210\202 \210\344!\203,\353\313\"\262)\242\f>\205@\335\354\355\356\"P$0\266\204\202J\210\317\266\204\210\3571\325\316\317\360\361 !\362#\211\362=\203\315\363\364!r\211q\210\307\310\365\312\313!\366\"\315$\216\337\317C\307\310\367\312\313\"\370\"\326$\216\203\223\211\371 \240\210\336\372\"\210c\210db\210 \203\247\336\372\"\210\202\253\373p!\210\374\375 `{\376P!\203\272\310\202\273\340)\266\202*\262\262\377\361\f!#\210\211\262E0\202\332\210\317\316\340E\262 \331\372 C\3341\201
X\205{@\203 \326X\203 \335\336\310U\203\337\202\340U\203\337\202\315U\203\341\202\342P#\210
\327Y\205{\310 \340U\203[\3431Vr\344!\203=\345!\202A\346\347\"q\210\350P\262\351\352 C\"\211\262)0\202Z\210\202[\210\344!\203g\353\313\"\262)\242\f>\205{\335\354\355\356\"P$0\266\204\202\205\210\317\266\204\210AA@\310U\204\240\201A \201B \201C \201B $\210\266\210*\266\203)\207" [use-dialog-box noninteractive enable-recursive-minibuffers last-input-event cl-struct-tramp-file-name-tags tramp-verbose current-window-configuration make-byte-code 0 "\301\300!\207" vconcat vector [set-window-configuration] 2 t nil tramp-dissect-file-name tramp-gvfs-file-name dbus-event-path-name signal wrong-type-argument tramp-file-name 3 4 5 6 7 "%S %S" (error) apply message "" 1 "Warning: " "Tramp: " (error) processp process-buffer tramp-get-connection-buffer dont-create "\n%s" append buffer-string process-get tramp-debug-message format "(%d) # " (quit) tramp-get-connection-property tramp-get-connection-process undef generate-new-buffer " *temp*" "\301\300!\205 \302\300!\207" [buffer-name kill-buffer] "\300\205 \301\242\203 \302\303\301\242\"\207\302\304!\207" [message #1="%s" nil] current-message #1# pop-to-buffer yes-or-no-p line-beginning-position " " tramp-set-connection-property tramp-message-show-message tramp-set-file-property "/" "fuse-mountpoint"] 27 (#$ . 79956)])
#@126 Signal handler for the "org.gtk.vfs.MountTracker.mounted" and "org.gtk.vfs.MountTracker.unmounted" signals.
(fn MOUNT-INFO)
(defalias 'tramp-gvfs-handler-mounted-unmounted #[257 "\3061\265\307!\211@;\203 \211A\262\202 \310A@!AA@\310@!\310AAA@!\310\311\312A@\"A@!\310\311\313A@\"A@!\310\311\314A@\"A@!\310\311\315A@\"\206[ \311\316A@\"A@!\310\311\317 A@\"A@!\310\311\320\nA@\"A@!\310\311\321 A@\"A@!\322\323\"\203\216 \324\325\"\262\326\230\203\236 \327\230\203\236 \330\262\330\230\203\271 \331\332\322#)\266\203\203\271 \333\262\334\230\203\303 \335\262\336\230\203$\211;\203$\337!\262\340! >\204\343 \341\342\343D\"\210\211\325H\262\340! >\204\367 \341\342\343D\"\210\211\344H\262\340! >\204 \341\342\343D\"\210\211\345H\262\340! >\204 \341\342\343D\"\210\211\346H\262\f\235\205\257\347\350\351&!\211\242
>\204I\341\342\352D\"\210\211A@\242
>\204Z\341\342\352D\"\210\3448\242
>\204k\341\342\352D\"\210\3538\242
>\204}\341\342\352D\"\210\3458\242
>\204\217\341\342\352D\"\210\3468\242
>\204\241\341\342\352D\"\210\3548\242
>\204\265\341\342\352 D\"\210\3558\354\356\357!D\3601k@X\205eA\203 \353X\203 \361\362\363U\203\346\351\202\373\325U\203\360\351\202\373\344U\203\372\364\202\373\365P#\210@\345Y\205e\363 @\325U\203?\3661:r\367!\203!\370!\202%\371\372\"q\210\373P\262\374\375 C\"\211\262)0\202>\210\202?\210\367!\203K\376\377\"\262)\242
>\205e\361\201B \201C \201D \"P$0\266\204\202o\210\331\266\204\210\201E \201F \201G #\210\227\201H \230\203\223\201I \201F \"\202\255\201J \201F \201K $\210\201L \201M #\266\210\266\213\266\2020\207\210\331\207" [last-input-event tramp-gvfs-nextcloud-default-prefix-regexp inhibit-changing-match-data cl-struct-url-tags tramp-gvfs-methods cl-struct-tramp-file-name-tags (error) dbus-event-member-name tramp-gvfs-dbus-byte-array-to-string assoc "type" "user" "domain" "host" "server" "port" "ssl" "uri" string-match "^\\(afp\\|smb\\)" match-string 1 "dav" "true" "davs" nil t "nextcloud" "google-drive" "gdrive" "http" url-generic-parse-url type-of signal wrong-type-argument url 2 4 5 tramp-dissect-file-name tramp-make-tramp-file-name "" tramp-file-name 3 6 7 "%s %s" tramp-gvfs-stringify-dbus-message (error) apply message 0 "Warning: " "Tramp: " (error) processp process-buffer tramp-get-connection-buffer dont-create "\n%s" append buffer-string process-get vector tramp-verbose tramp-message-show-message tramp-debug-message format "(%d) # " tramp-flush-file-property "/" "list-mounts" "unmounted" tramp-flush-file-properties tramp-set-file-property "fuse-mountpoint" tramp-set-connection-property "default-location"] 32 (#$ . 82712)])
(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)
#@59 Check, whether the location is already mounted.
(fn VEC)
(defalias 'tramp-gvfs-connection-mounted-p #[257 "\306\307\310\311$\206Q\3122Q\313\307!\203@ \306\307\314\315$\211\315=\203: \316\317\320 \n \257\311\"\321#\266\202\262\322\307\314$\210\211\262\202R \316\317\320 \n \257\311\"\321#\266\202\211\203M\211@\211@;\203e \211A\262\202X \323A@!AA@\323@!\323AAA@!\323\324\325A@\"A@!\323\324\326A@\"A@!\323\324\327A@\"A@!\323\324\330A@\"\206\253 \324\331A@\"A@!\323\324\332 A@\"A@!\323\324\333\nA@\"A@!\323\324\334 A@\"A@!\323\324\335\fA@\"A@\206\345 \324\336\fA@\"A@!\337\340 \"\203\365 \341\342 \"\262\343\230\203\344\230\203\345\262\345\230\203 \f\n\311\346 \337#)\266\203\203 \347\262\350\230\203*\351\262\352\230\203\217;\203\217\353!\262\354!<>\204K\355\356\357D\"\210\342H\262\354!<>\204`\355\356\357D\"\210\360H\262\354!<>\204u\355\356\357D\"\210\361H\262\354!<>\204\212\355\356\357D\"\210\362H\262\242=>\204\242\355\356\363D\"\210A@\230\203D\242=>\204\275\355\356\363D\"\210\3608\230\203D\242=>\204\327\355\356\363D\"\210\3648\230\203D\242=>\204\361\355\356\363D\"\210\3618\230\203D\242=>\204 \355\356\363D\"\210\3628\230\203D\365\366\206\367!P\370!\311\346 \337#)\266\203\203D\322\307\310$\210\371\372 #\210\373\312\346\"\210\266\fA\266\202\202R \311\2620\207" [tramp-gvfs-service-daemon tramp-gvfs-path-mounttracker tramp-gvfs-interface-mounttracker tramp-gvfs-listmounts tramp-gvfs-nextcloud-default-prefix-regexp inhibit-changing-match-data tramp-get-file-property "/" "fuse-mountpoint" nil mounted file-name-absolute-p "list-mounts" undef dbus-call-method append :session tramp-dbus-function tramp-set-file-property tramp-gvfs-dbus-byte-array-to-string assoc "type" "user" "domain" "host" "server" "port" "ssl" "uri" "share" "volume" string-match "^\\(afp\\|smb\\)" match-string 1 "dav" "true" "davs" t "nextcloud" "google-drive" "gdrive" "http" url-generic-parse-url type-of signal wrong-type-argument url 2 4 5 tramp-file-name 3 "^/" regexp-quote "" tramp-file-name-unquote-localname tramp-set-connection-property "default-location" throw cl-struct-url-tags cl-struct-tramp-file-name-tags] 22 (#$ . 85827)])
#@49 Unmount the object identified by VEC.
(fn VEC)
(defalias 'tramp-gvfs-unmount #[257 "\211\242>\204 \301\302\303D\"\210\304\233\211\305\240\266\211\242>\204$ \301\302\303D\"\210\306\233\211\307\240\266\310!\203> \311\312\313\314\315!!$\210\310!\203M \316\307\211\317#\210\202> \320!\210\320\321!!\207" [cl-struct-tramp-file-name-tags signal wrong-type-argument tramp-file-name 6 "/" 7 nil tramp-gvfs-connection-mounted-p tramp-gvfs-send-command "gvfs-mount" "-u" tramp-gvfs-url-file-name tramp-make-tramp-file-name read-event 0.1 tramp-flush-connection-properties tramp-get-connection-process] 8 (#$ . 88118)])
#@120 Construct a mount-spec entry to be used in a mount_spec.
It was "a(say)", but has changed to "a{sv})".
(fn KEY VALUE)
(defalias 'tramp-gvfs-mount-spec-entry #[514 "\302\303\304\305#)\266\203\203 \306\307\310!DE\207\311\310!E\207" [tramp-gvfs-mountlocation-signature inhibit-changing-match-data "^(aya{sv})" nil t string-match :dict-entry :variant tramp-gvfs-dbus-string-to-byte-array :struct] 9 (#$ . 88751)])
#@77 Return a mount-spec for "org.gtk.vfs.MountTracker.mountLocation".
(fn VEC)
(defalias 'tramp-gvfs-mount-spec #[257 "\211\242>\204 \302\303\304D\"\210\211A@\242>\204 \302\303\304D\"\210\3058\242>\2040 \302\303\304D\"\210\3068\242>\204B \302\303\304D\"\210\3078\242>\204T \302\303\304D\"\210\3108\311!\312\313\"\205f \314\315\"\316\317\320\312#)\266\203\203{ \321\202| \322\323\324 \325\230\203\227 \326\327\330\"\326\331 \"\326\332\"E\2028\333\n\317\320\312#)\266\203\203\272 \326\327\334\"\326\335 \"\326\336\"E\2028 \337\230\203\323 \326\327\340\"\326\335 \"\326\341\"E\2028 \342\230\203\347 \326\327\343\"\326\335 \"D\2028 \344\230\203\373 \326\327\345\"\326\335 \"D\2028\346\n\317\320\312#)\266\203\203-\326\327\347\"\326\350\351\352\353\317\354\317\211\320\317\320\211&
!\"D\2028\326\327 \"\326\335 \"D \205C\326\355 \"C \205N\326\356 \"C\205Y\326\357\n\"C$B\360 \317\320\312#)\266\203\203z\312\361\"\203z\314\362\"\202~\363\n!\364\365!E\207" [cl-struct-tramp-file-name-tags inhibit-changing-match-data signal wrong-type-argument tramp-file-name 2 3 4 5 tramp-file-name-unquote-localname string-match "^/?\\([^/]+\\)" match-string 1 "^davs\\|^nextcloud" nil t "true" "false" :array append "smb" tramp-gvfs-mount-spec-entry "type" "smb-share" "server" "share" "^dav\\|^nextcloud" "dav" "host" "ssl" "afp" "afp-volume" "volume" "gdrive" "google-drive" "nextcloud" "owncloud" "^http" "http" "uri" url-recreate-url record url "/" "user" "domain" "port" "^dav" "^/?[^/]+" 0 tramp-gvfs-get-remote-prefix :struct tramp-gvfs-dbus-string-to-byte-array] 29 (#$ . 89178)])
#@124 The uid of the remote connection VEC, in ID-FORMAT.
ID-FORMAT valid values are `string' and `integer'.
(fn VEC ID-FORMAT)
(defalias 'tramp-gvfs-get-remote-uid #[514 "\303\304\305\"\306#\211\306=\203n \242>\204 \307\310\311D\"\210\3128\303\313\314#\315=\203. \206a \211\203B \316\317\"\"\3128\262\202a \320\267\202P \202a \n\202a \211\205a \316\317\"\"\3128\262\266\202\262\321\304\305\"#\210\211\207" [cl-struct-tramp-file-name-tags tramp-unknown-id-integer tramp-unknown-id-string tramp-get-connection-property format "uid-%s" undef signal wrong-type-argument tramp-file-name 2 "default-location" nil string file-attributes tramp-make-tramp-file-name #s(hash-table size 2 test eq rehash-size 1.5 rehash-threshold 0.8125 purecopy t data (integer 72 string 76)) tramp-set-connection-property] 9 (#$ . 90848)])
#@124 The gid of the remote connection VEC, in ID-FORMAT.
ID-FORMAT valid values are `string' and `integer'.
(fn VEC ID-FORMAT)
(defalias 'tramp-gvfs-get-remote-gid #[514 "\302\303\304\"\305#\211\305=\203Q \302\306\307#\211\203& \310\311\"\"\3128\262\202D \313\267\2024 \202D \202D \211\205D \310\311\"\"\3128\262\262\262\314\303\304\"#\210\211\207" [tramp-unknown-id-integer tramp-unknown-id-string tramp-get-connection-property format "gid-%s" undef "default-location" nil file-attributes tramp-make-tramp-file-name 3 #s(hash-table size 2 test eq rehash-size 1.5 rehash-threshold 0.8125 purecopy t data (integer 44 string 48)) tramp-set-connection-property] 8 (#$ . 91693)])
#@67 Indication, that remote uid and gid determination is in progress.
(defvar tramp-gvfs-get-remote-uid-gid-in-progress nil (#$ . 92392))
#@96 The prefix of the remote connection VEC.
This is relevant for GNOME Online Accounts.
(fn VEC)
(defalias 'tramp-gvfs-get-remote-prefix #[257 "\302\303\304#\211\304=\2034 \242>\204 \305\306\307D\"\210A@ \235\203% \310!\210\302\311!\303\312#\262\313\303#\210\211\207" [cl-struct-tramp-file-name-tags tramp-goa-methods tramp-get-connection-property "prefix" undef signal wrong-type-argument tramp-file-name tramp-get-goa-accounts tramp-make-goa-name "/" tramp-set-connection-property] 6 (#$ . 92532)])
#@173 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.
(fn VEC)
(defalias 'tramp-gvfs-maybe-open-connection #[257 "\306!\204 \307\310\211\"\210\211\311\312!!\2044 \313\314\315!\316\312!\317\320\321\322\323\320\324\320&\f\325\326#\210\327\330\"\266\331!\204h\n\211\242 >\204H \332\333\334D\"\210\211A@\242 >\204Y \332\333\334D\"\210\3358\242 >\204j \332\333\334D\"\210\3368\337!\340\341\342\"!\343\230\203\211 \344\230\203\211 \345\346\"\210\347\330\320\350#)\266\203\203\245 \344\230\203\245 \345\351\"\210\352\230\203\267 \344\230\203\267 \345\353\"\210 \235\203\330 \354!\210\355\356!\357\320#\203\330 \345\360\341 \342\"#\210\361\362G\363U\203\355 \364\365\n#\202\366 \364\366 $C\3671\244\fX\205\236
\2031\361X\2031\370\371\363U\203\372\202,\373U\203!\372\202,\335U\203+\374\202,\375P#\210\f\336Y\205\236\363 \373U\203x\3761sr\377!\203R\201T !\202X\312\201U \"q\210\201V P\262\201W \201X C\"\211\262)0\202w\210\202x\210\377!\203\206\201Y \326\"\262)\242 >\205\236\370\201Z \364\201[ \"P$0\266\204\202\250\210\330\266\204\210\201\\ C
\205\353\361\f\361^X\205\353\201] G\363U\203\315\364\365 #\202\326\364\366\n$\330\211#\211\205\351\201^ \361\201_ \201` $\262\201a \363\201b \201c \326\f\f\f\f\n\n&\201d \"\201e $\216\201f \201g @#\210\201h \201i AB\201j \201k &\210\201h \201i AB\201l \201k &\210\201h \201i AB\201m \201n &\210\201h \201i AB\201o \201n &\210\201p C\330\320\350#)\266\203\203\273\201q \201W \201i DEFG\257\201r \201s \f!\201t \201u \201v \201i !\201w \257E\"\201x \n#\266\202\363\201q \201W \201i DEFG\257\201r \201s \f!\201u \201v \201i !\201w \n\257\"\201x \n#\266\201y 2I\201z \201{ \201H \"\206\nH\330\201| #\211IB I\201a \363\201} \201c \326!\201~ \"\335$\216\201 \344\201\200 \330$?\205E\201\201 \330\211\201\202 #\210\202)*\2620\211\201y =\203\346\242 >\204a\332\333\334 D\"\210\335 8G\363U\203\251\201\203 \201\204 D\330\211 J \f\201e Y\205\255\211\203k\211\201e \201V \201\205 \201\206 ! K\201\207 \216K K\201\210 \210)rKq\210\201X +C\201\211 1d\fX\205^
\203\357\361X\203\357\370\371\363U\203\325\372\202\352\373U\203\337\372\202\352\335U\203\351\374\202\352\375P#\210\f\336Y\205^\363 \373U\2038\201\212 13r\377!\203\201T !\202\312\201U \"q\210\201V P\262\201W \201X C\"\211\262)0\2027\210\2028\210\377!\203F\201Y \326\"\262)\242 >\205^\370\201Z \364\201[ \"P$0\266\205\202\257\210\330\266\205\202\257Lr\201\213 \201\214 !q\210p\201\215 \210L\330\211MN\320\211O\320 P Q\201\216 \210\201\217 \201\220 !\210+\211 K\201\210 \201\221 !\210)\266\202\262\210\211\204\275C\262\201\222 \262\203\222\373\201\222 \201\223 \211\201\224 N\370\201\225 #E!C\201\211 1\215\fX\205\207
\203\361X\203\370\371\363U\203\376\372\202\373U\203\372\202\335U\203\374\202\375P#\210\f\336Y\205\207\363 \373U\203a\201\212 1\\r\377!\203;\201T !\202A\312\201U \"q\210\201V P\262\201W \201X C\"\211\262)0\202`\210\202a\210\377!\203o\201Y \326\"\262)\242 >\205\207\370\201Z \364\201[ \"P$0\266\204\202\221\210\330\266\204\210\332\201\226 \370\201\225 #!C\"*\266\202\346\201\203 \201\227 \fE\330\211 J \f\201e Y\205\355\211\203\253\211\201e \201V \201\205 \201\206 ! K\201\207 \216K K\201\210 \210)rKq\210\201X +C\201\211 1\244\fX\205\236
\203/\361X\203/\370\371\363U\203\372\202*\373U\203 \372\202*\335U\203)\374\202*\375P#\210\f\336Y\205\236\363 \373U\203x\201\212 1sr\377!\203R\201T !\202X\312\201U \"q\210\201V P\262\201W \201X C\"\211\262)0\202w\210\202x\210\377!\203\206\201Y \326\"\262)\242 >\205\236\370\201Z \364\201[ \"P$0\266\205\202\357\210\330\266\205\202\357Lr\201\213 \201\214 !q\210p\201\215 \210L\330\211MN\320\211O\320 P Q\201\216 \210\201\217 \201\220 !\210+\211 K\201\210 \201\221 !\210)\266\202\262\210\211\204\375C\262\201\222 \262\203\322\373\201\222 \201\223 \211\201\224 N\370\201\225 #E!C\201\211 1\315\fX\205\307
\203X\361X\203X\370\371\363U\203>\372\202S\373U\203H\372\202S\335U\203R\374\202S\375P#\210\f\336Y\205\307\363 \373U\203\241\201\212 1\234r\377!\203{\201T !\202\201\312\201U \"q\210\201V P\262\201W \201X C\"\211\262)0\202\240\210\202\241\210\377!\203\257\201Y \326\"\262)\242 >\205\307\370\201Z \364\201[ \"P$0\266\204\202\321\210\330\266\204\210\332\201\226 \370\201\225 #!C\"*\266\210\201 \344\201\200 \372$\344\230\203.\n\201\203 \201\230 \330\211\211 J \f\201e Y\2055 \211\203\363\211\201e \201V \201\205 \201\206 ! K\201\207 \216K K\201\210 \210)rKq\210\201X +C\201\211 1\354\fX\205\346
\203w\361X\203w\370\371\363U\203]\372\202r\373U\203g\372\202r\335U\203q\374\202r\375P#\210\f\336Y\205\346\363 \373U\203\300\201\212 1\273r\377!\203\232\201T !\202\240\312\201U \"q\210\201V P\262\201W \201X C\"\211\262)0\202\277\210\202\300\210\377!\203\316\201Y \326\"\262)\242 >\205\346\370\201Z \364\201[ \"P$0\266\205\2027 \210\330\266\205\2027 Lr\201\213 \201\214 !q\210p\201\215 \210L\330\211MN\320\211O\320 P Q\201\216 \210\201\217 \201\220 !\210+\211 K\201\210 \201\221 !\210)\266\202\262\210\211\204E C\262\201\222 \262\203\n\373\201\222 \201\223 \211\201\224 N\370\201\225 #E!C\201\211 1\n\fX\205\n
\203\240 \361X\203\240 \370\371\363U\203\206 \372\202\233 \373U\203\220 \372\202\233 \335U\203\232 \374\202\233 \375P#\210\f\336Y\205\n\363 \373U\203\351 \201\212 1\344 r\377!\203\303 \201T !\202\311 \312\201U \"q\210\201V P\262\201W \201X C\"\211\262)0\202\350 \210\202\351 \210\377!\203\367 \201Y \326\"\262)\242 >\205\n\370\201Z \364\201[ \"P$0\266\204\202\n\210\330\266\204\210\332\201\226 \370\201\225 #!C\"*\266\201\231 1D\n\201\232 R!\205@\nR 0\202H\n\210\202I\n\210\201\233 !\210\201f \201\234 !\201\235 \320#\210\201\236 \240\210)\266S?\205\225\n\320 S\201\237 \201\240 \"\210\201\241 \201\240 \"\210\201\237 \201\242 \"\210\201\241 \201\242 \")\207" [tramp-gvfs-dbus-event-vector cl-struct-tramp-file-name-tags inhibit-changing-match-data tramp-goa-methods tramp-verbose tramp-message-show-message tramp-connectable-p throw non-essential get-buffer-process tramp-get-connection-buffer make-network-process :name tramp-get-connection-name :buffer :server t :host local :service :noquery process-put vector set-process-query-on-exit-flag nil tramp-gvfs-connection-mounted-p signal wrong-type-argument tramp-file-name 2 4 tramp-file-name-unquote-localname tramp-gvfs-object-path tramp-make-tramp-file-name noloc "afp" "/" tramp-user-error "Filename must contain an AFP volume" "davs?" string-match "Filename must contain a WebDAV share" "smb" "Filename must contain a Windows share" tramp-get-goa-accounts tramp-get-connection-property tramp-make-goa-name "FilesDisabled" "There is no Online Account `%s'" 3 "%s..." 0 format #1="Opening connection for %s using %s" #2="Opening connection for %s@%s using %s" #3=(error) apply message #4="" 1 #5="Warning: " #6="Tramp: " #7=(error) processp tramp-cache-read-persistent-data 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 tramp-connection-timeout with-timeout-timers signal-hook-function standard-output default-directory buffer-read-only buffer-file-name buffer-undo-list inhibit-modification-hooks inhibit-read-only tramp-password-save-function tramp-gvfs-get-remote-uid-gid-in-progress process-buffer dont-create #8="\n%s" append buffer-string process-get tramp-debug-message #9="(%d) # " "failed" make-progress-reporter run-at-time 0.1 tramp-progress-reporter-update make-byte-code "\305\203 \306\305!\210\300\307\310\302G\311U\203 \312\313\303\301#\202 \312\314\302\303\301$\304\242D\3151\301 #X\205\277 $\203_ \307X\203_ \316\317\311U\203E \320\202Z \321U\203O \320\202Z \322U\203Y \323\202Z \324P#\210#\325Y\205\277 \311 #\321U\203\236 \3261\231 r\327!\203\200 \330!\202\204 \331\332\"q\210\333P\262\334\335 C\"\211\262)0\202\235 \210\202\236 \210\327!\203\252 \336\337\"\262)\242%>\205\277 \316\340\312\341\"P$0\207\210\342\207" vconcat [cancel-timer 3 "%s...%s" 0 format #1# #2# #3# apply message #4# 1 2 #5# #6# 4 #7# processp process-buffer tramp-get-connection-buffer dont-create #8# append buffer-string process-get vector tramp-debug-message #9# nil tramp-verbose tramp-message-show-message cl-struct-tramp-file-name-tags] 10 tramp-set-connection-property "first-password-request" dbus-register-method :session "askPassword" tramp-gvfs-handler-askpassword "AskPassword" "askQuestion" tramp-gvfs-handler-askquestion "AskQuestion" "(so)$" dbus-call-method-asynchronously ignore tramp-gvfs-mount-spec :struct :string dbus-get-unique-name :object-path tramp-dbus-function #10=#:timeout run-with-timer tramp-get-method-parameter #[0 "\300\301\211\"\207" [throw #10#] 3] "\301\300!\207" [cancel-timer] tramp-get-file-property "fuse-mountpoint" read-event 0.1 file-error "Timeout reached mounting %s using %s" generate-new-buffer " *string-output*" #[0 "\301!\207" [standard-output kill-buffer] 2] backtrace (error) (error) get-buffer-create "*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 substring-no-properties "Timeout reached mounting %s@%s using %s" "FUSE mount denied" (error) functionp tramp-set-connection-local-variables tramp-get-connection-process "connected" "done" tramp-gvfs-get-remote-uid integer tramp-gvfs-get-remote-gid string] 24 (#$ . 93049)])
#@53 Check, whether the gio tool is available.
(fn VEC)
(defalias 'tramp-gvfs-gio-tool-p #[257 "\300\301\302#\211\302=\203 \303\304\305\211\211\306&\307U\262\310\301#\210\211\207" [tramp-get-connection-property "gio-tool" undef tramp-call-process "gio" nil "version" 0 tramp-set-connection-property] 9 (#$ . 103042)])
#@266 Send the COMMAND with its ARGS to connection VEC.
COMMAND is a command from the gvfs-* utilities. It is replaced
by the corresponding gio tool call if available. `call-process'
is applied, and it returns t if the return code is zero.
(fn VEC COMMAND &rest ARGS)
(defalias 'tramp-gvfs-send-command #[642 "\302!\303\304\305\"\304\306\"\304\307\"E\"\310!\203) \311 \"A\312\313\"B\262\314\262r\315!q\210\316!\210\317 \210\320\321\313\322\313&\323U\206L \324\325\"\210\313*\207" [process-environment tramp-gvfs-gio-mapping tramp-get-local-locale append format "LANG=%s" "LANGUAGE=%s" "LC_ALL=%s" tramp-gvfs-gio-tool-p assoc delq nil "gio" tramp-get-connection-buffer tramp-gvfs-maybe-open-connection erase-buffer apply tramp-call-process t 0 tramp-flush-file-properties "/"] 12 (#$ . 103370)])
#@60 Transform VEC into a `tramp-goa-name' structure.
(fn VEC)
(defalias 'tramp-make-goa-name #[257 "\211\242>\205P \301\242>\204 \302\303\304D\"\210A@\242>\204' \302\303\304D\"\210\3058\242>\2049 \302\303\304D\"\210\3068\242>\204K \302\303\304D\"\210\3078\257\207" [cl-struct-tramp-file-name-tags tramp-goa-name signal wrong-type-argument tramp-file-name 2 4 5] 9 (#$ . 104187)])
#@328 Retrieve GNOME Online Accounts, and cache them.
The hash key is a `tramp-goa-name' structure. The value is an
alist of the properties of `tramp-goa-interface-account' and
`tramp-goa-interface-files' of the corresponding GNOME online
account. Additionally, a property "prefix" is added.
VEC is used only for traces.
(fn VEC)
(defalias 'tramp-get-goa-accounts #[257 "\306\307!\310\311#\211\311=\203\346\312\313\314\315\316 E#\"\211\203\330\211@\n\314\317\316E#\235\2055 \314\320\316\nF# \314\317\316E#\235\205N \314\320\316 F#\321\322\"A\206W \323\324\321\325\"A\204\317\321\326\"A\327\235\203\317\330\f\"\203\317\331\321\326\"A\332\333\"\332\334\"\332\335\"\257\262\211\242
>\204\230 \336\337\331D\"\210\211A@\340\230\203\265 \211\242
>\204\256 \336\337\331D\"\210\211A\211\341\240\266\211\242
>\204\303 \336\337\331D\"\210\211A@\342\230\203\340 \211\242
>\204\331 \336\337\331D\"\210\211A\211\343\240\266\244\211\203\370 \211@\344@A#\210A\266\202\202\343 \210\345\346\344\347\350\351\306\n\352\353#!\354!@>\204\336\337\355D\"\210\211\356H\262!#D\3571\312AX\205\304B\203^\335X\203^\360\361\362U\203D\323\202Y\333U\203N\323\202Y\334U\203X\363\202Y\364P#\210A\365Y\205\304\362 A\333U\203\235\3661\230r\367!\203\370!\202\203\371\372\"q\210\373P\262\374\375 C\"\211\262)0\202\234\210\202\235\210\367!\203\251\376\377\"\262)\242C>\205\304\360\201D \201E \201F \"P$0\266\204\202\316\210\324\266\204\210\266A\266\202\202 \210\201G \262\344\307!\310#\210\211\207" [tramp-goa-service tramp-goa-path tramp-goa-interface-account tramp-goa-interface-files tramp-goa-identity-regexp cl-struct-tramp-goa-name-tags tramp-get-connection-property tramp-make-goa-name "goa-accounts" undef mapcar car tramp-dbus-function dbus-get-all-managed-objects :session dbus-introspect-get-interface-names dbus-get-all-properties assoc "PresentationIdentity" "" nil "FilesDisabled" "ProviderType" ("google" "owncloud") string-match tramp-goa-name match-string 1 2 3 signal wrong-type-argument "google" "gdrive" "owncloud" "nextcloud" tramp-set-connection-property 10 "%s prefix %s" "prefix" directory-file-name url-generic-parse-url "Uri" "file:///" type-of url 6 (error) apply message 0 "Warning: " "Tramp: " 4 (error) processp process-buffer tramp-get-connection-buffer dont-create "\n%s" append buffer-string process-get vector cl-struct-url-tags tramp-verbose tramp-message-show-message cl-struct-tramp-file-name-tags tramp-debug-message format "(%d) # " "cached"] 21 (#$ . 104592)])
#@70 Return a list of (user host) tuples allowed to access.
(fn SERVICE)
(defalias 'tramp-zeroconf-parse-device-names #[257 "\300\301\302!\"\207" [mapcar #[257 "\301!\302!\303!\304\203 \305\306$\262\2031 \307\310@\"\203* \311\312@\"\262A\262\202 \211D\207" [tramp-prefix-port-regexp zeroconf-service-host zeroconf-service-port zeroconf-service-txt nil format "%s%s%d" string-match "u=\\(.+\\)$" match-string 1] 10 "\n\n(fn X)"] zeroconf-list-services] 5 (#$ . 107173)])
#@134 Return a list of (user host) tuples allowed to access.
This uses "avahi-browse" in case D-Bus is not enabled in Avahi.
(fn SERVICE)
(defalias 'tramp-gvfs-parse-device-names #[257 "\3001 \301\302\303\304\"!\305\306\307$0\202 \210\310\311\312\313\"!\207" [(error) split-string shell-command-to-string format "avahi-browse -trkp %s" "[\n
]+" omit "^\\+;.*$" nil delete-dups mapcar #[257 "\300\301\"\3028\300\3038\304\305\306$\307\203* \310\311@\"\203# \312\313@\"\262A\262\202 \211D\207" [split-string ";" 6 9 "\" \"" omit "\"" nil string-match "u=\\(.+\\)$" match-string 1] 8 "\n\n(fn X)"]] 6 (#$ . 107665)])
(byte-code "\203[ \305\306 _\307 !\210\310 \2035 \311\312\313\"\210\311\314\315\"\210\311\316\317\"\210\311\320\321\"\210\322\f\235\203Z \311\322\323\"\210\202Z \324\325!\203Z \311\312\326\"\210\311\314\327\"\210\311\316\330\"\210\311\320\331\"\210\322\f\235\203Z \311\322\332\"\210*\333\334\335\"\210\336\337!\207" [tramp-gvfs-enabled max-specpdl-size tramp-gvfs-dbus-event-vector tramp-gvfs-zeroconf-domain tramp-gvfs-methods nil 2 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")) add-hook tramp-unload-hook #[0 "\300\301\302\"\207" [unload-feature tramp-gvfs force] 3] provide tramp-gvfs] 3)
Zerion Mini Shell 1.0