BadObjectReference.cs

Go to the documentation of this file.

using BadScript2.Common;
using BadScript2.Runtime.Error;
using BadScript2.Runtime.Objects.Types;
 
namespace BadScript2.Runtime.Objects;
 
public abstract class BadObjectReference : BadObject
{
    public abstract BadObject Resolve(BadSourcePosition? position);
 
    public abstract void Delete(BadSourcePosition? position);
 
    public abstract void Set(BadObject obj, BadSourcePosition? position, BadPropertyInfo? info = null, bool noChangeEvent = false);
 
    public static BadObjectReference Make(string refText,
                                          Func<BadSourcePosition?, BadObject> getter,
                                          Action<BadObject,BadSourcePosition?,  BadPropertyInfo?>? setter = null,
                                          Action<BadSourcePosition?>? delete = null)
    {
        return new BadObjectReferenceImpl(refText,
                                          getter,
                                          (o,p, i, _) =>
                                          {
                                              if (setter == null)
                                              {
                                                  throw BadRuntimeException.Create(null, $"Cannot set reference {refText} because it is read-only", p);
                                              }
 
                                              setter(o, p, i);
                                          },
                                          delete
                                         );
    }
 
    public static BadObjectReference Make(string refText,
                                          Func<BadSourcePosition?, BadObject> getter,
                                          Action<BadObject, BadSourcePosition?, BadPropertyInfo?, bool>? setter,
                                          Action<BadSourcePosition?>? delete = null)
    {
        return new BadObjectReferenceImpl(refText, getter, setter, delete);
    }
 
#region Nested type: BadObjectReferenceImpl
 
    private class BadObjectReferenceImpl : BadObjectReference
    {
        private readonly Action<BadSourcePosition?>? m_Delete;
 
        private readonly Func<BadSourcePosition?, BadObject> m_Getter;
 
        private readonly string m_RefText;
 
        private readonly Action<BadObject, BadSourcePosition?, BadPropertyInfo?, bool>? m_Setter;
 
        public BadObjectReferenceImpl(string refText,
                                      Func<BadSourcePosition?, BadObject> getter,
                                      Action<BadObject, BadSourcePosition?, BadPropertyInfo?, bool>? setter,
                                      Action<BadSourcePosition?>? delete)
        {
            m_Getter = getter;
            m_Setter = setter;
            m_Delete = delete;
            m_RefText = refText;
        }
 
        public override BadClassPrototype GetPrototype()
        {
            return m_Getter(null)
                .GetPrototype();
        }
 
        public override BadObject Resolve(BadSourcePosition? position)
        {
            return m_Getter(position);
        }
 
        public override void Set(BadObject obj, BadSourcePosition? position, BadPropertyInfo? info = null, bool noChangeEvent = false)
        {
            if (m_Setter == null)
            {
                throw new BadRuntimeException("Cannot set reference " + m_RefText + " because it is read-only");
            }
 
            m_Setter(obj, position, info ?? new BadPropertyInfo(BadAnyPrototype.Instance), noChangeEvent);
        }
 
        public override string ToSafeString(List<BadObject> done)
        {
            return m_RefText;
        }
 
        public override void Delete(BadSourcePosition? position)
        {
            if (m_Delete == null)
            {
                throw new BadRuntimeException("Cannot set delete " + m_RefText + " because it is read-only");
            }
 
            m_Delete.Invoke(position);
        }
    }
 
#endregion
}