private static void WriteTemplateTraits(CCodeWriterText c, INamedTypeSymbol namedTypeSymbol)
{
if (namedTypeSymbol.IsPrimitiveValueType() || namedTypeSymbol.TypeKind == TypeKind.Enum || namedTypeSymbol.SpecialType == SpecialType.System_Void)
{
// value to class
c.TextSpanNewLine("template<>");
c.TextSpan("struct");
c.WhiteSpace();
c.TextSpan("valuetype_to_class<");
c.WriteType(namedTypeSymbol);
c.TextSpan(">");
c.WhiteSpace();
c.TextSpan("{ typedef");
c.WhiteSpace();
c.WriteType(namedTypeSymbol, true, false, true);
c.WhiteSpace();
c.TextSpanNewLine("type; };");
// class to value
c.TextSpanNewLine("template<>");
c.TextSpan("struct");
c.WhiteSpace();
c.TextSpan("class_to_valuetype<");
c.WriteType(namedTypeSymbol, true, false, true);
c.TextSpan(">");
c.WhiteSpace();
c.TextSpan("{ typedef");
c.WhiteSpace();
c.WriteType(namedTypeSymbol);
c.WhiteSpace();
c.TextSpanNewLine("type; };");
// map class to valuetype
if (namedTypeSymbol.IsAtomicType())
{
c.TextSpanNewLine("template<>");
c.TextSpan("struct gc_traits<");
c.WriteType(namedTypeSymbol, true, false, true);
c.TextSpanNewLine("> { constexpr static const GCAtomic value = GCAtomic::Default; };");
}
}
}
private static void WriteForwardDeclarationForUnit(CCodeUnit unit, IndentedTextWriter itw, CCodeWriterText c)
{
var namedTypeSymbol = (INamedTypeSymbol)unit.Type;
foreach (var namespaceNode in namedTypeSymbol.ContainingNamespace.EnumNamespaces())
{
itw.Write("namespace ");
c.WriteNamespaceName(namespaceNode);
itw.Write(" { ");
}
if (namedTypeSymbol.IsGenericType)
{
c.WriteTemplateDeclaration(namedTypeSymbol);
}
itw.Write(namedTypeSymbol.IsValueType ? "struct" : "class");
itw.Write(" ");
c.WriteTypeName(namedTypeSymbol, false);
itw.Write("; ");
if (namedTypeSymbol.TypeKind == TypeKind.Enum)
{
WriteEnum(itw, c, namedTypeSymbol);
}
foreach (var namespaceNode in namedTypeSymbol.ContainingNamespace.EnumNamespaces())
{
itw.Write("}");
}
itw.WriteLine();
if (namedTypeSymbol.SpecialType == SpecialType.System_Object || namedTypeSymbol.SpecialType == SpecialType.System_String)
{
itw.Write("typedef ");
c.WriteType(namedTypeSymbol, suppressReference: true, allowKeywords: false);
itw.Write(" ");
c.WriteTypeName(namedTypeSymbol);
itw.WriteLine(";");
}
}
private static void WriteEnum(IndentedTextWriter itw, CCodeWriterText c, INamedTypeSymbol namedTypeSymbol)
{
itw.WriteLine();
itw.Write("enum class ");
c.WriteTypeName(namedTypeSymbol, false, true);
itw.Write(" : ");
c.WriteType(namedTypeSymbol.EnumUnderlyingType);
c.NewLine();
c.OpenBlock();
var constantValueTypeDiscriminator = namedTypeSymbol.EnumUnderlyingType.SpecialType.GetDiscriminator();
var any = false;
foreach (var constValue in namedTypeSymbol.GetMembers().OfType <IFieldSymbol>().Where(f => f.IsConst))
{
if (any)
{
c.TextSpan(",");
c.WhiteSpace();
}
c.TextSpan("c_");
c.WriteName(constValue);
if (constValue.ConstantValue != null)
{
c.TextSpan(" = ");
new Literal {
Value = ConstantValue.Create(constValue.ConstantValue, constantValueTypeDiscriminator)
}
.WriteTo(c);
}
any = true;
}
c.EndBlockWithoutNewLine();
c.EndStatement();
}
private static void WriteTemplateTraits(CCodeWriterText c, INamedTypeSymbol namedTypeSymbol)
{
if (namedTypeSymbol.IsPrimitiveValueType() || namedTypeSymbol.TypeKind == TypeKind.Enum || namedTypeSymbol.SpecialType == SpecialType.System_Void)
{
// value to class
c.TextSpanNewLine("template<>");
c.TextSpan("struct");
c.WhiteSpace();
c.TextSpan("valuetype_to_class<");
c.WriteType(namedTypeSymbol);
c.TextSpan(">");
c.WhiteSpace();
c.TextSpan("{ typedef");
c.WhiteSpace();
c.WriteType(namedTypeSymbol, true, false, true);
c.WhiteSpace();
c.TextSpanNewLine("type; };");
// class to value
c.TextSpanNewLine("template<>");
c.TextSpan("struct");
c.WhiteSpace();
c.TextSpan("class_to_valuetype<");
c.WriteType(namedTypeSymbol, true, false, true);
c.TextSpan(">");
c.WhiteSpace();
c.TextSpan("{ typedef");
c.WhiteSpace();
c.WriteType(namedTypeSymbol);
c.WhiteSpace();
c.TextSpanNewLine("type; };");
// map class to valuetype
if (namedTypeSymbol.IsAtomicType())
{
c.TextSpanNewLine("template<>");
c.TextSpan("struct gc_traits<");
c.WriteType(namedTypeSymbol, true, false, true);
c.TextSpanNewLine("> { constexpr static const GCAtomic value = GCAtomic::Default; };");
}
}
// type holder
var isTypeHolder = namedTypeSymbol.SpecialType == SpecialType.None && namedTypeSymbol.TypeKind == TypeKind.Struct && namedTypeSymbol.Name.EndsWith("__type");
var isNotModule = namedTypeSymbol.Name != "<Module>";
if (!isTypeHolder && isNotModule)
{
c.TextSpan("template<");
if (namedTypeSymbol.IsGenericType || namedTypeSymbol.IsAnonymousType)
{
c.WriteTemplateDefinitionParameters(namedTypeSymbol);
}
c.TextSpanNewLine(">");
c.TextSpan("struct");
c.WhiteSpace();
c.TextSpan("type_holder<");
c.WriteType(namedTypeSymbol, true, false, true);
c.TextSpan(">");
c.WhiteSpace();
c.TextSpan("{ typedef");
c.WhiteSpace();
c.WriteType(namedTypeSymbol, true, false, true, typeOfName: true);
c.WhiteSpace();
c.TextSpanNewLine("type; };");
}
}
private static void WriteFullDeclarationForUnit(CCodeUnit unit, IndentedTextWriter itw, CCodeWriterText c)
{
var namedTypeSymbol = (INamedTypeSymbol)unit.Type;
WriteTemplateTraits(c, namedTypeSymbol);
WriteNamespaceOpen(namedTypeSymbol, c);
// write extern declaration
var externDeclarations = unit.Declarations.Select(
declaration => new { declaration, codeMethodDeclaration = declaration as CCodeMethodDeclaration })
.Where(@t => @t.codeMethodDeclaration != null && @t.codeMethodDeclaration.IsExternDeclaration)
.Select(@t => @t.declaration).ToList();
if (externDeclarations.Any())
{
itw.Write("extern \"C\"");
c.WhiteSpace();
c.OpenBlock();
foreach (var declaration in externDeclarations)
{
declaration.WriteTo(c);
}
c.EndBlock();
}
if (namedTypeSymbol.IsGenericType)
{
c.WriteTemplateDeclaration(namedTypeSymbol);
}
itw.Write(namedTypeSymbol.IsValueType ? "struct" : "class");
itw.Write(" ");
c.WriteTypeName(namedTypeSymbol, false);
if (namedTypeSymbol.BaseType != null)
{
itw.Write(" : public ");
c.WriteTypeFullName(namedTypeSymbol.BaseType);
}
itw.WriteLine();
itw.WriteLine("{");
itw.WriteLine("public:");
itw.Indent++;
// base declaration
if (namedTypeSymbol.BaseType != null)
{
itw.Write("typedef ");
c.WriteTypeFullName(namedTypeSymbol.BaseType, false);
itw.WriteLine(" base;");
}
foreach (var method in namedTypeSymbol.IterateAllMethodsWithTheSameNamesTakeOnlyOne())
{
c.TextSpan("using");
c.WhiteSpace();
c.WriteType(namedTypeSymbol.BaseType ?? method.ReceiverType, suppressReference: true, allowKeywords: true);
c.TextSpan("::");
c.WriteMethodName(method);
c.TextSpan(";");
c.NewLine();
}
if (namedTypeSymbol.TypeKind == TypeKind.Enum)
{
// value holder for enum
c.WriteType(namedTypeSymbol);
itw.WriteLine(" m_value;");
}
if (namedTypeSymbol.IsRuntimeType())
{
c.WriteTypeName(namedTypeSymbol, false);
itw.WriteLine("() = default;");
}
/*
* if (namedTypeSymbol.IsIntPtrType())
* {
* c.WriteTypeName(namedTypeSymbol, false);
* itw.WriteLine("() = default;");
* }
*/
foreach (var declaration in unit.Declarations)
{
var codeMethodDeclaration = declaration as CCodeMethodDeclaration;
if (codeMethodDeclaration == null || !codeMethodDeclaration.IsExternDeclaration)
{
declaration.WriteTo(c);
if (codeMethodDeclaration != null && codeMethodDeclaration.MethodBodyOpt != null)
{
c.Separate();
}
}
}
// write interface wrappers
foreach (var iface in namedTypeSymbol.Interfaces)
{
WriteInterfaceWrapper(c, iface, namedTypeSymbol);
}
itw.Indent--;
itw.WriteLine("};");
WriteNamespaceClose(namedTypeSymbol, c);
}
private static void WriteFullDeclarationForUnit(CCodeUnit unit, IndentedTextWriter itw, CCodeWriterText c)
{
var any = false;
var namedTypeSymbol = (INamedTypeSymbol)unit.Type;
foreach (var namespaceNode in namedTypeSymbol.ContainingNamespace.EnumNamespaces())
{
itw.Write("namespace ");
c.WriteNamespaceName(namespaceNode);
itw.Write(" { ");
any = true;
}
if (any)
{
itw.Indent++;
itw.WriteLine();
}
if (namedTypeSymbol.IsGenericType)
{
c.WriteTemplateDeclaration(namedTypeSymbol);
}
itw.Write(namedTypeSymbol.IsValueType ? "struct" : "class");
itw.Write(" ");
c.WriteTypeName(namedTypeSymbol, false);
if (namedTypeSymbol.BaseType != null)
{
itw.Write(" : public ");
c.WriteTypeFullName(namedTypeSymbol.BaseType);
}
itw.WriteLine();
itw.WriteLine("{");
itw.WriteLine("public:");
itw.Indent++;
// base declaration
if (namedTypeSymbol.BaseType != null)
{
itw.Write("typedef ");
c.WriteTypeFullName(namedTypeSymbol.BaseType, false);
itw.WriteLine(" base;");
}
foreach (var method in namedTypeSymbol.IterateAllMethodsWithTheSameNamesTakeOnlyOne())
{
c.TextSpan("using");
c.WhiteSpace();
c.WriteType(namedTypeSymbol.BaseType ?? method.ReceiverType, suppressReference: true, allowKeywords: true);
c.TextSpan("::");
c.WriteMethodName(method);
c.TextSpan(";");
c.NewLine();
}
if (namedTypeSymbol.TypeKind == TypeKind.Enum)
{
// value holder for enum
c.WriteType(namedTypeSymbol);
itw.WriteLine(" m_value;");
}
/*
* if (!unit.HasDefaultConstructor)
* {
* c.WriteTypeName(namedTypeSymbol, false);
* itw.WriteLine("() = default;");
* }
*/
foreach (var declaration in unit.Declarations)
{
declaration.WriteTo(c);
}
// write interface wrappers
foreach (var iface in namedTypeSymbol.Interfaces)
{
WriteInterfaceWrapper(c, iface, namedTypeSymbol);
}
itw.Indent--;
itw.WriteLine("};");
if (namedTypeSymbol.TypeKind == TypeKind.Delegate)
{
itw.WriteLine();
new CCodeDelegateWrapperClass(namedTypeSymbol).WriteTo(c);
itw.WriteLine();
}
foreach (var namespaceNode in namedTypeSymbol.ContainingNamespace.EnumNamespaces())
{
itw.Indent--;
itw.Write("}");
}
itw.WriteLine();
if (namedTypeSymbol.IsPrimitiveValueType() || namedTypeSymbol.TypeKind == TypeKind.Enum || namedTypeSymbol.SpecialType == SpecialType.System_Void)
{
// value to class
c.TextSpanNewLine("template<>");
c.TextSpan("struct");
c.WhiteSpace();
c.TextSpan("valuetype_to_class<");
c.WriteType(namedTypeSymbol);
c.TextSpan(">");
c.WhiteSpace();
c.TextSpan("{ typedef");
c.WhiteSpace();
c.WriteType(namedTypeSymbol, true, false, true);
c.WhiteSpace();
c.TextSpan("type; };");
// class to value
c.TextSpanNewLine("template<>");
c.TextSpan("struct");
c.WhiteSpace();
c.TextSpan("class_to_valuetype<");
c.WriteType(namedTypeSymbol, true, false, true);
c.TextSpan(">");
c.WhiteSpace();
c.TextSpan("{ typedef");
c.WhiteSpace();
c.WriteType(namedTypeSymbol);
c.WhiteSpace();
c.TextSpan("type; };");
itw.WriteLine();
if (namedTypeSymbol.SpecialType != SpecialType.System_Void)
{
new CCodeBoxForPrimitiveValuesOrEnumsDeclaration(namedTypeSymbol).WriteTo(c);
itw.WriteLine();
}
}
}
