|
1 | | -#Использовать cli |
2 | | -#Использовать tempfiles |
| 1 | +#Использовать autumn |
| 2 | +#Использовать autumn-logos |
| 3 | +#Использовать autumn-cli |
3 | 4 |
|
4 | 5 | #Использовать "." |
5 | 6 | #Использовать "../core" |
6 | 7 |
|
7 | | -/////////////////////////////////////////////////////////////////////////////// |
8 | | - |
9 | | -// Обработчик выполнения команды |
10 | | -// |
11 | | -// Параметры: |
12 | | -// КомандаПриложения - КомандаПриложения - Выполняемая команда |
13 | | -// |
14 | | -Процедура ВыполнитьКоманду(Знач КомандаПриложения) Экспорт |
15 | | - |
16 | | - КомандаПриложения.ВывестиСправку(); |
17 | | - |
18 | | -КонецПроцедуры |
19 | | - |
20 | | -Процедура ВыполнитьПриложение() |
21 | | - |
22 | | - КонсольноеПриложение = Новый КонсольноеПриложение( |
23 | | - ПараметрыПриложения.ИмяПриложения(), |
24 | | - "OneScript Version Manager v" + ПараметрыПриложения.Версия() |
25 | | - ); |
26 | | - |
27 | | - КонсольноеПриложение.Версия("v version", ПараметрыПриложения.Версия()); |
28 | | - |
29 | | - КонсольноеПриложение.ДобавитьКоманду( |
30 | | - "install i", |
31 | | - "Установить OneScript указанных версий", |
32 | | - Новый КомандаInstall() |
33 | | - ); |
34 | | - КонсольноеПриложение.ДобавитьКоманду( |
35 | | - "use u", |
36 | | - "Использовать OneScript указанной версии", |
37 | | - Новый КомандаUse() |
38 | | - ); |
39 | | - КонсольноеПриложение.ДобавитьКоманду( |
40 | | - "uninstall delete d", |
41 | | - "Удалить OneScript указанных версий", |
42 | | - Новый КомандаUninstall() |
43 | | - ); |
44 | | - КонсольноеПриложение.ДобавитьКоманду( |
45 | | - "list ls", |
46 | | - "Вывести список установленных и/или доступных версий OneScript", |
47 | | - Новый КомандаList() |
48 | | - ); |
49 | | - КонсольноеПриложение.ДобавитьКоманду( |
50 | | - "run r", |
51 | | - "Запустить исполняемый файл в окружении указанной версии OneScript", |
52 | | - Новый КомандаRun() |
53 | | - ); |
54 | | - КонсольноеПриложение.ДобавитьКоманду( |
55 | | - "which w", |
56 | | - "Вывести путь к установленной версии OneScript", |
57 | | - Новый КомандаWhich() |
58 | | - ); |
59 | | - КонсольноеПриложение.ДобавитьКоманду( |
60 | | - "config", |
61 | | - "Настройки ovm. Прокси, сервера и т.п.", |
62 | | - Новый КомандаConfig() |
63 | | - ); |
64 | | - |
65 | | - КонсольноеПриложение.УстановитьОсновноеДействие(ЭтотОбъект); |
66 | | - КонсольноеПриложение.Запустить(АргументыКоманднойСтроки); |
67 | | - |
68 | | -КонецПроцедуры |
69 | | - |
70 | | -Лог = ПараметрыOVM.ПолучитьЛог(); |
71 | | -КодСостояния = 0; |
72 | | -Попытка |
73 | | - ВыполнитьПриложение(); |
74 | | -Исключение |
75 | | - Лог.Ошибка(ОписаниеОшибки()); |
76 | | - КодСостояния = 1; |
77 | | -КонецПопытки; |
78 | | - |
79 | | -ВременныеФайлы.Удалить(); |
80 | | - |
81 | | -ЗавершитьРаботу(КодСостояния); |
| 8 | +Функция НастройкиЛогоса() |
| 9 | + |
| 10 | + НастройкиЛога = Новый Соответствие; |
| 11 | + НастройкиЛога.Вставить("level", "INFO"); |
| 12 | + НастройкиЛога.Вставить("appenders", "logos"); |
| 13 | + НастройкиЛога.Вставить("classlayout", "РаскладкаЛогOVM"); |
| 14 | + |
| 15 | + НастройкиУровнейЛогов = Новый Соответствие; |
| 16 | + НастройкиУровнейЛогов.Вставить("oscript.app.ovm", НастройкиЛога); |
| 17 | + |
| 18 | + НастройкаАппендера = Новый Соответствие; |
| 19 | + НастройкаАппендера.Вставить("type", "АппендерЛогOVM"); |
| 20 | + НастройкаАппендера.Вставить("level", "INFO"); |
| 21 | + |
| 22 | + НастройкиАппендеров = Новый Соответствие; |
| 23 | + |
| 24 | + НастройкиАппендеров.Вставить("logos", НастройкаАппендера); |
| 25 | + |
| 26 | + Результат = Новый Соответствие; |
| 27 | + |
| 28 | + Результат.Вставить("logos.logger", НастройкиУровнейЛогов); |
| 29 | + Результат.Вставить("logos.appender", НастройкиАппендеров); |
| 30 | + |
| 31 | + Возврат Результат; |
| 32 | + |
| 33 | +КонецФункции |
| 34 | + |
| 35 | +СоветДругогоМастера = Новый СоветДругогоМастера; |
| 36 | +СоветДругогоМастера.ЗначенияДеталек(НастройкиЛогоса()); |
| 37 | + |
| 38 | +Поделка = Новый Поделка(СоветДругогоМастера); |
| 39 | + |
| 40 | +УпакованВИсполняемыйФайл = СтрНайти(ТекущийСценарий().Источник, "oscript://") <> 0; |
| 41 | + |
| 42 | +Если УпакованВИсполняемыйФайл Тогда |
| 43 | + Поделка |
| 44 | + .ДобавитьЗаготовку(Тип("ИнициализацияИнтефейсаКоманднойСтроки")) |
| 45 | + .ДобавитьЗаготовку(Тип("ИнициализацияФабрикиЛогов")); |
| 46 | +КонецЕсли; |
| 47 | + |
| 48 | +Поделка |
| 49 | + .ДобавитьАннотацию(Тип("АннотацияЛогOVM")) |
| 50 | + .ДобавитьЖелудь(Тип("ФайлНастроек")) |
| 51 | + .ДобавитьЖелудь(Тип("УстановщикOneScript")) |
| 52 | + .ДобавитьЖелудь(Тип("РаскладкаЛогOVM")) |
| 53 | + .ДобавитьЖелудь(Тип("ПараметрыOVM")) |
| 54 | + .ДобавитьЖелудь(Тип("ПараметрыПриложения")) |
| 55 | + .ДобавитьЖелудь(Тип("ДеинсталляторOneScript")) |
| 56 | + .ДобавитьЖелудь(Тип("ВерсииOneScript")) |
| 57 | + .ДобавитьЖелудь(Тип("АппендерЛогOVM")) |
| 58 | + .ДобавитьЖелудь(Тип("АктиваторOneScript")) |
| 59 | + .ДобавитьЖелудь(Тип("КомандаConfig")) |
| 60 | + .ДобавитьЖелудь(Тип("КомандаInstall")) |
| 61 | + .ДобавитьЖелудь(Тип("КомандаList")) |
| 62 | + .ДобавитьЖелудь(Тип("КомандаRun")) |
| 63 | + .ДобавитьЖелудь(Тип("КомандаUninstall")) |
| 64 | + .ДобавитьЖелудь(Тип("КомандаUse")) |
| 65 | + .ДобавитьЖелудь(Тип("КомандаWhich")); |
| 66 | + |
| 67 | +Поделка.ЗапуститьПриложение(); |
0 commit comments