Добавлен провайдер параметров обёртка над соответствием

Author: sfaqer

src/Классы/internal/Классы/ПровайдерПараметровСоответствие.os

@@ -0,0 +1,63 @@
+#Использовать logos
+
+Перем Лог;
+Перем мПараметры;
+
+Процедура ПриСозданииОбъекта(Параметры)
+
+	Если ТипЗнч(Параметры) <> Тип("Соответствие") Тогда
+		ВызватьИсключение
+			"Для провайдера параметров Соответствие, источником параметров может быть только соответствие";
+	КонецЕсли;
+
+	мПараметры = Параметры;
+	Лог = Логирование.ПолучитьЛог("oscript.lib.configor.map");
+
+КонецПроцедуры
+
+#Область ПрограммныйИнтерфейс
+
+// Возвращает приоритет провайдера
+//
+//  Возвращаемое значение:
+//   Число - текущий приоритет провайдера
+//
+Функция Приоритет() Экспорт
+	Возврат 3;
+КонецФункции
+
+// Возвращает идентификатор провайдера
+//
+//  Возвращаемое значение:
+//   Строка - текущий идентификатор провайдера
+//
+Функция Идентификатор() Экспорт
+	Возврат "map";
+КонецФункции
+
+// Возвращает тип провайдера
+//
+//  Возвращаемое значение:
+//   Строка - текущий тип провайдера
+//
+Функция ТипПровайдера() Экспорт
+	Возврат "memory";
+КонецФункции
+
+// Выполняет чтение параметров для провайдера
+//
+// Параметры:
+//   НастройкиПровайдера - Структура - структура настроек провайдера
+//
+//  Возвращаемое значение:
+//   Соответствие - результат чтения провайдера
+//
+Функция ПрочитатьПараметры(НастройкиПровайдера) Экспорт
+
+	Лог.Отладка("Считываю параметры из соответствия");
+
+	Возврат мПараметры;
+
+КонецФункции
+
+#КонецОбласти

tests/ПровайдерПараметровСоответствие.os

@@ -0,0 +1,48 @@
+#использовать "../src/"
+#Использовать asserts
+
+&Тест
+Процедура ПроверитьПолучениеПараметровИзСоответствия() Экспорт
+
+	// Дано
+
+	Массив = Новый Массив;
+	Массив.Добавить(2);
+
+	Соответствие = Новый Соответствие;
+	Соответствие.Вставить("Тест1", 1);
+	Соответствие.Вставить("Тест2", Массив);
+
+	// Когда
+
+	МенеджерПараметров = Новый МенеджерПараметров();
+
+	МенеджерПараметров.ДобавитьПровайдерПараметров(Новый ПровайдерПараметровСоответствие(Соответствие));
+
+	МенеджерПараметров.Прочитать();
+
+	// Тогда
+
+	Ожидаем.Что(МенеджерПараметров.Параметр("Тест1")).Равно(1);
+	Ожидаем.Что(МенеджерПараметров.Параметр("Тест2")[0]).Равно(2);
+
+КонецПроцедуры
+
+&Тест
+Процедура ПроверитьОшибкуПриПередачиДругогоИсточника() Экспорт
+
+	БылоИсключение = Ложь;
+
+	Попытка
+		А = Новый ПровайдерПараметровСоответствие(Новый Массив);
+	Исключение
+
+		БылоИсключение = Истина;
+
+		Ожидаем.Что(ИнформацияОбОшибке().Описание)
+			.Содержит("Для провайдера параметров Соответствие, источником параметров может быть только соответствие");
+	КонецПопытки;
+
+	Ожидаем.Что(БылоИсключение).ЭтоИстина();
+
+КонецПроцедуры