oscript-library#216 Тесты под новый формат конфига.

features/step_definitions/Настройки.os

@@ -32,10 +32,8 @@
 //я читаю настройки из файла "opm.cfg"
 Процедура ЯЧитаюНастройкиИзФайла(Знач ПутьФайла) Экспорт
 	Файл = Новый Файл(ОбъединитьПути(ТекущийКаталог(), ПутьФайла));
-	// Ожидаем.Что(Файл.Существует(), СтрШаблон("Ожидали, что файл <%1> существует, а это не так!", Файл.ПолноеИмя)).ЭтоИстина();
 	НастройкиOpm.СброситьНастройки();
 	НастроитьOpmИзФайла(Файл.ПолноеИмя);
-	// НастройкиOpm.УстановитьФайлНастроек(Файл.ПолноеИмя);
 
 	Настройки = НастройкиOpm.ПолучитьНастройки();
 	БДД.СохранитьВКонтекст(КлючКонтекста(), Настройки);
@@ -88,7 +86,7 @@
 
 	Если Не НастройкиПроксиЕсть = Неопределено  Тогда
 
-		НастройкиПрокси = НастройкиOpmИзФайлов.Прокси;
+		НастройкиПрокси = НастройкиКакСтруктура(НастройкиOpmИзФайлов.Прокси);
 
 		Сервер = ПолучитьЗначение(НастройкиПрокси, "Сервер", "");
 		Порт = Число(ПолучитьЗначение(НастройкиПрокси, "Порт", 0));
@@ -129,20 +127,15 @@
 		Индекс = 1;
 
 		Для каждого ТекущийСерверПакетов Из СервераПакетов Цикл
-
-			Сервер = ПолучитьЗначение(ТекущийСерверПакетов, "Сервер", "");
-			Порт = Число(ПолучитьЗначение(ТекущийСерверПакетов, "Порт", 80));
-			ПутьНаСервере = ПолучитьЗначение(ТекущийСерверПакетов, "ПутьНаСервере", "/");
-			РесурсПубликацииПакетов = ПолучитьЗначение(ТекущийСерверПакетов, "РесурсПубликацииПакетов", "/");
-			Имя = ПолучитьЗначение(ТекущийСерверПакетов, "Имя", СтрШаблон("ДопСервер_%1",Индекс));
-			Приоритет = Число(ПолучитьЗначение(ТекущийСерверПакетов, "Приоритет", 0));
-
-			Если ПустаяСтрока(Сервер) Тогда
+
+			Попытка
+				СерверПакетов = СерверыПакетов.ИзНастроек(НастройкиКакСтруктура(ТекущийСерверПакетов), Индекс);
+			Исключение
 				Продолжить;
-			КонецЕсли;
-
-			НастройкиOpm.ДобавитьТекущийСерверПакетов(Имя, Сервер, ПутьНаСервере, РесурсПубликацииПакетов, Порт, Приоритет);
-			Индекс = Индекс +1;
+			КонецПопытки;
+			
+			НастройкиOpm.ДобавитьСерверПакетов(СерверПакетов);
+			Индекс = Индекс + 1;
 
 		КонецЦикла;
 
@@ -153,16 +146,29 @@
 Функция ПрочитатьФайлНастроек(Знач ПутьФайлаНастроек)
 
 	Если НЕ Новый Файл(ПутьФайлаНастроек).Существует() Тогда
-		Возврат НОвый Соответствие;
+		Возврат Новый Структура;
 	КонецЕсли;
 
 	Текст = ПрочитатьФайл(ПутьФайлаНастроек);
 
 	ЧтениеJSON = Новый ЧтениеJSON();
 	ЧтениеJSON.УстановитьСтроку(Текст);
-	Настройки = ПрочитатьJSON(ЧтениеJSON, Ложь);
+	НастройкиКакСоответствие = ПрочитатьJSON(ЧтениеJSON, Истина);
 	ЧтениеJSON.Закрыть();
+
+	Возврат НастройкиКакСтруктура(НастройкиКакСоответствие);
+
+КонецФункции
+
+Функция НастройкиКакСтруктура(Знач НастройкиКакСоответствие)
 
+	Перем Настройки;
+
+	Настройки = Новый Структура;
+	Для Каждого мЭлемент Из НастройкиКакСоответствие Цикл
+		Настройки.Вставить(мЭлемент.Ключ, мЭлемент.Значение);
+	КонецЦикла;
+
 	Возврат Настройки;
 
 КонецФункции

src/cmd/Модули/ПараметрыПриложенияOpm.os

@@ -226,12 +226,15 @@
 
 Функция НастройкиКакСтруктура(Знач НастройкиКакСоответствие)
 
+	Перем Настройки;
+
 	Настройки = Новый Структура;
 	Для Каждого мЭлемент Из НастройкиКакСоответствие Цикл
 		Настройки.Вставить(мЭлемент.Ключ, мЭлемент.Значение);
 	КонецЦикла;
 
 	Возврат Настройки;
+
 КонецФункции
 
 Функция ПрочитатьФайл(Знач Путь)

tests/fixtures/opm-servers.cfg

@@ -11,7 +11,11 @@
             "Имя":"mylocalhost",
             "Сервер": "http://localhost",
             "Порт": 8000,
-            "ПутьНаСервере":"/"
+            "ПутьНаСервере":"/",
+            "Авторизация": "",
+            "Заголовки": {
+                "X-Dummy": "${USERNAME}"
+            }
         }
     ]
 }

tests/packagelist.os

@@ -17,6 +17,9 @@
 КонецФункции
 
 Процедура ПередЗапускомТеста() Экспорт
+	// Завязаны на основной хаб.
+	НастройкиOpm.СброситьНастройки();
+	НастройкиOpm.ДобавитьСерверПакетов(СерверыПакетов.ОсновнойСервер());
 КонецПроцедуры
 
 Процедура ПослеЗапускаТеста() Экспорт