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-fuse.elc
;ELC
;;; Compiled
;;; in Emacs version 28.2
;;; with all optimizations.



(require 'tramp)
#@84 Like `delete-directory' for Tramp files.

(fn DIRECTORY &optional RECURSIVE TRASH)
(defalias 'tramp-fuse-handle-delete-directory #[769 "\301\302!!\211\242>\204\303\304\305D\"\210\211A@\242>\204$\303\304\305D\"\210\3068\242>\2045\303\304\305D\"\210\3078\242>\204G\303\304\305D\"\210\3108\242>\204Y\303\304\305D\"\210\3118\242>\204k\303\304\305D\"\210\3128\242>\204\303\304\305	D\"\210\3138\314\"\210\315\316\f!#\207" [cl-struct-tramp-file-name-tags tramp-dissect-file-name expand-file-name signal wrong-type-argument tramp-file-name 2 3 4 5 6 7 tramp-flush-directory-properties delete-directory tramp-fuse-local-file-name] 15 (#$ . 101)])
#@68 Like `delete-file' for Tramp files.

(fn FILENAME &optional TRASH)
(defalias 'tramp-fuse-handle-delete-file #[513 "\301\302!!\211\242>\204\303\304\305D\"\210\211A@\242>\204$\303\304\305D\"\210\3068\242>\2045\303\304\305D\"\210\3078\242>\204G\303\304\305D\"\210\3108\242>\204Y\303\304\305D\"\210\3118\242>\204k\303\304\305D\"\210\3128\242>\204\303\304\305	D\"\210\3138\314\315!\n\"\210\316\"\207" [cl-struct-tramp-file-name-tags tramp-dissect-file-name expand-file-name signal wrong-type-argument tramp-file-name 2 3 4 5 6 7 delete-file tramp-fuse-local-file-name tramp-flush-file-properties] 13 (#$ . 795)])
#@46 Remove hidden files from directory listings.
(defvar tramp-fuse-remove-hidden-files nil (#$ . 1457))
#@45 Remove hidden files from FILES.

(fn FILES)
(defalias 'tramp-fuse-remove-hidden-files #[257 "\203	\301\302\"\207\207" [tramp-fuse-remove-hidden-files cl-remove-if #[257 "\211;\205\301\302\303\304#)\266\203\207" [inhibit-changing-match-data "\\.fuse_hidden" nil t string-match] 8 "\n\n(fn X)"]] 4 (#$ . 1564)])
(byte-code "\300\301\302\303#\304\301\305\306#\207" [function-put tramp-fuse-remove-hidden-files speed -1 put byte-optimizer byte-compile-inline-expand] 5)
#@91 Like `directory-files' for Tramp files.

(fn DIRECTORY &optional FULL MATCH NOSORT COUNT)
(defalias 'tramp-fuse-handle-directory-files #[1281 "\305!\204\"\306!\307\310N\203\311#\266\202\"\311\312$\266\313!\205S\314\315!!\262\306!\211\242	>\204A\316\317\320D\"\210\211A@\242	>\204R\316\317\320D\"\210\3218\242	>\204c\316\317\320D\"\210\3228\242	>\204u\316\317\320D\"\210\3238\242	>\204\207\316\317\320D\"\210\3248\242	>\204\231\316\317\320D\"\210\3258\242	>\204\255\316\317\320	D\"\210\3268\327\330!



%\f\203\370\331\332\333!!P\334\335\211?\205\326\n\336\337\340!\")\266\202\203\347\341\202\350\342\343!!!\344\345\346#\"\266\203\347\211\2037\211@
\206\332!\335\350\351#)\266\203\2030\203%P\211\262\202&\211\235\2040\211B\262A\266\202\202\371\210\n\203A\211\202E\352\353\"\f\203O\354\355\"\262\262\266\210\207" [tramp-file-missing cl-struct-tramp-file-name-tags file-name-handler-alist inhibit-changing-match-data tramp-fuse-remove-hidden-files file-exists-p tramp-dissect-file-name file-missing error-conditions tramp-error "No such file or directory: %s" file-directory-p file-name-as-directory expand-file-name signal wrong-type-argument tramp-file-name 2 3 4 5 6 7 tramp-compat-directory-files tramp-fuse-local-file-name "^" regexp-quote tramp-fuse-mount-point directory-file-name nil string-prefix-p "/:" file-local-name tramp-compat-file-name-quote identity file-remote-p mapcar make-closure #[257 "\302\300\301#\207" [V0 V1 replace-regexp-in-string] 5 "\n\n(fn X)"] (".." ".") t string-match sort string< cl-remove-if #[257 "\211;\205\301\302\303\304#)\266\203\207" [inhibit-changing-match-data "\\.fuse_hidden" nil t string-match] 8 "\n\n(fn X)"]] 23 (#$ . 2046)])
#@76 Like `file-attributes' for Tramp files.

(fn FILENAME &optional ID-FORMAT)
(defalias 'tramp-fuse-handle-file-attributes #[513 "\302\303!!\211\242>\204\304\305\306D\"\210\211A@\242>\204$\304\305\306D\"\210\3078\242>\2045\304\305\306D\"\210\3108\242>\204G\304\305\306D\"\210\3118\242>\204Y\304\305\306D\"\210\3128\242>\204k\304\305\306D\"\210\3138\242>\204\304\305\306	D\"\210\3148\315!\203\261\316\317\320
\"	$\211	=\203\260\321\322\f!\"\262\323	\317\320\"$\210\207\321\322!\n\"\207" [cl-struct-tramp-file-name-tags tramp-cache-undefined 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 format "file-attributes-%s" file-attributes tramp-fuse-local-file-name tramp-set-file-property] 17 (#$ . 3841)])
#@58 Like `file-executable-p' for Tramp files.

(fn FILENAME)
(defalias 'tramp-fuse-handle-file-executable-p #[257 "\302\303!!\211\242>\204\304\305\306D\"\210\211A@\242>\204$\304\305\306D\"\210\3078\242>\2045\304\305\306D\"\210\3108\242>\204G\304\305\306D\"\210\3118\242>\204Y\304\305\306D\"\210\3128\242>\204k\304\305\306D\"\210\3138\242>\204\304\305\306	D\"\210\3148\315!\203\247\316\317	$\211	=\203\246\320\321!!\262\322	\317$\210\207\320\321\n!!\207" [cl-struct-tramp-file-name-tags tramp-cache-undefined 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-executable-p" file-executable-p tramp-fuse-local-file-name tramp-set-file-property] 15 (#$ . 4699)])
#@76 Like `file-name-all-completions' for Tramp files.

(fn FILENAME DIRECTORY)
(defalias 'tramp-fuse-handle-file-name-all-completions #[514 "\303\304\305\306\307!\"\310\311\211\203U\211@\312\n\"\203N\3132M\211\203C\211@\211\310\314\315#)\266\203\204<\316\313\310\"\210A\266\202\202!\210\211\317PB\211\2620\210A\266\202\202\262\262\"!\"\n\203f\320\321\"\207\207" [completion-regexp-list inhibit-changing-match-data tramp-fuse-remove-hidden-files all-completions delete-dups append file-name-all-completions tramp-fuse-local-file-name nil (".." ".") string-prefix-p match t string-match throw "/" cl-remove-if #[257 "\211;\205\301\302\303\304#)\266\203\207" [inhibit-changing-match-data "\\.fuse_hidden" nil t string-match] 8 "\n\n(fn X)"]] 19 (#$ . 5512)])
#@56 Like `file-readable-p' for Tramp files.

(fn FILENAME)
(defalias 'tramp-fuse-handle-file-readable-p #[257 "\302\303!!\211\242>\204\304\305\306D\"\210\211A@\242>\204$\304\305\306D\"\210\3078\242>\2045\304\305\306D\"\210\3108\242>\204G\304\305\306D\"\210\3118\242>\204Y\304\305\306D\"\210\3128\242>\204k\304\305\306D\"\210\3138\242>\204\304\305\306	D\"\210\3148\315!\203\247\316\317	$\211	=\203\246\320\321!!\262\322	\317$\210\207\320\321\n!!\207" [cl-struct-tramp-file-name-tags tramp-cache-undefined 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-readable-p" file-readable-p tramp-fuse-local-file-name tramp-set-file-property] 15 (#$ . 6307)])
#@102 Like `insert-directory' for Tramp files.

(fn FILENAME SWITCHES &optional WILDCARD FULL-DIRECTORY-P)
(defalias 'tramp-fuse-handle-insert-directory #[1026 "\300\301!$\210eb\210\302\301!\303\304#\205\305!\210\202\f\207" [insert-directory tramp-fuse-local-file-name search-forward nil noerror replace-match] 9 (#$ . 7113)])
#@68 Like `make-directory' for Tramp files.

(fn DIR &optional PARENTS)
(defalias 'tramp-fuse-handle-make-directory #[513 "\301\302!!\211\242>\204\303\304\305D\"\210\211A@\242>\204$\303\304\305D\"\210\3068\242>\2045\303\304\305D\"\210\3078\242>\204G\303\304\305D\"\210\3108\242>\204Y\303\304\305D\"\210\3118\242>\204k\303\304\305D\"\210\3128\242>\204\303\304\305	D\"\210\3138\314\315!\n\"\210\316\"\210\317\n\203\236\320\202\241\321!\"\207" [cl-struct-tramp-file-name-tags tramp-dissect-file-name expand-file-name signal wrong-type-argument tramp-file-name 2 3 4 5 6 7 make-directory tramp-fuse-local-file-name tramp-flush-file-properties tramp-flush-directory-properties "/" file-name-directory] 14 (#$ . 7449)])
#@43 Return local mount spec of VEC.

(fn VEC)
(defalias 'tramp-fuse-mount-spec #[257 "\211\242>\204\301\302\303D\"\210\3048\211\205&\242>\204#\301\302\303D\"\210\3058\211\2030\306\307#\207\306\310\"\207" [cl-struct-tramp-file-name-tags signal wrong-type-argument tramp-file-name 4 2 format "%s@%s:/" "%s:/"] 7 (#$ . 8218)])
#@44 Return local mount point of VEC.

(fn VEC)
(defalias 'tramp-fuse-mount-point #[257 "\303\304\305#\206>\306\242	>\204\307\310\311D\"\210A@\312\242	>\204+\307\310\311D\"\210\3138\2056\314!\315P\316!\260\n\"\207" [tramp-temp-name-prefix cl-struct-tramp-file-name-tags tramp-compat-temporary-file-directory tramp-get-connection-property "mount-point" nil expand-file-name signal wrong-type-argument tramp-file-name "." 2 tramp-file-name-user-domain "@" tramp-file-name-host-port] 9 (#$ . 8559)])
#@121 Time period to check whether the mount point still exists.
It has the same meaning as `remote-file-name-inhibit-cache'.
(defconst tramp-fuse-mount-timeout (byte-code "\300\301\302N@\303\"\207" [eval remote-file-name-inhibit-cache standard-value t] 3) (#$ . 9076))
#@68 Check, whether fuse volume determined by VEC is mounted.

(fn VEC)
(defalias 'tramp-fuse-mounted-p #[257 "\306\307\310\311$\206\344\n\312\313\242\f>\204\314\315\316D\"\210A@\"\317!\320\321D\3221\305
X\205\277\323X\203e/\204e\324\325\326U\203K\327\202`\330U\203U\327\202`\331U\203_\332\202`\333P#\210
\334Y\205\277\326\330U\203\237\3351\236r\336!\203\204\337!\202\210\340\341\"q\210\342P\262\343\344 C\"\211\262)0\210\202\237\210\336!\203\253\345\346\"\262)\242\f>\205\277\324\347\312\350\"P$0\266\202\307\266\351\307\310\352\312\353\354\355!!\"\"\205\340\356\330\"$)\266\202)\207" [tramp-fuse-mount-timeout remote-file-name-inhibit-cache tramp-compat-temporary-file-directory default-directory cl-struct-tramp-file-name-tags tramp-verbose tramp-get-file-property "/" "mounted" nil format "mount -t fuse.%s" signal wrong-type-argument tramp-file-name shell-command-to-string 6 "%s\n%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 "(%d) # " tramp-set-file-property string-match "^\\(%s\\)\\s-" regexp-quote tramp-fuse-mount-spec match-string tramp-inhibit-progress-reporter] 13 (#$ . 9346)])
#@43 Determine the local `fusermount' command.
(defalias 'tramp-fuse-get-fusermount #[0 "\301\302\303#\211=\203\304\305!\206\304\303!\262\306\302\303#\210\207" [tramp-cache-undefined tramp-get-connection-property nil "fusermount" executable-find "fusermount3" tramp-set-connection-property] 5 (#$ . 10663)])
#@42 List of fuse volume determined by a VEC.
(defvar tramp-fuse-mount-points nil (#$ . 10980))
#@50 Unmount fuse volume determined by VEC.

(fn VEC)
(defalias 'tramp-fuse-unmount #[257 "\306!\307\310\311 #\312\313\314!D\3151\255\nX\205\247\316X\203M\204M\317\320\321U\2033\322\202H\323U\203=\322\202H\324U\203G\325\202H\326P#\210\n\327Y\205\247\321\323U\203\207\3301\206r\331!\203l\332!\202p\333\334\"q\210\335P\262\336\337 C\"\211\262)0\210\202\207\210\331!\203\223\340\341\"\262)\242\f>\205\247\317\342\307\343\"P$0\266\202\257\266\344\345\346#\210\347\350!
\"\351\323!\210\352!\205\311\353!)\207" [tramp-compat-temporary-file-directory default-directory tramp-verbose tramp-inhibit-progress-reporter cl-struct-tramp-file-name-tags tramp-fuse-mount-points tramp-fuse-mount-point format "%s -u %s" tramp-fuse-get-fusermount 6 "%s\n%s" shell-command-to-string (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 "(%d) # " tramp-flush-file-property "/" "mounted" delete tramp-file-name-unify sleep-for tramp-compat-directory-empty-p delete-directory] 13 (#$ . 11077)])
#@53 Return local mount name of FILENAME.

(fn FILENAME)
(defalias 'tramp-fuse-local-file-name #[257 "\303!\304\211?\205\n\305!\211\211?\205\306\307\305!\")\266\202\2034\211G\310U\203.\311\2022\211\310\304O\262\312!P)\266\203\262\313!\211\242	>\204O\314\315\316D\"\210\211A@\242	>\204`\314\315\316D\"\210\3108\242	>\204q\314\315\316D\"\210\3178\242	>\204\203\314\315\316D\"\210\3208\242	>\204\225\314\315\316D\"\210\3218\242	>\204\247\314\315\316D\"\210\3228\242	>\204\273\314\315\316	D\"\210\3238\324!\203f\325\326\n$\211\n=\203e\327\330\331\242	>\204\345\314\315\316D\"\210A@\"!	!\210\304\211?\205\367\306\307\305!\")\266\202\304\211?\205	\305!\211\211?\205\306\307\305!\")\266\202\2033\211G\310U\203-\311\2021\211\310\304O\262\312!P)\266\203\203C\332\202D\333\303\324!\203R\334\304O\202S\335!\"!\266\202\262\336	\326$\210\207\327\330\331\n\242	>\204y\314\315\316
D\"\210\nA@\"!!\210\304\211?\205\213\306\307\305!\")\266\202\304\211?\205\235\305!\211\211?\205\251\306\307\305!\")\266\202\203\307\211G\310U\203\301\311\202\305\211\310\304O\262\312!P)\266\203\203\327\332\202\330\333\303\324!\203\346\334\304O\202\347\335
!\"!\207" [file-name-handler-alist cl-struct-tramp-file-name-tags tramp-cache-undefined expand-file-name nil file-local-name string-prefix-p "/:" 2 "/" file-remote-p tramp-dissect-file-name signal wrong-type-argument tramp-file-name 3 4 5 6 7 file-name-absolute-p tramp-get-file-property "local-file-name" intern format "tramp-%s-maybe-open-connection" tramp-compat-file-name-quote identity 1 tramp-fuse-mount-point tramp-set-file-property] 20 (#$ . 12255)])
(byte-code "\300\301\302\303\304DD\305\306\307\310\311\312\313&	\207" [custom-declare-variable tramp-fuse-unmount-on-cleanup funcall function #[0 "\300\207" [nil] 1 ""] "Whether fuse volumes shall be unmounted on cleanup." :group tramp :version "28.1" :type boolean] 10)
#@50 Cleanup fuse volume determined by VEC.

(fn VEC)
(defalias 'tramp-fuse-cleanup #[257 "\205\302!	\235\205\303!\207" [tramp-fuse-unmount-on-cleanup tramp-fuse-mount-points tramp-file-name-unify tramp-fuse-unmount] 3 (#$ . 14245)])
#@41 Unmount all fuse volumes used by Tramp.
(defalias 'tramp-fuse-cleanup-all #[0 "\205\302\303	\"\207" [tramp-fuse-unmount-on-cleanup tramp-fuse-mount-points mapc tramp-fuse-unmount] 3 (#$ . 14487)])
(byte-code "\300\301\302\"\210\300\303\304\"\210\300\305\304\"\210\300\306\307\"\210\300\310\311\"\210\312\313!\207" [add-hook tramp-cleanup-connection-hook tramp-fuse-cleanup tramp-cleanup-all-connections-hook tramp-fuse-cleanup-all kill-emacs-hook tramp-fuse-unload-hook #[0 "\300\301\302\"\210\300\303\304\"\210\300\305\304\"\207" [remove-hook tramp-cleanup-connection-hook tramp-fuse-cleanup tramp-cleanup-all-connections-hook tramp-fuse-cleanup-all kill-emacs-hook] 3] tramp-unload-hook #[0 "\300\301\302\"\207" [unload-feature tramp-fuse force] 3] provide tramp-fuse] 3)

Youez - 2016 - github.com/yon3zu
LinuXploit