Variable: tramp--startup-hook

tramp--startup-hook is a variable defined in tramp.el.gz.

Value

Large value
(#[0 "\300\301\302\"\207"
    [tramp-register-foreign-file-name-handler
     tramp-sudoedit-file-name-p tramp-sudoedit-file-name-handler]
    3]
 #[0
  "\303\304\305B\"\210\303\306\307\310!\311Q\312	E\"\210\313\n\"\207"
  [tramp-sudoedit-method tramp-root-id-string
			 tramp-completion-function-alist-su
			 add-to-list tramp-methods
			 ((tramp-sudo-login
			   (("sudo") ("-u" "%u") ("-S") ("-H")
			    ("-p" "Password:") ("--")))
			  (tramp-password-previous-hop t))
			 tramp-default-user-alist "\\`" regexp-quote
			 "\\'" nil tramp-set-completion-function]
  5]
 #[0 "\300\301\302\"\207"
    [tramp-register-foreign-file-name-handler tramp-sshfs-file-name-p
					      tramp-sshfs-file-name-handler]
    3]
 #[0
  "\304\305\306\307\310\311\312\313\314\315\316\317\320	\"D\321BBBBBBD\322\323\nD\324BBBBBB\"\210\325\"\207"
  [tramp-sshfs-method tramp-terminal-type tramp-default-remote-shell
		      tramp-completion-function-alist-ssh add-to-list
		      tramp-methods
		      (tramp-mount-args
		       (("-C") ("-p" "%p") ("-o" "dir_cache=no")
			("-o" "transform_symlinks")
			("-o" "idmap=user,reconnect")))
		      (tramp-login-program "ssh") tramp-login-args
		      ("-q") ("-l" "%u") ("-p" "%p") ("-e" "none")
		      ("%a" "%a") "-o" format "SetEnv=\"TERM=%s\""
		      (("%h") ("%l")) (tramp-direct-async t)
		      tramp-remote-shell
		      ((tramp-remote-shell-login ("-l"))
		       (tramp-remote-shell-args ("-c")))
		      tramp-set-completion-function]
  15]
 #[0 "\300\301\302\"\207"
    [tramp-register-foreign-file-name-handler tramp-smb-file-name-p
					      tramp-smb-file-name-handler]
    3]
 #[0 "\301\302\303\304!\305Q\306B\"\210\307\310\"\207"
    [tramp-smb-method add-to-list tramp-default-user-alist "\\`"
		      regexp-quote "\\'" (nil nil)
		      tramp-set-completion-function
		      ((tramp-parse-netrc "~/.netrc"))]
    5]
 #[0 "\301\302\303B\"\207"
    [tramp-smb-method add-to-list tramp-methods
		      ((tramp-tmpdir "/C$/Temp")
		       (tramp-case-insensitive t))]
    4]
 #[0 "\300\301\302\"\207"
    [tramp-register-foreign-file-name-handler tramp-rclone-file-name-p
					      tramp-rclone-file-name-handler]
    3]
 #[0 "\301\302\303B\"\210\301\304\305B\"\210\306\307\"\207"
    [tramp-rclone-method add-to-list tramp-methods
			 ((tramp-mount-args
			   ("--no-unicode-normalization"
			    "--dir-cache-time" "0s"))
			  (tramp-copyto-args nil)
			  (tramp-moveto-args nil)
			  (tramp-about-args ("--full")))
			 tramp-default-host-alist (nil "")
			 tramp-set-completion-function
			 ((tramp-rclone-parse-device-names ""))]
    4]
 #[0 "\300\301\302\303B\"\207"
    [add-to-list tramp-foreign-file-name-handler-alist
		 tramp-ftp-file-name-p tramp-ftp-file-name-handler]
    4]
 #[0
  "\301\302C\"\210\301\303\304\305E\"\210\301\303\305\306E\"\210\307\310\"\207"
  [tramp-ftp-method add-to-list tramp-methods
		    tramp-default-method-alist "\\`ftp\\." nil
		    "\\`\\(?:anonymous\\|ftp\\)\\'"
		    tramp-set-completion-function
		    ((tramp-parse-netrc "~/.netrc"))]
  5]
 #[0
  "\306\307\310	D\311\312\313\314\315\316\317\n\"D\320BBBBD\321\322BD\323D\324BBBBB\"\210\306\307\f\310	D\311\312\313\314\315\316\317\n\"D\320BBBBD\321\322BD\323D\325\326\327	D\330BBBBBBBB\"\210\306\307
\310(D\311\312\313\314\315\316\317\n\"D\320BBBBD\321\322BD\323D\324BBBBB\"\210\306\307)\310(D\311\312\313\314\315\316\317\n\"D\320BBBBD\321\322BD\323D\325\326\327(D\330BBBBBBBB\"\210\306\307*\310+D\331\321\322BD\323D\324BBBBB\"\210\306\332\"\210\306\332
\"\210\306\332*\"\210\333\334DC\"\210\333\f\334\fDC\"\210\333
\334
DC\"\210\333)\334)DC\"\210\333*\335*DC\"\210\336\337\340\341#\210\342\343\"\210\344\345\346\347*F\343\"\207"
  [tramp-docker-method tramp-docker-program tramp-terminal-type
		       tramp-default-remote-shell
		       tramp-dockercp-method tramp-podman-method
		       add-to-list tramp-methods tramp-login-program
		       tramp-login-args ("exec") ("-it") ("-u" "%u")
		       "-e" format "TERM=%s" (("%h") ("%l"))
		       tramp-direct-async ("-c") tramp-remote-shell
		       ((tramp-remote-shell-login ("-l"))
			(tramp-remote-shell-args ("-i" "-c"))
			(tramp-completion-use-cache nil))
		       (tramp-remote-shell-login ("-l"))
		       (tramp-remote-shell-args ("-i" "-c"))
		       tramp-copy-program
		       ((tramp-copy-args (("cp")))
			(tramp-copy-file-name (("%h" ":") ("%f")))
			(tramp-copy-recursive t)
			(tramp-completion-use-cache nil))
		       (tramp-login-args
			(("%x") ("exec") ("-c" "%a") ("%h") ("-it")
			 ("--") ("%l")))
		       tramp-completion-multi-hop-methods
		       tramp-set-completion-function
		       tramp-container--completion-function
		       tramp-kubernetes--completion-function
		       defconst-1
		       tramp-kubernetes-connection-local-default-variables
		       ((tramp-config-check
			 . tramp-kubernetes--current-context-data)
			(tramp-extra-expand-args 97
						 (tramp-kubernetes--container
						  (car
						   tramp-current-connection))
						 104
						 (tramp-kubernetes--pod
						  (car
						   tramp-current-connection))
						 120
						 (tramp-kubernetes--context-namespace
						  (car
						   tramp-current-connection))))
		       ("/nix/store/yvwy8dm26cpa1j12ixgs1dyiaw2abdk9-emacs-snapshot/share/emacs/31.0.50/lisp/net/tramp-container.elc"
			. 20173)
		       connection-local-set-profile-variables
		       tramp-kubernetes-connection-local-default-profile
		       connection-local-set-profiles :application
		       tramp :protocol tramp-podman-program
		       tramp-podmancp-method tramp-kubernetes-method
		       tramp-kubernetes-program]
  12]
 #[0 "\300\301\302\"\207"
    [tramp-register-foreign-file-name-handler
     tramp-androidsu-file-name-p tramp-androidsu-file-name-handler]
    3]
 #[0 "\301=\205�\302 \207"
    [system-type android tramp-enable-androidsu-method] 2]
 #[0 "\300\301\302\303#\207"
    [tramp-register-foreign-file-name-handler identity
					      tramp-sh-file-name-handler
					      append]
    4]
 #[0
  "\306\307\"\210\306\310\"\210\306\311	\"\210\306\312	\"\210\306\313	\"\210\306\314\"\210\306\315\"\210\306\316	\"\210\306\317	\"\210\306\320\n\"\210\306\321\"\210\306\322\"\210\306\323\"\210\306\324\f\"\210\306\325	\"\210\306\326
\"\210\306\327	\"\210\306\330	\"\207"
  [tramp-completion-function-alist-rsh
   tramp-completion-function-alist-ssh
   tramp-completion-function-alist-telnet
   tramp-completion-function-alist-su
   tramp-completion-function-alist-sg
   tramp-completion-function-alist-putty tramp-set-completion-function
   "rcp" "remcp" "scp" "scpx" "rsync" "rsh" "remsh" "ssh" "sshx"
   "telnet" "su" "sudo" "doas" "sg" "plink" "plinkx" "pscp" "psftp"]
  3]
 #[0
  "\305\306\307\310\311\312D\313BBBB\"\210\305\306\314\315\311\312D\316BBBB\"\210\305\306\317\320\321\322\323\324\325\326\327\330	\"D\331BBBBBD\332\333\312D\334BBBBBB\"\210\305\306\335\320\321\322\323\324\325\336\337\326\327\330	\"D\331BBBBBBBD\332\312D\334BBBBB\"\210\305\306\340\320\321\322\323\324\325\326\327\330	\"D\331BBBBBD\332\333\312D\341BBBBBB\"\210\305\306\342\310\311\312D\343BBBB\"\210\305\306\344\315\311\312D\343BBBB\"\210\305\306\345\320\321\322\323\324\325\326\327\330	\"D\331BBBBBD\332\333\312D\343BBBBBB\"\210\305\306\346\320\321\322\323\324\325\336\326\327\330	\"D\347BBBBBBD\332\312D\343BBBBB\"\210\305\306\350\351\352\312D\343BBBB\"\210\305\306\353\354\355\312D\356BBBB\"\210\305\306\357\360\355\361\312D\362BBBBB\"\210\305\306\363\364\321\365\327\366	\"C\367BBD\312D\370BBBB\"\210\305\306\371\372\373\312D\374BBBB\"\210\305\306\375\376\321\322\377\201@�\324\201A�\201B�\201C�\327\201D�	\n#C\201E�BBBBBBBBD\312D\343BBBB\"\210\305\306\201F�\376\321\201G�\201B�\324\201A�\201C�\327\201D�	\n#C\201E�BBBBBBD\312D\343BBBB\"\210\305\306\201H�\376\321\322\377\201@�\324\201A�\201B�\201C�\327\201D�	\n#C\201E�BBBBBBBBD\312D\201I�BBBB\"\210\305\306\201J�\376\321\322\377\201@�\324\201A�\201B�\201C�\327\201D�	\n#C\201E�BBBBBBBBD\312D\201K�BBBB\"\210\305\201L�\201M�\201N�\f!\201O�Q\201P�BB\"\210\305\201Q�\201R�\201S�\fE\"\210\305\201Q�\201T�\201S�\201U� E\"\207"
  [tramp-default-remote-shell tramp-terminal-type
			      tramp-initial-end-of-output
			      tramp-local-host-regexp
			      tramp-root-id-string add-to-list
			      tramp-methods "rcp"
			      (tramp-login-program "rsh")
			      (tramp-login-args (("%h") ("-l" "%u")))
			      tramp-remote-shell
			      ((tramp-remote-shell-login ("-l"))
			       (tramp-remote-shell-args ("-c"))
			       (tramp-copy-program "rcp")
			       (tramp-copy-args (("-p" "%k") ("-r")))
			       (tramp-copy-keep-date t)
			       (tramp-copy-recursive t))
			      "remcp" (tramp-login-program "remsh")
			      ((tramp-remote-shell-login ("-l"))
			       (tramp-remote-shell-args ("-c"))
			       (tramp-copy-program "rcp")
			       (tramp-copy-args (("-p" "%k")))
			       (tramp-copy-keep-date t))
			      "scp" (tramp-login-program "ssh")
			      tramp-login-args ("-l" "%u") ("-p" "%p")
			      ("%c") ("-e" "none") "-o" format
			      "SetEnv=\"TERM=%s\"" (("%h"))
			      (tramp-async-args (("-q")))
			      (tramp-direct-async ("-t" "-t"))
			      ((tramp-remote-shell-login ("-l"))
			       (tramp-remote-shell-args ("-c"))
			       (tramp-copy-program "scp")
			       (tramp-copy-args
				(("-P" "%p") ("-p" "%k") ("%x") ("%y")
				 ("%z") ("-q") ("-r") ("%c")))
			       (tramp-copy-keep-date t)
			       (tramp-copy-recursive t))
			      "scpx" ("-t" "-t")
			      ("-o" "RemoteCommand=\"%l\"") "rsync"
			      ((tramp-remote-shell-login ("-l"))
			       (tramp-remote-shell-args ("-c"))
			       (tramp-copy-program "rsync")
			       (tramp-copy-args
				(("-t" "%k") ("-p") ("-r") ("-s")
				 ("-c")))
			       (tramp-copy-env
				(("RSYNC_RSH") ("ssh") ("%c")))
			       (tramp-copy-keep-date t)
			       (tramp-copy-keep-tmpfile t)
			       (tramp-copy-recursive t))
			      "rsh"
			      ((tramp-remote-shell-login ("-l"))
			       (tramp-remote-shell-args ("-c")))
			      "remsh" "ssh" "sshx"
			      (("-o" "RemoteCommand=\"%l\"") ("%h"))
			      "telnet" (tramp-login-program "telnet")
			      (tramp-login-args (("%h") ("%p") ("%n")))
			      "su" (tramp-login-program "su")
			      (tramp-login-args (("-") ("%u")))
			      ((tramp-remote-shell-login ("-l"))
			       (tramp-remote-shell-args ("-c"))
			       (tramp-connection-timeout 10))
			      "sg" (tramp-login-program "sg")
			      (tramp-direct-async ("-c"))
			      ((tramp-remote-shell-args ("-c"))
			       (tramp-connection-timeout 10))
			      "sudo" (tramp-login-program "env")
			      ("SUDO_PROMPT=P\"\"a\"\"s\"\"s\"\"w\"\"o\"\"r\"\"d\"\":")
			      "TERM=%s"
			      (("sudo") ("-u" "%u") ("-s") ("-H")
			       ("%l"))
			      ((tramp-remote-shell-login ("-l"))
			       (tramp-remote-shell-args ("-c"))
			       (tramp-connection-timeout 10)
			       (tramp-session-timeout 300)
			       (tramp-password-previous-hop t))
			      "doas" (tramp-login-program "doas")
			      (tramp-login-args (("-u" "%u") ("-s")))
			      ((tramp-remote-shell-args ("-c"))
			       (tramp-connection-timeout 10)
			       (tramp-session-timeout 300)
			       (tramp-password-previous-hop t))
			      "plink" (tramp-login-program "plink")
			      ("-P" "%p") ("-ssh") ("-t") ("%h")
			      ("\"")
			      "env 'TERM=%s' 'PROMPT_COMMAND=' 'PS1=%s'"
			      (("%l") ("\"")) "plinkx" ("-load")
			      "pscp"
			      ((tramp-remote-shell-login ("-l"))
			       (tramp-remote-shell-args ("-c"))
			       (tramp-copy-program "pscp")
			       (tramp-copy-args
				(("-l" "%u") ("-P" "%p") ("-scp")
				 ("%c") ("-p" "%k") ("-q") ("-r")))
			       (tramp-copy-keep-date t)
			       (tramp-copy-recursive t))
			      "psftp"
			      ((tramp-remote-shell-login ("-l"))
			       (tramp-remote-shell-args ("-c"))
			       (tramp-copy-program "pscp")
			       (tramp-copy-args
				(("-l" "%u") ("-P" "%p") ("-sftp")
				 ("%c") ("-p" "%k")))
			       (tramp-copy-keep-date t))
			      tramp-default-method-alist "\\`"
			      regexp-quote "\\'" ("su")
			      tramp-default-user-alist
			      "\\`\\(?:doas\\|su\\(?:do\\)?\\)\\'" nil
			      "\\`\\(?:r\\(?:cp\\|emcp\\|sh\\)\\|telnet\\)\\'"
			      user-login-name]
  16]
 #[0 "\300\301\302\"\207"
    [tramp-register-foreign-file-name-handler tramp-adb-file-name-p
					      tramp-adb-file-name-handler]
    3]
 #[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 (("-s" "%d") ("shell")))
		     (tramp-direct-async t)
		     (tramp-tmpdir "/data/local/tmp")
		     (tramp-default-port 5555))
		    tramp-default-host-alist (nil "")
		    tramp-set-completion-function
		    ((tramp-adb-parse-device-names ""))]
  5])

Documentation

Forms to be executed at the end of tramp.el.

Source Code

;; Defined in /usr/src/emacs/lisp/net/tramp.el.gz
;; Reload `tramp-compat' when we reload `tramp-autoloads' of the GNU
;; ELPA package.
;;;###autoload (when (featurep 'tramp-compat)
;;;###autoload   (load "tramp-compat" 'noerror 'nomessage))

;;;###tramp-autoload
(progn
  (defvar tramp--startup-hook nil
    "Forms to be executed at the end of tramp.el.")

  (put 'tramp--startup-hook 'tramp-suppress-trace t)

  ;; TODO: Once (autoload-macro expand) is available in all supported
  ;; Emacs versions (Emacs 31.1+), this can be eliminated:
  ;; Backward compatibility for autoload-macro declare form.
  (eval-and-compile
    (unless (assq 'autoload-macro macro-declarations-alist)
      (push '(autoload-macro ignore) macro-declarations-alist)))

  (defmacro tramp--with-startup (&rest body)
    "Schedule BODY to be executed at the end of tramp.el."
    (declare (autoload-macro expand))
    `(add-hook 'tramp--startup-hook (lambda () ,@body)))

  (eval-and-compile
    (defalias 'tramp-byte-run--set-suppress-trace
      #'(lambda (f _args val)
	  (list 'function-put (list 'quote f)
		''tramp-suppress-trace val)))

    (add-to-list
     'defun-declarations-alist
     (list 'tramp-suppress-trace #'tramp-byte-run--set-suppress-trace))))