Раскладка на исходники через промежуточны

Author: witales

v8files-extractor.os

@@ -362,9 +362,6 @@
 
 Процедура ЗапуститьРаспаковкуРасширения(Знач Файл, Знач ПапкаИсходников)
 
-	Лог.Отладка("Обеспечиваем пустой каталог: " + ПапкаИсходников.ПолноеИмя);
-	ОбеспечитьПустойКаталог(ПапкаИсходников);
-
 	Лог.Отладка("Запускаем распаковку файла расширения");
 
 	Конфигуратор = Новый УправлениеКонфигуратором();
@@ -389,14 +386,21 @@
 	Конфигуратор.ВыполнитьКоманду(Параметры);
 	Лог.Отладка("Вывод 1С:Предприятия - " + Конфигуратор.ВыводКоманды());
 
-	Лог.Отладка("Разбор расширения '%1' в исходники в каталог '%2'", ИмяРасширения, ПапкаИсходников.ПолноеИмя);
+	ВременнаяПапкаИсходников = ВременныеФайлы.СоздатьКаталог();
+
+	Лог.Отладка("Разбор расширения '%1' в исходники в каталог '%2'", ИмяРасширения, ВременнаяПапкаИсходников);
 	Параметры = Конфигуратор.ПолучитьПараметрыЗапуска();
 
-	Параметры.Добавить("/DumpConfigToFiles """ + ПапкаИсходников.ПолноеИмя + """");
+	Параметры.Добавить("/DumpConfigToFiles """ + ВременнаяПапкаИсходников + """");
 	Параметры.Добавить("-Extension """ + ИмяРасширения + """");
 	Конфигуратор.ВыполнитьКоманду(Параметры);
 	Лог.Отладка("Вывод 1С:Предприятия - " + Конфигуратор.ВыводКоманды());
 
+	ОбеспечитьПустойКаталог(ПапкаИсходников);
+
+	Лог.Отладка("Копируем исходники из временного каталога в целевой: " + ПапкаИсходников.ПолноеИмя);
+	КопироватьСодержимоеКаталога(ВременнаяПапкаИсходников, ПапкаИсходников.ПолноеИмя);
+
 КонецПроцедуры
 
 Процедура ЗапуститьРаспаковкуОбработки(Знач Файл, Знач ПапкаИсходников)
@@ -419,31 +423,18 @@
 
 
 	ЭтоМакет = ВРег(Файл.Расширение) = ".MXL";
+	ВременнаяПапкаИсходников = ВременныеФайлы.СоздатьКаталог();
 
 	Параметры = Конфигуратор.ПолучитьПараметрыЗапуска();
 	Если НЕ ЭтоМакет И ИспользоватьКонфигуратор Тогда
 
-		КоманднаяСтрокаРаспаковки = СтрШаблон("/DumpExternalDataProcessorOrReportToFiles ""%1\%2.xml"" ""%3""",
-											 ПапкаИсходников.ПолноеИмя, Файл.ИмяБезРасширения, Файл.ПолноеИмя);
-
-		ВременнаяПапкаИсходников = ВременныеФайлы.СоздатьКаталог();
-		
 		КоманднаяСтрокаРаспаковки = СтрШаблон("/DumpExternalDataProcessorOrReportToFiles ""%1\%2.xml"" ""%3""",
                                                 ВременнаяПапкаИсходников, Файл.ИмяБезРасширения, Файл.ПолноеИмя);
 
 		Лог.Отладка("Командная строка распаковки: " + КоманднаяСтрокаРаспаковки);
 
 		Параметры.Добавить(КоманднаяСтрокаРаспаковки);
 
-		Конфигуратор.ВыполнитьКоманду(Параметры);
-		Лог.Отладка("Вывод 1С:Предприятия - " + Конфигуратор.ВыводКоманды());
-
-		Лог.Отладка("Обеспечиваем пустой каталог: " + ПапкаИсходников.ПолноеИмя);
-		ОбеспечитьПустойКаталог(ПапкаИсходников);
-	
-		Лог.Отладка("Копируем исходники из временного каталога в целевой: " + ПапкаИсходников.ПолноеИмя);
-		КопироватьСодержимоеКаталога(ВременнаяПапкаИсходников, ПапкаИсходников.ПолноеИмя);
-	
 	Иначе
 
 		Параметры[0] = "ENTERPRISE";
@@ -456,19 +447,26 @@
 			.ЭтоИстина();
 
 		КоманднаяСтрокаV8Reader = СтрШаблон("/C""decompile;pathtocf;%1;pathout;%2;convert-mxl2txt;ЗавершитьРаботуПосле;""",
-											Файл.ПолноеИмя, ?(ЭтоМакет, Файл.Путь, ПапкаИсходников.ПолноеИмя));
+											Файл.ПолноеИмя, ?(ЭтоМакет, Файл.Путь, ВременнаяПапкаИсходников));
 
 		Лог.Отладка("Командная строка V8Reader: " + КоманднаяСтрокаV8Reader);
 
 		Параметры.Добавить("/RunModeOrdinaryApplication");
 		Параметры.Добавить("/Execute """ + ПутьV8Reader + """");
 		Параметры.Добавить(КоманднаяСтрокаV8Reader);
 
-		Конфигуратор.ВыполнитьКоманду(Параметры);
-		Лог.Отладка("Вывод 1С:Предприятия - " + Конфигуратор.ВыводКоманды());
+	КонецЕсли;
 
+	Конфигуратор.ВыполнитьКоманду(Параметры);
+	Лог.Отладка("Вывод 1С:Предприятия - " + Конфигуратор.ВыводКоманды());
+
+	Если Не ЭтоМакет Тогда
+		ОбеспечитьПустойКаталог(ПапкаИсходников);
 	КонецЕсли;
 
+	Лог.Отладка("Копируем исходники из временного каталога в целевой: " + ПапкаИсходников.ПолноеИмя);
+	КопироватьСодержимоеКаталога(ВременнаяПапкаИсходников, ПапкаИсходников.ПолноеИмя);
+
 КонецПроцедуры
 
 Процедура УстановитьУровеньЛогаКонфигуратораРавнымУровнюПродукта()