Конвертировал табы

Author: EvilBeaver

src/Классы/КомандаАрхивироватьДистрибутив.os

@@ -8,14 +8,14 @@
 // Прикладной интерфейс
 
 Процедура ЗарегистрироватьКоманду(Знач ИмяКоманды, Знач Парсер) Экспорт
-	
+    
     ОписаниеКоманды = Парсер.ОписаниеКоманды(ИмяКоманды, "Создание архива для удобного тиражирования");
 
     Парсер.ДобавитьИменованныйПараметрКоманды(ОписаниеКоманды, "-in", "Путь к каталогу дистрибутива");
     Парсер.ДобавитьИменованныйПараметрКоманды(ОписаниеКоманды, "-name-prefix", "Префикс имени архива, например erp20");
     Парсер.ДобавитьИменованныйПараметрКоманды(ОписаниеКоманды, "-mdinfo", "Каталог с файлом v8-metadata.info, генерируемым командой make-dist");
     Парсер.ДобавитьИменованныйПараметрКоманды(ОписаниеКоманды, "-out", "Выходной каталог с архивом");
-	
+    
     Парсер.ДобавитьКоманду(ОписаниеКоманды);
 
 КонецПроцедуры
@@ -29,11 +29,11 @@
 
     Лог = Логирование.ПолучитьЛог(ПараметрыСистемы.ИмяЛогаСистемы()); 
 
-	УправлениеКонфигуратором = ОкружениеСборки.ПолучитьКонфигуратор();
+    УправлениеКонфигуратором = ОкружениеСборки.ПолучитьКонфигуратор();
 
-	КаталогДляАрхивации = ПараметрыКоманды["-in"];
+    КаталогДляАрхивации = ПараметрыКоманды["-in"];
     Если Не ЗначениеЗаполнено(КаталогДляАрхивации) Тогда
-		КаталогДляАрхивации = ОбъединитьПути(УправлениеКонфигуратором.КаталогСборки(), ОкружениеСборки.ИмяКаталогаФормированияДистрибутива());
+        КаталогДляАрхивации = ОбъединитьПути(УправлениеКонфигуратором.КаталогСборки(), ОкружениеСборки.ИмяКаталогаФормированияДистрибутива());
     КонецЕсли;
 
     Каталог = Новый Файл(КаталогДляАрхивации);
@@ -44,26 +44,26 @@
     Если ЗначениеЗаполнено(ПараметрыКоманды["-mdinfo"]) Тогда
         ФайлМетаданных = Новый Файл(ОбъединитьПути(ПараметрыКоманды["-mdinfo"], ОкружениеСборки.ИмяФайлаИнформацииОМетаданных()));
     Иначе
-		ФайлМетаданных = Новый Файл(ОбъединитьПути(УправлениеКонфигуратором.КаталогСборки(), ОкружениеСборки.ИмяФайлаИнформацииОМетаданных()));
+        ФайлМетаданных = Новый Файл(ОбъединитьПути(УправлениеКонфигуратором.КаталогСборки(), ОкружениеСборки.ИмяФайлаИнформацииОМетаданных()));
     КонецЕсли;
 
-	Лог.Отладка("Имя файла метаданных:" + ФайлМетаданных.ПолноеИмя);
+    Лог.Отладка("Имя файла метаданных:" + ФайлМетаданных.ПолноеИмя);
     Если ФайлМетаданных.Существует() Тогда
         ОписаниеМетаданных = ОкружениеСборки.ПрочитатьИнформациюОМетаданных(ФайлМетаданных.ПолноеИмя);
         Лог.Информация("Текущая версия конфигурации: " + ОписаниеМетаданных.Версия);
-		ИмяАрхива = СформироватьИмяАрхива(ПараметрыКоманды["-name-prefix"], ОписаниеМетаданных.Версия);
+        ИмяАрхива = СформироватьИмяАрхива(ПараметрыКоманды["-name-prefix"], ОписаниеМетаданных.Версия);
     Иначе
         ИмяАрхива = СформироватьИмяАрхива(ПараметрыКоманды["-name-prefix"]);
     КонецЕсли;
 
-	ВыходнойКаталог = ?(ПустаяСтрока(ПараметрыКоманды["-out"]),УправлениеКонфигуратором.КаталогСборки(),ПараметрыКоманды["-out"]);
+    ВыходнойКаталог = ?(ПустаяСтрока(ПараметрыКоманды["-out"]),УправлениеКонфигуратором.КаталогСборки(),ПараметрыКоманды["-out"]);
     АрхивироватьДистрибутив(ВыходнойКаталог, ИмяАрхива, КаталогДляАрхивации);
 
 КонецФункции
 
 Функция СформироватьИмяАрхива(Знач Префикс, Знач Версия = "")
 
-	Если Не ЗначениеЗаполнено(Префикс) Тогда
+    Если Не ЗначениеЗаполнено(Префикс) Тогда
         Префикс = ОкружениеСборки.ИмяКаталогаФормированияДистрибутива();
     КонецЕсли;
 
@@ -77,12 +77,12 @@
 КонецФункции // СформироватьИмяАрхива(Знач Префикс, Знач Версия = "")
 
 Процедура АрхивироватьДистрибутив(Знач ВыходнойКаталог, Знач ИмяАрхива, Знач КаталогДляАрхивации)
-	
-	Лог.Отладка("ВыходнойКаталог = " + ВыходнойКаталог);
-	Лог.Отладка("ИмяАрхива = " + ИмяАрхива);
-	Лог.Отладка("КаталогДляАрхивации = " + КаталогДляАрхивации);
+    
+    Лог.Отладка("ВыходнойКаталог = " + ВыходнойКаталог);
+    Лог.Отладка("ИмяАрхива = " + ИмяАрхива);
+    Лог.Отладка("КаталогДляАрхивации = " + КаталогДляАрхивации);
 
-	ОбъектКаталога = Новый Файл(ВыходнойКаталог);
+    ОбъектКаталога = Новый Файл(ВыходнойКаталог);
     Если Не ОбъектКаталога.Существует() Тогда
         СоздатьКаталог(ОбъектКаталога.ПолноеИмя);
     КонецЕсли;
@@ -91,10 +91,10 @@
     ЗаписьZIP = Новый ЗаписьZipФайла(ПолноеИмяАрхива);
     ЗаписьZIP.Добавить(
         ОбъединитьПути(КаталогДляАрхивации, ПолучитьМаскуВсеФайлы()),
-    	РежимСохраненияПутейZIP.СохранятьОтносительныеПути,
+        РежимСохраненияПутейZIP.СохранятьОтносительныеПути,
         РежимОбработкиПодкаталоговZIP.ОбрабатыватьРекурсивно);
     ЗаписьZIP.Записать();
 
-	Лог.Информация("Архив: " + ПолноеИмяАрхива + " создан.");
+    Лог.Информация("Архив: " + ПолноеИмяАрхива + " создан.");
 
 КонецПроцедуры

src/Классы/КомандаВыгрузитьИзХранилища.os

@@ -11,7 +11,7 @@
 // Прикладной интерфейс
 
 Процедура ЗарегистрироватьКоманду(Знач ИмяКоманды, Знач Парсер) Экспорт
-	
+    
     ОписаниеКоманды = Парсер.ОписаниеКоманды(ИмяКоманды, "Выгрузка версии из хранилища в рабочую среду");
     Парсер.ДобавитьПозиционныйПараметрКоманды(ОписаниеКоманды, "АдресХранилища", "Хранилище конфигурации 1С из которого выполняется сборка");
     // TODO с помощью tool1cd можно не применять авторизацию
@@ -34,11 +34,11 @@
     Параметры = РазобратьПараметры(ПараметрыКоманды);
 
     Попытка
-    	ФайлВерсии = ПолучитьИмяВременногоФайла(".cf");
+        ФайлВерсии = ПолучитьИмяВременногоФайла(".cf");
         Если Параметры.ИспользоватьTool1CD Тогда
             ВыгрузитьВерсиюСредствамиTool1CD(Параметры.АдресХранилища, Параметры.ВерсияХранилища, ФайлВерсии);
         Иначе
-        	ВыгрузитьВерсиюИзХранилища(Параметры.АдресХранилища, Параметры.ВерсияХранилища, ФайлВерсии, Параметры.ПользовательХранилища, Параметры.ПарольХранилища);
+            ВыгрузитьВерсиюИзХранилища(Параметры.АдресХранилища, Параметры.ВерсияХранилища, ФайлВерсии, Параметры.ПользовательХранилища, Параметры.ПарольХранилища);
         КонецЕсли;
 
         ФайлТест = Новый Файл(ФайлВерсии);
@@ -47,18 +47,18 @@
         УправлениеКонфигуратором = ОкружениеСборки.ПолучитьКонфигуратор();
         ЗагрузитьКонфигурациюВБазуСборки(УправлениеКонфигуратором, ФайлВерсии);
     Исключение
-		ВФ.Удалить();
-		ВызватьИсключение;
+        ВФ.Удалить();
+        ВызватьИсключение;
     КонецПопытки;
 
-	ВФ.Удалить();
+    ВФ.Удалить();
 
 КонецФункции
 
 Процедура ЗагрузитьКонфигурациюВБазуСборки(Знач УправлениеКонфигуратором, Знач ФайлВерсии) Экспорт
     Лог.Информация("Загружаю версию во временную базу");
-	УправлениеКонфигуратором.ЗагрузитьКонфигурациюИзФайла(ФайлВерсии, Истина);
-	Лог.Информация(УправлениеКонфигуратором.ВыводКоманды());
+    УправлениеКонфигуратором.ЗагрузитьКонфигурациюИзФайла(ФайлВерсии, Истина);
+    Лог.Информация(УправлениеКонфигуратором.ВыводКоманды());
 КонецПроцедуры
 
 // экспортная для целей тестирования
@@ -86,7 +86,7 @@
     Знач ПользовательХранилища = Неопределено,
     Знач ПарольХранилища = Неопределено) Экспорт
 
-	ВременныйКаталог = "";
+    ВременныйКаталог = "";
     Конфигуратор = ПолучитьКонфигуратор(ВременныйКаталог);
 
     Лог.Отладка("Выгружаю версию из хранилища");
@@ -105,8 +105,8 @@
 КонецПроцедуры
 
 Процедура ВыгрузитьВерсиюСредствамиTool1CD(Знач КаталогХранилища, Знач ВерсияХранилища, Знач ФайлВерсии) Экспорт
-	
-	ФайлХранилища = ОбъединитьПути(КаталогХранилища, "1cv8ddb.1CD");
+    
+    ФайлХранилища = ОбъединитьПути(КаталогХранилища, "1cv8ddb.1CD");
     Чтение = Новый ЧтениеХранилищаКонфигурации;
     Если ВерсияХранилища = Неопределено Тогда
         ВерсияХранилища = 0;
@@ -117,17 +117,17 @@
 КонецПроцедуры
 
 Функция ПолучитьКонфигуратор(РабочийКаталог = "")
-	
-	Если ПустаяСтрока(РабочийКаталог) Тогда
-		РабочийКаталог = ВФ.СоздатьКаталог();
-	    Лог.Отладка("Создан временный каталог: " + РабочийКаталог);
-	КонецЕсли;
-	
-	Конфигуратор = Новый УправлениеКонфигуратором();
+    
+    Если ПустаяСтрока(РабочийКаталог) Тогда
+        РабочийКаталог = ВФ.СоздатьКаталог();
+        Лог.Отладка("Создан временный каталог: " + РабочийКаталог);
+    КонецЕсли;
+    
+    Конфигуратор = Новый УправлениеКонфигуратором();
     Конфигуратор.КаталогСборки(РабочийКаталог);
-	
-	Возврат Конфигуратор;
-	
+    
+    Возврат Конфигуратор;
+    
 КонецФункции // ПолучитьКонфигуратор()
 
 //////////////////////////////////////////////////////////////////////////////

src/Классы/КомандаСоздатьДистрибутив.os

@@ -8,13 +8,13 @@
 // Прикладной интерфейс
 
 Процедура ЗарегистрироватьКоманду(Знач ИмяКоманды, Знач Парсер) Экспорт
-	
+    
     ОписаниеКоманды = Парсер.ОписаниеКоманды(ИмяКоманды, "Создание дистрибутива по манифесту EDF");
     // TODO - с помощью tool1cd можно получить из хранилища
     // на больших историях версий получается массивный xml дамп таблицы
     Парсер.ДобавитьПозиционныйПараметрКоманды(ОписаниеКоманды, "ФайлМанифеста", "Путь к манифесту сборки");
     Парсер.ДобавитьИменованныйПараметрКоманды(ОписаниеКоманды, "-out", "Выходной каталог");
-	Парсер.ДобавитьПараметрФлагКоманды(ОписаниеКоманды, "-setup", "Собирать дистрибутив вида setup.exe");
+    Парсер.ДобавитьПараметрФлагКоманды(ОписаниеКоманды, "-setup", "Собирать дистрибутив вида setup.exe");
     Парсер.ДобавитьПараметрФлагКоманды(ОписаниеКоманды, "-files", "Собирать дистрибутив вида 'файлы поставки'");
     Парсер.ДобавитьКоманду(ОписаниеКоманды);
 
@@ -64,7 +64,7 @@
 
 Функция ПутьКОбработкеСборщикуДанных()
 
-	// prod версия
+    // prod версия
     ОбработкаСборщик = Новый Файл(ОбъединитьПути(ТекущийСценарий().Каталог, "../../СборИнформацииОМетаданных.epf"));
     Если Не ОбработкаСборщик.Существует() Тогда
         Лог.Отладка(СтрШаблон("Не обнаружена обработка сбора данных в каталоге '%1'", ОбработкаСборщик.ПолноеИмя));