| 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 : |
;ELC
;;; Compiled
;;; in Emacs version 28.2
;;; with all optimizations.
(byte-code "\300\301!\210\302\303\304\305\306DD\307\310\301\311\312\313\314& \210\302\315\304\305\316DD\317\310\301\311\320\313\321& \207" [require tramp custom-declare-variable tramp-adb-program funcall function #[0 "\300\207" ["adb"] 1 #1=""] "Name of the Android Debug Bridge program." :group :version "24.4" :type string tramp-adb-connect-if-not-connected #[0 "\300\207" [nil] 1 #1#] "Try to run `adb connect' if provided device is not connected currently.\nIt is used for TCP/IP devices." "25.1" boolean] 10)
#@75 When this method name is used, forward all calls to Android Debug Bridge.
(defconst tramp-adb-method "adb" (#$ . 598))
(byte-code "\300\301\302\303\304DD\305\306\307\310\311\312\313& \207" [custom-declare-variable tramp-adb-prompt funcall function #[0 "\300\207" ["^[^#$\n
]*[#$][[:space:]]"] 1 ""] "Regexp used as prompt in almquist shell." :type regexp :version "28.1" :group tramp] 10)
#@43 Regexp for date year format in ls output.
(defconst tramp-adb-ls-date-year-regexp "[[:digit:]]\\{4\\}-[[:digit:]]\\{2\\}-[[:digit:]]\\{2\\}" (#$ . 993))
#@43 Regexp for date time format in ls output.
(defconst tramp-adb-ls-date-time-regexp "[[:digit:]]\\{2\\}:[[:digit:]]\\{2\\}" (#$ . 1152))
#@38 Regexp for date format in ls output.
(defconst tramp-adb-ls-date-regexp (concat #1="[[:space:]]" tramp-adb-ls-date-year-regexp #1# tramp-adb-ls-date-time-regexp #1#) (#$ . 1293))
#@23 Regexp for ls output.
(defconst tramp-adb-ls-toolbox-regexp (concat "^[[:space:]]*\\([-.[:alpha:]]+\\)\\(?:[[:space:]]+[[:digit:]]+\\)?[[:space:]]*\\([^[:space:]]+\\)[[:space:]]+\\([^[:space:]]+\\)[[:space:]]+\\([[:digit:]]+\\)[[:space:]]+\\(" tramp-adb-ls-date-year-regexp "[[:space:]]" tramp-adb-ls-date-time-regexp "\\)[[:space:]]\\(.*\\)$") (#$ . 1478))
(add-hook 'tramp--startup-hook #[0 "\302\303\304 D\305BB\"\210\302\306\307B\"\210\310\311\"\207" [tramp-adb-method tramp-adb-program add-to-list tramp-methods tramp-login-program ((tramp-login-args (("shell"))) (tramp-direct-async t) (tramp-tmpdir "/data/local/tmp") (tramp-default-port 5555)) tramp-default-host-alist (nil #1="") tramp-set-completion-function ((tramp-adb-parse-device-names #1#))] 5])
#@50 Alist of handler functions for Tramp ADB method.
(defconst tramp-adb-file-name-handler-alist '((access-file . tramp-handle-access-file) (add-name-to-file . tramp-handle-add-name-to-file) (copy-directory . tramp-handle-copy-directory) (copy-file . tramp-adb-handle-copy-file) (delete-directory . tramp-adb-handle-delete-directory) (delete-file . tramp-adb-handle-delete-file) (directory-file-name . tramp-handle-directory-file-name) (directory-files . tramp-handle-directory-files) (directory-files-and-attributes . tramp-adb-handle-directory-files-and-attributes) (dired-compress-file . ignore) (dired-uncache . tramp-handle-dired-uncache) (exec-path . tramp-adb-handle-exec-path) (expand-file-name . tramp-handle-expand-file-name) (file-accessible-directory-p . tramp-handle-file-accessible-directory-p) (file-acl . ignore) (file-attributes . tramp-adb-handle-file-attributes) (file-directory-p . tramp-handle-file-directory-p) (file-equal-p . tramp-handle-file-equal-p) (file-executable-p . tramp-adb-handle-file-executable-p) (file-exists-p . tramp-handle-file-exists-p) (file-in-directory-p . tramp-handle-file-in-directory-p) (file-local-copy . tramp-adb-handle-file-local-copy) (file-locked-p . tramp-handle-file-locked-p) (file-modes . tramp-handle-file-modes) (file-name-all-completions . tramp-adb-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-adb-handle-file-readable-p) (file-regular-p . tramp-handle-file-regular-p) (file-remote-p . tramp-handle-file-remote-p) (file-selinux-context . tramp-handle-file-selinux-context) (file-symlink-p . tramp-handle-file-symlink-p) (file-system-info . tramp-adb-handle-file-system-info) (file-truename . tramp-handle-file-truename) (file-writable-p . tramp-adb-handle-file-writable-p) (find-backup-file-name . tramp-handle-find-backup-file-name) (insert-directory . tramp-handle-insert-directory) (insert-file-contents . tramp-handle-insert-file-contents) (load . tramp-handle-load) (lock-file . tramp-handle-lock-file) (make-auto-save-file-name . tramp-handle-make-auto-save-file-name) (make-directory . tramp-adb-handle-make-directory) (make-directory-internal . ignore) (make-lock-file-name . tramp-handle-make-lock-file-name) (make-nearby-temp-file . tramp-handle-make-nearby-temp-file) (make-process . tramp-adb-handle-make-process) (make-symbolic-link . tramp-handle-make-symbolic-link) (process-file . tramp-adb-handle-process-file) (rename-file . tramp-adb-handle-rename-file) (set-file-acl . ignore) (set-file-modes . tramp-adb-handle-set-file-modes) (set-file-selinux-context . ignore) (set-file-times . tramp-adb-handle-set-file-times) (set-visited-file-modtime . tramp-handle-set-visited-file-modtime) (shell-command . tramp-handle-shell-command) (start-file-process . tramp-handle-start-file-process) (substitute-in-file-name . tramp-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-adb-handle-write-region)) (#$ . 2248))
#@50 Check if it's a FILENAME for ADB.
(fn FILENAME)
(defalias 'tramp-adb-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-adb-method tramp-tramp-file-p tramp-dissect-file-name signal wrong-type-argument tramp-file-name] 6 (#$ . 6094)])
(byte-code "\300\301\302\303#\304\301\305\306#\207" [function-put tramp-adb-file-name-p speed -1 put byte-optimizer byte-compile-inline-expand] 5)
#@161 Invoke the ADB handler for OPERATION.
First arg specifies the OPERATION, second arg is a list of
arguments to pass to the OPERATION.
(fn OPERATION &rest ARGS)
(defalias 'tramp-adb-file-name-handler #[385 "\301\"\211\203 \302 \303\304\"\216\305A\")\207\306\"\207" [tramp-adb-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 (#$ . 6565)])
(add-hook 'tramp--startup-hook #[0 "\300\301\302\"\207" [tramp-register-foreign-file-name-handler tramp-adb-file-name-p tramp-adb-file-name-handler] 3])
#@68 Return a list of (nil host) tuples allowed to access.
(fn IGNORE)
(defalias 'tramp-adb-parse-device-names #[257 "\301\302\303\304\305\302\306#\"\"\207" [tramp-adb-program delq nil mapcar #[257 "\301\302\"\205 \303\304\305\306\307\"#D\207" [tramp-prefix-port-format string-match "^\\(\\S-+\\)[[:space:]]+device$" nil tramp-compat-string-replace ":" match-string 1] 8 "\n\n(fn LINE)"] tramp-process-lines "devices"] 9 (#$ . 7165)])
#@57 Like `file-system-info' for Tramp files.
(fn FILENAME)
(defalias 'tramp-adb-handle-file-system-info #[257 "\3031i\304\305!!\211\242>\204 \306\307\310D\"\210\211A@\242>\204( \306\307\310D\"\210\3118\242>\2049 \306\307\310D\"\210\3128\242>\204K \306\307\310D\"\210\3138\242>\204] \306\307\310D\"\210\3148\242>\204o \306\307\310D\"\210\3158\242>\204\203 \306\307\310 D\"\210\3168\314\317C\3201' X\205!\312X\203\307 \n\204\307 \321\322\323U\203\255 \324\202\302 \325U\203\267 \324\202\302 \311U\203\301 \326\202\302 \327P#\210 \313Y\205!\323\325U\203\3301 r\331!\203\346 \332!\202\352 \333\334\"q\210\335P\262\336\337 C\"\211\262)0\210\202\210\331!\203
\340\341\"\262)\242>\205!\321\342\343\344\"P$0\266\202)\266\345\343\346\347!\"\"\210r\333!q\210eb\210\350y\210\351\352!\205d\353\354\355\325!!_\353\354\355\325!!\354\355\311!!Z_\353\354\355\312!!_E)\266\2100\207\210\350\207" [cl-struct-tramp-file-name-tags tramp-verbose tramp-inhibit-progress-reporter (error) tramp-dissect-file-name expand-file-name signal wrong-type-argument tramp-file-name 2 3 4 5 6 7 "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-adb-send-command "df -k %s" tramp-shell-quote-argument nil looking-at "[[:space:]]*[^[:space:]]+[[:space:]]+\\([[:digit:]]+\\)[[:space:]]+\\([[:digit:]]+\\)[[:space:]]+\\([[:digit:]]+\\)" 1024 string-to-number match-string] 19 (#$ . 7608)])
#@76 Like `file-attributes' for Tramp files.
(fn FILENAME &optional ID-FORMAT)
(defalias 'tramp-adb-handle-file-attributes #[513 "\211\204 \302\262\3031\304!\211\242>\204 \305\306\307D\"\210\211A@\242>\204- \305\306\307D\"\210\3108\242>\204>