Question

我有一堆远程MySQL服务器，只允许从localhost连接。要连接到它们，我执行以下操作：

ssh host
mysql -uuser -psecret -hhost.myhost.com

在emacs中，我使用sql-mysql-mode配置了与本地MySQL的连接：

(setq sql-connection-alist
      '((pool-a
         (sql-product 'mysql)
         (sql-server "localhost")
         (sql-user "user")
         (sql-password "secret")
         (sql-database "")
         (sql-port 3306))
        ))

(defun sql-connect-preset (name)
  "Connect to a predefined SQL connection listed in `sql-connection-alist'"
  (eval `(let ,(cdr (assoc name sql-connection-alist))
    (flet ((sql-get-login (&rest what)))
      (sql-product-interactive sql-product)))))

(defun sql-local ()
  "Connect to the local MySQL server"
  (interactive)
  (sql-connect-preset 'pool-a)
  (delete-other-windows))

(define-key global-map [f10] 'sql-local)

因此，每次点击F10，我都会获得MySQL shell。

是否可以调整sql-mysql，所以它通过ssh连接到外部机器并在该机器上使用了mysql程序，所以我可以从Emacs连接到任何地方？

Answer 1

Sql模式在建立与数据库的连接时使用default-directory，因此如果变量是TRAMP格式，则首先使用ssh（或其他）连接到远程主机，然后使用数据库客户端本地。要自动执行，您可以执行类似

的操作

(defadvice sql-mysql (around sql-mysql-around activate)
  "SSH to linux, then connect"
  (let ((default-directory "/ssh:host.myhost.com:"))
    ad-do-it))

您当然可以使用函数调用替换"/ssh:host.myhost.com:"，该函数调用会询问您要连接哪个主机等。

Answer 2

看看'sql-mysql-program'到'和'sql-mysql-options'。你可以将第一个绑定到“ssh”，第二个绑定到“host mysql”。如果emacs没有插入'sql -mysql-login-params'在它们之间，你将是明确的。如果不是这样的话，你需要创建一个只执行“ssh host mysql”的脚本然后将'sql-mysql-program'指向那个脚本。

如果您需要同时使用隧道和非隧道的mysql连接，您可以考虑在'sql-product-alist'中添加一个新元素（类似“tunneled-mysql”）。

Answer 3

从Emacs 25.1开始，sql-connection-alist中有一个新的sql-default-directory选项。为每个需要它的服务器设置它允许您使用来自任何给定服务器的后端程序，而不需要任何defadvice或特定于产品的技巧。只需设置连接，例如：

(sql-default-directory "/host.myhost.com:")

或者，如果由于某种原因需要指定ssh：

(sql-default-directory "/ssh:host.myhost.com:")

Emacs如何使用ssh隧道连接到远程MySQL

3 个答案: