Merged release/1.1 into master

Author: artbear

features/opm-build.feature

@@ -0,0 +1,17 @@
+# language: ru
+
+Функционал: Проверка сборки продукта
+    Как Пользователь
+    Я хочу автоматически проверять сборку моего продукта
+    Чтобы гарантировать возможность установку моего продукта у пользователей
+
+Контекст: Отключение отладки в логах
+    Допустим Я выключаю отладку лога с именем "oscript.lib.commands"
+    И Я очищаю параметры команды "opm" в контексте
+
+Сценарий: Выполнение команды без параметров
+    Когда Я добавляю параметр "build ." для команды "opm"
+    И Я выполняю команду "opm"
+    Тогда Вывод команды "opm" содержит "Сборка пакета завершена"
+    И Вывод команды "opm" не содержит "Внешнее исключение"
+    И Код возврата команды "opm" равен 0

packagedef

@@ -1,6 +1,6 @@
 
 Описание.Имя("1commands")
-		.Версия("1.0")
+		.Версия("1.1")
 		.ЗависитОт("logos")
 		.ЗависитОт("asserts")
 		.ЗависитОт("tempfiles")

src/Команда.os

@@ -311,17 +311,29 @@
 		Если ПериодОпросаВМиллисекундах <> 0 Тогда
 			Приостановить(ПериодОпросаВМиллисекундах);
 		КонецЕсли;
-		Пока НЕ Процесс.Завершен ИЛИ Процесс.ПотокВывода.ЕстьДанные Цикл
+		Пока НЕ Процесс.Завершен ИЛИ Процесс.ПотокВывода.ЕстьДанные ИЛИ Процесс.ПотокОшибок.ЕстьДанные Цикл
 			Если ПериодОпросаВМиллисекундах <> 0 Тогда
 				Приостановить(ПериодОпросаВМиллисекундах);
 			КонецЕсли;
 
 			ОчереднаяСтрокаВывода = Процесс.ПотокВывода.Прочитать();
-			ОчереднаяСтрокаВывода = СтрЗаменить(ОчереднаяСтрокаВывода, Символы.ВК, "");
-			Если ОчереднаяСтрокаВывода <> "" Тогда
-				Лог.Отладка("%2%1", ОчереднаяСтрокаВывода, Символы.ПС);
-				ЗаписьXML.ЗаписатьБезОбработки(ОчереднаяСтрокаВывода);
-			КонецЕсли;
+			ОчереднаяСтрокаОшибок = Процесс.ПотокОшибок.Прочитать();
+
+			Если Не ПустаяСтрока(ОчереднаяСтрокаВывода) Тогда
+				ОчереднаяСтрокаВывода = СтрЗаменить(ОчереднаяСтрокаВывода, Символы.ВК, "");
+				Если ОчереднаяСтрокаВывода <> "" Тогда
+					Лог.Отладка("%2%1", ОчереднаяСтрокаВывода, Символы.ПС);
+					ЗаписьXML.ЗаписатьБезОбработки(ОчереднаяСтрокаВывода);
+				КонецЕсли;
+            КонецЕсли;
+
+            Если Не ПустаяСтрока(ОчереднаяСтрокаОшибок) Тогда
+				ОчереднаяСтрокаОшибок = СтрЗаменить(ОчереднаяСтрокаОшибок, Символы.ВК, "");
+				Если ОчереднаяСтрокаОшибок <> "" Тогда
+					Лог.Отладка("%2%1", ОчереднаяСтрокаОшибок, Символы.ПС);
+					ЗаписьXML.ЗаписатьБезОбработки(ОчереднаяСтрокаОшибок);
+				КонецЕсли;
+            КонецЕсли;
 
 		КонецЦикла;
 

src/КомандныйФайл.os

@@ -11,6 +11,7 @@
 Перем ЭтоWindows;
 Перем Лог;
 Перем НемедленнныйВывод;
+Перем КодировкаВывода;
 
 // Получить имя лога продукта
 //
@@ -40,6 +41,25 @@
     Возврат Команда.ПолучитьВывод();
 КонецФункции
 
+// Установить кодировку вывода для выполнения команды.
+//
+//  Параметры:
+//   Строка, Неопределено - кодировка вывода
+//		Если Неопределено, кодировка сбрасывается и используется значение по умолчанию от операционной системы
+//
+Процедура УстановитьКодировкуВывода(Знач НоваяКодировкаВывода) Экспорт
+    КодировкаВывода = НоваяКодировкаВывода;
+КонецПроцедуры
+
+// Получить кодировка вывода выполняемой команды.
+//
+//  Возвращаемое значение:
+//   Строка - кодировка вывода команды
+//
+Функция ПолучитьКодировкуВывода() Экспорт
+    Возврат КодировкаВывода;
+КонецФункции
+
 // Получить код возврата выполненной команды.
 //
 //  Возвращаемое значение:
@@ -102,7 +122,7 @@
 	Закрыть();
 
 	Команда = Новый Команда;
-	Команда.УстановитьКодировкуВывода(КодировкаТекста.OEM);
+	Команда.УстановитьКодировкуВывода(КодировкаВывода);
 	Команда.ПоказыватьВыводНемедленно(НемедленнныйВывод);
 
 	Если ЭтоWindows Тогда 
@@ -202,6 +222,7 @@
 
 	ТекстФайла = "";
 	НемедленнныйВывод = Истина;
+	КодировкаВывода = КодировкаТекста.OEM;
 
 	Создать();
 КонецПроцедуры