Alterator/module/backend

Бэкенд

Существует два вида бэкендов: нативные и внешние. Размещаются эти бэкенды в каталогах /usr/lib/alterator/backend2 и /usr/lib/alterator/backend3 соответственно.

Нативные бэкенды пишутся только на языке scheme и работают внутри процесса alterator. Написание нативных бэкендов требует достаточно большого опыта программирования и большой аккуратности.

Внешний бэкенд может быть написан на произвольном языке программирования, при этом настоятельно рекомендуется использовать готовые библиотеки, предоставляющие API для взаимодействия с alterator. Все библиотеки построены по одному и тому же принципу - есть главный цикл взаимодействующий с alterator и есть функция-обработчик пришедших сообщений. В функции обработчике:

• анализируется вид запроса (параметр action)
• анализируется url запроса, а также значения входных параметров
• вычисляются и выводятся значения выходных параметров.

Простейший бэкенд на shell

Пример простейшего бэкенда на shell:

#!/bin/sh -f

po_domain="alterator-foo"
api_version=1

. alterator-sh-functions

on_message()
{
        case "$in_action" in
               list)
                         write_enum_item "item1" "label1"
                         write_enum_item "item2"  "label2"
                         ;;
               read)
                      case "$in__objects" in
                         url1) write_string_param param1 "value1";;
                         url2) write_bool_param param2  "yes";;
                      esac
                      ;;
                write)
                    [ -n "$in_param1" ] && echo "$in_param1" >/tmp/file1
                    test_bool "$in_param2" && echo "yes">/tmp/file2
                    ;;
        esac
}

message_loop

В данном примере:

• message_loop — запуск цикла обработки событий
• on_message — обработчик входящих сообщний. Входные переменные выглядят как переменные $in_<имя>. Выходные печатаются при помощи функций write_* .
• alterator_api_version — текущая версия API для взаимодействия с alterator.

Если к к бэкенду <name> обращались из интерфейса по адресу /<name>/foo/bar, то переменная $in__objects будет равна "foo/bar" (то есть "хвост" адреса), если обращались по адресу /<name>, то $in__objects будет равна "/".

Более подробная информация по написанию бэкендов на shell находится здесь.

Простейший бэкенд на perl

Пример аналогичного бэкенда на perl:

#!/usr/bin/perl -w
use strict;
use Alterator::Backend3;

$TEXTDOMAIN='alterator-foo';
$DEBUG = 1;

sub on_message{
  my message=shift;
  if ($message->{action} eq 'list'){
    write_named_auto_list('item1', 'label', 'label1');
    write_named_auto_list('item2', 'label', 'label2');
  }
  elsif ($message->{action} eq 'read'){
     write_string_param('param1', 'value1');
     write_bool_param('param2',  'yes');
  }
  elsif ($message->{action} eq 'write'){
    print F1 $message->{param1} if (exists($message->{param1}));
    print F2 ($message->{param2} eq '#t')? 'yes':'no' if (exists($message->{param2}));
  }
}

message_loop(\&on_message);

Здесь, как и в shell-бэкенде:

• message_loop — запуск цикла обработки событий
• on_message — обработчик входящих сообщений.

Обработчику передаётся ссылка на хэш с входными переменными. Выходные печатаются при помощи функций write_* .

При обращении из интерфейса по адресу /<name>/foo/bar, то в бэкенде <name> в этом хэше будет присутствовать //_objects// равный "foo/bar" (то есть "хвост" адреса), если обращались по адресу /<name>, то //_objects// равно "/".

Более подробная информация по написанию бэкендов на perl находится здесь.