1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
|
/* valagvaluemodule.vala
*
* Copyright (C) 2019 Rico Tzschichholz
*
* 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:
* Rico Tzschichholz <ricotz@ubuntu.com>
*/
public class Vala.GValueModule : GAsyncModule {
public override void visit_cast_expression (CastExpression expr) {
unowned DataType? value_type = expr.inner.value_type;
unowned DataType? target_type = expr.type_reference;
if (expr.is_non_null_cast || value_type == null || gvalue_type == null
|| value_type.type_symbol != gvalue_type || target_type.type_symbol == gvalue_type
|| get_ccode_type_id (target_type) == "") {
base.visit_cast_expression (expr);
return;
}
generate_type_declaration (expr.type_reference, cfile);
// explicit conversion from GValue
var ccall = new CCodeFunctionCall (get_value_getter_function (target_type));
CCodeExpression gvalue;
if (value_type.nullable) {
gvalue = get_cvalue (expr.inner);
} else {
gvalue = new CCodeUnaryExpression (CCodeUnaryOperator.ADDRESS_OF, get_cvalue (expr.inner));
}
ccall.add_argument (gvalue);
CCodeExpression rv = ccall;
if (expr != null && target_type is ArrayType) {
// null-terminated string array
var len_call = new CCodeFunctionCall (new CCodeIdentifier ("g_strv_length"));
len_call.add_argument (rv);
append_array_length (expr, len_call);
} else if (target_type is StructValueType) {
CodeNode node = expr != null ? (CodeNode) expr : target_type;
var temp_value = create_temp_value (target_type, true, node, true);
var ctemp = get_cvalue_ (temp_value);
rv = new CCodeUnaryExpression (CCodeUnaryOperator.POINTER_INDIRECTION, new CCodeCastExpression (rv, get_ccode_name (new PointerType (target_type))));
var holds = new CCodeFunctionCall (new CCodeIdentifier ("G_VALUE_HOLDS"));
holds.add_argument (gvalue);
holds.add_argument (new CCodeIdentifier (get_ccode_type_id (target_type)));
var cond = new CCodeBinaryExpression (CCodeBinaryOperator.AND, holds, ccall);
var warn = new CCodeFunctionCall (new CCodeIdentifier ("g_warning"));
warn.add_argument (new CCodeConstant ("\"Invalid GValue unboxing (wrong type or NULL)\""));
var fail = new CCodeCommaExpression ();
fail.append_expression (warn);
fail.append_expression (ctemp);
rv = new CCodeConditionalExpression (cond, rv, fail);
}
set_cvalue (expr, rv);
}
public override CCodeExpression get_value_getter_function (DataType type_reference) {
var array_type = type_reference as ArrayType;
if (type_reference.type_symbol != null) {
return new CCodeIdentifier (get_ccode_get_value_function (type_reference.type_symbol));
} else if (array_type != null && array_type.element_type.type_symbol == string_type.type_symbol) {
// G_TYPE_STRV
return new CCodeIdentifier ("g_value_get_boxed");
} else {
return new CCodeIdentifier ("g_value_get_pointer");
}
}
public override CCodeExpression get_value_setter_function (DataType type_reference) {
var array_type = type_reference as ArrayType;
if (type_reference.type_symbol != null) {
return new CCodeIdentifier (get_ccode_set_value_function (type_reference.type_symbol));
} else if (array_type != null && array_type.element_type.type_symbol == string_type.type_symbol) {
// G_TYPE_STRV
return new CCodeIdentifier ("g_value_set_boxed");
} else {
return new CCodeIdentifier ("g_value_set_pointer");
}
}
public override CCodeExpression get_value_taker_function (DataType type_reference) {
var array_type = type_reference as ArrayType;
if (type_reference.type_symbol != null) {
return new CCodeIdentifier (get_ccode_take_value_function (type_reference.type_symbol));
} else if (array_type != null && array_type.element_type.type_symbol == string_type.type_symbol) {
// G_TYPE_STRV
return new CCodeIdentifier ("g_value_take_boxed");
} else {
return new CCodeIdentifier ("g_value_set_pointer");
}
}
}
|