1c/OpenIntegrations
1
0
Fork 0
mirror of https://github.com/Bayselonarrend/OpenIntegrations.git synced 2025-08-15 20:13:31 +02:00
Code Issues Releases Activity

Преобразование OPI -> OInt (workflow)

Browse Source
This commit is contained in:
Vitaly the Alpaca
2024-06-02 12:25:44 +00:00
committed by Vitaly the Alpaca (bot)
parent c13f4a1678
commit a61cad4c7a
6 changed files with 30 additions and 21 deletions
Download Patch File Download Diff File Expand all files Collapse all files

14
src/en/OInt/core/Modules/OPI_Twitter.os
View File

@@ -247,7 +247,7 @@ EndFunction
// Key-Value Pair - serialized JSON response from Twitter // Key-Value Pair - serialized JSON response from Twitter
Function CreateImageTweet(Val Text, Val ImageArray, Val Parameters = "") Export Function CreateImageTweet(Val Text, Val ImageArray, Val Parameters = "") Export
MediaArray = UploadAttachmentsArray(ImageArray, "tweet_image", Parameters); MediaArray = UploadAttachmentsArray(ImageArray, "photo", Parameters);
Return CreateCustomTweet(Text, MediaArray, , , Parameters); Return CreateCustomTweet(Text, MediaArray, , , Parameters);
EndFunction EndFunction
@@ -264,7 +264,7 @@ EndFunction
// Key-Value Pair - serialized JSON response from Twitter // Key-Value Pair - serialized JSON response from Twitter
Function CreateGifTweet(Val Text, Val GifsArray, Val Parameters = "") Export Function CreateGifTweet(Val Text, Val GifsArray, Val Parameters = "") Export
MediaArray = UploadAttachmentsArray(GifsArray, "tweet_gif", Parameters); MediaArray = UploadAttachmentsArray(GifsArray, "animated_gif", Parameters);
Return CreateCustomTweet(Text, MediaArray, , , Parameters); Return CreateCustomTweet(Text, MediaArray, , , Parameters);
EndFunction EndFunction
@@ -281,7 +281,7 @@ EndFunction
// Key-Value Pair - serialized JSON response from Twitter // Key-Value Pair - serialized JSON response from Twitter
Function CreateVideoTweet(Val Text, Val VideosArray, Val Parameters = "") Export Function CreateVideoTweet(Val Text, Val VideosArray, Val Parameters = "") Export
MediaArray = UploadAttachmentsArray(VideosArray, "tweet_video", Parameters); MediaArray = UploadAttachmentsArray(VideosArray, "video", Parameters);
Return CreateCustomTweet(Text, MediaArray, , , Parameters); Return CreateCustomTweet(Text, MediaArray, , , Parameters);
EndFunction EndFunction
@@ -357,7 +357,7 @@ Function UploadMediaFile(Val File, Val Type, Val Parameters)
Parameters_ = GetStandardParameters(Parameters); Parameters_ = GetStandardParameters(Parameters);
URL = "https://upload.twitter.com/1.1/media/upload.json"; URL = "https://upload.twitter.com/1.1/media/upload.json";
If Type = "tweet_image" Then If Type = "photo" Then
Fields = New Structure; Fields = New Structure;
Fields.Insert("media_data" , Base64String(File)); Fields.Insert("media_data" , Base64String(File));
@@ -386,9 +386,9 @@ Function UploadMediaInParts(Val File, Val Type, Val RequestType, Val URL, Parame
Size = File.Size(); Size = File.Size();
MIMETypeMapping = New Map; MIMETypeMapping = New Map;
MIMETypeMapping.Insert("tweet_image", "image/jpeg"); MIMETypeMapping.Insert("photo" , "image/jpeg");
MIMETypeMapping.Insert("tweet_video", "video/mp4"); MIMETypeMapping.Insert("video" , "video/mp4");
MIMETypeMapping.Insert("tweet_gif" , "image/gif"); MIMETypeMapping.Insert("animated_gif", "image/gif");
ChunkSize = Count * Unit * Unit; ChunkSize = Count * Unit * Unit;
ArrayReading = SplitBinaryData(File, ChunkSize); ArrayReading = SplitBinaryData(File, ChunkSize);

3
src/en/OInt/tests/Modules/internal/OPI_Tests.os
View File

@@ -2127,6 +2127,7 @@ Procedure Twitter_CreateTweetWithImage() Export
Check_TwitterText(Result, Text); Check_TwitterText(Result, Text);
Text = "TestTweet" + String(New UUID);
Result = OPI_Twitter.CreateImageTweet(Text, AndVF, Parameters); Result = OPI_Twitter.CreateImageTweet(Text, AndVF, Parameters);
OPI_TestDataRetrieval.WriteLog(Result, "CreateImageTweet"); OPI_TestDataRetrieval.WriteLog(Result, "CreateImageTweet");
@@ -2153,6 +2154,7 @@ Procedure Twitter_CreateTweetWithVideo() Export
Check_TwitterText(Result, Text); Check_TwitterText(Result, Text);
Text = "TestTweet" + String(New UUID);
Result = OPI_Twitter.CreateVideoTweet(Text, AndVF, Parameters); Result = OPI_Twitter.CreateVideoTweet(Text, AndVF, Parameters);
OPI_TestDataRetrieval.WriteLog(Result, "CreateVideoTweet"); OPI_TestDataRetrieval.WriteLog(Result, "CreateVideoTweet");
@@ -2179,6 +2181,7 @@ Procedure Twitter_CreateTweetWithGif() Export
Check_TwitterText(Result, Text); Check_TwitterText(Result, Text);
Text = "TestTweet" + String(New UUID);
Result = OPI_Twitter.CreateGifTweet(Text, AndVF, Parameters); Result = OPI_Twitter.CreateGifTweet(Text, AndVF, Parameters);
OPI_TestDataRetrieval.WriteLog(Result, "CreateGifTweet"); OPI_TestDataRetrieval.WriteLog(Result, "CreateGifTweet");

3
src/en/OPI/src/CommonModules/OPI_Tests/Module.bsl
View File

@@ -2127,6 +2127,7 @@ Procedure Twitter_CreateTweetWithImage() Export
Check_TwitterText(Result, Text); Check_TwitterText(Result, Text);
Text = "TestTweet" + String(New UUID);
Result = OPI_Twitter.CreateImageTweet(Text, AndVF, Parameters); Result = OPI_Twitter.CreateImageTweet(Text, AndVF, Parameters);
// !OInt OPI_TestDataRetrieval.WriteLog(Result, "CreateTweetImages"); // !OInt OPI_TestDataRetrieval.WriteLog(Result, "CreateTweetImages");
@@ -2153,6 +2154,7 @@ Procedure Twitter_CreateTweetWithVideo() Export
Check_TwitterText(Result, Text); Check_TwitterText(Result, Text);
Text = "TestTweet" + String(New UUID);
Result = OPI_Twitter.CreateVideoTweet(Text, AndVF, Parameters); Result = OPI_Twitter.CreateVideoTweet(Text, AndVF, Parameters);
// !OInt OPI_TestDataRetrieval.WriteLog(Result, "CreateTweetVideo"); // !OInt OPI_TestDataRetrieval.WriteLog(Result, "CreateTweetVideo");
@@ -2179,6 +2181,7 @@ Procedure Twitter_CreateTweetWithGif() Export
Check_TwitterText(Result, Text); Check_TwitterText(Result, Text);
Text = "TestTweet" + String(New UUID);
Result = OPI_Twitter.CreateGifTweet(Text, AndVF, Parameters); Result = OPI_Twitter.CreateGifTweet(Text, AndVF, Parameters);
// !OInt OPI_TestDataRetrieval.WriteLog(Result, "CreateTweetGif"); // !OInt OPI_TestDataRetrieval.WriteLog(Result, "CreateTweetGif");

14
src/en/OPI/src/CommonModules/OPI_Twitter/Module.bsl
View File

@@ -247,7 +247,7 @@ EndFunction
// Key-Value Pair - serialized JSON response from Twitter // Key-Value Pair - serialized JSON response from Twitter
Function CreateImageTweet(Val Text, Val ImageArray, Val Parameters = "") Export Function CreateImageTweet(Val Text, Val ImageArray, Val Parameters = "") Export
MediaArray = UploadAttachmentsArray(ImageArray, "tweet_image", Parameters); MediaArray = UploadAttachmentsArray(ImageArray, "photo", Parameters);
Return CreateCustomTweet(Text, MediaArray, , , Parameters); Return CreateCustomTweet(Text, MediaArray, , , Parameters);
EndFunction EndFunction
@@ -264,7 +264,7 @@ EndFunction
// Key-Value Pair - serialized JSON response from Twitter // Key-Value Pair - serialized JSON response from Twitter
Function CreateGifTweet(Val Text, Val GifsArray, Val Parameters = "") Export Function CreateGifTweet(Val Text, Val GifsArray, Val Parameters = "") Export
MediaArray = UploadAttachmentsArray(GifsArray, "tweet_gif", Parameters); MediaArray = UploadAttachmentsArray(GifsArray, "animated_gif", Parameters);
Return CreateCustomTweet(Text, MediaArray, , , Parameters); Return CreateCustomTweet(Text, MediaArray, , , Parameters);
EndFunction EndFunction
@@ -281,7 +281,7 @@ EndFunction
// Key-Value Pair - serialized JSON response from Twitter // Key-Value Pair - serialized JSON response from Twitter
Function CreateVideoTweet(Val Text, Val VideosArray, Val Parameters = "") Export Function CreateVideoTweet(Val Text, Val VideosArray, Val Parameters = "") Export
MediaArray = UploadAttachmentsArray(VideosArray, "tweet_video", Parameters); MediaArray = UploadAttachmentsArray(VideosArray, "video", Parameters);
Return CreateCustomTweet(Text, MediaArray, , , Parameters); Return CreateCustomTweet(Text, MediaArray, , , Parameters);
EndFunction EndFunction
@@ -357,7 +357,7 @@ Function UploadMediaFile(Val File, Val Type, Val Parameters)
Parameters_ = GetStandardParameters(Parameters); Parameters_ = GetStandardParameters(Parameters);
URL = "https://upload.twitter.com/1.1/media/upload.json"; URL = "https://upload.twitter.com/1.1/media/upload.json";
If Type = "tweet_image" Then If Type = "photo" Then
Fields = New Structure; Fields = New Structure;
Fields.Insert("media_data" , Base64String(File)); Fields.Insert("media_data" , Base64String(File));
@@ -386,9 +386,9 @@ Function UploadMediaInParts(Val File, Val Type, Val RequestType, Val URL, Parame
Size = File.Size(); Size = File.Size();
MIMETypeMapping = New Map; MIMETypeMapping = New Map;
MIMETypeMapping.Insert("tweet_image", "image/jpeg"); MIMETypeMapping.Insert("photo" , "image/jpeg");
MIMETypeMapping.Insert("tweet_video", "video/mp4"); MIMETypeMapping.Insert("video" , "video/mp4");
MIMETypeMapping.Insert("tweet_gif" , "image/gif"); MIMETypeMapping.Insert("animated_gif", "image/gif");
ChunkSize = Count * Unit * Unit; ChunkSize = Count * Unit * Unit;
ArrayReading = SplitBinaryData(File, ChunkSize); ArrayReading = SplitBinaryData(File, ChunkSize);

14
src/ru/OInt/core/Modules/OPI_Twitter.os
View File

@@ -247,7 +247,7 @@
// Соответствие Из КлючИЗначение - сериализованный JSON ответа от Twitter // Соответствие Из КлючИЗначение - сериализованный JSON ответа от Twitter
Функция СоздатьТвитКартинки(Знач Текст, Знач МассивКартинок, Знач Параметры = "") Экспорт Функция СоздатьТвитКартинки(Знач Текст, Знач МассивКартинок, Знач Параметры = "") Экспорт
МассивМедиа = ЗагрузитьМассивВложений(МассивКартинок, "tweet_image", Параметры); МассивМедиа = ЗагрузитьМассивВложений(МассивКартинок, "photo", Параметры);
Возврат СоздатьПроизвольныйТвит(Текст, МассивМедиа, , , Параметры); Возврат СоздатьПроизвольныйТвит(Текст, МассивМедиа, , , Параметры);
КонецФункции КонецФункции
@@ -264,7 +264,7 @@
// Соответствие Из КлючИЗначение - сериализованный JSON ответа от Twitter // Соответствие Из КлючИЗначение - сериализованный JSON ответа от Twitter
Функция СоздатьТвитГифки(Знач Текст, Знач МассивГифок, Знач Параметры = "") Экспорт Функция СоздатьТвитГифки(Знач Текст, Знач МассивГифок, Знач Параметры = "") Экспорт
МассивМедиа = ЗагрузитьМассивВложений(МассивГифок, "tweet_gif", Параметры); МассивМедиа = ЗагрузитьМассивВложений(МассивГифок, "animated_gif", Параметры);
Возврат СоздатьПроизвольныйТвит(Текст, МассивМедиа, , , Параметры); Возврат СоздатьПроизвольныйТвит(Текст, МассивМедиа, , , Параметры);
КонецФункции КонецФункции
@@ -281,7 +281,7 @@
// Соответствие Из КлючИЗначение - сериализованный JSON ответа от Twitter // Соответствие Из КлючИЗначение - сериализованный JSON ответа от Twitter
Функция СоздатьТвитВидео(Знач Текст, Знач МассивВидео, Знач Параметры = "") Экспорт Функция СоздатьТвитВидео(Знач Текст, Знач МассивВидео, Знач Параметры = "") Экспорт
МассивМедиа = ЗагрузитьМассивВложений(МассивВидео, "tweet_video", Параметры); МассивМедиа = ЗагрузитьМассивВложений(МассивВидео, "video", Параметры);
Возврат СоздатьПроизвольныйТвит(Текст, МассивМедиа, , , Параметры); Возврат СоздатьПроизвольныйТвит(Текст, МассивМедиа, , , Параметры);
КонецФункции КонецФункции
@@ -357,7 +357,7 @@
Параметры_ = ПолучитьСтандартныеПараметры(Параметры); Параметры_ = ПолучитьСтандартныеПараметры(Параметры);
URL = "https://upload.twitter.com/1.1/media/upload.json"; URL = "https://upload.twitter.com/1.1/media/upload.json";
Если Тип = "tweet_image" Тогда Если Тип = "photo" Тогда
Поля = Новый Структура; Поля = Новый Структура;
Поля.Вставить("media_data" , Base64Строка(Файл)); Поля.Вставить("media_data" , Base64Строка(Файл));
@@ -386,9 +386,9 @@
Размер = Файл.Размер(); Размер = Файл.Размер();
СоответствиеMIME = Новый Соответствие; СоответствиеMIME = Новый Соответствие;
СоответствиеMIME.Вставить("tweet_image", "image/jpeg"); СоответствиеMIME.Вставить("photo" , "image/jpeg");
СоответствиеMIME.Вставить("tweet_video", "video/mp4"); СоответствиеMIME.Вставить("video" , "video/mp4");
СоответствиеMIME.Вставить("tweet_gif" , "image/gif"); СоответствиеMIME.Вставить("animated_gif", "image/gif");
РазмерЧасти = Количество * Единица * Единица; РазмерЧасти = Количество * Единица * Единица;
МассивЧтения = РазделитьДвоичныеДанные(Файл, РазмерЧасти); МассивЧтения = РазделитьДвоичныеДанные(Файл, РазмерЧасти);

3
src/ru/OInt/tests/Modules/internal/OPI_Тесты.os
View File

@@ -2127,6 +2127,7 @@
Проверка_ТвиттерТекст(Результат, Текст); Проверка_ТвиттерТекст(Результат, Текст);
Текст = "Тестовый твитт" + Строка(Новый УникальныйИдентификатор);
Результат = OPI_Twitter.СоздатьТвитКартинки(Текст, ИВФ, Параметры); Результат = OPI_Twitter.СоздатьТвитКартинки(Текст, ИВФ, Параметры);
OPI_ПолучениеДанныхТестов.ЗаписатьЛог(Результат, "СоздатьТвитКартинки"); OPI_ПолучениеДанныхТестов.ЗаписатьЛог(Результат, "СоздатьТвитКартинки");
@@ -2153,6 +2154,7 @@
Проверка_ТвиттерТекст(Результат, Текст); Проверка_ТвиттерТекст(Результат, Текст);
Текст = "Тестовый твитт" + Строка(Новый УникальныйИдентификатор);
Результат = OPI_Twitter.СоздатьТвитВидео(Текст, ИВФ, Параметры); Результат = OPI_Twitter.СоздатьТвитВидео(Текст, ИВФ, Параметры);
OPI_ПолучениеДанныхТестов.ЗаписатьЛог(Результат, "СоздатьТвитВидео"); OPI_ПолучениеДанныхТестов.ЗаписатьЛог(Результат, "СоздатьТвитВидео");
@@ -2179,6 +2181,7 @@
Проверка_ТвиттерТекст(Результат, Текст); Проверка_ТвиттерТекст(Результат, Текст);
Текст = "Тестовый твитт" + Строка(Новый УникальныйИдентификатор);
Результат = OPI_Twitter.СоздатьТвитГифки(Текст, ИВФ, Параметры); Результат = OPI_Twitter.СоздатьТвитГифки(Текст, ИВФ, Параметры);
OPI_ПолучениеДанныхТестов.ЗаписатьЛог(Результат, "СоздатьТвитГифки"); OPI_ПолучениеДанныхТестов.ЗаписатьЛог(Результат, "СоздатьТвитГифки");