1c/OpenIntegrations
1
0
Fork 0
mirror of https://github.com/Bayselonarrend/OpenIntegrations.git synced 2025-03-29 21:57:16 +02:00
Code Issues Releases Activity

Main build (Jenkins)

Browse Source
This commit is contained in:
Vitaly the Alpaca (bot) 2024-12-15 22:32:14 +03:00
parent 87ee38c8c7
commit 82750c9485
16 changed files with 5982 additions and 5918 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
ci/clitesten
View File

@ -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" --debug --test '
powershell encoding: 'UTF-8', script:'./oint.exe tcp ProcessRequest --address "test" --data "test" --string "test" --nl "test" --debug --test '
}
}

2
ci/clitestru
View File

@ -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" --debug --test '
powershell encoding: 'UTF-8', script:'./oint.exe tcp ОбработатьЗапрос --address "test" --data "test" --string "test" --nl "test" --debug --test '
}
}

3
docs/en/md/TCP/Tcp-client/Process-request.mdx
View File

@ -10,13 +10,14 @@ import TabItem from '@theme/TabItem';
`Function ProcessRequest(Val Address, Val Data = "", Val ResponseString = True) Export`
`Function ProcessRequest(Val Address, Val Data = "", Val ResponseString = True, Val LineBreak = 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

3
docs/ru/md/TCP/Tcp-client/Process-request.mdx
View File

@ -10,13 +10,14 @@ import TabItem from '@theme/TabItem';
`Функция ОбработатьЗапрос(Знач Адрес, Знач Данные = "", Знач ОтветСтрокой = Истина) Экспорт`
`Функция ОбработатьЗапрос(Знач Адрес, Знач Данные = "", Знач ОтветСтрокой = Истина, Знач Перенос = Истина) Экспорт`
| Параметр | CLI опция | Тип | Обяз. | Назначение |
|-|-|-|-|-|
| Адрес | --address | Строка | ✔ | Адрес и порт для подключения |
| Данные | --data | Строка, ДвоичныеДанные | ✖ | Данные или текст для отправки |
| ОтветСтрокой | --string | Булево | ✖ | Признак получения ответа как строки |
| Перенос | --nl | Булево | ✖ | Завершить сообщение символом переноса строки |
Возвращаемое значение: ДвоичныеДанные, Строка - Ответ на запрос

11758
service/dictionaries/en.json
View File

File diff suppressed because it is too large Load Diff

9
src/en/OInt/core/Modules/OPI_TCP.os
View File

@ -201,18 +201,23 @@ 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) Export
Function ProcessRequest(Val Address, Val Data = "", Val ResponseString = True, Val LineBreak = 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);
Connection.CloseOutput();
If Result Then

16
src/en/OInt/tools/Modules/internal/Modules/OPI_Tools.os
View File

@ -1084,6 +1084,22 @@ Function IsWindows() Export
EndFunction
Function MergeData(Val Data, Val Addition) Export
Stream = New MemoryStream();
Record = New DataWriter(Stream);
Record.Write(Data);
Record.Write(Addition);
Record.Close();
Result = Stream.CloseAndGetBinaryData();
Return Result;
EndFunction
#EndRegion
#EndRegion

9
src/en/OPI/src/CommonModules/OPI_TCP/Module.bsl
View File

@ -201,18 +201,23 @@ 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) Export
Function ProcessRequest(Val Address, Val Data = "", Val ResponseString = True, Val LineBreak = 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);
Connection.CloseOutput();
If Result Then

16
src/en/OPI/src/CommonModules/OPI_Tools/Module.bsl
View File

@ -1084,6 +1084,22 @@ Function IsWindows() Export
EndFunction
Function MergeData(Val Data, Val Addition) Export
Stream = New MemoryStream();
Record = New DataWriter(Stream);
Record.Write(Data);
Record.Write(Addition);
Record.Close();
Result = Stream.CloseAndGetBinaryData();
Return Result;
EndFunction
#EndRegion
#EndRegion

10
src/en/cli/data/Classes/internal/Classes/tcp.os
View File

@ -40,6 +40,16 @@
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

6
src/ru/OInt/core/Modules/OPI_TCP.os
View File

@ -201,7 +201,7 @@
// Адрес - Строка - Адрес и порт для подключения - address
// Данные - Строка, ДвоичныеДанные - Данные или текст для отправки - data
// ОтветСтрокой - Булево - Признак получения ответа как строки - string
// Перенос - Булево - Завершить сообщение символом переноса строка - nl
// Перенос - Булево - Завершить сообщение символом переноса строки - nl
//
// Возвращаемое значение:
// ДвоичныеДанные, Строка - Ответ на запрос
@ -212,9 +212,9 @@
OPI_ПреобразованиеТипов.ПолучитьБулево(Перенос);
Соединение = ОткрытьСоединение(Адрес);
Если Перенос Тогда
Данные = OPI_Инструменты.СклеитьДанные(Данные, ПолучитьДвоичныеДанныеИзСтроки(Символы.ПС));
Данные = OPI_Инструменты.СклеитьДанные(Данные, ПолучитьДвоичныеДанныеИзСтроки(Символы.ПС));
КонецЕсли;
Результат = ОтправитьДвоичныеДанные(Соединение, Данные);

4
src/ru/OInt/tools/Modules/OPI_ПолучениеДанныхТестов.os
View File

@ -2060,9 +2060,9 @@
КонецФункции
Функция ПолучитьОбщийМодуль(Знач Имя)
Модуль = Вычислить(Имя);
Возврат Модуль;
КонецФункции

24
src/ru/OInt/tools/Modules/internal/Modules/OPI_Инструменты.os
View File

@ -1086,18 +1086,18 @@
Функция СклеитьДанные(Знач Данные, Знач Дополнение) Экспорт
Поток = Новый ПотокВПамяти();
Запись = Новый ЗаписьДанных(Поток);
Запись.Записать(Данные);
Запись.Записать(Дополнение);
Запись.Закрыть();
Результат = Поток.ЗакрытьИПолучитьДвоичныеДанные();
Возврат Результат;
Поток = Новый ПотокВПамяти();
Запись = Новый ЗаписьДанных(Поток);
Запись.Записать(Данные);
Запись.Записать(Дополнение);
Запись.Закрыть();
Результат = Поток.ЗакрытьИПолучитьДвоичныеДанные();
Возврат Результат;
КонецФункции
#КонецОбласти

4
src/ru/OPI/src/CommonModules/OPI_TCP/Module.bsl
View File

@ -212,9 +212,9 @@
OPI_ПреобразованиеТипов.ПолучитьБулево(Перенос);
Соединение = ОткрытьСоединение(Адрес);
Если Перенос Тогда
Данные = OPI_Инструменты.СклеитьДанные(Данные, ПолучитьДвоичныеДанныеИзСтроки(Символы.ПС));
Данные = OPI_Инструменты.СклеитьДанные(Данные, ПолучитьДвоичныеДанныеИзСтроки(Символы.ПС));
КонецЕсли;
Результат = ОтправитьДвоичныеДанные(Соединение, Данные);

24
src/ru/OPI/src/CommonModules/OPI_Инструменты/Module.bsl
View File

@ -1086,18 +1086,18 @@
Функция СклеитьДанные(Знач Данные, Знач Дополнение) Экспорт
Поток = Новый ПотокВПамяти();
Запись = Новый ЗаписьДанных(Поток);
Запись.Записать(Данные);
Запись.Записать(Дополнение);
Запись.Закрыть();
Результат = Поток.ЗакрытьИПолучитьДвоичныеДанные();
Возврат Результат;
Поток = Новый ПотокВПамяти();
Запись = Новый ЗаписьДанных(Поток);
Запись.Записать(Данные);
Запись.Записать(Дополнение);
Запись.Закрыть();
Результат = Поток.ЗакрытьИПолучитьДвоичныеДанные();
Возврат Результат;
КонецФункции
#КонецОбласти

10
src/ru/cli/data/Classes/internal/Classes/tcp.os
View File

@ -40,6 +40,16 @@
НоваяСтрока.Описание = "Признак получения ответа как строки (необяз. по ум. - Да)";
НоваяСтрока.Область = "Tcp клиент";
НоваяСтрока = ТаблицаСостава.Добавить();
НоваяСтрока.Библиотека = "tcp";
НоваяСтрока.Модуль = "OPI_TCP";
НоваяСтрока.Метод = "ОбработатьЗапрос";
НоваяСтрока.МетодПоиска = "ОБРАБОТАТЬЗАПРОС";
НоваяСтрока.Параметр = "--nl";
НоваяСтрока.Описание = "Завершить сообщение символом переноса строки (необяз. по ум. - Да)";
НоваяСтрока.Область = "Tcp клиент";
Возврат ТаблицаСостава;
КонецФункции