BadNative.cs

Go to the documentation of this file.

using BadScript2.Runtime.Error;
using BadScript2.Runtime.Objects.Types;
 
namespace BadScript2.Runtime.Objects.Native;
 
public class BadNative<T> : BadObject, IBadNative
{
    private static readonly BadClassPrototype s_Prototype = new BadNativeClassPrototype<BadNative<T>>(typeof(T).Name,
                                                                                                      (_, args) =>
                                                                                                      {
                                                                                                          if (args.Length != 1 || args[0] is not BadNative<T> t)
                                                                                                          {
                                                                                                              throw new BadRuntimeException("BadNative<T> constructor takes one argument of type BadNative<T>");
                                                                                                          }
 
                                                                                                          return t;
                                                                                                      },
                                                                                                      null
                                                                                                     );
 
    private readonly T m_Value;
 
 
    public BadNative(T value)
    {
        if (value == null)
        {
            throw new Exception("Can not construct native object with null value");
        }
 
        m_Value = value;
    }
 
    public T Value => m_Value;
 
#region IBadNative Members
 
    object IBadNative.Value => m_Value!;
 
    Type IBadNative.Type => m_Value!.GetType();
 
 
    public bool Equals(IBadNative? other)
    {
        if (other is null)
        {
            return false;
        }
 
        IBadNative thisN = this;
 
        return thisN.Value.Equals(other.Value);
    }
 
#endregion
 
    public override int GetHashCode()
    {
        return EqualityComparer<T>.Default.GetHashCode(Value!);
    }
 
 
    public override string ToSafeString(List<BadObject> done)
    {
        return m_Value!.ToString()!;
    }
 
    public static bool operator ==(BadNative<T> a, BadObject b)
    {
        return a.Equals(b);
    }
 
    public static bool operator !=(BadNative<T> a, BadObject b)
    {
        return !(a == b);
    }
 
    public override bool Equals(object? obj)
    {
        return obj is IBadNative other && Equals(other);
    }
 
    public override BadClassPrototype GetPrototype()
    {
        return s_Prototype;
    }
 
    public override bool HasProperty(string propName, BadScope? caller = null)
    {
        return caller != null && caller.Provider.HasObject<T>(propName);
    }
 
    public override BadObjectReference GetProperty(string propName, BadScope? caller = null)
    {
        return BadObjectReference.Make($"BadNative<{typeof(T).Name}>.{propName}",
                                       (p) => caller != null
                                                 ? caller.Provider.GetObject<T>(propName, this, caller, p)
                                                 : throw BadRuntimeException.Create(caller,
                                                        $"No property named {propName} for type {GetType().Name}"
                                                       )
                                      );
    }
}