Merge pull request oscript-library#85 from 1cv8/ibcmd-multithreading

Ibcmd multithreading
arkuznetsov · Jun 27, 2024 · 76deb20 · 76deb20
2 parents 232f489 + 1f5abf4
commit 76deb20
Showing 1 changed file with 12 additions and 0 deletions.
diff --git a/src/Классы/useIbcmd.os b/src/Классы/useIbcmd.os
@@ -15,6 +15,7 @@
 Перем ПользовательБД;        //   Строка    - имя пользователя базы данных
 Перем ПарольБД;              //   Строка    - пароль пользователя базы данных
 Перем Инкрементально;        //   Булево    - Истина - будет выполнена инкрементальная выгрузка если возможно
+Перем ЧислоПотоков;          //   Число     - 0 - Количество потоков используемых при экспорте.
 
 Перем ИнкрементальнаяВыгрузкаВозможна;   //   Булево    - Истина - инкрементальная выгрузка возможна
 Перем ПутьКФайлуДампаИзменений;          //   Строка    - путь к файлу ConfigDumpInfo.xml
@@ -92,6 +93,7 @@
 	ПользовательБД      = "sa";
 	ПарольБД            = "";
 	Инкрементально      = Ложь;
+	ЧислоПотоков        = 0;
 
 	Если НЕ (ВРег(ТекущаяКоманда) = "ALL"
 	 ИЛИ ВРег(ТекущаяКоманда) = "SYNC") Тогда
@@ -157,6 +159,11 @@
 	КлассРеализации.Опция("P ibcmd-db-pwd", "", "[*use-ibcmd] пароль пользователя базы данных (при использовании ibcmd)")
 	               .ТСтрока()
 	               .ВОкружении("GITSYNC_IBCMD_DB_PWD");
+
+   КлассРеализации.Опция("j ibcmd-threads", "", "[*use-ibcmd] Количество потоков используемых при экспорте")
+	               .ТЧисло()
+	               .ВОкружении("GITSYNC_IBCMD_THREADS");
+
 	КлассРеализации.Опция("i increment",
 	                      Ложь,
 	                      "[*use-ibcmd] флаг использования инкрементальной выгрузки конфигурации, если возможно")
@@ -173,6 +180,7 @@
 	ИмяБД               = ПараметрыКоманды.Параметр("ibcmd-db-name"  , "");
 	ПользовательБД      = ПараметрыКоманды.Параметр("ibcmd-db-user"  , "sa");
 	ПарольБД            = ПараметрыКоманды.Параметр("ibcmd-db-pwd"   , "");
+	ЧислоПотоков        = ПараметрыКоманды.Параметр("ibcmd-threads"  , 0);
 	Если НЕ Инкрементально Тогда
 		Инкрементально      = ПараметрыКоманды.Параметр("increment", Ложь);
 	КонецЕсли;
@@ -242,6 +250,10 @@
 	КомандаIBCMD.ДобавитьПараметр("infobase config export");
 	КомандаIBCMD.ДобавитьПараметр(СтрШаблон("--data=%1", РабочийКаталогIBCMD));
 
+	Если ЧислоПотоков > 0 Тогда
+		КомандаIBCMD.ДобавитьПараметр(СтрШаблон("--threads=%1", ЧислоПотоков));
+	КонецЕсли;
+
 	ДобавитьПараметрыПодключенияКИБ(КомандаIBCMD, Конфигуратор);
 
 	Если ИнкрементальнаяВыгрузкаВозможна Тогда