#112 Перечисление КодировкаТекста

Author: EvilBeaver

src/ScriptEngine.HostedScript/Library/TextEncodingEnum.cs

@@ -0,0 +1,119 @@
+using ScriptEngine.Machine;
+using ScriptEngine.Machine.Contexts;
+using System;
+using System.Collections.Generic;
+using System.Linq;
+using System.Text;
+
+namespace ScriptEngine.HostedScript.Library
+{
+    [SystemEnum("КодировкаТекста", "TextEncoding")]
+    public class TextEncodingEnum : EnumerationContext
+    {
+        private const string ENCODING_ANSI = "ANSI";
+        private const string ENCODING_OEM = "OEM";
+        private const string ENCODING_UTF16 = "UTF16";
+        private const string ENCODING_UTF8 = "UTF8";
+        private const string ENCODING_SYSTEM = "Системная";
+
+        private TextEncodingEnum(TypeDescriptor typeRepresentation, TypeDescriptor valuesType)
+            : base(typeRepresentation, valuesType)
+        {
+        }
+
+        [EnumValue(ENCODING_ANSI)]
+        public EnumerationValue Ansi
+        {
+            get
+            {
+                return this[ENCODING_ANSI];
+            }
+        }
+
+        [EnumValue(ENCODING_OEM)]
+        public EnumerationValue Oem
+        {
+            get
+            {
+                return this[ENCODING_OEM];
+            }
+        }
+
+        [EnumValue(ENCODING_UTF16)]
+        public EnumerationValue Utf16
+        {
+            get
+            {
+                return this[ENCODING_UTF16];
+            }
+        }
+
+        [EnumValue(ENCODING_UTF8)]
+        public EnumerationValue Utf8
+        {
+            get
+            {
+                return this[ENCODING_UTF8];
+            }
+        }
+
+        [EnumValue(ENCODING_SYSTEM)]
+        public EnumerationValue System
+        {
+            get
+            {
+                return this[ENCODING_SYSTEM];
+            }
+        }
+
+        public static TextEncodingEnum CreateInstance()
+        {
+            TextEncodingEnum instance;
+
+            TypeDescriptor enumType;
+            TypeDescriptor enumValType;
+
+            EnumContextHelper.RegisterEnumType<TextEncodingEnum>(out enumType, out enumValType);
+
+            instance = new TextEncodingEnum(enumType, enumValType);
+
+            EnumContextHelper.RegisterValues<TextEncodingEnum>(instance);
+
+            return instance;
+        }
+
+        public static Encoding GetEncoding(IValue encoding)
+        {
+            if (encoding.DataType == DataType.String)
+                return Encoding.GetEncoding(encoding.AsString());
+            else
+            {
+                if (encoding.DataType != DataType.GenericValue)
+                    throw RuntimeException.InvalidArgumentType();
+
+                var encValue = encoding.GetRawValue() as SelfAwareEnumValue<TextEncodingEnum>;
+                if (encValue == null)
+                    throw RuntimeException.InvalidArgumentType();
+
+                var encodingEnum = GlobalsManager.GetEnum<TextEncodingEnum>();
+
+                Encoding enc;
+                if (encValue == encodingEnum.Ansi)
+                    enc = Encoding.GetEncoding(1251);
+                else if (encValue == encodingEnum.Oem)
+                    enc = Encoding.GetEncoding(866);
+                else if (encValue == encodingEnum.Utf16)
+                    enc = new UnicodeEncoding(false, true);
+                else if (encValue == encodingEnum.Utf8)
+                    enc = new UTF8Encoding(true);
+                else if (encValue == encodingEnum.System)
+                    enc = Encoding.Default;
+                else
+                    throw RuntimeException.InvalidArgumentValue();
+
+                return enc;
+            }
+        }
+
+    }
+}

src/ScriptEngine.HostedScript/Library/TextReadImpl.cs

@@ -12,15 +12,15 @@ class TextReadImpl : AutoContext<TextReadImpl>, IDisposable
         StreamReader _reader;
 
         [ContextMethod("Открыть", "Open")]
-        public void Open(string path, string encoding = null)
+        public void Open(string path, IValue encoding = null)
         {
             if (encoding == null)
             {
                 _reader = Environment.FileOpener.OpenReader(path);
             }
             else
             {
-                var enc = Encoding.GetEncoding(encoding);
+                var enc = TextEncodingEnum.GetEncoding(encoding);
                 _reader = Environment.FileOpener.OpenReader(path, enc);
             }
         }
@@ -63,7 +63,7 @@ private void RequireOpen()
         public static IRuntimeContextInstance Constructor(IValue path, IValue encoding)
         {
             var reader = new TextReadImpl();
-            reader.Open(path.AsString(), encoding.AsString());
+            reader.Open(path.AsString(), encoding);
             return reader;
         }
 

src/ScriptEngine.HostedScript/Library/TextWriteImpl.cs

@@ -16,12 +16,12 @@ public TextWriteImpl()
 
         }
 
-        public TextWriteImpl(string path, string encoding)
+        public TextWriteImpl(string path, IValue encoding)
         {
             Open(path, encoding);
         }
 
-        public TextWriteImpl(string path, string encoding, bool append)
+        public TextWriteImpl(string path, IValue encoding, bool append)
         {
             Open(path, encoding, append);
         }
@@ -33,7 +33,7 @@ public TextWriteImpl(string path, string encoding, bool append)
         /// <param name="encoding">Кодировка (необязательный). По умолчанию используется utf-8</param>
         /// <param name="append">Признак добавления в конец файла. (необязательный)</param>
         [ContextMethod("Открыть", "Open")]
-        public void Open(string path, string encoding = null, bool append = false)
+        public void Open(string path, IValue encoding = null, bool append = false)
         {
             Encoding enc;
             if (encoding == null)
@@ -42,7 +42,7 @@ public void Open(string path, string encoding = null, bool append = false)
             }
             else
             {
-                enc = Encoding.GetEncoding(encoding);
+                enc = TextEncodingEnum.GetEncoding(encoding);
                 if (enc.WebName == "utf-8" && append == true)
                     enc = new UTF8Encoding(false);
             }
@@ -88,7 +88,7 @@ public void Dispose()
         [ScriptConstructor(Name = "")]
         public static IRuntimeContextInstance Constructor(IValue path, IValue encoding)
         {
-            return new TextWriteImpl(path.AsString(), encoding.AsString());
+            return new TextWriteImpl(path.AsString(), encoding);
         }
 
         /// <summary>
@@ -100,7 +100,7 @@ public static IRuntimeContextInstance Constructor(IValue path, IValue encoding)
         [ScriptConstructor(Name = "По имени файла и кодировке")]
         public static IRuntimeContextInstance Constructor(IValue path, IValue encoding, IValue append)
         {
-            return new TextWriteImpl(path.AsString(), encoding.AsString(), append.AsBoolean());
+            return new TextWriteImpl(path.AsString(), encoding, append.AsBoolean());
         }
 
         /// <summary>

src/ScriptEngine.HostedScript/ScriptEngine.HostedScript.csproj

@@ -88,6 +88,7 @@
     <Compile Include="Library\Reflector.cs" />
     <Compile Include="Library\SymbolsEnum.cs" />
     <Compile Include="Library\SystemEnvironmentContext.cs" />
+    <Compile Include="Library\TextEncodingEnum.cs" />
     <Compile Include="Library\TextReadImpl.cs" />
     <Compile Include="Library\TextWriteImpl.cs" />
     <Compile Include="Library\Xml\XmlGlobalFunctions.cs" />

tests/text-write.os

@@ -7,6 +7,7 @@
 	ВсеТесты = Новый Массив;
 
 	ВсеТесты.Добавить("ТестДолжен_ПроверитьЧтоВозможнаЗаписьUTF8БезBOM");
+	ВсеТесты.Добавить("ТестДолжен_ПроверитьЧтоВозможнаЗаписьUTF8БезBOMСПеречислениемКодировкаТекста");
 
 	Возврат ВсеТесты;
 
@@ -33,3 +34,25 @@
 	УдалитьФайлы(Путь);
 
 КонецПроцедуры
+
+Процедура ТестДолжен_ПроверитьЧтоВозможнаЗаписьUTF8БезBOMСПеречислениемКодировкаТекста() Экспорт
+	
+	Путь = ПолучитьИмяВременногоФайла("txt");
+	ЗТ = Новый ЗаписьТекста(Путь, КодировкаТекста.ANSI); 
+	ЗТ.Закрыть(); 
+	ЗТ = Новый ЗаписьТекста(Путь,КодировкаТекста.UTF8,Истина);
+	ЗТ.Записать("Привет");
+	ЗТ.Закрыть();
+	
+	Файл = Новый Файл(Путь);
+	
+	Попытка
+		юТест.ПроверитьРавенство(12, Файл.Размер());
+	Исключение
+		УдалитьФайлы(Путь);
+		ВызватьИсключение;
+	КонецПопытки;
+	
+	УдалитьФайлы(Путь);
+	
+КонецПроцедуры