private void CreateField(TypeInfo type, TypeAttr attr, VarDesc var, ref bool isConversionLoss)
{
TypeDesc fieldTypeDesc = var.elemdescVar.tdesc;
TypeConverter typeConverter = new TypeConverter(m_info, type, fieldTypeDesc, ConversionType.Field);
Type fieldType = typeConverter.ConvertedType;
string fieldName = type.GetDocumentation(var.memid);
FieldBuilder field = m_typeBuilder.DefineField(fieldName, fieldType, FieldAttributes.Public);
typeConverter.ApplyAttributes(field);
isConversionLoss |= typeConverter.IsConversionLoss;
//
// Emit ComConversionLossAttribute for fields if necessary
//
if (typeConverter.IsConversionLoss)
{
field.SetCustomAttribute(CustomAttributeHelper.GetBuilderForComConversionLoss());
//
// Emit Wrn_UnconvertableField warning
//
m_info.ReportEvent(
WarningCode.Wrn_UnconvertableField,
Resource.FormatString("Wrn_UnconvertableField", type.GetDocumentation(), fieldName));
}
//
// Emit TypeLibVarAttribute if necessary
//
if (var.wVarFlags != 0)
{
field.SetCustomAttribute(CustomAttributeHelper.GetBuilderForTypeLibVar((TypeLibVarFlags)var.wVarFlags));
}
}
private void CreateField(TypeInfo type, TypeAttr attr, VarDesc var, ref bool isConversionLoss)
{
if (IsObjectType(type, var.elemdescVar.tdesc))
{
isConversionLoss = true;
}
else
{
TypeConverter typeConverter = new TypeConverter(m_info, type, var.elemdescVar.tdesc, ConversionType.Field);
Type fieldType = typeConverter.ConvertedType;
// TlbImp2 will only skip reference types, instead of skipping every field
// Also, TlbImp1 will skip ValueType *, which doesn't make any sense. TlbImp2 will keep ValueType * as IntPtr
string fieldName = type.GetDocumentation(var.memid);
// Generates the [FieldOffset(0)] layout declarations that approximate unions in managed code
FieldBuilder field = m_typeBuilder.DefineField(fieldName, fieldType, FieldAttributes.Public);
field.SetCustomAttribute(CustomAttributeHelper.GetBuilderForFieldOffset(0));
typeConverter.ApplyAttributes(field);
isConversionLoss |= typeConverter.IsConversionLoss;
//
// Emit ComConversionLossAttribute for fields if necessary
//
if (typeConverter.IsConversionLoss)
{
field.SetCustomAttribute(CustomAttributeHelper.GetBuilderForComConversionLoss());
//
// Emit Wrn_UnconvertableField warning
//
m_info.ReportEvent(
WarningCode.Wrn_UnconvertableField,
Resource.FormatString("Wrn_UnconvertableField", type.GetDocumentation(), fieldName));
}
}
}
private void CreateField(TypeInfo type, TypeAttr attr, VarDesc var, ref bool isConversionLoss)
{
TypeDesc fieldTypeDesc = var.elemdescVar.tdesc;
TypeConverter typeConverter = new TypeConverter(m_info, type, fieldTypeDesc, ConversionType.Field);
Type fieldType = typeConverter.ConvertedType;
string fieldName = type.GetDocumentation(var.memid);
FieldBuilder field = m_typeBuilder.DefineField(fieldName, fieldType, FieldAttributes.Public);
typeConverter.ApplyAttributes(field);
isConversionLoss |= typeConverter.IsConversionLoss;
//
// Emit ComConversionLossAttribute for fields if necessary
//
if (typeConverter.IsConversionLoss)
{
field.SetCustomAttribute(CustomAttributeHelper.GetBuilderForComConversionLoss());
//
// Emit Wrn_UnconvertableField warning
//
m_info.ReportEvent(
WarningCode.Wrn_UnconvertableField,
Resource.FormatString("Wrn_UnconvertableField", m_typeBuilder.FullName, fieldName));
}
//
// Emit TypeLibVarAttribute if necessary
//
if (var.wVarFlags != 0)
{
field.SetCustomAttribute(CustomAttributeHelper.GetBuilderForTypeLibVar((TypeLibVarFlags)var.wVarFlags));
}
}
private void CreateField(TypeInfo type, TypeAttr attr, VarDesc var, ref bool isConversionLoss)
{
if (IsObjectType(type, var.elemdescVar.tdesc))
{
isConversionLoss = true;
}
else
{
TypeConverter typeConverter = new TypeConverter(m_info, type, var.elemdescVar.tdesc, ConversionType.Field);
Type fieldType = typeConverter.ConvertedType;
// TlbImp2 will only skip reference types, instead of skipping every field
// Also, TlbImp1 will skip ValueType *, which doesn't make any sense. TlbImp2 will keep ValueType * as IntPtr
string fieldName = type.GetDocumentation(var.memid);
// Generates the [FieldOffset(0)] layout declarations that approximate unions in managed code
FieldBuilder field = m_typeBuilder.DefineField(fieldName, fieldType, FieldAttributes.Public);
field.SetCustomAttribute(CustomAttributeHelper.GetBuilderForFieldOffset(0));
typeConverter.ApplyAttributes(field);
isConversionLoss |= typeConverter.IsConversionLoss;
//
// Emit ComConversionLossAttribute for fields if necessary
//
if (typeConverter.IsConversionLoss)
{
field.SetCustomAttribute(CustomAttributeHelper.GetBuilderForComConversionLoss());
//
// Emit Wrn_UnconvertableField warning
//
m_info.ReportEvent(
WarningCode.Wrn_UnconvertableField,
Resource.FormatString("Wrn_UnconvertableField", m_typeBuilder.FullName, fieldName));
}
}
}
/// <summary>
/// Process parameters and apply attributes
/// </summary>
private static void ProcessParam(InterfaceInfo info, InterfaceMemberInfo memInfo, ElemDesc desc,
TypeConverter converter, MethodBuilder methodBuilder, int index, string strname,
bool isVarArg, bool isOptionalArg)
{
ParamDesc param = desc.paramdesc;
ParameterAttributes attributes = ParameterAttributes.None;
if (converter.ParameterAttributesOverride != ParameterAttributes.None)
{
attributes = converter.ParameterAttributesOverride;
}
else
{
//
// Determine in/out/opt
// Don't emit [In], [Out] for return type
//
if (index != 0)
{
// Always emit in/out information according to type library
if (param.IsIn)
{
attributes |= ParameterAttributes.In;
}
if (param.IsOut)
{
attributes |= ParameterAttributes.Out;
}
if (param.IsOpt || isOptionalArg)
{
attributes |= ParameterAttributes.Optional;
}
}
}
//
// Define the parameter
//
ParameterBuilder parameterBuilder = methodBuilder.DefineParameter(index, attributes, strname);
//
// Apply MarshalAs attribute
//
converter.ApplyAttributes(parameterBuilder);
//
// Support for vararg
//
if (isVarArg)
{
parameterBuilder.SetCustomAttribute(CustomAttributeHelper.GetBuilderForParamArray());
}
//
// Support for default value
//
if (desc.paramdesc.HasDefault && desc.paramdesc.lpVarValue != IntPtr.Zero)
SetDefaultValue(desc, converter.ConvertedType, parameterBuilder);
}