LISP-пакет OMGlib или вперёд к Web 3.0

Я не собираюсь конкурировать с другими фреймворками, боже упаси) Вообще, мое глубокое убеждение в том, что с языком, средой и библиотеками не нужно бороться, нужно их использовать! OMG можно прикрутить к любому уже существующему сайту, добавив загрузку одного js-файла и дальше выполнять на странице любой LISP-код, параллельно со всем остальным кодом. Также, поскольку мы имеем полный доступ к DOM и JS, можно использовать любые JS-фреймворки, просто вызывая их функции. Я не стал раздувать статью, но в omgui.lisp есть код, подключающий API YouTube и позволяющий добавить плеер на страницу. То же можно сделать и со всякими React-ами и прочими jquery, не к ночи будь помянуты.

О! Библиотека работает на Windows! Неожиданно)

Интересная реализация, спасибо! Но я пока еще не готов заниматься портированием. Есть шанс, конечно, что там всё само заработает, но я сомневаюсь. Похоже, там свой FFI, если он не поддерживается нужными мне пакетами (в основном, clack, bordeaux-threads и пр.), то придется затратить довольно много усилий.

О, Smalltalk, мое уважение!

Элемент создается кодом, который выполняется в браузере, соответственно, он хранится в браузере и больше нигде. Можно сохранить ссылку на этот объект и использовать ее для получения свойств:

(let ((el (create-element "div" :|innerHTML| "Hello world!")))
  (ensure-element el ;; execute the following code when the element really appears
    (jslog (jscl::oget el "clientHeight"))))

Если же мне надо будет зачем-то узнать высоту элемента на бэкенде, я должен явно запросить ее у браузера или пусть браузер вызовет RPC и сообщит:

(defun-r rpc-report-height (height)
  (format t "The height is ~A px!~%" height))

(defparameter-f *my-div* nil)

(defun-f get-div-height ()
  (jscl::oget *my-div* "clientHeight"))

(defun-f make-div ()
  (setf *my-div* (create-element "div" :|innerHTML| "Hello world!"))
  (ensure-element *my-div*
    (rpc-report-height (get-div-height)))
  nil)

(make-div) ;; The #'rpc-report-height must be fired
(sleep 1)
(print (get-div-height)) ;; call browser-side function

В принципе, бэкенд не контролирует браузер на 100%, просто дает ему команды и браузер их выполняет. Я даже хочу реализовать "production mode", когда сокет вообще не открывается, а браузер сразу получает весь код, скомпилированный и упакованный, оставив текущую схему для разработки/отладки, а также для приложений, где важна интерактивность.

Спасибо за наводку! Добавил два проекта в ultralisp, но с OMGlib там проблемы -- возможно, ultralisp не умеет правильно скачивать сабмодули git, а у меня так JSCL добавлен. У JSCL вообще нет asdf и я использую слегка грязноватый хак для того, чтобы включить его в свой пакет (см. omg.asd). С quicklisp это работает.

Что касается Reblocks и CLOG -- я видел эти проекты, хотя и не погружался в них глубоко. Главное отличие OMG -- возможность переноса практически всей интерфейсной логики на сторону клиента, при этом сохраняя единый lisp-образ на сервере, где его можно модифицировать и это сразу* отображается на стороне клиентов. В принципе, если приложение не зависит от бэкенда (например, оно использует API каких-то чужих сервисов), то его можно (пока это не реализовано, правда) вообще отвязать от сервера, сделав автономным.

Вообще, изначально, я хотел сделать что-то более общее, когда есть мастер-образ lisp, который передает lisp-код в подчиненные lisp-образы, которые запущены на клиентах (например, в мобильниках) и код там выполняется, отрисовывая интерфейсы и исполняя всю интерфейсную логику, какую возможно, локально. Это не обязательно могут быть интерфейсы, скажем, можно так подключить lisp-образы, запускаемые в контейнерах на удаленных серверах и производить там всякие тяжелые вычисления по мере надобности. То есть ботнет-подобная сеть, по сути, но используемая в мирных целях).

Благодаря особенностям Lisp (потому я и выбрал этот язык, хотя слабо им владею) можно всё это делать внутри одного образа, писать, по сути, сплошной код, помечая лишь определенные функции, как выполняемые где-то еще. Пока что эта идея еще в зачаточном состоянии, в основном потому, что у меня нет прикладной задачи, где можно было бы ее применить в полном объеме, но когда такая задача появится, я ее разовью дальше)

Также этот подход (хоть и менее удобно) можно применить в питоне, например, там есть компилятор в JS и можно получить доступ к синтаксическому дереву. Но я не хочу быть тем, кто откроет ящик Пандоры, дав питонистам в руки такую технологию)