Тесты для Twitter

OPI/src/CommonModules/OPI_ПолучениеДанныхТестов/Module.bsl

@@ -235,7 +235,13 @@
     НовыйТест(ТаблицаТестов, "ГК_СоздатьУдалитьСобытие"             , "Создать/Удалить событие"        , Календарь);
     НовыйТест(ТаблицаТестов, "ГК_ПолучитьСписокСобытий"             , "Получить список событий"        , Календарь);
     
+    НовыйТест(ТаблицаТестов, "Твиттер_ПолучитьСсылкуАвторизации"    , "Получить ссылку авторизации"    , Твиттер);
     НовыйТест(ТаблицаТестов, "Твиттер_ОбновитьТокен"                , "Обновить токен"                 , Твиттер);
+    НовыйТест(ТаблицаТестов, "Твиттер_СоздатьТекстовыйТвит"         , "Текстовый твит"                 , Твиттер);
+    НовыйТест(ТаблицаТестов, "Твиттер_СоздатьТвитСКартинкой"        , "Твит с картинкой"               , Твиттер);
+    НовыйТест(ТаблицаТестов, "Твиттер_СоздатьТвитСВидео"            , "Твит с видео"                   , Твиттер);
+    НовыйТест(ТаблицаТестов, "Твиттер_СоздатьТвитСГиф"              , "Твит с гиф"                     , Твиттер);
+    НовыйТест(ТаблицаТестов, "Твиттер_СоздатьТвитСОпросом"          , "Твит с опросом"                 , Твиттер);
 
     Возврат ТаблицаТестов;
     

OPI/src/CommonModules/OPI_Тесты/Module.bsl

@@ -1607,6 +1607,17 @@
 
 #Область Twitter
 
+Процедура Твиттер_ПолучитьСсылкуАвторизации() Экспорт
+    
+    Параметры = ПолучитьПараметрыТвиттер();
+    Результат = OPI_Twitter.ПолучитьСсылкуАвторизации(Параметры);
+    
+    OPI_ПолучениеДанныхТестов.ОжидаетЧто(Результат).ИмеетТип("Строка").Заполнено();
+    
+    OPI_ПолучениеДанныхТестов.ЗаписатьПараметр("Twitter_URL", Результат);
+    
+КонецПроцедуры
+
 Процедура Твиттер_ОбновитьТокен() Экспорт
     
     Параметры = ПолучитьПараметрыТвиттер();
@@ -1617,10 +1628,100 @@
     OPI_ПолучениеДанныхТестов.ОжидаетЧто(Результат["refresh_token"]).Заполнено();
         
     Рефреш = Результат["refresh_token"];
-    Токен  = Результат["acess_token"];
+    Токен  = Результат["access_token"];
     
-    OPI_ПолучениеДанныхТестов.ЗаписатьПараметр("Twitter_Refresh", Рефреш);
+    Если ЗначениеЗаполнено(Рефреш) Тогда   
-    OPI_ПолучениеДанныхТестов.ЗаписатьПараметр("Twitter_Token"  , Токен);
+        OPI_ПолучениеДанныхТестов.ЗаписатьПараметр("Twitter_Refresh", Рефреш);
+    КонецЕсли;
+    
+    Если ЗначениеЗаполнено(Токен) Тогда
+        OPI_ПолучениеДанныхТестов.ЗаписатьПараметр("Twitter_Token"  , Токен);
+    КонецЕсли;
+    
+КонецПроцедуры
+
+Процедура Твиттер_СоздатьТекстовыйТвит() Экспорт
+    
+    Параметры = ПолучитьПараметрыТвиттер();
+    Текст     = "Тестовый твитт" + Строка(Новый УникальныйИдентификатор);
+    
+    Результат = OPI_Twitter.СоздатьТекстовыйТвит(Текст, Параметры);
+    Проверка_ТвиттерТекст(Результат, Текст);
+    
+КонецПроцедуры
+
+Процедура Твиттер_СоздатьТвитСКартинкой() Экспорт
+    
+    Параметры = ПолучитьПараметрыТвиттер();
+    Текст     = "Тестовый твитт" + Строка(Новый УникальныйИдентификатор);
+    Картинка  = OPI_ПолучениеДанныхТестов.ПолучитьДвоичные("Картинка");
+	ИВФ       = ПолучитьИмяВременногоФайла("png");
+	Картинка.Записать(ИВФ);
+   
+    Результат = OPI_Twitter.СоздатьТвитКартинки(Текст, Картинка, Параметры);    
+    Проверка_ТвиттерТекст(Результат, Текст);    
+    
+    Результат = OPI_Twitter.СоздатьТвитКартинки(Текст, ИВФ, Параметры);
+    Проверка_ТвиттерТекст(Результат, Текст);
+    
+    УдалитьФайлы(ИВФ);
+    
+    OPI_Инструменты.Пауза(20);
+    
+КонецПроцедуры
+
+Процедура Твиттер_СоздатьТвитСВидео() Экспорт
+    
+    Параметры = ПолучитьПараметрыТвиттер();
+    Текст     = "Тестовый твитт" + Строка(Новый УникальныйИдентификатор);
+    Видео     = OPI_ПолучениеДанныхТестов.ПолучитьДвоичные("Видео");
+	ИВФ       = ПолучитьИмяВременногоФайла("mp4");
+	Видео.Записать(ИВФ);
+   
+    Результат = OPI_Twitter.СоздатьТвитВидео(Текст, Видео, Параметры);    
+    Проверка_ТвиттерТекст(Результат, Текст);    
+    
+    Результат = OPI_Twitter.СоздатьТвитВидео(Текст, ИВФ, Параметры);
+    Проверка_ТвиттерТекст(Результат, Текст);
+    
+    УдалитьФайлы(ИВФ);
+    
+    OPI_Инструменты.Пауза(20);
+    
+КонецПроцедуры
+
+Процедура Твиттер_СоздатьТвитСГиф() Экспорт
+    
+    Параметры = ПолучитьПараметрыТвиттер();
+    Текст     = "Тестовый твитт" + Строка(Новый УникальныйИдентификатор);
+    Гифка     = OPI_ПолучениеДанныхТестов.ПолучитьДвоичные("Гифка");
+	ИВФ       = ПолучитьИмяВременногоФайла("gif");
+	Гифка.Записать(ИВФ);
+   
+    Результат = OPI_Twitter.СоздатьТвитГифки(Текст, Гифка, Параметры);    
+    Проверка_ТвиттерТекст(Результат, Текст);    
+    
+    Результат = OPI_Twitter.СоздатьТвитГифки(Текст, ИВФ, Параметры);
+    Проверка_ТвиттерТекст(Результат, Текст);
+    
+    УдалитьФайлы(ИВФ);
+    
+    OPI_Инструменты.Пауза(20);
+    
+КонецПроцедуры
+
+Процедура Твиттер_СоздатьТвитСОпросом() Экспорт
+    
+    Параметры       = ПолучитьПараметрыТвиттер();
+    Текст           = "Тестовый твитт" + Строка(Новый УникальныйИдентификатор);
+    МассивОтветов   = Новый Массив;
+    МассивОтветов.Добавить("Вариант 1");
+    МассивОтветов.Добавить("Вариант 2");
+   
+    Результат = OPI_Twitter.СоздатьТвитОпрос(Текст, МассивОтветов, 60, Параметры);
+    Проверка_ТвиттерТекст(Результат, Текст);
+    
+    OPI_Инструменты.Пауза(20);
     
 КонецПроцедуры
 
@@ -1628,11 +1729,7 @@
 
 #КонецОбласти
 
-#КонецОбласти
+Функция ПолучитьПараметрыВК() Экспорт
-
-#Область СлужебныеПроцедурыИФункции
-
-Функция ПолучитьПараметрыВК()
     
     Параметры   = Новый Структура;
     НомерГруппы = OPI_ПолучениеДанныхТестов.ПолучитьПараметр("ВК_НомерГруппы");
@@ -1646,7 +1743,7 @@
     
 КонецФункции
 
-Функция ПолучитьПараметрыТвиттер()
+Функция ПолучитьПараметрыТвиттер() Экспорт
     
     Параметры = Новый Соответствие;
               
@@ -1664,6 +1761,10 @@
     
 КонецФункции
 
+#КонецОбласти
+
+#Область СлужебныеПроцедурыИФункции
+
 #Область Проверки
 
 Процедура Проверка_ТелеграмИстина(Знач Результат)
@@ -1694,6 +1795,16 @@
     OPI_ПолучениеДанныхТестов.ОжидаетЧто(ЗначениеЗаполнено(Результат)).Равно(Ложь);
 КонецПроцедуры
 
+Процедура Проверка_ТвиттерТекст(Знач Результат, Знач Текст)
+    
+    ТекстОтвета = Результат["data"]["text"];
+    ТекстОтвета = Лев(ТекстОтвета, СтрДлина(Текст));
+    
+    OPI_ПолучениеДанныхТестов.ОжидаетЧто(Результат).ИмеетТип("Соответствие").Заполнено();
+    OPI_ПолучениеДанныхТестов.ОжидаетЧто(ТекстОтвета).Равно(Текст);
+
+КонецПроцедуры
+
 #КонецОбласти
 
 #КонецОбласти