Удаленное соединение ssh изнутри Emacs

Question

Несколько вопросов, в том числе this, обсудите аспекты, относящиеся к соединениям ssh из Emacs. Я не нашел ответа на свой вопрос: Как я могу ssh на удаленную машину из Emacs?

Я не хочу редактировать файл на удаленной машине из Emacs. Я знаю M-xshell, который открывает оболочку на моем локальном компьютере, и мне известно использование TRAMP для редактирования файла по ssh на удаленной машине. Однако ни одна из них не связана с этим вопросом.

(вместо голосования, чтобы закрыть, может перенести вопрос на другой сайт.)

Edit: Относящиеся обсуждение here.

Answer 1

Во-первых, я не знаю собственного клиента elisp ssh (и не думаю, что есть много мотивации для написания одного), поэтому вам обязательно нужно будет взаимодействовать с внешним процессом ssh-клиента.

Как вы хотите использовать ssh интерактивно, для процесса ssh требуется терминал на локальной стороне соединения.

Вопрос поэтому: Будет ли Emacs реализовывать терминал, к которому может быть присоединен процесс ssh?

Ответ: yes - term.el обеспечивает надежную реализацию терминала, через которую ssh можно запускать напрямую, без требования к оболочке.

Если запустить M-хtermRET вам будет предложено ввести программу. (По умолчанию используется оболочка, но это, конечно, не единственный тип процесса, который вы можете запустить.)

По неизвестным причинам интерактивные функции term (и ansi-term) не поддерживают передачу аргументов указанной программе, которая отображает они менее полезны, если вы хотите запустить что-то вроде ssh user@host. Вместо этого вы можете указать скрипт, который обрабатывал аргументы, но мы можем управлять этим также в elisp:

Функция term на самом деле является простой оболочкой, которая вызывает make-term, чтобы запустить программу, а затем устанавливает соответствующие режимы. Поскольку make-termделает принимает аргументы программы, довольно просто скопировать и изменить определение term в соответствии с вашими собственными целями.

Вот очень простая реализация:

(defun my-ssh (user host port) 
    "Connect to a remote host by SSH." 
    (interactive "sUser: \nsHost: \nsPort (default 22): ") 
    (let* ((port (if (equal port "") "22" port)) 
     (switches (list host "-l" user "-p" port))) 
    (set-buffer (apply 'make-term "ssh" "ssh" nil switches)) 
    (term-mode) 
    (term-char-mode) 
    (switch-to-buffer "*ssh*"))) 

или, возможно, это предпочтительнее:

(defun my-ssh (args) 
    "Connect to a remote host by SSH." 
    (interactive "sssh ") 
    (let ((switches (split-string-and-unquote args))) 
    (set-buffer (apply 'make-term "ssh" "ssh" nil switches)) 
    (term-mode) 
    (term-char-mode) 
    (switch-to-buffer "*ssh*"))) 

Очевидно, есть возможности для улучшения, но я думаю, что это довольно полезно, как есть.

Вы должны убедиться в том, что вы были в курсе событий term-mode.См:

• M-:(info "(emacs) Terminal emulator")RET
• М-:(info "(emacs) Terminal Mode")RET
• С-чеterm-modeRET

Answer 2

Я не уверен, что понимаю. Откройте M-x ansi-term и запустите ssh user@host?

Answer 3

Оказывается, есть то, что вы хотите:

(setq rlogin-program "ssh") 
(setq rlogin-process-connection-type t) 

, а затем M-x rlogin RET <myhost> RET будет делать это.

Answer 4

Возможно, ssh.el - это то, что вы ищете. Команда ssh обеспечивает одноэтапный способ создания удаленных оболочек в Emacs через ssh, включая естественное определение имени пользователя и включение отслеживания каталога tramp, если это необходимо.