// Licensed to the .NET Foundation under one or more agreements.
// The .NET Foundation licenses this file to you under the MIT license.
 
using System.Collections.Generic;
 
namespace System.Reflection.Emit
{
    internal sealed class ParameterBuilderImpl : ParameterBuilder
    {
        private readonly string? _name;
        private readonly int _position;
        internal readonly MethodBuilderImpl _methodBuilder;
        internal ParameterAttributes _attributes;
 
        internal List<CustomAttributeWrapper>? _customAttributes;
        internal MarshallingData? _marshallingData;
        internal object? _defaultValue = DBNull.Value;
 
        public ParameterBuilderImpl(MethodBuilderImpl methodBuilder, int sequence, ParameterAttributes attributes, string? paramName)
        {
            _position = sequence;
            _name = paramName;
            _methodBuilder = methodBuilder;
            _attributes = attributes;
        }
 
        public override int Attributes => (int)_attributes;
 
        public override string? Name => _name;
 
        public override int Position => _position;
 
        public override void SetConstant(object? defaultValue)
        {
            Type parameterType = _position == 0 ? _methodBuilder.ReturnType : _methodBuilder.ParameterTypes![_position - 1];
            FieldBuilderImpl.ValidateDefaultValueType(defaultValue, parameterType);
            _defaultValue = defaultValue;
            _attributes |= ParameterAttributes.HasDefault;
        }
 
        protected override void SetCustomAttributeCore(ConstructorInfo con, ReadOnlySpan<byte> binaryAttribute)
        {
            switch (con.ReflectedType!.FullName)
            {
                case "System.Runtime.InteropServices.InAttribute":
                    _attributes |= ParameterAttributes.In;
                    return;
                case "System.Runtime.InteropServices.OutAttribute":
                    _attributes |= ParameterAttributes.Out;
                    return;
                case "System.Runtime.InteropServices.OptionalAttribute":
                    _attributes |= ParameterAttributes.Optional;
                    return;
                case "System.Runtime.InteropServices.MarshalAsAttribute":
                    _attributes |= ParameterAttributes.HasFieldMarshal;
                    _marshallingData = MarshallingData.CreateMarshallingData(con, binaryAttribute, isField: false);
                    return;
                case "System.Runtime.InteropServices.DefaultParameterValueAttribute":
                    // MS.NET doesn't handle this attribute but we handle it for consistency TODO: not sure if we need to handle this
                    CustomAttributeInfo caInfo = CustomAttributeInfo.DecodeCustomAttribute(con, binaryAttribute);
                    SetConstant(caInfo._ctorArgs[0]);
                    return;
            }
 
            _customAttributes ??= new List<CustomAttributeWrapper>();
            _customAttributes.Add(new CustomAttributeWrapper(con, binaryAttribute));
        }
    }
 
    internal sealed class ParameterInfoWrapper : ParameterInfo
    {
        private readonly ParameterBuilderImpl _pb;
        private readonly Type _type
;
        public ParameterInfoWrapper(ParameterBuilderImpl pb, Type type)
        {
            _pb = pb;
            _type = type;
        }
 
        public override ParameterAttributes Attributes => _pb._attributes;
 
        public override string? Name => _pb.Name;
 
        public override int Position => _pb.Position;
 
        public override Type ParameterType => _type;
 
        public override bool HasDefaultValue => _pb._defaultValue != DBNull.Value;
 
        public override object? DefaultValue => HasDefaultValue ? _pb._defaultValue : null;
    }
}