[vala/wip/transform: 9/32] GVariant transformer
- From: Luca Bruno <lucabru src gnome org>
- To: commits-list gnome org
- Cc:
- Subject: [vala/wip/transform: 9/32] GVariant transformer
- Date: Wed, 4 Jan 2012 14:09:43 +0000 (UTC)
commit fbd00383fa7f54d70aba32d958d00ae2ce2fe7e4
Author: Luca Bruno <lucabru src gnome org>
Date: Wed Dec 28 00:19:58 2011 +0100
GVariant transformer
codegen/Makefile.am | 1 +
codegen/valagvarianttransformer.vala | 270 ++++++++++++++++++++++++++++++++++
compiler/valacompiler.vala | 2 +-
vala/valacodetransformer.vala | 6 +-
vala/valapointerindirection.vala | 2 -
vala/valaregexliteral.vala | 2 -
6 files changed, 277 insertions(+), 6 deletions(-)
---
diff --git a/codegen/Makefile.am b/codegen/Makefile.am
index 2535a88..e235aa1 100644
--- a/codegen/Makefile.am
+++ b/codegen/Makefile.am
@@ -51,6 +51,7 @@ libvala_la_VALASOURCES = \
valagsignalmodule.vala \
valagtypemodule.vala \
valagvariantmodule.vala \
+ valagvarianttransformer.vala \
valainterfaceregisterfunction.vala \
valastructregisterfunction.vala \
valatyperegisterfunction.vala \
diff --git a/codegen/valagvarianttransformer.vala b/codegen/valagvarianttransformer.vala
new file mode 100644
index 0000000..3ead018
--- /dev/null
+++ b/codegen/valagvarianttransformer.vala
@@ -0,0 +1,270 @@
+/* valagvarianttransformer.vala
+ *
+ * Copyright (C) 2011 Luca Bruno
+ *
+ * This library is free software; you can redistribute it and/or
+ * modify it under the terms of the GNU Lesser General Public
+ * License as published by the Free Software Foundation; either
+ * version 2.1 of the License, or (at your option) any later version.
+
+ * This library is distributed in the hope that it will be useful,
+ * but WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
+ * Lesser General Public License for more details.
+
+ * You should have received a copy of the GNU Lesser General Public
+ * License along with this library; if not, write to the Free Software
+ * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA
+ *
+ * Author:
+ * Luca Bruno <lucabru src gnome org>
+ */
+
+/**
+ * Code visitor for transforming the code tree related to GVariant.
+ */
+public class Vala.GVariantTransformer : CodeTransformer {
+ struct BasicTypeInfo {
+ public unowned string signature;
+ public unowned string type_name;
+ public bool is_string;
+ }
+
+ const BasicTypeInfo[] basic_types = {
+ { "y", "byte", false },
+ { "b", "boolean", false },
+ { "n", "int16", false },
+ { "q", "uint16", false },
+ { "i", "int32", false },
+ { "u", "uint32", false },
+ { "x", "int64", false },
+ { "t", "uint64", false },
+ { "d", "double", false },
+ { "s", "string", true },
+ { "o", "object_path", true },
+ { "g", "signature", true }
+ };
+
+ Statement current_statement;
+ Block current_block;
+
+ bool get_basic_type_info (string signature, out BasicTypeInfo basic_type) {
+ foreach (BasicTypeInfo info in basic_types) {
+ if (info.signature == signature) {
+ basic_type = info;
+ return true;
+ }
+ }
+ basic_type = BasicTypeInfo ();
+ return false;
+ }
+
+ MemberAccess member_access (string symbol_string, CodeNode node) {
+ MemberAccess? ma = null;
+ bool first = true;
+ foreach (unowned string s in symbol_string.substring(1).split (".")) {
+ if (first) {
+ ma = new MemberAccess (ma, symbol_string[0].to_string()+s, node.source_reference);
+ first = false;
+ } else {
+ ma = new MemberAccess (ma, s, node.source_reference);
+ }
+ }
+ return ma;
+ }
+
+ Expression serialize_basic (BasicTypeInfo basic_type, Expression expr) {
+ var new_call = new ObjectCreationExpression (member_access ("GLib.Variant." + basic_type.type_name, expr), expr.source_reference);
+ new_call.add_argument (expr);
+ return new_call;
+ }
+
+ public static string? get_dbus_signature (Symbol symbol) {
+ return symbol.get_attribute_string ("DBus", "signature");
+ }
+
+ static bool is_string_marshalled_enum (TypeSymbol? symbol) {
+ if (symbol != null && symbol is Enum) {
+ return symbol.get_attribute_bool ("DBus", "use_string_marshalling");
+ }
+ return false;
+ }
+
+ public static string? get_type_signature (DataType datatype, Symbol? symbol = null) {
+ if (symbol != null) {
+ string sig = get_dbus_signature (symbol);
+ if (sig != null) {
+ // allow overriding signature in attribute, used for raw GVariants
+ return sig;
+ }
+ }
+
+ var array_type = datatype as ArrayType;
+
+ if (array_type != null) {
+ string element_type_signature = get_type_signature (array_type.element_type);
+
+ if (element_type_signature == null) {
+ return null;
+ }
+
+ return string.nfill (array_type.rank, 'a') + element_type_signature;
+ } else if (is_string_marshalled_enum (datatype.data_type)) {
+ return "s";
+ } else if (datatype.data_type != null) {
+ string sig = datatype.data_type.get_attribute_string ("CCode", "type_signature");
+
+ var st = datatype.data_type as Struct;
+ var en = datatype.data_type as Enum;
+ if (sig == null && st != null) {
+ var str = new StringBuilder ();
+ str.append_c ('(');
+ foreach (Field f in st.get_fields ()) {
+ if (f.binding == MemberBinding.INSTANCE) {
+ str.append (get_type_signature (f.variable_type, f));
+ }
+ }
+ str.append_c (')');
+ sig = str.str;
+ } else if (sig == null && en != null) {
+ if (en.is_flags) {
+ return "u";
+ } else {
+ return "i";
+ }
+ }
+
+ var type_args = datatype.get_type_arguments ();
+ if (sig != null && "%s" in sig && type_args.size > 0) {
+ string element_sig = "";
+ foreach (DataType type_arg in type_args) {
+ var s = get_type_signature (type_arg);
+ if (s != null) {
+ element_sig += s;
+ }
+ }
+
+ sig = sig.printf (element_sig);
+ }
+
+ if (sig == null &&
+ (datatype.data_type.get_full_name () == "GLib.UnixInputStream" ||
+ datatype.data_type.get_full_name () == "GLib.UnixOutputStream" ||
+ datatype.data_type.get_full_name () == "GLib.Socket")) {
+ return "h";
+ }
+
+ return sig;
+ } else {
+ return null;
+ }
+ }
+
+ Expression serialize_array (ArrayType array_type, Expression array_expr) {
+ LocalVariable temp = new LocalVariable (array_type, array_expr.get_temp_name (), array_expr, array_expr.source_reference);
+ var decl = new DeclarationStatement (temp, array_expr.source_reference);
+ context.analyzer.get_insert_block (current_statement).insert_before (current_statement, decl);
+ check (decl);
+
+ LocalVariable[] indices = new LocalVariable[array_type.rank];
+ for (int dim=1; dim <= array_type.rank; dim++) {
+ var index = new LocalVariable (null, array_expr.get_temp_name (), new IntegerLiteral ("0"), array_expr.source_reference);
+ decl = new DeclarationStatement (index, array_expr.source_reference);
+ context.analyzer.get_insert_block (current_statement).insert_before (current_statement, decl);
+ check (decl);
+ indices[dim-1] = index;
+ }
+ return serialize_array_dim (array_type, 1, indices, temp);
+ }
+
+ Expression serialize_array_dim (ArrayType array_type, int dim, LocalVariable[] indices, LocalVariable array_var) {
+ var gvariant_type = new ObjectCreationExpression (member_access ("GLib.VariantType", array_var), array_var.source_reference);
+ gvariant_type.add_argument (new StringLiteral ("\""+get_type_signature (array_type)+"\""));
+
+ var builderinit = new ObjectCreationExpression (member_access ("GLib.VariantBuilder", array_var), array_var.source_reference);
+ builderinit.add_argument (gvariant_type);
+
+ var builder = new LocalVariable (null, array_var.get_temp_name (), builderinit, array_var.source_reference);
+ var decl = new DeclarationStatement (builder, array_var.source_reference);
+ context.analyzer.get_insert_block (current_statement).insert_before (current_statement, decl);
+ check (decl);
+
+ Expression length = member_access (array_var.name+".length", array_var);
+ if (array_type.rank > 1) {
+ ElementAccess ea = new ElementAccess (length, array_var.source_reference);
+ ea.append_index (new IntegerLiteral ((dim-1).to_string (), array_var.source_reference));
+ length = ea;
+ }
+
+ var index = indices[dim-1];
+ var forcond = new BinaryExpression (BinaryOperator.LESS_THAN, member_access (index.name, array_var), length, array_var.source_reference);
+ var foriter = new PostfixExpression (member_access (index.name, array_var), true, array_var.source_reference);
+ var forbody = new Block (array_var.source_reference);
+ var old_block = current_block;
+ current_block = forbody;
+
+ Expression element_variant;
+ if (dim < array_type.rank) {
+ element_variant = serialize_array_dim (array_type, dim + 1, indices, array_var);
+ } else {
+ var element_expr = new ElementAccess (member_access (array_var.name, array_var), array_var.source_reference);
+ for (int i=0; i < dim; i++) {
+ element_expr.append_index (member_access (indices[i].name, array_var));
+ }
+ element_variant = serialize_expression (array_type.element_type, element_expr);
+ }
+ current_block = old_block;
+
+ var builder_add = new MethodCall (member_access (builder.name+".add_value", array_var), array_var.source_reference);
+ builder_add.add_argument (element_variant);
+ forbody.add_statement (new ExpressionStatement (builder_add, array_var.source_reference));
+
+ var forstmt = new ForStatement (forcond, forbody, array_var.source_reference);
+ forstmt.add_iterator (foriter);
+ if (dim == 1) {
+ context.analyzer.get_current_block (current_statement).insert_before (current_statement, forstmt);
+ check (forstmt);
+ } else {
+ current_block.add_statement (forstmt);
+ }
+
+ var builder_end = new MethodCall (member_access (builder.name+".end", array_var), array_var.source_reference);
+ return builder_end;
+ }
+
+ Expression? serialize_expression (DataType type, Expression expr) {
+ BasicTypeInfo basic_type;
+ Expression result = null;
+ if (get_basic_type_info (get_type_signature (type), out basic_type)) {
+ result = serialize_basic (basic_type, expr);
+ } else if (expr.value_type is ArrayType) {
+ result = serialize_array ((ArrayType) expr.value_type, expr);
+ }
+ return result;
+ }
+
+ public override void visit_expression (Expression expr) {
+ if (!(context.profile == Profile.GOBJECT && expr.target_type != null && expr.target_type.data_type == context.analyzer.gvariant_type.data_type && !(expr.value_type is NullType) && expr.value_type.data_type != context.analyzer.gvariant_type.data_type)) {
+ // no implicit gvariant boxing
+ return;
+ }
+
+ current_statement = get_current_statement (expr);
+ var old_parent_node = expr.parent_node;
+ var target_type = expr.target_type.copy ();
+
+ current_block = context.analyzer.get_current_block (current_statement);
+ Expression result = serialize_expression (expr.value_type, expr);
+
+ result.target_type = target_type;
+ old_parent_node.replace_expression (expr, result);
+ check (result);
+ }
+
+ Statement get_current_statement (CodeNode node) {
+ while (!(node is Statement)) {
+ node = node.parent_node;
+ }
+ return (Statement) node;
+ }
+}
diff --git a/compiler/valacompiler.vala b/compiler/valacompiler.vala
index 568b178..707bddc 100644
--- a/compiler/valacompiler.vala
+++ b/compiler/valacompiler.vala
@@ -342,7 +342,7 @@ class Vala.Compiler {
}
}
- var transformer = new CodeTransformer ();
+ var transformer = new GVariantTransformer ();
transformer.transform (context);
if (context.report.get_errors () > 0 || (fatal_warnings && context.report.get_warnings () > 0)) {
diff --git a/vala/valacodetransformer.vala b/vala/valacodetransformer.vala
index e8b4227..5fa1922 100644
--- a/vala/valacodetransformer.vala
+++ b/vala/valacodetransformer.vala
@@ -48,7 +48,7 @@ public class Vala.CodeTransformer : CodeVisitor {
if (!node.check (context)) {
return;
}
- //node.accept (this);
+ node.accept (this);
}
public override void visit_source_file (SourceFile source_file) {
@@ -177,6 +177,10 @@ public class Vala.CodeTransformer : CodeVisitor {
return (literal != null && !literal.value);
}
+ public override void visit_loop (Loop loop) {
+ loop.accept_children (this);
+ }
+
public override void visit_while_statement (WhileStatement stmt) {
// convert to simple loop
diff --git a/vala/valapointerindirection.vala b/vala/valapointerindirection.vala
index fffbf93..61f7f99 100644
--- a/vala/valapointerindirection.vala
+++ b/vala/valapointerindirection.vala
@@ -55,8 +55,6 @@ public class Vala.PointerIndirection : Expression {
inner.accept (visitor);
visitor.visit_pointer_indirection (this);
-
- visitor.visit_expression (this);
}
public override void replace_expression (Expression old_node, Expression new_node) {
diff --git a/vala/valaregexliteral.vala b/vala/valaregexliteral.vala
index e8c9fa8..ec82ed5 100644
--- a/vala/valaregexliteral.vala
+++ b/vala/valaregexliteral.vala
@@ -46,8 +46,6 @@ public class Vala.RegexLiteral : Literal {
public override void accept (CodeVisitor visitor) {
visitor.visit_regex_literal (this);
-
- visitor.visit_expression (this);
}
public override bool is_pure () {
[
Date Prev][
Date Next] [
Thread Prev][
Thread Next]
[
Thread Index]
[
Date Index]
[
Author Index]