public static void WriteInstanceConstructor(HaxeWriter writer, ConstructorDeclarationSyntax ctorOpt)
{
writer.WriteIndent();
writer.Write("public function new(");
if (ctorOpt != null)
{
var firstParameter = true;
foreach (var parameter in ctorOpt.ParameterList.Parameters)
{
if (firstParameter)
{
firstParameter = false;
}
else
{
writer.Write(", ");
}
writer.Write(parameter.Identifier.ValueText);
writer.Write(TypeProcessor.ConvertTypeWithColon(parameter.Type));
if (parameter.Default != null)
{
writer.Write(" = ");
Core.Write(writer, parameter.Default.Value);
}
}
}
writer.Write(")\r\n");
writer.WriteOpenBrace();
if (!TypeState.Instance.DerivesFromObject)
{
if (ctorOpt == null || ctorOpt.Initializer == null)
{
writer.WriteLine("super();");
}
else
{
if (ctorOpt.Initializer.ThisOrBaseKeyword.ToString() != "base")
{
throw new Exception("Constructor overloading not supported " + Utility.Descriptor(ctorOpt));
}
writer.WriteIndent();
writer.Write("super(");
bool first = true;
foreach (var init in ctorOpt.Initializer.ArgumentList.Arguments)
{
if (first)
{
first = false;
}
else
{
writer.Write(", ");
}
Core.Write(writer, init.Expression);
}
writer.Write(");\r\n");
}
}
foreach (var field in TypeState.Instance.AllMembers
.OfType <BaseFieldDeclarationSyntax>()
.Where(o => !o.Modifiers.Any(SyntaxKind.StaticKeyword))
.SelectMany(o => o.Declaration.Variables)
.Where(o =>
(o.Initializer != null && !WriteField.IsConst(o.Parent.Parent.As <BaseFieldDeclarationSyntax>().Modifiers, o.Initializer, o.Parent.As <VariableDeclarationSyntax>().Type))
||
(o.Initializer == null && GenerateInitializerForFieldWithoutInitializer(o.Parent.As <VariableDeclarationSyntax>().Type))
||
o.Parent.Parent is EventFieldDeclarationSyntax))
{
var parentType = field.Parent.As <VariableDeclarationSyntax>().Type;
writer.WriteIndent();
writer.Write(field.Identifier.ValueText);
writer.Write(" = ");
if (field.Parent.Parent is EventFieldDeclarationSyntax)
{
writer.Write("new CsEvent<");
writer.Write(TypeProcessor.ConvertType(parentType));
writer.Write(">()");
}
else if (field.Initializer == null)
{
if (TypeProcessor.ValueToReference(parentType))
{
writer.Write("new ");
writer.Write(TypeProcessor.ConvertType(parentType));
writer.Write("()");
}
else
{
writer.Write(TypeProcessor.DefaultValue(TypeProcessor.ConvertType(parentType)));
}
}
else
{
Core.Write(writer, field.Initializer.Value);
}
writer.Write(";\r\n");
}
if (ctorOpt != null && ctorOpt.Body != null)
{
foreach (var statement in ctorOpt.Body.As <BlockSyntax>().Statements)
{
Core.Write(writer, statement);
}
TriviaProcessor.ProcessTrivias(writer, ctorOpt.Body.DescendantTrivia());
}
writer.WriteCloseBrace();
}
private static void Factory(HaxeWriter writer, SyntaxNode node)
{
if (node is MethodDeclarationSyntax)
{
WriteMethod.Go(writer, node.As <MethodDeclarationSyntax>());
}
else if (node is PropertyDeclarationSyntax)
{
WriteProperty.Go(writer, node.As <PropertyDeclarationSyntax>());
}
else if (node is FieldDeclarationSyntax)
{
WriteField.Go(writer, node.As <FieldDeclarationSyntax>());
}
else if (node is ConstructorDeclarationSyntax)
{
WriteConstructor.Go(writer, node.As <ConstructorDeclarationSyntax>());
}
else if (node is ExpressionStatementSyntax)
{
WriteStatement(writer, node.As <ExpressionStatementSyntax>());
}
else if (node is LocalDeclarationStatementSyntax)
{
WriteLocalDeclaration.Go(writer, node.As <LocalDeclarationStatementSyntax>());
}
else if (node is BlockSyntax)
{
WriteBlock(writer, node.As <BlockSyntax>());
}
else if (node is InvocationExpressionSyntax)
{
WriteInvocationExpression.Go(writer, node.As <InvocationExpressionSyntax>());
}
else if (node is LiteralExpressionSyntax)
{
WriteLiteralExpression.Go(writer, node.As <LiteralExpressionSyntax>());
}
else if (node is IdentifierNameSyntax)
{
WriteIdentifierName.Go(writer, node.As <IdentifierNameSyntax>());
}
else if (node is ImplicitArrayCreationExpressionSyntax)
{
WriteArrayCreationExpression.Go(writer, node.As <ImplicitArrayCreationExpressionSyntax>());
}
else if (node is ArrayCreationExpressionSyntax)
{
WriteArrayCreationExpression.Go(writer, node.As <ArrayCreationExpressionSyntax>());
}
else if (node is MemberAccessExpressionSyntax)
{
WriteMemberAccessExpression.Go(writer, node.As <MemberAccessExpressionSyntax>());
}
else if (node is ParenthesizedLambdaExpressionSyntax)
{
WriteLambdaExpression.Go(writer, node.As <ParenthesizedLambdaExpressionSyntax>());
}
else if (node is SimpleLambdaExpressionSyntax)
{
WriteLambdaExpression.Go(writer, node.As <SimpleLambdaExpressionSyntax>());
}
else if (node is ReturnStatementSyntax)
{
WriteReturnStatement.Go(writer, node.As <ReturnStatementSyntax>());
}
else if (node is ObjectCreationExpressionSyntax)
{
WriteObjectCreationExpression.Go(writer, node.As <ObjectCreationExpressionSyntax>());
}
else if (node is ElementAccessExpressionSyntax)
{
WriteElementAccessExpression.Go(writer, node.As <ElementAccessExpressionSyntax>());
}
else if (node is ForEachStatementSyntax)
{
WriteForEachStatement.Go(writer, node.As <ForEachStatementSyntax>());
}
else if (node is IfStatementSyntax)
{
WriteIfStatement.Go(writer, node.As <IfStatementSyntax>());
}
else if (node is BinaryExpressionSyntax)
{
WriteBinaryExpression.Go(writer, node.As <BinaryExpressionSyntax>());
}
else if (node is ConditionalExpressionSyntax)
{
WriteConditionalExpression.Go(writer, node.As <ConditionalExpressionSyntax>());
}
else if (node is BaseExpressionSyntax)
{
WriteBaseExpression.Go(writer, node.As <BaseExpressionSyntax>());
}
else if (node is ThisExpressionSyntax)
{
WriteThisExpression.Go(writer, node.As <ThisExpressionSyntax>());
}
else if (node is CastExpressionSyntax)
{
WriteCastExpression.Go(writer, node.As <CastExpressionSyntax>());
}
else if (node is ThrowStatementSyntax)
{
WriteThrowStatement.Go(writer, node.As <ThrowStatementSyntax>());
}
else if (node is ThrowExpressionSyntax)
{
WriteThrowStatement.GoExpression(writer, node.As <ThrowExpressionSyntax>());
}
else if (node is PrefixUnaryExpressionSyntax)
{
WriteUnaryExpression.Go(writer, node.As <PrefixUnaryExpressionSyntax>());
}
else if (node is PostfixUnaryExpressionSyntax)
{
WriteUnaryExpression.Go(writer, node.As <PostfixUnaryExpressionSyntax>());
}
else if (node is EqualsValueClauseSyntax)
{
WriteEqualsValueClause.Go(writer, node.As <EqualsValueClauseSyntax>());
}
else if (node is ForStatementSyntax)
{
WriteForStatement.Go(writer, node.As <ForStatementSyntax>());
}
else if (node is WhileStatementSyntax)
{
WriteWhileStatement.Go(writer, node.As <WhileStatementSyntax>());
}
else if (node is BreakStatementSyntax)
{
WriteBreakStatement.Go(writer, node.As <BreakStatementSyntax>());
}
else if (node is DoStatementSyntax)
{
WriteDoStatement.Go(writer, node.As <DoStatementSyntax>());
}
else if (node is SwitchStatementSyntax)
{
WriteSwitchStatement.Go(writer, node.As <SwitchStatementSyntax>());
}
else if (node is TryStatementSyntax)
{
WriteTryStatement.Go(writer, node.As <TryStatementSyntax>());
}
else if (node is UsingStatementSyntax)
{
WriteUsingStatement.Go(writer, node.As <UsingStatementSyntax>());
}
else if (node is ParenthesizedExpressionSyntax)
{
WriteParenthesizedExpression.Go(writer, node.As <ParenthesizedExpressionSyntax>());
}
else if (node is LockStatementSyntax)
{
WriteLockStatement.Go(writer, node.As <LockStatementSyntax>());
}
else if (node is ContinueStatementSyntax)
{
WriteContinueStatement.Go(writer, node.As <ContinueStatementSyntax>());
}
else if (node is TypeOfExpressionSyntax)
{
WriteTypeOfExpression.Go(writer, node.As <TypeOfExpressionSyntax>());
}
else if (node is AnonymousObjectCreationExpressionSyntax)
{
WriteAnonymousObjectCreationExpression.Go(writer, node.As <AnonymousObjectCreationExpressionSyntax>());
}
else if (node is EmptyStatementSyntax)
{
return; //ignore empty statements
}
else if (node is DelegateDeclarationSyntax)
{
return; //don't write delegates - we convert them to types directly
}
else if (node is EventFieldDeclarationSyntax)
{
WriteEventFieldDeclaration.Go(writer, node.As <EventFieldDeclarationSyntax>());
}
else if (node is DefaultExpressionSyntax)
{
WriteDefaultExpression.Go(writer, node.As <DefaultExpressionSyntax>());
}
else if (node is GenericNameSyntax)
{
WriteGenericName.Go(writer, node.As <GenericNameSyntax>());
}
else if (node is ConversionOperatorDeclarationSyntax)
{
WriteConversionOperatorDeclaration.Go(writer, node.As <ConversionOperatorDeclarationSyntax>());
}
else if (node is AssignmentExpressionSyntax)
{
WriteAssignmentExpressionSyntax.Go(writer, node.As <AssignmentExpressionSyntax>());
}
else if (node is OperatorDeclarationSyntax)
{
WriteMethod.WriteOperatorDeclaration(writer, node.As <OperatorDeclarationSyntax>());
}
else if (node is IndexerDeclarationSyntax)
{
WriteMethod.WriteIndexerDeclaration(writer, node.As <IndexerDeclarationSyntax>());
}
else
{
throw new NotImplementedException(node.GetType().Name + " is not supported. " + Utility.Descriptor(node));
}
}
public static void WriteStaticConstructor(HaxeWriter writer, ConstructorDeclarationSyntax staticConstructorOpt)
{
var staticFieldsNeedingInitialization = TypeState.Instance.AllMembers
.OfType <BaseFieldDeclarationSyntax>()
.Where(o => o.Modifiers.Any(SyntaxKind.StaticKeyword))
.SelectMany(o => o.Declaration.Variables)
.Where(o =>
(o.Initializer != null && !WriteField.IsConst(o.Parent.Parent.As <BaseFieldDeclarationSyntax>().Modifiers, o.Initializer, o.Parent.As <VariableDeclarationSyntax>().Type))
||
(o.Initializer == null && GenerateInitializerForFieldWithoutInitializer(o.Parent.As <VariableDeclarationSyntax>().Type))
||
o.Parent.Parent is EventFieldDeclarationSyntax)
.ToList();
if (staticConstructorOpt == null && staticFieldsNeedingInitialization.Count == 0)
{
return; //No static constructor needed
}
writer.WriteLine("public static function cctor():Void");
writer.WriteOpenBrace();
foreach (var field in staticFieldsNeedingInitialization)
{
var parentType = field.Parent.As <VariableDeclarationSyntax>().Type;
writer.WriteIndent();
writer.Write(field.Identifier.ValueText);
writer.Write(" = ");
if (field.Parent.Parent is EventFieldDeclarationSyntax)
{
writer.Write("new CsEvent<");
writer.Write(TypeProcessor.ConvertType(parentType));
writer.Write(">()");
}
else if (field.Initializer == null)
{
if (TypeProcessor.ValueToReference(parentType))
{
writer.Write("new ");
writer.Write(TypeProcessor.ConvertType(parentType));
writer.Write("()");
}
else
{
writer.Write(TypeProcessor.DefaultValue(TypeProcessor.ConvertType(parentType)));
}
}
else
{
Core.Write(writer, field.Initializer.As <EqualsValueClauseSyntax>().Value);
}
writer.Write(";\r\n");
}
if (staticConstructorOpt != null && staticConstructorOpt.Body != null)
{
foreach (var statement in staticConstructorOpt.Body.As <BlockSyntax>().Statements)
{
Core.Write(writer, statement);
}
}
writer.WriteCloseBrace();
StaticConstructors.Add(TypeState.Instance.TypeName);
}
public static void Go(HaxeWriter writer, PropertyDeclarationSyntax property)
{
Action <AccessorDeclarationSyntax, bool> writeRegion = (region, get) =>
{
writer.WriteIndent();
if (property.Modifiers.Any(SyntaxKind.OverrideKeyword))
{
writer.Write("override ");
}
if (property.Modifiers.Any(SyntaxKind.PublicKeyword) || property.Modifiers.Any(SyntaxKind.ProtectedKeyword) || property.Modifiers.Any(SyntaxKind.InternalKeyword))
{
writer.Write("public ");
}
if (property.Modifiers.Any(SyntaxKind.PrivateKeyword))
{
writer.Write("private ");
}
if (property.Modifiers.Any(SyntaxKind.StaticKeyword))
{
writer.Write("static ");
}
writer.Write("function ");
writer.Write(get ? "get_" : "set_");
writer.Write(property.Identifier.ValueText);
string type = TypeProcessor.ConvertType(property.Type);
if (get)
{
writer.Write("():" + type);
}
else
{
writer.Write("(value:" + type + "):" + type);
}
writer.WriteLine();
writer.WriteOpenBrace();
if (property.Modifiers.Any(SyntaxKind.AbstractKeyword))
{
writer.WriteLine("return throw new Exception(\"Abstract item called\");");
}
else if (region.Body == null)
{
throw new NotImplementedException("Properties in interfaces are not supported " + Utility.Descriptor(region));
}
else
{
foreach (var statement in region.Body.As <BlockSyntax>().Statements)
{
Core.Write(writer, statement);
}
if (!get)
{
//Unfortunately, all haXe property setters must return a value.
writer.WriteLine("return " + TypeProcessor.DefaultValue(type) + ";");
}
}
writer.WriteCloseBrace();
writer.WriteLine();
};
var getter = property.AccessorList.Accessors.SingleOrDefault(o => o.Keyword.Kind() == SyntaxKind.GetKeyword);
var setter = property.AccessorList.Accessors.SingleOrDefault(o => o.Keyword.Kind() == SyntaxKind.SetKeyword);
if (getter == null && setter == null)
{
throw new Exception("Property must have either a get or a set");
}
if (getter != null && setter != null && setter.Body == null && getter.Body == null)
{
//Both get and set are null, which means this is an automatic property. This is the equivilant of a field in haxe.
WriteField.Go(writer, property.Modifiers, property.Identifier.ValueText, property.Type);
}
else
{
if (!property.Modifiers.Any(SyntaxKind.OverrideKeyword))
{
//Write the property declaration. Overridden properties don't need this.
writer.WriteIndent();
if (property.Modifiers.Any(SyntaxKind.PublicKeyword) || property.Modifiers.Any(SyntaxKind.InternalKeyword))
{
writer.Write("public ");
}
if (property.Modifiers.Any(SyntaxKind.StaticKeyword))
{
writer.Write("static ");
}
writer.Write("var ");
writer.Write(property.Identifier.ValueText);
writer.Write("(");
if (getter != null)
{
writer.Write("get_" + property.Identifier.ValueText);
}
else
{
writer.Write("never");
}
writer.Write(", ");
if (setter != null)
{
writer.Write("set_" + property.Identifier.ValueText);
}
else
{
writer.Write("never");
}
writer.Write("):");
writer.Write(TypeProcessor.ConvertType(property.Type));
writer.Write(";\r\n");
}
if (getter != null)
{
writeRegion(getter, true);
}
if (setter != null)
{
writeRegion(setter, false);
}
}
}
