Skip to content
This repository has been archived by the owner on May 25, 2021. It is now read-only.

Commit

Permalink
Библиотечная проверка на код возврата
Browse files Browse the repository at this point in the history
  • Loading branch information
nixel2007 committed Feb 5, 2018
1 parent 1608997 commit 8dae652
Show file tree
Hide file tree
Showing 3 changed files with 13 additions and 20 deletions.
25 changes: 10 additions & 15 deletions src/core/Классы/АктиваторOneScript.os
Expand Up @@ -34,17 +34,13 @@
Команда = Новый Команда;
Команда.УстановитьКоманду("where");
Команда.ДобавитьПараметр("oscript");
Команда.УстановитьПравильныйКодВозврата(0);

КодСостояния = Команда.Исполнить();
ВыводКоманды = Команда.ПолучитьВывод();
Команда.Исполнить();

ВыводКоманды = Команда.ПолучитьВывод();
Лог.Отладка(ВыводКоманды);

Если КодСостояния <> 0 Тогда
Лог.Ошибка(ВыводКоманды);
ВызватьИсключение КодСостояния;
КонецЕсли;


ПутьКСистемномуOneScript = СтрПолучитьСтроку(ВыводКоманды, 1);
Лог.Отладка("Путь к системному OneScript: ", ПутьКСистемномуOneScript);

Expand Down Expand Up @@ -72,17 +68,13 @@
Команда = Новый Команда;
Команда.УстановитьИсполнениеЧерезКомандыСистемы(Ложь);
Команда.УстановитьСтрокуЗапуска(СтрокаЗапуска);
Команда.УстановитьПравильныйКодВозврата(0);

КодСостояния = Команда.Исполнить();
ВыводКоманды = Команда.ПолучитьВывод();
Команда.Исполнить();

ВыводКоманды = Команда.ПолучитьВывод();
Лог.Отладка(ВыводКоманды);

Если КодСостояния <> 0 Тогда
Лог.Ошибка(ВыводКоманды);
ВызватьИсключение КодСостояния;
КонецЕсли;

Лог.Отладка("Добавление ovm в автозапуск powershell");

ПутьКФайлу = ОбъединитьПути(
Expand Down Expand Up @@ -120,6 +112,7 @@
Команда = Новый Команда;
Команда.УстановитьКоманду("unlink");
Команда.ДобавитьПараметр(ПутьКСсылке);
Команда.УстановитьПравильныйКодВозврата(0);
Команда.Исполнить();

Лог.Отладка(Команда.ПолучитьВывод());
Expand All @@ -134,6 +127,7 @@
Команда.ДобавитьПараметр("/D");
Команда.ДобавитьПараметр(ПутьКСсылке);
Команда.ДобавитьПараметр(ПутьККаталогуНазначения);
Команда.УстановитьПравильныйКодВозврата(0);

Команда.Исполнить();
Лог.Отладка(Команда.ПолучитьВывод());
Expand All @@ -143,6 +137,7 @@
Команда.ДобавитьПараметр("-s");
Команда.ДобавитьПараметр(ПутьККаталогуНазначения);
Команда.ДобавитьПараметр(ПутьКСсылке);
Команда.УстановитьПравильныйКодВозврата(0);

Команда.Исполнить();

Expand Down
3 changes: 2 additions & 1 deletion src/core/Классы/УстановщикOneScript.os
Expand Up @@ -124,8 +124,9 @@
Команда.УстановитьКоманду("chmod");
Команда.ДобавитьПараметр("+x");
Команда.ДобавитьПараметр(ПутьКСкрипту);
Команда.УстановитьПравильныйКодВозврата(0);

КодСостояния = Команда.Исполнить();
Команда.Исполнить();
Лог.Отладка(Команда.ПолучитьВывод());

КонецПроцедуры
Expand Down
5 changes: 1 addition & 4 deletions tasks/coverage.os
Expand Up @@ -18,10 +18,7 @@
Команда.ДобавитьПараметр("tasks/test.os");
Команда.ПоказыватьВыводНемедленно(Истина);

Попытка
КодВозврата = Команда.Исполнить();
Исключение
КонецПопытки;
КодВозврата = Команда.Исполнить();

Файл_Стат = Новый Файл(ПутьКСтат);
Ожидаем.Что(Файл_Стат.Существует(), СтрШаблон("Файл <%1> с результатами покрытия не существует!", Файл_Стат.ПолноеИмя)).ЭтоИстина();
Expand Down

0 comments on commit 8dae652

Please sign in to comment.