Доработки по addins для OS

ci/os/internal/Modules/МетодыПеревода.os

@@ -43,7 +43,9 @@
 
 	Для Каждого ФайлМодуля Из ФайлыМодулей Цикл
 
-		Если ФайлМодуля.ЭтоКаталог() Или ФайлМодуля.Имя = "packagedef" Тогда
+		Если ФайлМодуля.ЭтоКаталог() 
+			Или ФайлМодуля.Имя = "packagedef"
+			Или СтрНайти(ФайлМодуля.Путь, "addins") <> 0 Тогда
 			Продолжить;
 		КонецЕсли;
 
@@ -244,6 +246,7 @@
 	СоответствиеОшибок.Вставить("GetBinaryDataBufferFromHexString" , "ПолучитьБуферДвоичныхДанныхИзHexСтроки");
 	СоответствиеОшибок.Вставить("GetBinaryDataFromBinaryDataBuffer", "ПолучитьДвоичныеДанныеИзБуфераДвоичныхДанных");
 	СоответствиеОшибок.Вставить("WeekDay"                          , "DayOfWeek");
+	СоответствиеОшибок.Вставить("BinDir"                           , "ProgramDirectory");
 
 	ФайлМодуля = Новый Файл(ПутьКМодулю);
 

ci/os/internal/Modules/МетодыПримеровКода.os

@@ -241,6 +241,9 @@
 	СоответствиеПризнаковСекретов.Вставить("Password"    , 3);
 	СоответствиеПризнаковСекретов.Вставить("Bitrix24_URL", 1.3);
 
+	СоответствиеЗамен = Новый Соответствие;
+    СоответствиеЗамен.Вставить("MDB_CString", "mongodb://bayselonarrend:***@127.0.0.1:27017");
+
 	Для Каждого Признак Из СоответствиеПризнаковСекретов Цикл
 
 		Если СтрНайти(нРег(ИмяПараметра), нРег(Признак.Ключ)) <> 0 Тогда
@@ -250,4 +253,13 @@
 
 	КонецЦикла;
 	
+	Для Каждого Признак Из СоответствиеЗамен Цикл
+
+		Если СтрНайти(нРег(ИмяПараметра), нРег(Признак.Ключ)) <> 0 Тогда
+			Значение = Признак.Значение;
+			Прервать;
+		КонецЕсли;
+
+	КонецЦикла;
+
 КонецПроцедуры

ci/os/main.os

@@ -110,14 +110,28 @@
 	ВсеФайлы       = НайтиФайлы(ОсновнойПутьИсходников, "*", Истина);
 	МассивФайлов   = Новый Массив;
 	
+	МассивИсключаемыхРасширений = Новый Массив;
+	МассивИсключаемыхРасширений.Добавить(".bin");
+	МассивИсключаемыхРасширений.Добавить(".addin");
+	МассивИсключаемыхРасширений.Добавить(".dll");
+	МассивИсключаемыхРасширений.Добавить(".so");
+	МассивИсключаемыхРасширений.Добавить(".exe");
+
 	Для Каждого ФайлПроекта Из ВсеФайлы Цикл
 
 		Признак = 
 			СтрНайти(ФайлПроекта.ПолноеИмя, "cli\data") = 0
 			И СтрНайти(ФайлПроекта.ПолноеИмя, "cli/data") = 0
-			И Не ФайлПроекта.ЭтоКаталог()
-			И Не ФайлПроекта.Расширение = ".bin"
-			И Не ФайлПроекта.Расширение = ".addin";
+			И Не ФайлПроекта.ЭтоКаталог();
+
+		Для Каждого Расширение Из МассивИсключаемыхРасширений Цикл
+
+			Если ФайлПроекта.Расширение = Расширение Тогда
+				Признак = Ложь;
+				Прервать;
+			КонецЕсли;
+
+		КонецЦикла;
 
 		Если Признак Тогда
 			МассивФайлов.Добавить(ФайлПроекта);

src/ru/OInt/packagedef

@@ -7,6 +7,7 @@
     .ВключитьФайл("core")
     .ВключитьФайл("tools")
     .ВключитьФайл("tests")
+    .ВключитьФайл("addins")
     .ВключитьФайл("lib.config")
     .ВключитьФайл("../README.MD")
     .ВключитьФайл("../LICENSE")

src/ru/OInt/tools/Modules/OPI_ПолучениеДанныхТестов.os

@@ -2042,9 +2042,9 @@
 КонецФункции
 
 Функция ПолучитьОбщийМодуль(Знач Имя)
-
+    
     Модуль = Вычислить(Имя);
-
+    
     Возврат Модуль;
 КонецФункции
 
@@ -2137,6 +2137,9 @@
     МассивСекретов.Добавить("client");
     МассивСекретов.Добавить("api");
     МассивСекретов.Добавить("refresh");
+    
+    СтруктураЗамен = Новый Структура;
+    СтруктураЗамен.Вставить("connect", "mongodb://bayselonarrend:***@127.0.0.1:27017");
 
     Если ТипЗнч(Значение) = Тип("Структура") Или ТипЗнч(Значение) = Тип("Соответствие") Тогда
 
@@ -2155,6 +2158,14 @@
             КонецЕсли;
 
         КонецЦикла;
+        
+        Для Каждого ЗаменяемыйКлюч Из СтруктураЗамен Цикл
+
+			Если нРег(Имя) = ЗаменяемыйКлюч.Ключ Тогда
+				Значение = ЗаменяемыйКлюч.Значение;
+			КонецЕсли;
+
+		КонецЦикла;
 
     КонецЕсли;
 

src/ru/OInt/tools/Modules/internal/Modules/OPI_Инструменты.os

@@ -1530,12 +1530,14 @@
 
 Функция КаталогКомпонентOS() Экспорт
 
-    Каталог = "";
+    КаталогПрограммы = СтрЗаменить(КаталогПрограммы(), "\", "/");
 
-    //@skip-check server-execution-safe-mode
-    Выполнить("Каталог = ТекущийСценарий().Каталог + ""addins/""");
+	ЭлементыПути = СтрРазделить(КаталогПрограммы, "/");
+	ЭлементыПути.Удалить(ЭлементыПути.ВГраница());
+	
+	КаталогКомпонент = СтрСоединить(ЭлементыПути, "/") + "/lib/oint/addins/";
 
-    Возврат Каталог;
+    Возврат КаталогПрограммы;
 
 КонецФункции
 

src/ru/OPI/src/CommonModules/OPI_Инструменты/Module.bsl

@@ -1530,12 +1530,14 @@
 
 Функция КаталогКомпонентOS() Экспорт
 
-    Каталог = "";
+    КаталогПрограммы = СтрЗаменить(КаталогПрограммы(), "\", "/");
 
-    //@skip-check server-execution-safe-mode
-    Выполнить("Каталог = ТекущийСценарий().Каталог + ""addins/""");
+	ЭлементыПути = СтрРазделить(КаталогПрограммы, "/");
+	ЭлементыПути.Удалить(ЭлементыПути.ВГраница());
+	
+	КаталогКомпонент = СтрСоединить(ЭлементыПути, "/") + "/lib/oint/addins/";
 
-    Возврат Каталог;
+    Возврат КаталогПрограммы;
 
 КонецФункции
 

src/ru/OPI/src/CommonModules/OPI_ПолучениеДанныхТестов/Module.bsl

@@ -2137,6 +2137,9 @@
     МассивСекретов.Добавить("client");
     МассивСекретов.Добавить("api");
     МассивСекретов.Добавить("refresh");
+    
+    СтруктураЗамен = Новый Структура;
+    СтруктураЗамен.Вставить("connect", "mongodb://bayselonarrend:***@127.0.0.1:27017");
 
     Если ТипЗнч(Значение) = Тип("Структура") Или ТипЗнч(Значение) = Тип("Соответствие") Тогда
 
@@ -2155,6 +2158,14 @@
             КонецЕсли;
 
         КонецЦикла;
+        
+        Для Каждого ЗаменяемыйКлюч Из СтруктураЗамен Цикл
+
+			Если нРег(Имя) = ЗаменяемыйКлюч.Ключ Тогда
+				Значение = ЗаменяемыйКлюч.Значение;
+			КонецЕсли;
+
+		КонецЦикла;
 
     КонецЕсли;