улучш: Небольшие тесты на построение путя

Author: Антон Степанов

src/Классы/Путь1СПоМетаданным.os

@@ -15,12 +15,29 @@
 
 #Область ОбработчикиСобытий
 
-Процедура ПриСозданииОбъекта(Знач пКаталогИсходников)
+// Создание класса
+// пКаталогИсходников - Строка - каталог исходников (src, а не каталог проекта)
+// ТипВыгрузки - Строка - {"ЕДТ", "Конфигуратор"} принудительное определение выгрузки.
+Процедура ПриСозданииОбъекта(Знач пКаталогИсходников, Знач ТипВыгрузки = "")
 
 	_КаталогИсходников = пКаталогИсходников;
 	_лог = Логирование.ПолучитьЛог(ИмяЛога());
 
-	ОпределитьТипВыгрузки();
+	Если ТипВыгрузки = "ЕДТ" Тогда
+		
+		_ЭтоВыгрузкаЕДТ = Истина;
+		_ЭтоВыгрузкаКонфигуратора = Ложь;
+
+	ИначеЕсли ТипВыгрузки = "Конфигуратор" Тогда
+
+		_ЭтоВыгрузкаЕДТ = Ложь;
+		_ЭтоВыгрузкаКонфигуратора = Истина;
+		
+	Иначе
+		
+		ОпределитьТипВыгрузки();
+
+	КонецЕсли;
 
 	_КэшПутей = Новый Соответствие;
 

tests/Путь1СПоМетаданным_test.os

@@ -3,12 +3,14 @@
 
 Функция ПолучитьСписокТестов(Знач Тестирование) Экспорт
 
-	юТест = Тестирование;
-	
 	ИменаТестов = Новый Массив;
 
 	ИменаТестов.Добавить("ТестДолжен_ПроверитьОбъекты");
 	ИменаТестов.Добавить("ТестДолжен_ПроверитьМодули");
+	ИменаТестов.Добавить("ТестДолжен_ПроверитьПутьКОбъекту_ОбщийМодуль_ЕДТ");
+	ИменаТестов.Добавить("ТестДолжен_ПроверитьПутьКОбъекту_ОбщийМодуль_Конфигуратор");
+	ИменаТестов.Добавить("ТестДолжен_ПроверитьПутьКОбъекту_Справочник_ЕДТ");
+	ИменаТестов.Добавить("ТестДолжен_ПроверитьПутьКОбъекту_Справочник_Конфигуратор");
 
 	Возврат ИменаТестов;
 
@@ -32,6 +34,46 @@
 
 КонецПроцедуры
 
+Процедура ТестДолжен_ПроверитьПутьКОбъекту_ОбщийМодуль_ЕДТ() Экспорт
+	
+	ГенераторПутей = Новый Путь1СПоМетаданным("src", "ЕДТ");
+
+	Путь = ГенераторПутей.Путь("ОбщийМодуль.ОбщегоНазначения");
+
+	Ожидаем.Что(Путь).Равно("src\CommonModules\ОбщегоНазначения\ОбщегоНазначения.mdo");
+
+КонецПроцедуры
+
+Процедура ТестДолжен_ПроверитьПутьКОбъекту_ОбщийМодуль_Конфигуратор() Экспорт
+	
+	ГенераторПутей = Новый Путь1СПоМетаданным("src", "Конфигуратор");
+
+	Путь = ГенераторПутей.Путь("ОбщийМодуль.ОбщегоНазначения");
+
+	Ожидаем.Что(Путь).Равно("src\CommonModules\ОбщегоНазначения.xml");
+
+КонецПроцедуры
+
+Процедура ТестДолжен_ПроверитьПутьКОбъекту_Справочник_ЕДТ() Экспорт
+	
+	ГенераторПутей = Новый Путь1СПоМетаданным("src", "ЕДТ");
+
+	Путь = ГенераторПутей.Путь("Catalog.ШаблоныАнкет");
+
+	Ожидаем.Что(Путь).Равно("src\Catalogs\ШаблоныАнкет\ШаблоныАнкет.mdo");
+
+КонецПроцедуры
+
+Процедура ТестДолжен_ПроверитьПутьКОбъекту_Справочник_Конфигуратор() Экспорт
+	
+	ГенераторПутей = Новый Путь1СПоМетаданным("src", "Конфигуратор");
+
+	Путь = ГенераторПутей.Путь("Catalog.ШаблоныАнкет");
+
+	Ожидаем.Что(Путь).Равно("src\Catalogs\ШаблоныАнкет.xml");
+
+КонецПроцедуры
+
 Функция ИсходникиСНесколькимиПоддержками()
 
 	Возврат "./tests/src_base";