Финальная универсальная версия запускателя тестов и фич

Author: artbear

.gitignore

@@ -8,3 +8,4 @@ src/oscript.cfg
 src/cmd/oscript\.cfg
 exec.log
 test-reports/tests.xml
+tests.xml

tasks/test.os

@@ -1,86 +1,82 @@
+//заменить на путь к исходникам своей библиотеки, например, #Использовать ".."
+#Использовать "../src/core"
 #Использовать 1bdd
 #Использовать 1testrunner
-#Использовать fs
 
 Функция ПрогнатьТесты()
-	
-	Тестер = Новый Тестер;
 
-	ПутьКТестам = ОбъединитьПути(ТекущийСценарий().Каталог, "..", "tests");
-	ПутьКОтчетуJUnit = ОбъединитьПути(ТекущийСценарий().Каталог, "..", "tests-reports");
+	Тестер = Новый Тестер;
 
-	ФС.ОбеспечитьПустойКаталог(ПутьКОтчетуJUnit);
+	ПутьКТестам = "tests";
+	ПутьКОтчетуJUnit = ".";
 
-	КаталогТестов = Новый Файл(ПутьКТестам);
-	Если Не КаталогТестов.Существует() Тогда
-		Сообщить(СтрШаблон("Не найден каталог тестов %1", ПутьКТестам));
-		Возврат Истина;
-	КонецЕсли;
+	ПутьКОтчетуJUnit = Новый Файл(ПутьКОтчетуJUnit).ПолноеИмя;
 
 	РезультатТестирования = Тестер.ТестироватьКаталог(
-		КаталогТестов,
+		Новый Файл(ПутьКТестам),
 		Новый Файл(ПутьКОтчетуJUnit)
 	);
 
 	Успешно = РезультатТестирования = 0;
-	
+
 	Возврат Успешно;
 КонецФункции // ПрогнатьТесты()
 
-Функция ПрогнатьФичи()
-	
-	ПутьОтчетаJUnit = "./bdd-log.xml";
+Функция ПрогнатьФичи(Знач ПутьФич = "features", Знач ПутьОтчетаJUnit = "./bdd-log.xml")
 
-	КаталогФич = ОбъединитьПути(".", "features");
+	КаталогФич = ОбъединитьПути(".", ПутьФич);
 
 	Файл_КаталогФич = Новый Файл(КаталогФич);
-	Если Не Файл_КаталогФич.Существует() Тогда
-		Сообщить(СтрШаблон("Не найден каталог фич %1", КаталогФич));
-		Возврат Истина;
-	КонецЕсли;
 
 	ИсполнительБДД = Новый ИсполнительБДД;
 	РезультатыВыполнения = ИсполнительБДД.ВыполнитьФичу(Файл_КаталогФич, Файл_КаталогФич);
 	ИтоговыйРезультатВыполнения = ИсполнительБДД.ПолучитьИтоговыйСтатусВыполнения(РезультатыВыполнения);
 
 	СтатусВыполнения = ИсполнительБДД.ВозможныеСтатусыВыполнения().НеВыполнялся;
 	Если РезультатыВыполнения.Строки.Количество() > 0 Тогда
-		
+
 		СтатусВыполнения = ИсполнительБДД.ПолучитьИтоговыйСтатусВыполнения(РезультатыВыполнения);
-		
+
+		ИсполнительБДД.ВывестиИтоговыеРезультатыВыполнения(РезультатыВыполнения, Файл_КаталогФич.ЭтоКаталог());
 	КонецЕсли;
 
 	ГенераторОтчетаJUnit = Новый ГенераторОтчетаJUnit;
 	ГенераторОтчетаJUnit.Сформировать(РезультатыВыполнения, СтатусВыполнения, ПутьОтчетаJUnit);
 
-	Сообщить(СтрШаблон("Результат прогона фич <%1>
-	|", ИтоговыйРезультатВыполнения));
+	Сообщить(СтрШаблон("Результат прогона фич <%1>. Путь %2
+	|", ИтоговыйРезультатВыполнения, ПутьФич));
 
 	Возврат ИтоговыйРезультатВыполнения <> ИсполнительБДД.ВозможныеСтатусыВыполнения().Сломался;
 КонецФункции // ПрогнатьФичи()
 
+// основной код
+
+ТекКаталог = ТекущийКаталог();
+
 Попытка
 	ТестыПрошли = ПрогнатьТесты();
-
 Исключение
 	ТестыПрошли = Ложь;
 	Сообщить(СтрШаблон("Тесты через 1testrunner выполнены неудачно
-	|%1", ПодробноеПредставлениеОшибки(ИнформацияОбОшибке())));
+	|%1
+	|%2", ПодробноеПредставлениеОшибки(ИнформацияОбОшибке()), ОписаниеОшибки()));
 КонецПопытки;
 
-ФичиПрошли = Истина;
+УстановитьТекущийКаталог(ТекКаталог);
 
 Попытка
-	ФичиПрошли = ПрогнатьФичи();
+	ФичиПрошли = ПрогнатьФичи("features");
 Исключение
 	ФичиПрошли = Ложь;
 	Сообщить(СтрШаблон("Тесты поведения через 1bdd выполнены неудачно
 	|%1", ПодробноеПредставлениеОшибки(ИнформацияОбОшибке())));
 КонецПопытки;
 
-Если Не ТестыПрошли Или Не ФичиПрошли Тогда
+Сообщить(СтрШаблон("Результат прогона тестов <%1>
+|", ТестыПрошли));
+Сообщить(СтрШаблон("Результат прогона основных фич <%1>
+|", ФичиПрошли));
+
+Если НЕ ТестыПрошли Или НЕ ФичиПрошли Тогда
 	ВызватьИсключение "Тестирование завершилось неудачно!";
-Иначе
-	Сообщить(СтрШаблон("Результат прогона тестов <%1>
-	|", ТестыПрошли));
-КонецЕсли;
+КонецЕсли;