Skip to content

Commit

Permalink
refactor: Адаптация под новую версю обработки cURL
Browse files Browse the repository at this point in the history
  • Loading branch information
Stivo182 committed Jul 20, 2024
1 parent 0bdd415 commit 92b98dc
Show file tree
Hide file tree
Showing 3 changed files with 35 additions and 32 deletions.
4 changes: 2 additions & 2 deletions src/ExternalDataProcessors/CURLBuilder/CURLBuilder.mdo
Original file line number Diff line number Diff line change
Expand Up @@ -426,10 +426,10 @@
<maxValue xsi:type="core:UndefinedValue"/>
</attributes>
<attributes uuid="d34cd733-f3f7-4fe9-be04-cd42241866b9">
<name>РазрешатьПеренаправления</name>
<name>РазрешитьПеренаправления</name>
<synonym>
<key>ru</key>
<value>Разрешать перенаправления</value>
<value>Разрешить перенаправления</value>
</synonym>
<type>
<types>Boolean</types>
Expand Down
Original file line number Diff line number Diff line change
Expand Up @@ -5541,15 +5541,15 @@
<name>ГруппаПеренаправления</name>
<id>368</id>
<items xsi:type="form:FormField">
<name>РазрешатьПеренаправления</name>
<name>РазрешитьПеренаправления</name>
<id>155</id>
<visible>true</visible>
<enabled>true</enabled>
<userVisible>
<common>true</common>
</userVisible>
<dataPath xsi:type="form:DataPath">
<segments>Объект.РазрешатьПеренаправления</segments>
<segments>Объект.РазрешитьПеренаправления</segments>
</dataPath>
<titleLocation>Right</titleLocation>
<toolTip>
Expand All @@ -5559,10 +5559,10 @@
<toolTipRepresentation>ShowBottom</toolTipRepresentation>
<handlers>
<event>OnChange</event>
<name>РазрешатьПеренаправленияПриИзменении</name>
<name>РазрешитьПеренаправленияПриИзменении</name>
</handlers>
<extendedTooltip>
<name>РазрешатьПеренаправленияРасширеннаяПодсказка</name>
<name>РазрешитьПеренаправленияРасширеннаяПодсказка</name>
<id>157</id>
<visible>true</visible>
<enabled>true</enabled>
Expand All @@ -5577,7 +5577,7 @@
</extInfo>
</extendedTooltip>
<contextMenu>
<name>РазрешатьПеренаправленияКонтекстноеМеню</name>
<name>РазрешитьПеренаправленияКонтекстноеМеню</name>
<id>156</id>
<visible>true</visible>
<enabled>true</enabled>
Expand All @@ -5596,19 +5596,19 @@
</extInfo>
</items>
<items xsi:type="form:FormField">
<name>ОтправлятьДанныеАутентификацииНаДругойХост</name>
<name>РазрешитьПередачуСведенийАутентификацииНаДругойХост</name>
<id>362</id>
<visible>true</visible>
<enabled>true</enabled>
<userVisible>
<common>true</common>
</userVisible>
<dataPath xsi:type="form:DataPath">
<segments>Объект.ОтправлятьДанныеАутентификацииНаДругойХост</segments>
<segments>Объект.РазрешитьПередачуСведенийАутентификацииНаДругойХост</segments>
</dataPath>
<titleLocation>Right</titleLocation>
<extendedTooltip>
<name>ОтправлятьДанныеАутентификацииНаДругойХостРасширеннаяПодсказка</name>
<name>РазрешитьПередачуСведенийАутентификацииНаДругойХостРасширеннаяПодсказка</name>
<id>364</id>
<visible>true</visible>
<enabled>true</enabled>
Expand All @@ -5623,7 +5623,7 @@
</extInfo>
</extendedTooltip>
<contextMenu>
<name>ОтправлятьДанныеАутентификацииНаДругойХостКонтекстноеМеню</name>
<name>РазрешитьПередачуСведенийАутентификацииНаДругойХостКонтекстноеМеню</name>
<id>363</id>
<visible>true</visible>
<enabled>true</enabled>
Expand Down
45 changes: 24 additions & 21 deletions src/ExternalDataProcessors/CURLBuilder/Forms/Форма/Module.bsl
Original file line number Diff line number Diff line change
Expand Up @@ -142,7 +142,7 @@
КонецПроцедуры

&НаКлиенте
Процедура РазрешатьПеренаправленияПриИзменении(Элемент)
Процедура РазрешитьПеренаправленияПриИзменении(Элемент)
НастроитьФорму();
КонецПроцедуры

Expand Down Expand Up @@ -242,8 +242,8 @@
Элементы.ПоказыватьОшибкиВТихомРежиме.Доступность = Объект.ТихийРежим;

// Перенаправления
Элементы.ОтправлятьДанныеАутентификацииНаДругойХост.Доступность = Объект.РазрешатьПеренаправления;
Элементы.МаксимальноеКоличествоПеренаправлений.Доступность = Объект.РазрешатьПеренаправления;
Элементы.РазрешитьПередачуСведенийАутентификацииНаДругойХост.Доступность = Объект.РазрешитьПеренаправления;
Элементы.МаксимальноеКоличествоПеренаправлений.Доступность = Объект.РазрешитьПеренаправления;

КонецПроцедуры

Expand Down Expand Up @@ -456,7 +456,7 @@

Curl = СоздатьОбъектCurl()
.ИспользоватьКраткуюФормуОпций(Объект.ИспользоватьКраткуюФормуОпций)
.УстановитьПострочныйВыводОпций(Объект.ПострочныйВыводОпций); // ВнешняяОбработка
.ВыводитьОпцииПострочно(Объект.ПострочныйВыводОпций); // ВнешняяОбработка

ДополнитьСборкуКоманднымИнтерпретатором(Curl);
ДополнитьСборкуДаннымиMultipart(Curl);
Expand Down Expand Up @@ -662,9 +662,9 @@
Процедура ДополнитьСборкуКоманднымИнтерпретатором(Curl)

Если Объект.КомандныйИнтерпретатор = ИмяКомандногоИнтерпретатораCmd() Тогда
Curl.УстановитьКомандныйИнтерпретаторCmd();
Curl.ИспользоватьКомандныйИнтерпретаторCmd();
ИначеЕсли Объект.КомандныйИнтерпретатор = ИмяКомандногоИнтерпретатораBash() Тогда
Curl.УстановитьКомандныйИнтерпретаторBash();
Curl.ИспользоватьКомандныйИнтерпретаторBash();
КонецЕсли;

КонецПроцедуры
Expand Down Expand Up @@ -862,7 +862,7 @@

КонецПроцедуры

// Дополняет сборку ограничениями разрешением перенаправлений.
// Дополняет сборку разрешением перенаправлений.
//
// Параметры:
// Curl - ВнешняяОбработка - Внешняя обработка cURL
Expand All @@ -874,18 +874,21 @@
Возврат;
КонецЕсли;

Если Объект.РазрешатьПеренаправления Тогда
Curl.РазрешатьПеренаправления(Истина, Объект.ОтправлятьДанныеАутентификацииНаДругойХост,
Объект.МаксимальноеКоличествоПеренаправлений);
Если Объект.РазрешитьПеренаправления Тогда
Curl.РазрешитьПеренаправления();
ДобавитьМетодОбработкиВКод("РазрешитьПеренаправления");

Если Объект.ОтправлятьДанныеАутентификацииНаДругойХост
Или ЗначениеЗаполнено(Объект.МаксимальноеКоличествоПеренаправлений) Тогда
ДобавитьМетодОбработкиВКод("РазрешатьПеренаправления", Истина,
ЛожьКакНеопределено(Объект.ОтправлятьДанныеАутентификацииНаДругойХост),
Объект.МаксимальноеКоличествоПеренаправлений);
Иначе
ДобавитьМетодОбработкиВКод("РазрешатьПеренаправления");
Если Объект.РазрешитьПередачуСведенийАутентификацииНаДругойХост Тогда
Curl.РазрешитьПередачуСведенийАутентификацииНаДругойХост();
ДобавитьМетодОбработкиВКод("РазрешитьПередачуСведенийАутентификацииНаДругойХост");
КонецЕсли;

Если Объект.МаксимальноеКоличествоПеренаправлений <> 0 Тогда
Curl.УстановитьМаксимальноеКоличествоПеренаправлений(Объект.МаксимальноеКоличествоПеренаправлений);
ДобавитьМетодОбработкиВКод("УстановитьМаксимальноеКоличествоПеренаправлений",
Объект.МаксимальноеКоличествоПеренаправлений);
КонецЕсли;

КонецЕсли;

КонецПроцедуры
Expand All @@ -912,8 +915,8 @@
КонецЦикла;

Для Каждого СтрокаПоле Из Объект.ПоляФормы Цикл
Curl.ДобавитьЗаписьMultipart(СтрокаПоле.Имя, СтрокаПоле.Значение, СтрокаПоле.ТипMIME);
ДобавитьМетодОбработкиВКод("ДобавитьЗаписьMultipart", СтрокаПоле.Имя, СтрокаПоле.Значение, СтрокаПоле.ТипMIME);
Curl.ДобавитьТекстMultipart(СтрокаПоле.Имя, СтрокаПоле.Значение, СтрокаПоле.ТипMIME);
ДобавитьМетодОбработкиВКод("ДобавитьТекстMultipart", СтрокаПоле.Имя, СтрокаПоле.Значение, СтрокаПоле.ТипMIME);
КонецЦикла;

КонецПроцедуры
Expand Down Expand Up @@ -1174,8 +1177,8 @@
Возврат;
КонецЕсли;

Объект.РазрешатьПеренаправления = Ложь;
Объект.ОтправлятьДанныеАутентификацииНаДругойХост = Ложь;
Объект.РазрешитьПеренаправления = Ложь;
Объект.РазрешитьПередачуСведенийАутентификацииНаДругойХост = Ложь;
Объект.МаксимальноеКоличествоПеренаправлений = 0;

КонецПроцедуры
Expand Down

0 comments on commit 92b98dc

Please sign in to comment.