403Webshell
Server IP : 217.160.0.212  /  Your IP : 216.73.216.184
Web Server : Apache
System : Linux www 6.18.52-i1-ampere #1203 SMP Mon Sep 14 18:29:59 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-cache.elc
;ELC
;;; Compiled
;;; in Emacs version 28.2
;;; with all optimizations.



(byte-code "\300\301!\210\302\303\304\"\207" [require tramp autoload time-stamp-string "time-stamp"] 3)
#@41 Hash table for remote files properties.
(defvar tramp-cache-data (make-hash-table :test 'equal) (#$ . 188))
(byte-code "\300\301\302\303\304DD\305\306\307\310\311\312\313&	\210\300\314\302\303\315DD\316\306\307\312\317&\207" [custom-declare-variable tramp-connection-properties funcall function #[0 "\300\207" [nil] 1 #1=""] "List of static connection properties.\nEvery entry has the form (REGEXP PROPERTY VALUE).  The regexp\nmatches remote file names.  It can be nil.  PROPERTY is a string,\nand VALUE the corresponding value.  They are used, if there is no\nmatching entry for PROPERTY in `tramp-cache-data'.  For more\ndetails see the info pages." :group tramp :version "24.4" :type (repeat (list (choice :tag "File Name regexp" regexp (const nil)) (choice :tag "        Property" string) (choice :tag "           Value" sexp))) tramp-persistency-file-name #[0 "\300\301\302!!\207" [expand-file-name locate-user-emacs-file "tramp"] 3 #1#] "File which keeps connection history for Tramp connections." file] 10)
#@50 Whether persistent cache data have been changed.
(defvar tramp-cache-data-changed nil (#$ . 1210))
#@52 The symbol marking undefined hash keys and values.
(defconst tramp-cache-undefined 'undef (#$ . 1315))
#@227 Return the hash table for KEY.
If it doesn't exist yet, it is created and initialized with
matching entries of `tramp-connection-properties'.
If KEY is `tramp-cache-undefined', don't create anything, and return nil.

(fn KEY)
(defalias 'tramp-get-hash-table #[257 "\211=?\205R\305	\"\206R\306\307\310\311\"	#\242\n>\203O\211\203N\211@\211@\206*\312\313\314\315#\316\317\320#)\266\203\203G\321A@\3228#\210A\266\202\202\210\211\262\207" [tramp-cache-undefined tramp-cache-data cl-struct-tramp-file-name-tags tramp-connection-properties inhibit-changing-match-data gethash puthash make-hash-table :test equal "" tramp-make-tramp-file-name noloc nohop nil t string-match tramp-set-connection-property 2] 11 (#$ . 1425)])
#@116 Get the PROPERTY of FILE from the cache context of KEY.
Return DEFAULT if not set.

(fn KEY FILE PROPERTY DEFAULT)
(defalias 'tramp-get-file-property #[1028 "\305\211?\205\306!\211\211?\205\307\310\306!\")\266\202\2032\211G\311U\203,\312\2020\211\311\305O\262\313!P)\266\203\262\314!\262\242	>\204P\315\316\317D\"\210\320\233\211\321\322C\"\240\266\242	>\204l\315\316\317D\"\210\323\233\211\305\240\266\324!\325!\205\201\326\"\211:\205\213\327\330@\"\305:\203\273\n\203\264\n\250\203\247\331\305\332@\n\"\"\204\264\n:\203\273\331\n@\"\203\273A\262\333\262\334\335\n\n\n\n\257\3361fX\205`\337X\203\f\204\340\341\342U\203\354\343\202\344U\203\366\343\202\311U\203\345\202\346P#\210\347Y\205`\342\344U\203@\3501?r\351!\203%\352!\202)\353\354\"q\210\355P\262\356\357 C\"\211\262)0\210\202@\210\351!\203L\360\361\"\262)\242	>\205`\340\362\363\364\"P$0\266\202h\266\365Y\203\214\366\367P!\370!\203\205\211J\247\203\205\211J\206\206\342TL\266\207" [file-name-handler-alist cl-struct-tramp-file-name-tags remote-file-name-inhibit-cache tramp-verbose tramp-inhibit-progress-reporter nil file-local-name string-prefix-p "/:" 2 "/" file-remote-p copy-tramp-file-name signal wrong-type-argument tramp-file-name 6 tramp-run-real-handler directory-file-name 7 tramp-get-hash-table hash-table-p gethash format-time-string "%T" time-less-p time-add t 8 "%s %s %s; inhibit: %s; cache used: %s; cached at: %s" (error) 3 apply message 0 "" 1 "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) # " 10 intern "tramp-cache-get-count-" boundp] 19 (#$ . 2172)])
(add-hook 'tramp-cache-unload-hook #[0 "\301\302\"\211\205\211@\303\"\210A\266\202\202\207" [obarray all-completions "tramp-cache-get-count-" unintern] 5])
#@109 Set the PROPERTY of FILE to VALUE, in the cache context of KEY.
Return VALUE.

(fn KEY FILE PROPERTY VALUE)
(defalias 'tramp-set-file-property #[1028 "\304\211?\205\305!\211\211?\205\306\307\305!\")\266\202\2032\211G\310U\203,\311\2020\211\310\304O\262\312!P)\266\203\262\313!\262\242	>\204P\314\315\316D\"\210\317\233\211\320\321C\"\240\266\242	>\204l\314\315\316D\"\210\322\233\211\304\240\266\323!\324\325 B#\210\326\327E\3301$\nX\205\331X\203\304\204\304\332\333\334U\203\252\335\202\277\336U\203\264\335\202\277\310U\203\276\337\202\277\340P#\210\n\341Y\205\334\336U\203\376\3421\375r\343!\203\343\344!\202\347\345\346\"q\210\347P\262\350\351 C\"\211\262)0\210\202\376\210\343!\203\n\352\353\"\262)\242	>\205\332\354\355\356\"P$0\266\202&\266\n\357Y\203I\360\361P!\362!\203B\211J\247\203B\211J\206C\334TL\266\207" [file-name-handler-alist cl-struct-tramp-file-name-tags tramp-verbose tramp-inhibit-progress-reporter nil file-local-name string-prefix-p "/:" 2 "/" file-remote-p copy-tramp-file-name signal wrong-type-argument tramp-file-name 6 tramp-run-real-handler directory-file-name 7 tramp-get-hash-table puthash current-time 8 "%s %s %s" (error) 3 apply message 0 "" 1 "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) # " 10 intern "tramp-cache-set-count-" boundp] 15 (#$ . 4138)])
(add-hook 'tramp-cache-unload-hook #[0 "\301\302\"\211\205\211@\303\"\210A\266\202\202\207" [obarray all-completions "tramp-cache-set-count-" unintern] 5])
#@78 Remove PROPERTY of FILE in the cache context of KEY.

(fn KEY FILE PROPERTY)
(defalias 'tramp-flush-file-property #[771 "\304\211?\205\305!\211\211?\205\306\307\305!\")\266\202\2032\211G\310U\203,\311\2020\211\310\304O\262\312!P)\266\203\262\313!\262\242	>\204O\314\315\316D\"\210\317\233\211\320\321C\"\240\266\242	>\204i\314\315\316D\"\210\322\233\211\304\240\266\323\324!\"\210\325\326D\3271\nX\205\330X\203\270\204\270\331\332\333U\203\236\334\202\263\335U\203\250\334\202\263\310U\203\262\336\202\263\337P#\210\n\340Y\205\333\335U\203\362\3411\361r\342!\203\327\343!\202\333\344\345\"q\210\346P\262\347\350 C\"\211\262)0\210\202\362\210\342!\203\376\351\352\"\262)\242	>\205\331\353\354\355\"P$0\266\202\266\n\356Y\205*\357\360P!\361!\262\207" [file-name-handler-alist cl-struct-tramp-file-name-tags tramp-verbose tramp-inhibit-progress-reporter nil file-local-name string-prefix-p "/:" 2 "/" file-remote-p copy-tramp-file-name signal wrong-type-argument tramp-file-name 6 tramp-run-real-handler directory-file-name 7 remhash tramp-get-hash-table 8 "%s %s" (error) 3 apply message 0 "" 1 "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) # " 10 intern "tramp-cache-set-count-" makunbound] 13 (#$ . 5833)])
#@66 Remove some properties of FILE's upper directory.

(fn KEY FILE)
(defalias 'tramp-flush-file-upper-properties #[514 "\303!\205\261\304\305!!\211\306\211?\205\307!\211\211?\205\310\311\307!\")\266\202\203=\211G\312U\2037\313\202;\211\312\306O\262\314!P)\266\203\262\315!\262\242	>\204Z\316\317\320D\"\210\321\233\211\240\266\242	>\204p\316\317\320D\"\210\322\233\211\306\240\266\323!\306C\324\325\326\"\"\210\211\242\237\266\202\211\205\255\211@\327\306\330\331#)\266\203\203\246\332#\210A\266\202\202\212\262\262\207" [file-name-handler-alist cl-struct-tramp-file-name-tags inhibit-changing-match-data file-name-absolute-p directory-file-name file-name-directory nil file-local-name string-prefix-p "/:" 2 "/" file-remote-p copy-tramp-file-name signal wrong-type-argument tramp-file-name 6 7 tramp-get-hash-table maphash make-closure #[514 "\300\300\242B\240\207" [V0] 5 "\n\n(fn K --CL-VAR--)"] "^\\(directory-\\|file-name-all-completions\\|file-entries\\)" t string-match tramp-flush-file-property] 12 (#$ . 7269)])
#@75 Remove all properties of FILE in the cache context of KEY.

(fn KEY FILE)
(defalias 'tramp-flush-file-properties #[514 "\305\306C\"\307\310\311$\311\211?\205\312!\211\211?\205\313\314\312!\")\266\202\203=\211G\315U\2037\316\202;\211\315\311O\262\317!P)\266\203\262\320!\262\242	>\204[\321\322\323D\"\210\324\233\211\240\266\242	>\204r\321\322\323D\"\210\325\233\211\311\240\266\326\327C\3301\nX\205\331X\203\271\204\271\332\333\334U\203\237\335\202\264\336U\203\251\335\202\264\315U\203\263\337\202\264\340P#\210\n\341Y\205\334\336U\203\363\3421\362r\343!\203\330\344!\202\334\345\346\"q\210\347P\262\350\351 C\"\211\262)0\210\202\363\210\343!\203\377\352\353\"\262)\242	>\205\332\354\355\356\"P$0\266\202\266\357\f\"\210\211;\2032\306!\230\2042\360\"\210\361\"\207" [file-name-handler-alist cl-struct-tramp-file-name-tags tramp-verbose tramp-inhibit-progress-reporter tramp-cache-data tramp-run-real-handler directory-file-name tramp-get-file-property "file-truename" nil file-local-name string-prefix-p "/:" 2 "/" file-remote-p copy-tramp-file-name signal wrong-type-argument tramp-file-name 6 7 8 "%s" (error) 3 apply message 0 "" 1 "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) # " remhash tramp-flush-file-properties tramp-flush-file-upper-properties] 14 (#$ . 8345)])
#@140 Remove all properties of DIRECTORY in the cache context of KEY.
Remove also properties of all files in subdirectories.

(fn KEY DIRECTORY)
(defalias 'tramp-flush-directory-properties #[514 "\211\305\211?\205\306!\211\211?\205\307\310\306!\")\266\202\2032\211G\311U\203,\312\2020\211\311\305O\262\313!P)\266\203\262\314\315C\"\316\317\305$\320\321C\3221\346	X\205\340\323X\203\206\n\204\206\324\325\326U\203l\327\202\201\330U\203v\327\202\201\311U\203\200\331\202\201\332P#\210	\333Y\205\340\326\330U\203\300\3341\277r\335!\203\245\336!\202\251\337\340\"q\210\341P\262\342\343 C\"\211\262)0\210\202\300\210\335!\203\314\344\345\"\262)\242>\205\340\324\346\347\350\"P$0\266\202\350\266\f\305C\351\352\353\"\"\210\211\242\237\266\202\211\203=\211@\211\242>\2036\211\242>\204\354\355\356D\"\210\3578;\2036\360\242>\204*\354\355\356D\"\210\3578\"\2036\361\f\"\210A\266\202\202\370\210\211;\203P\315!\230\204P\362\"\210\363\"\207" [file-name-handler-alist tramp-verbose tramp-inhibit-progress-reporter cl-struct-tramp-file-name-tags tramp-cache-data nil file-local-name string-prefix-p "/:" 2 "/" file-remote-p tramp-run-real-handler directory-file-name tramp-get-file-property "file-truename" 8 "%s" (error) 3 apply message 0 "" 1 "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) # " maphash make-closure #[514 "\300\300\242B\240\207" [V0] 5 "\n\n(fn K --CL-VAR--)"] signal wrong-type-argument tramp-file-name 6 tramp-compat-string-search remhash tramp-flush-directory-properties tramp-flush-file-upper-properties] 14 (#$ . 9856)])
#@101 Flush all Tramp cache properties from `buffer-file-name'.
This is suppressed for temporary buffers.
(defalias 'tramp-flush-file-function #[0 "\304 \305\306\"\216\307 ?\206\310\307 \311\312\313#)\266\203?\205\276\314 ;\203*\314 \202+	\315\316!\205\273\317!\211\242>\204D\320\321\322D\"\210\211A@\242>\204U\320\321\322D\"\210\3238\242>\204f\320\321\322D\"\210\3248\242>\204x\320\321\322D\"\210\3258\242>\204\212\320\321\322D\"\210\3268\242>\204\234\320\321\322D\"\210\3278\242>\204\260\320\321\322	D\"\210\3308\331\"\266\210)\262)\207" [inhibit-changing-match-data default-directory tramp-verbose cl-struct-tramp-file-name-tags match-data make-closure #[0 "\301\300\302\"\207" [V0 set-match-data evaporate] 3] buffer-name "^\\( \\|\\*\\)" nil t string-match buffer-file-name 0 tramp-tramp-file-p tramp-dissect-file-name signal wrong-type-argument tramp-file-name 2 3 4 5 6 7 tramp-flush-file-properties] 13 (#$ . 11617)])
(byte-code "\300\301\302\"\210\300\303\302\"\210\300\304\302\"\210\300\305\306\"\207" [add-hook before-revert-hook tramp-flush-file-function eshell-pre-command-hook kill-buffer-hook tramp-cache-unload-hook #[0 "\300\301\302\"\210\300\303\302\"\210\300\304\302\"\207" [remove-hook before-revert-hook tramp-flush-file-function eshell-pre-command-hook kill-buffer-hook] 3]] 3)
#@348 Get the named PROPERTY for the connection.
KEY identifies the connection, it is either a process or a
`tramp-file-name' structure.  A special case is nil, which is
used to cache connection properties of the local machine.
If KEY is `tramp-cache-undefined', or if the value is not set for
the connection, return DEFAULT.

(fn KEY PROPERTY DEFAULT)
(defalias 'tramp-get-connection-property #[771 "\304!\262\305!\306!\203\307#\202\310=\2043\311!\203-\312!\2033\262\313\262\314\315E\3161\326	X\205\320\317X\203v\n\204v\320\321\322U\203\\\323\202q\324U\203f\323\202q\325U\203p\326\202q\327P#\210	\330Y\205\320\322\324U\203\260\3311\257r\311!\203\225\332!\202\231\333\334\"q\210\335P\262\336\337 C\"\211\262)0\210\202\260\210\311!\203\274\340\341\"\262)\242>\205\320\320\342\343\344\"P$0\266\202\330\266\207" [tramp-cache-undefined tramp-verbose tramp-inhibit-progress-reporter cl-struct-tramp-file-name-tags tramp-file-name-unify tramp-get-hash-table hash-table-p gethash nil processp process-live-p t 7 "%s %s; cache used: %s" (error) 3 apply message 0 "" 1 2 "Warning: " "Tramp: " 4 (error) process-buffer tramp-get-connection-buffer dont-create "\n%s" append buffer-string process-get vector tramp-debug-message format "(%d) # "] 17 (#$ . 12975)])
#@390 Set the named PROPERTY of a connection to VALUE.
KEY identifies the connection, it is either a process or a
`tramp-file-name' structure.  A special case is nil, which is
used to cache connection properties of the local machine.  If KEY
is `tramp-cache-undefined', nothing is set.
PROPERTY is set persistent when KEY is a `tramp-file-name' structure.
Return VALUE.

(fn KEY PROPERTY VALUE)
(defalias 'tramp-set-connection-property #[771 "\304!\262\305!\211\203\306#\210\210\206\242	>\205\307\310\311D\3121\276\nX\205\272\313X\203`\204`\314\315\316U\203F\317\202[\320U\203P\317\202[\321U\203Z\322\202[\323P#\210\n\324Y\205\272\316\320U\203\232\3251\231r\326!\203\327!\202\203\330\331\"q\210\332P\262\333\334 C\"\211\262)0\210\202\232\210\326!\203\246\335\336\"\262)\242	>\205\272\314\337\340\341\"P$0\266\207\266\207" [tramp-cache-data-changed cl-struct-tramp-file-name-tags tramp-verbose tramp-inhibit-progress-reporter tramp-file-name-unify tramp-get-hash-table puthash t 7 "%s %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) # "] 13 (#$ . 14307)])
#@256 Check whether named PROPERTY of a connection is defined.
KEY identifies the connection, it is either a process or a
`tramp-file-name' structure.  A special case is nil, which is
used to cache connection properties of the local machine.

(fn KEY PROPERTY)
(defalias 'tramp-connection-property-p #[514 "\301#=?\207" [tramp-cache-undefined tramp-get-connection-property] 6 (#$ . 15593)])
#@330 Remove the named PROPERTY of a connection identified by KEY.
KEY identifies the connection, it is either a process or a
`tramp-file-name' structure.  A special case is nil, which is
used to cache connection properties of the local machine.
PROPERTY is set persistent when KEY is a `tramp-file-name' structure.

(fn KEY PROPERTY)
(defalias 'tramp-flush-connection-property #[514 "\304!\262\305!\211\203\306\"\210\210\206\242	>\205\307\310\311C\3121\272\nX\205\270\313X\203^\204^\314\315\316U\203D\317\202Y\320U\203N\317\202Y\321U\203X\322\202Y\323P#\210\n\324Y\205\270\316\320U\203\230\3251\227r\326!\203}\327!\202\201\330\331\"q\210\332P\262\333\334 C\"\211\262)0\210\202\230\210\326!\203\244\335\336\"\262)\242	>\205\270\314\337\340\341\"P$0\207\266\342\207" [tramp-cache-data-changed cl-struct-tramp-file-name-tags tramp-verbose tramp-inhibit-progress-reporter tramp-file-name-unify tramp-get-hash-table remhash t 7 "%s" (error) 3 apply message 0 "" 1 2 "Warning: " "Tramp: " 4 (error) processp process-buffer tramp-get-connection-buffer dont-create "\n%s" append buffer-string process-get vector tramp-debug-message format "(%d) # " nil] 12 (#$ . 15989)])
#@231 Remove all properties identified by KEY.
KEY identifies the connection, it is either a process or a
`tramp-file-name' structure.  A special case is nil, which is
used to cache connection properties of the local machine.

(fn KEY)
(defalias 'tramp-flush-connection-properties #[257 "\305!\262\211\306\307\310\"\211\205!\211\311C\312\313\314\"\"\210\211\242\237\266\202\262D\3151\276	X\205\270\316X\203^\n\204^\317\320\321U\203D\322\202Y\323U\203N\322\202Y\324U\203X\325\202Y\326P#\210	\327Y\205\270\321\323U\203\230\3301\227r\331!\203}\332!\202\201\333\334\"q\210\335P\262\336\337 C\"\211\262)0\210\202\230\210\331!\203\244\340\341\"\262)\242>\205\270\317\342\343\344\"P$0\266\202\300\266\f\206\314\211\242>\205\314\345\346\"\207" [tramp-cache-data tramp-verbose tramp-inhibit-progress-reporter cl-struct-tramp-file-name-tags tramp-cache-data-changed tramp-file-name-unify 7 "%s %s" gethash nil maphash make-closure #[514 "\300\300\242B\240\207" [V0] 5 "\n\n(fn K --CL-VAR--)"] (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) # " t remhash] 12 (#$ . 17216)])
#@37 Print hash table TABLE.

(fn TABLE)
(defalias 'tramp-cache-print #[257 "\300!\205\301C\302\303\304\"\"\210\211\242\262\207" [hash-table-p nil maphash make-closure #[514 "\242	>\203d\302\303\304\"\211\203c\211@\242	>\204 \305\306\307D\"\210\310\307\"8;\203\\\242	>\2049\305\306\307D\"\210\310\307\"\233\211\311\242	>\204Q\305\306\307	D\"\210\310\307\"8!\240\266A\266\202\202\210;\203n\311!\262\211;\203x\311!\262\312\313\314!\203\210\315\211!!\202\213\315!\316!\203\227\317!\202\250\320!\203\245\315\211!!\202\250\315!#\300\211\242\203\267\300\242\321Q\202\270\240\207" [V0 cl-struct-tramp-file-name-tags mapcar car ((method nil) (user nil) (domain nil) (host nil) (port nil) (localname nil) (hop nil)) signal wrong-type-argument tramp-file-name cl-struct-slot-offset substring-no-properties format "(%s %s)" processp prin1-to-string hash-table-p tramp-cache-print bufferp " "] 11 "\n\n(fn KEY VALUE)"]] 6 (#$ . 18504)])
#@72 Return all known `tramp-file-name' structs according to `tramp-cache'.
(defalias 'tramp-list-connections #[0 "\302\303\304\305\306	\304C\307\310\311\"\"\210\211\242\237\266\202\"\")\207" [tramp-verbose tramp-cache-data 0 delq nil mapcar #[257 "\211\242>\205$\211\242>\204\301\302\303D\"\210\3048?\205$\305\306\"\205$\211\207" [cl-struct-tramp-file-name-tags signal wrong-type-argument tramp-file-name 6 tramp-connection-property-p "process-buffer"] 5 "\n\n(fn KEY)"] maphash make-closure #[514 "\300\300\242B\240\207" [V0] 5 "\n\n(fn K --CL-VAR--)"]] 10 (#$ . 19488)])
#@81 Write persistent connection properties into file `tramp-persistency-file-name'.
(defalias 'tramp-dump-connection-properties #[0 "\3061v\307!\205t\310!\311U?\205t	\205t\n;\205t\312!\313\211\314\315\316\"\"\210\n\317\320\321\"\315\322\"\216r\211q\210\323\324\325\326!\n#\327\330\317\331\321\"\332\216
\333\334\323\335\336\n!\"!!\210)r
q\210\337 +\261)rq\210\340\313\211\313\311%\210*\266\202*\2620\207\210\313\207" [tramp-cache-data tramp-cache-data-changed tramp-persistency-file-name print-level print-length standard-output (error) hash-table-p hash-table-count 0 copy-hash-table nil maphash make-closure #[514 "\242	>\203T\303!\203T\242	>\204\304\305\306D\"\210A@\n\230\204T\242	>\2041\304\305\306D\"\210\3078\204T\310\311\"\204T\310\312\"\204T\313\314\"\210\313\315\"\210\313\316\"\207\313\300\"\207" [V0 cl-struct-tramp-file-name-tags tramp-archive-method hash-table-p signal wrong-type-argument tramp-file-name 6 gethash "login-as" "started" remhash "process-name" "process-buffer" "first-password-request"] 6 "\n\n(fn KEY VALUE)"] generate-new-buffer " *temp file*" t #[0 "\301\300!\205	\302\300!\207" [V0 buffer-name kill-buffer] 2] format ";; -*- emacs-lisp -*- <%s %s>\n" time-stamp-string "%02y/%02m/%02d %02H:%02M:%02S" ";; Tramp connection history.  Don't change this file.\n" ";; Run `M-x tramp-cleanup-all-connections' instead.\n\n" " *string-output*" #[0 "\301!\207" [standard-output kill-buffer] 2] pp read "(%s)" tramp-cache-print buffer-string write-region] 12 (#$ . 20077)])
(byte-code "\204	\301\302\303\"\210\301\304\305\"\207" [noninteractive add-hook kill-emacs-hook tramp-dump-connection-properties tramp-cache-unload-hook #[0 "\300\301\302\"\207" [remove-hook kill-emacs-hook tramp-dump-connection-properties] 3]] 3)
#@215 Return a list of (user host) tuples allowed to access for METHOD.
This function is added always in `tramp-get-completion-function'
for all methods.  Resulting data are derived from connection history.

(fn METHOD)
(defalias 'tramp-parse-connection-properties #[257 "\301\302\303\"\304C\305\302\306\"\"\210\211\242\237\266\202\"\207" [tramp-cache-data mapcar make-closure #[257 "\211\242	>\205U\300\242	>\204\302\303\304D\"\210A@\230\205U\211\242	>\204+\302\303\304D\"\210\3058?\205U\211\242	>\204@\302\303\304D\"\210\3068\242	>\204Q\302\303\304D\"\210\3078D\207" [V0 cl-struct-tramp-file-name-tags signal wrong-type-argument tramp-file-name 6 2 4] 6 "\n\n(fn KEY)"] nil maphash #[514 "\300\300\242B\240\207" [V0] 5 "\n\n(fn K --CL-VAR--)"]] 9 (#$ . 21873)])
#@50 Whether to read persistent data at startup time.
(defvar tramp-cache-read-persistent-data (byte-code "\206	\207" [init-file-user site-run-file] 1) (#$ . 22660))
(byte-code ";\203\226\306	!\307U\203\226\n\203\226\3101\211\3111\200\312\313\314\"r\211q\210\315\316\"\216\317!\210\320p!\307\321\211\211\211A\262\242\211\262\203q\211A\262\242\262\242\f>\2033\211A\262\242\211\262\2033\322@\"\204N\323\211A\262\242@#\210\202N)\266\321\211*\26200\210\202\2260\324	!\266\202\226\325\326\327!#\210\324	!\266\330\331\332\"\210\333\334!\207" [tramp-persistency-file-name tramp-cache-data tramp-cache-read-persistent-data tramp-verbose cl-struct-tramp-file-name-tags tramp-cache-data-changed hash-table-count 0 (error) (file-error) generate-new-buffer " *temp*" t make-closure #[0 "\301\300!\205	\302\300!\207" [V0 buffer-name kill-buffer] 2] insert-file-contents-literally read nil tramp-connection-property-p tramp-set-connection-property clrhash message "Tramp persistency file `%s' is corrupted: %s" error-message-string add-hook tramp-unload-hook #[0 "\300\301\302\"\207" [unload-feature tramp-cache force] 3] provide tramp-cache] 10)

Youez - 2016 - github.com/yon3zu
LinuXploit