69 lines
2.2 KiB
EmacsLisp
69 lines
2.2 KiB
EmacsLisp
;;; lsp-camel.el --- LSP Camel server integration -*- lexical-binding: t; -*-
|
|
|
|
|
|
;;; Code:
|
|
|
|
(require 'lsp-mode)
|
|
|
|
(defgroup lsp-camel nil
|
|
"LSP support for Camel, using camel-language-server"
|
|
:group 'lsp-mode
|
|
:tag "Language Server"
|
|
:package-version '(lsp-mode . "8.0.1"))
|
|
|
|
;; Define a variable to store camel language server jar version
|
|
(defconst lsp-camel-jar-version "1.5.0")
|
|
|
|
;; Define a variable to store camel language server jar name
|
|
(defconst lsp-camel-jar-name (format "camel-lsp-server-%s.jar" lsp-camel-jar-version))
|
|
|
|
;; Directory in which the servers will be installed. Lsp Server Install Dir: ~/.emacs.d/.cache/camells
|
|
(defcustom lsp-camel-jar-file (f-join lsp-server-install-dir "camells" lsp-camel-jar-name)
|
|
"Camel Language server jar command."
|
|
:type 'string
|
|
:group 'lsp-camel
|
|
:type 'file
|
|
:package-version '(lsp-mode . "8.0.1"))
|
|
|
|
(defcustom lsp-camel-jar-download-url
|
|
(format "https://repo1.maven.org/maven2/com/github/camel-tooling/camel-lsp-server/%s/%s" lsp-camel-jar-version lsp-camel-jar-name)
|
|
"Automatic download url for lsp-camel."
|
|
:type 'string
|
|
:group 'lsp-camel
|
|
:package-version '(lsp-mode . "8.0.1"))
|
|
|
|
(lsp-dependency
|
|
'camells
|
|
'(:system lsp-camel-jar-file)
|
|
`(:download :url lsp-camel-jar-download-url
|
|
:store-path lsp-camel-jar-file))
|
|
|
|
(defcustom lsp-camel-server-command `("java" "-jar" , lsp-camel-jar-file)
|
|
"Camel server command."
|
|
:type '(repeat string)
|
|
:group 'lsp-camel
|
|
:package-version '(lsp-mode . "8.0.1"))
|
|
|
|
(defun lsp-camel--create-connection ()
|
|
(lsp-stdio-connection
|
|
(lambda () lsp-camel-server-command)
|
|
(lambda () (f-exists? lsp-camel-jar-file))))
|
|
|
|
(lsp-register-client
|
|
(make-lsp-client :new-connection (lsp-camel--create-connection)
|
|
:activation-fn (lsp-activate-on "xml" "java")
|
|
:priority 0
|
|
:server-id 'camells
|
|
:add-on? t
|
|
:multi-root t
|
|
:initialized-fn (lambda (workspace)
|
|
(with-lsp-workspace workspace
|
|
(lsp--set-configuration (lsp-configuration-section "camel"))))
|
|
:download-server-fn (lambda (_client callback error-callback _update?)
|
|
(lsp-package-ensure 'camells callback error-callback))))
|
|
|
|
(lsp-consistency-check lsp-camel)
|
|
|
|
(provide 'lsp-camel)
|
|
;;; lsp-camel.el ends here
|