Тест извлечения без путей.

Author: EvilBeaver

tests/zip.os

@@ -13,6 +13,7 @@
 	ВсеТесты.Добавить("ТестДолжен_ДобавитьВАрхивОдиночныйСПолнымПутем");
 	ВсеТесты.Добавить("ТестДолжен_ДобавитьВАрхивКаталогТестов");
 	ВсеТесты.Добавить("ТестДолжен_ДобавитьВАрхивКаталогТестовПоМаске");
+	ВсеТесты.Добавить("ТестДолжен_ПроверитьИзвлечениеБезПутей");
 
 	Возврат ВсеТесты;
 
@@ -190,3 +191,34 @@
 	юТест.ПроверитьРавенство(КоличествоТестов, Чтение.Элементы.Количество());
 
 КонецПроцедуры
+
+Процедура ТестДолжен_ПроверитьИзвлечениеБезПутей() Экспорт
+	
+	ФайлСкрипта = Новый Файл(ТекущийСценарий().Источник);
+	КаталогСкрипта = Новый Файл(ФайлСкрипта.Путь);
+	
+	ВременныйКаталог = СоздатьВременныйФайл();
+	КаталогКопииТестов = ВременныйКаталог + "/" + КаталогСкрипта.Имя;
+	СоздатьКаталог(КаталогКопииТестов);
+	ВсеФайлы = НайтиФайлы(КаталогСкрипта.ПолноеИмя, "*.*");
+	Для Каждого Файл Из ВсеФайлы Цикл
+		КопироватьФайл(Файл.ПолноеИмя, КаталогКопииТестов + "/" + Файл.Имя);
+	КонецЦикла;
+	
+	ИмяАрхива = ПолучитьИмяВременногоФайла("zip");
+	Архив = Новый ЗаписьZipФайла();
+	Архив.Открыть(ИмяАрхива);
+	Архив.Добавить(ВременныйКаталог,,РежимОбработкиПодкаталоговZIP.ОбрабатыватьРекурсивно);
+	Архив.Записать();
+	
+	Чтение = Новый ЧтениеZipФайла(ИмяАрхива);
+	КаталогИзвлечения = СоздатьВременныйФайл();
+	СоздатьКаталог(КаталогИзвлечения);
+	Чтение.ИзвлечьВсе(КаталогИзвлечения, РежимВосстановленияПутейФайловZIP.НеВосстанавливать);
+	
+	ИзвлеченныеФайлы = НайтиФайлы(КаталогИзвлечения, "*.*");
+	
+	юТест.ПроверитьНеравенство(0, ИзвлеченныеФайлы.Количество());
+	юТест.ПроверитьРавенство(ВсеФайлы.Количество(), ИзвлеченныеФайлы.Количество());
+	
+КонецПроцедуры