Небольшая уборка в коде.

Author: zeratulayuris

v8files-extractor.os

@@ -1,4 +1,4 @@
-// Copyright 2016 xDrivenDevelopment
+// Copyright 2016 xDrivenDevelopment
 //
 // Licensed under the Apache License, Version 2.0 (the "License");
 // you may not use this file except in compliance with the License.
@@ -109,8 +109,6 @@
 				Аргументы.ЗначенияПараметров["ПутьВходящихДанных"],
 				Аргументы.ЗначенияПараметров["ВыходнойКаталог"]
 			);
-		ИначеЕсли Команда = ВозможныеКоманды().Помощь Тогда
-			ВывестиСправку();
 		ИначеЕсли Команда = ВозможныеКоманды().ПроверитьКонфигГит Тогда
 			ПроверитьНастройкиРепозитарияГит();
 		ИначеЕсли Команда = ВозможныеКоманды().ОбработатьИзмененияИзГит Тогда
@@ -129,6 +127,8 @@
 				ТекущийКаталог(),
 				Аргументы.ЗначенияПараметров["--remove-orig-bin-files"]
 			);
+		Иначе
+			ВывестиСправку();
 		КонецЕсли;
 
 	Исключение
@@ -140,6 +140,7 @@
 	Попытка
 		ВременныеФайлы.Удалить();
 	Исключение
+		Лог.Отладка("Не удалось очистить временные файлы");
 	КонецПопытки;
 
 	Возврат Истина;
@@ -200,7 +201,6 @@
 
 	Лог = Логирование.ПолучитьЛог("oscript.app.v8files-extractor");
 	Лог.Закрыть();
-	//Лог.УстановитьУровень(УровниЛога.Отладка);
 
 	ВыводПоУмолчанию = Новый ВыводЛогаВКонсоль();
 	Лог.ДобавитьСпособВывода(ВыводПоУмолчанию);
@@ -230,6 +230,7 @@
 		// Если прекоммит установлен, как приложение, в Program Files
 		// То команда не сможет отработать из за отсутствия прав на запись.
 		// Но нам в данном случае и не нужен лог в файле.
+		Лог.Отладка("Не смогли открыть лог в файле");
 	КонецПопытки;
 КонецПроцедуры
 
@@ -251,12 +252,13 @@
 
 	ОтносительныйПутьКаталога = ПолучитьОтносительныйПутьФайла(КаталогКорень, ПутьКаталога);
 	ОтносительныйПутьКаталога = ?(ПустаяСтрока(ОтносительныйПутьКаталога), ПутьКаталога, ОтносительныйПутьКаталога);
-	Лог.Информация("Подготовка выгрузки каталога %1 в каталог %2, корень %3", ОтносительныйПутьКаталога, КаталогВыгрузки, КаталогКорень);
+	Лог.Информация("Подготовка выгрузки каталога %1 в каталог %2, корень %3",
+					ОтносительныйПутьКаталога, КаталогВыгрузки, КаталогКорень);
 
 	ИмяКаталогаВыгрузки = Новый Файл(КаталогВыгрузки).Имя;
 
 	Файлы = НайтиФайлы(ПутьКаталога, ПолучитьМаскуВсеФайлы());
-	Для Каждого Файл из Файлы Цикл
+	Для Каждого Файл Из Файлы Цикл
 		Если Файл.ЭтоКаталог() Тогда
 
 			РазобратьКаталог(Новый Файл(Файл.ПолноеИмя), КаталогВыгрузки, КаталогКорень);
@@ -267,19 +269,24 @@
 			РазобратьФайлВнутр(Файл, КаталогВыгрузки, КаталогКорень);
 
 			Лог.Информация("Завершена выгрузка файла %1 в каталог %2", Файл.Имя, ИмяКаталогаВыгрузки);
+		Иначе
+			Лог.Отладка("Тип файла не поддерживается: %1", Файл.ПолноеИмя);
 		КонецЕсли;
 	КонецЦикла;
 
-	Лог.Информация("Завершена выгрузка каталога %1 в каталог %2, корень %3", ОтносительныйПутьКаталога, КаталогВыгрузки, КаталогКорень);
+	Лог.Информация("Завершена выгрузка каталога %1 в каталог %2, корень %3",
+					ОтносительныйПутьКаталога, КаталогВыгрузки, КаталогКорень);
 КонецПроцедуры
 
 Функция РазобратьФайл(Знач Файл, Знач КаталогВыгрузки, Знач КаталогКорень = "") Экспорт
 	ПутьФайла = Файл.ПолноеИмя;
-	Лог.Информация("Проверка необходимости выгрузки файла %1 в каталог %2, корень %3", ПутьФайла, КаталогВыгрузки, КаталогКорень);
+	Лог.Информация("Проверка необходимости выгрузки файла %1 в каталог %2, корень %3",
+					ПутьФайла, КаталогВыгрузки, КаталогКорень);
 
 	КаталогИсходников = РазобратьФайлВнутр(Файл, КаталогВыгрузки, КаталогКорень);
 
-	Лог.Информация("Завершена проверка необходимости выгрузки файла %1 в каталог %2, корень %3", ПутьФайла, КаталогВыгрузки, КаталогКорень);
+	Лог.Информация("Завершена проверка необходимости выгрузки файла %1 в каталог %2, корень %3",
+					ПутьФайла, КаталогВыгрузки, КаталогКорень);
 
 	Возврат КаталогИсходников;
 
@@ -304,7 +311,9 @@
 
 	ЭтоМакет = ВРег(Файл.Расширение) = ".MXL";
 
-	Ожидаем.Что(Файл.Существует(), "Файл " + ПутьФайла + " должен существовать").ЭтоИстина();
+	Ожидаем
+		.Что(Файл.Существует(), "Файл " + ПутьФайла + " должен существовать")
+		.ЭтоИстина();
 
 	Если ЭтоМакет Тогда
 
@@ -412,8 +421,9 @@
 
 	Параметры = Конфигуратор.ПолучитьПараметрыЗапуска();
 	Если НЕ ЭтоМакет И ИспользоватьКонфигуратор Тогда
-
-		КоманднаяСтрокаРаспаковки = СтрШаблон("/DumpExternalDataProcessorOrReportToFiles ""%1\%2.xml"" ""%3""", ПапкаИсходников.ПолноеИмя, Файл.ИмяБезРасширения, Файл.ПолноеИмя);
+		
+		КоманднаяСтрокаРаспаковки = СтрШаблон("/DumpExternalDataProcessorOrReportToFiles ""%1\%2.xml"" ""%3""",
+											 ПапкаИсходников.ПолноеИмя, Файл.ИмяБезРасширения, Файл.ПолноеИмя);
 
 		Лог.Отладка("Командная строка распаковки: " + КоманднаяСтрокаРаспаковки);
 
@@ -425,9 +435,13 @@
 
 		ПутьV8Reader = ОбъединитьПути(ТекущийСценарий().Каталог, "v8Reader", "V8Reader.epf");
 		Лог.Отладка("Путь к V8Reader: " + ПутьV8Reader);
-		Ожидаем.Что(Новый Файл(ПутьV8Reader).Существует(), "Некорректно установлен V8Reader. Не обнаружен файл <" + ПутьV8Reader + ">").ЭтоИстина();
+		СтрокаОшибки = СтрШаблон("Некорректно установлен V8Reader. Не обнаружен файл <%1>", ПутьV8Reader);
+		Ожидаем
+			.Что(Новый Файл(ПутьV8Reader).Существует(), СтрокаОшибки)
+			.ЭтоИстина();
 
-		КоманднаяСтрокаV8Reader = СтрШаблон("/C""decompile;pathtocf;%1;pathout;%2;convert-mxl2txt;ЗавершитьРаботуПосле;""", Файл.ПолноеИмя, ?(ЭтоМакет, Файл.Путь, ПапкаИсходников.ПолноеИмя));
+		КоманднаяСтрокаV8Reader = СтрШаблон("/C""decompile;pathtocf;%1;pathout;%2;convert-mxl2txt;ЗавершитьРаботуПосле;""",
+											Файл.ПолноеИмя, ?(ЭтоМакет, Файл.Путь, ПапкаИсходников.ПолноеИмя));
 
 		Лог.Отладка("Командная строка V8Reader: " + КоманднаяСтрокаV8Reader);
 
@@ -474,23 +488,23 @@
 КонецПроцедуры
 
 Процедура ДополнитьФайлХука(КаталогХуков, УдалятьФайлыИзИндексаГит)
-	СтрокаПараметровПодключения = ?(ИспользоватьКонфигуратор, " --use-designer", "");
-	СтрокаПараметровПодключения = ?(УдалятьФайлыИзИндексаГит,
-									СтрокаПараметровПодключения + " --remove-orig-bin-files",
-									СтрокаПараметровПодключения);
+	СтрокаПараметров = ?(ИспользоватьКонфигуратор, " --use-designer", "");
+	СтрокаПараметров = ?(УдалятьФайлыИзИндексаГит,
+									СтрокаПараметров + " --remove-orig-bin-files",
+									СтрокаПараметров);
 	Если ЗначениеЗаполнено(КонтекстКонфигуратора) Тогда
-		ДополнитьСтрокуПараметровПодключения(СтрокаПараметровПодключения, КонтекстКонфигуратора.КлючСоединенияСБазой, "--ib-connection-string");
-		ДополнитьСтрокуПараметровПодключения(СтрокаПараметровПодключения, КонтекстКонфигуратора.ИмяПользователя, "--ib-user");
-		ДополнитьСтрокуПараметровПодключения(СтрокаПараметровПодключения, КонтекстКонфигуратора.Пароль, "--ib-pwd");
+		ДополнитьСтрокуПараметров(СтрокаПараметров, КонтекстКонфигуратора.КлючСоединенияСБазой, "--ib-connection-string");
+		ДополнитьСтрокуПараметров(СтрокаПараметров, КонтекстКонфигуратора.ИмяПользователя, "--ib-user");
+		ДополнитьСтрокуПараметров(СтрокаПараметров, КонтекстКонфигуратора.Пароль, "--ib-pwd");
 	КонецЕсли;
-	Если ЗначениеЗаполнено(СтрокаПараметровПодключения) Тогда
+	Если ЗначениеЗаполнено(СтрокаПараметров) Тогда
 		СтрокаПоиска = "oscript -encoding=utf-8 .git/hooks/v8files-extractor.os --git-precommit src";
-		СтрокаЗамены = СтрШаблон("%1%2", СтрокаПоиска, СтрокаПараметровПодключения);
+		СтрокаЗамены = СтрШаблон("%1%2", СтрокаПоиска, СтрокаПараметров);
 		ЗаменитьСтрокуВФайле(ОбъединитьПути(КаталогХуков, "pre-commit"), СтрокаПоиска, СтрокаЗамены);
 	КонецЕсли;
 КонецПроцедуры
 
-Процедура ДополнитьСтрокуПараметровПодключения(СтрокаПараметровПодключения, Знач ЗначениеПараметра, Знач ИмяПараметра)
+Процедура ДополнитьСтрокуПараметров(СтрокаПараметровПодключения, Знач ЗначениеПараметра, Знач ИмяПараметра)
 	Если ЗначениеЗаполнено(ЗначениеПараметра) Тогда
 		СтрокаПараметровПодключения = СтрШаблон("%1 %2 %3", СтрокаПараметровПодключения, ИмяПараметра, ЗначениеПараметра);
 	КонецЕсли;
@@ -545,6 +559,8 @@
 		СоздатьКаталог(ФайлОбъектКаталога.ПолноеИмя);
 	ИначеЕсли Не ФайлОбъектКаталога.ЭтоКаталог() Тогда
 		ВызватьИсключение "Путь " + ФайлОбъектКаталога.ПолноеИмя + " не является каталогом. Выгрузка невозможна";
+	Иначе
+		Лог.Отладка("Каталог %1 уже существует, пропускаем", ФайлОбъектКаталога.ПолноеИмя);
 	КонецЕсли;
 
 КонецПроцедуры
@@ -699,7 +715,7 @@
 		ПараметрыКоманды.Добавить(ОбернутьПутьВКавычки(Каталог));
 		ГитРепозиторий.ВыполнитьКоманду(ПараметрыКоманды);
 
-	КонецЦикла
+	КонецЦикла;
 
 КонецПроцедуры
 
@@ -709,8 +725,12 @@
 
 	ПапкаИсходников = Новый Файл(ПутьКИсходникам);
 
-	Ожидаем.Что(ПапкаИсходников.Существует(), "Папка " + ПутьКИсходникам + " должна существовать").ЭтоИстина();
-	Ожидаем.Что(ПапкаИсходников.ЭтоКаталог(), "Путь " + ПутьКИсходникам + "должен быть каталогом").ЭтоИстина();
+	Ожидаем
+		.Что(ПапкаИсходников.Существует(), "Папка " + ПутьКИсходникам + " должна существовать")
+		.ЭтоИстина();
+	Ожидаем
+		.Что(ПапкаИсходников.ЭтоКаталог(), "Путь " + ПутьКИсходникам + "должен быть каталогом")
+		.ЭтоИстина();
 
 	Если Рекурсивно Тогда
 		СобратьКаталог(ПутьКИсходникам, КаталогВыгрузки);
@@ -838,8 +858,12 @@
 	ПутьКФайлуКорневойКонтейнер = ОбъединитьПути(КаталогИсходников, МассивСтрокРут[1]);
 	ФайлКорневойКонтейнер = Новый Файл(ПутьКФайлуКорневойКонтейнер);
 
-	Ожидаем.Что(ФайлКорневойКонтейнер.Существует(), "Файл <" + ПутьКФайлуКорневойКонтейнер +  "> должен существовать").ЭтоИстина();
-	Ожидаем.Что(ФайлКорневойКонтейнер.ЭтоКаталог(), "<" + ПутьКФайлуКорневойКонтейнер +  "> должен быть файлом").ЭтоЛожь();
+	Ожидаем
+		.Что(ФайлКорневойКонтейнер.Существует(), "Файл <" + ПутьКФайлуКорневойКонтейнер +  "> должен существовать")
+		.ЭтоИстина();
+	Ожидаем
+		.Что(ФайлКорневойКонтейнер.ЭтоКаталог(), "<" + ПутьКФайлуКорневойКонтейнер +  "> должен быть файлом")
+		.ЭтоЛожь();
 
 	ЧтениеТекста = Новый ЧтениеТекста(ПутьКФайлуКорневойКонтейнер);
 	СодержаниеКорневойКонтейнер = "";
@@ -854,7 +878,10 @@
 	ЧтениеТекста.Закрыть();
 
 	МассивСтрокКорневойКонтейнер = СтрРазделить(СодержаниеКорневойКонтейнер, ",");
-	Ожидаем.Что(МассивСтрокКорневойКонтейнер.Количество(), "Некорректный формат файла корневого контейнера <" + ПутьКФайлуКорневойКонтейнер + ">").Больше(3);
+	СтрокаОшибки = СтрШаблон("Некорректный формат файла корневого контейнера <%1>", ПутьКФайлуКорневойКонтейнер);
+	Ожидаем
+		.Что(МассивСтрокКорневойКонтейнер.Количество(), СтрокаОшибки)
+		.Больше(3);
 
 	ИдентификаторТипаОбъекта = СокрЛП(МассивСтрокКорневойКонтейнер[3]);
 	Если Лев(ИдентификаторТипаОбъекта, 1) = "{" Тогда
@@ -896,7 +923,9 @@
 
 	ФайлПереименования = Новый Файл(ОбъединитьПути(ПутьКИсходникам, "renames.txt"));
 
-	Ожидаем.Что(ФайлПереименования.Существует(), "Файл переименования " + ФайлПереименования.ПолноеИмя + " должен существовать").ЭтоИстина();
+	Ожидаем
+		.Что(ФайлПереименования.Существует(), "Файл переименования " + ФайлПереименования.ПолноеИмя + " должен существовать")
+		.ЭтоИстина();
 
 	ЧтениеТекста = Новый ЧтениеТекста(ФайлПереименования.ПолноеИмя, КодировкаТекста.UTF8);
 	СтрокаПереименования = ЧтениеТекста.ПрочитатьСтроку();
@@ -948,7 +977,8 @@
 		Параметры = Конфигуратор.ПолучитьПараметрыЗапуска();
 		Параметры[0] = "DESIGNER";
 
-		КоманднаяСтрокаУпаковки = СтрШаблон("/LoadExternalDataProcessorOrReportFromFiles ""%1"" ""%2""", ПапкаИсходников, ИмяФайлаОбъекта);
+		КоманднаяСтрокаУпаковки = СтрШаблон("/LoadExternalDataProcessorOrReportFromFiles ""%1"" ""%2""",
+											 ПапкаИсходников, ИмяФайлаОбъекта);
 
 		Лог.Отладка("Командная строка упаковки: " + КоманднаяСтрокаУпаковки);
 
@@ -964,7 +994,9 @@
 		Если ЭтоWindows Тогда
 			ПутьЗапаковщика = ПутьЗапаковщика+".exe";
 		КонецЕсли;
-		Ожидаем.Что(Новый Файл(ПутьЗапаковщика).Существует(), "Не найден путь к v8unpack").ЭтоИстина();
+		Ожидаем
+			.Что(Новый Файл(ПутьЗапаковщика).Существует(), "Не найден путь к v8unpack")
+			.ЭтоИстина();
 
 		ВременныйФайл = ВременныеФайлы.СоздатьФайл();
 
@@ -977,7 +1009,9 @@
 		Процесс.ОжидатьЗавершения();
 
 		ВыводПроцесса = Процесс.ПотокВывода.Прочитать();
-		Ожидаем.Что(Процесс.КодВозврата, "Не удалось упаковать каталог " + ПапкаИсходников + Символы.ПС + ВыводПроцесса).Равно(0);
+		Ожидаем
+			.Что(Процесс.КодВозврата, "Не удалось упаковать каталог " + ПапкаИсходников + Символы.ПС + ВыводПроцесса)
+			.Равно(0);
 		Лог.Отладка(ВыводПроцесса);
 
 		ФайлОбъекта = Новый Файл(ИмяФайлаОбъекта);