%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.
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
(require 'tramp)
#@45 Method to connect SAMBA and M$ SMB servers.
(defconst tramp-smb-method "smb" (#$ . 425))
(byte-code "\301>\204 \302\303\304\"\210\302\303\305\"\210\306\307\310\311\312DD\313\314\315\316\317&\210\306\320\310\311\321DD\322\314\315\316\317\323\324& \210\306\325\310\311\326DD\327\314\315\316\330&\210\306\331\310\311\332DD\333\314\315\316\334\323\335& \207" [system-type (cygwin windows-nt) add-hook tramp--startup-hook #[0 "\301\302\303B\"\207" [tramp-smb-method add-to-list tramp-methods ((tramp-tmpdir "/C$/Temp") (tramp-case-insensitive t))] 4] #[0 "\301\302\303\304Q\305B\"\210\306\307\"\207" [tramp-smb-method add-to-list tramp-default-user-alist "\\`" "\\'" (nil nil) tramp-set-completion-function ((tramp-parse-netrc "~/.netrc"))] 5] custom-declare-variable tramp-smb-program funcall function #[0 "\300\207" [#1="smbclient"] 1 #1#] "Name of SMB client to run." :group tramp :type string tramp-smb-acl-program #[0 "\300\207" [#2="smbcacls"] 1 #2#] "Name of SMB acls to run." :version "24.4" tramp-smb-conf #[0 "\300\207" [#3="/dev/null"] 1 #3#] "Path of the \"smb.conf\" file.\nIf it is nil, no \"smb.conf\" will be added to the `tramp-smb-program'\ncall, letting the SMB client use the default one." (choice (const nil) (file :must-match t)) tramp-smb-options #[0 "\300\207" [nil] 1] "List of additional options.\nThey are added to the `tramp-smb-program' call via \"--option '...'\".\n\nFor example, if the deprecated SMB1 protocol shall be used, add to\nthis variable (\"client min protocol=NT1\") ." (repeat string) "27.2"] 10)
#@35 Version string of the SMB client.
(defvar tramp-smb-version nil (#$ . 1974))
#@38 Regexp of SMB server identification.
(defconst tramp-smb-server-version "Domain=\\[[^]]*\\] OS=\\[[^]]*\\] Server=\\[[^]]*\\]" (#$ . 2057))
#@51 Regexp used as prompt in smbclient or powershell.
(defconst tramp-smb-prompt "^\\(smb:\\|PS\\) .+> \\|^\\s-+Server\\s-+Comment$" (#$ . 2203))
#@48 Regexp for login error strings of SMB servers.
(defconst tramp-smb-wrong-passwd-regexp "\\(?:NT_STATUS_\\(?:LOGON_FAILURE\\|WRONG_PASSWORD\\)\\)" (#$ . 2351))
#@102 Regexp for possible error strings of SMB servers.
Used instead of analyzing error codes of commands.
(defconst tramp-smb-errors (byte-code "\300\301\302\303\304\305\306\307\257\310#\207" [mapconcat identity "Connection\\( to \\S-+\\)? failed" "Read from server failed, maybe it closed the connection" "Call timed out: server did not respond" "\\S-+: command not found" "Server doesn't support UNIX CIFS calls" "\\(?:ERR\\(?:DOS\\|HRD\\|SRV\\|bad\\(?:file\\|pw\\)\\|filexists\\|no\\(?:access\\|mem\\|suchshare\\)\\)\\|NT_STATUS_\\(?:ACC\\(?:ESS_DENIED\\|OUNT_LOCKED_OUT\\)\\|BAD_NETWORK_NAME\\|C\\(?:ANNOT_DELETE\\|ONNECTION_\\(?:DISCONNECTED\\|RE\\(?:FUSED\\|SET\\)\\)\\)\\|D\\(?:IRECTORY_NOT_EMPTY\\|UPLICATE_NAME\\)\\|FILE_IS_A_DIRECTORY\\|HOST_UNREACHABLE\\|I\\(?:MAGE_ALREADY_LOADED\\|NVALID_\\(?:LEVEL\\|PARAMETER\\(?:_MIX\\)?\\)\\|O_TIMEOUT\\)\\|LOGON_FAILURE\\|N\\(?:ETWORK_ACCESS_DENIED\\|O\\(?:T_\\(?:A_DIRECTORY\\|IMPLEMENTED\\)\\|_\\(?:LOGON_SERVERS\\|SUCH_\\(?:FILE\\|USER\\)\\)\\)\\)\\|OBJECT_\\(?:NAME_\\(?:COLLISION\\|\\(?:INVALI\\|NOT_FOUN\\)D\\)\\|PATH_SYNTAX_BAD\\)\\|PASSWORD_MUST_CHANGE\\|RE\\(?:SOURCE_NAME_NOT_FOUND\\|VISION_MISMATCH\\)\\|SHARING_VIOLATION\\|TRUSTED_RELATIONSHIP_FAILURE\\|UNSUCCESSFUL\\|WRONG_PASSWORD\\)\\)" "\\|"] 8) (#$ . 2517))
#@124 List of pattern/action pairs.
This list is used for login to SMB servers.
See `tramp-actions-before-shell' for more info.
(defconst tramp-smb-actions-with-share '((tramp-smb-prompt tramp-action-succeed) (tramp-password-prompt-regexp tramp-action-password) (tramp-wrong-passwd-regexp tramp-action-permission-denied) (tramp-smb-errors tramp-action-permission-denied) (tramp-process-alive-regexp tramp-action-process-alive)) (#$ . 3797))
#@124 List of pattern/action pairs.
This list is used for login to SMB servers.
See `tramp-actions-before-shell' for more info.
(defconst tramp-smb-actions-without-share '((tramp-password-prompt-regexp tramp-action-password) (tramp-wrong-passwd-regexp tramp-action-permission-denied) (tramp-smb-errors tramp-action-permission-denied) (tramp-process-alive-regexp tramp-action-out-of-band)) (#$ . 4240))
#@132 List of pattern/action pairs.
This list is used for tar-like copy of directories.
See `tramp-actions-before-shell' for more info.
(defconst tramp-smb-actions-with-tar '((tramp-password-prompt-regexp tramp-action-password) (tramp-wrong-passwd-regexp tramp-action-permission-denied) (tramp-smb-errors tramp-action-permission-denied) (tramp-process-alive-regexp tramp-smb-action-with-tar)) (#$ . 4644))
#@120 List of pattern/action pairs.
This list is used for smbcacls actions.
See `tramp-actions-before-shell' for more info.
(defconst tramp-smb-actions-get-acl '((tramp-password-prompt-regexp tramp-action-password) (tramp-wrong-passwd-regexp tramp-action-permission-denied) (tramp-smb-errors tramp-action-permission-denied) (tramp-process-alive-regexp tramp-smb-action-get-acl)) (#$ . 5052))
#@120 List of pattern/action pairs.
This list is used for smbcacls actions.
See `tramp-actions-before-shell' for more info.
(defconst tramp-smb-actions-set-acl '((tramp-password-prompt-regexp tramp-action-password) (tramp-wrong-passwd-regexp tramp-action-permission-denied) (tramp-smb-errors tramp-action-permission-denied) (tramp-process-alive-regexp tramp-smb-action-set-acl)) (#$ . 5446))
#@129 Alist of handler functions for Tramp SMB method.
Operations not mentioned here will be handled by the default Emacs primitives.
(defconst tramp-smb-file-name-handler-alist '((access-file . tramp-handle-access-file) (add-name-to-file . tramp-smb-handle-add-name-to-file) (copy-directory . tramp-smb-handle-copy-directory) (copy-file . tramp-smb-handle-copy-file) (delete-directory . tramp-smb-handle-delete-directory) (delete-file . tramp-smb-handle-delete-file) (directory-file-name . tramp-handle-directory-file-name) (directory-files . tramp-smb-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-smb-handle-expand-file-name) (file-accessible-directory-p . tramp-handle-file-accessible-directory-p) (file-acl . tramp-smb-handle-file-acl) (file-attributes . tramp-smb-handle-file-attributes) (file-directory-p . tramp-handle-file-directory-p) (file-file-equal-p . tramp-handle-file-equal-p) (file-executable-p . tramp-handle-file-exists-p) (file-exists-p . tramp-handle-file-exists-p) (file-in-directory-p . tramp-handle-file-in-directory-p) (file-local-copy . tramp-smb-handle-file-local-copy) (file-modes . tramp-handle-file-modes) (file-name-all-completions . tramp-smb-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-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-handle-file-exists-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-smb-handle-file-system-info) (file-truename . tramp-handle-file-truename) (file-writable-p . tramp-smb-handle-file-writable-p) (find-backup-file-name . tramp-handle-find-backup-file-name) (insert-directory . tramp-smb-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-smb-handle-make-directory) (make-directory-internal . tramp-smb-handle-make-directory-internal) (make-nearby-temp-file . tramp-handle-make-nearby-temp-file) (make-process . ignore) (make-symbolic-link . tramp-smb-handle-make-symbolic-link) (process-file . tramp-smb-handle-process-file) (rename-file . tramp-smb-handle-rename-file) (set-file-acl . tramp-smb-handle-set-file-acl) (set-file-modes . tramp-smb-handle-set-file-modes) (set-file-selinux-context . ignore) (set-file-times . ignore) (set-visited-file-modtime . tramp-handle-set-visited-file-modtime) (shell-command . tramp-handle-shell-command) (start-file-process . tramp-smb-handle-start-file-process) (substitute-in-file-name . tramp-smb-handle-substitute-in-file-name) (temporary-file-directory . tramp-handle-temporary-file-directory) (tramp-set-file-uid-gid . ignore) (unhandled-file-name-directory . ignore) (vc-registered . ignore) (verify-visited-file-modtime . tramp-handle-verify-visited-file-modtime) (write-region . tramp-smb-handle-write-region)) (#$ . 5840))
(byte-code "\300\301\302\303\304DD\305\306\307\310\311\312\313& \210\300\314\302\303\315DD\316\306\307\310\311\312\313& \210\300\317\302\303\320DD\321\306\307\310\311\312\313& \207" [custom-declare-variable tramp-smb-winexe-program funcall function #[0 "\300\207" [#1="winexe"] 1 #1#] "Name of winexe client to run.\nIf it isn't found in the local $PATH, the absolute path of winexe\nshall be given. This is needed for remote processes." :group tramp :type string :version "24.3" tramp-smb-winexe-shell-command #[0 "\300\207" [#2="powershell.exe"] 1 #2#] "Shell to be used for processes on remote machines.\nThis must be Powershell V2 compatible." tramp-smb-winexe-shell-command-switch #[0 "\300\207" [#3="-file -"] 1 #3#] "Command switch used together with `tramp-smb-winexe-shell-command'.\nThis can be used to disable echo etc."] 10)
#@58 Check if it's a FILENAME for SMB servers.
(fn FILENAME)
(defalias 'tramp-smb-file-name-p #[257 "\302!\205 \303!\211\242>\204 \304\305\306D\"\210\211A@\262 \230\207" [cl-struct-tramp-file-name-tags tramp-smb-method tramp-tramp-file-p tramp-dissect-file-name signal wrong-type-argument tramp-file-name] 6 (#$ . 10386)])
(put 'tramp-smb-file-name-p 'byte-optimizer 'byte-compile-inline-expand)
#@166 Invoke the SMB 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-smb-file-name-handler #[385 "\301\"\211\203! \302 \303\304\305\306\307!\310\"\311$\216\312A\")\262\202% \313\"\207" [tramp-smb-file-name-handler-alist assoc match-data make-byte-code 0 "\301\300\302\"\207" vconcat vector [set-match-data evaporate] 3 apply tramp-run-real-handler] 10 (#$ . 10792)])
(byte-code "\301>\204 \302\303\304\"\210\302\207" [system-type (cygwin windows-nt) add-hook tramp--startup-hook #[0 "\300\301\302\"\207" [tramp-register-foreign-file-name-handler tramp-smb-file-name-p tramp-smb-file-name-handler] 3]] 3)
#@96 Like `add-name-to-file' for Tramp files.
(fn FILENAME NEWNAME &optional OK-IF-ALREADY-EXISTS)
(defalias 'tramp-smb-handle-add-name-to-file #[770 "\306\"\204h\307\310!\203 \202 !\211\242>\204\" \311\312\313D\"\210\211A@\242>\2043 \311\312\313D\"\210\3148\242>\204D \311\312\313D\"\210\3158\242>\204V \311\312\313D\"\210\3168\242>\204h \311\312\313D\"\210\3178\242>\204z \311\312\313D\"\210\3208\242>\204\216 \311\312\313 D\"\210\3218\322\323\324C\325\211 \326Y\205\221\211\203b\211\326\327\330\331! \332\216\f \333 \210)r\fq\210\334 +C\3351[ X\205U\n\203\370 \315X\203\370 \336\337\340U\203\336 \341\202\363 \342U\203\350 \341\202\363 \314U\203\362 \343\202\363 \344P#\210 \316Y\205U\340\342U\2035\34510r\346!\203\347!\202\350\351\"q\210\327P\262\352\334 C\"\211\262)0\2024\210\2025\210\346!\203A\353\354\"\262)\242>\205U\336\355\356\357\"P$0\266\205\202\223\210\325\266\205\202\223
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\237C\262\370\262\203X\342\370\371\211\372N\336\373 #E!C\3351S X\205M\n\203\360\315X\203\360\336\337\340U\203\326\341\202\353\342U\203\340\341\202\353\314U\203\352\343\202\353\344P#\210 \316Y\205M\340\342U\203-\3451(r\346!\203\347!\202\350\351\"q\210\327P\262\352\334 C\"\211\262)0\202,\210\202-\210\346!\2039\353\354\"\262)\242>\205M\336\355\356\357\"P$0\266\204\202W\210\325\266\204\210\311\374\336\373#!C\"*\266
\307!\211\242>\204y\311\312\313D\"\210\211A@\242>\204\212\311\312\313D\"\210\3148\242>\204\233\311\312\313D\"\210\3158\242>\204\255\311\312\313D\"\210\3168\242>\204\277\311\312\313D\"\210\3178\242>\204\321\311\312\313D\"\210\3208\242>\204\345\311\312\313 D\"\210\3218\307\n!\211\242>\204\373\311\312\313D\"\210\211A@\242>\204\f\311\312\313D\"\210\3148\242>\204 \311\312\313D\"\210\3158\242>\204/\311\312\313D\"\210\3168\242>\204A\311\312\313D\"\210\3178\242>\204S\311\312\313D\"\210\3208\242>\204g\311\312\313 D\"\210\3218\375!\203I\322\376C\325\211 \326Y\205r\211\203C\211\326\327\330\331! \332\216\f \333 \210)r\fq\210\334 +C\3351< X\2056\n\203\331\315X\203\331\336\337\340U\203\277\341\202\324\342U\203\311\341\202\324\314U\203\323\343\202\324\344P#\210 \316Y\2056\340\342U\203\3451r\346!\203\370\347!\202\374\350\351\"q\210\327P\262\352\334 C\"\211\262)0\202\210\202\210\346!\203\"\353\354\"\262)\242>\2056\336\355\356\357\"P$0\266\205\202t\210\325\266\205\202t
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\200C\262\370\262\2039\342\370\371\211\372N\336\373 #E!C\33514 X\205.\n\203\321\315X\203\321\336\337\340U\203\267\341\202\314\342U\203\301\341\202\314\314U\203\313\343\202\314\344P#\210 \316Y\205.\340\342U\203\3451 r\346!\203\360\347!\202\364\350\351\"q\210\327P\262\352\334 C\"\211\262)0\202
\210\202\210\346!\203\353\354\"\262)\242>\205.\336\355\356\357\"P$0\266\204\2028\210\325\266\204\210\311\374\336\373#!C\"*\266\377!\203J\203h\247\203C\201E \356\201F \"!\204C\201G \325\211\211 \326Y\205i\211\203:\211\326\327\330\331! \332\216\f \333 \210)r\fq\210\334 +C\33513 X\205-\n\203\320\315X\203\320\336\337\340U\203\266\341\202\313\342U\203\300\341\202\313\314U\203\312\343\202\313\344P#\210 \316Y\205-\340\342U\203
\3451r\346!\203\357\347!\202\363\350\351\"q\210\327P\262\352\334 C\"\211\262)0\202\f\210\202
\210\346!\203\353\354\"\262)\242>\205-\336\355\356\357\"P$0\266\205\202k\210\325\266\205\202k
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\204wC\262\370\262\2030\342\370\371\211\372N\336\373 #E!C\3351+ X\205%\n\203\310\315X\203\310\336\337\340U\203\256\341\202\303\342U\203\270\341\202\303\314U\203\302\343\202\303\344P#\210 \316Y\205%\340\342U\203\3451 r\346!\203\347\347!\202\353\350\351\"q\210\327P\262\352\334 C\"\211\262)0\202\210\202\210\346!\203\353\354\"\262)\242>\205%\336\355\356\357\"P$0\266\204\202/\210\325\266\204\210\311\374\336\373#!C\"*\266\202J\201H !\210\201I \"\210\201J \356\201K \201L !\203j\201M \202m\201N \201O !\201O !$\"?\205Z \322\201P \201Q C\325\211 \326Y\205\203\211\203T\211\326\327\330\331! \332\216\f \333 \210)r\fq\210\334 +C\3351M X\205G\n\203\352\315X\203\352\336\337\340U\203\320\341\202\345\342U\203\332\341\202\345\314U\203\344\343\202\345\344P#\210 \316Y\205G\340\342U\203'\3451\"r\346!\203 \347!\202
\350\351\"q\210\327P\262\352\334 C\"\211\262)0\202&\210\202'\210\346!\2033\353\354\"\262)\242>\205G\336\355\356\357\"P$0\266\205\202\205\210\325\266\205\202\205
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\221C\262\370\262\203J \342\370\371\211\372N\336\373 #E!C\3351E X\205? \n\203\342\315X\203\342\336\337\340U\203\310\341\202\335\342U\203\322\341\202\335\314U\203\334\343\202\335\344P#\210 \316Y\205? \340\342U\203 \3451 r\346!\203 \347!\202 \350\351\"q\210\327P\262\352\334 C\"\211\262)0\202 \210\202 \210\346!\203+ \353\354\"\262)\242>\205? \336\355\356\357\"P$0\266\204\202I \210\325\266\204\210\311\374\336\373#!C\"*\266\204\266\210\207" [cl-struct-tramp-file-name-tags signal-hook-function tramp-message-show-message tramp-verbose standard-output default-directory tramp-equal-remote tramp-dissect-file-name tramp-tramp-file-p signal wrong-type-argument tramp-file-name 2 3 4 5 6 7 file-error "add-name-to-file: %s" "only implemented for same method, same user, same host" 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-directory-p "add-name-to-file: %s must not be a directory" file-exists-p buffer-read-only buffer-file-name buffer-undo-list inhibit-modification-hooks inhibit-read-only yes-or-no-p "File %s already exists; make it a link anyway? " file-already-exists delete-file tramp-flush-file-properties tramp-smb-send-command "%s \"%s\" \"%s\"" tramp-smb-get-cifs-capabilities "link" "hardlink" tramp-smb-get-localname "error with add-name-to-file, see buffer `%s' for details" buffer-name] 34 (#$ . 11525)])
#@46 Untar from connection buffer.
(fn PROC VEC)
(defalias 'tramp-smb-action-with-tar #[514 "\304!\204 \305\306\307\"\207r\310!q\210eb\210\311\312\313#\205\321 ~\210\312y\210\211\314e`{\312\3151\304 X\205\276 \n\203a \316X\203a \317\320\321U\203G \322\202\\ \323U\203Q \322\202\\ \324U\203[ \325\202\\ \326P#\210 \327Y\205\276 \321\323U\203\236 \3301\231 r\331!\203\200 \332!\202\204 \310\333\"q\210\334P\262\335\336 C\"\211\262)0\202\235 \210\202\236 \210\331!\203\252 \337\340\"\262)\242 >\205\276 \317\341\342\343\"P$0\266\204\202\310 \210\312\266\204\210e`|\210\305\306\344\")\207" [tramp-smb-server-version tramp-verbose tramp-message-show-message cl-struct-tramp-file-name-tags process-live-p throw tramp-action process-died tramp-get-connection-buffer search-forward-regexp nil t 6 (error) 3 apply message 0 "" 1 2 "Warning: " "Tramp: " 4 (error) processp process-buffer dont-create "\n%s" append buffer-string process-get vector tramp-debug-message format "(%d) # " ok] 12 (#$ . 18602)])
#@104 Like `copy-directory' for Tramp files.
(fn DIRNAME NEWNAME &optional KEEP-DATE PARENTS COPY-CONTENTS)
(defalias 'tramp-smb-handle-copy-directory #[1282 "CC\203 \306\307\242\242\257\"\202F\211\310\242!\240\210\310\242!\240\210\311\242!\311\242!\312\203: \242\202< \242!C\211\242\242>\204N \313\314\315\242D\"\210\211\242A@\242\242>\204b \313\314\315\242D\"\210\316\2428\242\242>\204v \313\314\315\242D\"\210\317\2428\242\242>\204\213 \313\314\315\242D\"\210\320\2428\242\242>\204\240 \313\314\315\242D\"\210\321\2428\242\242>\204\265 \313\314\315\242D\"\210\322\2428\242\242>\204\314 \313\314\315 \242D\"\210\323\2428\242\324\325\326\327\242\242#C\3301} X\205w\n\203\317X\203\331\332\324U\203 \333\202\334U\203\n\333\202\316U\203\335\202\336P#\210 \320Y\205w\324\334U\203W\3371Rr\340!\2039\341!\202=\342\343\"q\210\344P\262\345\346 C\"\211\262)0\202V\210\202W\210\340!\203c\347\350\"\262)\242>\205w\331\351\326\352\"P$0\266\204\202\201\210\353\266\204\210\354C\n\205\251\324 \317^X\205\251\355\326\327\242\242#\353\211#\211\205\247\356\317\357\360$\262\361\324\362\363\350 %\364\"\365$\216\366
\242!\204\300 \242 \367\370\242D\353\211 \365Y\205\333\211\203\232\211\365\344\371\372! \373\216
\374 \210)r
q\210\346 +C\3751\223 X\205\215\n\2030\317X\2030\331\332\324U\203\333\202+\334U\203 \333\202+\316U\203*\335\202+\336P#\210 \320Y\205\215\324\334U\203m\3761hr\340!\203O\341!\202S\342\343\"q\210\344P\262\345\346 C\"\211\262)0\202l\210\202m\210\340!\203y\347\350\"\262)\242>\205\215\331\351\326\352\"P$0\266\205\202\335\210\353\266\205\202\335@r\377\201G !q\210p\201H \210@\353\211AB\201I \211C\201I D E\201J \210\201K \201L !\210+\211 \374 \201M !\210)\266\202\262\210\211\204\353C\262\201N \262\203\254\334\201N \201O \211\201P N\331\201Q #E!C\3751\247 X\205\241\n\203D\317X\203D\331\332\324U\203*\333\202?\334U\2034\333\202?\316U\203>\335\202?\336P#\210 \320Y\205\241\324\334U\203\201\3761|r\340!\203c\341!\202g\342\343\"q\210\344P\262\345\346 C\"\211\262)0\202\200\210\202\201\210\340!\203\215\347\350\"\262)\242>\205\241\331\351\326\352\"P$0\266\204\202\253\210\353\266\204\210\313\201R \331\201Q #!C\"*\266\201S \242!\203\316\201T \242!\204\316 \242\201U \242\353\211\211 \365Y\205\351\211\203\250\211\365\344\371\372! \373\216
\374 \210)r
q\210\346 +C\3751\241 X\205\233\n\203>\317X\203>\331\332\324U\203$\333\2029\334U\203.\333\2029\316U\2038\335\2029\336P#\210 \320Y\205\233\324\334U\203{\3761vr\340!\203]\341!\202a\342\343\"q\210\344P\262\345\346 C\"\211\262)0\202z\210\202{\210\340!\203\207\347\350\"\262)\242>\205\233\331\351\326\352\"P$0\266\205\202\353\210\353\266\205\202\353@r\377\201G !q\210p\201H \210@\353\211AB\201I \211C\201I D E\201J \210\201K \201L !\210+\211 \374 \201M !\210)\266\202\262\210\211\204\371C\262\201N \262\203\272\334\201N \201O \211\201P N\331\201Q #E!C\3751\265 X\205\257\n\203R\317X\203R\331\332\324U\2038\333\202M\334U\203B\333\202M\316U\203L\335\202M\336P#\210 \320Y\205\257\324\334U\203\217\3761\212r\340!\203q\341!\202u\342\343\"q\210\344P\262\345\346 C\"\211\262)0\202\216\210\202\217\210\340!\203\233\347\350\"\262)\242>\205\257\331\351\326\352\"P$0\266\204\202\271\210\353\266\204\210\313\201R \331\201Q #!C\"*\266 \203+\n\203+\201V \310F\201W \201X \201Y N@!\"!\361\324\201Z \363\350!\201[ \"\317$\216\201\\ !\210\307\242\201] !\201^ $\210\307\310\201_ \242!\"\242$)\262\2029\306\307\242\242F\"\201` \240\210)\266\202\266\210\266\202\207" [cl-struct-tramp-file-name-tags tramp-verbose tramp-message-show-message tramp-file-missing signal-hook-function standard-output tramp-run-real-handler copy-directory expand-file-name tramp-tramp-file-p tramp-dissect-file-name signal wrong-type-argument tramp-file-name 2 3 4 5 6 7 0 "%s..." format #1="Copying %s to %s" #2=(error) apply message #3="" 1 #4="Warning: " #5="Tramp: " #6=(error) processp process-buffer tramp-get-connection-buffer dont-create #7="\n%s" append buffer-string process-get vector tramp-debug-message #8="(%d) # " nil "failed" make-progress-reporter run-at-time 0.1 tramp-progress-reporter-update make-byte-code "\304\203 \306\304!\210\302\242\307\310\311\312\300\242\301\242#\303\242D\3131\261
X\205\257 \"\203Q \314X\203Q \315\316\307U\2037 \317\202L \320U\203A \317\202L \321U\203K \322\202L \323P#\210
\324Y\205\257 \307 \320U\203\216 \3251\211 r\326!\203p \327!\202t \330\331\"q\210\332P\262\333\334 C\"\211\262)0\202\215 \210\202\216 \210\326!\203\232 \335\336\"\262)\242#>\205\257 \315\337\311\340\"P$0\207\210\341\207" vconcat [tramp-verbose cancel-timer 0 "%s...%s" format #1# #2# 3 apply message #3# 1 2 #4# #5# 4 #6# processp process-buffer tramp-get-connection-buffer dont-create #7# append buffer-string process-get vector tramp-debug-message #8# nil tramp-message-show-message cl-struct-tramp-file-name-tags] 10 file-exists-p "Copying directory" "No such file or directory" generate-new-buffer " *string-output*" #[0 "\301!\207" [standard-output kill-buffer] 2] backtrace (error) (error) get-buffer-create default-directory buffer-read-only buffer-file-name buffer-undo-list inhibit-modification-hooks inhibit-read-only tramp-temp-name-prefix "*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-directory-p tramp-compat-directory-name-p file-already-exists make-temp-name eval temporary-file-directory standard-value "\301\300\302\"\207" [delete-directory recursive] make-directory file-name-as-directory parents file-name-nondirectory "done"] 34 (#$ . 19631)])
#@285 Like `copy-file' for Tramp files.
KEEP-DATE has no effect in case NEWNAME resides on an SMB server.
PRESERVE-UID-GID and PRESERVE-EXTENDED-ATTRIBUTES are completely ignored.
(fn FILENAME NEWNAME &optional OK-IF-ALREADY-EXISTS KEEP-DATE PRESERVE-UID-GID PRESERVE-EXTENDED-ATTRIBUTES)
(defalias 'tramp-smb-handle-copy-file #[1538 "CC\211\306\242!\240\210\306\242!\240\210\307\310\242!\203 \242\202\" \242!\311\312\313\314\242\242#C\3151\313 X\205\305 \203h \316X\203h \317\320\311U\203N \321\202c \322U\203X \321\202c \323U\203b \324\202c \325P#\210\326Y\205\305 \311\322U\203\245 \3271\240 r\330!\203\207 \331!\202\213 \332\333\"q\210\334P\262\335\336 C\"\211\262)0\202\244 \210\202\245 \210\330!\203\261 \337\340\"\262)\242\n>\205\305 \317\341\313\342\"P$0\266\204\202\317 \210\343\266\204\210\344C \205\366 \311\316^X\205\366 \345\313\314\242\242#\343\211#\211\205\364 \346\316\347\350$\262\351\311\352\353\340 $\354\"\355$\216\356\242!\203 \357\242\242 \360\361%\210\202\214\f\362\242!\204$\307\310\242!\2032\242\2024\242! \363\364\242D\343\211 \355Y\205=\211\203\211\355\334\365\366! \367\216
\370 \210)r
q\210\336 +C\3711\377X\205\371 \203\234\316X\203\234\317\320\311U\203\202\321\202\227\322U\203\214\321\202\227\323U\203\226\324\202\227\325P#\210\326Y\205\371\311\322U\203\331\3721\324r\330!\203\273\331!\202\277\332\333\"q\210\334P\262\335\336 C\"\211\262)0\202\330\210\202\331\210\330!\203\345\337\340\"\262)\242\n>\205\371\317\341\313\342\"P$0\266\205\202?\210\343\266\205\202?@r\373\374!q\210p\375 \210@\343\211AB\376\211C\376 D E\377 \210\201G \201H !\210+\211 \370 \201I !\210)\266\202\262\210\211\204MC\262\201J \262\203\322\201J \201K \211\201L N\317\201M #E!C\3711 X\205 \203\246\316X\203\246\317\320\311U\203\214\321\202\241\322U\203\226\321\202\241\323U\203\240\324\202\241\325P#\210\326Y\205\311\322U\203\343\3721\336r\330!\203\305\331!\202\311\332\333\"q\210\334P\262\335\336 C\"\211\262)0\202\342\210\202\343\210\330!\203\357\337\340\"\262)\242\n>\205\317\341\313\342\"P$0\266\204\202
\210\343\266\204\210\201N \201O \317\201M #!C\"*\266\201P \242!\211\203V\201Q 1B\201R \242 #0\202R\201S !\210\201N @A\"\262\210\202\213\f\356\242!\203u\201T \242!\203u\306\201U \242!\242\"\240\210\307\242!\211\242\n>\204\215\201N \201V \201W D\"\210\211A@\242\n>\204\244\201N \201V \201W D\"\210\3238\242\n>\204\273\201N \201V \201W D\"\210\3168\242\n>\204\323\201N \201V \201W D\"\210\3268\242\n>\204\353\201N \201V \201W D\"\210\201X 8\242\n>\204\201N \201V \201W D\"\210\201Y 8\242\n>\204!\201N \201V \201W D\"\210\201Z 8\204%\362
\242!\203%\201[ \242\343\211\211 \355Y\205>\211\203\211\355\334\365\366! \367\216
\370 \210)r
q\210\336 +C\3711 X\205\372 \203\235\316X\203\235\317\320\311U\203\203\321\202\230\322U\203\215\321\202\230\323U\203\227\324\202\230\325P#\210\326Y\205\372\311\322U\203\332\3721\325r\330!\203\274\331!\202\300\332\333\"q\210\334P\262\335\336 C\"\211\262)0\202\331\210\202\332\210\330!\203\346\337\340\"\262)\242\n>\205\372\317\341\313\342\"P$0\266\205\202@\210\343\266\205\202@@r\373\374!q\210p\375 \210@\343\211AB\376\211C\376 D E\377 \210\201G \201H !\210+\211 \370 \201I !\210)\266\202\262\210\211\204NC\262\201J \262\203\322\201J \201K \211\201L N\317\201M #E!C\3711\nX\205 \203\247\316X\203\247\317\320\311U\203\215\321\202\242\322U\203\227\321\202\242\323U\203\241\324\202\242\325P#\210\326Y\205\311\322U\203\344\3721\337r\330!\203\306\331!\202\312\332\333\"q\210\334P\262\335\336 C\"\211\262)0\202\343\210\202\344\210\330!\203\360\337\340\"\262)\242\n>\205\317\341\313\342\"P$0\266\204\202\210\343\266\204\210\201N \201O \317\201M #!C\"*\266\356
\242!\203+\201T
\242!\204+\201\\ \201] \242C\343\211 \355Y\205D\211\203
\211\355\334\365\366! \367\216
\370 \210)r
q\210\336 +C\3711X\205 \203\243\316X\203\243\317\320\311U\203\211\321\202\236\322U\203\223\321\202\236\323U\203\235\324\202\236\325P#\210\326Y\205 \311\322U\203\340\3721\333r\330!\203\302\331!\202\306\332\333\"q\210\334P\262\335\336 C\"\211\262)0\202\337\210\202\340\210\330!\203\354\337\340\"\262)\242\n>\205 \317\341\313\342\"P$0\266\205\202F\210\343\266\205\202F@r\373\374!q\210p\375 \210@\343\211AB\376\211C\376 D E\377 \210\201G \201H !\210+\211 \370 \201I !\210)\266\202\262\210\211\204TC\262\201J \262\203\322\201J \201K \211\201L N\317\201M #E!C\3711X\205\n \203\255\316X\203\255\317\320\311U\203\223\321\202\250\322U\203\235\321\202\250\323U\203\247\324\202\250\325P#\210\326Y\205\n\311\322U\203\352\3721\345r\330!\203\314\331!\202\320\332\333\"q\210\334P\262\335\336 C\"\211\262)0\202\351\210\202\352\210\330!\203\366\337\340\"\262)\242\n>\205\n\317\341\313\342\"P$0\266\204\202\210\343\266\204\210\201N \201O \317\201M #!C\"*\266\201^ \"\210\201_ !\2040\n\201\\ \201` \242C\343\211 \355Y\205I \211\203 \211\355\334\365\366! \367\216
\370 \210)r
q\210\336 +C\3711 X\205 \203\250\316X\203\250\317\320\311U\203\216\321\202\243\322U\203\230\321\202\243\323U\203\242\324\202\243\325P#\210\326Y\205 \311\322U\203\345\3721\340r\330!\203\307\331!\202\313\332\333\"q\210\334P\262\335\336 C\"\211\262)0\202\344\210\202\345\210\330!\203\361\337\340\"\262)\242\n>\205 \317\341\313\342\"P$0\266\205\202K \210\343\266\205\202K @r\373\374!q\210p\375 \210@\343\211AB\376\211C\376 D E\377 \210\201G \201H !\210+\211 \370 \201I !\210)\266\202\262\210\211\204Y C\262\201J \262\203\n\322\201J \201K \211\201L N\317\201M #E!C\3711\nX\205\n \203\262 \316X\203\262 \317\320\311U\203\230 \321\202\255 \322U\203\242 \321\202\255 \323U\203\254 \324\202\255 \325P#\210\326Y\205\n\311\322U\203\357 \3721\352 r\330!\203\321 \331!\202\325 \332\333\"q\210\334P\262\335\336 C\"\211\262)0\202\356 \210\202\357 \210\330!\203\373 \337\340\"\262)\242\n>\205\n\317\341\313\342\"P$0\266\204\202\n\210\343\266\204\210\201N \201O \317\201M #!C\"*\266\201a \313\201b \242\343\211?\205D\nF F\201c !\211\211?\205T\nF F\201d \201e \201c !\")\266\202\203}\n\211G\323U\203u\n\201f \202{\n\201g \323\"\262\201h !P)\266\203\201i
!#\"\204\211\f\201\\ \201j \242\242D\343\211 \355Y\205\242 \211\203k \211\355\334\365\366! \367\216
\370 \210)r
q\210\336 +C\3711d X\205^ \203 \316X\203 \317\320\311U\203\347\n\321\202\374\n\322U\203\361\n\321\202\374\n\323U\203\373\n\324\202\374\n\325P#\210\326Y\205^ \311\322U\203> \37219 r\330!\203 \331!\202$ \332\333\"q\210\334P\262\335\336 C\"\211\262)0\202= \210\202> \210\330!\203J \337\340\"\262)\242\n>\205^ \317\341\313\342\"P$0\266\205\202\244 \210\343\266\205\202\244 @r\373\374!q\210p\375 \210@\343\211AB\376\211C\376 D E\377 \210\201G \201H !\210+\211 \370 \201I !\210)\266\202\262\210\211\204\262 C\262\201J \262\203s\f\322\201J \201K \211\201L N\317\201M #E!C\3711n\fX\205h\f \203 \f\316X\203 \f\317\320\311U\203\361 \321\202\f\322U\203\373 \321\202\f\323U\203\f\324\202\f\325P#\210\326Y\205h\f\311\322U\203H\f\3721C\fr\330!\203*\f\331!\202.\f\332\333\"q\210\334P\262\335\336 C\"\211\262)0\202G\f\210\202H\f\210\330!\203T\f\337\340\"\262)\242\n>\205h\f\317\341\313\342\"P$0\266\204\202r\f\210\343\266\204\210\201N \201O \317\201M #!C\"*\266\266\210\205\244\f\201k \242\201l \242!\201X 8\262\"\201m \240\210)\266\202\207" [tramp-verbose tramp-message-show-message cl-struct-tramp-file-name-tags tramp-file-missing signal-hook-function standard-output expand-file-name tramp-dissect-file-name tramp-tramp-file-p 0 "%s..." format #1="Copying %s to %s" #2=(error) 3 apply message #3="" 1 2 #4="Warning: " #5="Tramp: " 4 #6=(error) processp process-buffer tramp-get-connection-buffer dont-create #7="\n%s" append buffer-string process-get vector tramp-debug-message #8="(%d) # " nil "failed" make-progress-reporter run-at-time 0.1 tramp-progress-reporter-update make-byte-code "\303\203 \306\303!\210\307\310\300\242!\203 \300\242\202 \301\242!\311\312\313\314\300\242\301\242#\302\242D\3151\276 \fX\205\274
\203^ \316X\203^ \317\320\311U\203D \321\202Y \322U\203N \321\202Y \323U\203X \324\202Y \325P#\210\f\326Y\205\274 \311 \322U\203\233 \3271\226 r\330!\203} \331!\202\201 \332\333\"q\210\334P\262\335\336 C\"\211\262)0\202\232 \210\202\233 \210\330!\203\247 \337\340\"\262)\242$>\205\274 \317\341\313\342\"P$0\207\210\343\207" vconcat [tramp-verbose tramp-message-show-message cancel-timer tramp-dissect-file-name tramp-tramp-file-p 0 "%s...%s" format #1# #2# 3 apply message #3# 1 2 #4# #5# 4 #6# processp process-buffer tramp-get-connection-buffer dont-create #7# append buffer-string process-get vector tramp-debug-message #8# nil cl-struct-tramp-file-name-tags] 10 file-directory-p copy-directory parents copy-contents file-exists-p "Copying file" "No such file or directory" 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 default-directory buffer-read-only buffer-file-name buffer-undo-list inhibit-modification-hooks inhibit-read-only file-name-handler-alist run-hooks temp-buffer-setup-hook internal-temp-output-buffer-show "%s" error-message-string error-message format-message signal substring-no-properties file-local-copy (error quit) rename-file delete-file tramp-compat-directory-name-p file-name-nondirectory wrong-type-argument tramp-file-name 5 6 7 file-already-exists file-error "File is a directory %s" tramp-flush-file-properties tramp-smb-get-share "Target `%s' must contain a share name" tramp-smb-send-command "put \"%s\" \"%s\"" file-local-name string-prefix-p "/:" "/" substring file-remote-p tramp-smb-get-localname "Cannot copy `%s' to `%s'" set-file-times file-attributes "done"] 34 (#$ . 25646)])
#@84 Like `delete-directory' for Tramp files.
(fn DIRECTORY &optional RECURSIVE TRASH)
(defalias 'tramp-smb-handle-delete-directory #[769 "\306\307!!\262\310!\205\362\203& \311\312\313\314\315\316!\317\"\320\321%\322\323#\"\210\324!\211\242 >\2047 \325\326\327D\"\210\211A@\242 >\204H \325\326\327D\"\210\3308\242 >\204Y \325\326\327D\"\210\3318\242 >\204k \325\326\327D\"\210\3208\242 >\204} \325\326\327D\"\210\3328\242 >\204\217 \325\326\327D\"\210\3338\242 >\204\243 \325\326\327 D\"\210\3348\335\"\210\336\337\340\341\f!\203\275 \342\202\276 \343\344
!#\"\204\341r\345!q\210eb\210\346\n\347\350#\210\351\352\353\354!D\347\211
\355Y\205\365\211\203\265\211\355\356\357\360! @\361\216@ @\362 \210)r@q\210\363 +C\3641\256
X\205\250\f\203E\331X\203E\365\366\354U\203+\367\202@\370U\2035\367\202@\330U\203?\371\202@\372P#\210
\320Y\205\250\354 \370U\203\202\3731}r\374!\203d\375!\202h\345\376\"q\210\356P\262\377\363 C\"\211\262)0\202\201\210\202\202\210\374!\203\220\201G \316\"\262)\242 >\205\250\365\201H \337\201I \"P$0\266\205\202\367\210\347\266\205\202\367Ar\201J \201K !q\210p\201L \210A\347\211BC\350\211D\350 E F\201M \210\201N \201O !\210+\211 @\362 \201P !\210)\266\202\262\210\211\204C\262\201Q \262\203\314\370\201Q \201R \211\201S N\365\201T #E!C\3641\307
X\205\301\f\203^\331X\203^\365\366\354U\203D\367\202Y\370U\203N\367\202Y\330U\203X\371\202Y\372P#\210
\320Y\205\301\354 \370U\203\233\3731\226r\374!\203}\375!\202\201\345\376\"q\210\356P\262\377\363 C\"\211\262)0\202\232\210\202\233\210\374!\203\251\201G \316\"\262)\242 >\205\301\365\201H \337\201I \"P$0\266\204\202\313\210\347\266\204\210\325\201U \365\201T #!C\"*\266)\310 !\205\360\351\201V
C\347\211
\355Y\205\211\203\305\211\355\356\357\360! @\361\216@ @\362 \210)r@q\210\363 +C\3641\276
X\205\270\f\203U\331X\203U\365\366\354U\203;\367\202P\370U\203E\367\202P\330U\203O\371\202P\372P#\210
\320Y\205\270\354 \370U\203\222\3731\215r\374!\203t\375!\202x\345\376\"q\210\356P\262\377\363 C\"\211\262)0\202\221\210\202\222\210\374!\203\240\201G \316\"\262)\242 >\205\270\365\201H \337\201I \"P$0\266\205\202\210\347\266\205\202Ar\201J \201K !q\210p\201L \210A\347\211BC\350\211D\350 E F\201M \210\201N \201O !\210+\211 @\362 \201P !\210)\266\202\262\210\211\204C\262\201Q \262\203\334\370\201Q \201R \211\201S N\365\201T #E!C\3641\327
X\205\321\f\203n\331X\203n\365\366\354U\203T\367\202i\370U\203^\367\202i\330U\203h\371\202i\372P#\210
\320Y\205\321\354 \370U\203\253\3731\246r\374!\203\215\375!\202\221\345\376\"q\210\356P\262\377\363 C\"\211\262)0\202\252\210\202\253\210\374!\203\271\201G \316\"\262)\242 >\205\321\365\201H \337\201I \"P$0\266\204\202\333\210\347\266\204\210\325\201U \365\201T #!C\"*\266\204\266\210\207" [directory-files-no-dot-files-regexp cl-struct-tramp-file-name-tags tramp-smb-errors signal-hook-function tramp-message-show-message tramp-verbose directory-file-name expand-file-name file-exists-p mapc make-byte-code 257 "\301!\203 \302\300\"\207\303!\207" vconcat vector [file-directory-p delete-directory delete-file] 4 "\n\n(fn FILE)" directory-files full tramp-dissect-file-name signal wrong-type-argument tramp-file-name 2 3 5 6 7 tramp-flush-directory-properties tramp-smb-send-command format "%s \"%s\"" tramp-smb-get-cifs-capabilities "posix_rmdir" "rmdir" tramp-smb-get-localname tramp-get-connection-buffer search-forward-regexp nil t file-error "%s `%s'" match-string 0 10 "\n%s" generate-new-buffer " *string-output*" #[0 "\301!\207" [standard-output kill-buffer] 2] backtrace buffer-string (error) apply message "" 1 "Warning: " "Tramp: " (error) processp process-buffer dont-create append standard-output default-directory buffer-read-only buffer-file-name buffer-undo-list inhibit-modification-hooks inhibit-read-only process-get tramp-debug-message "(%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 "`%s' not removed."] 26 (#$ . 35940)])
#@68 Like `delete-file' for Tramp files.
(fn FILENAME &optional TRASH)
(defalias 'tramp-smb-handle-delete-file #[513 "\306!\262\307!\205\252\310!\211\242>\204 \311\312\313D\"\210\211A@\242>\204- \311\312\313D\"\210\3148\242>\204> \311\312\313D\"\210\3158\242>\204P \311\312\313D\"\210\3168\242>\204b \311\312\313D\"\210\3178\242>\204t \311\312\313D\"\210\3208\242>\204\210 \311\312\313 D\"\210\3218\322\"\210\323\324\325\326\f!\203\242 \327\202\243 \330\331
!#\"?\205\250r\332!q\210eb\210\333 \334\335#\210\336\337\340\341!
D\334\211\f\342Y\205\302\211\203\221\211\342\343\344\345! \346\216
\347 \210)r
q\210\350 +C\3511\212\fX\205\204 \203'\315X\203'\352\353\341U\203
\354\202\"\355U\203\354\202\"\314U\203!\356\202\"\357P#\210\f\316Y\205\204\341 \355U\203d\3601_r\361!\203F\362!\202J\332\363\"q\210\343P\262\364\350 C\"\211\262)0\202c\210\202d\210\361!\203p\365\366\"\262)\242>\205\204\352\367\324\370\"P$0\266\205\202\304\210\334\266\205\202\304@r\371\372!q\210p\373 \210@\334\211AB\335\211C\335 D E\374 \210\375\376!\210+\211 \347 \377!\210)\266\202\262\210\211\204\322C\262\201F \262\203\223\355\201F \201G \211\201H N\352\201I #E!C\3511\216\fX\205\210 \203+\315X\203+\352\353\341U\203\354\202&\355U\203\354\202&\314U\203%\356\202&\357P#\210\f\316Y\205\210\341 \355U\203h\3601cr\361!\203J\362!\202N\332\363\"q\210\343P\262\364\350 C\"\211\262)0\202g\210\202h\210\361!\203t\365\366\"\262)\242>\205\210\352\367\324\370\"P$0\266\204\202\222\210\334\266\204\210\311\201J \352\201I #!C\"*\266\204)\266\210\207" [cl-struct-tramp-file-name-tags tramp-smb-errors signal-hook-function tramp-message-show-message tramp-verbose standard-output expand-file-name file-exists-p tramp-dissect-file-name signal wrong-type-argument tramp-file-name 2 3 4 5 6 7 tramp-flush-file-properties tramp-smb-send-command format "%s \"%s\"" tramp-smb-get-cifs-capabilities "posix_unlink" "rm" tramp-smb-get-localname tramp-get-connection-buffer search-forward-regexp nil t file-error "%s `%s'" match-string 0 10 "\n%s" generate-new-buffer " *string-output*" #[0 "\301!\207" [standard-output kill-buffer] 2] backtrace buffer-string (error) apply message "" 1 "Warning: " "Tramp: " (error) processp process-buffer dont-create append process-get vector tramp-debug-message "(%d) # " get-buffer-create "*debug tramp*" kill-all-local-variables erase-buffer run-hooks temp-buffer-setup-hook internal-temp-output-buffer-show default-directory buffer-read-only buffer-file-name buffer-undo-list inhibit-modification-hooks inhibit-read-only "%s" error-message-string error-message format-message substring-no-properties] 25 (#$ . 40288)])
#@91 Like `directory-files' for Tramp files.
(fn DIRECTORY &optional FULL MATCH NOSORT COUNT)
(defalias 'tramp-smb-handle-directory-files #[1281 "\306!\204\340\307!\310C\311\211 \312Y\205 \211\203\330 \211\312\313\314\315! \316\216\f \317 \210)r\fq\210\320 +C\3211\321 X\205\313 \n\203n \322X\203n \323\324\325U\203T \326\202i \327U\203^ \326\202i \330U\203h \331\202i \332P#\210 \333Y\205\313 \325\327U\203\253 \3341\246 r\335!\203\215 \336!\202\221 \337\340\"q\210\313P\262\341\320 C\"\211\262)0\202\252 \210\202\253 \210\335!\203\267 \342\343\"\262)\242
>\205\313 \323\344\345\346\"P$0\266\205\202 \210\311\266\205\202 @r\347\350!q\210p\351 \210@\311\211AB\352\211C\352 D E\353 \210\354\355!\210+\211 \317 \356!\210)\266\202\262\210\211\204C\262\357\262\203\320\327\357\360\211\361N\323\362 #E!C\3211\313 X\205\305\n\203h\322X\203h\323\324\325U\203N\326\202c\327U\203X\326\202c\330U\203b\331\202c\332P#\210 \333Y\205\305\325\327U\203\245\3341\240r\335!\203\207\336!\202\213\337\340\"q\210\313P\262\341\320 C\"\211\262)0\202\244\210\202\245\210\335!\203\261\342\343\"\262)\242
>\205\305\323\344\345\346\"P$0\266\204\202\317\210\311\266\204\210\363\364\323\362#!C\"*\266\365\366\367\326\"\"\203\370\311\365\371\372\373\374\343 !\375\"\376\377%\"\"\262\203 \365\371\372\201F \374\343 !\201G \"\201H \377%\"\262\204+\201I \201J \"\262\211\207" [tramp-file-missing signal-hook-function tramp-message-show-message tramp-verbose standard-output cl-struct-tramp-file-name-tags file-exists-p tramp-dissect-file-name "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) 3 apply message 0 "" 1 2 "Warning: " "Tramp: " 4 (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 signal substring-no-properties mapcar directory-file-name file-name-all-completions delete make-byte-code 257 "\300\302\303\304#)\266\203\205 \211\207" vconcat [inhibit-changing-match-data nil t string-match] 8 "\n\n(fn X)" default-directory buffer-read-only buffer-file-name buffer-undo-list inhibit-modification-hooks inhibit-read-only "\301\302\300#\207" [format "%s/%s"] 5 sort string-lessp] 20 (#$ . 43075)])
#@67 Like `expand-file-name' for Tramp files.
(fn NAME &optional DIR)
(defalias 'tramp-smb-handle-expand-file-name #[513 "\211\206 \206 \302\262G\303U\203 \304\262\305!\204\" \306!P\262\307!\204/ \310\311\312D\"\207\313!\211\242 >\204@ \314\315\316D\"\210\211A@\242 >\204Q \314\315\316D\"\210\3178\242 >\204b \314\315\316D\"\210\3208\242 >\204t \314\315\316D\"\210\3218\242 >\204\206 \314\315\316D\"\210\3228\242 >\204\230 \314\315\316D\"\210\3238\242 >\204\254 \314\315\316 D\"\210\3248\325\326\"\203\321 \327\330\331\"G\303U\203\307 \202\313 \330\331\"\312\211$\262\310\305C\"\204\336 \302P\262\332\310\311C\"\"\207" [default-directory cl-struct-tramp-file-name-tags "/" 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 "\\`/?~\\([^/]*\\)" replace-match match-string 1 tramp-make-tramp-file-name] 15 (#$ . 45677)])
#@54 Read ACL data from connection buffer.
(fn PROC VEC)
(defalias 'tramp-smb-action-get-acl #[514 "\304!?\205\371 \305!\204 r\306!q\210~\210\211\307\310\311 C\3121\270 X\205\262 \203U \313X\203U \314\315\316U\203; \317\202P \320U\203E \317\202P \321U\203O \322\202P \323P#\210\324Y\205\262 \316\320U\203\222 \3251\215 r\326!\203t \327!\202x \306\330\"q\210\310P\262\331\311 C\"\211\262)0\202\221 \210\202\222 \210\326!\203\236 \332\333\"\262)\242\n>\205\262 \314\334\335\336\"P$0\266\204\202\274 \210\337\266\204\210eb\210m\204\332 \340\341\342!)\262\204\332 \337y\210e`|\210\202\300 m\204\360 \343\341\342!)\262\203\360 \337y\210\202\332 `d|\210\344\345\346\")\207" [tramp-verbose tramp-message-show-message cl-struct-tramp-file-name-tags inhibit-changing-match-data process-live-p tramp-accept-process-output tramp-get-connection-buffer 10 "\n%s" buffer-string (error) 3 apply message 0 "" 1 2 "Warning: " "Tramp: " 4 (error) processp process-buffer dont-create append process-get vector tramp-debug-message format "(%d) # " nil "^REVISION:" t looking-at "^.+:.+" throw tramp-action ok] 12 (#$ . 46704)])
#@49 Like `file-acl' for Tramp files.
(fn FILENAME)
(defalias 'tramp-smb-handle-file-acl #[257 "\3061V\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|\322\323\324$\211\324=\203v\325 !\205j\326 !\327\330\331\332
!#\333\331R\334D\n\nG\335U\204\307 \336\337
D\"\262\202\316 \336\340C\"\262 \203\334 \336\341\fD\"\262\203\352 \336\342\nD\"\262 \203\366 \336\343 D\"\262\211\203
\336\344\345\346@\"D\"\262\211A\262\202\366 \336\347!\350D\"\262\351\335\352\353\354!\355\"\314$\216\356\357!r\211q\210\351\335\360\353\354!\361\"\313$\216\362\363\364p!#\210\362\365p#\210\366\367\370!\371! %\317\346\372!\373\374\375#\266\202C\3761\"\fX\205
\203\251\314X\203\251\366\377\335U\203\207\201A \202\244\201B U\203\225\201A \202\244\313U\203\241\201C \202\244\201D P#\210\f\315Y\205 \335 \201B U\203\364\201E 1\357r\201F !\203\320\201G !\202\326\371\201H \"q\210\201I P\262\336\201J C\"\211\262)0\202\363\210\202\364\210\201F !\203\201K \354\"\262)\242>\205 \366\201L \345\201M \"P$0\266\204\202(\210\201N \266\204\210\201O \354#\210\201O \201P \201Q #\210\201R \201N \"\210\201S \201N @$\210deV\205b\201T \201J !\262*\262)\266\204\262\201U \323$\210\211\262\202R\325 !\205R\326!\327\330\331\332\f!#\333\331R\334D\n G\335U\204\253\336\337\fD\"\262\202\262\336\340C\"\262\203\300\336\341 D\"\262\203\316\336\342 D\"\262 \203\332\336\343 D\"\262\211\203\361\336\344\345\346@\"D\"\262\211A\262\202\332\336\347!\350D\"\262\351\335\352\353\354!\201V \"\314$\216\356\357!r\211q\210\351\335\360\353\354!\201W \"\313$\216\362
\363\364p!#\210\362
\365p#\210\366\367\370!\371! %
\317\346\372!\373\374\375#\266\202C\3761\n\fX\205
\203\221\314X\203\221\366\377\335U\203o\201A \202\214\201B U\203}\201A \202\214\313U\203\211\201C \202\214\201D P#\210\f\315Y\205\335 \201B U\203\334\201E 1\327r\201F !\203\270\201G !\202\276\371\201H \"q\210\201I P\262\336\201J C\"\211\262)0\202\333\210\202\334\210\201F !\203\354\201K \354\"\262)\242>\205\366\201L \345\201M \"P$0\266\204\202\210\201N \266\204\210\201O \354#\210\201O \201P \201Q #\210\201R \201N \"\210\201S \201N @$\210deV\205J\201T \201J !\262*\262)\266\204\266\2100\207\210\201N \207" [cl-struct-tramp-file-name-tags tramp-smb-acl-program tramp-smb-options tramp-smb-conf tramp-verbose tramp-message-show-message (error) 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-acl" undef executable-find tramp-smb-get-share replace-regexp-in-string "\\\\" "/" tramp-smb-get-localname "//" "-E" 0 append "-U" "-N" "-W" "-p" "-s" "--option" format "%s" tramp-unquote-shell-quote-argument "2>/dev/null" make-byte-code "\301\300\302\"\210\301\300\303\"\207" vconcat vector [tramp-flush-connection-property #1="process-name" #2="process-buffer"] generate-new-buffer " *temp*" "\301\300!\205 \302\300!\207" [buffer-name kill-buffer] tramp-set-connection-property "process-name" buffer-name "process-buffer" apply start-process tramp-get-connection-name tramp-get-connection-buffer process-command " " mapconcat identity (error) message tramp-smb-actions-get-acl "" 1 "Warning: " "Tramp: " (error) processp process-buffer dont-create "\n%s" buffer-string process-get tramp-debug-message "(%d) # " nil process-put adjust-window-size-function ignore set-process-query-on-exit-flag tramp-process-actions substring-no-properties tramp-set-file-property [tramp-flush-connection-property #1# #2#] [buffer-name kill-buffer]] 26 (#$ . 47852)])
#@76 Like `file-attributes' for Tramp files.
(fn FILENAME &optional ID-FORMAT)
(defalias 'tramp-smb-handle-file-attributes #[513 "\211\204 \303\262\3041\227\305!\211\242>\204 \306\307\310D\"\210\211A@\242>\204- \306\307\310D\"\210\3118\242>\204> \306\307\310D\"\210\3128\242>\204P \306\307\310D\"\210\3138\242>\204b \306\307\310D\"\210\3148\242>\204t \306\307\310D\"\210\3158\242>\204\210 \306\307\310 D\"\210\3168\317!\203%\320\321\322
\"\323$\211\323=\203 \324 !\203\263 \325 \"\202\326\327\f!!\330\331
!\" \332=\203\313 \333\202\314 \334\f\332=\203\327 \335\202\330 \334\336
!\337!\205\340A@\341\342\343#)\266\203\205\367 \342\334\n\312\n8\n\311\f8\fA@\341 \257\f\266\206\262\344 \321\322\"$\210\211\262\202\223\324!\2035\325\n\"\202\223\326\327 !!\330\331\f!\"\n\332=\203M\333\202N\334 \332=\203Y\335\202Z\334\336\f!\337
!\205\221\340A@\341\342\343#)\266\203\205y\342\334\n\312\n8\n\311\f8\fA@\341 \257\f\266\206\266\2100\207\210\341\207" [cl-struct-tramp-file-name-tags inhibit-changing-match-data tramp-time-dont-know integer (error) 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 format "file-attributes-%s" undef tramp-smb-get-stat-capability tramp-smb-do-file-attributes-with-stat tramp-smb-get-file-entries file-name-directory assoc file-name-nondirectory string "nobody" -1 "nogroup" tramp-get-inode tramp-get-device "d" nil t string-match tramp-set-file-property] 29 (#$ . 51780)])
#@97 Implement `file-attributes' for Tramp files using `stat' command.
(fn VEC &optional ID-FORMAT)
(defalias 'tramp-smb-do-file-attributes-with-stat #[513 "\304\305\242>\204 \306\307\310D\"\210\3118C\3121\263 X\205\255 \n\203P \313X\203P \314\315\316U\2036 \317\202K \320U\203@ \317\202K \321U\203J \322\202K \323P#\210 \324Y\205\255 \316\320U\203\215 \3251\210 r\326!\203o \327!\202s \330\331\"q\210\332P\262\333\334 C\"\211\262)0\202\214 \210\202\215 \210\326!\203\231 \335\336\"\262)\242>\205\255 \314\337\340\341\"P$0\266\204\202\267 \210\342\266\204\210\342\211\211\211\211\211\211\211\211\211\343\f\340\344\345!\"\"\205Lr\330\f!q\210eb\210\346 \342\347#?\205Km\204\342\350\351!\203\352\353\320!!\262\n\353\321!\354\230\203 \347\202 \353\321!\355\230\205 \317\262 \202\334\350\356!\203%\352\353\320!!\262\352\353\321!!\262\202\334\350\357!\203[\353\320!\262\n\360=\203=\353\321!\202B\352\353\321!!\262\n\360=\203Q\353\313!\202V\352\353\313!!\262\202\334\350\361!\203\207\362\352\353\311!!\352\353\304!!\352\353\324!!\352\353\313!!\352\353\321!!\352\353\320!!&\262\202\334\350\363!\203\263\362\352\353\311!!\352\353\304!!\352\353\324!!\352\353\313!!\352\353\321!!\352\353\320!!&\262\202\334\350\364!\203\334\362\352\353\311!!\352\353\304!!\352\353\324!!\352\353\313!!\352\353\321!!\352\353\320!!&\262\342y\210\202\343 ;\203\343\f\340\365\345!\"\"\203eb\210\350\366!\203\353\320!\262 \2040\2040\2040\2040\2040\2040\2040 \2040\2040\211\205K \342\n\367!\257\f)\207" [cl-struct-tramp-file-name-tags tramp-verbose tramp-message-show-message tramp-smb-errors 5 "file attributes with stat: %s" signal wrong-type-argument tramp-file-name 6 (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 tramp-smb-send-command "stat \"%s\"" tramp-smb-get-localname re-search-forward t looking-at "Size:\\s-+\\([0-9]+\\)\\s-+Blocks:\\s-+[0-9]+\\s-+\\(\\w+\\)" string-to-number match-string "directory" "symbolic" "Inode:\\s-+\\([0-9]+\\)\\s-+Links:\\s-+\\([0-9]+\\)" "Access:\\s-+([0-9]+/\\(\\S-+\\))\\s-+Uid:\\s-+\\([0-9]+\\)\\s-+Gid:\\s-+\\([0-9]+\\)" string "Access:\\s-+\\([0-9]+\\)-\\([0-9]+\\)-\\([0-9]+\\)\\s-+\\([0-9]+\\):\\([0-9]+\\):\\([0-9]+\\)" encode-time "Modify:\\s-+\\([0-9]+\\)-\\([0-9]+\\)-\\([0-9]+\\)\\s-+\\([0-9]+\\):\\([0-9]+\\):\\([0-9]+\\)" "Change:\\s-+\\([0-9]+\\)-\\([0-9]+\\)-\\([0-9]+\\)\\s-+\\([0-9]+\\):\\([0-9]+\\):\\([0-9]+\\)" "readlink \"%s\"" ".+ -> \\(.+\\)" tramp-get-device] 25 (#$ . 53369)])
#@56 Like `file-local-copy' for Tramp files.
(fn FILENAME)
(defalias 'tramp-smb-handle-file-local-copy #[257 "\306\307!!\211\242>\204 \310\311\312D\"\210\211A@\242>\204$ \310\311\312D\"\210\3138\242>\2045 \310\311\312D\"\210\3148\242>\204G \310\311\312D\"\210\3158\242>\204Y \310\311\312D\"\210\3168\242>\204k \310\311\312D\"\210\3178\242>\204 \310\311\312 D\"\210\3208\321\307\n!!\204e \322 C\323\211\f\324Y\205\216\211\203]\211\324\325\326\327! \330\216
\331 \210)r
q\210\332 +C\3331V\fX\205P \203\363 \314X\203\363 \334\335\336U\203\331 \337\202\356 \340U\203\343 \337\202\356 \313U\203\355 \341\202\356 \342P#\210\f\315Y\205P\336 \340U\2030\3431+r\344!\203\345!\202\346\347\"q\210\325P\262\350\332 C\"\211\262)0\202/\210\2020\210\344!\203<\351\352\"\262)\242>\205P\334\353\354\355\"P$0\266\205\202\220\210\323\266\205\202\220@r\356\357!q\210p\360 \210@\323\211AB\361\211C\361 D E\362 \210\363\364!\210+\211 \331 \365!\210)\266\202\262\210\211\204\234C\262\366\262\203U\340\366\367\211\370N\334\371 #E!C\3331P\fX\205J \203\355\314X\203\355\334\335\336U\203\323\337\202\350\340U\203\335\337\202\350\313U\203\347\341\202\350\342P#\210\f\315Y\205J\336 \340U\203*\3431%r\344!\203\f\345!\202\346\347\"q\210\325P\262\350\332 C\"\211\262)0\202)\210\202*\210\344!\2036\351\352\"\262)\242>\205J\334\353\354\355\"P$0\266\204\202T\210\323\266\204\210\310\372\334\371#!C\"*\266\323\211 F\373\374J\375\376\377N@!\"\201G \361\"\201H #)\266\204\314\201I \354\201J #C\201K 16\fX\2050 \203\321\314X\203\321\334\335\336U\203\267\337\202\314\340U\203\301\337\202\314\313U\203\313\341\202\314\342P#\210\f\315Y\2050\336 \340U\203\201L 1 r\344!\203\362\345!\202\366\346\347\"q\210\325P\262\350\332 C\"\211\262)0\202\210\202\210\344!\203 \351\352\"\262)\242>\2050\334\353\354\355\"P$0\266\204\202:\210\323\266\204\210\201M C \205k\314\f\314^X\205k\201N \354\201J
#\323\211#\211\205i\201O \314\201P \201Q $\262\201R \336\201S \201T \352 %\201U \"\324$\216\201V \354\201W \201X !#\"\204\201\201Y !\210\n\201Z \201[ C\323\211\f\324Y\205\252\211\203y\211\324\325\326\327! \330\216
\331 \210)r
q\210\332 +C\3331r\fX\205l \203\314X\203\334\335\336U\203\365\337\202\n\340U\203\377\337\202\n\313U\203 \341\202\n\342P#\210\f\315Y\205l\336 \340U\203L\3431Gr\344!\203.\345!\2022\346\347\"q\210\325P\262\350\332 C\"\211\262)0\202K\210\202L\210\344!\203X\351\352\"\262)\242>\205l\334\353\354\355\"P$0\266\205\202\254\210\323\266\205\202\254@r\356\357!q\210p\360 \210@\323\211AB\361\211C\361 D E\362 \210\363\364!\210+\211 \331 \365!\210)\266\202\262\210\211\204\270C\262\366\262\203q\340\366\367\211\370N\334\371 #E!C\3331l\fX\205f \203 \314X\203 \334\335\336U\203\357\337\202\340U\203\371\337\202\313U\203\341\202\342P#\210\f\315Y\205f\336 \340U\203F\3431Ar\344!\203(\345!\202,\346\347\"q\210\325P\262\350\332 C\"\211\262)0\202E\210\202F\210\344!\203R\351\352\"\262)\242>\205f\334\353\354\355\"P$0\266\204\202p\210\323\266\204\210\310\372\334\371#!C\"*\266\201\\ \240\210)\266\211\262\207" [cl-struct-tramp-file-name-tags tramp-file-missing signal-hook-function tramp-message-show-message tramp-verbose standard-output tramp-dissect-file-name file-truename signal wrong-type-argument tramp-file-name 2 3 4 5 6 7 file-exists-p "Cannot make local copy of non-existing file `%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 #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 "*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 expand-file-name tramp-temp-name-prefix eval temporary-file-directory standard-value default-directory buffer-read-only buffer-file-name buffer-undo-list inhibit-modification-hooks inhibit-read-only file-name-handler-alist file-name-extension make-temp-file "%s..." #1="Fetching %s to tmp file %s" #2=(error) #4=(error) "failed" make-progress-reporter run-at-time 0.1 tramp-progress-reporter-update make-byte-code "\304\203 \306\304!\210\301\307\310\311\312\300\302#\303\242D\3131\256
X\205\254 \"\203N \307X\203N \314\315\316U\2034 \317\202I \320U\203> \317\202I \321U\203H \322\202I \323P#\210
\324Y\205\254 \316 \320U\203\213 \3251\206 r\326!\203m \327!\202q \330\331\"q\210\332P\262\333\334 C\"\211\262)0\202\212 \210\202\213 \210\326!\203\227 \335\336\"\262)\242#>\205\254 \314\337\311\340\"P$0\207\210\341\207" vconcat [tramp-verbose cancel-timer 3 "%s...%s" format #1# #2# apply message 0 #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-message-show-message cl-struct-tramp-file-name-tags] tramp-smb-send-command "get \"%s\" \"%s\"" tramp-smb-get-localname delete-file file-error "Cannot make local copy of file `%s'" "done"] 27 (#$ . 56078)])
#@76 Like `file-name-all-completions' for Tramp files.
(fn FILENAME DIRECTORY)
(defalias 'tramp-smb-handle-file-name-all-completions #[514 "\301\302\303!!\211\242>\204 \304\305\306D\"\210\211A@\242>\204& \304\305\306D\"\210\3078\242>\2047 \304\305\306D\"\210\3108\242>\204I \304\305\306D\"\210\3118\242>\204[ \304\305\306D\"\210\3128\242>\204m \304\305\306D\"\210\3138\242>\204\201 \304\305\306 D\"\210\3148\315!\203\261 \316\317\320$\211\320=\203\253 \321\322\323\324!\"!\262\325 \317$\210\211\262\202\272 \321\322\326\324!\"!\266\210\"\207" [cl-struct-tramp-file-name-tags 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 delete-dups mapcar #[257 "\301A@\302\303\304#)\266\203\203 \305@!\202 \211@C\207" [inhibit-changing-match-data #1="d" nil t string-match file-name-as-directory] 8 "\n\n(fn X)"] tramp-smb-get-file-entries tramp-set-file-property #[257 "\301A@\302\303\304#)\266\203\203 \305@!\202 \211@C\207" [inhibit-changing-match-data #1# nil t string-match file-name-as-directory] 8 "\n\n(fn X)"]] 18 (#$ . 61556)])
#@57 Like `file-system-info' for Tramp files.
(fn FILENAME)
(defalias 'tramp-smb-handle-file-system-info #[257 "\3031\247\304!\204 \305!\262\306\307!!\211\242>\204\" \310\311\312D\"\210\211A@\242>\2043 \310\311\312D\"\210\3138\242>\204D \310\311\312D\"\210\3148\242>\204V \310\311\312D\"\210\3158\242>\204h \310\311\312D\"\210\3168\242>\204z \310\311\312D\"\210\3178\242>\204\216 \310\311\312 D\"\210\3208\321!\205\243\316\322C\3231< X\2056\n\203\331 \314X\203\331 \324\325\326U\203\277 \327\202\324 \330U\203\311 \327\202\324 \313U\203\323 \331\202\324 \332P#\210 \315Y\2056\326\330U\203\3331r\334!\203\370 \335!\202\374 \336\337\"q\210\340P\262\341\342 C\"\211\262)0\202\210\202\210\334!\203\"\343\344\"\262)\242>\2056\324\345\346\347\"P$0\266\204\202@\210\350\266\204\210\351\346\352\353\f!\"\"\210r\336!q\210\350\211\211eb\210\350y\210\354\355!\203|\356\357\313!!\262\211\356\357\330!!_\262\211\356\357\314!!_\262\350y\210\354\360!\203\222\361 \362\356\357\330!!$\210\205\240\205\240\211ZE\266\203)\266\2100\207\210\350\207" [cl-struct-tramp-file-name-tags tramp-verbose tramp-message-show-message (error) file-directory-p file-name-directory tramp-dissect-file-name expand-file-name signal wrong-type-argument tramp-file-name 2 3 4 5 6 7 tramp-smb-get-share "file system info: %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) # " nil tramp-smb-send-command "du %s/*" tramp-smb-get-localname looking-at "[[:space:]]*\\([[:digit:]]+\\) blocks of size \\([[:digit:]]+\\)\\. \\([[:digit:]]+\\) blocks available" string-to-number match-string "Total number of bytes: \\([[:digit:]]+\\)" tramp-set-file-property "used-bytes"] 19 (#$ . 62790)])
#@56 Like `file-writable-p' for Tramp files.
(fn FILENAME)
(defalias 'tramp-smb-handle-file-writable-p #[257 "\301!\203 \302\303!\3048\262\206 \305\306\307\310#)\207\311!\301!\205) \312!\207" [inhibit-changing-match-data file-exists-p "w" file-attributes 8 "" nil t string-match file-name-directory file-writable-p] 8 (#$ . 64697)])
#@102 Like `insert-directory' for Tramp files.
(fn FILENAME SWITCHES &optional WILDCARD FULL-DIRECTORY-P)
(defalias 'tramp-smb-handle-insert-directory #[1026 "CC\211\304\242!\240\210\242\204 \305\240\210\306\242!\203& \204& \211\242\307P\240\210\2034 \211\310\242!\240\210\202; \211\311\242!\240\210\204E \312\242\313\"\210\314\242!\211\242>\204W \315\316\317D\"\210\211A@\242>\204h \315\316\317D\"\210\3208\242>\204y \315\316\317D\"\210\3218\242>\204\213 \315\316\317D\"\210\3228\242>\204\235 \315\316\317D\"\210\3238\242>\204\257 \315\316\317D\"\210\3248\242>\204\303 \315\316\317 D\"\210\3258\326\327\330\331
\242\"C\3321o X\205i\n\203\f\321X\203\f\333\334\326U\203\362 \305\202\335U\203\374 \305\202\320U\203\336\202\337P#\210 \322Y\205i\326\335U\203I\3401Dr\341!\203+\342!\202/\343\344\"q\210\345P\262\346\347 C\"\211\262)0\202H\210\202I\210\341!\203U\350\351\"\262)\242>\205i\333\352\330\353\"P$0\266\204\202s\210\354\266\204\210\355C\n\205\230\326 \321^X\205\230\356\330\331\f\242\"\354\211#\211\205\226\357\321\360\361$\262\362\326\363\364\351$\365\"\366$\216\367 \362\326\370\364\351!\371\"\321$\216\372\f\242!C\373\374\375\242!!!\376\242!\330\377\201@ \201A \326$\201B \245\"\2030\201C \201D \242\"\210\201E \201F \354\211\242$\240\210\201C \201G \242\"\210\201E \201H \354\211\242$\240\210\201C \201I \242\"\210\201E \201J \354\211\242$\240\210\201K \354\204A\242G\326U\203a\201L \362\201M \201N \364\351 !\201O \"\201P \201Q %\"\202k\201R \242\"C\"\262\201S \362\201T \201U \364\351!\201V \"\201W \201X %\"\262\307\242\354\201Y \201C #)\266\203\203\253\201Z \201[ \"\210\203\306\203\276\330\201\\ #\202\304\330\201] \"c\210\201Z \362\201M \201^ \364\351$\201_ \"\201` \201Q %\"\266\204)\262\201a \240\210)\266\202\266\210\207" [cl-struct-tramp-file-name-tags tramp-verbose tramp-message-show-message inhibit-changing-match-data expand-file-name #3="" tramp-compat-directory-name-p "F" file-name-as-directory directory-file-name access-file "Reading directory" tramp-dissect-file-name signal wrong-type-argument tramp-file-name 2 3 4 5 6 7 0 "%s..." format #1="Opening directory %s" #2=(error) apply message 1 #4="Warning: " #5="Tramp: " #6=(error) processp process-buffer tramp-get-connection-buffer dont-create #7="\n%s" append buffer-string process-get vector tramp-debug-message #8="(%d) # " nil "failed" make-progress-reporter run-at-time 0.1 tramp-progress-reporter-update make-byte-code "\303\203 \306\303!\210\301\307\310\311\312\300\242\"\302\242D\3131\255 \fX\205\253
\203M \314X\203M \315\316\307U\2033 \317\202H \320U\203= \317\202H \321U\203G \322\202H \323P#\210\f\324Y\205\253 \307 \320U\203\212 \3251\205 r\326!\203l \327!\202p \330\331\"q\210\332P\262\333\334 C\"\211\262)0\202\211 \210\202\212 \210\326!\203\226 \335\336\"\262)\242\">\205\253 \315\337\311\340\"P$0\207\210\341\207" vconcat [tramp-verbose tramp-message-show-message cancel-timer 0 "%s...%s" format #1# #2# 3 apply message #3# 1 2 #4# #5# 4 #6# processp process-buffer tramp-get-connection-buffer dont-create #7# append buffer-string process-get vector tramp-debug-message #8# nil cl-struct-tramp-file-name-tags] 10 match-data "\301\300\302\"\207" [set-match-data evaporate] file-name-nondirectory copy-tree tramp-smb-get-file-entries file-name-directory get-free-disk-space "%.0f" tramp-get-file-property "used-bytes" 1024 string-match "\\." replace-match "\\\\." "\\*" ".*" "\\?" ".?" delq mapcar 257 "\302\303\300\242\"@\304\305\306#)\266\203\205 \211\207" [inhibit-changing-match-data format "^%s" nil t string-match] 8 "\n\n(fn X)" assoc sort 514 "\302\300\242\303\304\305#)\266\203\203 \306\3078\3078\"\207@@\231\207" [inhibit-changing-match-data "t" nil t string-match time-less-p 3] 9 "\n\n(fn X Y)" t mapc #[257 "\211@G\300U?\205, \301\302\303A@!\"\203 \211@\304P\240\207\301\305\303A@!\"\205, \211@\306P\240\207" [0 char-equal 100 string-to-char "/" 120 "*"] 5 "\n\n(fn X)"] "total used in directory %s available %s\n" "total %s\n" "\211@G\305U?\205\331 \306\303!\205$ \3071\" \310\311@\312\300\242!\"\313\"0\202$ \210\314\315\301\242\314\316 \317#)\266\203\203\214 \320\321\3228\262\206C A@\211A@\262\206M \323\3248\262\206W \325\3268\262\206a \327\3308\262\206o \3248\331\332\333\326\f8!\334\335!\"\203\202 \336\202\203 \337\326 8\"&c\210`\320\340\341\311@\312\300\242!\"\302\205\241 \312\300\242!\"\"c\210\342`\343\316$\266\315\301\242\314\316 \317#)\266\203\203\320 \211\211@\262;\203\320 \344\211@\262\261\210\210\345c\210\314y\210\346 \207" [inhibit-changing-match-data 0 tramp-smb-get-stat-capability (error) file-attributes expand-file-name file-name-directory string nil "l" t string-match format "%10s %3d %-8s %-8s %8s %s " 8 1 2 "nobody" 3 "nogroup" 7 format-time-string time-less-p time-since days-to-time 183 "%b %e %R" "%b %e %Y" "%s" file-relative-name put-text-property dired-filename " -> " "\n" beginning-of-line] 14 "done"] 31 (#$ . 65046)])
#@68 Like `make-directory' for Tramp files.
(fn DIR &optional PARENTS)
(defalias 'tramp-smb-handle-make-directory #[513 "\306\307!!\262\310!\204 \307\"\262\311!\211\242 >\204$ \312\313\314D\"\210\211A@\242 >\2045 \312\313\314D\"\210\3158\242 >\204F \312\313\314D\"\210\3168\242 >\204X \312\313\314D\"\210\3178\242 >\204j \312\313\314D\"\210\3208\242 >\204| \312\313\314D\"\210\3218\242 >\204\220 \312\313\314 D\"\210\3228\204w\323\n!\203w\324\325\fC\326\211\f\327Y\205\240\211\203q\211\327\330\331\332! \333\216
\334 \210)r
q\210\335 +C\3361j\fX\205d \203\316X\203\337\340\341U\203\355 \342\202\343U\203\367 \342\202\315U\203\344\202\345P#\210\f\317Y\205d\341 \343U\203D\3461?r\347!\203&\350!\202*\351\352\"q\210\330P\262\353\335 C\"\211\262)0\202C\210\202D\210\347!\203P\354\355\"\262)\242 >\205d\337\356\357\360\"P$0\266\205\202\242\210\326\266\205\202\242r\361\362!q\210p\363 \210\326\211@A\364\211B\364 C D\365 \210\366\367!\210+\211 \334 \370!\210)\266\202\262\210\211\204\256C\262\371\262\203g\343\371\372\211\373N\337\374 #E!C\3361b\fX\205\\ \203\377\316X\203\377\337\340\341U\203\345\342\202\372\343U\203\357\342\202\372\315U\203\371\344\202\372\345P#\210\f\317Y\205\\\341 \343U\203<\34617r\347!\203 \350!\202\"\351\352\"q\210\330P\262\353\335 C\"\211\262)0\202;\210\202<\210\347!\203H\354\355\"\262)\242 >\205\\\337\356\357\360\"P$0\266\204\202f\210\326\266\204\210\312\375\337\374#!C\"*\266\376\n! \203\227\377 !\203\227\201E !\204\227\201F \"\210\201E !\203\246\201G !\210\201E !?\205\213\201H \201I
C\326\211\f\327Y\205\264\211\203\205\211\327\330\331\332! \333\216
\334 \210)r
q\210\335 +C\3361~\fX\205x \203\316X\203\337\340\341U\203\342\202\343U\203 \342\202\315U\203\344\202\345P#\210\f\317Y\205x\341 \343U\203X\3461Sr\347!\203:\350!\202>\351\352\"q\210\330P\262\353\335 C\"\211\262)0\202W\210\202X\210\347!\203d\354\355\"\262)\242 >\205x\337\356\357\360\"P$0\266\205\202\266\210\326\266\205\202\266r\361\362!q\210p\363 \210\326\211@A\364\211B\364 C D\365 \210\366\367!\210+\211 \334 \370!\210)\266\202\262\210\211\204\302C\262\371\262\203{\343\371\372\211\373N\337\374 #E!C\3361v\fX\205p \203\316X\203\337\340\341U\203\371\342\202\343U\203\342\202\315U\203
\344\202\345P#\210\f\317Y\205p\341 \343U\203P\3461Kr\347!\2032\350!\2026\351\352\"q\210\330P\262\353\335 C\"\211\262)0\202O\210\202P\210\347!\203\\\354\355\"\262)\242 >\205p\337\356\357\360\"P$0\266\204\202z\210\326\266\204\210\312\375\337\374#!C\"*\266\204\262\207" [default-directory cl-struct-tramp-file-name-tags signal-hook-function tramp-message-show-message tramp-verbose standard-output directory-file-name expand-file-name file-name-absolute-p 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 file-name-directory tramp-smb-get-share buffer-read-only buffer-file-name buffer-undo-list inhibit-modification-hooks inhibit-read-only file-directory-p make-directory make-directory-internal file-error "Couldn't make directory %s"] 26 (#$ . 70179)])
#@65 Like `make-directory-internal' for Tramp files.
(fn DIRECTORY)
(defalias 'tramp-smb-handle-make-directory-internal #[257 "\306\307!!\262\310!\204 \307\"\262\311!\211\242 >\204$ \312\313\314D\"\210\211A@\242 >\2045 \312\313\314D\"\210\3158\242 >\204F \312\313\314D\"\210\3168\242 >\204X \312\313\314D\"\210\3178\242 >\204j \312\313\314D\"\210\3208\242 >\204| \312\313\314D\"\210\3218\242 >\204\220 \312\313\314 D\"\210\3228\323!\324\325 !!\203\300 \326 \327 !\203\264 \330\331\332 #\202\270 \330\333\"\"\210\334 \"\210\324\n!?\205\257\335\336\fC\337\211\f\340Y\205\312\211\203\231\211\340\341\342\343! \344\216
\345 \210)r
q\210\346 +C\3471\222\fX\205\214 \203/\316X\203/\350\351\352U\203\353\202*\354U\203 \353\202*\315U\203)\355\202*\356P#\210\f\317Y\205\214\352 \354U\203l\3571gr\360!\203N\361!\202R\362\363\"q\210\341P\262\364\346 C\"\211\262)0\202k\210\202l\210\360!\203x\365\366\"\262)\242 >\205\214\350\367\330\370\"P$0\266\205\202\314\210\337\266\205\202\314r\371\372!q\210p\373 \210\337\211@A\374\211B\374 C D\375 \210\376\377!\210+\211 \345 \201E !\210)\266\202\262\210\211\204\332C\262\201F \262\203\233\354\201F \201G \211\201H N\350\201I #E!C\3471\226\fX\205\220 \2033\316X\2033\350\351\352U\203\353\202.\354U\203#\353\202.\315U\203-\355\202.\356P#\210\f\317Y\205\220\352 \354U\203p\3571kr\360!\203R\361!\202V\362\363\"q\210\341P\262\364\346 C\"\211\262)0\202o\210\202p\210\360!\203|\365\366\"\262)\242 >\205\220\350\367\330\370\"P$0\266\204\202\232\210\337\266\204\210\312\201J \350\201I #!C\"*\266\204\262\207" [default-directory cl-struct-tramp-file-name-tags signal-hook-function tramp-message-show-message tramp-verbose standard-output directory-file-name expand-file-name file-name-absolute-p tramp-dissect-file-name signal wrong-type-argument tramp-file-name 2 3 4 5 6 7 tramp-smb-get-localname file-directory-p file-name-directory tramp-smb-send-command tramp-smb-get-cifs-capabilities format "posix_mkdir \"%s\" %o" default-file-modes "mkdir \"%s\"" tramp-flush-file-properties file-error "Couldn't make directory %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 "(%d) # " get-buffer-create "*debug tramp*" kill-all-local-variables t erase-buffer run-hooks temp-buffer-setup-hook buffer-read-only buffer-file-name buffer-undo-list inhibit-modification-hooks inhibit-read-only internal-temp-output-buffer-show "%s" error-message-string error-message format-message substring-no-properties] 25 (#$ . 74055)])
#@273 Like `make-symbolic-link' for Tramp files.
If TARGET is a non-Tramp file, it is used verbatim as the target
of the symlink. If TARGET is a Tramp file, only the localname
component is used as the target of the symlink.
(fn TARGET LINKNAME &optional OK-IF-ALREADY-EXISTS)
(defalias 'tramp-smb-handle-make-symbolic-link #[770 "\306\307!!\204 \310\311E\"\207\312!\211\242>\204! \313\314\315D\"\210\211A@\242>\2042 \313\314\315D\"\210\3168\242>\204C \313\314\315D\"\210\3178\242>\204U \313\314\315D\"\210\3208\242>\204g \313\314\315D\"\210\3218\242>\204y \313\314\315D\"\210\3228\242>\204\215 \313\314\315 D\"\210\3238\324\306 !\203\255 \325\312
!\"\203\255 \326\307\f!!\262 )\306 !\203\354 \311 \327\211?\205\277 \n\211?\205\310 \n\330\331\332!\")\266\202\203\331 \202\341 \333!\331\332!Q)\266\202 #\202L\334\n!\203\377\203\247\203\370\335\336\337\"!\204\370\340\341\211\211
\342Y\205\211\203\332\211\342\343\344\345! @\346\216@ @\347 \210)r@q\210\350 +C\3511\323
X\205\315\f\203p\317X\203p\352\353\354U\203V\355\202k\356U\203`\355\202k\316U\203j\357\202k\360P#\210
\320Y\205\315\354 \356U\203\255\3611\250r\362!\203\217\363!\202\223\364\365\"q\210\343P\262\366\350 C\"\211\262)0\202\254\210\202\255\210\362!\203\271\367\370\"\262)\242>\205\315\352\371\336\372\"P$0\266\205\202\210\341\266\205\202Ar\373\374!q\210p\375 \210A\341\211BC\324\211D\324 E F\376 \210\377\201G !\210+\211 @\347 \201H !\210)\266\202\262\210\211\204 C\262\201I \262\203\341\356\201I \201J \211\201K N\352\201L #E!C\3511\334
X\205\326\f\203y\317X\203y\352\353\354U\203_\355\202t\356U\203i\355\202t\316U\203s\357\202t\360P#\210
\320Y\205\326\354 \356U\203\266\3611\261r\362!\203\230\363!\202\234\364\365\"q\210\343P\262\366\350 C\"\211\262)0\202\265\210\202\266\210\362!\203\302\367\370\"\262)\242>\205\326\352\371\336\372\"P$0\266\204\202\340\210\341\266\204\210\313\201M \352\201L #!C\"*\266\202\377\201N \n!\210\201O !\204\372\201P \201Q \341\211\211
\342Y\205\211\203\337\211\342\343\344\345! @\346\216@ @\347 \210)r@q\210\350 +C\3511\330
X\205\322\f\203u\317X\203u\352\353\354U\203[\355\202p\356U\203e\355\202p\316U\203o\357\202p\360P#\210
\320Y\205\322\354 \356U\203\262\3611\255r\362!\203\224\363!\202\230\364\365\"q\210\343P\262\366\350 C\"\211\262)0\202\261\210\202\262\210\362!\203\276\367\370\"\262)\242>\205\322\352\371\336\372\"P$0\266\205\202\210\341\266\205\202Ar\373\374!q\210p\375 \210A\341\211BC\324\211D\324 E F\376 \210\377\201G !\210+\211 @\347 \201H !\210)\266\202\262\210\211\204%C\262\201I \262\203\346\356\201I \201J \211\201K N\352\201L #E!C\3511\341
X\205\333\f\203~\317X\203~\352\353\354U\203d\355\202y\356U\203n\355\202y\316U\203x\357\202y\360P#\210
\320Y\205\333\354 \356U\203\273\3611\266r\362!\203\235\363!\202\241\364\365\"q\210\343P\262\366\350 C\"\211\262)0\202\272\210\202\273\210\362!\203\307\367\370\"\262)\242>\205\333\352\371\336\372\"P$0\266\204\202\345\210\341\266\204\210\313\201M \352\201L #!C\"*\266\201R \"\210\201S \336\201T \341\211?\205\n\332!\211\211?\205 \n\330\331\332!\")\266\202\203B\211G\316U\203:\201U \202@\201V \316\"\262\333!P)\266\203\201W
!#\"?\205L\201P \201X \364 !C\341\211
\342Y\205g\211\2031\211\342\343\344\345! @\346\216@ @\347 \210)r@q\210\350 +C\3511*
X\205$\f\203\307\317X\203\307\352\353\354U\203\255\355\202\302\356U\203\267\355\202\302\316U\203\301\357\202\302\360P#\210
\320Y\205$\354 \356U\203\3611\377r\362!\203\346\363!\202\352\364\365\"q\210\343P\262\366\350 C\"\211\262)0\202\210\202\210\362!\203\367\370\"\262)\242>\205$\352\371\336\372\"P$0\266\205\202i\210\341\266\205\202iAr\373\374!q\210p\375 \210A\341\211BC\324\211D\324 E F\376 \210\377\201G !\210+\211 @\347 \201H !\210)\266\202\262\210\211\204wC\262\201I \262\2038\356\201I \201J \211\201K N\352\201L #E!C\35113
X\205-\f\203\320\317X\203\320\352\353\354U\203\266\355\202\313\356U\203\300\355\202\313\316U\203\312\357\202\313\360P#\210
\320Y\205-\354 \356U\203
\3611r\362!\203\357\363!\202\363\364\365\"q\210\343P\262\366\350 C\"\211\262)0\202\f\210\202
\210\362!\203\367\370\"\262)\242>\205-\352\371\336\372\"P$0\266\204\2027\210\341\266\204\210\313\201M \352\201L #!C\"*\266\204\207" [cl-struct-tramp-file-name-tags non-essential file-name-handler-alist signal-hook-function tramp-message-show-message tramp-verbose tramp-tramp-file-p expand-file-name tramp-run-real-handler make-symbolic-link tramp-dissect-file-name signal wrong-type-argument tramp-file-name 2 3 4 5 6 7 t tramp-file-name-equal-p tramp-file-local-name top string-prefix-p "/:" file-local-name file-remote-p file-exists-p yes-or-no-p format "File %s already exists; make it a link anyway? " file-already-exists 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 "(%d) # " get-buffer-create "*debug tramp*" kill-all-local-variables erase-buffer run-hooks standard-output default-directory buffer-read-only buffer-file-name buffer-undo-list inhibit-modification-hooks inhibit-read-only temp-buffer-setup-hook internal-temp-output-buffer-show "%s" error-message-string error-message format-message substring-no-properties delete-file tramp-smb-get-cifs-capabilities file-error "make-symbolic-link not supported" tramp-flush-file-properties tramp-smb-send-command "symlink \"%s\" \"%s\"" "/" substring tramp-smb-get-localname "error with make-symbolic-link, see buffer `%s' for details"] 26 (#$ . 76913)])
#@100 Like `process-file' for Tramp files.
(fn PROGRAM &optional INFILE DESTINATION DISPLAY &rest ARGS)
(defalias 'tramp-smb-handle-process-file #[1153 "\247\203 \306U\203 \307\310!\210\311!\211\242 >\204 \312\313\314D\"\210\211A@\242 >\2041 \312\313\314D\"\210\3158\242 >\204B \312\313\314D\"\210\3168\242 >\204T \312\313\314D\"\210\3178\242 >\204f \312\313\314D\"\210\3208\242 >\204x \312\313\314D\"\210\3218\242 >\204\214 \312\313\314 D\"\210\3228\323
!\211\306\324\211\211\211\211\203\325 \325!\262\326\"\203\267 \327!\262\202\314 \330!\262\331\"\262\332\333#\210\334\335
#\262\336!\203\343 \262\202\325;\203\362 \337!\262\202\325:\203\315\336@!\203@\262\202\"@;\203\337@!\262\202\"@\203\"p\262\315\340\341C\3421\305\nX\205\277 \203b\316X\203b\343\344\306U\203H\345\202]\346U\203R\345\202]\315U\203\\\347\202]\350P#\210\n\317Y\205\277\306\346U\203\237\3511\232r\352!\203\201\353!\202\205\354\355\"q\210\356P\262\357\360 C\"\211\262)0\202\236\210\202\237\210\352!\203\253\361\362\"\262)\242 >\205\277\343\363\334\364\"P$0\266\204\202\311\210\324\266\204\210\202\325\203\325p\262B\365\366\367#\266\202\262\203\363\334\370\371!#\202\367\334\372\"\262\373!\203T\262\334\374 #\262\202\371\375\376 #\210\375\377\206%\201@ \f!#\210\201A 1\257\201B 1\244r\354!q\210dd}\210\201C !\210\201D !\203b\201E \334\201F \201G !#\"\210\201E \"\210dd}\210\201H !\201E \201I \"\210\201J !\203\230\201K \201L !\210\201M !\262\202~\210ed|\210~)00\202\2640\210\201N \211\262\202\264\210\346\211\262\210\203\314\203\314\201O \333\"\203\314\201P \210\201Q \376\"\210\201Q \377\"\210\203\346\201R !\210\204\367\201S \201T \377\324#!\210
\204\201U \345\"\210\211\201N \232\203\201V \202\211\266\210\207" [default-directory cl-struct-tramp-file-name-tags tramp-verbose tramp-message-show-message tramp-temp-buffer-name process-file-side-effects 0 error "Implementation does not handle immediate return" tramp-dissect-file-name signal wrong-type-argument tramp-file-name 2 3 4 5 6 7 file-name-nondirectory nil expand-file-name tramp-equal-remote tramp-file-local-name tramp-make-tramp-temp-file tramp-make-tramp-file-name copy-file t format "//%s%s" bufferp get-buffer-create "%s" "STDERR not supported" (error) apply message "" 1 "Warning: " "Tramp: " (error) processp process-buffer tramp-get-connection-buffer dont-create "\n%s" append buffer-string process-get vector tramp-debug-message "(%d) # " " " mapconcat identity "get-content %s | & %s" tramp-smb-shell-quote-argument "& %s" get-process "%s<%d>" tramp-set-connection-property "process-name" "process-buffer" generate-new-buffer (error) (quit) tramp-smb-call-winexe tramp-smb-get-share tramp-smb-send-command "cd \"//%s%s\"" file-name-directory tramp-get-connection-process "exit $lasterrorcode" process-live-p sleep-for 0.1 process-exit-status -1 get-buffer-window redisplay tramp-flush-connection-property delete-file kill-buffer tramp-get-connection-property tramp-flush-directory-properties keyboard-quit] 31 (#$ . 82938)])
#@91 Like `rename-file' for Tramp files.
(fn FILENAME NEWNAME &optional OK-IF-ALREADY-EXISTS)
(defalias 'tramp-smb-handle-rename-file #[770 "CC\211\306\242!\240\210\306\242!\240\210\307\310\242!\203 \242\202! \242!\211\242>\2040 \311\312\313D\"\210\211A@\242>\204A \311\312\313D\"\210\3148\242>\204R \311\312\313D\"\210\3158\242>\204d \311\312\313D\"\210\3168\242>\204v \311\312\313D\"\210\3178\242>\204\210 \311\312\313D\"\210\3208\242>\204\234 \311\312\313 D\"\210\3218\322 \242!\204\203 \323\324\f\242D\325\211\f\326Y\205\254\211\203{\211\326\327\330\331! \332\216
\333 \210)r
q\210\334 +C\3351t\fX\205n \203\315X\203\336\337\340U\203\367 \341\202\f\342U\203\341\202\f\314U\203 \343\202\f\344P#\210\f\316Y\205n\340 \342U\203N\3451Ir\346!\2030\347!\2024\350\351\"q\210\327P\262\352\334 C\"\211\262)0\202M\210\202N\210\346!\203Z\353\354\"\262)\242>\205n\336\355\356\357\"P$0\266\205\202\256\210\325\266\205\202\256@r\360\361!q\210p\362 \210@\325\211AB\363\211C\363 D E\364 \210\365\366!\210+\211 \333 \367!\210)\266\202\262\210\211\204\272C\262\370\262\203s\342\370\371\211\372N\336\373 #E!C\3351n\fX\205h \203 \315X\203 \336\337\340U\203\361\341\202\342U\203\373\341\202\314U\203\343\202\344P#\210\f\316Y\205h\340 \342U\203H\3451Cr\346!\203*\347!\202.\350\351\"q\210\327P\262\352\334 C\"\211\262)0\202G\210\202H\210\346!\203T\353\354\"\262)\242>\205h\336\355\356\357\"P$0\266\204\202r\210\325\266\204\210\311\374\336\373#!C\"*\266\n\204i\322\n\242!\203i\375 \242\325\211\211\f\326Y\205\222\211\203a\211\326\327\330\331! \332\216
\333 \210)r
q\210\334 +C\3351Z\fX\205T \203\367\315X\203\367\336\337\340U\203\335\341\202\362\342U\203\347\341\202\362\314U\203\361\343\202\362\344P#\210\f\316Y\205T\340 \342U\2034\3451/r\346!\203\347!\202\350\351\"q\210\327P\262\352\334 C\"\211\262)0\2023\210\2024\210\346!\203@\353\354\"\262)\242>\205T\336\355\356\357\"P$0\266\205\202\224\210\325\266\205\202\224@r\360\361!q\210p\362 \210@\325\211AB\363\211C\363 D E\364 \210\365\366!\210+\211 \333 \367!\210)\266\202\262\210\211\204\240C\262\370\262\203Y\342\370\371\211\372N\336\373 #E!C\3351T\fX\205N \203\361\315X\203\361\336\337\340U\203\327\341\202\354\342U\203\341\341\202\354\314U\203\353\343\202\354\344P#\210\f\316Y\205N\340 \342U\203.\3451)r\346!\203\347!\202\350\351\"q\210\327P\262\352\334 C\"\211\262)0\202-\210\202.\210\346!\203:\353\354\"\262)\242>\205N\336\355\356\357\"P$0\266\204\202X\210\325\266\204\210\311\374\336\373#!C\"*\266\376\n\242!\203W\377\n\242!\204W\201F \201G \f\242C\325\211\f\326Y\205\200\211\203O\211\326\327\330\331! \332\216
\333 \210)r
q\210\334 +C\3351H\fX\205B \203\345\315X\203\345\336\337\340U\203\313\341\202\340\342U\203\325\341\202\340\314U\203\337\343\202\340\344P#\210\f\316Y\205B\340 \342U\203\"\3451 r\346!\203\347!\202\350\351\"q\210\327P\262\352\334 C\"\211\262)0\202!\210\202\"\210\346!\203.\353\354\"\262)\242>\205B\336\355\356\357\"P$0\266\205\202\202\210\325\266\205\202\202@r\360\361!q\210p\362 \210@\325\211AB\363\211C\363 D E\364 \210\365\366!\210+\211 \333 \367!\210)\266\202\262\210\211\204\216C\262\370\262\203G\342\370\371\211\372N\336\373 #E!C\3351B\fX\205< \203\337\315X\203\337\336\337\340U\203\305\341\202\332\342U\203\317\341\202\332\314U\203\331\343\202\332\344P#\210\f\316Y\205<\340 \342U\203 \3451r\346!\203\376\347!\202\350\351\"q\210\327P\262\352\334 C\"\211\262)0\202\210\202 \210\346!\203(\353\354\"\262)\242>\205<\336\355\356\357\"P$0\266\204\202F\210\325\266\204\210\311\374\336\373#!C\"*\266\340\201H \356\201I
\242\242#C\201J 1\n\fX\205 \203\245\315X\203\245\336\337\340U\203\213\341\202\240\342U\203\225\341\202\240\314U\203\237\343\202\240\344P#\210\f\316Y\205\340 \342U\203\344\201K 1\337r\346!\203\306\347!\202\312\350\351\"q\210\327P\262\352\334 C\"\211\262)0\202\343\210\202\344\210\346!\203\360\353\354\"\262)\242>\205\336\355\356\357\"P$0\266\204\202\210\325\266\204\210\201L C \205B\340\f\315^X\205B\201M \356\201I \f\242\242#\325\211#\211\205@\201N \315\201O \201P $\262\201Q \340\201R \201S \354 %\201T \"\326$\216\322\f\242!\204\210\f\201U \242
\242\"\203\210\f\201V \307\f\242!!\201V \307\242!!\230\203\210\f\307 \242!\211\242>\204\235\311\312\313D\"\210\211A@\242>\204\256\311\312\313D\"\210\3148\242>\204\277\311\312\313D\"\210\3158\242>\204\321\311\312\313D\"\210\3168\242>\204\343\311\312\313D\"\210\3178\242>\204\365\311\312\313D\"\210\3208\242>\204 \311\312\313 D\"\210\3218\307\242!\211\242>\204 \311\312\313D\"\210\211A@\242>\2041\311\312\313D\"\210\3148\242>\204B\311\312\313D\"\210\3158\242>\204T\311\312\313D\"\210\3168\242>\204f\311\312\313D\"\210\3178\242>\204x\311\312\313D\"\210\3208\242>\204\214\311\312\313 D\"\210\3218\201W \"\210\201W \"\210\201V !\204\210\n\201F \201X \242C\325\211\f\326Y\205\261 \211\203\200 \211\326\327\330\331! \332\216
\333 \210)r
q\210\334 +C\3351y \fX\205s \203 \315X\203 \336\337\340U\203\374\341\202 \342U\203 \341\202 \314U\203 \343\202 \344P#\210\f\316Y\205s \340 \342U\203S \3451N r\346!\2035 \347!\2029 \350\351\"q\210\327P\262\352\334 C\"\211\262)0\202R \210\202S \210\346!\203_ \353\354\"\262)\242>\205s \336\355\356\357\"P$0\266\205\202\263 \210\325\266\205\202\263 @r\360\361!q\210p\362 \210@\325\211AB\363\211C\363 D E\364 \210\365\366!\210+\211 \333 \367!\210)\266\202\262\210\211\204\277 C\262\370\262\203x\n\342\370\371\211\372N\336\373 #E!C\3351s\n\fX\205m\n \203\n\315X\203\n\336\337\340U\203\366 \341\202 \n\342U\203 \n\341\202 \n\314U\203\n\n\343\202 \n\344P#\210\f\316Y\205m\n\340 \342U\203M\n\3451H\nr\346!\203/\n\347!\2023\n\350\351\"q\210\327P\262\352\334 C\"\211\262)0\202L\n\210\202M\n\210\346!\203Y\n\353\354\"\262)\242>\205m\n\336\355\356\357\"P$0\266\204\202w\n\210\325\266\204\210\311\374\336\373#!C\"*\266\201Y \356\201Z \201[ !\201[
!#\"?\205\201\f\201F \201\\ \242C\325\211\f\326Y\205\252 \211\203y \211\326\327\330\331! \332\216
\333 \210)r
q\210\334 +C\3351r \fX\205l \203 \315X\203 \336\337\340U\203\365\n\341\202\n \342U\203\377\n\341\202\n \314U\203 \343\202\n \344P#\210\f\316Y\205l \340 \342U\203L \3451G r\346!\203. \347!\2022 \350\351\"q\210\327P\262\352\334 C\"\211\262)0\202K \210\202L \210\346!\203X \353\354\"\262)\242>\205l \336\355\356\357\"P$0\266\205\202\254 \210\325\266\205\202\254 @r\360\361!q\210p\362 \210@\325\211AB\363\211C\363 D E\364 \210\365\366!\210+\211 \333 \367!\210)\266\202\262\210\211\204\270 C\262\370\262\203q\f\342\370\371\211\372N\336\373 #E!C\3351l\f\fX\205f\f \203 \f\315X\203 \f\336\337\340U\203\357 \341\202\f\342U\203\371 \341\202\f\314U\203\f\343\202\f\344P#\210\f\316Y\205f\f\340 \342U\203F\f\3451A\fr\346!\203(\f\347!\202,\f\350\351\"q\210\327P\262\352\334 C\"\211\262)0\202E\f\210\202F\f\210\346!\203R\f\353\354\"\262)\242>\205f\f\336\355\356\357\"P$0\266\204\202p\f\210\325\266\204\210\311\374\336\373#!C\"*\266\204\266\210\266\210\202\267\f\201] \242
\242\201^ \201_ %\210\376 \242!\203\260\f\201` \242\201a \"\202\267\f\201b \242!\201c \240\210)\266\202\266\210\207" [cl-struct-tramp-file-name-tags tramp-file-missing signal-hook-function tramp-message-show-message tramp-verbose standard-output expand-file-name tramp-dissect-file-name tramp-tramp-file-p signal wrong-type-argument tramp-file-name 2 3 4 5 6 7 file-exists-p "Renaming 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 "*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-already-exists file-directory-p tramp-compat-directory-name-p default-directory buffer-read-only buffer-file-name buffer-undo-list inhibit-modification-hooks inhibit-read-only file-error "File is a directory %s" "%s..." #1="Renaming %s to %s" #2=(error) #4=(error) "failed" make-progress-reporter run-at-time 0.1 tramp-progress-reporter-update make-byte-code "\304\203 \306\304!\210\302\307\310\311\312\300\242\301\242#\303\242D\3131\260
X\205\256 \"\203P \314X\203P \315\316\307U\2036 \317\202K \320U\203@ \317\202K \321U\203J \322\202K \323P#\210
\324Y\205\256 \307 \320U\203\215 \3251\210 r\326!\203o \327!\202s \330\331\"q\210\332P\262\333\334 C\"\211\262)0\202\214 \210\202\215 \210\326!\203\231 \335\336\"\262)\242#>\205\256 \315\337\311\340\"P$0\207\210\341\207" vconcat [tramp-verbose 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-message-show-message cl-struct-tramp-file-name-tags] tramp-equal-remote tramp-smb-get-share tramp-flush-file-properties "Target `%s' must contain a share name" tramp-smb-send-command "rename \"%s\" \"%s\"" tramp-smb-get-localname "Cannot rename `%s'" copy-file keep-time preserve-uid-gid delete-directory recursive delete-file "done"] 46 (#$ . 86140)])
#@30 Set ACL data.
(fn PROC VEC)
(defalias 'tramp-smb-action-set-acl #[514 "\303!?\205\300 \304!\204 r\305!q\210\211\306\307\310 C\3111\266 X\205\260 \203S \312X\203S \313\314\315U\2039 \316\202N \317U\203C \316\202N \320U\203M \321\202N \322P#\210\323Y\205\260 \315\317U\203\220 \3241\213 r\325!\203r \326!\202v \305\327\"q\210\307P\262\330\310 C\"\211\262)0\202\217 \210\202\220 \210\325!\203\234 \331\332\"\262)\242\n>\205\260 \313\333\334\335\"P$0\266\204\202\272 \210\336\266\204\210\337\340\341\")\207" [tramp-verbose tramp-message-show-message cl-struct-tramp-file-name-tags process-live-p tramp-accept-process-output tramp-get-connection-buffer 10 "\n%s" buffer-string (error) 3 apply message 0 "" 1 2 "Warning: " "Tramp: " 4 (error) processp process-buffer dont-create append process-get vector tramp-debug-message format "(%d) # " nil throw tramp-action ok] 12 (#$ . 96082)])
#@64 Like `set-file-acl' for Tramp files.
(fn FILENAME ACL-STRING)
(defalias 'tramp-smb-handle-set-file-acl #[514 "\3061 \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\322#\210;\205\374\323 !\205\374\324!\325\326\327\330\f!#\331\327R\332\333\325\334\335#F\n G\336U\204\310 \337\340\fD\"\262\202\317 \337\341C\"\262\203\335 \337\342 D\"\262\203\353 \337\343 D\"\262 \203\367 \337\344 D\"\262\211\203\337\345\346\347@\"D\"\262\211A\262\202\367 \337\350!\351\352\353\354\355\352\353\356\257 \"\262\357\336\360\361\362!\363\"\314$\216\364\365!r\211q\210\357\336\366\361\362!\367\"\313$\216\370
\371\372p!#\210\370
\373p#\210\374\375\376!\377! %
\317\347\201I !\201J \201K \201L #\266\202C\201M 17\fX\2051
\203\276\314X\203\276\374\201N \336U\203\234\201O \202\271\201P U\203\252\201O \202\271\313U\203\266\201Q \202\271\201R P#\210\f\315Y\2051\336 \201P U\203 \201S 1r\201T !\203\345\201U !\202\353\377\201V \"q\210\201W P\262\337\201X C\"\211\262)0\202\210\202 \210\201T !\203\201Y \362\"\262)\242>\2051\374\201Z \346\201[ \"P$0\266\204\202=\210\201\\ \266\204\210\201] \362#\210\201] \201^ \201_ #\210\201` \201\\ \"\210\201a \201\\ @$\210\201b \201c !\204\323
\201d \201e C\201\\ \211 A \f\201f Y\205\312\211\203\202\211\201f \201W \364\201g ! B\201h \216B B\201i \210)rBq\210\201X +C\201j 1y\fX\205s
\203 \314X\203 \374\201N \336U\203\336\201O \202\373\201P U\203\354\201O \202\373\313U\203\370\201Q \202\373\201R P#\210\f\315Y\205s\336 \201P U\203K\201k 1Fr\201T !\203'\201U !\202-\377\201V \"q\210\201W P\262\337\201X C\"\211\262)0\202J\210\202K\210\201T !\203[\201Y \362\"\262)\242>\205s\374\201Z \346\201[ \"P$0\266\205\202\314\210\201\\ \266\205\202\314Cr\201l \201m !q\210p\201n \210C\201\\ \211DE\201o \211F\201o G H\201p \210\201q \201r !\210+\211 B\201i \201s !\210)\266\202\262\210\211\204\330C\262\347\262\203\277\201P \347\201t \211\201u N\374\201v #E!C\201j 1\270\fX\205\262
\203?\314X\203?\374\201N \336U\203 \201O \202:\201P U\203+\201O \202:\313U\2037\201Q \202:\201R P#\210\f\315Y\205\262\336 \201P U\203\212\201k 1\205r\201T !\203f\201U !\202l\377\201V \"q\210\201W P\262\337\201X C\"\211\262)0\202\211\210\202\212\210\201T !\203\232\201Y \362\"\262)\242>\205\262\374\201Z \346\201[ \"P$0\266\204\202\276\210\201\\ \266\204\210\310\201w \374\201v #!C\"*\266\201x \201\\ w\210\201y p!\336U\205\364\201z \322$\210\201o \262*\262)\266\204\266\2100\207\210\201\\ \207" [cl-struct-tramp-file-name-tags tramp-smb-acl-program tramp-smb-options tramp-smb-conf tramp-verbose tramp-message-show-message (error) tramp-dissect-file-name signal wrong-type-argument tramp-file-name 2 3 4 5 6 7 tramp-flush-file-property "file-acl" executable-find tramp-smb-get-share replace-regexp-in-string "\\\\" "/" tramp-smb-get-localname "//" "-E" "-S" "\n" "," 0 append "-U" "-N" "-W" "-p" "-s" "--option" format "%s" tramp-unquote-shell-quote-argument "&&" "echo" "tramp_exit_status" "0" "||" "1" make-byte-code "\301\300\302\"\210\301\300\303\"\207" vconcat vector [tramp-flush-connection-property "process-name" "process-buffer"] generate-new-buffer " *temp*" "\301\300!\205 \302\300!\207" [buffer-name kill-buffer] tramp-set-connection-property "process-name" buffer-name "process-buffer" apply start-process tramp-get-connection-name tramp-get-connection-buffer tramp-smb-actions-set-acl signal-hook-function standard-output default-directory buffer-read-only buffer-file-name buffer-undo-list inhibit-modification-hooks inhibit-read-only process-command " " mapconcat identity (error) message "" 1 "Warning: " "Tramp: " (error) processp process-buffer dont-create "\n%s" buffer-string process-get tramp-debug-message "(%d) # " nil process-put adjust-window-size-function ignore set-process-query-on-exit-flag tramp-process-actions tramp-search-regexp "tramp_exit_status [0-9]+" file-error "Couldn't find exit status of `%s'" 10 " *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 substring-no-properties "^ " read tramp-set-file-property] 31 (#$ . 97002)])
#@75 Like `set-file-modes' for Tramp files.
(fn FILENAME MODE &optional FLAG)
(defalias 'tramp-smb-handle-set-file-modes #[770 "\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\320!\205v\321\"\210\322\323\324\325\f!#\"?\205v\326\327
C\330\211 \331Y\205\237\211\203p\211\331\332\333\334! \335\216\f \336 \210)r\fq\210\337 +C\3401i X\205c\n\203\313X\203\341\342\343U\203\354 \344\202\345U\203\366 \344\202\312U\203 \346\202\347P#\210 \314Y\205c\343\345U\203C\3501>r\351!\203%\352!\202)\353\354\"q\210\332P\262\355\337 C\"\211\262)0\202B\210\202C\210\351!\203O\356\357\"\262)\242>\205c\341\360\323\361\"P$0\266\205\202\241\210\330\266\205\202\241
r\362\363!q\210p\364 \210\330\211?@\365\211A\365 B C\366 \210\367\370!\210+\211 \336 \371!\210)\266\202\262\210\211\204\255C\262\372\262\203f\345\372\373\211\374N\341\375 #E!C\3401a X\205[\n\203\376\313X\203\376\341\342\343U\203\344\344\202\371\345U\203\356\344\202\371\312U\203\370\346\202\371\347P#\210 \314Y\205[\343\345U\203;\35016r\351!\203 \352!\202!\353\354\"q\210\332P\262\355\337 C\"\211\262)0\202:\210\202;\210\351!\203G\356\357\"\262)\242>\205[\341\360\323\361\"P$0\266\204\202e\210\330\266\204\210\307\376\341\375#!C\"*\266\204\207" [cl-struct-tramp-file-name-tags signal-hook-function tramp-message-show-message tramp-verbose standard-output default-directory tramp-dissect-file-name signal wrong-type-argument tramp-file-name 2 3 4 5 6 7 tramp-smb-get-cifs-capabilities tramp-flush-file-properties tramp-smb-send-command format "chmod \"%s\" %o" tramp-smb-get-localname file-error "Error while changing file's mode %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 "(%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 buffer-read-only buffer-file-name buffer-undo-list inhibit-modification-hooks inhibit-read-only] 26 (#$ . 101704)])
#@81 Like `start-file-process' for Tramp files.
(fn NAME BUFFER PROGRAM &rest ARGS)
(defalias 'tramp-smb-handle-start-file-process #[899 "\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\n\203\215 \320 !\202\220 \321\n!\n\nB\322\323\324#\266\202\325!\205\246 \326!\327\330\327\331\332\333\"\334\"\317$\216\212\214\335!\203\317 \211T\262\336\337#\262\202\272 \340
\341#\210\340
\342#\210r\343
!q\210\344dd}\210\345
!\210\346
!\203\347
\336\350\f\351\f!#\"\210\f\316\352C\3531\251\fX\205\243
\203F\313X\203F\354\355\327U\203,\356\202A\357U\2036\356\202A\312U\203@\360\202A\361P#\210\f\314Y\205\243\327 \357U\203\203\3621~r\363!\203e\364!\202i\343\365\"q\210\366P\262\367\370 C\"\211\262)0\202\202\210\202\203\210\363!\203\217\371\333\"\262)\242 >\205\243\354\372\336\373\"P$0\266\204\202\255\210\374\266\204\210\375
\"\210*\376
!+\266\205\207" [default-directory cl-struct-tramp-file-name-tags tramp-temp-buffer-name buffer-undo-list tramp-verbose tramp-message-show-message tramp-dissect-file-name signal wrong-type-argument tramp-file-name 2 3 4 5 6 7 get-buffer-create generate-new-buffer " " mapconcat identity buffer-live-p buffer-modified-p 0 make-byte-code "r\304\300!q\210\n\305 \306\307\310#)\266\203\203% \311\312\300!\306\"\210\313p!\210\202) \314\301!\210)\315\300\316\"\210\315\300\317\"\207" vconcat vector [tramp-temp-buffer-name inhibit-changing-match-data tramp-get-connection-buffer buffer-name nil t string-match set-process-buffer tramp-get-connection-process kill-buffer set-buffer-modified-p tramp-flush-connection-property "process-name" "process-buffer"] get-process format "%s<%d>" tramp-set-connection-property "process-name" "process-buffer" tramp-get-connection-buffer t tramp-smb-call-winexe tramp-smb-get-share tramp-smb-send-command "cd \"//%s%s\"" file-name-directory "(%s); exit" (error) apply message "" 1 "Warning: " "Tramp: " (error) processp process-buffer dont-create "\n%s" append buffer-string process-get tramp-debug-message "(%d) # " nil tramp-send-string tramp-get-connection-process] 27 (#$ . 104306)])
#@192 Like `substitute-in-file-name' for Tramp files.
"//" substitutes only in the local filename part. Catches
errors for shares like "C$/", which are common in Microsoft Windows.
(fn FILENAME)
(defalias 'tramp-smb-handle-substitute-in-file-name #[257 "\211\302\211?\205 \303\304\305!\")\266\202\203 \207\306!\211\242 >\204' \307\310\311D\"\210\211A@\242 >\2048 \307\310\311D\"\210\3128\242 >\204I \307\310\311D\"\210\3138\242 >\204[ \307\310\311D\"\210\3148\242 >\204m \307\310\311D\"\210\3158\242 >\204 \307\310\311D\"\210\3168\242 >\204\223 \307\310\311 D\"\210\3178;\203\261 \320\321\"\203\261 \322 !\323\324\302\211$P\262 \266\3251\276 \326\327C\"0\207\210\207" [file-name-handler-alist cl-struct-tramp-file-name-tags nil string-prefix-p "/:" file-local-name tramp-dissect-file-name signal wrong-type-argument tramp-file-name 2 3 4 5 6 7 string-match ".+?/\\(/\\|~\\)" file-remote-p replace-match "\\1" (error) tramp-run-real-handler substitute-in-file-name] 15 (#$ . 106684)])
#@105 Like `write-region' for Tramp files.
(fn START END FILENAME &optional APPEND VISIT LOCKNAME MUSTBENEW)
(defalias 'tramp-smb-handle-write-region #[1795 "C\211\306\242!\240\210\307\242!\211\242>\204 \310\311\312D\"\210\211A@\242>\204, \310\311\312D\"\210\3138\242>\204= \310\311\312D\"\210\3148\242>\204O \310\311\312D\"\210\3158\242>\204a \310\311\312D\"\210\3168\242>\204s \310\311\312D\"\210\3178\242>\204\207 \310\311\312 D\"\210\3208 \203\201\321 \242!\203\201 \322=\204\252 \323\324\325 \242\"!\204\201\326\n\242\327\211\211 \330Y\205\252\211\203{\211\330\331\332\333! \334\216\f \335 \210)r\fq\210\336 +C\3371t X\205n\n\203\314X\203\340\341\342U\203\367 \343\202\f\344U\203\343\202\f\313U\203 \345\202\f\346P#\210 \315Y\205n\342\344U\203N\3471Ir\350!\2030\351!\2024\352\353\"q\210\331P\262\354\336 C\"\211\262)0\202M\210\202N\210\350!\203Z\355\356\"\262)\242>\205n\340\357\324\360\"P$0\266\205\202\254\210\327\266\205\202\254
r\361\362!q\210p\363 \210\327\211@A\364\211B\364 C D\365 \210\366\367!\210+\211 \335 \370!\210)\266\202\262\210\211\204\270C\262\371\262\203q\344\371\372\211\373N\340\374 #E!C\3371l X\205f\n\203 \314X\203 \340\341\342U\203\357\343\202\344U\203\371\343\202\313U\203\345\202\346P#\210 \315Y\205f\342\344U\203F\3471Ar\350!\203(\351!\202,\352\353\"q\210\331P\262\354\336 C\"\211\262)0\202E\210\202F\210\350!\203R\355\356\"\262)\242>\205f\340\357\324\360\"P$0\266\204\202p\210\327\266\204\210\310\375\340\374#!C\"*\266p \242\327\211 E\306\376J\377\201G \201H N@!\"\201I \364\"\201J #)\266\204\203\300\321 \242!\203\300\201K \242\201L #\210\201M \201N \201O \257\"\210 \314\201P \324\201Q \242#C\201R 1\207 X\205\201\n\203\"\314X\203\"\340\341\342U\203\343\202 \344U\203\343\202 \313U\203 \345\202 \346P#\210 \315Y\205\201\342\344U\203a\201S 1\\r\350!\203C\351!\202G\352\353\"q\210\331P\262\354\336 C\"\211\262)0\202`\210\202a\210\350!\203m\355\356\"\262)\242>\205\201\340\357\324\360\"P$0\266\204\202\213\210\327\266\204\210\201T C\n\205\275\314 \314^X\205\275\201U \324\201Q \242#\327\211#\211\205\273\201V \314\201W \201X $\262\201Y \342\201Z \201[ \356 %\201\\ \"\330$\216\201Y \342\201] \201[ \356!\201^ \"\313$\216\201_ \f\324\201` \201a !#\"\204\341 \201b \201c \242C\327\211 \330Y\205\n\211\203\333\211\330\331\332\333! \334\216\f \335 \210)r\fq\210\336 +C\3371\324 X\205\316\n\203q\314X\203q\340\341\342U\203W\343\202l\344U\203a\343\202l\313U\203k\345\202l\346P#\210 \315Y\205\316\342\344U\203\256\3471\251r\350!\203\220\351!\202\224\352\353\"q\210\331P\262\354\336 C\"\211\262)0\202\255\210\202\256\210\350!\203\272\355\356\"\262)\242>\205\316\340\357\324\360\"P$0\266\205\202\f\210\327\266\205\202\f
r\361\362!q\210p\363 \210\327\211@A\364\211B\364 C D\365 \210\366\367!\210+\211 \335 \370!\210)\266\202\262\210\211\204C\262\371\262\203\321\344\371\372\211\373N\340\374 #E!C\3371\314 X\205\306\n\203i\314X\203i\340\341\342U\203O\343\202d\344U\203Y\343\202d\313U\203c\345\202d\346P#\210 \315Y\205\306\342\344U\203\246\3471\241r\350!\203\210\351!\202\214\352\353\"q\210\331P\262\354\336 C\"\211\262)0\202\245\210\202\246\210\350!\203\262\355\356\"\262)\242>\205\306\340\357\324\360\"P$0\266\204\202\320\210\327\266\204\210\310\375\340\374#!C\"*\266)\201d \240\210)\266\201e \n\"\210p\232\204\324 \201b \201f pD\327\211 \330Y\205\375\211\203\316\211\330\331\332\333! \334\216\f \335 \210)r\fq\210\336 +C\3371\307 X\205\301\n\203d\314X\203d\340\341\342U\203J\343\202_\344U\203T\343\202_\313U\203^\345\202_\346P#\210 \315Y\205\301\342\344U\203\241\3471\234r\350!\203\203\351!\202\207\352\353\"q\210\331P\262\354\336 C\"\211\262)0\202\240\210\202\241\210\350!\203\255\355\356\"\262)\242>\205\301\340\357\324\360\"P$0\266\205\202\377\210\327\266\205\202\377
r\361\362!q\210p\363 \210\327\211@A\364\211B\364 C D\365 \210\366\367!\210+\211 \335 \370!\210)\266\202\262\210\211\204 C\262\371\262\203\304\344\371\372\211\373N\340\374 #E!C\3371\277 X\205\271\n\203\\\314X\203\\\340\341\342U\203B\343\202W\344U\203L\343\202W\313U\203V\345\202W\346P#\210 \315Y\205\271\342\344U\203\231\3471\224r\350!\203{\351!\202\352\353\"q\210\331P\262\354\336 C\"\211\262)0\202\230\210\202\231\210\350!\203\245\355\356\"\262)\242>\205\271\340\357\324\360\"P$0\266\204\202\303\210\327\266\204\210\310\375\340\374#!C\"*\266
\364=\204\341
;\203\362\201g \201h \f\242!\3168\262!\210F\204\271
\364=\204
\203
;\203\271 \342\201i
\242C\201R 1\264 X\205\256\n\203O\314X\203O\340\341\342U\2035\343\202J\344U\203?\343\202J\313U\203I\345\202J\346P#\210 \315Y\205\256\342\344U\203\216\201S 1\211r\350!\203p\351!\202t\352\353\"q\210\331P\262\354\336 C\"\211\262)0\202\215\210\202\216\210\350!\203\232\355\356\"\262)\242>\205\256\340\357\324\360\"P$0\266\204\202\270\210\327\266\204\210\366\201j !\266\202\266\210\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 file-exists-p excl y-or-n-p format "File %s exists; overwrite anyway? " file-already-exists 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 "(%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-temp-name-prefix eval buffer-read-only buffer-file-name buffer-undo-list inhibit-modification-hooks inhibit-read-only file-name-handler-alist noninteractive temporary-file-directory standard-value file-name-extension make-temp-file copy-file ok tramp-run-real-handler write-region no-message "%s..." #1="Moving tmp file %s to %s" #2=(error) #4=(error) "failed" make-progress-reporter run-at-time 0.1 tramp-progress-reporter-update make-byte-code "\304\203 \306\304!\210\301\307\310\311\312\302\300\242#\303\242D\3131\257
X\205\255 \"\203O \307X\203O \314\315\316U\2035 \317\202J \320U\203? \317\202J \321U\203I \322\202J \323P#\210
\324Y\205\255 \316 \320U\203\214 \3251\207 r\326!\203n \327!\202r \330\331\"q\210\332P\262\333\334 C\"\211\262)0\202\213 \210\202\214 \210\326!\203\230 \335\336\"\262)\242#>\205\255 \314\337\311\340\"P$0\207\210\341\207" vconcat [tramp-verbose cancel-timer 3 "%s...%s" format #1# #2# apply message 0 #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-message-show-message cl-struct-tramp-file-name-tags] "\301\300!\207" [delete-file] tramp-smb-send-command "put %s \"%s\"" tramp-smb-get-localname file-error "Cannot write `%s'" "done" tramp-flush-file-properties "Buffer has changed from `%s' to `%s'" set-visited-file-modtime file-attributes "Wrote %s" tramp-handle-write-region-hook] 35 (#$ . 107710)])
#@47 Return the share name of LOCALNAME.
(fn VEC)
(defalias 'tramp-smb-get-share #[257 "\300 \301\302\303\304\305!\306\"\307$\216\310!\311\312\"\205 \313\314\"\262)\207" [match-data make-byte-code 0 "\301\300\302\"\207" vconcat vector [set-match-data evaporate] 3 tramp-file-name-unquote-localname string-match "^/?\\([^/]+\\)/" match-string 1] 8 (#$ . 115381)])
#@101 Return the file name of LOCALNAME.
If VEC has no cifs capabilities, exchange "/" by "\\".
(fn VEC)
(defalias 'tramp-smb-get-localname #[257 "\306 \307\310\311\312\313!\314\"\315$\216\316!\317\320\"\2030 \321!\204) \322\323\324\325\"\326#\202? \324\325\"\202? \317\327\"\203> \324\325\"\202? \326\262\317\330\"\203Q \331\332\333\211\325%\262\334\333\335\317#)\266\203\203L\336\337\340\"C\333\211 \341Y\205e\211\2034\211\341\342\343\344! \345\216\f \346 \210)r\fq\210\347 +C\3501- X\205'\n\203\312 \315X\203\312 \351\352\310U\203\260 \326\202\305 \325U\203\272 \326\202\305 \353U\203\304 \354\202\305 \355P#\210 \356Y\205'\310\325U\203\3571r\360!\203\351 \361!\202\355 \362\363\"q\210\342P\262\364\347 C\"\211\262)0\202\210\202\210\360!\203\365\313\"\262)\242
>\205'\351\366\367\370\"P$0\266\205\202g\210\333\266\205\202g@r\371\372!q\210p\373 \210@\333\211AB\335\211C\335 D E\374 \210\375\376!\210+\211 \346 \377!\210)\266\202\262\210\211\204uC\262\201F \262\2036\325\201F \201G \211\201H N\351\201I #E!C\35011 X\205+\n\203\316\315X\203\316\351\352\310U\203\264\326\202\311\325U\203\276\326\202\311\353U\203\310\354\202\311\355P#\210 \356Y\205+\310\325U\203 \3571r\360!\203\355\361!\202\361\362\363\"q\210\342P\262\364\347 C\"\211\262)0\202\n\210\202 \210\360!\203\365\313\"\262)\242
>\205+\351\366\367\370\"P$0\266\204\2025\210\333\266\204\210\201J \201K \351\201I #!C\"*\266\211\262)\207" [inhibit-changing-match-data signal-hook-function tramp-message-show-message tramp-verbose standard-output cl-struct-tramp-file-name-tags match-data make-byte-code 0 "\301\300\302\"\207" vconcat vector [set-match-data evaporate] 3 tramp-file-name-unquote-localname string-match "^/?[^/]+\\(/.*\\)" tramp-smb-get-cifs-capabilities mapconcat #[257 "\211\300\232\203 \301\207\302!\207" [47 "\\" char-to-string] 3 "\n\n(fn X)"] match-string 1 "" "^/?\\([^/]+\\)$" "\\(\\$\\$\\)\\(/\\|$\\)" replace-match "$" nil "\\. \\|\\.$\\| $" t file-error "Invalid file name %s" tramp-make-tramp-file-name 10 "\n%s" generate-new-buffer " *string-output*" #[0 "\301!\207" [standard-output kill-buffer] 2] backtrace buffer-string (error) apply message 2 "Warning: " "Tramp: " 4 (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 erase-buffer run-hooks temp-buffer-setup-hook internal-temp-output-buffer-show default-directory buffer-read-only buffer-file-name buffer-undo-list inhibit-modification-hooks inhibit-read-only "%s" error-message-string error-message format-message signal substring-no-properties] 18 (#$ . 115753)])
#@180 Read entries which match DIRECTORY.
Either the shares are listed, or the `dir' command is executed.
Result is a list of (LOCALNAME MODE SIZE MONTH DAY TIME YEAR).
(fn DIRECTORY)
(defalias 'tramp-smb-get-file-entries #[257 "\306\307!!\211\242>\204 \310\311\312D\"\210\211A@\242>\204$ \310\311\312D\"\210\3138\242>\2045 \310\311\312D\"\210\3148\242>\204G \310\311\312D\"\210\3158\242>\204Y \310\311\312D\"\210\3168\242>\204k \310\311\312D\"\210\3178\242>\204 \310\311\312 D\"\210\3208\206\210 \321\262\322!\203 \323\324\325$\211\325=\203\326 !\327\n\330\331#\331\211\204\267 \203\267 \262\202\376\203\312 \332
\333\334\335!\"\"\210\202\317 \336
!\210r\337
!q\210eb\210\340 \331\341#\203\326\f\342\343\344\345!D\331\211\f\346Y\205\356\211\203\265\211\346\347\350\351! \352\216
\353 \210)r
q\210\354 +C\3551\256\fX\205\250 \203K\314X\203K\356\357\345U\2031\360\202F\361U\203;\360\202F\313U\203E\362\202F\363P#\210\f\315Y\205\250\345 \361U\203\210\3641\203r\365!\203j\366!\202n\337\367\"q\210\347P\262\370\354 C\"\211\262)0\202\207\210\202\210\210\365!\203\224\371\372\"\262)\242>\205\250\356\373\333\374\"P$0\266\205\202\360\210\331\266\205\202\360@r\375\376!q\210p\377 \210@\331\211AB\341\211C\341 D E\201F \210\201G \201H !\210+\211 \353 \201I !\210)\266\202\262\210\211\204\376C\262\201J \262\203\277\361\201J \201K \211\201L N\356\201M #E!C\3551\272\fX\205\264 \203W\314X\203W\356\357\345U\203=\360\202R\361U\203G\360\202R\313U\203Q\362\202R\363P#\210\f\315Y\205\264\345 \361U\203\224\3641\217r\365!\203v\366!\202z\337\367\"q\210\347P\262\370\354 C\"\211\262)0\202\223\210\202\224\210\365!\203\240\371\372\"\262)\242>\205\264\356\373\333\374\"P$0\266\204\202\276\210\331\266\204\210\310\201N \356\201M #!C\"*\266\202\360m\204\360\201O !\262\331y\210\211\203\326\211B\262\202\326)\204\376\201P
\330#\210\201Q B\262\201R \331\"\266\204\262\201S \324$\210\211\262\202\217\326!\327 \330\331#\331\211\2049\2039\262\202\200\203L\332\f\333\334\335!\"\"\210\202Q\336\f!\210r\337\f!q\210eb\210\340 \331\341#\203X \342\343\344\345!D\331\211\f\346Y\205p\211\2037\211\346\347\350\351! \352\216
\353 \210)r
q\210\354 +C\35510\fX\205* \203\315\314X\203\315\356\357\345U\203\263\360\202\310\361U\203\275\360\202\310\313U\203\307\362\202\310\363P#\210\f\315Y\205*\345 \361U\203\n\3641r\365!\203\354\366!\202\360\337\367\"q\210\347P\262\370\354 C\"\211\262)0\202 \210\202\n\210\365!\203\371\372\"\262)\242>\205*\356\373\333\374\"P$0\266\205\202r\210\331\266\205\202r@r\375\376!q\210p\377 \210@\331\211AB\341\211C\341 D E\201F \210\201G \201H !\210+\211 \353 \201I !\210)\266\202\262\210\211\204\200C\262\201J \262\203A\361\201J \201K \211\201L N\356\201M #E!C\3551<\fX\2056 \203\331\314X\203\331\356\357\345U\203\277\360\202\324\361U\203\311\360\202\324\313U\203\323\362\202\324\363P#\210\f\315Y\2056\345 \361U\203\3641r\365!\203\370\366!\202\374\337\367\"q\210\347P\262\370\354 C\"\211\262)0\202\210\202\210\365!\203\"\371\372\"\262)\242>\2056\356\373\333\374\"P$0\266\204\202@\210\331\266\204\210\310\201N \356\201M #!C\"*\266\202rm\204r\201O !\262\331y\210\211\203X\211B\262\202X)\204\200\201P \f\330#\210\201Q B\262\201R \331\"\266\204\207" [cl-struct-tramp-file-name-tags tramp-smb-errors signal-hook-function tramp-message-show-message tramp-verbose standard-output tramp-dissect-file-name file-name-as-directory signal wrong-type-argument tramp-file-name 2 3 4 5 6 7 "/" file-name-absolute-p tramp-get-file-property "file-entries" undef tramp-smb-get-share tramp-get-connection-property "share-cache" nil tramp-smb-send-command format "dir \"%s*\"" tramp-smb-get-localname tramp-smb-maybe-open-connection tramp-get-connection-buffer re-search-forward t file-error "%s `%s'" match-string 0 10 "\n%s" generate-new-buffer " *string-output*" #[0 "\301!\207" [standard-output kill-buffer] 2] backtrace buffer-string (error) apply message #1="" 1 "Warning: " "Tramp: " (error) processp process-buffer dont-create append process-get vector tramp-debug-message "(%d) # " get-buffer-create "*debug tramp*" kill-all-local-variables default-directory buffer-read-only buffer-file-name buffer-undo-list inhibit-modification-hooks inhibit-read-only 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-smb-read-file-entry tramp-set-connection-property (#1# "drwxrwxrwx" 0 (0 0)) delq tramp-set-file-property] 29 (#$ . 118542)])
#@172 Parse entry in SMB output buffer.
If SHARE is result, entries are of type dir. Otherwise, shares
are listed. Result is the list (LOCALNAME MODE SIZE MTIME).
(fn SHARE)
(defalias 'tramp-smb-read-file-entry #[257 "`\302 {\303\211\211\211\211\211\211\211\211\211 \204+ \304\305\f\"\203\225\306\307\f\"\262\n\310\262 \311\262\202\225\3122\224\304\313\f\"\203K \314\306\307
\"!\262\315 \311\316#\262 \202P \317\312\303\"\210\304\320\f\"\203~ \314\306\307
\"!\262\314\306\321
\"!\262\314\306\322
\"!\262\315 \311\323#\262 \202\203 \317\312\303\"\210\304\313\f\"\203\237 \314\306\307
\"!\262\315 \311\324#\262 \202\244 \317\312\303\"\210\304\325\f\"\203\276 \306\307\f\"\262\315 \311\326#\262 \202\303 \317\312\303\"\210\325 \303\327\304#)\266\203\203\337 \315 \311\316#\262 \202\344 \317\312\303\"\210\304\313\f\"\203 \330\306\307
\"GT][\314\306\307\"!\262 \304\331\315\"\"\203\211\311\225\\\262\315\f\311#\262\f\210\202!\317\312\303\"\210\304\332\f\"\203w\306\307\f\"\2062\333\262 \334\335\336 \303\327\304#)\266\203\203K\337\202L\340\341\342\343\344\345\303\327\304#)\266\203\203e\340\202f\346\347Q##\262 \315 \311\350#\262 \202|\317\312\303\"\210\304\351\f\"\203\217\306\307\f\"\211\262 \202\223\317\312\303\"0\210 \205\337\205\337\205\337\203\324\203\324\203\324\203\324\203\324\203\324\352 \353\f\227\354\355!\"A&\202\325 \262 F\207" [inhibit-changing-match-data tramp-time-dont-know point-at-eol nil string-match "^Disk|\\([^|]+\\)|" match-string 1 "dr-xr-xr-x" 0 --cl-block-nil-- "\\([0-9]+\\)$" string-to-number substring -5 throw "\\([0-9]+\\):\\([0-9]+\\):\\([0-9]+\\)$" 2 3 -9 -3 "\\(\\w+\\)$" -4 t 10 "\\([ACDEHNORrsSTV]+\\)" "\\([ACDEHNORrsSTV]+\\)?$" #1="" format "%s%s" "D" "d" "-" mapconcat #[257 "\300\207" [#1#] 2 "\n\n(fn X)"] " " "r" "R" "w" "x" -6 "^\\s-+\\(\\S-\\(.*\\S-\\)?\\)\\s-*$" encode-time assoc default-toplevel-value parse-time-months] 26 (#$ . 123344)])
#@65 Check whether the SMB server supports POSIX commands.
(fn VEC)
(defalias 'tramp-smb-get-cifs-capabilities #[257 "\300\301!!\205^ \302\303\304#\205^ \302\301!\305\306#\211\306=\203[ \307 \310\311\312\313\314!\315\"\316$\216\317\303\"\205N r\320!q\210eb\210\321\322\323\304#\205M \324\325`\326 {\323\327#\235))\262\262\330\301!\305#\210\211\262\207" [process-live-p tramp-get-connection-process tramp-get-connection-property "posix" t "cifs-capabilities" undef match-data make-byte-code 0 "\301\300\302\"\207" vconcat vector [set-match-data evaporate] 3 tramp-smb-send-command tramp-get-connection-buffer re-search-forward "Server supports CIFS capabilities" nil "pathnames" split-string point-at-eol omit tramp-set-connection-property] 9 (#$ . 125346)])
#@69 Check whether the SMB server supports the `stat' command.
(fn VEC)
(defalias 'tramp-smb-get-stat-capability #[257 "\300!\205, \301\302!!\205, \303\302!\304\305#\211\305=\203) \306\307\"\262\310\302!\304#\210\211\262\207" [tramp-smb-get-share process-live-p tramp-get-connection-process tramp-get-connection-property "stat-capability" undef tramp-smb-send-command "stat \"/\"" tramp-set-connection-property] 6 (#$ . 126117)])
#@118 Send the COMMAND to connection VEC.
Returns nil if there has been an error message from smbclient.
(fn VEC COMMAND)
(defalias 'tramp-smb-send-command #[514 "\303!\210\304\305C\3061\246 X\205\240 \203C \307X\203C \310\311\312U\203) \313\202> \314U\2033 \313\202> \315U\203= \316\202> \317P#\210\320Y\205\240 \312\314U\203\200 \3211{ r\322!\203b \323!\202f \324\325\"q\210\326P\262\327\330 C\"\211\262)0\202 \210\202\200 \210\322!\203\214 \331\332\"\262)\242\n>\205\240 \310\333\334\335\"P$0\266\204\202\252 \210\336\266\204\210\337\"\210\340!\207" [tramp-verbose tramp-message-show-message cl-struct-tramp-file-name-tags tramp-smb-maybe-open-connection 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 tramp-send-string tramp-smb-wait-for-output] 12 (#$ . 126558)])
#@339 Maybe open a connection to HOST, log in as USER, using `tramp-smb-program'.
Does not do anything if a connection is already open, but re-opens the
connection if a previous connection has died for some reason.
If ARGUMENT is non-nil, use it as argument for
`tramp-smb-winexe-program', and suppress any checks.
(fn VEC &optional ARGUMENT)
(defalias 'tramp-smb-maybe-open-connection #[513 "\306!\204 \307\310\211\"\210\311!\312!\313!\204\273\314!\204\273\315\316\317N@!\320P\n\204\217\321!\204\322\323 D\324\211 @\325Y\205=\211\203
\211\325\326\327\330! A\331\216A A\332 \210)rAq\210\333 +C\3341@X\205
\203\240 \335X\203\240 \336\337\340U\203\206 \341\202\233 \342U\203\220 \341\202\233 \343U\203\232 \344\202\233 \345P#\210@\346Y\205 \340 @\342U\203\337 \3471\332 r\314!\203\301 \350!\202\305 \312\351\"q\210\326P\262\352\333 C\"\211\262)0\202\336 \210\202\337 \210\314!\203\353 \353\354\"\262)\242B>\205 \336\355\356\357\"P$0\266\205\202?\210\324\266\205\202? r\360\361!q\210p\362 \210\324\211CD\363\211E\363 F G\364 \210\365\366!\210+\211 A\332 \367!\210)\266\202\262\210\211\204KC\262\370\262\203\342\370\371\211\372N\336\373 #E!C\3341@X\205\375
\203\235\335X\203\235\336\337\340U\203\203\341\202\230\342U\203\215\341\202\230\343U\203\227\344\202\230\345P#\210@\346Y\205\375\340 @\342U\203\334\3471\327r\314!\203\276\350!\202\302\312\351\"q\210\326P\262\352\333 C\"\211\262)0\202\333\210\202\334\210\314!\203\350\353\354\"\262)\242B>\205\375\336\355\356\357\"P$0\266\204\202\210\324\266\204\210\374\375\336\373#!C\"*\266\376!\377\324\201S 1\306@X\205\300
\203^\335X\203^\336\337\340U\203D\341\202Y\342U\203N\341\202Y\343U\203X\344\202Y\345P#\210@\346Y\205\300\340 @\342U\203\237\201T 1\232r\314!\203\201\350!\202\205\312\351\"q\210\326P\262\352\333 C\"\211\262)0\202\236\210\202\237\210\314!\203\253\353\354\"\262)\242B>\205\300\336\355\356\357\"P$0\266\204\202\312\210\324\266\204\210\377\326\nC\201S 1v@X\205p
\203\335X\203\336\337\340U\203\364\341\202 \342U\203\376\341\202 \343U\203\344\202 \345P#\210@\346Y\205p\340 @\342U\203O\201T 1Jr\314!\2031\350!\2025\312\351\"q\210\326P\262\352\333 C\"\211\262)0\202N\210\202O\210\314!\203[\353\354\"\262)\242B>\205p\336\355\356\357\"P$0\266\204\202z\210\324\266\204\210\201U \201V \n\"\203\217\201W \341\324\211\n$\n\201X \201Y \n#\230\204\255\201Z \341\"\210\201[ !\210\201\\ \201Y \n#\210)\266rq\210eb\210\201] \201^ \201_ !\201` \201X \201a \201^ \340!#!\"\203\375\201b !\203\375\201c H\324\363#\203\375\201d !\210\324\262)\201b !\205\206\201X \201e \341#\230?\205\352\201f \201g \340\201h \201i \354!\201j \"\335$\216\203=rq\210\364 \210)\203M\314!\203M\201d !\210\242B>\204a\374\201k \201l D\"\210\3438\242B>\204z\374\201k \201l D\"\210\3468\242B>\204\223\374\201k \201l \nD\"\210\3358\242B>\204\254\374\201k \201l D\"\210\201m 8I\324\n\203\305\201n PC\262\202\345 \203\332\201n \201o \fRC\262\202\345\201p \201q E\262G\340U\204\372\352\201r D\"\262\202\352\201s C\"\262\203\352\201t D\"\262\203 \352\201u D\"\262J\2030\352\201v JD\"\262\203J\352\201w \356\370@\"D\"\262A\262\2020\n\203W\352\fC\"\262 \335\201x \356\201y \nG\340U\204r\n\201z P\202s\341\n\206{\341$C\201S 1\"@X\205
\203\272\335X\203\272\336\337\340U\203\240\341\202\265\342U\203\252\341\202\265\343U\203\264\344\202\265\345P#\210@\346Y\205 \340 @\342U\203\373\201T 1\366r\314!\203\335\350!\202\341\312\351\"q\210\326P\262\352\333 C\"\211\262)0\202\372\210\202\373\210\314!\203\353\354\"\262)\242B>\205 \336\355\356\357\"P$0\266\204\202&\210\324\266\204\210\201{ C
\205o\335@\335^X\205o\201| \356\201y G\340U\204P \201z P\202Q\341 \206Y\341$\324\211#\211\205m\201} \335\201~ \201 $\262\201g \340\201\200 \201i \354\n\n&\201\201 \"\325$\216\324 KL M\315\316\317N@!\336\201\202 \201\203 !\312!\203\265N\202\266%)\377\370\201\204 !\201\205 \201\206 \201\207 #\266\202C\201S 1w@X\205q
\203\335X\203\336\337\340U\203\365\341\202\n\342U\203\377\341\202\n\343U\203 \344\202\n\345P#\210@\346Y\205q\340 @\342U\203P\201T 1Kr\314!\2032\350!\2026\312\351\"q\210\326P\262\352\333 C\"\211\262)0\202O\210\202P\210\314!\203\\\353\354\"\262)\242B>\205q\336\355\356\357\"P$0\266\204\202{\210\324\266\204\210\201\210 \354#\210\201\210 \201\211 \201\212 #\210\201\213 \324\"\210\201\214 1\344\324 \201\215 \324\204\261\203\266O\202\270P$\210\201\\ \201e #\210\201\\ \201\216 \342#\210\201\217 !\210\201\\ \201\220 \363#)0\202\331r\312!q\210eb\210\201\221 \201Q !\203\320Q\203\320\201\222 R\324\363#\203\320\324 Q\335\201\223 \324\201S 1\267@X\205\261
\203O\335X\203O\336\337\340U\2035\341\202J\342U\203?\341\202J\343U\203I\344\202J\345P#\210@\346Y\205\261\340 @\342U\203\220\201T 1\213r\314!\203r\350!\202v\312\351\"q\210\326P\262\352\333 C\"\211\262)0\202\217\210\202\220\210\314!\203\234\353\354\"\262)\242B>\205\261\336\355\356\357\"P$0\266\204\202\273\210\324\266\204\210\201\224 \363\"\210\201\225 \")\202\326\374@A\")\262*\262\201\226 \240\210)\266\202\266\206)\262\207" [tramp-smb-program default-directory tramp-smb-version exec-path signal-hook-function tramp-message-show-message tramp-connectable-p throw non-essential tramp-smb-get-share tramp-get-connection-buffer get-buffer-process processp eval temporary-file-directory standard-value " -V" executable-find file-error "Cannot find command %s in %s" nil 10 "\n%s" generate-new-buffer " *string-output*" #[0 "\301!\207" [standard-output kill-buffer] 2] backtrace buffer-string (error) 3 apply message 0 #3="" 1 2 "Warning: " "Tramp: " 4 (error) process-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 signal substring-no-properties shell-command-to-string 6 tramp-verbose standard-output cl-struct-tramp-file-name-tags buffer-read-only buffer-file-name buffer-undo-list inhibit-modification-hooks inhibit-read-only tramp-smb-errors tramp-smb-options tramp-smb-conf coding-system-for-read tramp-process-connection-type process-connection-type tramp-smb-winexe-program tramp-smb-actions-with-share tramp-smb-actions-without-share auth-sources tramp-smb-wrong-passwd-regexp #4=(error) #5=(error) string-match "[ \n
]+\\'" replace-match tramp-get-connection-property "smbclient-version" tramp-flush-directory-properties tramp-flush-connection-properties tramp-set-connection-property time-less-p seconds-to-time 60 time-since "last-cmd-time" process-live-p re-search-forward delete-process "smb-share" match-data make-byte-code "\301\300\302\"\207" vconcat [set-match-data evaporate] wrong-type-argument tramp-file-name 5 "//" "/" "-g" "-L" "-U" "-N" "-W" "-p" "-s" "--option" "%s..." #1="Opening connection for //%s%s/%s" #2="@" "failed" make-progress-reporter run-at-time 0.1 tramp-progress-reporter-update "\305\203 \306\305!\210\300\307\310\311\312\302G\313U\204 \302\314P\202 \315\303\301\206! \315$\304\242D\3161\303 #X\205\301 $\203a \307X\203a \317\320\313U\203G \315\202\\ \321U\203Q \315\202\\ \322U\203[ \323\202\\ \324P#\210#\325Y\205\301 \313 #\321U\203\240 \3261\233 r\327!\203\202 \330!\202\206 \331\332\"q\210\333P\262\334\335 C\"\211\262)0\202\237 \210\202\240 \210\327!\203\254 \336\337\"\262)\242%>\205\301 \317\340\311\341\"P$0\207\210\342\207" [cancel-timer 3 "%s...%s" format #1# 0 #2# #3# #4# apply message 1 2 "Warning: " "Tramp: " 4 #5# 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] start-process tramp-get-connection-name process-command " " mapconcat identity process-put adjust-window-size-function ignore set-process-query-on-exit-flag (error) tramp-process-actions "chunksize" tramp-set-connection-local-variables "connected" boundp search-forward-regexp "Retry connection with new password" tramp-cleanup-connection tramp-smb-maybe-open-connection "done"] 26 (#$ . 127541)])
#@118 Wait for output from smbclient command.
Removes smb prompt. Returns nil if an error message has appeared.
(fn VEC)
(defalias 'tramp-smb-wait-for-output #[257 "r\306!q\210\307p!\310\311 \312\310#\204 \313\314\"\204 eb\210\202 \315\316\317 C\3201\303 \nX\205\275 \203` \321X\203` \322\323\314U\203F \324\202[ \325U\203P \324\202[ \326U\203Z \327\202[ \330P#\210\n\331Y\205\275 \314\325U\203\235 \3321\230 r\333!\203 \334!\202\203 \306\335\"q\210\316P\262\336\317 C\"\211\262)0\202\234 \210\202\235 \210\333!\203\251 \337\340\"\262)\242\f>\205\275 \322\341\342\343\"P$0\266\204\202\307 \210\312\266\204\210eb\210\311 \312\310#\203\340 db\210\344 \312\310#\210`d|\210eb\210\311
\312\310#)?\262)\207" [inhibit-read-only tramp-smb-prompt tramp-verbose tramp-message-show-message cl-struct-tramp-file-name-tags tramp-smb-errors tramp-get-connection-buffer get-buffer-process t re-search-forward nil tramp-accept-process-output 0 6 "\n%s" buffer-string (error) 3 apply message "" 1 2 "Warning: " "Tramp: " 4 (error) processp process-buffer dont-create append process-get vector tramp-debug-message format "(%d) # " re-search-backward] 12 (#$ . 136160)])
#@37 Send SIGKILL to the winexe process.
(defalias 'tramp-smb-kill-winexe-function #[0 "\3001 \301p!\302!\205 \303\304!\305\"\2620\207\210\306\207" [(error) get-buffer-process process-live-p signal-process process-id SIGINT nil] 4 (#$ . 137349)])
#@82 Apply a remote command, if possible, using `tramp-smb-winexe-program'.
(fn VEC)
(defalias 'tramp-smb-call-winexe #[257 "\306!\204\335\211\307\310C\311\211 \312Y\205\211\203\325 \211\312\313\314\315! \316\216\f \317 \210)r\fq\210\320 +C\3211\316 X\205\310 \n\203k \322X\203k \323\324\325U\203Q \326\202f \327U\203[ \326\202f \330U\203e \331\202f \332P#\210 \333Y\205\310 \325\327U\203\250 \3341\243 r\335!\203\212 \336!\202\216 \337\340\"q\210\313P\262\341\320 C\"\211\262)0\202\247 \210\202\250 \210\335!\203\264 \342\343\"\262)\242
>\205\310 \323\344\345\346\"P$0\266\205\202\210\311\266\205\202@r\347\350!q\210p\351 \210@\311\211AB\352\211C\352 D E\353 \210\354\355!\210+\211 \317 \356!\210)\266\202\262\210\211\204C\262\357\262\203\315\327\357\360\211\361N\323\362 #E!C\3211\310 X\205\302\n\203e\322X\203e\323\324\325U\203K\326\202`\327U\203U\326\202`\330U\203_\331\202`\332P#\210 \333Y\205\302\325\327U\203\242\3341\235r\335!\203\204\336!\202\210\337\340\"q\210\313P\262\341\320 C\"\211\262)0\202\241\210\202\242\210\335!\203\256\342\343\"\262)\242
>\205\302\323\344\345\346\"P$0\266\204\202\314\210\311\266\204\210\363\364\323\362#!C\"*\266\211\242
>\204\353\363\365\366D\"\210\3678\203\307\211\307\370\311\211\211 \312Y\205\360\211\203\277\211\312\313\314\315! \316\216\f \317 \210)r\fq\210\320 +C\3211\270 X\205\262\n\203U\322X\203U\323\324\325U\203;\326\202P\327U\203E\326\202P\330U\203O\331\202P\332P#\210 \333Y\205\262\325\327U\203\222\3341\215r\335!\203t\336!\202x\337\340\"q\210\313P\262\341\320 C\"\211\262)0\202\221\210\202\222\210\335!\203\236\342\343\"\262)\242
>\205\262\323\344\345\346\"P$0\266\205\202\362\210\311\266\205\202\362@r\347\350!q\210p\351 \210@\311\211AB\352\211C\352 D E\353 \210\354\355!\210+\211 \317 \356!\210)\266\202\262\210\211\204\376C\262\357\262\203\267\327\357\360\211\361N\323\362 #E!C\3211\262 X\205\254\n\203O\322X\203O\323\324\325U\2035\326\202J\327U\203?\326\202J\330U\203I\331\202J\332P#\210 \333Y\205\254\325\327U\203\214\3341\207r\335!\203n\336!\202r\337\340\"q\210\313P\262\341\320 C\"\211\262)0\202\213\210\202\214\210\335!\203\230\342\343\"\262)\242
>\205\254\323\344\345\346\"P$0\266\204\202\266\210\311\266\204\210\363\364\323\362#!C\"*\266\371\345\372FG#\"\210\373\374!\210\375<\376\377!\201H \"\210\201I \201J \"\210\201I \201K \"\210\201I \201L \"\210\201I \201M \"\210\201I \201N \"\210\201I \201O \"\210\201I \201P \"\207" [tramp-smb-winexe-program signal-hook-function tramp-message-show-message tramp-verbose standard-output cl-struct-tramp-file-name-tags executable-find file-error "Cannot find program: %s" nil 10 "\n%s" generate-new-buffer " *string-output*" #[0 "\301!\207" [standard-output kill-buffer] 2] backtrace buffer-string (error) 3 apply message 0 "" 1 2 "Warning: " "Tramp: " 4 (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 signal substring-no-properties wrong-type-argument tramp-file-name 5 "Port not supported for remote processes" tramp-smb-maybe-open-connection "%s %s" make-local-variable kill-buffer-hook (tramp-smb-kill-winexe-function) set-process-coding-system tramp-get-connection-process default-directory buffer-read-only buffer-file-name buffer-undo-list inhibit-modification-hooks inhibit-read-only tramp-smb-winexe-shell-command tramp-smb-winexe-shell-command-switch raw-text-dos tramp-smb-send-command "$rawui = (Get-Host).UI.RawUI" "$bufsize = $rawui.BufferSize" "$winsize = $rawui.WindowSize" "$bufsize.Width = 128" "$winsize.Width = 128" "$rawui.BufferSize = $bufsize" "$rawui.WindowSize = $winsize"] 16 (#$ . 137602)])
#@73 Similar to `shell-quote-argument', but uses Windows cmd syntax.
(fn S)
(defalias 'tramp-smb-shell-quote-argument #[257 "\301\302!)\207" [system-type ms-dos tramp-unquote-shell-quote-argument] 3 (#$ . 141658)])
(byte-code "\300\301\302\"\210\303\304!\207" [add-hook tramp-unload-hook #[0 "\300\301\302\"\207" [unload-feature tramp-smb force] 3] provide tramp-smb] 3)
Zerion Mini Shell 1.0