Добавлен запуск из командной строки по команде --decompile xDrivenDevelopment#30 xDrivenDevelopment#31

Author: EvilBeaver

v8files-extractor.os

@@ -5,29 +5,61 @@
 #Использовать v8runner
 
 Перем Лог;
+Перем КодВозврата;
 
 Функция ЗапускВКоманднойСтроке()
 
+	КодВозврата = 0;
+	
 	Если ТекущийСценарий().Источник <> СтартовыйСценарий().Источник Тогда
 		Возврат Ложь;
 	КонецЕсли;
 
-	Парсер = Новый ПарсерАргументовКоманднойСтроки();
-	Парсер.ДобавитьПараметр("ВходящиеФайлы");
-	
-	Аргументы = Парсер.Разобрать(АргументыКоманднойСтроки);
-	
-	Для Каждого Параметр Из Аргументы Цикл
-		Лог.Отладка(Параметр);
-	КонецЦикла;
+	Попытка
+	
+		Парсер = Новый ПарсерАргументовКоманднойСтроки();
+		
+		ВозможныеКоманды = Новый Структура;
+		ВозможныеКоманды.Вставить("Декомпилировать", "--decompile");
+		
+		ОписаниеКоманды = Парсер.ОписаниеКоманды(ВозможныеКоманды.Декомпилировать);
+		Парсер.ДобавитьПозиционныйПараметрКоманды(ОписаниеКоманды, "ПутьВходящихДанных");
+		Парсер.ДобавитьПозиционныйПараметрКоманды(ОписаниеКоманды, "ВыходнойКаталог");
+		Парсер.ДобавитьКоманду(ОписаниеКоманды);
+		
+		Аргументы = Парсер.РазобратьКоманду(АргументыКоманднойСтроки);
+		
+		Команда = Аргументы.Команда;
+		Лог.Отладка("Передана команда: "+Команда);
+		Для Каждого Параметр Из Аргументы.ЗначенияПараметров Цикл
+			Лог.Отладка(Параметр.Ключ + " = " + Параметр.Значение);
+		КонецЦикла;
+		
+		Если Команда = ВозможныеКоманды.Декомпилировать Тогда
+			Декомпилировать(Аргументы.ЗначенияПараметров["ПутьВходящихДанных"], Аргументы.ЗначенияПараметров["ВыходнойКаталог"]);
+		КонецЕсли;
+		
+	Исключение
+		Лог.Ошибка(ОписаниеОшибки());
+		КодВозврата = 1;
+	КонецПопытки;
 
 	Возврат Истина;
 
 КонецФункции
 
 Процедура Инициализация()
 	Лог = Логирование.ПолучитьЛог("oscript.app.v8files-extractor");
-	Лог.Отладка("Параметры командной строки:");
+	Лог.УстановитьУровень(УровниЛога.Отладка);
+КонецПроцедуры
+
+Процедура Декомпилировать(Знач Путь, Знач КаталогВыгрузки) Экспорт
+	Файл = Новый Файл(Путь);
+	Если Файл.ЭтоКаталог() Тогда
+		РазобратьКаталог(Файл.ПолноеИмя, КаталогВыгрузки);
+	Иначе
+		РазобратьФайл(Файл.ПолноеИмя, КаталогВыгрузки);
+	КонецЕсли;
 КонецПроцедуры
 
 Процедура РазобратьКаталог(Знач ПутьКаталога, Знач КаталогВыгрузки) Экспорт
@@ -133,7 +165,7 @@
 Инициализация();
 
 Если ЗапускВКоманднойСтроке() Тогда
-	// TODO Сообщить код возврата в оболочку ОС
+	ЗавершитьРаботу(КодВозврата);
 КонецЕсли;