Учет нереализованной функциональности

Author: d-hurricane

tests/fixtures/yaml-test-suite/not-implemented.txt

@@ -0,0 +1 @@
+2AUY

tests/ТестыСторонние.os

@@ -26,6 +26,10 @@
 	ТестовыеДанные.Колонки.Добавить("Описание");
 	ТестовыеДанные.Колонки.Добавить("Категория");
 
+	ПропускаемыеКаталоги = ТестовыеУтилиты.ПрочитатьТекстФайла(
+		ОбъединитьПути(ПутьКТестовымДанным, "not-implemented.txt")
+	);
+
 	НайденныеФайлы = НайтиФайлы(ПутьКТестовымДанным, "===", Истина);
 	Для Каждого Файл Из НайденныеФайлы Цикл
 
@@ -39,6 +43,10 @@
 			НоваяСтрока.Категория = КатегорияНедопустимыхДанных;
 		КонецЕсли;
 
+		Если СтрНайти(ПропускаемыеКаталоги, НоваяСтрока.Каталог) Тогда
+			НоваяСтрока.Категория = КатегорияНереализованнойФункциональности;
+		КонецЕсли;
+
 	КонецЦикла;
 
 КонецПроцедуры

utils/ОбновлениеСтороннихТестов.os

@@ -76,6 +76,43 @@
 
 КонецПроцедуры
 
+Функция ПутьКФайлуНереализованных()
+
+	Возврат ОбъединитьПути(ПутьККаталогуТестов(), "not-implemented.txt");
+
+КонецФункции
+
+Функция ПолучитьТестыНереализованнойФункциональности()
+
+	ПутьКФайлу = ПутьКФайлуНереализованных();
+	Если Не ФС.ФайлСуществует(ПутьКФайлу) Тогда
+		Возврат "";
+	КонецЕсли;
+
+	ЧтениеТекста = Новый ЧтениеТекста(ПутьКФайлу, "UTF-8");
+	СписокНереализованных = ЧтениеТекста.Прочитать();
+	ЧтениеТекста.Закрыть();
+
+	Логгер.Информация("Получены тесты нереализованной функциональности: %1",
+		СтрЧислоСтрок(СокрЛП(СписокНереализованных)));
+
+	Возврат СписокНереализованных;
+
+КонецФункции
+
+Процедура ЗаписатьТестыНереализованнойФункциональности(СписокНереализованных)
+
+	ПутьКФайлу = ПутьКФайлуНереализованных();
+
+	ЗаписьТекста = Новый ЗаписьТекста(ПутьКФайлу, "UTF-8");
+	ЗаписьТекста.Записать(СписокНереализованных);
+	ЗаписьТекста.Закрыть();
+
+	Логгер.Информация("Обновлены тесты нереализованной функциональности: %1", 
+		СтрЧислоСтрок(СокрЛП(СписокНереализованных)));
+
+КонецПроцедуры
+
 Процедура ПолучитьИРаспаковатьАрхив(ЦелевойКаталог, АдресАрхива)
 
 	Логгер.Информация("Получение архива с тестами: %1", АдресАрхива);
@@ -131,11 +168,14 @@
 		ЗавершитьРаботу(0);
 	КонецЕсли;
 
+	Нереализованные = ПолучитьТестыНереализованнойФункциональности();
+
 	КаталогДляРаспаковки = ПутьККаталогуТестов();
 	ФС.ОбеспечитьПустойКаталог(КаталогДляРаспаковки);
 	ПолучитьИРаспаковатьАрхив(КаталогДляРаспаковки, АктуальныйТег.Адрес);
 	УдалитьНеактуальныеФайлы(КаталогДляРаспаковки);
 
+	ЗаписатьТестыНереализованнойФункциональности(Нереализованные);
 	ЗаписатьСостояниеТестов(АктуальныйТег.Имя);
 
 КонецПроцедуры