Тесты для Zip

Author: EvilBeaver

tests/zip.os

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