Browse Source

Completed ETF serialization for primitives, enums and nullables. Partially implemented support for classes, structs, dictionaries and enumerables.

tags/docs-0.9
RogueException 9 years ago
parent
commit
d17a7531da
4 changed files with 431 additions and 151 deletions
  1. +5
    -5
      src/Discord.Net.Net45/Discord.Net.csproj
  2. +0
    -145
      src/Discord.Net/ETF/ETFEncoder.cs
  3. +1
    -1
      src/Discord.Net/ETF/ETFReader.cs
  4. +425
    -0
      src/Discord.Net/ETF/ETFWriter.cs

+ 5
- 5
src/Discord.Net.Net45/Discord.Net.csproj View File

@@ -421,15 +421,15 @@
<Compile Include="..\Discord.Net\Enums\UserStatus.cs">
<Link>Enums\UserStatus.cs</Link>
</Compile>
<Compile Include="..\Discord.Net\ETF\ETFDecoder.cs">
<Link>ETF\ETFDecoder.cs</Link>
</Compile>
<Compile Include="..\Discord.Net\ETF\ETFEncoder.cs">
<Link>ETF\ETFEncoder.cs</Link>
<Compile Include="..\Discord.Net\ETF\ETFReader.cs">
<Link>ETF\ETFReader.cs</Link>
</Compile>
<Compile Include="..\Discord.Net\ETF\ETFType.cs">
<Link>ETF\ETFType.cs</Link>
</Compile>
<Compile Include="..\Discord.Net\ETF\ETFWriter.cs">
<Link>ETF\ETFWriter.cs</Link>
</Compile>
<Compile Include="..\Discord.Net\Events\ChannelEventArgs.cs">
<Link>Events\ChannelEventArgs.cs</Link>
</Compile>


+ 0
- 145
src/Discord.Net/ETF/ETFEncoder.cs View File

@@ -1,145 +0,0 @@
using System;
using System.Collections.Generic;
using System.IO;

namespace Discord.ETF
{
//TODO: Floats, Atoms, Tuples, Lists, Dictionaries

public unsafe class ETFEncoder
{
private readonly static byte[] _nilBytes = new byte[] { (byte)ETFType.SMALL_ATOM_EXT, 3, (byte)'n', (byte)'i', (byte)'l' };
private readonly static byte[] _falseBytes = new byte[] { (byte)ETFType.SMALL_ATOM_EXT, 5, (byte)'f', (byte)'a', (byte)'l', (byte)'s', (byte)'e' };
private readonly static byte[] _trueBytes = new byte[] { (byte)ETFType.SMALL_ATOM_EXT, 4, (byte)'t', (byte)'r', (byte)'u', (byte)'e' };
private byte[] _writeBuffer;

public ETFEncoder()
{
_writeBuffer = new byte[11];
}

private void WriteNil(BinaryWriter writer) => Append(writer, _nilBytes);
public void Write(BinaryWriter writer, bool value) => Append(writer, value ? _trueBytes : _falseBytes);

public void Write(BinaryWriter writer, byte value) => Write(writer, (ulong)value);
public void Write(BinaryWriter writer, sbyte value) => Write(writer, (long)value);
public void Write(BinaryWriter writer, ushort value) => Write(writer, (ulong)value);
public void Write(BinaryWriter writer, short value) => Write(writer, (long)value);
public void Write(BinaryWriter writer, uint value) => Write(writer, (ulong)value);
public void Write(BinaryWriter writer, int value) => Write(writer, (long)value);
public void Write(BinaryWriter writer, ulong value)
{
if (value <= byte.MaxValue)
Append(writer, new byte[] { (byte)ETFType.SMALL_INTEGER_EXT, (byte)value });
else if (value <= int.MaxValue)
{
Append(writer, (byte)ETFType.INTEGER_EXT,
(byte)((value >> 24) & 0xFF),
(byte)((value >> 16) & 0xFF),
(byte)((value >> 8) & 0xFF),
(byte)(value & 0xFF));
}
else
{
var buffer = new byte[3 + 8];
buffer[0] = (byte)ETFType.SMALL_BIG_EXT;
//buffer[1] = 0; //Always positive

byte bytes = 0;
while (value > 0)
{
buffer[3 + bytes] = (byte)(value & 0xFF);
value >>= 8;
bytes++;
}
buffer[1] = bytes; //Encoded bytes

Append(writer, buffer, 3 + bytes);
}
}
public void Write(BinaryWriter writer, long value)
{
if (value >= byte.MinValue && value <= byte.MaxValue)
{
Append(writer, (byte)ETFType.SMALL_INTEGER_EXT,
(byte)value);
}
else if (value >= int.MinValue && value <= int.MaxValue)
{
Append(writer, (byte)ETFType.INTEGER_EXT,
(byte)((value >> 24) & 0xFF),
(byte)((value >> 16) & 0xFF),
(byte)((value >> 8) & 0xFF),
(byte)(value & 0xFF));
}
else
{
var buffer = new byte[3 + 8];
buffer[0] = (byte)ETFType.SMALL_BIG_EXT;
if (value < 0)
{
buffer[2] = 1; //Is negative
value = -value;
}

byte bytes = 0;
while (value > 0)
{
buffer[3 + bytes] = (byte)(value & 0xFF);
value >>= 8;
bytes++;
}
buffer[1] = bytes; //Encoded bytes

Append(writer, buffer, 3 + bytes);
}
}
public void Write(BinaryWriter writer, float value) => Write(writer, (double)value);
public void Write(BinaryWriter writer, double value)
{
ulong value2 = *(ulong*)&value;
Append(writer, (byte)ETFType.NEW_FLOAT_EXT,
(byte)((value2 >> 56) & 0xFF),
(byte)((value2 >> 48) & 0xFF),
(byte)((value2 >> 40) & 0xFF),
(byte)((value2 >> 32) & 0xFF),
(byte)((value2 >> 24) & 0xFF),
(byte)((value2 >> 16) & 0xFF),
(byte)((value2 >> 8) & 0xFF),
(byte)(value2 & 0xFF));
}
public void Write(BinaryWriter writer, byte[] value)
{
int count = value.Length;
Append(writer, (byte)ETFType.BINARY_EXT,
(byte)((count >> 24) & 0xFF),
(byte)((count >> 16) & 0xFF),
(byte)((count >> 8) & 0xFF),
(byte)(count & 0xFF));
Append(writer, value);
}
public void Write(BinaryWriter writer, string value)
{
throw new NotImplementedException();
}

/*public void Write<T>(BinaryWriter writer, T value)
where T : ISerializable
{
throw new NotImplementedException();
}
public void Write<T>(BinaryWriter writer, IEnumerable<T> value)
where T : ISerializable
{
throw new NotImplementedException();
}*/

private void Append(BinaryWriter writer, params byte[] data) => Append(writer, data, data.Length);
private void Append(BinaryWriter writer, byte[] data, int length)
{
throw new NotImplementedException();
}
}
}

src/Discord.Net/ETF/ETFDecoder.cs → src/Discord.Net/ETF/ETFReader.cs View File

@@ -3,7 +3,7 @@ using System.IO;

namespace Discord.ETF
{
public class ETFDecoder
public class ETFReader
{
}
}

+ 425
- 0
src/Discord.Net/ETF/ETFWriter.cs View File

@@ -0,0 +1,425 @@
using System;
using System.Collections.Concurrent;
using System.Collections.Generic;
using System.IO;
using System.Linq;
using System.Reflection;
using System.Reflection.Emit;
using System.Text;

namespace Discord.ETF
{
public unsafe class ETFWriter : IDisposable
{
private readonly static byte[] _nilBytes = new byte[] { (byte)ETFType.SMALL_ATOM_EXT, 3, (byte)'n', (byte)'i', (byte)'l' };
private readonly static byte[] _falseBytes = new byte[] { (byte)ETFType.SMALL_ATOM_EXT, 5, (byte)'f', (byte)'a', (byte)'l', (byte)'s', (byte)'e' };
private readonly static byte[] _trueBytes = new byte[] { (byte)ETFType.SMALL_ATOM_EXT, 4, (byte)'t', (byte)'r', (byte)'u', (byte)'e' };

private readonly static MethodInfo _writeTMethod = typeof(ETFWriter).GetTypeInfo()
.GetDeclaredMethods(nameof(Write))
.Where(x => x.IsGenericMethodDefinition && x.GetParameters()[0].ParameterType == x.GetGenericArguments()[0])
.Single();
private readonly static MethodInfo _writeNullableTMethod = typeof(ETFWriter).GetTypeInfo()
.GetDeclaredMethods(nameof(Write))
.Where(x =>
{
if (!x.IsGenericMethodDefinition) return false;
var p = x.GetParameters()[0].ParameterType.GetTypeInfo();
return p.IsGenericType && p.GetGenericTypeDefinition() == typeof(Nullable<>);
})
.Single();
private readonly static DateTime _epochTime = new DateTime(1970, 1, 1, 0, 0, 0, DateTimeKind.Utc);

private readonly Stream _stream;
private readonly byte[] _buffer;
private readonly bool _leaveOpen;
private readonly Encoding _encoding;
private readonly ConcurrentDictionary<Type, Delegate> _serializers, _indirectSerializers;

public virtual Stream BaseStream
{
get
{
Flush();
return _stream;
}
}
public ETFWriter(Stream stream, bool leaveOpen = false)
{
if (stream == null) throw new ArgumentNullException(nameof(stream));

_stream = stream;
_leaveOpen = leaveOpen;
_buffer = new byte[11];
_encoding = Encoding.UTF8;
_serializers = new ConcurrentDictionary<Type, Delegate>();
_indirectSerializers = new ConcurrentDictionary<Type, Delegate>();
}

enum EnumTest1 { A, B, C }
public static byte[] Test()
{
using (var stream = new MemoryStream())
{
using (var writer = new ETFWriter(stream))
{
var request = new API.Client.Rest.SendMessageRequest(109384029348)
{
Content = "TestMsg",
Nonce = null,
IsTTS = false
};
writer.Write(request);
/*writer.Write<EnumTest1>((EnumTest1?)EnumTest1.C);
writer.Write((object)(EnumTest1?)EnumTest1.C);
writer.Write<EnumTest1>((EnumTest1?)null);
writer.Write((object)(EnumTest1?)null);*/
}
return stream.ToArray();
}
}
public void Write(bool value)
{
if (value)
_stream.Write(_trueBytes, 0, _trueBytes.Length);
else
_stream.Write(_falseBytes, 0, _falseBytes.Length);
}

public void Write(sbyte value) => Write((long)value);
public void Write(byte value) => Write((ulong)value);
public void Write(short value) => Write((long)value);
public void Write(ushort value) => Write((ulong)value);
public void Write(int value) => Write((long)value);
public void Write(uint value) => Write((ulong)value);
public void Write(long value)
{
if (value >= byte.MinValue && value <= byte.MaxValue)
{
_buffer[0] = (byte)ETFType.SMALL_INTEGER_EXT;
_buffer[1] = (byte)value;
_stream.Write(_buffer, 0, 2);
}
else if (value >= int.MinValue && value <= int.MaxValue)
{
_buffer[0] = (byte)ETFType.INTEGER_EXT;
_buffer[1] = (byte)((value >> 24) & 0xFF);
_buffer[2] = (byte)((value >> 16) & 0xFF);
_buffer[3] = (byte)((value >> 8) & 0xFF);
_buffer[4] = (byte)(value & 0xFF);
_stream.Write(_buffer, 0, 5);
}
else
{
_buffer[0] = (byte)ETFType.SMALL_BIG_EXT;
if (value < 0)
{
_buffer[2] = 1; //Is negative
value = -value;
}

byte bytes = 0;
while (value > 0)
_buffer[3 + bytes++] = (byte)((value >>= 8) & 0xFF);
_buffer[1] = bytes; //Encoded bytes

_stream.Write(_buffer, 0, 3 + bytes);
}
}
public void Write(ulong value)
{
if (value <= byte.MaxValue)
{
_buffer[0] = (byte)ETFType.SMALL_INTEGER_EXT;
_buffer[1] = (byte)value;
_stream.Write(_buffer, 0, 2);
}
else if (value <= int.MaxValue)
{
_buffer[0] = (byte)ETFType.INTEGER_EXT;
_buffer[1] = (byte)((value >> 24) & 0xFF);
_buffer[2] = (byte)((value >> 16) & 0xFF);
_buffer[3] = (byte)((value >> 8) & 0xFF);
_buffer[4] = (byte)(value & 0xFF);
_stream.Write(_buffer, 0, 5);
}
else
{
_buffer[0] = (byte)ETFType.SMALL_BIG_EXT;
_buffer[2] = 0; //Always positive

byte bytes = 0;
while (value > 0)
_buffer[3 + bytes++] = (byte)((value >>= 8) & 0xFF);
_buffer[1] = bytes; //Encoded bytes

_stream.Write(_buffer, 0, 3 + bytes);
}
}

public void Write(float value) => Write((double)value);
public void Write(double value)
{
ulong value2 = *(ulong*)&value;
_buffer[0] = (byte)ETFType.NEW_FLOAT_EXT;
_buffer[1] = (byte)((value2 >> 56) & 0xFF);
_buffer[2] = (byte)((value2 >> 48) & 0xFF);
_buffer[3] = (byte)((value2 >> 40) & 0xFF);
_buffer[4] = (byte)((value2 >> 32) & 0xFF);
_buffer[5] = (byte)((value2 >> 24) & 0xFF);
_buffer[6] = (byte)((value2 >> 16) & 0xFF);
_buffer[7] = (byte)((value2 >> 8) & 0xFF);
_buffer[8] = (byte)(value2 & 0xFF);
_stream.Write(_buffer, 0, 9);
}

public void Write(DateTime value) => Write((ulong)((value.Ticks - _epochTime.Ticks) / TimeSpan.TicksPerMillisecond));

public void Write(byte? value) { if (value.HasValue) Write((ulong)value.Value); else WriteNil(); }
public void Write(sbyte? value) { if (value.HasValue) Write((long)value.Value); else WriteNil(); }
public void Write(ushort? value) { if (value.HasValue) Write((ulong)value.Value); else WriteNil(); }
public void Write(short? value) { if (value.HasValue) Write((long)value.Value); else WriteNil(); }
public void Write(uint? value) { if (value.HasValue) Write((ulong)value.Value); else WriteNil(); }
public void Write(int? value) { if (value.HasValue) Write(value.Value); else WriteNil(); }
public void Write(ulong? value) { if (value.HasValue) Write(value.Value); else WriteNil(); }
public void Write(long? value) { if (value.HasValue) Write(value.Value); else WriteNil(); }
public void Write(float? value) { if (value.HasValue) Write((double)value.Value); else WriteNil(); }
public void Write(double? value) { if (value.HasValue) Write(value.Value); else WriteNil(); }
public void Write(DateTime? value) { if (value.HasValue) Write(value.Value); else WriteNil(); }

public void Write(byte[] value)
{
if (value != null)
{
int count = value.Length;
_buffer[0] = (byte)ETFType.BINARY_EXT;
_buffer[1] = (byte)((count >> 24) & 0xFF);
_buffer[2] = (byte)((count >> 16) & 0xFF);
_buffer[3] = (byte)((count >> 8) & 0xFF);
_buffer[4] = (byte)(count & 0xFF);
_stream.Write(_buffer, 0, 5);
_stream.Write(value, 0, value.Length);
}
else
WriteNil();
}
public void Write(string value)
{
if (value != null)
{
var bytes = _encoding.GetBytes(value);
int count = bytes.Length;
_buffer[0] = (byte)ETFType.BINARY_EXT;
_buffer[1] = (byte)((count >> 24) & 0xFF);
_buffer[2] = (byte)((count >> 16) & 0xFF);
_buffer[3] = (byte)((count >> 8) & 0xFF);
_buffer[4] = (byte)(count & 0xFF);
_stream.Write(_buffer, 0, 5);
_stream.Write(bytes, 0, bytes.Length);
}
else
WriteNil();
}

public void Write<T>(T obj)
{
var type = typeof(T);
var typeInfo = type.GetTypeInfo();
var action = _serializers.GetOrAdd(type, _ => CreateSerializer<T>(type, typeInfo, false)) as Action<ETFWriter, T>;
action(this, obj);
}
public void Write<T>(T? obj)
where T : struct
{
if (obj != null)
Write(obj.Value);
else
WriteNil();
}
public void Write(object obj)
{
if (obj != null)
{
var type = obj.GetType();
var typeInfo = type.GetTypeInfo();
var action = _indirectSerializers.GetOrAdd(type, _ => CreateSerializer<object>(type, typeInfo, true)) as Action<ETFWriter, object>;
action(this, obj);
}
else
WriteNil();
}

public virtual void Flush() => _stream.Flush();
public virtual long Seek(int offset, SeekOrigin origin) => _stream.Seek(offset, origin);
private Action<ETFWriter, T> CreateSerializer<T>(Type type, TypeInfo typeInfo, bool isObject)
{
var method = new DynamicMethod(!isObject ? "SerializeETF" : "SerializeIndirectETF",
null, new[] { typeof(ETFWriter), isObject? typeof(object) : type }, true);
var generator = method.GetILGenerator();

if (typeInfo.IsPrimitive || typeInfo.IsEnum)
{
generator.Emit(OpCodes.Ldarg_0); //ETFWriter(this)
generator.Emit(OpCodes.Ldarg_1); //ETFWriter(this), value
if (isObject && typeInfo.IsValueType)
generator.Emit(OpCodes.Unbox_Any, type); //ETFWriter(this), value
EmitETFWriteValue(generator, type, typeInfo);
}
else
{
//Scan for certain interfaces
Type dictionaryI = null, enumerableI = null;
foreach (var i in typeInfo.ImplementedInterfaces
.Where(x => x.IsConstructedGenericType))
{
if (i.GetGenericTypeDefinition() == typeof(IDictionary<,>))
{
//TODO: Emit null check
dictionaryI = i;
break;
}
else if (i.GetGenericTypeDefinition() == typeof(IEnumerable<>))
{
//TODO: Emit null check
enumerableI = i;
break;
}
}

if (dictionaryI != null)
{
throw new NotImplementedException();
}
else if (enumerableI != null)
{
throw new NotImplementedException();
}
else
{
//TODO: Add field/property names
typeInfo.ForEachField(f =>
{
if (!f.IsPublic) return;

generator.Emit(OpCodes.Ldarg_0); //ETFWriter(this)
generator.Emit(OpCodes.Ldarg_1); //ETFWriter(this), obj
generator.Emit(OpCodes.Ldfld, f); //ETFWriter(this), obj.fieldValue
if (isObject && typeInfo.IsValueType)
generator.Emit(OpCodes.Unbox_Any, type); //ETFWriter(this), obj.fieldValue
EmitETFWriteValue(generator, f.FieldType);
});

typeInfo.ForEachProperty(p =>
{
if (!p.CanRead || !p.GetMethod.IsPublic) return;

generator.Emit(OpCodes.Ldarg_0); //ETFWriter(this)
generator.Emit(OpCodes.Ldarg_1); //ETFWriter(this), obj
generator.EmitCall(OpCodes.Callvirt, p.GetMethod, null); //ETFWriter(this), obj.propValue
if (isObject && typeInfo.IsValueType)
generator.Emit(OpCodes.Unbox_Any, type); //ETFWriter(this), obj.propValue
EmitETFWriteValue(generator, p.PropertyType);
});
}
}

generator.Emit(OpCodes.Ret);
return method.CreateDelegate(typeof(Action<ETFWriter, T>)) as Action<ETFWriter, T>;
}

private void EmitETFWriteValue(ILGenerator generator, Type type, TypeInfo typeInfo = null)
{
if (typeInfo == null)
typeInfo = type.GetTypeInfo();
//Convert enum types to their base type
if (typeInfo.IsEnum)
{
type = Enum.GetUnderlyingType(type);
typeInfo = type.GetTypeInfo();
}
//Check if this type already has a direct call or simple conversion
Type targetType = null;
if (!typeInfo.IsEnum && IsType(type, typeof(long), typeof(ulong), typeof(double), typeof(bool), typeof(string),
typeof(sbyte?), typeof(byte?), typeof(short?), typeof(ushort?),
typeof(int?), typeof(uint?), typeof(long?), typeof(ulong?),
typeof(bool?), typeof(float?), typeof(double?),
typeof(object), typeof(DateTime)))
targetType = type; //Direct
else if (IsType(type, typeof(sbyte), typeof(short), typeof(int)))
{
generator.Emit(OpCodes.Conv_I8);
targetType = typeof(long);
}
else if (IsType(type, typeof(byte), typeof(ushort), typeof(uint)))
{
generator.Emit(OpCodes.Conv_U8);
targetType = typeof(ulong);
}
else if (IsType(type, typeof(float)))
{
generator.Emit(OpCodes.Conv_R8);
targetType = typeof(double);
}

//Primitives/Enums
if (targetType != null)
generator.EmitCall(OpCodes.Call, GetWriteMethod(targetType), null);

//Nullable Non-Primitives
else if (typeInfo.IsGenericType && typeInfo.GetGenericTypeDefinition() == typeof(Nullable<>))
generator.EmitCall(OpCodes.Call, _writeNullableTMethod.MakeGenericMethod(typeInfo.GenericTypeParameters), null);

//Structs/Classes
else if (typeInfo.IsClass || (typeInfo.IsValueType && !typeInfo.IsPrimitive))
generator.EmitCall(OpCodes.Call, _writeTMethod.MakeGenericMethod(type), null);

//Unsupported (decimal, char)
else
throw new InvalidOperationException($"Serializing {type.Name} is not supported.");
}

private bool IsType(Type type, params Type[] types)
{
for (int i = 0; i < types.Length; i++)
{
if (type == types[i])
return true;
}
return false;
}
private MethodInfo GetWriteMethod(Type paramType)
{
return typeof(ETFWriter).GetTypeInfo().GetDeclaredMethods(nameof(Write))
.Where(x => x.GetParameters()[0].ParameterType == paramType)
.FirstOrDefault();
}

private void WriteNil() => _stream.Write(_nilBytes, 0, _nilBytes.Length);

#region IDisposable
private bool _isDisposed = false;

protected virtual void Dispose(bool disposing)
{
if (!_isDisposed)
{
if (disposing)
{
if (_leaveOpen)
_stream.Flush();
else
_stream.Dispose();
}
_isDisposed = true;
}
}
public void Dispose() => Dispose(true);
#endregion
}
}

Loading…
Cancel
Save