403Webshell
Server IP : 217.160.0.212  /  Your IP : 216.73.216.141
Web Server : Apache
System : Linux www 6.18.51-i1-ampere #1196 SMP Fri Sep 11 20:43:55 CEST 2026 aarch64
User : sws1073854427 ( 1073854427)
PHP Version : 8.4.23
Disable Function : NONE
MySQL : OFF  |  cURL : ON  |  WGET : ON  |  Perl : ON  |  Python : OFF  |  Sudo : OFF  |  Pkexec : OFF
Directory :  /usr/share/emacs/28.2/lisp/net/

Upload File :
current_dir [ Writeable ] document_root [ Writeable ]

 

Command :


[ Back ]     

Current File : /usr/share/emacs/28.2/lisp/net/tramp-smb.elc
;ELC
;;; Compiled
;;; in Emacs version 28.2
;;; with all optimizations.



(require 'tramp)
#@45 Method to connect SAMBA and M$ SMB servers.
(defconst tramp-smb-method "smb" (#$ . 101))
(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" ["smbclient"] 1 #1=""] "Name of SMB client to run." :group tramp :type string tramp-smb-acl-program #[0 "\300\207" ["smbcacls"] 1 #1#] "Name of SMB acls to run." :version "24.4" tramp-smb-conf #[0 "\207" [null-device] 1 #1#] "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 #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) "28.1"] 10)
#@35 Version string of the SMB client.
(defvar tramp-smb-version nil (#$ . 1641))
#@38 Regexp of SMB server identification.
(defconst tramp-smb-server-version "Domain=\\[[^]]*\\] OS=\\[[^]]*\\] Server=\\[[^]]*\\]" (#$ . 1724))
#@51 Regexp used as prompt in smbclient or powershell.
(defconst tramp-smb-prompt "^\\(smb:\\|PS\\) .+> \\|^\\s-+Server\\s-+Comment$" (#$ . 1870))
#@48 Regexp for login error strings of SMB servers.
(defconst tramp-smb-wrong-passwd-regexp "\\(?:NT_STATUS_\\(?:LOGON_FAILURE\\|WRONG_PASSWORD\\)\\)" (#$ . 2018))
#@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\\|\\(?:IMPLEMEN\\|SUPPOR\\)TED\\)\\|_\\(?: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) (#$ . 2184))
#@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)) (#$ . 3481))
#@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)) (#$ . 3924))
#@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)) (#$ . 4328))
#@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)) (#$ . 4736))
#@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)) (#$ . 5130))
#@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-locked-p . tramp-handle-file-locked-p) (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) (lock-file . tramp-handle-lock-file) (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-lock-file-name . tramp-handle-make-lock-file-name) (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-get-remote-gid . ignore) (tramp-get-remote-uid . ignore) (tramp-set-file-uid-gid . ignore) (unhandled-file-name-directory . ignore) (unlock-file . tramp-handle-unlock-file) (vc-registered . ignore) (verify-visited-file-modtime . tramp-handle-verify-visited-file-modtime) (write-region . tramp-smb-handle-write-region)) (#$ . 5524))
(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" ["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" ["powershell.exe"] 1 #1#] "Shell to be used for processes on remote machines.\nThis must be Powershell V2 compatible." tramp-smb-winexe-shell-command-switch #[0 "\300\207" ["-file -"] 1 #1#] "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 (#$ . 10307)])
(byte-code "\300\301\302\303#\304\301\305\306#\207" [function-put tramp-smb-file-name-p speed -1 put byte-optimizer byte-compile-inline-expand] 5)
#@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\"\216\305A\")\207\306\"\207" [tramp-smb-file-name-handler-alist assoc match-data make-closure #[0 "\301\300\302\"\207" [V0 set-match-data evaporate] 3] apply tramp-run-real-handler] 7 (#$ . 10787)])
(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 "\301\"\204\233\302\303!\203\202!\211\242>\204\"\304\305\306D\"\210\211A@\242>\2043\304\305\306D\"\210\3078\242>\204D\304\305\306D\"\210\3108\242>\204V\304\305\306D\"\210\3118\242>\204h\304\305\306D\"\210\3128\242>\204z\304\305\306D\"\210\3138\242>\204\216\304\305\306	D\"\210\3148\315\316\317\320$\266	\302!\211\242>\204\254\304\305\306D\"\210\211A@\242>\204\275\304\305\306D\"\210\3078\242>\204\316\304\305\306D\"\210\3108\242>\204\340\304\305\306D\"\210\3118\242>\204\362\304\305\306D\"\210\3128\242>\204\304\305\306D\"\210\3138\242>\204\304\305\306	D\"\210\3148\302\n!\211\242>\204.\304\305\306D\"\210\211A@\242>\204?\304\305\306D\"\210\3078\242>\204P\304\305\306D\"\210\3108\242>\204b\304\305\306D\"\210\3118\242>\204t\304\305\306D\"\210\3128\242>\204\206\304\305\306D\"\210\3138\242>\204\232\304\305\306	D\"\210\3148\321!\203\256\315\316\322$\210\323!\203\331\203\311\247\203\324\324\325\326\"!\204\324\315\327#\210\202\331\330!\210\331\"\210\332\325\333\334!\203\357\335\202\360\336\337!\337!$\"?\205\315\316\340\341 $\207" [cl-struct-tramp-file-name-tags tramp-equal-remote tramp-dissect-file-name tramp-tramp-file-p signal wrong-type-argument tramp-file-name 2 3 4 5 6 7 tramp-error file-error "add-name-to-file: %s" "only implemented for same method, same user, same host" file-directory-p "add-name-to-file: %s must not be a directory" file-exists-p yes-or-no-p format "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] 27 (#$ . 11479)])
#@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\313~\210\312y\210\211\314e`{\312\3151\301	X\205\273\316X\203a\n\204a\317\320\321U\203G\322\202\\\323U\203Q\322\202\\\324U\203[\325\202\\\326P#\210	\327Y\205\273\321\323U\203\233\3301\232r\331!\203\200\332!\202\204\310\333\"q\210\334P\262\335\336 C\"\211\262)0\210\202\233\210\331!\203\247\337\340\"\262)\242>\205\273\317\341\342\343\"P$0\266\202\303\266e`|\210\305\306\344\")\207" [tramp-smb-server-version tramp-verbose tramp-inhibit-progress-reporter 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 (#$ . 13501)])
#@104 Like `copy-directory' for Tramp files.

(fn DIRNAME NEWNAME &optional KEEP-DATE PARENTS COPY-CONTENTS)
(defalias 'tramp-smb-handle-copy-directory #[1282 "CC\306\242!\306\242!\307\310\203\242\202\242!C\211\242\242>\204+\311\312\313\242D\"\210\211\242A@\242\242>\204?\311\312\313\242D\"\210\314\2428\242\242>\204S\311\312\313\242D\"\210\315\2428\242\242>\204h\311\312\313\242D\"\210\316\2428\242\242>\204}\311\312\313\242D\"\210\317\2428\242\242>\204\222\311\312\313\242D\"\210\320\2428\242\242>\204\251\311\312\313	\242D\"\210\321\2428\322
\242!\204\324\242
\242\323\324N\203\314\325	#\266\202\324\325	\326$\266\327\302!\203\n\203\330
\242!\211\262\n\203\331
\242
\242\"\203\332	\333\242!\203
\242\334\242!P\202
\242\335#\207
\203(\336\337\242\242\257\"\207\f\340\242!\240\210\340
\242!\240\210\204B\f\203\312\322
\242!\204h\242
\242\323\324N\203`\325	#\266\202h\325	\326$\266\341\f\242!\203\202\333\f\242!\204\202\325\242\342\242#\210\n\203\273	\203\273\343\340
@\"!\344\345\"\216\346!\210\337\242\347!\350$\210\337\340\334\242!\"\242$)\207\336\337\242\242F\"\207\242\351\352\353\354\242\242#C\3551wAX\205q\315X\203B\204\356\357\351U\203\373\360\202\361U\203\360\202\314U\203\362\202\363P#\210A\316Y\205q\351A\361U\203Q\3641Pr\365!\2036\366!\202:\367\370\"q\210\371P\262\372\373 C\"\211\262)0\210\202Q\210\365!\203]\374\375\"\262)\242>\205q\356\376\353\377\"P$0\266\202y\266\201CCB?\205\233\351A\315^X\205\233\201D\353\354\242\242#\307\211#\211\205\253\201E\315\201F\201G$\262\344\201H
&\216B\206\304\211B\322\242!\204\354	\242\242\323\324N\203\344\325	#\266\202\354\325	\326$\266\341\242!\203\333\242!\204\325\n\242\342\242#\210\f\203E\203E\343\340
@\"!\344\201I\"\216\346!\210\337\242\347!\350$\210\337\340\334\242!\"\242$)\262\202S\336\337\242\242F\")\201J\240\210)\207" [cl-struct-tramp-file-name-tags tramp-file-missing copy-directory-create-symlink noninteractive inhibit-message tramp-temp-name-prefix tramp-tramp-file-p nil tramp-dissect-file-name signal wrong-type-argument tramp-file-name 2 3 4 5 6 7 file-exists-p file-missing error-conditions tramp-error "No such file or directory: %s" boundp file-symlink-p tramp-equal-remote make-symbolic-link directory-name-p file-name-nondirectory t tramp-run-real-handler copy-directory expand-file-name file-directory-p file-already-exists make-temp-name make-closure #[0 "\301\300\302\"\207" [V0 delete-directory recursive] 3] make-directory file-name-as-directory parents 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) # " tramp-compat-temporary-file-directory tramp-verbose tramp-inhibit-progress-reporter "failed" make-progress-reporter run-at-time 0.1 tramp-progress-reporter-update #[0 "\304\203\306\304!\210\302\242\307\310\311\312\300\242\301\242#\303\242D\3131\256
X\205\254\314X\203Q\"\204Q\315\316\307U\2037\317\202L\320U\203A\317\202L\321U\203K\322\202L\323P#\210
\324Y\205\254\307\320U\203\213\3251\212r\326!\203p\327!\202t\330\331\"q\210\332P\262\333\334 C\"\211\262)0\210\202\213\210\326!\203\227\335\336\"\262)\242#>\205\254\315\337\311\340\"P$0\207\266\341\207" [V0 V1 V2 V3 V4 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-inhibit-progress-reporter cl-struct-tramp-file-name-tags] 10] #[0 "\301\300\302\"\207" [V0 delete-directory recursive] 3] "done"] 28 (#$ . 14508)])
#@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\306\242!\240\210\211\306\242!\240\210\204	\203\334\307\242!\203/\310\242\242\311\312%\210\202\303\313\242!\204`\314\315\242!\203C\242\202E\242!\242\316\317N\203X\320\n#\266\202`\320\n\321$\266\322\242!\211\203\210\3231y\324\242	#0\266\202\303\325!\210\326@A\"\266\202\303\307\242!\203\241\327\242!\203\241\306\330\242!\242\"\240\210\314\242!\211\242>\204\263\326\331\332D\"\210\211A@\242>\204\304\326\331\332D\"\210\3338\242>\204\325\326\331\332D\"\210\3348\242>\204\347\326\331\332D\"\210\3358\242>\204\371\326\331\332D\"\210\3368\242>\204\326\331\332D\"\210\3378\242>\204\326\331\332	D\"\210\3408\2049\313\n\242!\2039\320\341\f\242#\210\307\n\242!\203S\327\n\242!\204S\320\342\343
\242$\210\344\"\210\345!\204j\320\342\346
\242$\210\347\350\351\242\352\211?\205y\f\353!\211\211?\205\205\f\354\355\353!\")\266\202\203\243\211G\333U\203\235\356\202\241\211\333\352O\262\357!P)\266\203\360
!#\"\204\301\320\342\361\242\242%\210\266	\205\301\362\242\363\242!\3368\262?\205\332\364#\207\314\315\242!\203\351\242\202\353\242!\365\366\350\367\242\242#C\3701\253
X\205\245\334X\2033@\2043\371\372\365U\203\373\202.\374U\203#\373\202.\333U\203-\375\202.\376P#\210
\335Y\205\245\365\374U\203{\3771zr\201A!\203V\201B!\202^\201C\201D\"q\210\201EP\262\201F\201G C\"\211\262)0\210\202{\210\201A!\203\215\201H\201I\"\262)\242>\205\245\371\201J\350\201K\"P$0\266\202\255\266\201LC@?\205\314\365
\334^X\205\314\201M\350\367\242\242#\352\211#\211\205\334\201N\334\201O\201P$\262\201Q\201R%\216@\206\360\211@\307\242!\203\310\242\242	\311\312%\210\202\235\313\242!\2048\314\315\242!\203\242\202\242!\242\316\317N\2030\320\n#\266\2028\320\n\321$\266\322\242!\211\203`\3231Q\324\242#0\266\202\235\325!\210\326@A\"\266\202\235\307\242!\203{\327\242!\203{\306\330\242!\242\"\240\210\314\242!\211\242>\204\215\326\331\332D\"\210\211A@\242>\204\236\326\331\332D\"\210\3338\242>\204\257\326\331\332D\"\210\3348\242>\204\301\326\331\332D\"\210\3358\242>\204\323\326\331\332D\"\210\3368\242>\204\345\326\331\332D\"\210\3378\242>\204\371\326\331\332	D\"\210\3408\204\313\f\242!\203\320\341\242#\210\307\f\242!\203-\327\f\242!\204-\320\342\343\242$\210\344\"\210\345!\204D\320\342\346\242$\210\347\350\351\242\352\211?\205S\f\353!\211\211?\205_\f\354\355\353!\")\266\202\203}\211G\333U\203w\356\202{\211\333\352O\262\357!P)\266\203\360
!#\"\204\233\320\342\361\242\242%\210\266	\205\267\362\242\363\242!\3368\262\n?\205\266\364#)\201S\240\210)\266\202\207" [noninteractive inhibit-message tramp-file-missing cl-struct-tramp-file-name-tags file-name-handler-alist tramp-verbose expand-file-name file-directory-p copy-directory parents copy-contents file-exists-p tramp-dissect-file-name tramp-tramp-file-p file-missing error-conditions tramp-error "No such file or directory: %s" file-local-copy (error quit) rename-file delete-file signal directory-name-p file-name-nondirectory wrong-type-argument tramp-file-name 2 3 4 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 format "put \"%s\" \"%s\"" nil file-local-name string-prefix-p "/:" "/" file-remote-p tramp-smb-get-localname "Cannot copy `%s' to `%s'" tramp-compat-set-file-times file-attributes nofollow 0 "%s..." #1="Copying %s to %s" #2=(error) apply message #3="" 1 #4="Warning: " #5="Tramp: " #6=(error) tramp-inhibit-progress-reporter processp process-buffer tramp-get-connection-buffer dont-create #7="\n%s" append buffer-string process-get vector tramp-debug-message #8="(%d) # " "failed" make-progress-reporter run-at-time 0.1 tramp-progress-reporter-update make-closure #[0 "\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\273\fX\205\271\316X\203^
\204^\317\320\311U\203D\321\202Y\322U\203N\321\202Y\323U\203X\324\202Y\325P#\210\f\326Y\205\271\311\322U\203\230\3271\227r\330!\203}\331!\202\201\332\333\"q\210\334P\262\335\336 C\"\211\262)0\210\202\230\210\330!\203\244\337\340\"\262)\242$>\205\271\317\341\313\342\"P$0\207\266\343\207" [V0 V1 V2 V3 tramp-verbose tramp-inhibit-progress-reporter 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] "done"] 32 (#$ . 18510)])
#@84 Like `delete-directory' for Tramp files.

(fn DIRECTORY &optional RECURSIVE TRASH)
(defalias 'tramp-smb-handle-delete-directory #[769 "\304\305!!\211\242>\204\306\307\310D\"\210\211A@\242>\204$\306\307\310D\"\210\3118\242>\2045\306\307\310D\"\210\3128\242>\204G\306\307\310D\"\210\3138\242>\204Y\306\307\310D\"\210\3148\242>\204k\306\307\310D\"\210\3158\242>\204\306\307\310	D\"\210\3168	\203\252\203\252	\204\242\317!\204\242\320\321\322#\210\202\323!\210\202\324!\203	\203\304\325\326\327\f\"\330
\331\n#\"\210\332\"\210\333\334\335\336\f!\203\332\337\202\333\340\341
!#\"\204r\342!q\210eb\210\343\344\345#\210\320\321\346\347\350!%\210)\324!\203\320\321\351$\210\332\"\207" [cl-struct-tramp-file-name-tags delete-by-moving-to-trash directory-files-no-dot-files-regexp tramp-smb-errors tramp-dissect-file-name expand-file-name signal wrong-type-argument tramp-file-name 2 3 4 5 6 7 tramp-compat-directory-empty-p tramp-error file-error "Directory is not empty, not moving to trash" move-file-to-trash file-exists-p mapc make-closure #[257 "\301!\203\302\300\"\207\303!\207" [V0 file-directory-p delete-directory delete-file] 4 "\n\n(fn FILE)"] directory-files full 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 "%s `%s'" match-string 0 "`%s' not removed."] 18 (#$ . 23736)])
#@68 Like `delete-file' for Tramp files.

(fn FILENAME &optional TRASH)
(defalias 'tramp-smb-handle-delete-file #[513 "\303!\262\304!\205\331\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\"\210	\203\240\203\240\320\n!\207\321\322\323\324\f!\203\260\325\202\261\326\327
!#\"?\205\327r\330!q\210eb\210\331\n\332\333#\210\334\335\336\337\340!%)\266\210\207" [cl-struct-tramp-file-name-tags delete-by-moving-to-trash tramp-smb-errors 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 move-file-to-trash 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 tramp-error file-error "%s `%s'" match-string 0] 17 (#$ . 25283)])
#@91 Like `directory-files' for Tramp files.

(fn DIRECTORY &optional FULL MATCH NOSORT COUNT)
(defalias 'tramp-smb-handle-directory-files #[1281 "\301!\204\"\302!\303\304N\203\305#\266\202\"\305\306$\266\307\310\311\312\"\"\203;\313\314\307\315\316\"\"\"\262\204E\317\320\"\262\321!\203Z\322V\203Z\323\211GZ\"\262\203h\307\315\324\"\"\262\207" [tramp-file-missing file-exists-p tramp-dissect-file-name file-missing error-conditions tramp-error "No such file or directory: %s" mapcar directory-file-name file-name-all-completions "" delete nil make-closure #[257 "\300\302\303\304#)\266\203\205\211\207" [V0 inhibit-changing-match-data nil t string-match] 8 "\n\n(fn X)"] sort string-lessp natnump 0 nbutlast #[257 "\301\302\303\300!#\207" [V0 format "%s/%s" directory-file-name] 5 "\n\n(fn X)"]] 12 (#$ . 26387)])
#@67 Like `expand-file-name' for Tramp files.

(fn NAME &optional DIR)
(defalias 'tramp-smb-handle-expand-file-name #[513 "\211\206	\206	\303\262G\304U\203\305\262\306!\204!\307\"\262\310!\204.\311\312\313D\"\207\314!\211\242	>\204?\315\316\317D\"\210\211A@\242	>\204P\315\316\317D\"\210\3208\242	>\204a\315\316\317D\"\210\3218\242	>\204s\315\316\317D\"\210\3228\242	>\204\205\315\316\317D\"\210\3238\242	>\204\227\315\316\317D\"\210\3248\242	>\204\253\315\316\317	D\"\210\3258\326\327\"\203\320\330\331\332\"G\304U\203\306\202\312\331\332\"\313\211$\262\311\306C\"\204\335\303P\262\333\313\334\326#)\266\203\203\360\303\262\335\311\312C\"\"\207" [default-directory cl-struct-tramp-file-name-tags inhibit-changing-match-data "/" 0 "." file-name-absolute-p tramp-compat-file-name-concat 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 "^/\\.\\.?$" t tramp-make-tramp-file-name] 17 (#$ . 27251)])
#@54 Read ACL data from connection buffer.

(fn PROC VEC)
(defalias 'tramp-smb-action-get-acl #[514 "\304!?\205\363\305!\204r\306!q\210~\210\211\307\310\311 C\3121\265X\205\257\313X\203U	\204U\314\315\316U\203;\317\202P\320U\203E\317\202P\321U\203O\322\202P\323P#\210\324Y\205\257\316\320U\203\217\3251\216r\326!\203t\327!\202x\306\330\"q\210\310P\262\331\311 C\"\211\262)0\210\202\217\210\326!\203\233\332\333\"\262)\242\n>\205\257\314\334\335\336\"P$0\266\202\267\266eb\210m\204\324\337\340\341!)\262\204\324\342y\210e`|\210\202\272m\204\352\343\340\341!)\262\203\352\342y\210\202\324`d|\210\344\345\346\")\207" [tramp-verbose tramp-inhibit-progress-reporter 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) # " "^REVISION:" t looking-at nil "^.+:.+" throw tramp-action ok] 12 (#$ . 28376)])
#@49 Like `file-acl' for Tramp files.

(fn FILENAME)
(defalias 'tramp-smb-handle-file-acl #[257 "\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!\203i\322\323	$\211	=\203a\324\n!\205U\325	!\326\327\330\331
!#\332\330R\333D\nG\334U\204\307\335\336
D\"\262\202\316\335\337C\"\262	\203\334\335\340\fD\"\262\203\352\335\341\nD\"\262\f\203\366\335\342\fD\"\262\211\203
\335\343\344\345@\"D\"\262\211A\262\202\366\335\346!\347\350!PD\"\262\351\352\"\216\353\354\355\"r\211q\210\351\356\"\216\357\360\361p!#\210\357\362p#\210\363\364\365!\366!\n%\317\345\367!\370\371\372#\266\202C\3731
X\205\n\314X\203\232@\204\232\363\374\334U\203~\375\202\225\376U\203\210\375\202\225\313U\203\222\377\202\225\201BP#\210
\315Y\205\n\334\376U\203\340\201C1\337r\201D!\203\277\201E!\202\305\366\201F\"q\210\201GP\262\335\201H C\"\211\262)0\210\202\340\210\201D!\203\362\201I\201J\"\262)\242>\205\n\363\201K\344\201L\"P$0\266\202\266\201M\201J#\210\201M\201N\201O#\210\201P\201Q\"\210\201R\201QA$\210deV\205M\201S\201H !\262*\262)\266\204\262\201T	\323$\210\211\262\266\210\202,\324\n!\205*\325!\326\327\330\331\f!#\332\330R\333D	G\334U\204\230\335\336\fD\"\262\202\237\335\337C\"\262\203\255\335\340D\"\262\203\273\335\341	D\"\262\f\203\307\335\342\fD\"\262\211\203\336\335\343\344\345@\"D\"\262\211A\262\202\307\335\346!\347\350!PD\"\262\351\201U
\"\216\353\354\355\"r\211q\210\351\201V\"\216\357
\360\361p!#\210\357
\362p#\210\363\364\365!\366!\n%
\317\345\367!\370\371\372#\266\202C\3731\345
X\205\337\314X\203o@\204o\363\374\334U\203S\375\202j\376U\203]\375\202j\313U\203g\377\202j\201BP#\210
\315Y\205\337\334\376U\203\265\201C1\264r\201D!\203\224\201E!\202\232\366\201F\"q\210\201GP\262\335\201H C\"\211\262)0\210\202\265\210\201D!\203\307\201I\201J\"\262)\242>\205\337\363\201K\344\201L\"P$0\266\202\347\266\201M\201J#\210\201M\201N\201O#\210\201P\201Q\"\210\201R\201QA$\210deV\205\"\201S\201H !\262*\262)\266\204\266\2100\207\210\201Q\207" [cl-struct-tramp-file-name-tags tramp-cache-undefined tramp-smb-acl-program tramp-smb-options tramp-smb-conf tramp-verbose (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" executable-find tramp-smb-get-share tramp-compat-string-replace "\\" "/" tramp-smb-get-localname "//" "-E" 0 append "-U" "-N" "-W" "-p" "-s" "--option" format "%s" tramp-unquote-shell-quote-argument "2>" tramp-get-remote-null-device make-closure #[0 "\301\300\302\"\210\301\300\303\"\207" [V0 tramp-flush-connection-property #1="process-name" #2="process-buffer"] 3] generate-new-buffer " *temp*" t #[0 "\301\300!\205	\302\300!\207" [V0 buffer-name kill-buffer] 2] 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 "" 1 "Warning: " tramp-inhibit-progress-reporter tramp-smb-actions-get-acl "Tramp: " (error) processp process-buffer dont-create "\n%s" buffer-string process-get vector tramp-debug-message "(%d) # " process-put adjust-window-size-function ignore set-process-query-on-exit-flag nil tramp-process-actions substring-no-properties tramp-set-file-property #[0 "\301\300\302\"\210\301\300\303\"\207" [V0 tramp-flush-connection-property #1# #2#] 3] #[0 "\301\300!\205	\302\300!\207" [V0 buffer-name kill-buffer] 2]] 26 (#$ . 29502)])
#@76 Like `file-attributes' for Tramp files.

(fn FILENAME &optional ID-FORMAT)
(defalias 'tramp-smb-handle-file-attributes #[513 "\211\204\303\262\3041\211\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
\"	$\211	=\203\323	!\203\263\324	\"\202	\325\326\f!!\327\330
!\"\331=\203\313\332\202\314\333\f\331=\203\327\334\202\330\333\335
!\336!\205\337\340A@\"\205\357\341\333\n\312\n8\n\311\f8\fA@\342\257\f\266\206\262\343	\321\322\"$\210\211\262\266\210\202\207\323!\2031\324\n\"\266\210\202\207\325\326!!\327\330\f!\"\n\331=\203I\332\202J\333\331=\203U\334\202V\333\335\f!\336
!\205\205\337\340A@\"\205m\341\333\n\312\n8\n\311\f8\fA@\342\257\f\266\2160\207\210\342\207" [cl-struct-tramp-file-name-tags tramp-cache-undefined 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" 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 tramp-compat-string-search "d" t nil tramp-set-file-property] 29 (#$ . 33447)])
#@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\260	X\205\252\313X\203P\n\204P\314\315\316U\2036\317\202K\320U\203@\317\202K\321U\203J\322\202K\323P#\210	\324Y\205\252\316\320U\203\212\3251\211r\326!\203o\327!\202s\330\331\"q\210\332P\262\333\334 C\"\211\262)0\210\202\212\210\326!\203\226\335\336\"\262)\242>\205\252\314\337\340\341\"P$0\266\202\262\266\342\211\211\211\211\211\211\211\211\211\343\f\340\344\345!\"\"\205Fr\330\f!q\210eb\210\346\342\347#?\205Em\204\334\350\351!\203\352\353\320!!\262\n\353\321!\354\230\203\372\347\202\353\321!\355\230\205\317\262	\202\326\350\356!\203\352\353\320!!\262\352\353\321!!\262\202\326\350\357!\203U\353\320!\262\n\360=\2037\353\321!\202<\352\353\321!!\262\n\360=\203K\353\313!\202P\352\353\313!!\262\202\326\350\361!\203\201\362\352\353\311!!\352\353\304!!\352\353\324!!\352\353\313!!\352\353\321!!\352\353\320!!&\262\202\326\350\363!\203\255\362\352\353\311!!\352\353\304!!\352\353\324!!\352\353\313!!\352\353\321!!\352\353\320!!&\262\202\326\350\364!\203\326\362\352\353\311!!\352\353\304!!\352\353\324!!\352\353\313!!\352\353\321!!\352\353\320!!&\262\342y\210\202\335;\203\376\343\f\340\365\345!\"\"\203\376eb\210\350\366!\203\376\353\320!\262	\204*\204*\204*\204*\204*\204*\204*	\204*\204*\211\205E	\342\n\367!\257\f)\207" [cl-struct-tramp-file-name-tags tramp-verbose tramp-inhibit-progress-reporter 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-+\\([[:digit:]]+\\)\\s-+Blocks:\\s-+[[:digit:]]+\\s-+\\(\\w+\\)" string-to-number match-string "directory" "symbolic" "Inode:\\s-+\\([[:digit:]]+\\)\\s-+Links:\\s-+\\([[:digit:]]+\\)" "Access:\\s-+([[:digit:]]+/\\(\\S-+\\))\\s-+Uid:\\s-+\\([[:digit:]]+\\)\\s-+Gid:\\s-+\\([[:digit:]]+\\)" string "Access:\\s-+\\([[:digit:]]+\\)-\\([[:digit:]]+\\)-\\([[:digit:]]+\\)\\s-+\\([[:digit:]]+\\):\\([[:digit:]]+\\):\\([[:digit:]]+\\)" encode-time "Modify:\\s-+\\([[:digit:]]+\\)-\\([[:digit:]]+\\)-\\([[:digit:]]+\\)\\s-+\\([[:digit:]]+\\):\\([[:digit:]]+\\):\\([[:digit:]]+\\)" "Change:\\s-+\\([[:digit:]]+\\)-\\([[:digit:]]+\\)-\\([[:digit:]]+\\)\\s-+\\([[:digit:]]+\\):\\([[:digit:]]+\\):\\([[:digit:]]+\\)" "readlink \"%s\"" ".+ -> \\(.+\\)" tramp-get-device] 25 (#$ . 35002)])
#@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!!\204\250	\322\323N\203\240\324	#\266\202\250\324	\325$\266\326\327\330\n\"\331\332\"#\266\202\f\204\300
\203\335\333	\334\335\336
!#\"\204\354\337!\210\324	\340\341
$\210\207\314\342\334\343#C\3441\207@X\205\201\314X\203%A\204%\345\346\347U\203\350\202 \351U\203\350\202 \313U\203\352\202 \353P#\210@\315Y\205\201\347@\351U\203a\3541`r\355!\203F\356!\202J\357\360\"q\210\361P\262\362\363 C\"\211\262)0\210\202a\210\355!\203m\364\365\"\262)\242>\205\201\345\366\334\367\"P$0\266\202\211\266\370CA?\205\244\314@\314^X\205\244\371\334\343
#\326\211#\211\205\256\372\314\373\374$\262\375\376

&\216A\206\305\211A\333\334\335\336!#\"\204\344\337!\210\324\340\341$\210)\377\240\210)\266\207" [cl-struct-tramp-file-name-tags tramp-file-missing tramp-temp-name-prefix tramp-compat-temporary-file-directory noninteractive inhibit-message tramp-dissect-file-name file-truename signal wrong-type-argument tramp-file-name 2 3 4 5 6 7 file-exists-p file-missing error-conditions tramp-error "No such file or directory: %s" nil make-temp-file expand-file-name file-name-extension t tramp-smb-send-command format "get \"%s\" \"%s\"" tramp-smb-get-localname delete-file file-error "Cannot make local copy of file `%s'" "%s..." #1="Fetching %s to tmp file %s" #2=(error) apply message 0 #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) # " "failed" make-progress-reporter run-at-time 0.1 tramp-progress-reporter-update make-closure #[0 "\304\203\306\304!\210\301\307\310\311\312\300\302#\303\242D\3131\253
X\205\251\307X\203N\"\204N\314\315\316U\2034\317\202I\320U\203>\317\202I\321U\203H\322\202I\323P#\210
\324Y\205\251\316\320U\203\210\3251\207r\326!\203m\327!\202q\330\331\"q\210\332P\262\333\334 C\"\211\262)0\210\202\210\210\326!\203\224\335\336\"\262)\242#>\205\251\314\337\311\340\"P$0\207\266\341\207" [V0 V1 V2 V3 V4 tramp-verbose cancel-timer 3 "%s...%s" format #1# #2# apply message 0 #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-inhibit-progress-reporter cl-struct-tramp-file-name-tags] 10] "done" tramp-verbose tramp-inhibit-progress-reporter] 20 (#$ . 37851)])
#@76 Like `file-name-all-completions' for Tramp files.

(fn FILENAME DIRECTORY)
(defalias 'tramp-smb-handle-file-name-all-completions #[514 "\302\303\304!!\211\242>\204\305\306\307D\"\210\211A@\242>\204&\305\306\307D\"\210\3108\242>\2047\305\306\307D\"\210\3118\242>\204I\305\306\307D\"\210\3128\242>\204[\305\306\307D\"\210\3138\242>\204m\305\306\307D\"\210\3148\242>\204\201\305\306\307	D\"\210\3158\316!\203\263\317\320	$\211	=\203\253\321\322\323\324!\"!\262\325	\320$\210\211\262\266\210\202\276\321\322\326\324!\"!\266\210\"\207" [cl-struct-tramp-file-name-tags tramp-cache-undefined 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" delete-dups mapcar #[257 "\300\301A@\"\203\302@!\202\211@C\207" [tramp-compat-string-search #1="d" file-name-as-directory] 4 "\n\n(fn X)"] tramp-smb-get-file-entries tramp-set-file-property #[257 "\300\301A@\"\203\302@!\202\211@C\207" [tramp-compat-string-search #1# file-name-as-directory] 4 "\n\n(fn X)"]] 18 (#$ . 40757)])
#@57 Like `file-system-info' for Tramp files.

(fn FILENAME)
(defalias 'tramp-smb-handle-file-system-info #[257 "\3031\241\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\235\316\322C\32319	X\2053\314X\203\331\n\204\331\324\325\326U\203\277\327\202\324\330U\203\311\327\202\324\313U\203\323\331\202\324\332P#\210	\315Y\2053\326\330U\203\3331r\334!\203\370\335!\202\374\336\337\"q\210\340P\262\341\342 C\"\211\262)0\210\202\210\334!\203\343\344\"\262)\242>\2053\324\345\346\347\"P$0\266\202;\266\350\346\351\352\f!\"\"\210r\336!q\210\353\211\211eb\210\353y\210\354\355!\203v\356\357\313!!\262\211\356\357\330!!_\262\211\356\357\314!!_\262\353y\210\354\360!\203\214\361\362\356\357\330!!$\210\205\232\205\232\211ZE\266\203)\266\2100\207\210\353\207" [cl-struct-tramp-file-name-tags tramp-verbose tramp-inhibit-progress-reporter (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) # " tramp-smb-send-command "du %s/*" tramp-smb-get-localname nil 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 (#$ . 41929)])
#@56 Like `file-writable-p' for Tramp files.

(fn FILENAME)
(defalias 'tramp-smb-handle-file-writable-p #[257 "\300!\203\301\302\303!\3048\262\206\305\"\207\306!\300!\205\"\307!\207" [file-exists-p tramp-compat-string-search "w" file-attributes 8 "" file-name-directory file-writable-p] 6 (#$ . 43816)])
#@102 Like `insert-directory' for Tramp files.

(fn FILENAME SWITCHES &optional WILDCARD FULL-DIRECTORY-P)
(defalias 'tramp-smb-handle-insert-directory #[1026 "CC\305\242!\240\210\211\242\204\211\306\240\210\307\242!\203&\204&\211\242\310P\240\210\2034\311\242!\240\210\202;\312\242!\240\210\204E\313\242\314\"\210\315\242!\211\242>\204W\316\317\320D\"\210\211A@\242>\204h\316\317\320D\"\210\3218\242>\204y\316\317\320D\"\210\3228\242>\204\213\316\317\320D\"\210\3238\242>\204\235\316\317\320D\"\210\3248\242>\204\257\316\317\320D\"\210\3258\242>\204\303\316\317\320	D\"\210\3268	\204\317\n\203\234\327 \330\331\"\216\332\242!C\333\334\335\242!!!\336
\242!\337\340\341	\342\343$\344\245\"\203/\345\346\242\"\210\347\350\351\211\242$\240\210\345\352\242\"\210\347\353\351\211\242$\240\210\345\354\242\"\210\347\355\351\211\242$\240\210\356\351\204>\242G\343U\203J\357\330\360\"\"\202R\361\242\"C\"\262\362\330\363\"\"\262\364\310\242\"\203m\365\366\"\210\203\212\203\204\367\370!\204\204\337\371#\202\210\337\372\"c\210\365\330\373%\"\266\204)\207\343\374\337\375\242\"C\3761eX\205_\322X\203\351\f\204\351\377\201@\343U\203\311\306\202\344\201AU\203\325\306\202\344\321U\203\341\201B\202\344\201CP#\210\323Y\205_\343\201AU\2035\201D14r\201E!\203\201F!\202\201G\201H\"q\210\201IP\262\201J\201K C\"\211\262)0\210\2025\210\201E!\203G\201L\201M\"\262)\242>\205_\377\201N\337\201O\"P$0\266\202g\266\201PC\f?\205\204\343\322^X\205\204\201Q\337\375
\242\"\351\211#\211\205\224\201R\322\201S\201T$\262\330\201U
\f%\216\f\206\247\211\327 \330\201V\"\216\332
\242!C\333\334\335\242!!!\336\242!\337\340\341\342\343$\344\245\"\203\n\345\346\242\"\210\347\350\351\211\242$\240\210\345\352\242\"\210\347\353\351\211\242$\240\210\345\354\242\"\210\347\355\351\211\242$\240\210\356\351\204\242G\343U\203'\357\330\201W\"\"\202/\361\242\"C\"\262\362\330\201X\"\"\262\364\310\242\"\203N\365\201Y\"\210\203k\203e\367\370!\204e\337\371#\202i\337\372\"c\210\365\330\201Z%\"\266\204)\262)\201[\240\210)\207" [cl-struct-tramp-file-name-tags noninteractive inhibit-message tramp-verbose tramp-inhibit-progress-reporter expand-file-name #3="" 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 match-data make-closure #[0 "\301\300\302\"\207" [V0 set-match-data evaporate] 3] file-name-nondirectory copy-tree tramp-smb-get-file-entries file-name-directory get-free-disk-space format "%.0f" tramp-get-file-property "used-bytes" 0 1024 string-match "\\." replace-match "\\\\." nil "\\*" ".*" "\\?" ".?" delq mapcar #[257 "\302\303\300\242\"@\304\305\306#)\266\203\205\211\207" [V0 inhibit-changing-match-data format #9="^%s" nil t string-match] 8 "\n\n(fn X)"] assoc sort #[514 "\301\302\300\242\"\203\303\3048\3048\"\207@@\231\207" [V0 tramp-compat-string-search #10="t" time-less-p 3] 6 "\n\n(fn X Y)"] tramp-compat-string-search 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 #11="/" 120 #12="*"] 5 "\n\n(fn X)"] fboundp dired--insert-disk-space "total used in directory %s available %s\n" "total %s\n" #[257 "\211@G\304U?\205\300\305\303!\205$\3061\"\307\310@\311\300\242!\"\312\"0\202$\210\313\314\315\301\242\"\203\203\316\317\3208\262\206:A@\211A@\262\206D\321\3228\262\206N\323\3248\262\206X\325\3268\262\206f\3228\327\330\331\324\f8!\332\333!\"\203y\334\202z\335\3248\"&c\210`\336\310@\311\300\242!\"\302\205\225\311\300\242!\"c\210\337`\340\341$\266\314\315\301\242\"\203\272\211\211@\262;\203\272\342\211@\262\261\210\210\343c\210\344 \207" [V0 V1 V2 V3 0 tramp-smb-get-stat-capability (error) file-attributes expand-file-name file-name-directory string nil tramp-compat-string-search #13="l" format #14="%10s %3d %-8s %-8s %8s %s " 8 1 2 #15="nobody" 3 #16="nogroup" 7 format-time-string time-less-p time-since days-to-time 183 #17="%b %e %R" #18="%b %e %Y" file-relative-name put-text-property dired-filename t #19=" -> " #20="\n" beginning-of-line] 14 "\n\n(fn X)"] "%s..." #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) # " "failed" make-progress-reporter run-at-time 0.1 tramp-progress-reporter-update #[0 "\303\203\306\303!\210\301\307\310\311\312\300\242\"\302\242D\3131\252\fX\205\250\314X\203M
\204M\315\316\307U\2033\317\202H\320U\203=\317\202H\321U\203G\322\202H\323P#\210\f\324Y\205\250\307\320U\203\207\3251\206r\326!\203l\327!\202p\330\331\"q\210\332P\262\333\334 C\"\211\262)0\210\202\207\210\326!\203\223\335\336\"\262)\242\">\205\250\315\337\311\340\"P$0\207\266\341\207" [V0 V1 V2 V3 tramp-verbose tramp-inhibit-progress-reporter 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] #[0 "\301\300\302\"\207" [V0 set-match-data evaporate] 3] #[257 "\302\303\300\242\"@\304\305\306#)\266\203\205\211\207" [V0 inhibit-changing-match-data format #9# nil t string-match] 8 "\n\n(fn X)"] #[514 "\301\302\300\242\"\203\303\3048\3048\"\207@@\231\207" [V0 tramp-compat-string-search #10# time-less-p 3] 6 "\n\n(fn X Y)"] #[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 #11# 120 #12#] 5 "\n\n(fn X)"] #[257 "\211@G\304U?\205\300\305\303!\205$\3061\"\307\310@\311\300\242!\"\312\"0\202$\210\313\314\315\301\242\"\203\203\316\317\3208\262\206:A@\211A@\262\206D\321\3228\262\206N\323\3248\262\206X\325\3268\262\206f\3228\327\330\331\324\f8!\332\333!\"\203y\334\202z\335\3248\"&c\210`\336\310@\311\300\242!\"\302\205\225\311\300\242!\"c\210\337`\340\341$\266\314\315\301\242\"\203\272\211\211@\262;\203\272\342\211@\262\261\210\210\343c\210\344 \207" [V0 V1 V2 V3 0 tramp-smb-get-stat-capability (error) file-attributes expand-file-name file-name-directory string nil tramp-compat-string-search #13# format #14# 8 1 2 #15# 3 #16# 7 format-time-string time-less-p time-since days-to-time 183 #17# #18# file-relative-name put-text-property dired-filename t #19# #20# beginning-of-line] 14 "\n\n(fn X)"] "done"] 28 (#$ . 44134)])
#@68 Like `make-directory' for Tramp files.

(fn DIR &optional PARENTS)
(defalias 'tramp-smb-handle-make-directory #[513 "\302\303!!\262\304!\204\303\"\262\305!\211\242	>\204$\306\307\310D\"\210\211A@\242	>\2045\306\307\310D\"\210\3118\242	>\204F\306\307\310D\"\210\3128\242	>\204X\306\307\310D\"\210\3138\242	>\204j\306\307\310D\"\210\3148\242	>\204|\306\307\310D\"\210\3158\242	>\204\220\306\307\310	D\"\210\3168\204\250\317\n!\203\250\320\321\f#\210\322\n!	\203\304\323	!\203\304\324!\204\304\325\"\210\324!\203\317\326!\210\324!?\205\337\320	\327\330$\207" [default-directory cl-struct-tramp-file-name-tags 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 tramp-error file-already-exists file-name-directory tramp-smb-get-share file-directory-p make-directory make-directory-internal file-error "Couldn't make directory %s"] 16 (#$ . 51018)])
#@65 Like `make-directory-internal' for Tramp files.

(fn DIRECTORY)
(defalias 'tramp-smb-handle-make-directory-internal #[257 "\302\303!!\262\304!\204\303\"\262\305!\211\242	>\204$\306\307\310D\"\210\211A@\242	>\2045\306\307\310D\"\210\3118\242	>\204F\306\307\310D\"\210\3128\242	>\204X\306\307\310D\"\210\3138\242	>\204j\306\307\310D\"\210\3148\242	>\204|\306\307\310D\"\210\3158\242	>\204\220\306\307\310	D\"\210\3168\317!\320\321!!\203\300\322	\323!\203\264\324\325\326 #\202\270\324\327\"\"\210\330	\"\210\320\n!?\205\320\331	\332\333
$\207" [default-directory cl-struct-tramp-file-name-tags 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 tramp-error file-error "Couldn't make directory %s"] 16 (#$ . 52037)])
#@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 "\303\304!!\204\305\306E\"\207\307!\211\242>\204!\310\311\312D\"\210\211A@\242>\2042\310\311\312D\"\210\3138\242>\204C\310\311\312D\"\210\3148\242>\204U\310\311\312D\"\210\3158\242>\204g\310\311\312D\"\210\3168\242>\204y\310\311\312D\"\210\3178\242>\204\215\310\311\312	D\"\210\3208\321\303!\203\255\322\307
!\"\203\255\323\304\f!!\262)\303!\203\352\306\324\211?\205\277\n\211?\205\310\n\325\326\327!\")\266\202\203\331\202\341\330!\326\327!Q)\266\202#\207\331\n!\203\203\247\203\332\333\334\"!\204\335\336#\210\202\337\n!\210\340!\204\"\335\341\342#\210\343\"\210\344\333\345\346\211?\2056\n\327!\211\211?\205B\n\325\326\327!\")\266\202\203`\211G\313U\203Z\347\202^\211\313\346O\262\330!P)\266\203\350
!#\"?\205|\335\341\351\352\f!$\207" [cl-struct-tramp-file-name-tags non-essential file-name-handler-alist 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?" tramp-error file-already-exists 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\"" nil "/" tramp-smb-get-localname "error with make-symbolic-link, see buffer `%s' for details" tramp-get-connection-buffer] 24 (#$ . 53112)])
#@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\312!!\211\242	>\204\"\313\314\315D\"\210\211A@\242	>\2043\313\314\315D\"\210\3168\242	>\204D\313\314\315D\"\210\3178\242	>\204V\313\314\315D\"\210\3208\242	>\204h\313\314\315D\"\210\3218\242	>\204z\313\314\315D\"\210\3228\242	>\204\216\313\314\315	D\"\210\3238\324
!\211\306\325\211\211\211\211\203\312!\325\211?\205\255\n\326!\211\211?\205\271\n\327\330\326!\")\266\202\203\327\211G\316U\203\321\331\202\325\211\316\325O\262\332!P)\266\203\262\333\"\203\362\334!\262\202\335!\262\336\"\262\337\340#\210\341\342
#\262\343!\203\262\202\n;\203-\344!\262\202\n:\203\343@!\203C@\262\202]@;\203T\344@!\262\202]@\203]p\262\316\345\346C\3471\375X\205\367\317X\203\235\f\204\235\350\351\306U\203\203\352\202\230\353U\203\215\352\202\230\316U\203\227\354\202\230\355P#\210\320Y\205\367\306\353U\203\327\3561\326r\357!\203\274\360!\202\300\361\362\"q\210\363P\262\364\365 C\"\211\262)0\210\202\327\210\357!\203\343\366\367\"\262)\242	>\205\367\350\370\341\371\"P$0\266\202\n\266\202\n\203\np\262B\372\373\374#\266\202\262\203(\341\375\376!#\202,\341\377\"\262\201A!\203IT\262\341\201B	#\262\202.\201C\201D	#\210\201C\201E\206f\201F
!#\210\201G1\360\201H1\346r\361!q\210dd}\210\201I!\210\201J!\203\243\201K\341\201L\201M!#\"\210\201K\"\210dd}\210\201N!\201K\201O\"\210\201P!\203\331\201Q\201R!\210\201S!\262\202\277\210ed|\210~)00\210\202\3640\210\201T\262\202\364\210\353\262\203\203\201U\340\"\203\201V \210\201W\201D\"\210\201W\201E\"\210\203)\201X!\210\204<\201Y\201Z\201E\325#!\210@\203I\201[\352\"\210\211\201T=\203V\201\\ \207\207" [default-directory cl-struct-tramp-file-name-tags file-name-handler-alist tramp-verbose tramp-inhibit-progress-reporter tramp-temp-buffer-name 0 error "Implementation does not handle immediate return" tramp-dissect-file-name expand-file-name signal wrong-type-argument tramp-file-name 2 3 4 5 6 7 file-name-nondirectory nil file-local-name string-prefix-p "/:" "/" file-remote-p tramp-equal-remote tramp-unquote-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" process-file-side-effects 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 (#$ . 55059)])
#@91 Like `rename-file' for Tramp files.

(fn FILENAME NEWNAME &optional OK-IF-ALREADY-EXISTS)
(defalias 'tramp-smb-handle-rename-file #[770 "CC\306\242!\240\210\211\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\n\242!\204\305\n\242\323\324N\203\275\325	#\266\202\305\325	\326$\266\n\204\333\322	\242!\203\333\325\327\242#\210\330	\242!\203\365\331	\242!\204\365\325\332\333\f\242$\210\n\204\375\203\205\322	\242!\204c\334\n\242\n\242\"\203c\335\307\242!!\335\307\242!!\230\203c\307\n\242!\211\242>\2045\311\312\313D\"\210\211A@\242>\204F\311\312\313D\"\210\3148\242>\204W\311\312\313D\"\210\3158\242>\204i\311\312\313D\"\210\3168\242>\204{\311\312\313D\"\210\3178\242>\204\215\311\312\313D\"\210\3208\242>\204\241\311\312\313	D\"\210\3218\307\242!\211\242>\204\270\311\312\313D\"\210\211A@\242>\204\311\311\312\313D\"\210\3148\242>\204\332\311\312\313D\"\210\3158\242>\204\354\311\312\313D\"\210\3168\242>\204\376\311\312\313D\"\210\3178\242>\204\311\312\313D\"\210\3208\242>\204$\311\312\313	D\"\210\3218\336\"\210\336\"\210\335!\204F\325\332\337\242$\210\340\341\342\343!\343
!#\"?\205b\325\332\344\242$\207\345\n\242\n\242
\346\347%\210\330\n\242!\203\350\n\242\351\"\207\352\n\242!\207\353\354\341\355\242\242#C\3561/\fX\205)\315X\203\315
\204\315\357\360\353U\203\263\361\202\310\362U\203\275\361\202\310\314U\203\307\363\202\310\364P#\210\f\316Y\205)\353\362U\203\3651r\366!\203\354\367!\202\360\370\371\"q\210\372P\262\373\374 C\"\211\262)0\210\202\210\366!\203\375\376\"\262)\242>\205)\357\377\341\201@\"P$0\266\2021\266\201AC
?\205S\353\f\315^X\205S\201B\341\355
\242
\242#\201C\211#\211\205c\201D\315\201E\201F$\262\201G\201H


&\216
\206}\211\322\242!\204\350\334\f\242\f\242\"\203\350\335\307
\242!!\335\307
\242!!\230\203\350\307\f\242!\211\242>\204\266\311\312\313D\"\210\211A@\242>\204\307\311\312\313D\"\210\3148\242>\204\330\311\312\313D\"\210\3158\242>\204\352\311\312\313D\"\210\3168\242>\204\374\311\312\313D\"\210\3178\242>\204\311\312\313D\"\210\3208\242>\204\"\311\312\313	D\"\210\3218\307\242!\211\242>\2049\311\312\313D\"\210\211A@\242>\204J\311\312\313D\"\210\3148\242>\204[\311\312\313D\"\210\3158\242>\204m\311\312\313D\"\210\3168\242>\204\311\312\313D\"\210\3178\242>\204\221\311\312\313D\"\210\3208\242>\204\245\311\312\313	D\"\210\3218\336\"\210\336\"\210\335!\204\307\325\332\337\242$\210\340\341\342\343!\343
!#\"?\205\343\325\332\344\242$\266\220\202\345\f\242\f\242\346\347%\210\330\f\242!\203\350\f\242\351\"\202\352\f\242!)\201I\240\210)\207" [cl-struct-tramp-file-name-tags tramp-file-missing noninteractive inhibit-message tramp-verbose tramp-inhibit-progress-reporter 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 file-missing error-conditions tramp-error "No such file or directory: %s" file-already-exists file-directory-p directory-name-p file-error "File is a directory %s" tramp-equal-remote tramp-smb-get-share tramp-flush-file-properties "Target `%s' must contain a share name" tramp-smb-send-command format "rename \"%s\" \"%s\"" tramp-smb-get-localname "Cannot rename `%s'" copy-file keep-time preserve-uid-gid delete-directory recursive delete-file 0 "%s..." #1="Renaming %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) # " "failed" make-progress-reporter nil run-at-time 0.1 tramp-progress-reporter-update make-closure #[0 "\304\203\306\304!\210\302\307\310\311\312\300\242\301\242#\303\242D\3131\255
X\205\253\314X\203P\"\204P\315\316\307U\2036\317\202K\320U\203@\317\202K\321U\203J\322\202K\323P#\210
\324Y\205\253\307\320U\203\212\3251\211r\326!\203o\327!\202s\330\331\"q\210\332P\262\333\334 C\"\211\262)0\210\202\212\210\326!\203\226\335\336\"\262)\242#>\205\253\315\337\311\340\"P$0\207\266\341\207" [V0 V1 V2 V3 V4 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-inhibit-progress-reporter cl-struct-tramp-file-name-tags] 10] "done"] 38 (#$ . 58452)])
#@30 Set ACL data.

(fn PROC VEC)
(defalias 'tramp-smb-action-set-acl #[514 "\303!?\205\272\304!\204r\305!q\210\211\306\307\310 C\3111\263X\205\255\312X\203S	\204S\313\314\315U\2039\316\202N\317U\203C\316\202N\320U\203M\321\202N\322P#\210\323Y\205\255\315\317U\203\215\3241\214r\325!\203r\326!\202v\305\327\"q\210\307P\262\330\310 C\"\211\262)0\210\202\215\210\325!\203\231\331\332\"\262)\242\n>\205\255\313\333\334\335\"P$0\266\202\265\266\336\337\340\")\207" [tramp-verbose tramp-inhibit-progress-reporter 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) # " throw tramp-action ok] 12 (#$ . 63432)])
#@64 Like `set-file-acl' for Tramp files.

(fn FILENAME ACL-STRING)
(defalias 'tramp-smb-handle-set-file-acl #[514 "\3061\225\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\221\323	!\205\221\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\342D\"\262\203\353\337\343	D\"\262\203\367\337\344D\"\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\360
\"\216\361\362\363\"r\211q\210\357\364\"\216\365
\366\367p!#\210\365
\370p#\210\371\372\373!\374!	%
\317\347\375!\376\377\201A#\266\202C\201B1#\fX\205\314X\203\253
\204\253\371\201C\336U\203\211\201D\202\246\201EU\203\227\201D\202\246\313U\203\243\201F\202\246\201GP#\210\f\315Y\205\336\201EU\203\363\201H1\362r\201I!\203\322\201J!\202\330\374\201K\"q\210\201LP\262\337\201M C\"\211\262)0\210\202\363\210\201I!\203\201N\201O\"\262)\242>\205\371\201P\346\201Q\"P$0\266\202%\266\201R\201O#\210\201R\201S\201T#\210\201U\201V\"\210\201W\201V@$\210\201X\201Y!\204j\201Z\201[\201\\	$\210\201]\201Vw\210\201^p!\336U\205\211\201_\322$\210\363\262*\262)\266\204\266\2100\207\210\201V\207" [cl-struct-tramp-file-name-tags tramp-smb-acl-program tramp-smb-options tramp-smb-conf tramp-verbose tramp-inhibit-progress-reporter (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 tramp-compat-string-replace "\\" "/" 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-closure #[0 "\301\300\302\"\210\301\300\303\"\207" [V0 tramp-flush-connection-property "process-name" "process-buffer"] 3] generate-new-buffer " *temp*" t #[0 "\301\300!\205	\302\300!\207" [V0 buffer-name kill-buffer] 2] tramp-set-connection-property "process-name" buffer-name "process-buffer" apply start-process tramp-get-connection-name tramp-get-connection-buffer process-command " " mapconcat tramp-smb-actions-set-acl identity (error) message "" 1 "Warning: " "Tramp: " (error) processp process-buffer dont-create "\n%s" buffer-string process-get vector tramp-debug-message "(%d) # " process-put adjust-window-size-function ignore set-process-query-on-exit-flag nil tramp-process-actions tramp-search-regexp "tramp_exit_status [[:digit:]]+" tramp-error file-error "Couldn't find exit status of `%s'" "^ " read tramp-set-file-property] 26 (#$ . 64326)])
#@75 Like `set-file-modes' for Tramp files.

(fn FILENAME MODE &optional FLAG)
(defalias 'tramp-smb-handle-set-file-modes #[770 "\301!\211\242>\204\302\303\304D\"\210\211A@\242>\204\"\302\303\304D\"\210\3058\242>\2043\302\303\304D\"\210\3068\242>\204E\302\303\304D\"\210\3078\242>\204W\302\303\304D\"\210\3108\242>\204i\302\303\304D\"\210\3118\242>\204}\302\303\304	D\"\210\3128\313=\205\214\314!?\205\266\315!\205\266\316\"\210\317\320\321\322\f!#\"?\205\266\323\324\325$\207" [cl-struct-tramp-file-name-tags tramp-dissect-file-name signal wrong-type-argument tramp-file-name 2 3 4 5 6 7 nofollow file-symlink-p tramp-smb-get-cifs-capabilities tramp-flush-file-properties tramp-smb-send-command format "chmod \"%s\" %o" tramp-smb-get-localname tramp-error file-error "Error while changing file's mode %s"] 17 (#$ . 67313)])
#@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\331#\216\212\214\332!\203\307\211T\262\333\334#\262\202\262\335
\336#\210\335
\337#\210r\340
!q\210\341dd}\210\342
!\210\343
!\203\375\344
\333\345\f\346\f!#\"\210\f\316\347C\3501\236\fX\205\230\313X\203>
\204>\351\352\327U\203$\353\2029\354U\203.\353\2029\312U\2038\355\2029\356P#\210\f\314Y\205\230\327\354U\203x\3571wr\360!\203]\361!\202a\340\362\"q\210\363P\262\364\365 C\"\211\262)0\210\202x\210\360!\203\204\366\367\"\262)\242	>\205\230\351\370\333\371\"P$0\266\202\240\266\372
\"\210*\373
!+\207" [default-directory cl-struct-tramp-file-name-tags tramp-temp-buffer-name buffer-undo-list tramp-verbose tramp-inhibit-progress-reporter 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-closure #[0 "r\303\300!q\210\304\n\305 \"\203\306\307\300!\310\"\210\311p!\210\202 \312\301!\210)\313\300\314\"\210\313\300\315\"\207" [V0 V1 tramp-temp-buffer-name tramp-get-connection-buffer tramp-compat-string-search buffer-name set-process-buffer tramp-get-connection-process nil kill-buffer set-buffer-modified-p tramp-flush-connection-property "process-name" "process-buffer"] 3] 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 vector tramp-debug-message "(%d) # " tramp-send-string tramp-get-connection-process] 27 (#$ . 68202)])
#@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 (#$ . 70484)])
#@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\206\242!\262\310\242!\211\242>\204%\311\312\313D\"\210\211A@\242>\2046\311\312\313D\"\210\3148\242>\204G\311\312\313D\"\210\3158\242>\204Y\311\312\313D\"\210\3168\242>\204k\311\312\313D\"\210\3178\242>\204}\311\312\313D\"\210\3208\242>\204\221\311\312\313	D\"\210\3218	\203\275\322	\242!\203\275	\323=\204\264\324\325\326\242\"!\204\275\327\330\242#\210\331!\332=p\n\242\333\334\306	\n\"\335\332\"#\266\202\336\337
\242!!\204\370\340!\203\370\204\370\332\262\341\342!\203\370\342!\210\203
\322\f\242!\203
\343\f\242\344#\210\333\345\346%\210)\f\204#
\203E\347\350\"\216\351\325\352\353!#\"\204A\327\354\355\242$\210)\202o\n\315\356\325\357\242#C\3601\367@X\205\361\315X\203\215A\204\215\361\362\363U\203s\364\202\210\365U\203}\364\202\210\314U\203\207\366\202\210\367P#\210@\316Y\205\361\363@\365U\203\311\3701\310r\371!\203\256\372!\202\262\373\374\"q\210\375P\262\376\377 C\"\211\262)0\210\202\311\210\371!\203\331\201B\201C\"\262)\242>\205\361\361\201D\325\201E\"P$0\266\202\371\266\201FCA?\205\315@\315^X\205\201G\325\357\242#\333\211#\211\205)\201H\315\201I\201J$\262\347\201K&\216A\206B\211A\347\201L\"\216\351
\325\352\353!#\"\204e\327
\354\355\242$\210*\201M\240\210)\266\201N\"\210p\232\204\211\327\354\201Op%\210\332=\204\226;\203\256\201P\201Q
\242!\3178\262\206\254\201R !\210\203\301\341\201S!\203\301\201S!\210\f\204\207\332=\204\325\201T!\203\207\n\363\201U\242C\3601\205@X\205\315X\203A\204\361\362\363U\203\364\202\365U\203\364\202\314U\203\366\202\367P#\210@\316Y\205\363@\365U\203W\3701Vr\371!\203<\372!\202@\373\374\"q\210\375P\262\376\377 C\"\211\262)0\210\202W\210\371!\203g\201B\201C\"\262)\242>\205\361\201D\325\201E\"P$0\266\202\207\266\201V\201W!\207" [cl-struct-tramp-file-name-tags tramp-temp-name-prefix tramp-compat-temporary-file-directory create-lockfiles noninteractive inhibit-message expand-file-name file-truename 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?" tramp-error file-already-exists file-locked-p t nil make-temp-file file-name-extension auto-save-file-name-p file-name-nondirectory file-remote-p functionp lock-file copy-file ok write-region no-message make-closure #[0 "\301\300!\207" [V0 delete-file] 2] tramp-smb-send-command "put \"%s\" \"%s\"" tramp-smb-get-localname file-error "Cannot write `%s'" "%s..." #1="Moving tmp file %s to %s" #2=(error) apply message 0 #3="" 1 #4="Warning: " #5="Tramp: " #6=(error) processp process-buffer tramp-get-connection-buffer dont-create #7="\n%s" append buffer-string tramp-verbose tramp-inhibit-progress-reporter process-get vector tramp-debug-message #8="(%d) # " "failed" make-progress-reporter run-at-time 0.1 tramp-progress-reporter-update #[0 "\304\203\306\304!\210\301\307\310\311\312\302\300\242#\303\242D\3131\254
X\205\252\307X\203O\"\204O\314\315\316U\2035\317\202J\320U\203?\317\202J\321U\203I\322\202J\323P#\210
\324Y\205\252\316\320U\203\211\3251\210r\326!\203n\327!\202r\330\331\"q\210\332P\262\333\334 C\"\211\262)0\210\202\211\210\326!\203\225\335\336\"\262)\242#>\205\252\314\337\311\340\"P$0\207\266\341\207" [V0 V1 V2 V3 V4 tramp-verbose cancel-timer 3 "%s...%s" format #1# #2# apply message 0 #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-inhibit-progress-reporter cl-struct-tramp-file-name-tags] 10] #[0 "\301\300!\207" [V0 delete-file] 2] "done" tramp-flush-file-properties "Buffer has changed from `%s' to `%s'" set-visited-file-modtime file-attributes current-time unlock-file string-or-null-p "Wrote %s" run-hooks tramp-handle-write-region-hook] 29 (#$ . 71509)])
#@47 Return the share name of LOCALNAME.

(fn VEC)
(defalias 'tramp-smb-get-share #[257 "\300 \301\302\"\216\303!\304\305\"\205\306\307\"\262)\207" [match-data make-closure #[0 "\301\300\302\"\207" [V0 set-match-data evaporate] 3] tramp-file-name-unquote-localname string-match "^/?\\([^/]+\\)/" match-string 1] 6 (#$ . 75763)])
#@101 Return the file name of LOCALNAME.
If VEC has no cifs capabilities, exchange "/" by "\\".

(fn VEC)
(defalias 'tramp-smb-get-localname #[257 "\301 \302\303\"\216\304!\305\306\"\203)\307!\204\"\310\311\312\313\"\314#\2028\312\313\"\2028\305\315\"\2037\312\313\"\2028\314\262\305\316\"\203J\317\320\321\211\313%\262\322\321\323\305#)\266\203\203f\324\325\326\327\"$\210\211\262)\207" [inhibit-changing-match-data match-data make-closure #[0 "\301\300\302\"\207" [V0 set-match-data evaporate] 3] tramp-file-name-unquote-localname string-match "^/?[^/]+\\(/.*\\)" tramp-smb-get-cifs-capabilities mapconcat #[257 "\211\300=\203\301\207\302!\207" [47 "\\" char-to-string] 3 "\n\n(fn X)"] match-string 1 "" "^/?\\([^/]+\\)$" "\\(\\$\\$\\)\\(/\\|$\\)" replace-match "$" nil " $" t tramp-error file-error "Invalid file name %s" tramp-make-tramp-file-name] 10 (#$ . 76101)])
#@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 "\303\304!!\211\242>\204\305\306\307D\"\210\211A@\242>\204$\305\306\307D\"\210\3108\242>\2045\305\306\307D\"\210\3118\242>\204G\305\306\307D\"\210\3128\242>\204Y\305\306\307D\"\210\3138\242>\204k\305\306\307D\"\210\3148\242>\204\305\306\307	D\"\210\3158\206\210\316\262\317!\203*\320\321	$\211	=\203)\322	!\323\n\324\325#\325\211\204\267\203\267\262\202\203\312\326
\327\330\331!\"\"\210\202\317\332
!\210r\333
!q\210eb\210\334\n\325\335#\203\360\336
\337\340\341\342!%\210\202m\204\343!\262\325y\210\211\203\360\211B\262\202\360)\204\344
\324#\210\345B\262\346\325\"\266\204\262\347	\321$\210\207\322!\323	\324\325#\325\211\204D\203D\262\202\241\203W\326\f\327\330\331!\"\"\210\202\\\332\f!\210r\333\f!q\210eb\210\334\n\325\335#\203}\336\f\337\340\341\342!%\210\202\225m\204\225\343!\262\325y\210\211\203}\211B\262\202})\204\241\344\f\324#\210\345B\262\346\325\"\207" [cl-struct-tramp-file-name-tags tramp-cache-undefined tramp-smb-errors 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" 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 tramp-error file-error "%s `%s'" match-string 0 tramp-smb-read-file-entry tramp-set-connection-property ("" "drwxrwxrwx" 0 (0 0)) delq tramp-set-file-property] 20 (#$ . 77007)])
#@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|\306\307\f\"\262\n\310\262	\311\262\202|\3122{\304\313\f\"\203J\314\306\307
\"!\262\n\311\315O\262\202O\316\312\303\"\210\304\317\f\"\203|\314\306\307
\"!\262\314\306\320
\"!\262\314\306\321
\"!\262\n\311\322O\262\202\201\316\312\303\"\210\304\313\f\"\203\234\314\306\307
\"!\262\n\311\323O\262\202\241\316\312\303\"\210\304\324\f\"\203\272\306\307\f\"\262\n\311\325O\262\202\277\316\312\303\"\210\324\303\326\304#)\266\203\203\332\n\311\315O\262\202\337\316\312\303\"\210\304\313\f\"\203\327\306\307
\"GT][\314\306\307\"!\262	\304\330
\303O\"\203\211\311\225\\\262\311O\262\f\210\202\316\312\303\"\210\304\331\f\"\203^\306\307\f\"\206,\332\262	\333\334\335\336\f\"\203<\337\202=\340\341\342\343\333\344\335\345\"\203N\340\202O\346\"##\262	\n\311\347O\262\202c\316\312\303\"\210\304\350\f\"\203v\306\307\f\"\211\262\202z\316\312\303\"0\210	\205\306\205\306\205\306\203\273\203\273\203\273\203\273\203\273\203\273\351	\352\f\227\353\354!\"A&\202\274	\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-- "\\([[:digit:]]+\\)$" string-to-number -5 throw "\\([[:digit:]]+\\):\\([[:digit:]]+\\):\\([[:digit:]]+\\)$" 2 3 -9 -3 "\\(\\w+\\)$" -4 t 10 "\\([ACDEHNORrsSTV]+\\)" "\\([ACDEHNORrsSTV]+\\)?$" #1="" format "%s%s" tramp-compat-string-search "D" "d" "-" mapconcat #[257 "\300\207" [#1#] 2 "\n\n(fn X)"] "    " "r%sx" "R" "w" -6 "^\\s-+\\(\\S-\\(.*\\S-\\)?\\)\\s-*$" encode-time assoc default-toplevel-value parse-time-months] 23 (#$ . 78869)])
#@65 Check whether the SMB server supports POSIX commands.

(fn VEC)
(defalias 'tramp-smb-get-cifs-capabilities #[257 "\301\302!!\205W\303\304\305#\205W\303\306!\307#\211=\203T\310 \311\312\"\216\313\304\"\205Gr\314!q\210eb\210\315\316\317\305#\205F\320\321`\322 {\317\323#\235))\262\262\324\306!\307#\210\211\262\207" [tramp-cache-undefined process-live-p tramp-get-connection-process tramp-get-connection-property "posix" t tramp-get-process "cifs-capabilities" match-data make-closure #[0 "\301\300\302\"\207" [V0 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] 8 (#$ . 80833)])
#@69 Check whether the SMB server supports the `stat' command.

(fn VEC)
(defalias 'tramp-smb-get-stat-capability #[257 "\301!\205,\302\303!!\205,\304\305!\306#\211=\203)\307\310\"\262\311\305!\306#\210\211\262\207" [tramp-cache-undefined tramp-smb-get-share process-live-p tramp-get-connection-process tramp-get-connection-property tramp-get-process "stat-capability" tramp-smb-send-command "stat \"/\"" tramp-set-connection-property] 6 (#$ . 81598)])
#@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\243X\205\235\307X\203C	\204C\310\311\312U\203)\313\202>\314U\2033\313\202>\315U\203=\316\202>\317P#\210\320Y\205\235\312\314U\203}\3211|r\322!\203b\323!\202f\324\325\"q\210\326P\262\327\330 C\"\211\262)0\210\202}\210\322!\203\211\331\332\"\262)\242\n>\205\235\310\333\334\335\"P$0\266\202\245\266\336\"\210\337!\207" [tramp-verbose tramp-inhibit-progress-reporter 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) # " tramp-send-string tramp-smb-wait-for-output] 12 (#$ . 82066)])
#@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\260\314!\204\260	\315P\204\220\316	!\2047\317\320\321	\f%\210\322!\323\324\3251\334
X\205\326\326X\203{@\204{\327\330\331U\203a\332\202v\333U\203k\332\202v\334U\203u\335\202v\336P#\210
\337Y\205\326\331\333U\203\265\3401\264r\314!\203\232\341!\202\236\312\342\"q\210\343P\262\344\345 C\"\211\262)0\210\202\265\210\314!\203\301\346\347\"\262)\242A>\205\326\327\350\351\352\"P$0\266\202\336\266\323\343C\3251\200
X\205z\326X\203@\204\327\330\331U\203\332\202\333U\203\332\202\334U\203\335\202\336P#\210
\337Y\205z\331\333U\203Y\3401Xr\314!\203>\341!\202B\312\342\"q\210\343P\262\344\345 C\"\211\262)0\210\202Y\210\314!\203e\346\347\"\262)\242A>\205z\327\350\351\352\"P$0\266\202\202\266\353\354\"\203\220\355\332\324\211$\356\357#\230\204\246\360\332\"\210\361!\210\362\357#\210)\266rq\210eb\210\363\364\365\356\366\331#!\"\203\332\367!\203\332\370B\324\371#\203\332\372!\210\324\262)\367!\205\354\206\354\356\373\332#\230?\205\325\374 \375\376\"\216\203rq\210\377 \210)\203\314!\203\372!\210\242A>\204'\201Q\201R\201SD\"\210\3348\242A>\204B\201Q\201R\201S	D\"\210\3378\242A>\204]\201Q\201R\201S\nD\"\210\3268\242A>\204x\201Q\201R\201SD\"\210\201T	8C\324\n\203\221\201UPC\262\202\261	\203\246\201U\201V\fRC\262\202\261\201W\201XE\262G\331U\204\306\344\201YD\"\262\202\317\344\201ZC\"\262\203\336\344\201[D\"\262\203\354\344\201\\D\"\262D\203\374\344\201]DD\"\262\211\203\211@\344\201^D\"\262A\266\202\202\375\210\n\203\"\344\fC\"\262E\204,F\203h\324GHI\201_JPKBK\327\201`\201a!\312!\203XL\202Y	%*\f\323\201b\201c!\201d\201e\201f#\266\202C\3251
X\205\f\326X\203\261@\204\261\327\330\331U\203\227\332\202\254\333U\203\241\332\202\254\334U\203\253\335\202\254\336P#\210
\337Y\205\f\331\333U\203\353\3401\352r\314!\203\320\341!\202\324\312\342\"q\210\343P\262\344\345 C\"\211\262)0\210\202\353\210\314!\203\367\346\347\"\262)\242A>\205\f\327\350\351\352\"P$0\266\202\266\201g\347#\210\201g\201h\201i#\210\201j\324\"\210\201k
!\210\201l1u\371F\201m\324\204Q\203VM\202XN$\210\362\373
#\210\362\201n\333#\210\362\201o\371#)0\202`r\312!q\210eb\210\201p\201O!\203UO\203U\201qP\324\371#\203U\324O
\326\201r\324\3251?
X\2059\326X\203\336@\204\336\327\330\331U\203\304\332\202\331\333U\203\316\332\202\331\334U\203\330\335\202\331\336P#\210
\337Y\2059\331\333U\203\3401r\314!\203\375\341!\202\312\342\"q\210\343P\262\344\345 C\"\211\262)0\210\202\210\314!\203$\346\347\"\262)\242A>\2059\327\350\351\352\"P$0\266\202A\266\201s\371\"\210\201t\")\202]\201Q@A\")\262*\262\266\206\202\322\326\201u\351\201v\nG\331U\204\203\n\201wP\202\204\332\n\206\214\332$C\3251*
X\205$\326X\203\311@\204\311\327\330\331U\203\257\332\202\304\333U\203\271\332\202\304\334U\203\303\335\202\304\336P#\210
\337Y\205$\331\333U\203\3401r\314!\203\350\341!\202\354\312\342\"q\210\343P\262\344\345 C\"\211\262)0\210\202\210\314!\203\346\347\"\262)\242A>\205$\327\350\351\352\"P$0\266\202,\266\201xC@?\205c\326
\326^X\205c\201y\351\201v	G\331U\204V	\201wP\202W\332	\206_\332$\324\211#\211\205s\201z\326\201{\201|$\262\375\201}&\216@\206\216\211@\324GHI\201_JPKBK\327\201`\201a!\312!\203\274L\202\275	%*\323\201b\201c!\201d\201e\201f#\266\202C\3251w
X\205q\326X\203@\204\327\330\331U\203\374\332\202\333U\203\332\202\334U\203\335\202\336P#\210
\337Y\205q\331\333U\203P\3401Or\314!\2035\341!\2029\312\342\"q\210\343P\262\344\345 C\"\211\262)0\210\202P\210\314!\203\\\346\347\"\262)\242A>\205q\327\350\351\352\"P$0\266\202y\266\201g\347#\210\201g\201h\201i#\210\201j\324\"\210\201k!\210\201~1\332\371F\201m\324\204\266\203\273M\202\275N$\210\362\373#\210\362\201n\333#\210\362\201o\371#)0\202\305r\312!q\210eb\210\201p\201O!\203\272O\203\272\201qP\324\371#\203\272\324O\326\201r\324\3251\244
X\205\236\326X\203C@\204C\327\330\331U\203)\332\202>\333U\2033\332\202>\334U\203=\335\202>\336P#\210
\337Y\205\236\331\333U\203}\3401|r\314!\203b\341!\202f\312\342\"q\210\343P\262\344\345 C\"\211\262)0\210\202}\210\314!\203\211\346\347\"\262)\242A>\205\236\327\350\351\352\"P$0\266\202\246\266\201s\371\"\210\201t\")\202\302\201Q@A\")\262*\262)\201\240\210)\266\210)\262\207" [tramp-compat-temporary-file-directory tramp-smb-program default-directory tramp-smb-version exec-path tramp-verbose tramp-connectable-p throw non-essential tramp-smb-get-share tramp-get-connection-buffer get-buffer-process processp " -V" executable-find tramp-error file-error "Cannot find command %s in %s" shell-command-to-string 6 nil #4=(error) 3 apply message 0 #3="" 1 2 #5="Warning: " #6="Tramp: " 4 #7=(error) process-buffer dont-create #8="\n%s" append buffer-string process-get vector tramp-debug-message format #9="(%d) # " 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 60 time-since "last-cmd-time" process-live-p re-search-forward t delete-process "smb-share" match-data make-closure #[0 "\301\300\302\"\207" [V0 set-match-data evaporate] 3] erase-buffer tramp-inhibit-progress-reporter cl-struct-tramp-file-name-tags tramp-smb-errors tramp-smb-options tramp-smb-conf noninteractive inhibit-message coding-system-for-read tramp-process-connection-type process-connection-type tramp-terminal-type process-environment tramp-smb-winexe-program tramp-smb-actions-with-share tramp-smb-actions-without-share auth-sources tramp-smb-wrong-passwd-regexp signal wrong-type-argument tramp-file-name 5 "//" "/" "-g" "-L" "-U" "-N" "-W" "-p" "-s" "--option" "TERM=" start-process tramp-get-connection-name "%s" process-command " " mapconcat identity process-put adjust-window-size-function ignore set-process-query-on-exit-flag tramp-set-connection-local-variables (error) tramp-process-actions "chunksize" "connected" boundp search-forward-regexp "Retry connection with new password" tramp-cleanup-connection tramp-smb-maybe-open-connection "%s..." #1="Opening connection for //%s%s/%s" #2="@" "failed" make-progress-reporter run-at-time 0.1 tramp-progress-reporter-update #[0 "\305\203\306\305!\210\300\307\310\311\312\302G\313U\204\302\314P\202\315\303\301\206!\315$\304\242D\3161\300#X\205\276\307X\203a$\204a\317\320\313U\203G\315\202\\\321U\203Q\315\202\\\322U\203[\323\202\\\324P#\210#\325Y\205\276\313#\321U\203\235\3261\234r\327!\203\202\330!\202\206\331\332\"q\210\333P\262\334\335 C\"\211\262)0\210\202\235\210\327!\203\251\336\337\"\262)\242%>\205\276\317\340\311\341\"P$0\207\266\342\207" [V0 V1 V2 V3 V4 V5 cancel-timer 3 "%s...%s" format #1# 0 #2# #3# #4# apply message 1 2 #5# #6# 4 #7# processp process-buffer tramp-get-connection-buffer dont-create #8# append buffer-string process-get vector tramp-debug-message #9# nil tramp-verbose tramp-inhibit-progress-reporter cl-struct-tramp-file-name-tags] 10] (error) "done"] 26 (#$ . 83019)])
#@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\"\204eb\210\202\315\316\317 C\3201\300\nX\205\272\321X\203`\204`\322\323\314U\203F\324\202[\325U\203P\324\202[\326U\203Z\327\202[\330P#\210\n\331Y\205\272\314\325U\203\232\3321\231r\333!\203\334!\202\203\306\335\"q\210\316P\262\336\317 C\"\211\262)0\210\202\232\210\333!\203\246\337\340\"\262)\242\f>\205\272\322\341\342\343\"P$0\266\202\302\266eb\210\311	\312\310#\203\332db\210\344	\312\310#\210`d|\210eb\210\311
\312\310#)?\262)\207" [inhibit-read-only tramp-smb-prompt tramp-verbose tramp-inhibit-progress-reporter 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 (#$ . 91034)])
#@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 (#$ . 92200)])
#@82 Apply a remote command, if possible, using `tramp-smb-winexe-program'.

(fn VEC)
(defalias 'tramp-smb-call-winexe #[257 "\304!\204
\305\306\307$\210\211\242	>\204\310\311\312D\"\210\3138\203'\305\306\314#\210\315\316\317\n#\"\210\320\321\322\323\324$\210\325\326!\327\"\210\330\331\"\210\330\332\"\210\330\333\"\210\330\334\"\210\330\335\"\210\330\336\"\210\330\337\"\207" [tramp-smb-winexe-program cl-struct-tramp-file-name-tags tramp-smb-winexe-shell-command tramp-smb-winexe-shell-command-switch executable-find tramp-error file-error "Cannot find program: %s" signal wrong-type-argument tramp-file-name 5 "Port not supported for remote processes" tramp-smb-maybe-open-connection format "%s %s" add-hook kill-buffer-hook tramp-smb-kill-winexe-function nil t set-process-coding-system tramp-get-connection-process 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"] 7 (#$ . 92452)])
#@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 (#$ . 93549)])
(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)

Youez - 2016 - github.com/yon3zu
LinuXploit