Джим Меггелен - Asterisk™: будущее телефонии Второе издание

exten => s,n,GotoIf($["${DIALSTATUS}" = "BUSY"]?busy:unavail) exten => s,n(unavail),Voicemail(${MACRO_EXTEN}@default,u) exten => s,n,Hangup()

exten => s,n(busy),VoiceMail(${MACRO_EXTEN}@default,b) exten => s,n,Hangup()

Использование аргументов в макросе

Итак, мы уже близки к получению того макроса, какой нам нужен, осталось внести последнее изменение. Необходимо передать в макрос канал, по которому будут выполняться вызовы, потому что до сих пор в нем жестко прописан канал ${JOHN} (помните, мы определяли переменную JOHN как канал для звонков Джону?). Передадим канал как аргумент - и наш первый макрос будет готов: [macro-voicemail] exten => s,1,Dial(${ARG1},10)

exten => s,n,GotoIf($["${DIALSTATUS}" = "BUSY"]?busy:unavail) exten => s,n(unavail),Voicemail(${MCARO_EXTEN}@default,u)

exten => s,n,Hangup()

exten => s,n(busy),VoiceMail(${MCARO_EXTEN}@default,b) exten => s,n,Hangup()

Теперь, когда макрос готов, его можно использовать в диалплане. Вот как вызывается макрос для обеспечения функции голосовой почты для Джона, Джейн и Джека:

exten => 101,1,Macro(voicemail,${JOHN}) exten => 102,1,Macro(voicemail,${JANE}) exten => 103,1,Macro(voicemail,${JACK})

И для 50 или более пользователей этот диалплан сохранит свою четкость и организованность; для каждого пользователя просто будет создана строка со ссылкой на макрос, который может быть настолько сложным, насколько это необходимо. Может существовать даже несколько разных макросов для различных типов пользователей, таких как executives (руководство), courtesy_phones (телефоны справочной службы), call_center_agents (агенты центра обработки вызовов), analog_ sets (аналоговые телефоны), sales_department (отдел продаж) и т. д. Более сложная версия макроса может выглядеть примерно так: [macro-voicemail] exten => s,1,Dial(${ARG1},20) exten => s,n,Goto(s-${DIALSTATUS},1) exten => s-NOANSWER,1,Voicemail(${MACRO_EXTEN},u) exten => s-NOANSWER,n,Goto(incoming,s,1) exten => s-BUSY,1,Voicemail(${MACRO_EXTEN},b) exten => s-BUSY,n,Goto(incoming,s,1) exten => _s-.,1,Goto(s-NOANSWER,1)

Этот макрос использует замечательный побочный эффект приложения Dial(): Dial() задает переменную DIALSTATUS как индикатор успешности или неуспешности вызова. В данном случае обрабатываются варианты NOANSWER (не отвечает) и BUSY (занято), а все остальные результаты трактуются как NOANSWER.

Использование базы данных Asterisk (AstDB)

Ну что, пока довольны? Дальше будет еще интереснее! В Asterisk есть мощный механизм для хранения значений, который называется базой данных Asterisk (AstDB). AstDB обеспечивает простой способ хранения данных для использования в диалплане.

Для тех, кто имеет опыт использования реляционных баз данных, таких как PostgreSQL или MySQL, заметим, что база данных Asterisk не является традиционной реляционной базой данных. Это база данных Berkeley DB версии 1. Существует несколько способов хранения данных из Asterisk в реляционной базе данных. Подробнее о реляционных базах данных рассказывается в главе 12.

База данных Asterisk хранит данные в группах, называемых семействами, значения которых идентифицируются ключами. Например, если бы у нас имелось семейство test, мы могли бы хранить только одно значение с ключом count. Каждое хранящееся значение должно быть ассоциировано с каким-то семейством.

Хранение данных в AstDB

Для сохранения нового значения в базе данных Asterisk используется приложение SetQ [77], но с его помощью задается переменная не канала, а AstDB. Например, чтобы присвоить ключу count семейства test значение 1, необходимо записать следующее:

exten => 456,1,Set(DB(test/count)=1)

Если в семействе test уже есть ключ count, его значение будет заменено на новое. Также можно сохранять значения из командной строки Asterisk, выполнив команду database put семейство ключ значение. Для нашего примера надо ввести следующее: data base put test count 1.

Извлечение данных из AstDB

Чтобы извлечь значение из базы данных Asterisk и присвоить его переменной, используется все то же приложение Set(). Давайте извлечем значение count (опять же из семейства test), присвоим его переменной COUNT и затем воспроизведем это значение абоненту:

exten => 456,1,Set(DB(test/count)=1) exten => 456,n,Set(COUNT=${DB(test/count)}) exten => 456,n,SayNumber(${COUNT})

Также можно проверять значение заданного ключа из командной строки Asterisk, выполнив команду database get семейство ключ. Для просмотра всего содержимого AstDB используется команда database show.

Удаление данных из AstDB

Существует два способа удаления данных из базы данных Asterisk.

Чтобы удалить ключ, можно использовать приложение DB DELETE().

Оно принимает путь к ключу в качестве аргумента:

; удаляет ключ и возвращает его значение за один шаг

exten => 457,1,Verbose(0, The value was ${DB_DELETE(test/count)})

Также можно удалить все семейство ключей, используя приложение DBdeltree(). Оно принимает всего один аргумент - имя семейства ключей, подлежащего удалению. Чтобы удалить все семейство test, делаем следующее:

exten => 457,1,DBdeltree(test)

Для удаления ключей и семейств ключей AstDB из командной строки используются команды database del ключ и database deltree семейство соответственно.

Использование AstDB в диалплане

Существует бесконечное число вариантов использования базы данных Asterisk в диалплане. Чтобы представить AstDB, рассмотрим два простых примера. Первый - простой пример вычисления, демонстрирующий постоянство базы данных Asterisk (имеется в виду, что она устойчива к перезагрузкам системы). Во втором примере с помощью функции BLACKLIST() будет определена принадлежность номера к черному списку и необходимость его блокировки.

Для начала в примере с воспроизведением счета извлечем число (значение ключа count) из базы данных и присвоим его переменной COUNT. Если такой ключ не существует, DB() возвратит NULL (нет значения). Чтобы проверить наличие значения в базе данных, введем функцию ISNULL(), которая будет контролировать, возвращено ли значение. В случае если этого не произошло, мы присвоим AstDB исходное значение 1 с помощью приложения Set(). Следующий приоритет возвратит нас к приоритету 1. Это произойдет при первом вызове данного добавочного номера:

exten => 678,1,Set(COUNT=${DB(test/count)})

exten => 678,n,GotoIf($[${ISNULL(${COUNT})}]?:continue)

exten => 678,n,Set(DB(test/count)=1)

exten => 678,n,Goto(1)

exten => 678,n(continue),NoOp()

Далее будет воспроизведено текущее значение COUNT. После этого оно будет увеличено на 1:

exten => 678,1,Set(COUNT=${DB(test/count)})

exten => 678,n,GotoIf($[${ISNULL(${COUNT})}]?:continue)

exten => 678,n,Set(DB(test/count)=1)

exten => 678,n,Goto(1)

exten => 678,n(continue),NoOp()

exten => 678,n,SayNumber(${COUNT})

exten => 678,n,Set(COUNT=$[${COUNT} + 1])

Теперь, после приращения COUNT, давайте поместим новое значение в базу данных. Не забудьте, что сохранение значения для существующего ключа приводит к перезаписи предыдущего значения:

exten => 678,1,Set(COUNT=${DB(test/count)})