Язык Программирования CommuniGate Pro (CG/PL)

Исходным кодом программы является простой текст в кодировке UTF-8.

Поддерживаются следующие унарные операции:

-

унарный минус. Если значением операнда является число, то значением операции является число, взятое с обратным знаком; в противном случае значением операции является число 0.
Следующие выражения имеют значение -5:

-5
-(3+2)

+

унарный плюс. Если значением операнда является число, то значением операции является то же число; в противном случае значением операции является число 0.
Следующие выражения имеют значение 5:

+5
+(10/2)

not

Отрицание. Если операнд имеет нулевое значение, то значением операции является значение истинно; в противном случае значением операции является нулевое значение.
Вместо ключевого слова not может использоваться символ !.
Следующие выражения имеют значение "YES":

not null
!(2 == 3)

Унарные операции обладают более высоким приоритетом, чем бинарные и тернарные операции.

-2 + 1

В языке реализованы бинарные операции. Бинарные операция задаются как

левый-операнд операция правый-операнд

Поддерживаются следующие бинарные операции, перечисленные в порядке убывания их приоритета:

*, /, %

Эти арифметические операции могут быть применены только к числовым операндам, имеющим числовые значения.
Если ни один из этих операндов не является Числом или если правый операнд в операции / или % является числом 0, то вся операция принимает нулевое значение.
Следующие выражения имеют значение 10:

5 * 2
-20 / -2
30 % 20

+, -

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

3 + 2
-2 - -7

Следующее выражение имеет значение "John Doe":

"Joh" + "n Doe"

<, <=, ==, !=, >=, >

Эти операции сравнения могут применяться к паре числовых операндов и их результатом является истина, если условие арифметического сравнения выполняется.
Эти операции сравнения могут применяться к паре операндов - отметок о времени и их результатом является истина, если условие арифметического сравнения выполняется.
Операции сравнения ==, != могут также применяться к любой паре объектов, проверяя, "равны" ли они.

• Нулевое значение равно только нулевому значению.
• Числа равны, если равны их числовые значения.
• Строки равны, если они имеют одинаковую длину и одинаковые символы в каждой позиции строки.
• Блоки данных равны, если они имеют одинаковую длину и одинаковые байты данных в каждой позиции блока.
• Массивы равны, если они имеют одинаковое число элементов и элементы в каждой позиции совпадают.
• Словари равны, если они имеют одинаковое число пар ключ-значение, строки ключей и значения для каждого ключа совпадают в обоих словарях.
• Для всех остальных типов объектов любой объект равен только самому себе (никакие два различных объекта не считаются равными).

В других случаях значение операции сравнения является нулевым.
Следующие выражения имеют значение "YES":

1+2 == 3
2+2 != 3
2+2 >= 3
"Joe" == "Joe"
null == (2 == 3)

and, or, xor, and then, or else

это логические операции сравнивают свои операнды с нулевыми значениями.
Значение операции and является истинными, если оба операнда имеют ненулевые значения; в противном случае значения является нулевым.
Символ & может использоваться вместо ключевого слова and.
Значение операции or является истинным, если хотя бы один из операндов имеет ненулевое значение; в противном случае значение является нулевым.
Вместо ключевого слова or может использоваться символ |.
Значение операции xor является нулевым, если оба операнда имеют ненулевые значения или оба операнда имеют нулевые значения. В противном случае значением операции является значение ненулевого операнда.
Вместо ключевого слова xor может использоваться символ ^.
Операция and then вычисляет сначала значение левого операнда. Если его значение является нулевым, то правый операнд не вычисляется и результатом всей операции является нулевое значение. В противном случае вычисляется правый операнд и его значение становится значением операции.
Символ && может использоваться вместо ключевого слова and then.
Операция or else вычисляет сначала значение левого операнда. Если его значение является ненулевым, то правый операнд не вычисляется и результатом всей операции является значение левого операнда. В противном случае вычисляется правый операнд и его значение становится значением операции.
Вместо ключевого слова or else может использоваться символ ||.
Следующие выражения имеют значение "YES":

1+2 == 3 & 2+2 == 4
2+2 == 3 or else 7-5 == 2
false ^ true

Бинарные операции, имеющие одинаковый приоритет, выполняются слева направо: X op Y op Z совпадает с ( X op Y ) op Z

Бинарные операции обладают более высоким приоритетом, чем тернарные операции.

cond ? expr1 : expr2

• операнд cond вычисляется.
• Если вычисленное значение не является нулевым, то вычисляется операнд expr1 и его значение становится значением операции.
• В противном случае вычисляется операнд expr2 и его значение становится значением операции.

Следующие выражения имеют значение "Good":

3 == 3 ? "Good" : "Bad"
null ? 77777 : "Good"

Тернарная операция группируется справа налево: A ? B : C ? D : E совпадает с A ? B : (C ? D : E)

В языке реализованы операции с индексами:

объект[индекс]

где

выражение объект должно иметь значением массив, словарь или строку (в противном случае операция приведёт к возникновению исключительной ситуации).

выражение индекс должно иметь цифровое значение, которое меньше числа элементов в объекте или меньше длины строки объекта.

SquareArray[2]

SquareArray[5] = "Blue";

Если выражение объект является словарём, то операция возвращает ключ словаря номер индекс (первый ключ имеет номер 0).
Попытка получение несуществующего ключа вернёт нулевое значение.
Попытка присвоения ключу нового значения приведёт к возникновению исключительной ситуации.

SquareDictionary[2]

SquareString[1]

В языке реализована работа с ключами или операции с элементами словаря:

словарь.имяКлюча

где

выражение словарь должно иметь своим значением словарь (иначе операция приведёт к возникновению исключительной ситуации), а

имяКлюча является именем.

SquareDictionary.three

SquareDictionary.four

словарь.(выражКлюча)

где

выражение словарь должно иметь своим значением словарь и

выражение выражКлюча должно иметь строковое значение (в противном случае операция приведёт к возникновению исключительной ситуации).

SquareDictionary.("th" + "ree")

В последовательности операторов может находиться ноль или более операторов, разделяемых символом точка с запятой (';').

Пустой оператор не выполняет никаких действий:

;

Нулевой оператор состоит из ключевого слова null. Он не выполняет действий:

null;

Оператор присваивания состоит из ссылки на контейнер данных (переменную, элемент массива или элемент словаря), символа = и выражения, которое будет вычислено и присвоено указанному контейнеру данных.

myVar = 123 + 111;
myVar = "string";

Если контейнер данных является элементом массива, то этот элемент должен существовать или он должен быть первым из несуществующих элементов; то есть, если в массиве имеется три элемента, то вы можете присваивать значения элементам 0,1,2 и 3. В последнем случае в массив добавляется новый элемент.

Если контейнер данных является элементом массива, то присвоение ему нулевого значения фактические удаляет этот элемент из словаря.

Некоторые операторы в последовательности могут быть представлены в альтернативной форме. Операторы в альтернативной форме не оканчиваются символом точка с запятой.

Альтернативная форма условного оператора состоит из ключевого слова if, за которым следует выражение (if-выражение) и последовательности операторов (if-последовательность), заключённой в фигурные скобки { и }.
Альтернативная форма условного оператора может (опционально) содержать одну (или более) elif-частей после заключённой в скобки if-последовательности. Каждая elif-часть состоит из ключевого слова elif, выражения (elif-выражение) и последовательности операторов (elif-последовательность), заключённой в фигурные скобки.
Альтернативная форма условного оператора может (опционально) содержать else-часть. Она указывается после заключённой в фигурный скобки if-последовательности и после всех опциональных elif-частей. Else-часть состоит из ключевого слова else и последовательности операторов (else-последовательность), заключённых в фигурные скобки.

Альтернативная форма оператора loop состоит из ключевого слова while, за которым следует выражение (while-выражение), левая фигурная скобка ('{'), последовательность операторов (начальная последовательность), ноль или более exitif-частей и правая фигурная скобка '}'.
Каждая опциональная exitif-часть состоит из ключевого слова exitif, выражения (exitif-выражение), символа точка с запятой (';') и последовательности операторов.

• Точки Входа являются разделами кода, выполняемыми при активировании программы.
• Процедуры и функции являются разделами кода, которые могут использоваться во входах в разделы входа (вызываться из них) или в других процедурах и/или функциях.

Процедуры и функции могут вызываться рекурсивно: процедура или функция может вызывать саму себя - напрямую или через вызов других процедур или функций.

Все разделы кода также являются реентерабельны: один и тот же раздел кода может использоваться одновременно в различных активациях программ или в Задачах.

Перед тем, как какие-либо разделы кода могут использоваться, они должны быть объявлены. Понятие объявления включает в себя также предобъявления, внешние объявления и определения.

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

для предобъявления:

ключевое слово forward с символом точка с запятой (;)

для определения точки входа:

ключевое слово is, за которым следует последовательность операторов, оканчивающаяся ключевым словом end (за которым опционально может идти ключевое слово entry); и символ точка с запятой (;)

для альтернативного определения точки входа:

левая фигурная скобка ({), за которым следует последовательность операторов, завершающаяся правой фигурной скобкой (})

Если работающая программа достигает конца последовательности операторов раздела входа, то выполняется подразумеваемый оператор stop.

для предобъявления:

ключевое слово forward с символом точка с запятой (;)

для определения процедуры:

ключевое слово is, за которым следует последовательность операторов, оканчивающаяся ключевым словом end (за которым опционально может идти ключевое слово procedure); и символ точка с запятой (;)

для альтернативного определения входа:

левая фигурная скобка ({), за которым следует последовательность операторов, завершающаяся правой фигурной скобкой (})

для внешнего объявления:

ключевое слово external с символом точка с запятой (;)

Если работающая программа достигает конца последовательности операторов процедуры, то выполняется подразумеваемый оператор return.

Объявление функции осуществляется также, как и объявление процедуры, но вместо ключевого слова procedure используется ключевое слово function.

Все пути работы программы в разделе кода функции должны заканчиваться оператором return или stop.

Ниже приводится также функция в альтернативной форме с использованием тернарного оператора:

Имена для всех разделов кода (точки входа, процедур и функций), используемые в одной программе, должны быть уникальными.

Следующие процедуры и функции являются встроенными в язык и они доступны для всех приложений: Вы не должны использовать их имена для собственных определений процедур или функций.

Same(arg1,arg2)

Эта функция возвращает значение истина, если значения аргументов arg1 и arg2 являются одним и тем же объектом или если оба они имеют нулевые значения, или если оба значения являются истинными. В других случаях функция возвращает нулевое значение.
Значение функции Same("J" + "ack","Jack") является нулевым.
В следующем примере:

x = "my string";
y = "my string";
z = x;
test1 = Same(x,y);
test2 = Same(x,x);
test3 = Same(x,z);

результатом test1 является нулевое значение, а результатами test2 и test3 является значение истина.

Length(arg)

Если arg является строкой, то это функция возвращает размер строки (в байтах);
Если arg является блоком данных, то это функция возвращает размер блока данных (в байтах);
Если arg является массивом, то это функция возвращает число элементов массива;
Если arg является словарём, то это функция возвращает число ключей словаря;
Если arg является описателем папки, то это функция возвращает число сообщений в папке;
Во всех других случаях эта функция возвращает число 0.

Void(arg1)

Эта процедура не делает ничего, значение arg1 выбрасывается. Используйте эту процедуру, если вам необходимо вызвать функцию, но вам не нужен результат этой функции.

IsString(arg)

Эта функция возвращает истину, если arg является строкой; в противном случае функция возвращает нулевое значение.

String(arg)

Если значением arg является строка, то эта функция возвращает эту строку.
Если значением arg является число, то эта функция возвращает десятичное представление этого числа.
Если значением arg является блок данных, то эта функция возвращает строку, в которой содержится этот блок данных (интерпретируемый как текстовые данные).
Если значением arg является IP адрес, то эта функция возвращает каноническое представление этого сетевого адреса.
Если значение arg является нулевым, то эта функция возвращает нулевое значение.
Во всех других случаях эта функция возвращает строку с текстовым представлением значения arg.

FindSubstring(str,substr)

Если значениями str и substr являются строки и последняя является подстрокой в строке str, то эта функция возвращает позицию подстроки substr в строке str (позиция начинается с 0).
Например, значением FindSubstring("forest","for") является 0.
Во всех других случаях эта функция возвращает число -1.

Substring(str,from,len)

Если значением str является строка, значением from является число, а значение len является неотрицательным числом, то эта функция возвращает строку, являющуюся подстрокой строки str и имеющую длину len.
Если from имеет неотрицательное значение, то подстрока начинается с позиции from (первый символ строки имеет позицию 0).
Если from имеет отрицательное значение, то подстрока заканчивается в позиции 1-from, считая от конца строки (для того, что бы включить в подстроку только последний символ, from должно быть -1).
Если значение from (или значение -1-from) равно или больше длине строки str, то результатом является пустая строка.
Если значение from + len (или -1-from + len) больше, чем длина строки str, то результирующая строка будет короче, чем len.
Во всех других случаях эта функция возвращает нулевое значение.

EOL()

Эта функция возвращает строку, содержащую символ(ы) EOL (конца строки), используемые в ОС Сервера.

CRLF()

Эта функция возвращает строку с символами EOL, принятым в Интернет (<возврат каретки><перевод строки>).

ToUpperCase(str)

Если значением str является строка, то результатом функции будет строка, все буквы в которой преобразованы к верхнему регистру.

ToLowerCase(str)

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

FindRegEx(str,picture)

Эта функция сравнивает строку str со картинкой строки, содержащей регулярные выражения.
Если str или picture не являются строками, или строка picture не может быть интерпретирована как регулярное выражение, или строка str не соответствует регулярному выражению, то функция возвращает нулевое значение.
В противном случае функция возвращает массив строк. Нулевое элемент этого массива содержит копию строки str, а остальные дополнительные элементы (если они есть) содержат подстроки строки str, соответствующие группам регулярных выражений.
В строке picture должно находится используемое регулярное выражение, заданное в соответствии с расширенным синтаксисом POSIX.

EmailDomainPart(address)

Если значение address является строкой и строка содержит символ @, то эта функция возвращает строку, содержащую часть строки address после первого символа @.
В противном случае функция возвращает нулевое значение.

EmailUserPart(address)

Если значение address не является строкой, то эта функция возвращает нулевое значение.
Если значение address не содержит символ @, то эта функция возвращает ту же самую строку.
В противном случае (значение address является строкой, содержащей символ @), эта функция возвращает строку, содержащую часть строки address перед первым символом @.

IsNumber(arg)

Эта функция возвращает значение истина, если arg является числом; в противном случае функция возвращает нулевое значение.

Number(arg)

Если значением arg является число, то эта функция возвращает это же число.
Если значением arg является строка, то эта функция возвращает числовое значение этой строки до первого не-цифрового символа.
Например, значением Number("123#") является 123.
Во всех других случаях эта функция возвращает число 0.

RandomNumber()

Эта функция возвращает случайное целое число в диапазоне [0..9223372036854775807] ([0..2*63-1]).

IsDate(arg)

Эта функция возвращает истину, если arg является отметкой о времени; в противном случае функция возвращает нулевое значение.

GMTTime()

Эта функция возвращает объект - отметку о времени, имеющую значение текущего GMT времени.

LocalTime()

Эта функция возвращает объект - отметку о времени, имеющую значение текущего локального времени.

GMTToLocal(arg)

Если значение arg является отметкой о времени, то эта функция возвращает отметку о времени, содержащее значение arg, конвертированное из GMT в локальное время.
Во всех других случаях эта функция возвращает нулевое значение.

LocalToGMT(arg)

Если значение arg является отметкой о времени, то эта функция возвращает отметку о времени, содержащее значение arg, конвертированное из локального времени в GMT время.
Во всех других случаях эта функция возвращает нулевое значение.

Year(arg)

Если значение arg является отметкой о времени, то эта функция возвращает число, содержащее год из значения arg.
Во всех других случаях эта функция возвращает нулевое значение.

Month(arg)

Если значение arg является отметкой о времени, то эта функция возвращает строку, содержащую имя месяца из значения arg (Jan, Feb, Mar, Apr, May, Jun, Jul, Aug, Sep, Oct, Nov, Dec).
Во всех других случаях эта функция возвращает нулевое значение.

MonthNum(arg)

Если значение arg является отметкой о времени, то эта функция возвращает число, содержащее номер месяца из значения arg.
Во всех других случаях эта функция возвращает нулевое значение.

MonthDay(arg)

Если значение arg является отметкой о времени, то эта функция возвращает число, содержащее день месяца из значения arg (число 1 возвращается для первого дня месяца).
Во всех других случаях эта функция возвращает нулевое значение.

WeekDay(arg)

Если значение arg является отметкой о времени, то эта функция возвращает день недели из значения arg (Mon, Tue, Wed, Thu, Fri, Sat, Sun).
Во всех других случаях эта функция возвращает нулевое значение.

YearDay(arg)

Если значение arg является отметкой о времени, то эта функция возвращает число, содержащее день года из значения arg (число 1 возвращается для первого января).
Во всех других случаях эта функция возвращает нулевое значение.

TimeOfDay(arg)

Если значение arg является отметкой о времени, то эта функция возвращает число секунд между датой из значения arg и началом этой даты.
Во всех других случаях эта функция возвращает нулевое значение.

DateNumber(arg)

Если значение arg является отметкой о времени, то эта функция возвращает число полных дней между датой из значения arg и первым января 1970.
Во всех других случаях эта функция возвращает нулевое значение.

DateByMonthDay(year,monthNum,monthDay)

Значения year, monthNum, monthDay должны быть положительными числами. Если любой из этих объектов задан некорректно, то эта функция возвращает нулевое значение. В противном случае функция возвращает объект с отметкой о времени, представляющий указанную дату.
Следующее выражение имеет своим значением отметку о времени полночь, 5 ноября 2006 года:

DateByMonthDay(2006,11,5)

DateByYearDay(year,yearDay)

Значения year, yearDay должны быть положительными числами. Если любой из этих объектов задан некорректно, то эта функция возвращает нулевое значение. В противном случае функция возвращает объект с отметкой о времени, представляющий указанную дату.
Следующее выражение имеет своим значением отметку о времени полночь, 1 февраля 2006 года:

DateByYearDay(2006,32)

IsIPAddress(arg)

Эта функция возвращает истину, если значение arg является IP адресом; в противном случае функция возвращает нулевое значение.

IPAddress(arg)

Если значением arg является IP адрес, то эта функция возвращает этот IP адрес.
Если значением arg является строка с корректным представлением IP адреса (опционально - с номером порта), то эта функция возвращает этот IP адрес.
Во всех других случаях эта функция возвращает нулевое значение.

IsData(arg)

Эта функция возвращает истину, если arg является блоком данных; в противном случае функция возвращает нулевое значение.

IsArray(arg)

Эта функция возвращает истину, если arg является массивом; в противном случае функция возвращает нулевое значение.

NewArray()

Эта функция возвращает новый созданный пустой массив.

Invert(arg)

Значение arg должно быть массивом, иначе вызов этой функции приведёт к возникновению исключительной ситуации.
Эта функция возвращает массив, содержащий те же самые элементы, что и arg, но в обратном порядке.

Find(source,object)

Если значением source является массив, то эта функция возвращает число - индекс первого элемента в массиве, равного значению object. Если в массиве source не содержится такого объекта, то возвращается отрицательное числовое значение.
Если значение source не является массивом, то возвращается отрицательное числовое значение.

RemoveElement(target,index)

Эта процедура удаляет элемент из массива.
Значение target должно быть массивом, иначе вызов этой процедуры приведёт к возникновению исключительной ситуации.
Значением index должно быть число или строка, содержащая десятичное число, задающее элемент массива, который подлежит удалению. В других случаях удаляется первый (с индексом ноль) элемент массива.
Если значением myArray является (1,4,9,16,25), то вызов RemoveElement(myArray,2) изменит значение myArray на (1,4,16,25).

InsertElement(target,index,element)

Эта процедура вставляет элемент в массив.
Значение target должно быть массивом, иначе вызов этой процедуры приведёт к возникновению исключительной ситуации.
Значением index должно быть число или строка, содержащая десятичное число, задающее место, куда должен быть вставлен элемент массива. Для всех существующих элементов массива с индексом index и выше значение их индекса увеличится на 1.
Если значением myArray является (1,4,9,16,25), то вызов InsertElement(myArray,2,"Jack") изменит значение myArray на (1,4,"Jack",9,16,25).

IsDictionary(arg)

Эта функция возвращает истину, если arg является словарём; в противном случае функция возвращает нулевое значение.

NewDictionary()

Эта функция возвращает новый созданный пустой словарь.

ObjectToString(arg)

Эта функция возвращает строку с текстовым представлением значения arg.
Если значение arg является нулевым, то эта функция возвращает строку #null#.

TextToObject(arg)

Значение target должно быть строкой или блоком данных, иначе вызов этой процедуры приведёт к возникновению исключительной ситуации.
Эта функция возвращает объект со значением, представленным в текстовом виде в значении arg.
Если преобразование заканчивается неуспешно или если значение arg является строкой #null#, то эта функция возвращает нулевое значение.

Программа (запущенная Задача) может создавать новую задачу, используя выражение порождения. Оно указывается при помощи ключевого слова spawn, за которым следует имя точки входа раздела кода. Новая Задача создаётся и запускается параллельно с задачей, в которой было использовано выражение порождения, выполняя заданный точкой входа раздел кода.
Значением выражения порождения является описатель задачи для созданной новой задачи или, если система не смогла создать новую задачу, нулевое значение.

Задачи не имеют никаких общих переменных, даже если одна Задача прямо создала новую Задачу через выражение порождения.

Механизм Встречи позволяет Задаче делать себя известной для другой Задачи, связанной с тем же Пользователем.

Каждый Пользователь может иметь несколько именованных Наборов Встреч и неименованный Набор Встречи, используемые по умолчанию. Несколько именованных Встреч могут создаваться в любом Наборе Встречи. Каждая Встреча является объектом типа словарь, в котором содержится ноль или больше описателей задач.

Механизм Очереди позволяет Задаче делать себя известной для другой Задачи, связанной с тем же Пользователем. Когда Задача регистрируется в Очереди, найденной какой-либо другой Задачей, найденная задача удаляется из Очереди.