Новые методы:

- функция Файлы
- функция УдалитьНакопленныеВременныеФайлы(Знач ВременныеФайлыДо)
- процедура СкопироватьКоллекцию(Массив, Приемник)

Author: artbear

ВременныеФайлы.os

@@ -93,8 +93,71 @@
 
 КонецФункции
 
+// Массив накопленных путей временных файлов
+//
+//  Возвращаемое значение:
+//   Массив - <описание возвращаемого значения>
+//
+Функция Файлы() Экспорт
+	Результат = Новый Массив;
+	Для каждого Путь Из мВременныеФайлы Цикл
+		Результат.Добавить(Путь);
+	КонецЦикла;
+	Возврат Результат;
+КонецФункции
+
+// Удалить все накопленные временные файлы, которые были добавлены после фиксации набора временных файлов.
+// Удобно использовать для быстрой очистки на очередной итерации
+// Предварительно нужно зафиксировать текущий набор временных файлов через Файлы()
+// Алгоритм:
+// 	ВременныеФайлыДо = ВременныеФайлы.Файлы();
+// 	Попытка
+// 		// основной код						
+// 	Исключение
+// 		// обработка ошибок
+// 		ВременныеФайлы.УдалитьНакопленныеВременныеФайлы(ВременныеФайлыДо);
+// 		ВызватьИсключение;
+// 	КонецПопытки;
+// 	ВременныеФайлы.УдалитьНакопленныеВременныеФайлы(ВременныеФайлыДо);
+//
+// Параметры:
+//   ВременныеФайлыДо - Массив - набор ранее полученных временных файлов через Файлы()
+//
+Процедура УдалитьНакопленныеВременныеФайлы(Знач ВременныеФайлыДо) Экспорт
+	ВременныеФайлыПосле = Файлы();
+
+	ОтборФайлов = Новый Соответствие;
+	СкопироватьКоллекцию(ВременныеФайлыДо, ОтборФайлов);
+
+	КрайнийИндекс = ВременныеФайлыПосле.Количество()-1;
+	Для Сч = 0 По КрайнийИндекс Цикл
+		
+		Индекс = КрайнийИндекс-Сч;
+		ИмяВременногоФайла = ВременныеФайлыПосле[Индекс];
+		Если ОтборФайлов.Получить(ИмяВременногоФайла) = Неопределено
+				И БезопасноУдалитьФайл(ИмяВременногоФайла) Тогда
+				ВременныеФайлыПосле.Удалить(Индекс);
+		КонецЕсли;
+		
+	КонецЦикла;
+	
+КонецПроцедуры
+
+// Скопировать одну простую коллекцию (Массив) в другую (Структура, Соответствие)
+// значение из источника становится и ключем, и значение приемника
+//
+// Параметры:
+//   Массив - Массив - <описание параметра>
+//   Приемник - Структура, Соответствие - <описание параметра>
+//
+Процедура СкопироватьКоллекцию(Массив, Приемник) Экспорт
+	Для каждого Значение Из Массив Цикл
+		Приемник.Вставить(Значение, Значение);
+	КонецЦикла;
+КонецПроцедуры
+
 СистемнаяИнформация = Новый СистемнаяИнформация;
 ЭтоWindows = Найти(НРег(СистемнаяИнформация.ВерсияОС), "windows") > 0;
 
 мВременныеФайлы = Новый Массив;
-Лог = Логирование.ПолучитьЛог("oscript.app.tempfiles");
+Лог = Логирование.ПолучитьЛог("oscript.app.tempfiles");