Merge branch 'release/0.9'

artbear · artbear · commit 4e1bcff454d0 · 2017-02-12T13:34:20.000+03:00
diff --git a/.gitignore b/.gitignore
@@ -1 +1,2 @@
-exec.log
+exec.log
+bdd-log.xml
diff --git a/.vscode/tasks.json b/.vscode/tasks.json
@@ -56,6 +56,18 @@
                 }
             }
         },
+        {
+            "taskName": "Opm: package build",
+            "args": [
+                 "opm",
+                "build",
+                "${workspaceRoot}"
+            ],
+            "echoCommand": true,
+            "showOutput": "always",
+            "suppressTaskName": true,
+            "isBuildCommand": false
+        },
         {
             "taskName": "Exec all features",
             "args": [
diff --git a/appveyor-runtests.cmd b/appveyor-runtests.cmd
@@ -8,17 +8,18 @@ set OSCRIPT=%ProgramFiles(x86)%\OneScript
 @echo .
 @echo .
 
-call 1bdd features -junit-out ./bdd-log.xml
+@rem call 1bdd features -junit-out ./bdd-log.xml
+@call opm test
 
 @if %ERRORLEVEL%==2 GOTO good_exit_bdd
 @if %ERRORLEVEL%==0 GOTO good_exit_bdd
 
-dir .\tests\
+dir .
 
 exit /B 1
 
 :good_exit_bdd
 
-dir .\tests\
+dir .
 
 exit /B 0
diff --git a/appveyor.yml b/appveyor.yml
@@ -42,9 +42,9 @@ install:
     
     opm list
 
-    opm install 1testrunner
-    
     opm install 1commands
+
+    opm install 1testrunner    
     
     opm install 1bdd
 
diff --git a/features/step_definitions/ВыполнениеКоманды.os b/features/step_definitions/ВыполнениеКоманды.os
@@ -14,6 +14,8 @@
 	ВсеШаги.Добавить("ЯУстанавливаюОжидаемыйКодВозвратаДляКоманды");
 	ВсеШаги.Добавить("ЯПолучаюИсключениеПриВыполненииКоманды");
 	ВсеШаги.Добавить("ЯУстанавливаюОжидаемыйДиапазонКодовВозвратаОтДоДляКоманды");
+	ВсеШаги.Добавить("ЯУстанавливаюПериодОпросаЗавершенияКомандыВМиллисекунду");
+	ВсеШаги.Добавить("ЯСнимаюФлагПоказаНемедленногоВыводаКоманды");
 
 	Возврат ВсеШаги;
 КонецФункции
@@ -71,6 +73,21 @@
 	ВызватьИсключение СтрШаблон("Не получили исключение при выполнении команды", ИмяИлиТекстКоманды);
 КонецПроцедуры
 
+//Я устанавливаю период опроса завершения команды "oscript" в 1 миллисекунду
+Процедура ЯУстанавливаюПериодОпросаЗавершенияКомандыВМиллисекунду(Знач ИмяИлиТекстКоманды, Знач ТаймаутВМиллисекундах) Экспорт
+
+	Команда = ПолучитьКомандуИзКонтекста(ИмяИлиТекстКоманды);
+	
+	Команда.УстановитьПериодОпросаЗавершения(ТаймаутВМиллисекундах);
+КонецПроцедуры
+
+//Я снимаю флаг показа немедленного вывода команды "oscript"
+Процедура ЯСнимаюФлагПоказаНемедленногоВыводаКоманды(Знач ИмяИлиТекстКоманды) Экспорт
+	Команда = ПолучитьКомандуИзКонтекста(ИмяИлиТекстКоманды);
+
+	Команда.ПоказыватьВыводНемедленно(Ложь);
+КонецПроцедуры
+
 
 // { Служебные функции
 
diff --git a/features/ВыполнениеКоманды.feature b/features/ВыполнениеКоманды.feature
@@ -7,7 +7,9 @@
 Чтобы я мог проще автоматизировать больше действий на OneScript
 
 Контекст: Отключение отладки в логах
-    Допустим Я включаю отладку лога с именем "oscript.lib.commands"
+    Допустим Я выключаю отладку лога с именем "oscript.lib.commands"
+    И Я очищаю параметры команды "git" в контексте
+    И Я очищаю параметры команды "oscript" в контексте
 
 Сценарий: Выполнение команды без параметров
     Когда Я выполняю команду "git"
@@ -46,6 +48,18 @@
     Когда Я выполняю команду "oscript"
     Тогда Код возврата команды "oscript" равен 0
 
+Сценарий: Выполнение команды c установленным периодом опроса завершения команды
+    Когда Я устанавливаю период опроса завершения команды "oscript" в 1 миллисекунду
+    И Я выполняю команду "oscript"
+    Тогда Вывод команды "oscript" содержит "1Script Execution Engine"
+    И Код возврата команды "oscript" равен 0
+
+Сценарий: Выполнение команды c запретом немедленного вывода команды команды
+    Когда Я снимаю флаг показа немедленного вывода команды "oscript"
+    И Я выполняю команду "oscript"
+    Тогда Вывод команды "oscript" содержит "1Script Execution Engine"
+    И Код возврата команды "oscript" равен 0
+
 Сценарий: Проверка неправильного диапазона кодов возврата команды
     Когда Я устанавливаю ожидаемый диапазон кодов возврата от 1 до 10 для команды "oscript"
     Тогда Я получаю исключение при выполнении команды "oscript"
diff --git a/packagedef b/packagedef
@@ -1,6 +1,6 @@
 ﻿
 Описание.Имя("1commands")
-		.Версия("0.8")
+		.Версия("0.9")
 		.ЗависитОт("logos")
 		.ЗависитОт("asserts")
 		.ЗависитОт("tempfiles")
diff --git a/readme.md b/readme.md
@@ -39,3 +39,17 @@
 ```
 
 Так же описание функциональности содержится в папке `features`. В прилагающихся `step_definitions` можно подсмотреть больше примеров.
+
+## FAQ
+
+Вопрос:
+>при использовании классов Команда/Командный файл происходит зависание выполнения команды.
+В консоли та же команда выполняется без зависания.
+
+>Например, при использовании `gitsync`. [Описание ошибки и расследование](https://github.com/artbear/1commands/issues/14)
+
+>Что делать?
+
+Ответ:
+> Отключить режим использования немедленного вывода лога команды, использовав метод `ПоказыватьВыводНемедленно(Ложь);`
+В этом случае вывод команды будет получен после завершения работы команды, а не во время ее выполнения.
diff --git a/src/Команда.os b/src/Команда.os
@@ -15,6 +15,8 @@
 Перем ПроверяемКодВозврата;
 Перем МинимальныйОжидаемыйКодВозврата;
 Перем МаксимальныйОжидаемыйКодВозврата;
+Перем ПериодОпросаВМиллисекундах;
+Перем НемедленнныйВывод;
 
 Перем ЭтоWindows;
 Перем Лог;
@@ -116,6 +118,17 @@
     Возврат КодВозврата;
 КонецФункции
 
+// Управляет мгновенным выводом лога команды
+//
+// Параметры:
+//   НемедленныйПоказ - Булевое
+//		Ложь: показывает вывод только после завершения выполнения команды
+//		Истина: показ вывода выполняется почти сразу, после появления очередной порции сообщений от команды
+//
+Процедура ПоказыватьВыводНемедленно(Знач НемедленныйПоказ) Экспорт
+	НемедленнныйВывод = НемедленныйПоказ;
+КонецПроцедуры
+
 // Установить ожидаемый код возврата
 // После исполнения команды будет выброшено исключение, если полученный код возврата не совпадает с ожидаемым
 //
@@ -161,6 +174,15 @@
     Возврат КодировкаВывода;
 КонецФункции
 
+// Установить период опроса завершения.
+//
+//  Параметры:
+//   ПериодОпросаВМиллисекундах - период опроса, в миллисекундах
+//
+Процедура УстановитьПериодОпросаЗавершения(Знач ПарамПериодОпросаВМиллисекундах) Экспорт
+    ПериодОпросаВМиллисекундах = ПарамПериодОпросаВМиллисекундах;
+КонецПроцедуры
+
 // Установить новый рабочий каталог.
 //
 //  Параметры:
@@ -282,16 +304,35 @@
 	КонецЕсли;    
     Процесс.Запустить();
     
-    Пока НЕ Процесс.Завершен ИЛИ Процесс.ПотокВывода.ЕстьДанные Цикл
-		ОчереднаяСтрокаВывода = Процесс.ПотокВывода.ПрочитатьСтроку();
-		Лог.Отладка("	%1", ОчереднаяСтрокаВывода);
+	Если Не НемедленнныйВывод Тогда
+		Процесс.ОжидатьЗавершения();
+		ЗаписьXML.ЗаписатьБезОбработки(Процесс.ПотокВывода.Прочитать());
+	Иначе
+		Если ПериодОпросаВМиллисекундах <> 0 Тогда
+			Приостановить(ПериодОпросаВМиллисекундах);
+		КонецЕсли;
+		Пока НЕ Процесс.Завершен ИЛИ Процесс.ПотокВывода.ЕстьДанные Цикл
+			Если ПериодОпросаВМиллисекундах <> 0 Тогда
+				Приостановить(ПериодОпросаВМиллисекундах);
+			КонецЕсли;
 
-        СтрокаВывода = "" + ОчереднаяСтрокаВывода + Символы.ПС;
-        ЗаписьXML.ЗаписатьБезОбработки(СтрокаВывода);
-    КонецЦикла;
+			ОчереднаяСтрокаВывода = Процесс.ПотокВывода.Прочитать();
+			ОчереднаяСтрокаВывода = СтрЗаменить(ОчереднаяСтрокаВывода, Символы.ВК, "");
+			Лог.Отладка("%2%1", ОчереднаяСтрокаВывода, Символы.ПС);
 
-    РезультатРаботыПроцесса = ЗаписьXML.Закрыть();
-    УстановитьВывод(РезультатРаботыПроцесса);
+			ЗаписьXML.ЗаписатьБезОбработки(ОчереднаяСтрокаВывода);
+		КонецЦикла;
+
+	КонецЕсли;
+	
+	РезультатРаботыПроцесса = ЗаписьXML.Закрыть();
+	Если Не НемедленнныйВывод Тогда
+		Лог.Отладка("%2%1", РезультатРаботыПроцесса, Символы.ПС);
+	КонецЕсли;
+	
+	Лог.Отладка("Длина вывода %1, количество строк %2", СтрДлина(РезультатРаботыПроцесса), СтрЧислоСтрок(РезультатРаботыПроцесса));
+	
+	УстановитьВывод(РезультатРаботыПроцесса);
 
 	КодВозврата = Процесс.КодВозврата;
 	Если ПроверяемКодВозврата Тогда
@@ -333,6 +374,9 @@
 
 	ПроверяемКодВозврата = Ложь;
 	ОжидаемыйКодВозврата = 0;
+
+	ПериодОпросаВМиллисекундах = 100;
+	НемедленнныйВывод = Истина;
         
 КонецПроцедуры
 
diff --git a/src/КомандныйФайл.os b/src/КомандныйФайл.os
@@ -10,6 +10,7 @@
 
 Перем ЭтоWindows;
 Перем Лог;
+Перем НемедленнныйВывод;
 
 // Получить имя лога продукта
 //
@@ -102,6 +103,7 @@
 
 	Команда = Новый Команда;
 	Команда.УстановитьКодировкуВывода(КодировкаТекста.OEM);
+	Команда.ПоказыватьВыводНемедленно(НемедленнныйВывод);
 
 	Если ЭтоWindows Тогда 
 		Приложение = "cmd.exe";
@@ -144,6 +146,17 @@
 	Возврат ТекстФайла;
 КонецФункции
 
+// Управляет мгновенным выводом лога команды
+//
+// Параметры:
+//   НемедленныйПоказ - Булевое
+//		Ложь: показывает вывод только после завершения выполнения команды
+//		Истина: показ вывода выполняется почти сразу, после появления очередной порции сообщений от команды
+//
+Процедура ПоказыватьВыводНемедленно(Знач НемедленныйПоказ) Экспорт
+	НемедленнныйВывод = НемедленныйПоказ;
+КонецПроцедуры
+
 // Получить строку перенаправления ввода-вывода "> файл"
 //
 // Параметры:
@@ -183,6 +196,7 @@
 	ЭтоWindows = Найти(НРег(СистемнаяИнформация.ВерсияОС), "windows") > 0;
 
 	ТекстФайла = "";
+	НемедленнныйВывод = Истина;
 
 	Создать();
 КонецПроцедуры
diff --git a/tasks/test-feature.os b/tasks/test-feature.os
@@ -0,0 +1,16 @@
+#Использовать ".."
+#Использовать 1bdd
+
+КаталогФич = ОбъединитьПути(".", "features");
+ПутьФичи = ОбъединитьПути(".", "features", АргументыКоманднойСтроки[0]);
+Файл_КаталогФич = Новый Файл(КаталогФич);
+ФайлФичи = Новый Файл(ПутьФичи);
+
+ИсполнительБДД = Новый ИсполнительБДД;
+РезультатВыполнения = ИсполнительБДД.ВыполнитьФичу(ФайлФичи, Файл_КаталогФич);
+ИтоговыйРезультатВыполнения = ИсполнительБДД.ПолучитьИтоговыйСтатусВыполнения(РезультатВыполнения);
+
+Сообщить(ИтоговыйРезультатВыполнения);
+Если ИтоговыйРезультатВыполнения = ИсполнительБДД.ВозможныеСтатусыВыполнения().Сломался Тогда
+    ВызватьИсключение 1;
+КонецЕсли;
diff --git a/tasks/test.os b/tasks/test.os
@@ -0,0 +1,27 @@
+#Использовать ".."
+#Использовать 1bdd
+
+ПутьОтчетаJUnit = "./bdd-log.xml";
+
+КаталогФич = ОбъединитьПути(".", "features");
+
+Файл_КаталогФич = Новый Файл(КаталогФич);
+
+ИсполнительБДД = Новый ИсполнительБДД;
+РезультатыВыполнения = ИсполнительБДД.ВыполнитьФичу(Файл_КаталогФич, Файл_КаталогФич);
+ИтоговыйРезультатВыполнения = ИсполнительБДД.ПолучитьИтоговыйСтатусВыполнения(РезультатыВыполнения);
+
+СтатусВыполнения = ИсполнительБДД.ВозможныеСтатусыВыполнения().НеВыполнялся;
+Если РезультатыВыполнения.Строки.Количество() > 0 Тогда
+	СтатусВыполнения = ИсполнительБДД.ПолучитьИтоговыйСтатусВыполнения(РезультатыВыполнения);
+
+	// ИсполнительБДД.ВывестиИтоговыеРезультатыВыполнения(РезультатыВыполнения, ФайлФичи.ЭтоКаталог());
+КонецЕсли;
+
+ГенераторОтчетаJUnit = Новый ГенераторОтчетаJUnit;
+ГенераторОтчетаJUnit.Сформировать(РезультатыВыполнения, СтатусВыполнения, ПутьОтчетаJUnit);
+
+Сообщить(ИтоговыйРезультатВыполнения);
+Если ИтоговыйРезультатВыполнения = ИсполнительБДД.ВозможныеСтатусыВыполнения().Сломался Тогда
+    ВызватьИсключение 1;
+КонецЕсли;

Original file line number	Diff line number	Diff line change
`@@ -1 +1,2 @@`
`1`		`-exec.log`
	`1`	`+exec.log`
	`2`	`+bdd-log.xml`
Original file line number	Diff line number	Diff line change
`@@ -56,6 +56,18 @@`
`56`	`56`	`}`
`57`	`57`	`}`
`58`	`58`	`},`
	`59`	`+ {`
	`60`	`+ "taskName": "Opm: package build",`
	`61`	`+ "args": [`
	`62`	`+ "opm",`
	`63`	`+ "build",`
	`64`	`+ "${workspaceRoot}"`
	`65`	`+ ],`
	`66`	`+ "echoCommand": true,`
	`67`	`+ "showOutput": "always",`
	`68`	`+ "suppressTaskName": true,`
	`69`	`+ "isBuildCommand": false`
	`70`	`+ },`
`59`	`71`	`{`
`60`	`72`	`"taskName": "Exec all features",`
`61`	`73`	`"args": [`