d50795b9b435cd51f6e7d42261a9475007ad2ae4
[nit.git] / contrib / objcwrapper / src / objc_generator.nit
1 # This file is part of NIT ( http://www.nitlanguage.org ).
2 #
3 # Licensed under the Apache License, Version 2.0 (the "License");
4 # you may not use this file except in compliance with the License.
5 # You may obtain a copy of the License at
6 #
7 # http://www.apache.org/licenses/LICENSE-2.0
8 #
9 # Unless required by applicable law or agreed to in writing, software
10 # distributed under the License is distributed on an "AS IS" BASIS,
11 # WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
12 # See the License for the specific language governing permissions and
13 # limitations under the License.
14
15 # Code generation
16 module objc_generator
17
18 import opts
19
20 import objc_model
21
22 redef class Sys
23
24 # Path to the output file
25 var opt_output = new OptionString("Output file", "-o")
26
27 # Shall `init` methods/constructors be wrapped as methods?
28 #
29 # By default, these methods/constructors are wrapped as extern constructors.
30 # So initializing an extern Objective-C object looks like:
31 # ~~~nitish
32 # var o = new NSArray.init_with_array(some_other_array)
33 # ~~~
34 #
35 # If this option is set, the object must first be allocated and then initialized.
36 # This is closer to the Objective-C behavior:
37 # ~~~nitish
38 # var o = new NSArray
39 # o.init_with_array(some_other_array)
40 # ~~~
41 var opt_init_as_methods = new OptionBool(
42 "Wrap `init...` constructors as Nit methods instead of Nit constructors",
43 "--init-as-methods")
44
45 private var objc_to_nit_types: Map[String, String] is lazy do
46 var types = new HashMap[String, String]
47 types["char"] = "Byte"
48 types["short"] = "Int"
49 types["short int"] = "Int"
50 types["int"] = "Int"
51 types["long"] = "Int"
52 types["long int"] = "Int"
53 types["long long"] = "Int"
54 types["long long int"] = "Int"
55 types["float"] = "Float"
56 types["double"] = "Float"
57 types["long double"] = "Float"
58
59 types["NSUInteger"] = "Int"
60 types["BOOL"] = "Bool"
61 types["id"] = "NSObject"
62 types["constid"] = "NSObject"
63 types["SEL"] = "NSObject"
64 types["void"] = "Pointer"
65
66 return types
67 end
68 end
69
70 redef class ObjcModel
71 redef fun knows_type(objc_type) do return super or
72 objc_to_nit_types.keys.has(objc_type)
73 end
74
75 # Wrapper generator
76 class CodeGenerator
77
78 # `ObjcModel` to wrap
79 var model: ObjcModel
80
81 # Generate Nit code to wrap `classes`
82 fun generate
83 do
84 var classes = model.classes
85
86 # Open specified path or stdin
87 var file
88 var path = opt_output.value
89 if path != null then
90 if path.file_extension != "nit" then
91 print_error "Warning: output file path does not end with '.nit'"
92 end
93
94 file = new FileWriter.open(path)
95 else
96 file = stdout
97 end
98
99 # Generate code
100 file.write "import cocoa::foundation\n"
101 for classe in classes do
102 write_class(classe, file)
103 end
104
105 if path != null then file.close
106 end
107
108 private fun write_class(classe: ObjcClass, file: Writer)
109 do
110 # Class header
111 file.write """
112
113 extern class {{{classe.name}}} in "ObjC" `{ {{{classe.name}}} * `}
114 """
115
116 # Supers
117 for super_name in classe.super_names do file.write """
118 super {{{super_name}}}
119 """
120 if classe.super_names.is_empty then file.write """
121 super NSObject
122 """
123
124 # Constructor or constructors
125 write_constructors(classe, file)
126
127 # Attributes
128 for attribute in classe.attributes do
129 write_attribute(attribute, file)
130 end
131
132 # Instance methods '-'
133 for method in classe.methods do
134 if not model.knows_all_types(method) then method.is_commented = true
135
136 if not opt_init_as_methods.value and method.is_init then continue
137 if method.is_class_property then continue
138
139 write_method_signature(method, file)
140 write_objc_method_call(method, file)
141 end
142
143 file.write """
144 end
145 """
146
147 # Class methods '+'
148 for method in classe.methods do
149 if not method.is_class_property then continue
150
151 write_method_signature(method, file)
152 write_objc_method_call(method, file)
153 end
154 end
155
156 private fun write_constructors(classe: ObjcClass, file: Writer)
157 do
158 if opt_init_as_methods.value then
159 # A single constructor for `alloc`
160 file.write """
161
162 new in "ObjC" `{
163 return [{{{classe.name}}} alloc];
164 `}
165 """
166 return
167 end
168
169 # A constructor per `init...` method
170 for method in classe.methods do
171 if not method.is_init then continue
172
173 if not model.knows_all_types(method) then method.is_commented = true
174
175 write_method_signature(method, file)
176
177 write_objc_init_call(classe.name, method, file)
178 end
179 end
180
181 private fun write_attribute(attribute: ObjcAttribute, file: Writer)
182 do
183 if not model.knows_type(attribute.return_type) then attribute.is_commented = true
184
185 write_attribute_getter(attribute, file)
186 # TODO write_attribute_setter if there is no `readonly` annotation
187 end
188
189 private fun write_attribute_getter(attribute: ObjcAttribute, file: Writer)
190 do
191 var nit_attr_name = attribute.name.to_snake_case
192 var nit_attr_type = attribute.return_type.objc_to_nit_type
193
194 var c = attribute.comment_str
195
196 file.write """
197
198 {{{c}}} fun {{{nit_attr_name}}}: {{{nit_attr_type}}} in "ObjC" `{
199 {{{c}}} return [self {{{attribute.name}}}];
200 {{{c}}} `}
201 """
202 end
203
204 private fun write_attribute_setter(attribute: ObjcAttribute, file: Writer)
205 do
206 var nit_attr_name = attribute.name.to_snake_case
207 var nit_attr_type = attribute.return_type.objc_to_nit_type
208
209 var c = attribute.comment_str
210
211 file.write """
212
213 {{{c}}} fun {{{nit_attr_name}}}=(value: {{{nit_attr_type}}}) in "ObjC" `{
214 {{{c}}} return self.{{{attribute.name}}} = value;
215 {{{c}}} `}
216 """
217 end
218
219 private fun write_method_signature(method: ObjcMethod, file: Writer)
220 do
221 var c = method.comment_str
222
223 # Build Nit method name
224 var name = ""
225 for param in method.params do
226 name += param.name[0].to_upper.to_s + param.name.substring_from(1)
227 end
228 name = name.to_snake_case
229
230 if name == "init" then name = ""
231
232 # If class method, prefix with class name
233 if method.is_class_property then name = "{method.objc_class.name.to_snake_case}_{name}"
234
235 # Kind of method
236 var fun_keyword = "fun"
237 if not opt_init_as_methods.value and method.is_init then
238 fun_keyword = "new"
239 end
240
241 # Params
242 var params = new Array[String]
243 for param in method.params do
244 if param.is_single then break
245 params.add "{param.variable_name}: {param.return_type.objc_to_nit_type}"
246 end
247
248 var params_with_par = ""
249 if params.not_empty then params_with_par = "({params.join(", ")})"
250
251 # Return
252 var ret = ""
253 if method.return_type != "void" and fun_keyword != "new" then
254 ret = ": {method.return_type.objc_to_nit_type}"
255 end
256
257 file.write """
258
259 {{{c}}}{{{fun_keyword}}} {{{name}}}{{{params_with_par}}}{{{ret}}} in "ObjC" `{
260 """
261 end
262
263 # Write a combined call to alloc and to a constructor/method
264 private fun write_objc_init_call(class_name: String, method: ObjcMethod, file: Writer)
265 do
266 # Method name and other params
267 var params = new Array[String]
268 for param in method.params do
269 if not param.is_single then
270 params.add "{param.name}: {param.variable_name}"
271 else params.add param.name
272 end
273
274 var c = method.comment_str
275
276 file.write """
277 {{{c}}} return [[{{{class_name}}} alloc] {{{params.join(" ")}}}];
278 {{{c}}}`}
279 """
280 end
281
282 private fun write_objc_method_call(method: ObjcMethod, file: Writer)
283 do
284 # Is there a value to return?
285 var ret = ""
286 if method.return_type != "void" then ret = "return "
287
288 # Method name and other params
289 var params = new Array[String]
290 for param in method.params do
291 if not param.is_single then
292 params.add "{param.name}: {param.variable_name}"
293 else params.add param.name
294 end
295
296 # Receiver, instance or class
297 var recv = "self"
298 if method.is_class_property then recv = method.objc_class.name
299
300 var c = method.comment_str
301
302 file.write """
303 {{{c}}} {{{ret}}}[{{{recv}}} {{{params.join(" ")}}}];
304 {{{c}}}`}
305 """
306 end
307 end
308
309 redef class Text
310 # Nit equivalent to this type
311 private fun objc_to_nit_type: String
312 do
313 var types = sys.objc_to_nit_types
314
315 if types.has_key(self) then
316 return types[self]
317 else
318 return to_s
319 end
320 end
321 end
322
323 redef class ObjcProperty
324 private fun comment_str: String do if is_commented then
325 return "#"
326 else return ""
327 end
328
329 redef class ObjcMethod
330 private fun indent: String do return if is_class_property then "" else "\t"
331
332 redef fun comment_str do return indent + super
333 end