mirror of
https://github.com/Bayselonarrend/OpenIntegrations.git
synced 2025-03-17 21:08:03 +02:00
Main build (Jenkins)
This commit is contained in:
Vitaly the Alpaca (bot)
parent
c33bff1955
commit
9bf7203124
@ -1924,7 +1924,7 @@ def test_tcp(){
|
||||
|
||||
|
||||
catchError(buildResult: 'FAILURE', stageResult: 'FAILURE') {
|
||||
powershell encoding: 'UTF-8', script:'./oint.exe tcp ProcessRequest --address "test" --data "test" --string "test" --nl "test" --debug --test '
|
||||
powershell encoding: 'UTF-8', script:'./oint.exe tcp ProcessRequest --address "test" --data "test" --string "test" --debug --test '
|
||||
}
|
||||
|
||||
}
|
||||
|
||||
@ -1924,7 +1924,7 @@ def test_tcp(){
|
||||
|
||||
|
||||
catchError(buildResult: 'FAILURE', stageResult: 'FAILURE') {
|
||||
powershell encoding: 'UTF-8', script:'./oint.exe tcp ОбработатьЗапрос --address "test" --data "test" --string "test" --nl "test" --debug --test '
|
||||
powershell encoding: 'UTF-8', script:'./oint.exe tcp ОбработатьЗапрос --address "test" --data "test" --string "test" --debug --test '
|
||||
}
|
||||
|
||||
}
|
||||
|
||||
@ -10,14 +10,13 @@ import TabItem from '@theme/TabItem';
|
||||
|
||||
|
||||
|
||||
`Function ProcessRequest(Val Address, Val Data = "", Val ResponseString = True, Val LineBreak = True) Export`
|
||||
`Function ProcessRequest(Val Address, Val Data = "", Val ResponseString = True) Export`
|
||||
|
||||
| Parameter | CLI option | Type | Required | Description |
|
||||
|-|-|-|-|-|
|
||||
| Address | --address | String | ✔ | Address and port |
|
||||
| Data | --data | String, BinaryData | ✖ | Data or text to be sent |
|
||||
| ResponseString | --string | Boolean | ✖ | An attribute of receiving the response as a string |
|
||||
| LineBreak | --nl | Boolean | ✖ | End the message with a line break character |
|
||||
|
||||
|
||||
Returns: BinaryData, String - Response
|
||||
|
||||
@ -10,14 +10,13 @@ import TabItem from '@theme/TabItem';
|
||||
|
||||
|
||||
|
||||
`Функция ОбработатьЗапрос(Знач Адрес, Знач Данные = "", Знач ОтветСтрокой = Истина, Знач Перенос = Истина) Экспорт`
|
||||
`Функция ОбработатьЗапрос(Знач Адрес, Знач Данные = "", Знач ОтветСтрокой = Истина) Экспорт`
|
||||
|
||||
| Параметр | CLI опция | Тип | Обяз. | Назначение |
|
||||
|-|-|-|-|-|
|
||||
| Адрес | --address | Строка | ✔ | Адрес и порт для подключения |
|
||||
| Данные | --data | Строка, ДвоичныеДанные | ✖ | Данные или текст для отправки |
|
||||
| ОтветСтрокой | --string | Булево | ✖ | Признак получения ответа как строки |
|
||||
| Перенос | --nl | Булево | ✖ | Завершить сообщение символом переноса строки |
|
||||
|
||||
|
||||
Возвращаемое значение: ДвоичныеДанные, Строка - Ответ на запрос
|
||||
|
||||
File diff suppressed because it is too large
Load Diff
@ -201,23 +201,16 @@ EndFunction
|
||||
// Address - String - Address and port - address
|
||||
// Data - String, BinaryData - Data or text to be sent - data
|
||||
// ResponseString - Boolean - An attribute of receiving the response as a string - string
|
||||
// LineBreak - Boolean - End the message with a line break character - nl
|
||||
//
|
||||
// Returns:
|
||||
// BinaryData, String - Response
|
||||
Function ProcessRequest(Val Address, Val Data = "", Val ResponseString = True, Val LineBreak = True) Export
|
||||
Function ProcessRequest(Val Address, Val Data = "", Val ResponseString = True) Export
|
||||
|
||||
OPI_TypeConversion.GetBinaryData(Data, True);
|
||||
OPI_TypeConversion.GetBoolean(ResponseString);
|
||||
OPI_TypeConversion.GetBoolean(LineBreak);
|
||||
|
||||
Connection = CreateConnection(Address);
|
||||
|
||||
If LineBreak Then
|
||||
Data = OPI_Tools.MergeData(Data, ПолучитьДвоичныеДанныеИзСтроки(Chars.LF));
|
||||
EndIf;
|
||||
|
||||
Result = SendBinaryData(Connection, Data);
|
||||
Result = SendBinaryData(Connection, Data);
|
||||
|
||||
If Result Then
|
||||
|
||||
|
||||
@ -973,6 +973,23 @@ Procedure Pause(Val Seconds) Export
|
||||
|
||||
EndProcedure
|
||||
|
||||
Procedure ReplaceEscapeSequences(Text) Export
|
||||
|
||||
CharacterMapping = New Map;
|
||||
CharacterMapping.Insert("\n", Chars.LF);
|
||||
CharacterMapping.Insert("\r", Chars.CR);
|
||||
CharacterMapping.Insert("\f", Chars.FF);
|
||||
CharacterMapping.Insert("\v", Chars.VTab);
|
||||
|
||||
For Each Symbol In CharacterMapping Do
|
||||
|
||||
Text = StrReplace(Text, Symbol.Key , Symbol.Value);
|
||||
Text = StrReplace(Text, "\" + Symbol.Value, Symbol.Key);
|
||||
|
||||
EndDo;
|
||||
|
||||
EndProcedure
|
||||
|
||||
Function NumberToString(Val Number) Export
|
||||
Return StrReplace(String(Number), Chars.NBSp, "");
|
||||
EndFunction
|
||||
|
||||
@ -201,23 +201,16 @@ EndFunction
|
||||
// Address - String - Address and port - address
|
||||
// Data - String, BinaryData - Data or text to be sent - data
|
||||
// ResponseString - Boolean - An attribute of receiving the response as a string - string
|
||||
// LineBreak - Boolean - End the message with a line break character - nl
|
||||
//
|
||||
// Returns:
|
||||
// BinaryData, String - Response
|
||||
Function ProcessRequest(Val Address, Val Data = "", Val ResponseString = True, Val LineBreak = True) Export
|
||||
Function ProcessRequest(Val Address, Val Data = "", Val ResponseString = True) Export
|
||||
|
||||
OPI_TypeConversion.GetBinaryData(Data, True);
|
||||
OPI_TypeConversion.GetBoolean(ResponseString);
|
||||
OPI_TypeConversion.GetBoolean(LineBreak);
|
||||
|
||||
Connection = CreateConnection(Address);
|
||||
|
||||
If LineBreak Then
|
||||
Data = OPI_Tools.MergeData(Data, GetBinaryDataFromString(Chars.LF));
|
||||
EndIf;
|
||||
|
||||
Result = SendBinaryData(Connection, Data);
|
||||
Result = SendBinaryData(Connection, Data);
|
||||
|
||||
If Result Then
|
||||
|
||||
|
||||
@ -973,6 +973,23 @@ Procedure Pause(Val Seconds) Export
|
||||
|
||||
EndProcedure
|
||||
|
||||
Procedure ReplaceEscapeSequences(Text) Export
|
||||
|
||||
CharacterMapping = New Map;
|
||||
CharacterMapping.Insert("\n", Chars.LF);
|
||||
CharacterMapping.Insert("\r", Chars.CR);
|
||||
CharacterMapping.Insert("\f", Chars.FF);
|
||||
CharacterMapping.Insert("\v", Chars.VTab);
|
||||
|
||||
For Each Symbol In CharacterMapping Do
|
||||
|
||||
Text = StrReplace(Text, Symbol.Key , Symbol.Value);
|
||||
Text = StrReplace(Text, "\" + Symbol.Value, Symbol.Key);
|
||||
|
||||
EndDo;
|
||||
|
||||
EndProcedure
|
||||
|
||||
Function NumberToString(Val Number) Export
|
||||
Return StrReplace(String(Number), Chars.NBSp, "");
|
||||
EndFunction
|
||||
|
||||
@ -187,7 +187,17 @@
|
||||
|
||||
Если ЗначениеЗаполнено(ЗначениеПараметра) Тогда
|
||||
|
||||
ИмяПараметра = "Параметр" + СтрЗаменить(ИмяПараметра, "--", "_");
|
||||
ИмяПараметра = "Параметр" + СтрЗаменить(ИмяПараметра, "--", "_");
|
||||
ФайлПараметра = Новый Файл(ЗначениеПараметра);
|
||||
ЗначениеПараметраСокр = СокрЛП(ЗначениеПараметра);
|
||||
|
||||
Если Не СтрНачинаетсяС(ЗначениеПараметраСокр, "{")
|
||||
И Не СтрНачинаетсяС(ЗначениеПараметраСокр, "[")
|
||||
И Не ФайлПараметра.Существует() Тогда
|
||||
|
||||
OPI_Tools.ЗаменитьУправляющиеПоследовательности(ЗначениеПараметра);
|
||||
|
||||
КонецЕсли;
|
||||
|
||||
ТекстВыполнения = ТекстВыполнения
|
||||
+ Символы.ПС
|
||||
|
||||
@ -40,16 +40,6 @@
|
||||
NewLine.Описание = "An attribute of receiving the response as a string (optional, def. val. - Yes)";
|
||||
NewLine.Область = "Tcp client";
|
||||
|
||||
|
||||
NewLine = CompositionTable.Add();
|
||||
NewLine.Библиотека = "tcp";
|
||||
NewLine.Модуль = "OPI_TCP";
|
||||
NewLine.Метод = "ProcessRequest";
|
||||
NewLine.МетодПоиска = "PROCESSREQUEST";
|
||||
NewLine.Параметр = "--nl";
|
||||
NewLine.Описание = "End the message with a line break character (optional, def. val. - Yes)";
|
||||
NewLine.Область = "Tcp client";
|
||||
|
||||
Return CompositionTable;
|
||||
EndFunction
|
||||
|
||||
|
||||
@ -975,18 +975,18 @@
|
||||
|
||||
Процедура ЗаменитьУправляющиеПоследовательности(Текст) Экспорт
|
||||
|
||||
СоответствиеСимволов = Новый Соответствие;
|
||||
СоответствиеСимволов.Вставить("\n", Символы.ПС);
|
||||
СоответствиеСимволов.Вставить("\r", Символы.ВК);
|
||||
СоответствиеСимволов.Вставить("\f", Символы.ПФ);
|
||||
СоответствиеСимволов.Вставить("\v", Символы.ВТаб);
|
||||
СоответствиеСимволов = Новый Соответствие;
|
||||
СоответствиеСимволов.Вставить("\n", Символы.ПС);
|
||||
СоответствиеСимволов.Вставить("\r", Символы.ВК);
|
||||
СоответствиеСимволов.Вставить("\f", Символы.ПФ);
|
||||
СоответствиеСимволов.Вставить("\v", Символы.ВТаб);
|
||||
|
||||
Для Каждого Символ Из СоответствиеСимволов Цикл
|
||||
Для Каждого Символ Из СоответствиеСимволов Цикл
|
||||
|
||||
Текст = СтрЗаменить(Текст, Символ.Ключ, Символ.Значение);
|
||||
Текст = СтрЗаменить(Текст, "\" + Символ.Значение, Символ.Ключ);
|
||||
Текст = СтрЗаменить(Текст, Символ.Ключ , Символ.Значение);
|
||||
Текст = СтрЗаменить(Текст, "\" + Символ.Значение, Символ.Ключ);
|
||||
|
||||
КонецЦикла;
|
||||
КонецЦикла;
|
||||
|
||||
КонецПроцедуры
|
||||
|
||||
|
||||
@ -975,18 +975,18 @@
|
||||
|
||||
Процедура ЗаменитьУправляющиеПоследовательности(Текст) Экспорт
|
||||
|
||||
СоответствиеСимволов = Новый Соответствие;
|
||||
СоответствиеСимволов.Вставить("\n", Символы.ПС);
|
||||
СоответствиеСимволов.Вставить("\r", Символы.ВК);
|
||||
СоответствиеСимволов.Вставить("\f", Символы.ПФ);
|
||||
СоответствиеСимволов.Вставить("\v", Символы.ВТаб);
|
||||
СоответствиеСимволов = Новый Соответствие;
|
||||
СоответствиеСимволов.Вставить("\n", Символы.ПС);
|
||||
СоответствиеСимволов.Вставить("\r", Символы.ВК);
|
||||
СоответствиеСимволов.Вставить("\f", Символы.ПФ);
|
||||
СоответствиеСимволов.Вставить("\v", Символы.ВТаб);
|
||||
|
||||
Для Каждого Символ Из СоответствиеСимволов Цикл
|
||||
Для Каждого Символ Из СоответствиеСимволов Цикл
|
||||
|
||||
Текст = СтрЗаменить(Текст, Символ.Ключ, Символ.Значение);
|
||||
Текст = СтрЗаменить(Текст, "\" + Символ.Значение, Символ.Ключ);
|
||||
Текст = СтрЗаменить(Текст, Символ.Ключ , Символ.Значение);
|
||||
Текст = СтрЗаменить(Текст, "\" + Символ.Значение, Символ.Ключ);
|
||||
|
||||
КонецЦикла;
|
||||
КонецЦикла;
|
||||
|
||||
КонецПроцедуры
|
||||
|
||||
|
||||
@ -40,16 +40,6 @@
|
||||
НоваяСтрока.Описание = "Признак получения ответа как строки (необяз. по ум. - Да)";
|
||||
НоваяСтрока.Область = "Tcp клиент";
|
||||
|
||||
|
||||
НоваяСтрока = ТаблицаСостава.Добавить();
|
||||
НоваяСтрока.Библиотека = "tcp";
|
||||
НоваяСтрока.Модуль = "OPI_TCP";
|
||||
НоваяСтрока.Метод = "ОбработатьЗапрос";
|
||||
НоваяСтрока.МетодПоиска = "ОБРАБОТАТЬЗАПРОС";
|
||||
НоваяСтрока.Параметр = "--nl";
|
||||
НоваяСтрока.Описание = "Завершить сообщение символом переноса строки (необяз. по ум. - Да)";
|
||||
НоваяСтрока.Область = "Tcp клиент";
|
||||
|
||||
Возврат ТаблицаСостава;
|
||||
КонецФункции
|
||||
|
||||
|
||||
Loading…
x
Reference in New Issue
Block a user