You've already forked OpenIntegrations
mirror of
https://github.com/Bayselonarrend/OpenIntegrations.git
synced 2025-08-24 19:49:22 +02:00
Main build (Jenkins)
This commit is contained in:
13796
service/dictionaries/en.json
vendored
13796
service/dictionaries/en.json
vendored
File diff suppressed because it is too large
Load Diff
13
src/en/OInt/core/Modules/OPI_TCP.os
vendored
13
src/en/OInt/core/Modules/OPI_TCP.os
vendored
@@ -60,7 +60,11 @@ Function CreateConnection(Val Address, Val Tls = "") Export
|
||||
Domain = OPI_Tools.GetDomain(Address);
|
||||
|
||||
TCPClient = OPI_AddIns.GetAddIn("TCPClient");
|
||||
TCPClient.SetAddress(Address, Domain);
|
||||
Success = TCPClient.SetAddress(Address, Domain);
|
||||
|
||||
If Not Success Then
|
||||
Return GetLastError(TCPClient);
|
||||
EndIf;
|
||||
|
||||
Tls = OPI_AddIns.SetTls(TCPClient, Tls);
|
||||
|
||||
@@ -218,7 +222,12 @@ Function ProcessRequest(Val Address, Val Data = "", Val ResponseString = True, V
|
||||
OPI_TypeConversion.GetBoolean(ResponseString);
|
||||
|
||||
Connection = CreateConnection(Address, Tls);
|
||||
Result = SendBinaryData(Connection, Data);
|
||||
|
||||
If Not OPI_AddIns.IsAddIn(Connection) Then
|
||||
Return Connection;
|
||||
EndIf;
|
||||
|
||||
Result = SendBinaryData(Connection, Data);
|
||||
|
||||
If Result Then
|
||||
|
||||
|
@@ -16925,7 +16925,7 @@ Procedure TCP_ProcessRequest(FunctionParameters) Export
|
||||
Address = FunctionParameters["TCP_AddressTLS"];
|
||||
Tls = OPI_TCP.GetTlsSettings(False);
|
||||
|
||||
Result = OPI_TCP.ProcessRequest(Address, Data, , );
|
||||
Result = OPI_TCP.ProcessRequest(Address, Data, , Tls);
|
||||
|
||||
// END
|
||||
|
||||
|
@@ -332,6 +332,19 @@ Function FormYAXTests() Export
|
||||
|
||||
EndFunction
|
||||
|
||||
Function FormAssertsTests() Export
|
||||
|
||||
TestTable = GetTestTable();
|
||||
ArrayOfTests = New Array;
|
||||
|
||||
For Each Test In TestTable Do
|
||||
ArrayOfTests.Add(Test.Method);
|
||||
EndDo;
|
||||
|
||||
Return ArrayOfTests;
|
||||
|
||||
EndFunction
|
||||
|
||||
Function FormYAXTestsCLI() Export
|
||||
|
||||
Module = GetCommonModule("ЮТТесты");
|
||||
@@ -356,19 +369,6 @@ Function FormYAXTestsCLI() Export
|
||||
|
||||
EndFunction
|
||||
|
||||
Function FormAssertsTests() Export
|
||||
|
||||
TestTable = GetTestTable();
|
||||
ArrayOfTests = New Array;
|
||||
|
||||
For Each Test In TestTable Do
|
||||
ArrayOfTests.Add(Test.Method);
|
||||
EndDo;
|
||||
|
||||
Return ArrayOfTests;
|
||||
|
||||
EndFunction
|
||||
|
||||
Function FormAssertsTestsCLI() Export
|
||||
|
||||
TestTable = GetTestTable();
|
||||
|
13
src/en/OPI/src/CommonModules/OPI_TCP/Module.bsl
vendored
13
src/en/OPI/src/CommonModules/OPI_TCP/Module.bsl
vendored
@@ -60,7 +60,11 @@ Function CreateConnection(Val Address, Val Tls = "") Export
|
||||
Domain = OPI_Tools.GetDomain(Address);
|
||||
|
||||
TCPClient = OPI_AddIns.GetAddIn("TCPClient");
|
||||
TCPClient.SetAddress(Address, Domain);
|
||||
Success = TCPClient.SetAddress(Address, Domain);
|
||||
|
||||
If Not Success Then
|
||||
Return GetLastError(TCPClient);
|
||||
EndIf;
|
||||
|
||||
Tls = OPI_AddIns.SetTls(TCPClient, Tls);
|
||||
|
||||
@@ -218,7 +222,12 @@ Function ProcessRequest(Val Address, Val Data = "", Val ResponseString = True, V
|
||||
OPI_TypeConversion.GetBoolean(ResponseString);
|
||||
|
||||
Connection = CreateConnection(Address, Tls);
|
||||
Result = SendBinaryData(Connection, Data);
|
||||
|
||||
If Not OPI_AddIns.IsAddIn(Connection) Then
|
||||
Return Connection;
|
||||
EndIf;
|
||||
|
||||
Result = SendBinaryData(Connection, Data);
|
||||
|
||||
If Result Then
|
||||
|
||||
|
@@ -332,6 +332,19 @@ Function FormYAXTests() Export
|
||||
|
||||
EndFunction
|
||||
|
||||
Function FormAssertsTests() Export
|
||||
|
||||
TestTable = GetTestTable();
|
||||
ArrayOfTests = New Array;
|
||||
|
||||
For Each Test In TestTable Do
|
||||
ArrayOfTests.Add(Test.Method);
|
||||
EndDo;
|
||||
|
||||
Return ArrayOfTests;
|
||||
|
||||
EndFunction
|
||||
|
||||
Function FormYAXTestsCLI() Export
|
||||
|
||||
Module = GetCommonModule("ЮТТесты");
|
||||
@@ -356,19 +369,6 @@ Function FormYAXTestsCLI() Export
|
||||
|
||||
EndFunction
|
||||
|
||||
Function FormAssertsTests() Export
|
||||
|
||||
TestTable = GetTestTable();
|
||||
ArrayOfTests = New Array;
|
||||
|
||||
For Each Test In TestTable Do
|
||||
ArrayOfTests.Add(Test.Method);
|
||||
EndDo;
|
||||
|
||||
Return ArrayOfTests;
|
||||
|
||||
EndFunction
|
||||
|
||||
Function FormAssertsTestsCLI() Export
|
||||
|
||||
TestTable = GetTestTable();
|
||||
|
@@ -16925,7 +16925,7 @@ Procedure TCP_ProcessRequest(FunctionParameters) Export
|
||||
Address = FunctionParameters["TCP_AddressTLS"];
|
||||
Tls = OPI_TCP.GetTlsSettings(False);
|
||||
|
||||
Result = OPI_TCP.ProcessRequest(Address, Data, , );
|
||||
Result = OPI_TCP.ProcessRequest(Address, Data, , Tls);
|
||||
|
||||
// END
|
||||
|
||||
|
13
src/ru/OInt/core/Modules/OPI_TCP.os
vendored
13
src/ru/OInt/core/Modules/OPI_TCP.os
vendored
@@ -60,7 +60,11 @@
|
||||
Домен = OPI_Инструменты.ПолучитьДомен(Адрес);
|
||||
|
||||
TCPКлиент = OPI_Компоненты.ПолучитьКомпоненту("TCPClient");
|
||||
TCPКлиент.SetAddress(Адрес, Домен);
|
||||
Успех = TCPКлиент.SetAddress(Адрес, Домен);
|
||||
|
||||
Если Не Успех Тогда
|
||||
Возврат ПолучитьПоследнююОшибку(TCPКлиент);
|
||||
КонецЕсли;
|
||||
|
||||
Tls = OPI_Компоненты.УстановитьTls(TCPКлиент, Tls);
|
||||
|
||||
@@ -218,7 +222,12 @@
|
||||
OPI_ПреобразованиеТипов.ПолучитьБулево(ОтветСтрокой);
|
||||
|
||||
Соединение = ОткрытьСоединение(Адрес, Tls);
|
||||
Результат = ОтправитьДвоичныеДанные(Соединение, Данные);
|
||||
|
||||
Если Не OPI_Компоненты.ЭтоКомпонента(Соединение) Тогда
|
||||
Возврат Соединение;
|
||||
КонецЕсли;
|
||||
|
||||
Результат = ОтправитьДвоичныеДанные(Соединение, Данные);
|
||||
|
||||
Если Результат Тогда
|
||||
|
||||
|
@@ -16925,7 +16925,7 @@
|
||||
Адрес = ПараметрыФункции["TCP_AddressTLS"];
|
||||
Tls = OPI_TCP.ПолучитьНастройкиTls(Ложь);
|
||||
|
||||
Результат = OPI_TCP.ОбработатьЗапрос(Адрес, Данные, , );
|
||||
Результат = OPI_TCP.ОбработатьЗапрос(Адрес, Данные, , Tls);
|
||||
|
||||
// END
|
||||
|
||||
|
@@ -332,6 +332,19 @@
|
||||
|
||||
КонецФункции
|
||||
|
||||
Функция СформироватьТестыАссертс() Экспорт
|
||||
|
||||
ТаблицаТестов = ПолучитьТаблицуТестов();
|
||||
МассивТестов = Новый Массив;
|
||||
|
||||
Для Каждого Тест Из ТаблицаТестов Цикл
|
||||
МассивТестов.Добавить(Тест.Метод);
|
||||
КонецЦикла;
|
||||
|
||||
Возврат МассивТестов;
|
||||
|
||||
КонецФункции
|
||||
|
||||
Функция СформироватьТестыЯксCLI() Экспорт
|
||||
|
||||
Модуль = ПолучитьОбщийМодуль("ЮТТесты");
|
||||
@@ -356,19 +369,6 @@
|
||||
|
||||
КонецФункции
|
||||
|
||||
Функция СформироватьТестыАссертс() Экспорт
|
||||
|
||||
ТаблицаТестов = ПолучитьТаблицуТестов();
|
||||
МассивТестов = Новый Массив;
|
||||
|
||||
Для Каждого Тест Из ТаблицаТестов Цикл
|
||||
МассивТестов.Добавить(Тест.Метод);
|
||||
КонецЦикла;
|
||||
|
||||
Возврат МассивТестов;
|
||||
|
||||
КонецФункции
|
||||
|
||||
Функция СформироватьТестыАссертсCLI() Экспорт
|
||||
|
||||
ТаблицаТестов = ПолучитьТаблицуТестов();
|
||||
|
@@ -61,7 +61,7 @@
|
||||
|
||||
TCPКлиент = OPI_Компоненты.ПолучитьКомпоненту("TCPClient");
|
||||
Успех = TCPКлиент.SetAddress(Адрес, Домен);
|
||||
|
||||
|
||||
Если Не Успех Тогда
|
||||
Возврат ПолучитьПоследнююОшибку(TCPКлиент);
|
||||
КонецЕсли;
|
||||
@@ -222,12 +222,12 @@
|
||||
OPI_ПреобразованиеТипов.ПолучитьБулево(ОтветСтрокой);
|
||||
|
||||
Соединение = ОткрытьСоединение(Адрес, Tls);
|
||||
|
||||
|
||||
Если Не OPI_Компоненты.ЭтоКомпонента(Соединение) Тогда
|
||||
Возврат Соединение;
|
||||
Возврат Соединение;
|
||||
КонецЕсли;
|
||||
|
||||
Результат = ОтправитьДвоичныеДанные(Соединение, Данные);
|
||||
|
||||
Результат = ОтправитьДвоичныеДанные(Соединение, Данные);
|
||||
|
||||
Если Результат Тогда
|
||||
|
||||
|
Reference in New Issue
Block a user