Merge pull request #148 from Stivo182/feature/connector-http

Добавление поддержки опций -F, --form, --form-string для коннектора

src/core/Классы/ГенераторПрограммногоКода1С.os

@@ -166,6 +166,10 @@
 
 Процедура ДобавитьЧтениеФайлов()
 
+	Если ОписаниеЗапроса.ОтправлятьКакMultipartFormData Тогда
+		Возврат;
+	КонецЕсли;
+
 	ТребуетсяЧтениеФайловТелаЗапроса = Не МетодУстановкиТелаЗапроса = "ИзФайла";
 
 	ФайлыДляЧтения = Новый Массив();
@@ -197,6 +201,10 @@
 
 Процедура ДобавитьДанныеЗапроса()
 
+	Если ОписаниеЗапроса.ОтправлятьКакMultipartFormData Тогда
+		Возврат;
+	КонецЕсли;
+
 	ТелоЗапросаСтрока = "";
 	ТелоЗапроса = КоллекцияПрограммногоКода.СборкаДанныхЗапросаВСтроку(
 		НазначенияПередаваемыхДанных.ТелоЗапроса,
@@ -344,6 +352,10 @@
 
 Процедура ДобавитьПоследовательнуюОтправкуФайлов(ОписаниеРесурса)
 
+	Если ОписаниеЗапроса.ОтправлятьКакMultipartFormData Тогда
+		Возврат;
+	КонецЕсли;
+
 	ДлинаИмениФайлаВКомментарии = 100;
 
 	ВсеФайлы = Новый Массив();
@@ -368,22 +380,22 @@
 		НомерФайла = НомерФайла + 1;
 
 		Если КоличествоФайлов > 1 Тогда
-			ИмяФайла = Лев(ПередаваемыйФайл.ИмяФайла, ДлинаИмениФайлаВКомментарии);
+			ИмяФайла = Лев(ПередаваемыйФайл.ПолноеИмяФайла, ДлинаИмениФайлаВКомментарии);
 			Конструктор
 				.ДобавитьПустуюСтроку()
 				.ДобавитьКомментарий("Передача файла %1. %2", НомерФайла, ИмяФайла);
 		КонецЕсли;
 
 		СтруктураURL = Новый ПарсерURL(ОписаниеРесурса.URL);
 		Если ПередаваемыйФайл.ДобавлятьИмяФайлаКURL Тогда
-			СтруктураURL.Путь = ОбщегоНазначения.ДополнитьИменемФайлаПутьURL(ПередаваемыйФайл.ИмяФайла, СтруктураURL.Путь);
+			СтруктураURL.Путь = ОбщегоНазначения.ДополнитьИменемФайлаПутьURL(ПередаваемыйФайл.ПолноеИмяФайла, СтруктураURL.Путь);
 		КонецЕсли;
 
 		ДобавитьHTTPЗапрос(СтруктураURL);
 
 		Конструктор.ДобавитьСтроку("%1.УстановитьИмяФайлаТела(%2);", 
 			ИмяПараметраHTTPЗапрос, 
-			Конструктор.ПараметрВСтроку(ПередаваемыйФайл.ИмяФайла));
+			Конструктор.ПараметрВСтроку(ПередаваемыйФайл.ПолноеИмяФайла));
 
 		ДобавитьВызовHTTPМетода(ОписаниеРесурса);
 
@@ -503,7 +515,7 @@
 		Конструктор.ДобавитьСтроку("%1%2.УстановитьИмяФайлаТела(%3);", 
 			?(ЭтоПервыйФайл, "", "// "),
 			ИмяПараметраHTTPЗапрос, 
-			Конструктор.ПараметрВСтроку(ПередаваемыйФайл.ИмяФайла));
+			Конструктор.ПараметрВСтроку(ПередаваемыйФайл.ПолноеИмяФайла));
 
 		ЭтоПервыйФайл = Ложь;
 
@@ -589,13 +601,13 @@
 		КонецЕсли;
 
 		Если ПередаваемыйФайл.ДобавлятьИмяФайлаКURL Тогда
-			АдресРесурса = ОбщегоНазначения.ДополнитьИменемФайлаПутьURL(ПередаваемыйФайл.ИмяФайла, СтруктураURL.Путь);
+			АдресРесурса = ОбщегоНазначения.ДополнитьИменемФайлаПутьURL(ПередаваемыйФайл.ПолноеИмяФайла, СтруктураURL.Путь);
 		Иначе
 			АдресРесурса = СтруктураURL.Путь;
 		КонецЕсли;
 
 		ПараметрыФункции = Новый Массив;
-		ПараметрыФункции.Добавить(Конструктор.ПараметрВСтроку(ПередаваемыйФайл.ИмяФайла));
+		ПараметрыФункции.Добавить(Конструктор.ПараметрВСтроку(ПередаваемыйФайл.ПолноеИмяФайла));
 		ПараметрыФункции.Добавить(Конструктор.ПараметрВСтроку(АдресРесурса));
 
 		Конструктор.ДобавитьСтроку("%1.Записать(%2);", 
@@ -667,8 +679,10 @@
 			Прервать;
 		КонецЕсли;
 	КонецЦикла;
-
-	Если КоличествоФайлов > 1 Или ЕстьТекстовоеТелоЗапроса Тогда
+
+	Если ОписаниеЗапроса.ОтправлятьКакMultipartFormData Тогда
+		МетодУстановкиТелаЗапроса = "";
+	ИначеЕсли КоличествоФайлов > 1 Или ЕстьТекстовоеТелоЗапроса Тогда
 		МетодУстановкиТелаЗапроса = "ИзСтроки";
 	ИначеЕсли КоличествоФайлов = 1 И Не ЕстьТекстовоеТелоЗапроса Тогда
 		МетодУстановкиТелаЗапроса = "ИзФайла";