1c/OpenIntegrations
1
0
Fork 0
mirror of https://github.com/Bayselonarrend/OpenIntegrations.git synced 2025-05-13 22:16:54 +02:00
Code Issues Releases Activity

Начало тестов CLI Bitrix24

Browse Source
This commit is contained in:
Anton 2024-10-15 22:55:57 +03:00
parent 944f6127a3
commit d5155bb29e
1 changed files with 128 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

128
src/ru/OPI/src/CommonModules/OPI_ТестыCLI/Module.bsl
View File

@ -1542,6 +1542,40 @@
#КонецОбласти
#Область Bitrix24
Процедура CLI_Б24_РаботаСТокеном() Экспорт
ПараметрыТеста = Новый Структура;
OPI_ПолучениеДанныхТестов.ПараметрВКоллекцию("Bitrix24_Domain" , ПараметрыТеста);
OPI_ПолучениеДанныхТестов.ПараметрВКоллекцию("Bitrix24_ClientID" , ПараметрыТеста);
OPI_ПолучениеДанныхТестов.ПараметрВКоллекцию("Bitrix24_ClientSecret", ПараметрыТеста);
CLI_Bitrix24_ПолучитьСсылкуАвторизацииПриложения(ПараметрыТеста);
OPI_ПолучениеДанныхТестов.ПараметрВКоллекцию("Bitrix24_Code", ПараметрыТеста);
CLI_Bitrix24_ПолучитьТокен(ПараметрыТеста);
OPI_ПолучениеДанныхТестов.ПараметрВКоллекцию("Bitrix24_Refresh", ПараметрыТеста);
CLI_Bitrix24_ОбновитьТокен(ПараметрыТеста);
КонецПроцедуры
Процедура CLI_Б24_СерверноеВремя() Экспорт
ПараметрыТеста = Новый Структура;
OPI_ПолучениеДанныхТестов.ПараметрВКоллекцию("Bitrix24_URL" , ПараметрыТеста);
OPI_ПолучениеДанныхТестов.ПараметрВКоллекцию("Bitrix24_Domain", ПараметрыТеста);
OPI_ПолучениеДанныхТестов.ПараметрВКоллекцию("Bitrix24_Token" , ПараметрыТеста);
CLI_Bitrix24_СерверноеВремя(ПараметрыТеста);
КонецПроцедуры
#КонецОбласти
#КонецОбласти
#КонецОбласти
@ -9790,6 +9824,100 @@
#КонецОбласти
#Область Bitrix24
Процедура CLI_Bitrix24_ПолучитьСсылкуАвторизацииПриложения(ПараметрыФункции)
Домен = ПараметрыФункции["Bitrix24_Domain"];
ClientID = ПараметрыФункции["Bitrix24_ClientID"];
Опции = Новый Структура;
Опции.Вставить("domain" , Домен);
Опции.Вставить("clientid", ClientID);
Результат = OPI_ПолучениеДанныхТестов.ВыполнитьТестCLI("bitrix24", "ПолучитьСсылкуАвторизацииПриложения", Опции);
Результат = ПолучитьСтрокуИзДвоичныхДанных(Результат);
OPI_ПолучениеДанныхТестов.ЗаписатьЛог(Результат, "ПолучитьСсылкуАвторизацииПриложения", "Bitrix24");
OPI_ПолучениеДанныхТестов.Проверка_Строка(Результат);
OPI_ПолучениеДанныхТестов.ЗаписатьПараметр("Bitrix24_AuthURL", Результат);
КонецПроцедуры
Процедура CLI_Bitrix24_ПолучитьТокен(ПараметрыФункции)
ClientID = ПараметрыФункции["Bitrix24_ClientID"];
ClientSecret = ПараметрыФункции["Bitrix24_ClientSecret"];
Code = ПараметрыФункции["Bitrix24_Code"];
Опции = Новый Структура;
Опции.Вставить("clientid" , ClientID);
Опции.Вставить("clientsecret", ClientSecret);
Опции.Вставить("code" , Code);
Результат = OPI_ПолучениеДанныхТестов.ВыполнитьТестCLI("bitrix24", "ПолучитьТокен", Опции);
OPI_ПолучениеДанныхТестов.ЗаписатьЛог(Результат, "ПолучитьТокен", "Bitrix24");
Если ЗначениеЗаполнено(Результат["access_token"]) И ЗначениеЗаполнено(Результат["refresh_token"]) Тогда
OPI_ПолучениеДанныхТестов.ЗаписатьПараметр("Bitrix24_Token" , Результат["access_token"]);
OPI_ПолучениеДанныхТестов.ЗаписатьПараметр("Bitrix24_Refresh", Результат["refresh_token"]);
КонецЕсли;
КонецПроцедуры
Процедура CLI_Bitrix24_ОбновитьТокен(ПараметрыФункции)
ClientID = ПараметрыФункции["Bitrix24_ClientID"];
ClientSecret = ПараметрыФункции["Bitrix24_ClientSecret"];
Refresh = ПараметрыФункции["Bitrix24_Refresh"];
Опции = Новый Структура;
Опции.Вставить("clientid" , ClientID);
Опции.Вставить("clientsecret", ClientSecret);
Опции.Вставить("refresh" , Refresh);
Результат = OPI_ПолучениеДанныхТестов.ВыполнитьТестCLI("bitrix24", "ОбновитьТокен", Опции);
OPI_ПолучениеДанныхТестов.ЗаписатьЛог(Результат, "ОбновитьТокен", "Bitrix24");
OPI_ПолучениеДанныхТестов.Проверка_БитриксАвторизация(Результат);
Если ЗначениеЗаполнено(Результат["access_token"]) И ЗначениеЗаполнено(Результат["refresh_token"]) Тогда
OPI_ПолучениеДанныхТестов.ЗаписатьПараметр("Bitrix24_Token" , Результат["access_token"]);
OPI_ПолучениеДанныхТестов.ЗаписатьПараметр("Bitrix24_Refresh", Результат["refresh_token"]);
КонецЕсли;
КонецПроцедуры
Процедура CLI_Bitrix24_СерверноеВремя(ПараметрыФункции)
URL = ПараметрыФункции["Bitrix24_URL"];
Опции = Новый Структура;
Опции.Вставить("url", URL);
Результат = OPI_ПолучениеДанныхТестов.ВыполнитьТестCLI("bitrix24", "СерверноеВремя", Опции);
OPI_ПолучениеДанныхТестов.ЗаписатьЛог(Результат, "СерверноеВремя (хук)", "Bitrix24");
OPI_ПолучениеДанныхТестов.Проверка_БитриксВремя(Результат); // SKIP
URL = ПараметрыФункции["Bitrix24_Domain"];
Токен = ПараметрыФункции["Bitrix24_Token"];
Опции = Новый Структура;
Опции.Вставить("url" , URL);
Опции.Вставить("token", Токен);
Результат = OPI_ПолучениеДанныхТестов.ВыполнитьТестCLI("bitrix24", "СерверноеВремя", Опции);
OPI_ПолучениеДанныхТестов.ЗаписатьЛог(Результат, "СерверноеВремя", "Bitrix24");
OPI_ПолучениеДанныхТестов.Проверка_БитриксВремя(Результат);
КонецПроцедуры
#КонецОбласти
#КонецОбласти
#КонецОбласти