Заменил получение cf из хранилища на обновление из Хранилища (#21)

* Заменить выгрузку конфигурации на обновление из хранилища.

* Добавил обновление после полечения версии из хранилища

Author: khorevaa

src/Классы/КомандаВыгрузитьИзХранилища.os

@@ -36,21 +36,25 @@
     Параметры = РазобратьПараметры(ПараметрыКоманды);
 
     Попытка
-        ФайлВерсии = ПолучитьИмяВременногоФайла(".cf");
-        Если Параметры.ИспользоватьTool1CD Тогда
-            ВыгрузитьВерсиюСредствамиTool1CD(Параметры.АдресХранилища, Параметры.ВерсияХранилища, ФайлВерсии, Параметры.ФайлПараметровКоммита);
-        Иначе
-            ВыгрузитьВерсиюИзХранилища(Параметры.АдресХранилища, Параметры.ВерсияХранилища, ФайлВерсии, Параметры.ПользовательХранилища, Параметры.ПарольХранилища, Параметры.Версия1С);
-        КонецЕсли;
-        
-        ФайлТест = Новый Файл(ФайлВерсии);
-        Ожидаем.Что(ФайлТест.Существует(), "Должен существовать выгруженный файл версии");
 
         УправлениеКонфигуратором = ОкружениеСборки.ПолучитьКонфигуратор();
         Если ЗначениеЗаполнено(Параметры.Версия1С) Тогда
             УправлениеКонфигуратором.ИспользоватьВерсиюПлатформы(Параметры.Версия1С);
         КонецЕсли;
-        ЗагрузитьКонфигурациюВБазуСборки(УправлениеКонфигуратором, ФайлВерсии);
+
+        Если Параметры.ИспользоватьTool1CD Тогда
+            ФайлВерсии = ПолучитьИмяВременногоФайла(".cf");
+        
+            ВыгрузитьВерсиюСредствамиTool1CD(Параметры.АдресХранилища, Параметры.ВерсияХранилища, ФайлВерсии, Параметры.ФайлПараметровКоммита);
+        
+            ФайлТест = Новый Файл(ФайлВерсии);
+            Ожидаем.Что(ФайлТест.Существует(), "Должен существовать выгруженный файл версии");
+            
+            ЗагрузитьКонфигурациюВБазуСборки(УправлениеКонфигуратором, ФайлВерсии);
+        Иначе
+            ВыгрузитьВерсиюИзХранилища(УправлениеКонфигуратором, Параметры.АдресХранилища, Параметры.ВерсияХранилища, Параметры.ПользовательХранилища, Параметры.ПарольХранилища);
+        КонецЕсли;
+
     Исключение
         ВФ.Удалить();
         ВызватьИсключение;
@@ -87,32 +91,43 @@
 
 КонецФункции
 
-Процедура ВыгрузитьВерсиюИзХранилища(Знач АдресХранилища,
+Процедура ВыгрузитьВерсиюИзХранилища(Конфигуратор, 
+    Знач ПутьКХранилищу,
     Знач ВерсияХранилища,
-    Знач ВыходнойФайл,
-    Знач ПользовательХранилища = Неопределено,
-    Знач ПарольХранилища = Неопределено,
-    Знач Версия1С = Неопределено) Экспорт
-    
-    ВременныйКаталог = "";
-    Конфигуратор = ПолучитьКонфигуратор(ВременныйКаталог);
-    Если ЗначениеЗаполнено(Версия1С) Тогда
-        Конфигуратор.ИспользоватьВерсиюПлатформы(Версия1С);
-    КонецЕсли;
+    Знач ПользовательХранилища,
+    Знач ПарольХранилища = "") Экспорт
+    
+
+	ПараметрыЗапуска = Конфигуратор.ПолучитьПараметрыЗапуска();
+	ПараметрыЗапуска.Добавить("/ConfigurationRepositoryF """+ПутьКХранилищу+"""");
+
+	ПараметрыЗапуска.Добавить("/ConfigurationRepositoryN """+ПользовательХранилища+"""");
+
+	Если Не ЗначениеЗаполнено(ПарольХранилища) Тогда
+		ПараметрыЗапуска.Добавить("/ConfigurationRepositoryP """+ПарольХранилища+"""");
+	КонецЕсли;
+
+	ПараметрыЗапуска.Добавить("/ConfigurationRepositoryUpdateCfg");
 
-    Лог.Отладка("Выгружаю версию из хранилища");
+    Если ЗначениеЗаполнено(ВерсияХранилища) Тогда
+        ПараметрыЗапуска.Добавить("-v "+ВерсияХранилища);
+    КонецЕсли;
+ 
+	ПараметрыЗапуска.Добавить("-force");
 
-    Конфигуратор.ПолучитьВерсиюИзХранилища(
-        АдресХранилища,
-        ПользовательХранилища,
-        ПарольХранилища,
-        ВерсияХранилища);
-        
-    Лог.Отладка("Копирую файл версии");
-    КопироватьФайл(ОбъединитьПути(ВременныйКаталог, "source.cf"), ВыходнойФайл);
+    ПараметрыЗапуска.Добавить("/UpdateDBCfg");
+	
+    Лог.Отладка("Получению новую версию из хранилища");
 
-    ВФ.Удалить();
-    Лог.Отладка("Удален временный каталог: " + ВременныйКаталог);
+	Попытка
+		Конфигуратор.ВыполнитьКоманду(ПараметрыЗапуска);
+	Исключение
+
+		ТекстОшибки = Конфигуратор.ВыводКоманды();
+		ВызватьИсключение ТекстОшибки;
+
+    КонецПопытки;
+
 КонецПроцедуры
 
 Процедура ВыгрузитьВерсиюСредствамиTool1CD(Знач КаталогХранилища, Знач ВерсияХранилища, Знач ФайлВерсии, Знач ФайлПараметровКоммита = Неопределено) Экспорт

src/Классы/КомандаСоздатьФайлыПоставки.os

@@ -48,7 +48,7 @@
 	КонецЕсли;
 
 	УправлениеКонфигуратором.ВыполнитьКоманду(Параметры);
-	Сообщить(УправлениеКонфигуратором.ВыводКоманды());
+	Лог.Отладка(УправлениеКонфигуратором.ВыводКоманды());
 
 	Возврат Новый Структура("ИмяФайлаПоставки, ИмяФайлаОбновления", ИмяФайлаПоставки, ИмяФайлаОбновления);
 

tests/create-distr.os

@@ -46,17 +46,20 @@
 Процедура Тест_ДолженПроверитьЧтоВерсияПолученаИзХранилища() Экспорт
 
     Команда = Новый КомандаВыгрузитьИзХранилища();
+    КаталогСборки = ВременныеФайлы.СоздатьКаталог();
 
+    УправлениеКонфигуратором = Новый УправлениеКонфигуратором;
+    УправлениеКонфигуратором.КаталогСборки(КаталогСборки);
+   
     ВремКаталогХранилища = СоздатьВременноеТестовоеХранилище();
     ВремФайлКонфигурации = ПолучитьИмяВременногоФайла("cf");
     Попытка
-        Команда.ВыгрузитьВерсиюИзХранилища(ВремКаталогХранилища, 2, ВремФайлКонфигурации, "Администратор");
-        ФайлТест = Новый Файл(ВремФайлКонфигурации);
-		Ожидаем.Что(ФайлТест.Существует(), "файл конфигурации должен существовать").ЕстьИстина(); 
+        Команда.ВыгрузитьВерсиюИзХранилища(УправлениеКонфигуратором, ВремКаталогХранилища, 2, "Администратор");
+      	//Ожидаем.Что(ФайлТест.Существует(), "файл конфигурации должен существовать").ЕстьИстина(); 
     Исключение
         УдалитьФайлы(ВремКаталогХранилища);
         УдалитьФайлы(ВремФайлКонфигурации);
-        ВызватьИсключение;
+        ВызватьИсключение "Ожидали что все ок";
     КонецПопытки;
 
     УдалитьФайлы(ВремКаталогХранилища);
@@ -125,8 +128,7 @@
     УправлениеКонфигуратором.КаталогСборки(КаталогСборки);
 
     ВерсияИзХранилища = ПолучитьИмяВременногоФайла("cf");
-    Команда.ВыгрузитьВерсиюИзХранилища(Параметры.АдресХранилища, 18, ВерсияИзХранилища, "Администратор");
-    Команда.ЗагрузитьКонфигурациюВБазуСборки(УправлениеКонфигуратором, ВерсияИзХранилища);
+    Команда.ВыгрузитьВерсиюИзХранилища(УправлениеКонфигуратором, Параметры.АдресХранилища, 18, "Администратор");
 
     Команда = Новый КомандаСоздатьФайлыПоставки;
     Команда.СоздатьФайлыКонфигурацииПоставщика(УправлениеКонфигуратором, Параметры.КаталогВерсий, Параметры.ПредыдущиеВерсии);
@@ -149,9 +151,8 @@
     УправлениеКонфигуратором.КаталогСборки(КаталогСборки);
 
     ВерсияИзХранилища = ПолучитьИмяВременногоФайла("cf");
-    Команда.ВыгрузитьВерсиюИзХранилища(СоздатьВременноеТестовоеХранилище(), 18, ВерсияИзХранилища, "Администратор");
-    Команда.ЗагрузитьКонфигурациюВБазуСборки(УправлениеКонфигуратором, ВерсияИзХранилища);
-    
+    Команда.ВыгрузитьВерсиюИзХранилища(УправлениеКонфигуратором, СоздатьВременноеТестовоеХранилище(), 18, "Администратор");
+   
     КомандаФайлыПоставки = Новый КомандаСоздатьФайлыПоставки;
     КомандаФайлыПоставки.СоздатьФайлыКонфигурацииПоставщика(УправлениеКонфигуратором, Неопределено, Новый Массив);