- Рефакторинг процедур общих модулей

src/cf/CommonModules/HttpОбщегоНазначения/Ext/Module.bsl

@@ -1,6 +1,6 @@
 #Область ПрограммныйИнтерфейс
 
-Функция ВыполнитьGetЗапрос(АдресРесурса, Параметры = Неопределено, ДвоичныеДанные = Ложь) Экспорт
+Функция ВыполнитьGetЗапрос(Соединение, АдресРесурса, Параметры = Неопределено, ДвоичныеДанные = Ложь) Экспорт
 	
 	РезультатЗапроса = Новый Структура();
 	РезультатЗапроса.Вставить("Успех", Ложь);
@@ -9,8 +9,6 @@
 	РезультатЗапроса.Вставить("ДвоичныеДанные", ДвоичныеДанные);
 	
 	Попытка
-		Соединение = Новый HTTPСоединение("api.telegram.org",443,,,,, Новый ЗащищенноеСоединениеOpenSSL);
-		
 		Если Параметры <> Неопределено Тогда
 			АдресРесурса = АдресРесурсаСПараметрами(АдресРесурса, Параметры);
 		КонецЕсли;
@@ -49,7 +47,7 @@
 	
 КонецФункции
 
-Функция ВыполнитьPostЗапрос(АдресРесурса, Параметры = Неопределено, Данные = Неопределено) Экспорт
+Функция ВыполнитьPostЗапрос(Соединение, АдресРесурса, Параметры = Неопределено, Данные = Неопределено) Экспорт
 	
 	РезультатЗапроса = Новый Структура();
 	РезультатЗапроса.Вставить("Успех", Ложь);
@@ -57,8 +55,6 @@
 	РезультатЗапроса.Вставить("Описание", "");
 	
 	Попытка
-		Соединение = Новый HTTPСоединение("api.telegram.org",443,,,,, Новый ЗащищенноеСоединениеOpenSSL);
-		
 		Если Параметры <> Неопределено Тогда
 			АдресРесурса = АдресРесурсаСПараметрами(АдресРесурса, Параметры);
 		КонецЕсли;

src/cf/CommonModules/ТелеграмМетодыВызовСервера/Ext/Module.bsl

@@ -1,6 +1,6 @@
 #Область ПрограммныйИнтерфейс
 
-Функция SendMessage(ИдЧата, СообщениеДляОтправки, Клавиатура = Неопределено) Экспорт
+Функция SendMessage(ИдЧата, СообщениеДляОтправки, РежимРазметки = Неопределено, Клавиатура = Неопределено) Экспорт
 
 	ТелоЗапроса = Новый Структура("chat_id, text", ИдЧата, СообщениеДляОтправки);
 
@@ -8,8 +8,15 @@
 		ТелоЗапроса.Вставить("reply_markup", Клавиатура);
 	КонецЕсли;
 	
+	Если РежимРазметки <> Неопределено Тогда
+		Если РежимРазметки = Перечисления.ТелеграмРежимРазметки.HTML ИЛИ РежимРазметки = Перечисления.ТелеграмРежимРазметки.Markdown Тогда
+			ТелоЗапроса.Вставить("parse_mode", Строка(РежимРазметки));
+		КонецЕсли;
+	КонецЕсли;
+	
 	АдресРесурса = АдресРесурсаПоИмениМетода("sendMessage");
-	Возврат HttpОбщегоНазначения.ВыполнитьPostЗапрос(АдресРесурса,, ТелоЗапроса);
+	Соединение = Новый HTTPСоединение("api.telegram.org",443,,,,, Новый ЗащищенноеСоединениеOpenSSL);
+	Возврат HttpОбщегоНазначения.ВыполнитьPostЗапрос(Соединение, АдресРесурса,, ТелоЗапроса);
 	
 КонецФункции
 
@@ -17,21 +24,24 @@
 	
 	ПараметрыЗапроса = Новый Структура("url", АдресВебхук);
 	АдресРесурса = АдресРесурсаПоИмениМетода("setWebhook");
-	Возврат HttpОбщегоНазначения.ВыполнитьGetЗапрос(АдресРесурса, ПараметрыЗапроса);
+	Соединение = Новый HTTPСоединение("api.telegram.org",443,,,,, Новый ЗащищенноеСоединениеOpenSSL);
+	Возврат HttpОбщегоНазначения.ВыполнитьGetЗапрос(Соединение, АдресРесурса, ПараметрыЗапроса);
 	
 КонецФункции
 
 Функция DeleteWebhook() Экспорт
 	
 	АдресРесурса = АдресРесурсаПоИмениМетода("deleteWebhook");
-	Возврат HttpОбщегоНазначения.ВыполнитьGetЗапрос(АдресРесурса);
+	Соединение = Новый HTTPСоединение("api.telegram.org",443,,,,, Новый ЗащищенноеСоединениеOpenSSL);
+	Возврат HttpОбщегоНазначения.ВыполнитьGetЗапрос(Соединение, АдресРесурса);
 	
 КонецФункции
 
 Функция GetWebhookInfo() Экспорт
 
 	АдресРесурса = АдресРесурсаПоИмениМетода("getWebhookInfo");
-	Возврат HttpОбщегоНазначения.ВыполнитьGetЗапрос(АдресРесурса);
+	Соединение = Новый HTTPСоединение("api.telegram.org",443,,,,, Новый ЗащищенноеСоединениеOpenSSL);
+	Возврат HttpОбщегоНазначения.ВыполнитьGetЗапрос(Соединение, АдресРесурса);
 
 КонецФункции
 
@@ -41,7 +51,8 @@
 		Формат(ТелеграмОбщегоНазначения.ИдПоследнегоСообщения() + 1, "ЧГ=0"));
 	ПараметрыЗапроса = Новый Структура("offset", Смещение);
 	АдресРесурса = АдресРесурсаПоИмениМетода("getUpdates");
-	Возврат HttpОбщегоНазначения.ВыполнитьGetЗапрос(АдресРесурса, ПараметрыЗапроса);
+	Соединение = Новый HTTPСоединение("api.telegram.org",443,,,,, Новый ЗащищенноеСоединениеOpenSSL);
+	Возврат HttpОбщегоНазначения.ВыполнитьGetЗапрос(Соединение, АдресРесурса, ПараметрыЗапроса);
 
 КонецФункции
 
@@ -49,14 +60,16 @@
 
 	АдресРесурса = АдресРесурсаПоИмениМетода("getFile");
 	ПараметрыЗапроса = Новый Структура("file_id", ИдФайла);
-	Возврат HttpОбщегоНазначения.ВыполнитьGetЗапрос(АдресРесурса, ПараметрыЗапроса);
+	Соединение = Новый HTTPСоединение("api.telegram.org",443,,,,, Новый ЗащищенноеСоединениеOpenSSL);
+	Возврат HttpОбщегоНазначения.ВыполнитьGetЗапрос(Соединение, АдресРесурса, ПараметрыЗапроса);
 
 КонецФункции
 
 Функция GetMe() Экспорт
 
 	АдресРесурса = АдресРесурсаПоИмениМетода("getMe");
-	Возврат HttpОбщегоНазначения.ВыполнитьGetЗапрос(АдресРесурса);
+	Соединение = Новый HTTPСоединение("api.telegram.org",443,,,,, Новый ЗащищенноеСоединениеOpenSSL);
+	Возврат HttpОбщегоНазначения.ВыполнитьGetЗапрос(Соединение, АдресРесурса);
 
 КонецФункции
 
@@ -66,7 +79,8 @@
 	Разделитель = СтрЗаменить(Новый УникальныйИдентификатор, "-", "");
 	ДвоичныеДанныеДокумента = ДвоичныеДанныеДокумента(ИдЧата, ДокументДляОтправки, Надпись, БезУведомления, Разделитель);
 	ДанныеДокумента = Новый Структура("Разделитель, ДвоичныеДанные", Разделитель, ДвоичныеДанныеДокумента);
-	Возврат HttpОбщегоНазначения.ВыполнитьPostЗапрос(АдресРесурса,, ДанныеДокумента);
+	Соединение = Новый HTTPСоединение("api.telegram.org",443,,,,, Новый ЗащищенноеСоединениеOpenSSL);
+	Возврат HttpОбщегоНазначения.ВыполнитьPostЗапрос(Соединение, АдресРесурса,, ДанныеДокумента);
 	
 КонецФункции
 
@@ -84,7 +98,8 @@
 	Разделитель = СтрЗаменить(Новый УникальныйИдентификатор, "-", "");
 	ДвоичныеДанныеФото = ДвоичныеДанныеФайла(ФайлДляОтправки, ИмяФайла, "image/jpeg", "photo", Разделитель);
 	ДанныеФото = Новый Структура("Разделитель, ДвоичныеДанные", Разделитель, ДвоичныеДанныеФото);
-	Возврат HttpОбщегоНазначения.ВыполнитьPostЗапрос(АдресРесурса, ПараметрыЗапроса, ДанныеФото);
+	Соединение = Новый HTTPСоединение("api.telegram.org",443,,,,, Новый ЗащищенноеСоединениеOpenSSL);
+	Возврат HttpОбщегоНазначения.ВыполнитьPostЗапрос(Соединение, АдресРесурса, ПараметрыЗапроса, ДанныеФото);
 	
 КонецФункции
 

src/cf/CommonModules/ТелеграмОбщегоНазначения/Ext/Module.bsl

@@ -107,7 +107,8 @@
 Функция ПолучитьФайлССервераТелеграм(ПутьКФайлуНаСервере) Экспорт
 
 	АдресРесурса = СтрШаблон("file/bot%1/%2", ТелеграмПовторноеИспользование.ТелеграмТокен(), ПутьКФайлуНаСервере);
-	Возврат HttpОбщегоНазначения.ВыполнитьGetЗапрос(АдресРесурса,, Истина);
+	Соединение = Новый HTTPСоединение("api.telegram.org",443,,,,, Новый ЗащищенноеСоединениеOpenSSL);
+	Возврат HttpОбщегоНазначения.ВыполнитьGetЗапрос(Соединение, АдресРесурса,, Истина);
 
 КонецФункции