Skip to content
New issue

Have a question about this project? Sign up for a free GitHub account to open an issue and contact its maintainers and the community.

By clicking “Sign up for GitHub”, you agree to our terms of service and privacy statement. We’ll occasionally send you account related emails.

Already on GitHub? Sign in to your account

добавлена обработка параметра КаталогиБиблиотек при старте ОФ из командной строки #781

Open
wants to merge 5 commits into
base: develop
Choose a base branch
from
Binary file modified epf/bddRunner/bddRunner/Forms/Форма/Ext/Form.bin
Binary file not shown.
53 changes: 36 additions & 17 deletions epf/bddRunner/bddRunner/Forms/Форма/Ext/Form/Module.bsl
Original file line number Diff line number Diff line change
Expand Up @@ -400,13 +400,25 @@

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

Функция НужноПреобразоватьПуть(ЗначениеИзКонфига)
Если ТипЗнч(ЗначениеИзКонфига) = Тип("Массив") Тогда
Для Каждого ЗначениеСписка Из ЗначениеИзКонфига Цикл
Если НужноПреобразоватьПуть(ЗначениеСписка) Тогда
Возврат Истина;
КонецЕсли;
КонецЦикла;
Возврат Ложь;
Иначе
Путь = СокрЛП(ЗначениеИзКонфига);
Возврат Лев(Путь, 1) = "." ИЛИ Найти(Путь, "$workspaceRoot") > 0 ИЛИ Найти(Путь, "$instrumentsRoot") > 0;
КонецЕсли;
КонецФункции

Процедура ПреобразоватьПараметрыКоторыеНачинаютсяСТочкиКНормальнымПутям(СтруктураПараметров) Экспорт
МассивКлючей = Новый Массив;

Для каждого ПараметрСборки Из СтруктураПараметров Цикл
Если Лев(ПараметрСборки.Значение,1) = "." Тогда
МассивКлючей.Добавить(ПараметрСборки.Ключ);
ИначеЕсли Найти(ПараметрСборки.Значение, "$workspaceRoot") > 0 ИЛИ Найти(ПараметрСборки.Значение, "$instrumentsRoot") > 0 Тогда
Если НужноПреобразоватьПуть(ПараметрСборки.Значение) Тогда
МассивКлючей.Добавить(ПараметрСборки.Ключ);
КонецЕсли;
КонецЦикла;
Expand Down Expand Up @@ -481,20 +493,25 @@
СписокТеговОтбор.ЗагрузитьЗначения(ЗначСписокТеговОтбор);
КонецЕсли;

КаталогиБиблиотек.Очистить();
ЗначКаталогиБиблиотек = ПолучитьЗначениеПереданногоПараметра(СтрутктураJSON,"КаталогиБиблиотек");
Если ТипЗнч(ЗначКаталогиБиблиотек) = Тип("Массив") Тогда
КаталогиБиблиотек.ЗагрузитьЗначения(ЗначКаталогиБиблиотек);
КонецЕсли;

ЗнДелатьСообщенияТранслитом = ПолучитьЗначениеПереданногоПараметра(СтрутктураJSON,"ДелатьСообщенияТранслитом");
Если ЗнДелатьСообщенияТранслитом = "Истина" Тогда
Если ЗнДелатьСообщенияТранслитом = Истина Тогда
Copy link
Collaborator

Choose a reason for hiding this comment

The reason will be displayed to describe this comment to others. Learn more.

а точно метод ПолучитьЗначениеПереданногоПараметра умеет преобразовывать строковые значения "Истина""Ложь" в Истина\Ложь или нет?

ведь если не умеет, тогда ты вносишь несовместимость со старым форматом настроек (

и нужно решать, что с делать с этой поддержкой - оставлять или убирать?

ДелатьСообщенияТранслитом = Истина;
КонецЕсли;

//для формирования отчетов
ЗнДобавлятьКИмениСценарияУсловияВыгрузки = ПолучитьЗначениеПереданногоПараметра(СтрутктураJSON,"ДобавлятьКИмениСценарияУсловияВыгрузки");
Если ЗнДобавлятьКИмениСценарияУсловияВыгрузки = "Истина" Тогда
Если ЗнДобавлятьКИмениСценарияУсловияВыгрузки = Истина Тогда
ДобавлятьКИмениСценарияУсловияВыгрузки = Истина;
КонецЕсли;

ЗнВыгружатьСтатусВыполненияСценариевВФайл = ПолучитьЗначениеПереданногоПараметра(СтрутктураJSON,"ВыгружатьСтатусВыполненияСценариевВФайл");
Если ЗнВыгружатьСтатусВыполненияСценариевВФайл = "Истина" Тогда
Если ЗнВыгружатьСтатусВыполненияСценариевВФайл = Истина Тогда
ВыгружатьСтатусВыполненияСценариевВФайл = Истина;
КонецЕсли;

Expand All @@ -507,7 +524,7 @@

//Allure
ЗнДелатьОтчетВФорматеАллюр = ПолучитьЗначениеПереданногоПараметра(СтрутктураJSON,"ДелатьОтчетВФорматеАллюр");
Если ЗнДелатьОтчетВФорматеАллюр = "Истина" Тогда
Если ЗнДелатьОтчетВФорматеАллюр = Истина Тогда
ОпределилиКаталогAllure = Ложь;

ЗнКаталогOutputAllure = ПолучитьЗначениеПереданногоПараметра(СтрутктураJSON,"КаталогOutputAllure");
Expand All @@ -534,7 +551,7 @@

СисИнфо = Новый СистемнаяИнформация;

Если ПолучитьЗначениеПереданногоПараметра(СтрутктураJSON,"СоздаватьПодкаталогВКаталогеAllureДляЭтойСборки") = "Истина" Тогда
Если ПолучитьЗначениеПереданногоПараметра(СтрутктураJSON,"СоздаватьПодкаталогВКаталогеAllureДляЭтойСборки") = Истина Тогда
ЗнКаталогOutputAllureБазовый = ЗнКаталогOutputAllureБазовый + "\" + ПолучитьЗначениеПереданногоПараметра(СтрутктураJSON,"ИмяСборки");
КонецЕсли;

Expand Down Expand Up @@ -563,7 +580,7 @@

//jUnit
ЗнДелатьОтчетВФорматеjUnit = ПолучитьЗначениеПереданногоПараметра(СтрутктураJSON,"ДелатьОтчетВФорматеjUnit");
Если ЗнДелатьОтчетВФорматеjUnit = "Истина" Тогда
Если ЗнДелатьОтчетВФорматеjUnit = Истина Тогда
ОпределилиКаталогjUnit = Ложь;

ЗнКаталогOutputjUnit = ПолучитьЗначениеПереданногоПараметра(СтрутктураJSON,"КаталогOutputjUnit");
Expand All @@ -590,7 +607,7 @@

//Cucumber json format
ЗнДелатьОтчетВФорматеCucumberJson = ПолучитьЗначениеПереданногоПараметра(СтрутктураJSON,"ДелатьОтчетВФорматеCucumberJson");
Если ЗнДелатьОтчетВФорматеCucumberJson = "Истина" Тогда
Если ЗнДелатьОтчетВФорматеCucumberJson = Истина Тогда
ОпределилиКаталогCucumberJson = Ложь;

ЗнКаталогOutputCucumberJson = ПолучитьЗначениеПереданногоПараметра(СтрутктураJSON,"КаталогOutputCucumberJson");
Expand All @@ -616,9 +633,9 @@
КонецЕсли;

ВыполнитьСценарии = ПолучитьЗначениеПереданногоПараметра(СтрутктураJSON,"ВыполнитьСценарии");
Если ВыполнитьСценарии = "Истина" Тогда
Если ВыполнитьСценарии = Истина Тогда
ЗавершитьРаботуСистемы = ПолучитьЗначениеПереданногоПараметра(СтрутктураJSON,"ЗавершитьРаботуСистемы");
Если ЗавершитьРаботуСистемы = "Истина" Тогда
Если ЗавершитьРаботуСистемы = Истина Тогда
НадоЗавершитьРаботуСистемыПослеВыполненияВсехСценариев = Истина;
КонецЕсли;

Expand Down Expand Up @@ -2265,7 +2282,10 @@

Функция ПреобразоватьПутьСТочкамиКНормальномуПути(Знач ОригСтр="") Экспорт

Если ПустаяСтрока(ОригСтр) Тогда
Если ТипЗнч(ОригСтр) = Тип("Массив") Тогда
Для Сч = 0 По ОригСтр.Количество() - 1 Цикл
ОригСтр[Сч] = ПреобразоватьПутьСТочкамиКНормальномуПути(ОригСтр[Сч]);
КонецЦикла;
Возврат ОригСтр;
Copy link
Collaborator

Choose a reason for hiding this comment

The reason will be displayed to describe this comment to others. Learn more.

проверку на пустоту желательно бы оставить.

КонецЕсли;
Golovanoff marked this conversation as resolved.
Show resolved Hide resolved

Expand All @@ -2277,14 +2297,13 @@
ОригСтр = СтрЗаменить(ОригСтр, "$instrumentsRoot", ДополнитьСлешВПуть(КаталогИнструментов));
КонецЕсли;

ФайлПути = Новый Файл(ОригСтр);
Если Лев(ОригСтр, 1) = "." Тогда
//Для совместимости со старым кодом оставим пока КаталогИнструментов, правильней было-бы использовать КаталогПроекта
ФайлПути = Новый Файл(ДополнитьСлешВПуть(КаталогИнструментов) + ОригСтр);
Возврат ФайлПути.ПолноеИмя;
Golovanoff marked this conversation as resolved.
Show resolved Hide resolved
КонецЕсли;

Возврат ФайлПути.ПолноеИмя;


Возврат ОригСтр;
КонецФункции

Процедура ВыполнинтьСценарийАссинхронноТаймер()
Expand Down