Skip to content

Commit

Permalink
Merge branch 'release/v.1.1.2'
Browse files Browse the repository at this point in the history
  • Loading branch information
arkuznetsov committed Sep 9, 2021
2 parents d5e781b + ac25478 commit 16b3713
Show file tree
Hide file tree
Showing 4 changed files with 28 additions and 35 deletions.
2 changes: 1 addition & 1 deletion packagedef
Original file line number Diff line number Diff line change
@@ -1,6 +1,6 @@

Описание.Имя("irac")
.Версия("1.1.1")
.Версия("1.1.2")
.Автор("Artem Kuznetsov")
.АдресАвтора("[email protected]")
.Описание("Библиотека администрирования кластера серверов 1С")
Expand Down
22 changes: 13 additions & 9 deletions readme.md
Original file line number Diff line number Diff line change
Expand Up @@ -155,16 +155,17 @@
Основной класс библиотеки. Предоставляет интерфейс управления серверами 1С.

```bsl
УправлениеКластером = Новый УправлениеКластером1С("localhost", 1545, "8.3.10", "admin", "P@ssw0rd");
Админ = Новый Структура("Администратор, Пароль", "admin", "P@ssw0rd")
УправлениеКластером = Новый УправлениеКластером1С("8.3.10", "localhost:1545", Админ);
```

| Параметры конструктора |||
|-|-|-|
| **АдресСервера** |Строка|имя сервера агента администрирования (RAS)|
| **ПортСервера** |Число|порт сервера агента администрирования (RAS)|
| **ВерсияИлиПутьКРАК** |Строка|маска версии 1С или путь к утилите RAC|
| **Администратор** |Строка|администратор агента сервера 1С|
| **ПарольАдминистратора** |Строка|пароль администратора агента сервера 1С|
| **ВерсияИлиПутьКУтилитеАдминистрирования** |Строка|маска версии 1С или путь к утилите RAC|
| **СтрокаПодключенияСервиса** |Строка|адрес:порт сервиса агента администрирования (RAS) (по умолчанию: "localhost:1545")|
| **Администратор** |Структура|параметры администратора агента сервера 1С|
|    *- Администратор* |    *Строка* |    *имя администратора агента сервера 1С*|
|    *- Пароль* |    *Строка* |    *пароль администратора агента сервера 1С*|

| Методы |||
|-|-|-|
Expand All @@ -184,7 +185,8 @@
Вспомогательный объект для выполнения команд. Непосредственно вызывает утилиту RAC.

```bsl
УправлениеКластером = Новый УправлениеКластером1С("localhost", 1545, "8.3.10", "admin", "P@ssw0rd");
Админ = Новый Структура("Администратор, Пароль", "admin", "P@ssw0rd")
УправлениеКластером = Новый УправлениеКластером1С("8.3.10", "localhost:1545", Админ);
УправлениеКластером.УстановитьИсполнительКоманд(Новый ИсполнительКоманд("8.3"));
```

Expand All @@ -206,12 +208,14 @@
Объект предоставляет доступ к списку кластеров, доступных для администрирования.

```bsl
УправлениеКластером = Новый УправлениеКластером1С("localhost", 1545, "8.3.10", "admin", "P@ssw0rd");
Админ = Новый Структура("Администратор, Пароль", "admin", "P@ssw0rd")
УправлениеКластером = Новый УправлениеКластером1С("8.3.10", "localhost:1545", Админ);
СписокКластеров = Новый Кластеры(УправлениеКластером);
```

```bsl
УправлениеКластером = Новый УправлениеКластером1С("localhost", 1545, "8.3.10", "admin", "P@ssw0rd");
Админ = Новый Структура("Администратор, Пароль", "admin", "P@ssw0rd")
УправлениеКластером = Новый УправлениеКластером1С("8.3.10", "localhost:1545", Админ);
СписокКластеров = УправлениеКластером.Кластеры();
```

Expand Down
21 changes: 14 additions & 7 deletions src/Классы/КомандыОбъекта.os
Original file line number Diff line number Diff line change
Expand Up @@ -130,14 +130,14 @@
Если АвторизацияАгента Тогда
ДобавитьПараметрыАвторизации(Перечисления.РежимыАдминистрирования.Агенты,
"ПараметрыАвторизацииАгента",
"agent");
"agent");
КонецЕсли;

Если Команда.Кластер Тогда
ДобавитьИменованныйПараметр("cluster", "ИдентификаторКластера", Истина);
ДобавитьПараметрыАвторизации(Перечисления.РежимыАдминистрирования.Кластеры,
"ПараметрыАвторизацииКластера",
ЗначенияПараметров["ИдентификаторКластера"]);
"ПараметрыАвторизацииКластера",
ЗначенияПараметров["ИдентификаторКластера"]);
КонецЕсли;

Если ТипОбъекта.Свойство("Владелец") И Команда.ДочернийРежимАдминистрирования Тогда
Expand Down Expand Up @@ -385,11 +385,11 @@
Параметр = "";
КонецЕсли;

Если НЕ ЗначениеЗаполнено(Параметр) И Обязательный Тогда
Если НЕ Параметр = Неопределено И Обязательный Тогда
ВызватьИсключение СтрШаблон("Не заполнен обязательный параметр %1!", Имя);
КонецЕсли;

Если ЗначениеЗаполнено(Параметр) ИЛИ ДобавлятьПустой Тогда
Если Параметр = Неопределено ИЛИ ДобавлятьПустой Тогда
ПараметрыЗапуска.Добавить(Параметр);
КонецЕсли;

Expand Down Expand Up @@ -450,9 +450,16 @@
//
Процедура ДобавитьИменованныйПараметр(Знач ПараметрРАК, Знач ИмяЗначения, Знач Обязательный = Ложь)

Для Каждого ТекПараметр Из ПараметрыЗапуска Цикл
Если ТипЗнч(ТекПараметр) = Тип("Структура")
И ВРег(ТекПараметр.Параметр) = ВРег(ПараметрРАК) Тогда
Возврат;
КонецЕсли;
КонецЦикла;

ЗначениеПараметра = ЗначенияПараметров.Получить(ИмяЗначения);

Если НЕ ЗначениеЗаполнено(ЗначениеПараметра) Тогда
Если ЗначениеПараметра = Неопределено Тогда
Если Обязательный Тогда
ВызватьИсключение СтрШаблон("Не заполнен обязательный параметр %1!", ИмяЗначения);
Иначе
Expand All @@ -463,7 +470,7 @@
Если ТипЗнч(ЗначениеПараметра) = Тип("Число") Тогда
ЗначениеПараметра = Формат(ЗначениеПараметра, "ЧРГ=' '; ЧГ=0");
ИначеЕсли ТипЗнч(ЗначениеПараметра) = Тип("Дата") Тогда
ЗначениеПараметра = Формат(ЗначениеПараметра, "ДФ='гггг-ММ-ддTчч:мм:сс'");
ЗначениеПараметра = Формат(ЗначениеПараметра, "ДФ='гггг-ММ-ддTЧЧ:мм:сс'");
ИначеЕсли ТипЗнч(ЗначениеПараметра) = Тип("Строка")
И (СтрНайти(ЗначениеПараметра, " ") > 0 ИЛИ СтрНайти(ЗначениеПараметра, """") > 0) Тогда
ЗначениеПараметра = Служебный.ОбернутьВКавычки(ЗначениеПараметра);
Expand Down
18 changes: 0 additions & 18 deletions tasks/testib001.os

This file was deleted.

0 comments on commit 16b3713

Please sign in to comment.