fix EvilBeaver#1514 Замена dotnetzip на другой форк

Author: EvilBeaver

.gitattributes

@@ -1,4 +1,4 @@
 *.sh    text eol=lf
 install/opm     text eol=lf
 install/oscript text eol=lf
-*.zip filter=lfs diff=lfs merge=lfs -text
+#*.zip filter=lfs diff=lfs merge=lfs -text

src/OneScript.StandardLibrary/OneScript.StandardLibrary.csproj

@@ -24,8 +24,8 @@
     </PropertyGroup>
 
     <ItemGroup>
-        <PackageReference Include="DotNetZip" Version="1.13.3" />
         <PackageReference Include="Newtonsoft.Json" Version="13.0.2" />
+        <PackageReference Include="ProDotNetZip" Version="1.20.0" />
     </ItemGroup>
 
     <ItemGroup>

src/OneScript.StandardLibrary/Text/TextEncodingEnum.cs

@@ -55,10 +55,10 @@ private TextEncodingEnum(TypeDescriptor typeRepresentation, TypeDescriptor value
 
         public EnumerationValue GetValue(Encoding encoding)
         {
-            if (encoding.Equals(Encoding.GetEncoding(866)))
+            if (encoding.Equals(Encoding.GetEncoding(866)) || encoding.CodePage == 866)
                 return Oem;
 
-            if (encoding.Equals(Encoding.GetEncoding(1251)))
+            if (encoding.Equals(Encoding.GetEncoding(1251)) || encoding.CodePage == 1251)
                 return Ansi;
 
             if (encoding.Equals(new UnicodeEncoding(false, true)))
@@ -72,8 +72,8 @@ public EnumerationValue GetValue(Encoding encoding)
 
             if (encoding.Equals(Encoding.Default))
                 return System;
-
-            throw RuntimeException.InvalidArgumentValue();
+            
+            throw RuntimeException.InvalidArgumentValue(encoding);
         }
 
         public static TextEncodingEnum CreateInstance(ITypeManager typeManager)

src/OneScript.StandardLibrary/Zip/DotNetZipEncoding.cs

@@ -0,0 +1,62 @@
+/*----------------------------------------------------------
+This Source Code Form is subject to the terms of the
+Mozilla Public License, v.2.0. If a copy of the MPL
+was not distributed with this file, You can obtain one
+at http://mozilla.org/MPL/2.0/.
+----------------------------------------------------------*/
+
+using System;
+using System.Reflection;
+using System.Text;
+using Ionic.Zip;
+
+namespace OneScript.StandardLibrary.Zip
+{
+    internal static class DotNetZipEncoding
+    {
+        private static volatile bool _encodingIsSet;
+        private static readonly object _locker = new object();
+
+        static DotNetZipEncoding()
+        {
+            _encodingIsSet = false;
+        }
+
+        public static void SetDefault(Encoding encoding)
+        {
+            if (_encodingIsSet)
+                return;
+
+            lock (_locker)
+            {
+                if (_encodingIsSet)
+                    return;
+                
+                SetDefaultEncodingViaProperty(encoding);
+                _encodingIsSet = true;
+            }
+        }
+
+        private static void SetDefaultEncodingViaProperty(Encoding encoding)
+        {
+            ZipFile.DefaultEncoding = encoding;
+        }
+        
+        private static void SetDefaultEncodingViaReflection(Encoding encoding)
+        {
+            const string fieldName = "_defaultEncoding";
+
+            var field = typeof(ZipFile).GetField(fieldName, BindingFlags.Static | BindingFlags.NonPublic);
+            if (field == null)
+                throw new InvalidOperationException("Field for default encoding not found");
+
+            field.SetValue(null, encoding);
+
+            if (!Equals(ZipFile.DefaultEncoding, encoding))
+            {
+                throw new InvalidOperationException(
+                    "Field is set, but property DefaultEncoding hasn't changed. Probably another property implementation in library");
+            }
+        }
+    }
+}

src/OneScript.StandardLibrary/Zip/ZipReader.cs

@@ -52,7 +52,7 @@ private void CheckIfOpened()
         public void Open(IValue filenameOrStream, string password = null, FileNamesEncodingInZipFile encoding = FileNamesEncodingInZipFile.Auto)
         {
             // fuck non-russian encodings on non-ascii files
-            ZipFile.DefaultEncoding = Encoding.GetEncoding(866);
+            DotNetZipEncoding.SetDefault(Encoding.GetEncoding(866));
 
             if (filenameOrStream.SystemType == BasicTypes.String)
             {
@@ -104,6 +104,13 @@ public void ExtractAll(string where, ZipRestoreFilePathsMode restorePaths = defa
         public void Extract(ZipFileEntryContext entry, string destination, ZipRestoreFilePathsMode restorePaths = default, string password = null)
         {
             CheckIfOpened();
+            if (entry == null)
+            {
+                // Передали Неопределено
+                // TODO сделать более строгий маршалинг с учетом всех тыщ особенностей для строк и прочего
+                throw RuntimeException.InvalidNthArgumentType(1);
+            }
+            
             var realEntry = entry.GetZipEntry();
             _zip.FlattenFoldersOnExtract = restorePaths == ZipRestoreFilePathsMode.DontRestore;
             realEntry.Password = password;

src/OneScript.StandardLibrary/Zip/ZipWriter.cs

@@ -52,7 +52,7 @@ public void Open(
             ZipEncryptionMethod? encryptionMethod = default,
             FileNamesEncodingInZipFile encoding = FileNamesEncodingInZipFile.Auto)
         {
-            ZipFile.DefaultEncoding = Encoding.GetEncoding(866); // fuck non-russian encodings on non-ascii files
+            DotNetZipEncoding.SetDefault(Encoding.GetEncoding(866)); // fuck non-russian encodings on non-ascii files
             _filename = filename;
             _zip = new ZipFile();
             _zip.AlternateEncoding = Encoding.UTF8;

tests/native-api.os

@@ -50,7 +50,7 @@
 	Сборка = Новый Файл(ПутьБиблиотеки);
 
 	Если Не Сборка.Существует() Тогда
-		ВызватьИсключение "Не собрана прокси-библиотека для NativeApi";
+		ВызватьИсключение СтрШаблон("Не собрана прокси-библиотека для NativeApi: %1", ПутьБиблиотеки);
 	КонецЕсли;
 
 КонецПроцедуры

tests/zip/fixtures/testUTF8.zip

@@ -31,6 +31,10 @@
 	ВсеТесты.Добавить("ТестДолжен_ПроверитьПарольРусскиеБуквыФайловАрхива");
 	ВсеТесты.Добавить("ТестДолжен_ПроверитьШифрованиеЗипАрхива");
 
+	//Отключен до исправления библиотеки 
+	// https://github.com/EvilBeaver/OneScript/issues/870
+	//ВсеТесты.Добавить("ТестДолжен_ПроверитьСимволыЮникодаВИменахФайлов");
+	
 	Возврат ВсеТесты;
 
 КонецФункции
@@ -101,8 +105,8 @@
 
 	Попытка
 		юТест.ПроверитьРавенство("", Чтение.Элементы[0].Путь);
-		юТест.ПроверитьРавенство("zip.os", Чтение.Элементы[0].Имя);
-		юТест.ПроверитьРавенство("zip", Чтение.Элементы[0].ИмяБезРасширения);
+		юТест.ПроверитьРавенство("test-zip.os", Чтение.Элементы[0].Имя);
+		юТест.ПроверитьРавенство("test-zip", Чтение.Элементы[0].ИмяБезРасширения);
 	Исключение	
 		Чтение.Закрыть();
 		ВызватьИсключение;
@@ -353,7 +357,7 @@
 
 	ИмяРусскогоФайла = "ОбщиеФункции.os";
 
-	ПутьРусскогоФайла = ОбъединитьПути(ФайлСкрипта.Путь, "testlib", ИмяРусскогоФайла);
+	ПутьРусскогоФайла = ОбъединитьПути(ФайлСкрипта.Путь, "../testlib", ИмяРусскогоФайла);
 
 	ИмяАрхива = СоздатьВременныйФайл("zip");
 	Архив = Новый ЗаписьZipФайла(ИмяАрхива);
@@ -702,3 +706,22 @@
 	Файл = Новый Файл(НеверныйПутьФайла);
 	юТест.ПроверитьЛожь(Файл.Существует(), СообщениеОшибки + НеверныйПутьФайла);
 КонецПроцедуры
+
+// https://github.com/EvilBeaver/OneScript/issues/870
+Процедура ТестДолжен_ПроверитьСимволыЮникодаВИменахФайлов() Экспорт
+    ФайлАрхива = ОбъединитьПути(ТекущийСценарий().Каталог, "fixtures", "testUTF8.zip");
+    
+    ВременныйКаталог = СоздатьВременныйФайл();
+    СоздатьКаталог(ВременныйКаталог);
+    
+    ФайлZip = Новый ЧтениеZipФайла(ФайлАрхива);
+    Попытка
+        ФайлZip.ИзвлечьВсе(ВременныйКаталог);
+    Исключение
+        ФайлZip.Закрыть();
+        ВызватьИсключение;
+    КонецПопытки;
+    
+    ФайлZip.Закрыть();
+    
+КонецПроцедуры