|
21 | 21 |
|
22 | 22 | ВозможныеКоманды = Новый Структура; |
23 | 23 | ВозможныеКоманды.Вставить("Декомпилировать", "--decompile"); |
| 24 | + ВозможныеКоманды.Вставить("Помощь", "--help"); |
24 | 25 |
|
25 | 26 | ОписаниеКоманды = Парсер.ОписаниеКоманды(ВозможныеКоманды.Декомпилировать); |
26 | 27 | Парсер.ДобавитьПозиционныйПараметрКоманды(ОписаниеКоманды, "ПутьВходящихДанных"); |
27 | 28 | Парсер.ДобавитьПозиционныйПараметрКоманды(ОписаниеКоманды, "ВыходнойКаталог"); |
28 | 29 | Парсер.ДобавитьКоманду(ОписаниеКоманды); |
| 30 | + |
| 31 | + ОписаниеКоманды = Парсер.ОписаниеКоманды(ВозможныеКоманды.Помощь); |
| 32 | + Парсер.ДобавитьКоманду(ОписаниеКоманды); |
29 | 33 |
|
30 | 34 | Аргументы = Парсер.РазобратьКоманду(АргументыКоманднойСтроки); |
31 | 35 |
|
|
37 | 41 |
|
38 | 42 | Если Команда = ВозможныеКоманды.Декомпилировать Тогда |
39 | 43 | Декомпилировать(Аргументы.ЗначенияПараметров["ПутьВходящихДанных"], Аргументы.ЗначенияПараметров["ВыходнойКаталог"]); |
| 44 | + ИначеЕсли Команда = ВозможныеКоманды.Помощь Тогда |
| 45 | + ВывестиСправку(); |
40 | 46 | КонецЕсли; |
41 | 47 |
|
42 | 48 | Исключение |
|
62 | 68 | КонецЕсли; |
63 | 69 | КонецПроцедуры |
64 | 70 |
|
| 71 | +Процедура ВывестиСправку() |
| 72 | + Сообщить("Утилита сборки/разборки внешних файлов 1С"); |
| 73 | + Сообщить(" "); |
| 74 | + Сообщить("Параметры командной строки:"); |
| 75 | + Сообщить(" --decompile inputPath outputPath"); |
| 76 | + Сообщить(" Разбор файлов на исходники"); |
| 77 | + |
| 78 | + Сообщить(" --help"); |
| 79 | + Сообщить(" Показ этого экрана"); |
| 80 | +КонецПроцедуры |
| 81 | + |
65 | 82 | Процедура РазобратьКаталог(Знач ПутьКаталога, Знач КаталогВыгрузки) Экспорт |
66 | 83 | Лог.Информация("Подготовка выгрузки каталога "+ПутьКаталога+" в каталог " + КаталогВыгрузки); |
67 | 84 | РазобратьКаталогВнутр(ПутьКаталога, КаталогВыгрузки); |
|
0 commit comments