Skip to content

Добавил заполнение параметра mirror через перечисление #166

New issue

Have a question about this project? Sign up for a free GitHub account to open an issue and contact its maintainers and the community.

Sign up for GitHub

By clicking “Sign up for GitHub”, you agree to our terms of service and privacy statement. We’ll occasionally send you account related emails.

Already on GitHub? Sign in to your account

Merged
merged 1 commit into from
Jun 25, 2019
Merged

Добавил заполнение параметра mirror через перечисление #166

Show file tree
Hide file tree
Changes from all commits
Commits
Show all changes
1 commit
Select commit
File filter

Filter by extension

Filter by extension
Conversations
Failed to load comments.
Loading
Jump to
Jump to file
Failed to load files.
Loading
Diff view
Diff view
11 changes: 10 additions & 1 deletion src/cmd/Классы/КомандаOpm_Install.os
View file
Open in desktop
Original file line number Diff line number Diff line change
Expand Up @@ -9,8 +9,17 @@
КомандаПриложения.Опция("s skip-install-deps", Ложь, "признак пропуска установки зависимых пакетов");
КомандаПриложения.Опция("skip-create-app", Ложь, "признак отключения создания файла запуска");
КомандаПриложения.Опция("d dest", "", "Переопределить стандартный каталог в который устанавливаются пакеты (вместо oscript_modules)");
КомандаПриложения.Опция("m mirror", "", "Указать имя сервера, с которого необходимо ставить пакеты");

ОпцияЗеркала = КомандаПриложения.Опция("m mirror", "", "Указать имя сервера, с которого необходимо ставить пакеты.
| Доступные сервера прописываются в конфигурационном файле opm.cfg, параметр 'СервераПакетов'.")
.ВОкружении("OPM_HUB_MIRROR")
.ТПеречисление();

МенеджерПолучения = Новый МенеджерПолученияПакетов();
Для Каждого ДоступноеЗеркало Из МенеджерПолучения.ИменаДоступныхСерверов() Цикл
ОпцияЗеркала.Перечисление(ДоступноеЗеркало, ДоступноеЗеркало, "Сервер '" + ДоступноеЗеркало + "'");
КонецЦикла;

КомандаПриложения.Аргумент("PACKAGE", "", "Имя пакета в хабе. Чтобы установить конкретную версию, используйте ИмяПакета@ВерсияПакета")
.ТМассивСтрок()
.Обязательный(Ложь);
Expand Down
13 changes: 9 additions & 4 deletions src/cmd/Классы/КомандаOpm_Push.os
View file
Open in desktop
Original file line number Diff line number Diff line change
Expand Up @@ -25,10 +25,15 @@
.Перечисление("stable", "stable", "Канал содержащий стабильные версии пакетов")
.Перечисление("dev", "dev" , "Канал содержащий разработческие версии пакетов")
.ВОкружении("OPM_HUB_CHANNEL");
КомандаПриложения.Опция("m mirror", "СерверУдаленногоХранилища", "Имя сервера для публикации.
| Доступные сервера прописываются в конфигурационном файле opm.cfg, параметр 'СервераПакетов'.
| По умолчанию используется 'СерверУдаленногоХранилища'.")
.ВОкружении("OPM_HUB_MIRROR");
ОпцияЗеркала = КомандаПриложения.Опция("m mirror", "СерверУдаленногоХранилища", "Имя сервера для публикации.
| Доступные сервера прописываются в конфигурационном файле opm.cfg, параметр 'СервераПакетов'.")
.ВОкружении("OPM_HUB_MIRROR")
.ТПеречисление();

МенеджерПолучения = Новый МенеджерПолученияПакетов();
Для Каждого ДоступноеЗеркало Из МенеджерПолучения.ИменаДоступныхСерверов() Цикл
ОпцияЗеркала.Перечисление(ДоступноеЗеркало, ДоступноеЗеркало, "Сервер '" + ДоступноеЗеркало + "'");
КонецЦикла;

КомандаПриложения.Аргумент("FILE", "", "Маска или имя файла пакета.")
.Обязательный(Ложь);
Expand Down
10 changes: 10 additions & 0 deletions src/cmd/Классы/КомандаOpm_Update.os
View file
Open in desktop
Original file line number Diff line number Diff line change
Expand Up @@ -10,6 +10,16 @@
КомандаПриложения.Опция("skip-create-app", Ложь, "признак отключения создания файла запуска");
КомандаПриложения.Опция("m mirror", "", "Указать имя сервера, с которого необходимо ставить пакеты");

ОпцияЗеркала = КомандаПриложения.Опция("m mirror", "", "Указать имя сервера, с которого необходимо ставить пакеты.
| Доступные сервера прописываются в конфигурационном файле opm.cfg, параметр 'СервераПакетов'.")
.ВОкружении("OPM_HUB_MIRROR")
.ТПеречисление();

МенеджерПолучения = Новый МенеджерПолученияПакетов();
Для Каждого ДоступноеЗеркало Из МенеджерПолучения.ИменаДоступныхСерверов() Цикл
ОпцияЗеркала.Перечисление(ДоступноеЗеркало, ДоступноеЗеркало, "Сервер '" + ДоступноеЗеркало + "'");
КонецЦикла;

КомандаПриложения.Аргумент("PACKAGE", "", "Имя пакета в хабе. Чтобы установить конкретную версию, используйте ИмяПакета@ВерсияПакета")
.ТМассивСтрок()
.Обязательный(Ложь);
Expand Down
20 changes: 20 additions & 0 deletions src/core/Классы/МенеджерПолученияПакетов.os
View file
Open in desktop
Original file line number Diff line number Diff line change
Expand Up @@ -203,6 +203,26 @@

КонецПроцедуры

// ИменаДоступныхСерверов
// Возвращает список доступных серверов-зеркал с пакетами
// Возвращаемое значение:
// Массив - Список имен
//
Функция ИменаДоступныхСерверов() Экспорт

ИменаПакетов = Новый Массив();
СервераПакетов = НастройкиOpm.ПолучитьНастройки().СервераПакетов;

Для каждого НастройкаСервера Из СервераПакетов Цикл

ИменаПакетов.Добавить(НастройкаСервера.Имя);

КонецЦикла;

Возврат ИменаПакетов;

КонецФункции

Функция СоздатьСерверПакетовПоНастройке(Знач НастройкаСервера)

Возврат Новый СерверПакетов(НастройкаСервера.Имя,
Expand Down