Skip to content

Commit ac39612

Browse files
Merge pull request #342 from ovcharenko-di/fix/exe-cleanup
Удаление следов сборки exe, форматирование модулей
2 parents aa3f4ee + 80d14b1 commit ac39612

15 files changed

+152
-246
lines changed

.bsl-language.server.json

Lines changed: 1 addition & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -4,7 +4,7 @@
44
"parameters": {
55
"Typo": {
66
"minWordLength": 3,
7-
"userWordsToIgnore": "Гитсинк"
7+
"userWordsToIgnore": "автопоиск,Гитсинк,закоммитить,Коммитом,Коммите,Коммита,коммита,Коммитами,Репо,Сохр"
88
}
99
}
1010
}

src/cmd/gitsync.os

Lines changed: 7 additions & 17 deletions
Original file line numberDiff line numberDiff line change
@@ -1,17 +1,13 @@
1-
///////////////////////////////////////////////////////////////////
2-
//
3-
#Использовать cli
1+
#Использовать cli
42
#Использовать tempfiles
53
#Использовать "../core"
64
#Использовать "."
75

8-
Перем Лог;
9-
Перем Плагины;
10-
Перем ВерсияПлатформы;
11-
Перем ВыводДополнительнойИнформации;
12-
Перем ВременныйКаталогРаботы;
13-
Перем ДоменПочты;
14-
///////////////////////////////////////////////////////////////////////////////
6+
Перем Лог; // Логгер
7+
Перем ВерсияПлатформы; // Версия платформы
8+
Перем ВыводДополнительнойИнформации; // Флаг включения вывода подробной информации
9+
Перем ВременныйКаталогРаботы; // Временный каталог
10+
Перем ДоменПочты; // Домент почты
1511

1612
Процедура ВыполнитьПриложение()
1713

@@ -40,10 +36,6 @@
4036
.ТСтрока()
4137
.ВОкружении("GITSYNC_IB_CONNECTION GITSYNC_IBCONNECTION");
4238

43-
// Приложение.Опция("p plugins", "", "плагины к загрузке и исполнению (дополнительное ограничение)")
44-
// .ТМассивСтрок()
45-
// .ВОкружении("GITSYNC_RUN_PLUGINS");
46-
4739
Приложение.Опция("t tempdir", "", "путь к каталогу временных файлов")
4840
.ВОкружении("GITSYNC_TEMP GITSYNC_TEMPDIR");
4941

@@ -68,11 +60,9 @@
6860
Приложение.ДобавитьКоманду("plugins p", "Управление плагинами gitsync",
6961
Новый КомандаPlugins);
7062

71-
// Приложение.УстановитьДействиеПередВыполнением(ЭтотОбъект, "ПередВыполнениемКоманды"); // TODO: Расскоментировать при исправлении ошибки в cli
72-
7363
Приложение.Запустить(АргументыКоманднойСтроки);
7464

75-
КонецПроцедуры // ВыполнениеКоманды()
65+
КонецПроцедуры
7666

7767
Процедура ВыполнитьКоманду(Знач КомандаПриложения) Экспорт
7868

src/cmd/Классы/КомандаPluginInstall.os

Lines changed: 0 additions & 9 deletions
Original file line numberDiff line numberDiff line change
@@ -17,15 +17,6 @@
1717

1818
Процедура ВыполнитьКоманду(Знач Команда) Экспорт
1919

20-
Если ПараметрыПриложения.ЭтоСборкаEXE() Тогда
21-
22-
Лог.Информация("Установка новых плагинов для собранного приложения в exe не доступна");
23-
24-
Возврат;
25-
26-
КонецЕсли;
27-
28-
2920
ПакетыКУстановке = Команда.ЗначениеАргумента("NAME");
3021
МассивФайловПлагинов = Команда.ЗначениеОпции("file");
3122

src/cmd/Классы/КомандаPlugins.os

Lines changed: 1 addition & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -4,7 +4,7 @@
44
Команда.ДобавитьПодкоманду("list ls", "Вывод списка плагинов", Новый КомандаPluginList);
55
Команда.ДобавитьПодкоманду("install i", "Установка новых плагинов", Новый КомандаPluginInstall);
66
Команда.ДобавитьПодкоманду("enable e", "Активизация установленных плагинов", Новый КомандаPluginEnable);
7-
Команда.ДобавитьПодкоманду("disable d", "Деактивизация установленных плагинов", Новый КомандаPluginDisable);
7+
Команда.ДобавитьПодкоманду("disable d", "Деактивация установленных плагинов", Новый КомандаPluginDisable);
88
Команда.ДобавитьПодкоманду("clear c", "Очистка установленных плагинов", Новый КомандаPluginsClear);
99
Команда.ДобавитьПодкоманду("help h", "Вывод справки по выбранным плагинам", Новый КомандаPluginHelp);
1010
Команда.ДобавитьПодкоманду("init", "Инициализация предустановленных плагинов", Новый КомандаPluginsInit);

src/cmd/Классы/КомандаPluginsClear.os

Lines changed: 0 additions & 8 deletions
Original file line numberDiff line numberDiff line change
@@ -12,14 +12,6 @@
1212

1313
Процедура ВыполнитьКоманду(Знач Команда) Экспорт
1414

15-
Если ПараметрыПриложения.ЭтоСборкаEXE() Тогда
16-
17-
Лог.Информация("Очистка плагинов для собранного приложения в exe не доступна");
18-
19-
Возврат;
20-
21-
КонецЕсли;
22-
2315
УдалитьПредустановленныеПлагины = Команда.ЗначениеОпции("-a");
2416

2517
КаталогПлагинов = ПараметрыПриложения.КаталогПлагинов();

src/cmd/Классы/КомандаUsage.os

Lines changed: 105 additions & 127 deletions
Original file line numberDiff line numberDiff line change
@@ -7,186 +7,164 @@
77
Перем Лог;
88

99
Процедура ОписаниеКоманды(Команда) Экспорт
10-
10+
1111
Команда.Аргумент("COMMAND", "", "Команда для вывода подробностей использования").ТСтрока().Обязательный(Ложь);
12-
12+
1313
КонецПроцедуры
1414

1515
Процедура ВыполнитьКоманду(Знач Команда) Экспорт
16-
17-
ИмяКоманды = Команда.ЗначениеАргумента("COMMAND");
18-
16+
17+
ИмяКоманды = Команда.ЗначениеАргумента("COMMAND");
18+
1919
Если ПустаяСтрока(ИмяКоманды) Тогда
2020
ВывестиОбщееИспользование();
2121
Иначе
2222
ВывестиИспользованиеКоманды(НРег(ИмяКоманды));
2323
КонецЕсли;
24-
24+
2525
КонецПроцедуры
2626

2727
Процедура ВывестиОбщееИспользование()
28-
28+
2929
ТекстОбщегоОписания = "
30-
| Общее описание сценария использования:
31-
|
32-
| Для начала выполнения синхронизации необходимо выполнить подготовку рабочей копии:
33-
|
34-
| I Порядок настройки:
35-
|
36-
| 1. Активизация нужных плагинов:
37-
|
38-
| активизация указанных плагинов
39-
| > %1 plugins enable ИМЯПЛАГИНА1 ИМЯПЛАГИНА2
40-
| активизация всех плагинов
41-
| > %1 plugins enable -a
42-
| интерактивный выбор плагинов
43-
| > %1 plugins enable
44-
|
45-
| Подробные описание использования команды <plugins>:
46-
|
47-
| > %1 usage plugins
48-
|
49-
| 2. Настройка переменных окружения (можно пропустить и указывать в строке использования):
50-
|
51-
| Общие переменные окружения:
52-
| *GITSYNC_WORKDIR - рабочий каталог для команд gitsync
53-
| *GITSYNC_V8VERSION - маска версии платформы (8.3, 8.3.5, 8.3.6.2299 и т.п.)
54-
| *GITSYNC_TEMP - путь к каталогу временных файлов
55-
| *GITSYNC_VERBOSE - вывод отладочной информации в процессе выполнения
56-
|
57-
| Дополнительные переменные окружения можно посмотреть
58-
| в справке соответствующей команды
59-
|
60-
| II Порядок использования:
61-
|
62-
| 1. Создание рабочей копии (можно пропустить если уже есть):
63-
|
64-
| Инициализация или клонирование существующего git-репозитория и подготовка начальных данных:
65-
| > %1 init
66-
| или
67-
| > %1 clone
68-
|
69-
| Подробные описание использования:
70-
|
71-
| > %1 usage init
72-
| или
73-
| > %1 usage clone
74-
|
75-
| 2. Установка уже синхронизированной версии (если требуется):
76-
|
77-
| > %1 setversion
78-
|
79-
| Подробное описание использования команды <setversion>:
80-
|
81-
| > %1 usage setversion
82-
|
83-
| 3. Выполнение синхронизации хранилища 1С с git репозиторием:
84-
|
85-
| > %1 sync
86-
|
87-
| Подробное описание использования команды <sync>:
88-
|
89-
| > %1 usage sync
90-
|";
91-
30+
| Общее описание сценария использования:
31+
|
32+
| Для начала выполнения синхронизации необходимо выполнить подготовку рабочей копии:
33+
|
34+
| I Порядок настройки:
35+
|
36+
| 1. Активизация нужных плагинов:
37+
|
38+
| активизация указанных плагинов
39+
| > %1 plugins enable ИМЯПЛАГИНА1 ИМЯПЛАГИНА2
40+
| активизация всех плагинов
41+
| > %1 plugins enable -a
42+
| интерактивный выбор плагинов
43+
| > %1 plugins enable
44+
|
45+
| Подробные описание использования команды <plugins>:
46+
|
47+
| > %1 usage plugins
48+
|
49+
| 2. Настройка переменных окружения (можно пропустить и указывать в строке использования):
50+
|
51+
| Общие переменные окружения:
52+
| *GITSYNC_WORKDIR - рабочий каталог для команд gitsync
53+
| *GITSYNC_V8VERSION - маска версии платформы (8.3, 8.3.5, 8.3.6.2299 и т.п.)
54+
| *GITSYNC_TEMP - путь к каталогу временных файлов
55+
| *GITSYNC_VERBOSE - вывод отладочной информации в процессе выполнения
56+
|
57+
| Дополнительные переменные окружения можно посмотреть
58+
| в справке соответствующей команды
59+
|
60+
| II Порядок использования:
61+
|
62+
| 1. Создание рабочей копии (можно пропустить если уже есть):
63+
|
64+
| Инициализация или клонирование существующего git-репозитория и подготовка начальных данных:
65+
| > %1 init
66+
| или
67+
| > %1 clone
68+
|
69+
| Подробные описание использования:
70+
|
71+
| > %1 usage init
72+
| или
73+
| > %1 usage clone
74+
|
75+
| 2. Установка уже синхронизированной версии (если требуется):
76+
|
77+
| > %1 setversion
78+
|
79+
| Подробное описание использования команды <setversion>:
80+
|
81+
| > %1 usage setversion
82+
|
83+
| 3. Выполнение синхронизации хранилища 1С с git репозиторием:
84+
|
85+
| > %1 sync
86+
|
87+
| Подробное описание использования команды <sync>:
88+
|
89+
| > %1 usage sync
90+
|";
91+
9292
ВывестиОписание(ТекстОбщегоОписания);
93-
93+
9494
КонецПроцедуры
9595

9696
Процедура ВывестиИспользованиеКоманды(Знач ИмяКоманды)
97-
97+
9898
ИмяКомандыСправки = "";
99-
99+
100100
Если ИмяКоманды = "init"
101-
или ИмяКоманды = "i" Тогда
101+
ИЛИ ИмяКоманды = "i" Тогда
102102
ИмяКомандыСправки = "init";
103-
ИначеЕсли ИмяКоманды = "clone"
104-
или ИмяКоманды = "c" Тогда
103+
ИначеЕсли ИмяКоманды = "clone"
104+
ИЛИ ИмяКоманды = "c" Тогда
105105
ИмяКомандыСправки = "clone";
106-
ИначеЕсли ИмяКоманды = "sync"
107-
или ИмяКоманды = "s" Тогда
106+
ИначеЕсли ИмяКоманды = "sync"
107+
ИЛИ ИмяКоманды = "s" Тогда
108108
ИмяКомандыСправки = "sync";
109109
ИначеЕсли ИмяКоманды = "setversion"
110-
или ИмяКоманды = "sv" Тогда
110+
ИЛИ ИмяКоманды = "sv" Тогда
111111
ИмяКомандыСправки = "set-version";
112-
ИначеЕсли ИмяКоманды = "plugins"
113-
или ИмяКоманды = "p" Тогда
112+
ИначеЕсли ИмяКоманды = "plugins"
113+
ИЛИ ИмяКоманды = "p" Тогда
114114
ИмяКомандыСправки = "plugins";
115115
Иначе
116116
ИмяКомандыСправки = "usage";
117117
КонецЕсли;
118-
118+
119119
ВывестиОписаниеДляКоманды(ИмяКомандыСправки);
120-
120+
121121
КонецПроцедуры
122122

123123
Процедура ВывестиОписание(Знач ТекстОписания)
124124

125125
ИтоговаяСправка = ТекстОписания;
126126

127127
МассивСтрокВывода = СтрРазделить(ИтоговаяСправка, Символы.ПС);
128-
129-
Для каждого СтрокаВывода Из МассивСтрокВывода Цикл
130-
Если СтрНачинаетсяС(СокрЛП(Строкавывода), "*") Тогда
131-
СтрокаВывода = СтрЗаменить(СтрокаВывода, "*", " ");
132-
Консоль.ВывестиСтроку(Строкавывода);
133128

134-
ИначеЕсли СтрНачинаетсяС(СокрЛП(Строкавывода), ">") Тогда
129+
Для Каждого СтрокаВывода Из МассивСтрокВывода Цикл
130+
Если СтрНачинаетсяС(СокрЛП(Строкавывода), "*") Тогда
131+
СтрокаВывода = СтрЗаменить(СтрокаВывода, "*", " ");
132+
Консоль.ВывестиСтроку(Строкавывода);
133+
134+
ИначеЕсли СтрНачинаетсяС(СокрЛП(Строкавывода), ">") Тогда
135135
Консоль.ВывестиСтроку(Строкавывода);
136136
Иначе
137137
Консоль.ВывестиСтроку(Строкавывода);
138138
КонецЕсли;
139139
КонецЦикла;
140-
140+
141141
КонецПроцедуры
142142

143143
Процедура ВывестиОписаниеДляКоманды(Знач ИмяКоманды)
144-
144+
145145
ИмяФайла = СтрШаблон("%1.md", ИмяКоманды);
146-
147-
Если ПараметрыПриложения.ЭтоСборкаEXE() Тогда
148-
149-
ЗагрузчикЗапакованныхФайловGitsync = Новый ЗагрузчикЗапакованныхФайловGitsync;
150-
ТекстОписанияКоманды = ПрочитатьФайл(ЗагрузчикЗапакованныхФайловGitsync.ПолучитьПутьКФайлу(ИмяФайла));
151-
152-
Иначе
153-
154-
КаталогДокументации = ОбъединитьПути(ОбъединитьПути(ТекущийСценарий().Каталог, "..","..", ".."),"docs");
155-
ТекстОписанияКоманды = ПрочитатьФайл(ОбъединитьПути(КаталогДокументации, ИмяФайла));
156-
157-
КонецЕсли;
158-
146+
147+
КаталогДокументации = ОбъединитьПути(ОбъединитьПути(ТекущийСценарий().Каталог, "..", "..", ".."), "docs");
148+
ТекстОписанияКоманды = ПрочитатьФайл(ОбъединитьПути(КаталогДокументации, ИмяФайла));
149+
159150
ВывестиОписание(ТекстОписанияКоманды);
160-
151+
161152
КонецПроцедуры
162153

163-
Функция Инициализация()
164-
165-
СистемнаяИнформация = Новый СистемнаяИнформация;
166-
ЭтоWindows = Найти(НРег(СистемнаяИнформация.ВерсияОС), "windows") > 0;
167-
154+
Процедура Инициализация()
155+
168156
Лог = ПараметрыПриложения.Лог();
169-
170-
КонецФункции
157+
158+
КонецПроцедуры
171159

172160
Функция ПрочитатьФайл(Знач ИмяФайла)
173-
174-
Чтение = Новый ЧтениеТекста(ИмяФайла, КодировкаТекста.UTF8);
175-
Рез = Чтение.Прочитать();
176-
Чтение.Закрыть();
177-
178-
Возврат Рез;
179-
180-
КонецФункции // ПрочитатьФайл()
181-
182-
Функция ЦветаКонсоли() Экспорт
183161

184-
Цвета = Новый Структура;
185-
// Цвета.Вставить("ЦветСписка", ЦветКонсоли.Желтый);
186-
// Цвета.Вставить("ЦветКоманды", ЦветКонсоли.Зеленый);
187-
188-
Возврат Цвета;
189-
162+
Чтение = Новый ЧтениеТекста(ИмяФайла, КодировкаТекста.UTF8);
163+
Рез = Чтение.Прочитать();
164+
Чтение.Закрыть();
165+
166+
Возврат Рез;
167+
190168
КонецФункции
191169

192170
Инициализация();

0 commit comments

Comments
 (0)