Изменена проверка процессора

Author: leobrn

src/core/Модули/ПроверкаПроцессора.os

@@ -6,28 +6,36 @@
 
 	Лог = Мониторинг.Лог();
 	Лог.Информация("Начало проверки процессора");
-
+	
 	Порог = ПараметрыПроверки["Порог"];
-	ДанныеПроцессора = Мониторинг.ДанныеСистемы("SELECT * FROM Win32_Processor");
-
+	ДанныеПроцессора = Мониторинг.ДанныеСистемы("SELECT LoadPercentage FROM Win32_Processor");
+	
+	ОбщаяЗагрузка = 0;
+	КоличествоПроцессоров = 0;
+	
 	Для Каждого Элемент Из ДанныеПроцессора Цикл
 
-		ПроцентЗагрузки = Элемент.LoadPercentage;
+		ОбщаяЗагрузка = ОбщаяЗагрузка + Элемент.LoadPercentage;
+		КоличествоПроцессоров = КоличествоПроцессоров + 1;
 
-		Если ПроцентЗагрузки > Порог Тогда
-		
-			Лог.Ошибка("Загрузка процессора %1%%, что превышает порог %2%%.",
-				ПроцентЗагрузки, Порог);
+	КонецЦикла;
+
+	Если КоличествоПроцессоров > 0 Тогда
 
+		СредняяЗагрузка = ОбщаяЗагрузка / КоличествоПроцессоров;
+	
+		Если СредняяЗагрузка > Порог Тогда
+			Лог.Ошибка("Средняя загрузка процессора %1%%, что превышает порог %2%%",
+				СредняяЗагрузка, Порог);
 		Иначе
-			
-			Лог.Информация("Загрузка процессора %1%%",
-				ПроцентЗагрузки);
-		
+			Лог.Информация("Средняя загрузка процессора %1%%",
+				СредняяЗагрузка);
 		КонецЕсли;
-
-	КонецЦикла;
-
+		
+	Иначе
+		Лог.Ошибка("Не удалось получить данные о загрузке процессора");
+	КонецЕсли;
+	
 	Лог.Информация("Завершение проверки процессора");
-
-КонецПроцедуры
+	
+КонецПроцедуры