Добавлена логика формирования строки соединения

Сделано для упрощения понимания

Author: zeltyr

src/v8runner.os

@@ -2544,6 +2544,64 @@
 
 КонецФункции
 
+Функция СформироватьСтрокуСоединения(ПараметрыСтрокиСоединения) Экспорт
+
+	Если ТипЗнч(ПараметрыСтрокиСоединения) <> Тип("Структура") Тогда
+		Возврат "";
+	КонецЕсли;
+
+	Если ПараметрыСтрокиСоединения.Свойство("ЭтоФайловыйВариант") Тогда
+		СтрокаСоединения = СтрШаблон("/F""%1""", ПараметрыСтрокиСоединения.ПутьКБазе);
+	Иначе
+		СтрокаСоединения = СтрШаблон(
+			"/IBConnectionString""Srvr='%1:%2'; Ref='%3'""", 
+			ПараметрыСтрокиСоединения.Сервер,
+			ПараметрыСтрокиСоединения.Порт,
+			ПараметрыСтрокиСоединения.ИмяБазы);
+	КонецЕсли;
+	
+	Возврат СтрокаСоединения;	
+
+КонецФункции
+
+// возвращает параметры строки соединения с файловой базой
+//
+// Возвращаемое значение:
+//  - Структура
+//    * ПутьКБазе - Строка
+//    * ЭтоФайловыйВариант - Строка - служебный ключ, что это параметры файловой базы
+//
+Функция ПараметрыСтрокиСоединения_ФайловыйВариант() Экспорт
+
+	ПараметрыСтрокиСоединения = Новый Структура;
+
+	ПараметрыСтрокиСоединения.Вставить("ПутьКбазе", "");
+	ПараметрыСтрокиСоединения.Вставить("ЭтоФайловыйВариант", Истина);
+
+	Возврат ПараметрыСтрокиСоединения;
+
+КонецФункции
+
+// возвращает параметры строки соединения с базой на сервере
+//
+// Возвращаемое значение:
+//  - Структура
+//    * Сервер - Строка
+//    * Порт - Строка
+//    * ИмяБазы - Строка
+// 
+Функция ПараметрыСтрокиСоединения_СерверныйВариант() Экспорт
+
+	ПараметрыСтрокиСоединения = Новый Структура;
+
+	ПараметрыСтрокиСоединения.Вставить("Сервер", "");
+	ПараметрыСтрокиСоединения.Вставить("Порт", "");
+	ПараметрыСтрокиСоединения.Вставить("ИмяБазы", "");
+
+	Возврат ПараметрыСтрокиСоединения;
+
+КонецФункции
+
 #КонецОбласти
 
 Лог = Логирование.ПолучитьЛог("oscript.lib.v8runner");

tests/v8runner-test.os

@@ -35,6 +35,11 @@
 	СписокТестов.Добавить("ТестДолжен_ПроверитьКонфигурацияРасширенияИдентичнаФайлу");		
 	СписокТестов.Добавить("ТестДолжен_ОставитьФайлИнформации");	
 
+	СписокТестов.Добавить("ТестДолжен_ПолучитьПараметрыСтрокиСоединенияСФайловойБазой");
+	СписокТестов.Добавить("ТестДолжен_СформироватьСтрокуСоединенияСФайловойБазой");
+	СписокТестов.Добавить("ТестДолжен_ПолучитьПараметрыСтрокиСоединенияССервернойБазой");
+	СписокТестов.Добавить("ТестДолжен_СформироватьСтрокуСоединенияССервернойБазой");
+
 	Возврат СписокТестов;
 
 КонецФункции
@@ -516,6 +521,62 @@
 
 КонецПроцедуры
 
+
+Процедура ТестДолжен_ПолучитьПараметрыСтрокиСоединенияСФайловойБазой() Экспорт
+	
+	ПоУмолчанию = ТекущийКаталог();
+
+	ПараметрыСтрокиСоединения = УправлениеКонфигуратором.ПараметрыСтрокиСоединения_ФайловыйВариант();
+	Утверждения.Проверить(ПараметрыСтрокиСоединения.Свойство("ПутьКБазе"), "Стркутура должна содержать ключ 'ПутьКФайлу'");
+	
+КонецПроцедуры
+
+Процедура ТестДолжен_СформироватьСтрокуСоединенияСФайловойБазой() Экспорт
+	
+	ПоУмолчанию = ТекущийКаталог();
+	СтрокаСоединенияЭталон = "/F'D:\1c\1cv8.dt'";
+
+	ПараметрыСтрокиСоединения = УправлениеКонфигуратором.ПараметрыСтрокиСоединения_ФайловыйВариант();
+	ПараметрыСтрокиСоединения.ПутьКБазе = "D:\1c\1cv8.dt";
+	СтрокаСоединения = УправлениеКонфигуратором.СформироватьСтрокуСоединения(ПараметрыСтрокиСоединения);
+	
+	ТестОшибки = СтрШаблон("Строка соединения %1 НЕ совпадает с эталоном %2", СтрокаСоединения, СтрокаСоединенияЭталон);
+	
+	Утверждения.ПроверитьРавенство(СтрокаСоединения, СтрокаСоединенияЭталон, ТестОшибки);
+	
+КонецПроцедуры
+
+Процедура ТестДолжен_ПолучитьПараметрыСтрокиСоединенияССервернойБазой() Экспорт
+	
+	ПоУмолчанию = ТекущийКаталог();
+
+	ПараметрыСтрокиСоединения = УправлениеКонфигуратором.ПараметрыСтрокиСоединения_СерверныйВариант();
+	Утверждения.Проверить(ПараметрыСтрокиСоединения.Свойство("Сервер"), "Стркутура должна содержать ключ 'Сервер'");
+	Утверждения.Проверить(ПараметрыСтрокиСоединения.Свойство("Порт"), "Стркутура должна содержать ключ 'Порт'");
+	Утверждения.Проверить(ПараметрыСтрокиСоединения.Свойство("ИмяБазы"), "Стркутура должна содержать ключ 'ИмяБазы'");
+	
+КонецПроцедуры
+
+Процедура ТестДолжен_СформироватьСтрокуСоединенияССервернойБазой() Экспорт
+	
+	ПоУмолчанию = ТекущийКаталог();
+	СтрокаСоединенияЭталон = "/IBConnectionString""Srvr='someserver:2041'; Ref='database'""";
+
+	ПараметрыСтрокиСоединения = УправлениеКонфигуратором.ПараметрыСтрокиСоединения_СерверныйВариант();
+	ПараметрыСтрокиСоединения.Сервер = "someserver";
+	ПараметрыСтрокиСоединения.Порт = "2041";
+	ПараметрыСтрокиСоединения.ИмяБазы = "database";
+
+	СтрокаСоединения = УправлениеКонфигуратором.СформироватьСтрокуСоединения(ПараметрыСтрокиСоединения);
+	
+	ТестОшибки = СтрШаблон("Строка соединения %1 НЕ совпадает с эталоном %2", СтрокаСоединения, СтрокаСоединенияЭталон);
+	
+	Утверждения.ПроверитьРавенство(СтрокаСоединения, СтрокаСоединенияЭталон, ТестОшибки);
+	
+КонецПроцедуры
+
+
+
 Функция ХранилищеКонфигурацииСуществует(Знач ПапкаХранилища)
     Возврат ФС.ФайлСуществует( ОбъединитьПути(ПапкаХранилища, "1cv8ddb.1CD"));
 КонецФункции