Распаковка расширений на исходники

Author: JohnyDeath

v8files-extractor.os

@@ -26,7 +26,7 @@
 
 Функция Версия() Экспорт
 
-	Версия = "2.1.0-PRE";
+	Версия = "2.1.1-PRE";
 
 	Возврат "v" + Версия;
 
@@ -234,7 +234,7 @@
 		Возврат Ложь;
 	КонецЕсли;
 
-	Поз = Найти(".epf,.erf,", Файл.Расширение+",");
+	Поз = Найти(ВРег(".epf,.erf,.cfe,"), ВРег(Файл.Расширение+","));
 	Возврат Поз > 0;
 
 КонецФункции
@@ -256,7 +256,11 @@
 	ПапкаИсходников = Новый Файл(ПутьКаталогаИсходников);
 
 	ОбеспечитьПустойКаталог(ПапкаИсходников);
-	ЗапуститьРаспаковку(Файл, ПапкаИсходников);
+	Если ВРег(Файл.Расширение) = ".CFE" Тогда
+		ЗапуститьРаспаковкуРасширения(Файл, ПапкаИсходников);
+	Иначе
+		ЗапуститьРаспаковкуОбработки(Файл, ПапкаИсходников);
+	КонецЕсли;
 
 	Возврат ПапкаИсходников.ПолноеИмя;
 
@@ -279,7 +283,40 @@
 	Возврат Рез;
 КонецФункции
 
-Процедура ЗапуститьРаспаковку(Знач Файл, Знач ПапкаИсходников)
+Процедура ЗапуститьРаспаковкуРасширения(Знач Файл, Знач ПапкаИсходников)
+
+	Лог.Отладка("Запускаем распаковку файла расширения");
+
+	Конфигуратор = Новый УправлениеКонфигуратором();
+	КаталогВременнойИБ = ВременныеФайлы.СоздатьКаталог();
+	Конфигуратор.КаталогСборки(КаталогВременнойИБ);
+
+	ЛогКонфигуратора = Логирование.ПолучитьЛог("oscript.lib.v8runner");
+	ЛогКонфигуратора.УстановитьУровень(Лог.Уровень());
+	ЛогКонфигуратора.Закрыть();
+
+	Параметры = Конфигуратор.ПолучитьПараметрыЗапуска();
+	
+	ИмяРасширения = Файл.ИмяБезРасширения;
+	Лог.Отладка(СтрШаблон("Загрузка расширения '%1'", ИмяРасширения));
+	Параметры.Добавить("/LoadCfg """ + Файл.ПолноеИмя + """");
+	Параметры.Добавить("-Extension """ + ИмяРасширения + """");
+	Конфигуратор.ВыполнитьКоманду(Параметры);
+	Лог.Отладка("Вывод 1С:Предприятия - " + Конфигуратор.ВыводКоманды());
+
+	Лог.Отладка(СтрШаблон("Разбор расширения '%1' в исходники в каталог '%2'", ИмяРасширения, ПапкаИсходников.ПолноеИмя));
+	Параметры = Конфигуратор.ПолучитьПараметрыЗапуска();
+
+	Параметры.Добавить("/DumpConfigToFiles """ + ПапкаИсходников.ПолноеИмя + """");
+	Параметры.Добавить("-Extension """ + ИмяРасширения + """");
+	Конфигуратор.ВыполнитьКоманду(Параметры);
+	Лог.Отладка("Вывод 1С:Предприятия - " + Конфигуратор.ВыводКоманды());
+
+	Лог.Отладка("Очищаем каталог временной ИБ");
+
+КонецПроцедуры
+
+Процедура ЗапуститьРаспаковкуОбработки(Знач Файл, Знач ПапкаИсходников)
 
 	Лог.Отладка("Запускаем распаковку файла");