Merge pull request #2 from khorevaa/feature/path-for-stats

fix: #1 Возможность загрузки статистики из нескольких файлов

Author: khorevaa

src/core/Классы/ГенераторОтчетаClover.os

@@ -11,6 +11,8 @@
 //
 Процедура Сформировать(Знач ДанныеСтатистикиПокрытия, Знач ПутьКОтчетуClover) Экспорт
 
+	Возврат;
+
 	ДанныеПокрытия = ДанныеСтатистикиПокрытия;
 
 	ТекущаяЗаписьXML = Новый ЗаписьXML;

src/core/Классы/ГенераторОтчетаCobertura.os

@@ -1,17 +1,20 @@
 Перем ТекущаяЗаписьXML;
 Перем ДатаГенерации;
-Перем ИмяПроекта;
 Перем ПутьКИсходникам;
+Перем ТаблицаСтатистикиПокрытия;
+Перем ТаблицаПакетов;
+Перем ТаблицаДанныхПоКлассам;
+Перем ТаблицаДанныхПоМетодамКлассов;
 
 // Выполняет формирование отчета
 //
 // Параметры:
-//   ДанныеСтатистикиПокрытия - Соответствие - Прочитанные данные статистики OScript
+//   ВходящаяТаблицаСтатистикиПокрытия - ТаблицаЗначений - Прочитанные данные статистики OScript
 //   ПутьКОтчету - Строка - Путь к файлу отчета
 //
-Процедура Сформировать(Знач ДанныеСтатистикиПокрытия, Знач ПутьКОтчету) Экспорт
+Процедура Сформировать(Знач ВходящаяТаблицаСтатистикиПокрытия, Знач ПутьКОтчету) Экспорт
 
-	ДанныеПокрытия = ДанныеСтатистикиПокрытия;
+	ТаблицаСтатистикиПокрытия = ВходящаяТаблицаСтатистикиПокрытия;
 
 	ТекущаяЗаписьXML = Новый ЗаписьXML;
 	ТекущаяЗаписьXML.ОткрытьФайл(ПутьКОтчету);
@@ -38,100 +41,146 @@
 
 	ТекущаяЗаписьXML.ЗаписатьНачалоЭлемента("packages");
 
-	ТекущаяЗаписьXML.ЗаписатьНачалоЭлемента("package");
+	ТаблицаПакетов = ТаблицаСтатистикиПокрытия.Скопировать();
+	ТаблицаПакетов.Свернуть("Пакет", "Покрыто, НеПокрыто");
 
-	ТекущаяЗаписьXML.ЗаписатьАтрибут("name", ".");
-	ТекущаяЗаписьXML.ЗаписатьАтрибут("complexity", "");
-	ТекущаяЗаписьXML.ЗаписатьАтрибут("branch-rate", "");
-	ТекущаяЗаписьXML.ЗаписатьАтрибут("line-rate", "");
+	РассчитатьПроцентПокрытияПоТаблице(ТаблицаПакетов, "Пакет");
 
-	ТекущаяЗаписьXML.ЗаписатьНачалоЭлемента("classes");
+	ТаблицаДанныхПоКлассам = ТаблицаСтатистикиПокрытия.Скопировать();
+	ТаблицаДанныхПоКлассам.Свернуть("Пакет, ПутьКФайлу, ИмяКласса", "Покрыто, НеПокрыто");
+	
+	РассчитатьПроцентПокрытияПоТаблице(ТаблицаДанныхПоКлассам, "Пакет, ПутьКФайлу, ИмяКласса");
 
-	ВсегоФайловВПакете = 0;
+	ТаблицаДанныхПоМетодамКлассов = ТаблицаСтатистикиПокрытия.Скопировать();
+	ТаблицаДанныхПоМетодамКлассов.Свернуть("Пакет, ПутьКФайлу, ИмяКласса, ИмяМетода", "Покрыто, НеПокрыто");
+	
+	РассчитатьПроцентПокрытияПоТаблице(ТаблицаДанныхПоМетодамКлассов, "Пакет, ПутьКФайлу, ИмяКласса, ИмяМетода");
 
-	Для Каждого Файл Из ДанныеПокрытия Цикл
+	ЗаписатьДанныеПакетов();
 
-		ДанныеФайла = Файл.Значение;
+	ТекущаяЗаписьXML.ЗаписатьКонецЭлемента(); // packages
 
-		ПутьКФайлу = ДанныеФайла.Получить("#path");
+	ТекущаяЗаписьXML.ЗаписатьКонецЭлемента(); // coverage
 
-		ВсегоФайловВПакете = ВсегоФайловВПакете + 1;
+	ТекущаяЗаписьXML.Закрыть();
 
-		ФайлПокрытия = Новый Файл(ПутьКФайлу);
-		ИмяФайла = ФайлПокрытия.Имя;
+КонецПроцедуры
 
-		ТекущаяЗаписьXML.ЗаписатьНачалоЭлемента("class");
-		ТекущаяЗаписьXML.ЗаписатьАтрибут("name", ИмяФайла);
-		ТекущаяЗаписьXML.ЗаписатьАтрибут("filename", ПутьКФайлу);
-		ТекущаяЗаписьXML.ЗаписатьАтрибут("complexity", "");
-		ТекущаяЗаписьXML.ЗаписатьАтрибут("branch-rate", "");
-		ТекущаяЗаписьXML.ЗаписатьАтрибут("line-rate", "");
-		ТекущаяЗаписьXML.ЗаписатьАтрибут("condition-coverage", "100%");
+Процедура РассчитатьПроцентПокрытияПоТаблице(ТаблицаРасчета, Знач НаборРазрезовРасчета)
 
-		ВсегоЭлементов = 0;
-		ВсегоПокрытоЭлементов = 0;
+	ТаблицаРасчета.Колонки.Добавить("ПроцентПокрытияСтрок");
+	// ПроцентПокрытияСтрок = (СтрокаПакета.Покрыто / (СтрокаПакета.Покрыто + СтрокаПакета.НеПокрыто))*100;
+	// TODO: Реализовать расчет процентов	
+КонецПроцедуры
 
-		ТекущаяЗаписьXML.ЗаписатьНачалоЭлемента("methods");
-		ТекущаяЗаписьXML.ЗаписатьКонецЭлемента(); // sources
 
-		ТекущаяЗаписьXML.ЗаписатьНачалоЭлемента("lines");
+Процедура ЗаписатьДанныеПакетов()
 
-		Для Каждого КлючИЗначение Из ДанныеФайла Цикл
+	Для каждого СтрокаПакета Из ТаблицаПакетов Цикл
+		
+		ТекущаяЗаписьXML.ЗаписатьНачалоЭлемента("package");
+		ТекущаяЗаписьXML.ЗаписатьАтрибут("name", СтрокаПакета.Пакет);
+		ТекущаяЗаписьXML.ЗаписатьАтрибут("complexity", "");
+		ТекущаяЗаписьXML.ЗаписатьАтрибут("branch-rate", "");
+		ТекущаяЗаписьXML.ЗаписатьАтрибут("line-rate", Строка(СтрокаПакета.ПроцентПокрытияСтрок));
+		
+		ТекущаяЗаписьXML.ЗаписатьНачалоЭлемента("classes");
 
-			ИмяМетода = КлючИЗначение.Ключ;
+		ЗаписатьДанныеКлассов(СтрокаПакета.Пакет);
 
-			Если ИмяМетода = "#path" Тогда
-				Продолжить;
-			КонецЕсли;
+		ТекущаяЗаписьXML.ЗаписатьКонецЭлемента(); // classes
+		ТекущаяЗаписьXML.ЗаписатьКонецЭлемента(); // package
 
-			ДанныеПроцедуры = КлючИЗначение.Значение;
-			ВсегоЭлементовМетода = 0;
+	КонецЦикла;
 
-			ПокрытыхСтрокВМетоде = 0;
+КонецПроцедуры
 
-			Для Каждого ДанныеСтроки Из ДанныеПроцедуры Цикл
+Процедура ЗаписатьДанныеКлассов(ИмяПакета)
+	
+	Отбор = Новый Структура("Пакет", ИмяПакета);
+	МассивСтрок = ТаблицаДанныхПоКлассам.НайтиСтроки(Отбор);
 
-				ТекущаяЗаписьXML.ЗаписатьНачалоЭлемента("line");
+	Для каждого СтрокаКласса Из МассивСтрок Цикл
+	
+		// ПроцентПокрытияСтрок = (СтрокаПакета.Покрыто / (СтрокаПакета.Покрыто + СтрокаПакета.НеПокрыто))*100;
+		ТекущаяЗаписьXML.ЗаписатьНачалоЭлемента("class");
+		ТекущаяЗаписьXML.ЗаписатьАтрибут("name", СтрокаКласса.ИмяКласса);
+		ТекущаяЗаписьXML.ЗаписатьАтрибут("filename", СтрокаКласса.ПутьКФайлу);
+		ТекущаяЗаписьXML.ЗаписатьАтрибут("complexity", "");
+		ТекущаяЗаписьXML.ЗаписатьАтрибут("branch-rate", "");
+		ТекущаяЗаписьXML.ЗаписатьАтрибут("line-rate", Строка(СтрокаКласса.ПроцентПокрытияСтрок));
+		
+		ТекущаяЗаписьXML.ЗаписатьНачалоЭлемента("methods");
 
-				ТекущаяЗаписьXML.ЗаписатьАтрибут("number", ДанныеСтроки.Ключ);
-				ТекущаяЗаписьXML.ЗаписатьАтрибут("branch", "false");
-				ТекущаяЗаписьXML.ЗаписатьАтрибут("condition-coverage", "100%");
+		ЗаписатьДанныеМетодов(СтрокаКласса.Пакет, СтрокаКласса.ИмяКласса);
 
-				Покрыто = Число(ДанныеСтроки.Значение.Получить("count")) > 0;
-				ТекущаяЗаписьXML.ЗаписатьАтрибут("hits", ДанныеСтроки.Значение.Получить("count"));
+		ТекущаяЗаписьXML.ЗаписатьКонецЭлемента(); // methods
 
-				ТекущаяЗаписьXML.ЗаписатьКонецЭлемента(); // lineToCover
+		ТекущаяЗаписьXML.ЗаписатьНачалоЭлемента("lines");
 
-				Если Покрыто Тогда
-					ПокрытыхСтрокВМетоде = ПокрытыхСтрокВМетоде + 1;
-				КонецЕсли;
+		ЗаписатьДанныеСтрок(СтрокаКласса.Пакет, СтрокаКласса.ИмяКласса);
 
-				ВсегоЭлементовМетода = ВсегоЭлементовМетода + 1;
+		ТекущаяЗаписьXML.ЗаписатьКонецЭлемента(); // lines
 
-			КонецЦикла;
+		ТекущаяЗаписьXML.ЗаписатьКонецЭлемента(); // class
 
+	КонецЦикла;
 
-			ВсегоЭлементов = ВсегоЭлементов + ВсегоЭлементовМетода;
+КонецПроцедуры
 
-			ВсегоПокрытоЭлементов = ВсегоПокрытоЭлементов + ПокрытыхСтрокВМетоде;
+Процедура ЗаписатьДанныеМетодов(Знач ИмяПакета, Знач ИмяКласса)
+	
+	Отбор = Новый Структура("Пакет, ИмяКласса", ИмяПакета, ИмяКласса);
+	МассивСтрок = ТаблицаДанныхПоМетодамКлассов.НайтиСтроки(Отбор);
+
+	Для каждого СтрокаМетода Из МассивСтрок Цикл
+		
+		Если СтрокаМетода.ИмяМетода = "$entry" Тогда
+			Продолжить;
+		КонецЕсли;
+		// ПроцентПокрытияСтрок = (СтрокаПакета.Покрыто / (СтрокаПакета.Покрыто + СтрокаПакета.НеПокрыто))*100;
+		ТекущаяЗаписьXML.ЗаписатьНачалоЭлемента("method");
+		ТекущаяЗаписьXML.ЗаписатьАтрибут("name", СтрокаМетода.ИмяМетода);
+		ТекущаяЗаписьXML.ЗаписатьАтрибут("filename", СтрокаМетода.ПутьКФайлу);
+		ТекущаяЗаписьXML.ЗаписатьАтрибут("complexity", "");
+		ТекущаяЗаписьXML.ЗаписатьАтрибут("branch-rate", "");
+		ТекущаяЗаписьXML.ЗаписатьАтрибут("line-rate", Строка(СтрокаМетода.ПроцентПокрытияСтрок));
+		
+		ТекущаяЗаписьXML.ЗаписатьНачалоЭлемента("lines");
 
-		КонецЦикла;
+		ЗаписатьДанныеСтрок(СтрокаМетода.Пакет, СтрокаМетода.ИмяКласса, СтрокаМетода.ИмяМетода);
 
 		ТекущаяЗаписьXML.ЗаписатьКонецЭлемента(); // lines
-		ТекущаяЗаписьXML.ЗаписатьКонецЭлемента(); // class
 
+		ТекущаяЗаписьXML.ЗаписатьКонецЭлемента(); // method
 
 	КонецЦикла;
 
-	ТекущаяЗаписьXML.ЗаписатьКонецЭлемента(); // classes
+КонецПроцедуры
 
-	ТекущаяЗаписьXML.ЗаписатьКонецЭлемента(); // package
+Процедура ЗаписатьДанныеСтрок(Знач ИмяПакета, Знач ИмяКласса, Знач ИмяМетода = Неопределено)
+	
+	Отбор = Новый Структура("Пакет, ИмяКласса", ИмяПакета, ИмяКласса);
+	
+	Если ЗначениеЗаполнено(ИмяМетода) Тогда
+		Отбор.Вставить("ИмяМетода", ИмяМетода);
+	КонецЕсли;
 
-	ТекущаяЗаписьXML.ЗаписатьКонецЭлемента(); // packages
+	МассивСтрок = ТаблицаСтатистикиПокрытия.НайтиСтроки(Отбор);
 
-	ТекущаяЗаписьXML.ЗаписатьКонецЭлемента(); // coverage
+	Для каждого СтрокаМодуля Из МассивСтрок Цикл
+		
+		ТекущаяЗаписьXML.ЗаписатьНачалоЭлемента("line");
 
-	ТекущаяЗаписьXML.Закрыть();
+		ТекущаяЗаписьXML.ЗаписатьАтрибут("number", СтрокаМодуля.СтрокаМодуля);
+		ТекущаяЗаписьXML.ЗаписатьАтрибут("branch", "false");
+		ТекущаяЗаписьXML.ЗаписатьАтрибут("condition-coverage", "100%");
+
+		ТекущаяЗаписьXML.ЗаписатьАтрибут("hits", СтрокаМодуля.КоличествоВызовов);
+
+		ТекущаяЗаписьXML.ЗаписатьКонецЭлемента(); // line
+
+	КонецЦикла;
 
 КонецПроцедуры
 

src/core/Классы/ГенераторОтчетаGenericCoverage.os

@@ -2,51 +2,51 @@
 // Выполняет формирование отчета
 //
 // Параметры:
-//   ДанныеСтатистикиПокрытия - Соответствие - Прочитанные данные статистики OScript
+//   ТаблицаСтатистикиПокрытия - ТаблицаЗначений - Прочитанные данные статистики OScript
 //   ПутьКВыходномуФайлу - Строка - Путь к файлу отчета
 //
-Процедура Сформировать(Знач ДанныеСтатистикиПокрытия, ПутьКВыходномуФайлу) Экспорт
+Процедура Сформировать(Знач ТаблицаСтатистикиПокрытия, Знач ПутьКВыходномуФайлу) Экспорт
 
-	ДанныеПокрытия = ДанныеСтатистикиПокрытия;
+	ТаблицаСтатистикиПокрытия.Сортировать("ПутьКФайлу, ИмяМетода, СтрокаМодуля");
 
 	ЗаписьXML = Новый ЗаписьXML;
 	ЗаписьXML.ОткрытьФайл(ПутьКВыходномуФайлу);
 	ЗаписьXML.ЗаписатьОбъявлениеXML();
 	ЗаписьXML.ЗаписатьНачалоЭлемента("coverage");
 	ЗаписьXML.ЗаписатьАтрибут("version", "1");
 
-	Для Каждого Файл Из ДанныеПокрытия Цикл
-		
-		ДанныеФайла = Файл.Значение;
-
-		ПутьКФайлу = ДанныеФайла.Получить("#path");
+	ТекущийПутьКФайлу = "";
 
-		ЗаписьXML.ЗаписатьНачалоЭлемента("file");
-		ЗаписьXML.ЗаписатьАтрибут("path", ПутьКФайлу);
+	Для Каждого СтрокаПокрытия Из ТаблицаСтатистикиПокрытия Цикл
 
-		Для Каждого КлючИЗначение Из ДанныеФайла Цикл
+		ПутьКФайлу = СтрокаПокрытия.ПутьКФайлу;
+
+		Если Не ПутьКФайлу = ТекущийПутьКФайлу Тогда
 
-			Если КлючИЗначение.Ключ = "#path" Тогда
-				Продолжить;
+			Если Не ПустаяСтрока(ТекущийПутьКФайлу) Тогда
+				ЗаписьXML.ЗаписатьКонецЭлемента();
 			КонецЕсли;
+
+			ЗаписьXML.ЗаписатьНачалоЭлемента("file");
+			ЗаписьXML.ЗаписатьАтрибут("path", ПутьКФайлу);
+			ТекущийПутьКФайлу = ПутьКФайлу;
 
-			ДанныеПроцедуры = КлючИЗначение.Значение;
-			Для Каждого ДанныеСтроки Из ДанныеПроцедуры Цикл
-				
-				ЗаписьXML.ЗаписатьНачалоЭлемента("lineToCover");
-				
-				ЗаписьXML.ЗаписатьАтрибут("lineNumber", ДанныеСтроки.Ключ);
-				Покрыто = Число(ДанныеСтроки.Значение.Получить("count")) > 0;
-				ЗаписьXML.ЗаписатьАтрибут("covered", Формат(Покрыто, "БИ=true; БЛ=false"));
-				
-				ЗаписьXML.ЗаписатьКонецЭлемента(); // lineToCover
-			КонецЦикла;
-		КонецЦикла;
+		КонецЕсли;
+	
+		ЗаписьXML.ЗаписатьНачалоЭлемента("lineToCover");
 
-		ЗаписьXML.ЗаписатьКонецЭлемента(); // file
+		ЗаписьXML.ЗаписатьАтрибут("lineNumber", СтрокаПокрытия.СтрокаМодуля);
+		Покрыто = СтрокаПокрытия.КоличествоВызовов > 0;
+		ЗаписьXML.ЗаписатьАтрибут("covered", Формат(Покрыто, "БИ=true; БЛ=false"));
+		
+		ЗаписьXML.ЗаписатьКонецЭлемента(); // lineToCover
 
 	КонецЦикла;
 
+	Если Не ПустаяСтрока(ТекущийПутьКФайлу) Тогда
+		ЗаписьXML.ЗаписатьКонецЭлемента(); // file
+	КонецЕсли;
+
 	ЗаписьXML.ЗаписатьКонецЭлемента(); // coverage
 	ЗаписьXML.Закрыть();