1 # This file is part of NIT ( http://www.nitlanguage.org ).
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
7 # http://www.apache.org/licenses/LICENSE-2.0
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.
25 # Path to the output file
26 var opt_output
= new OptionString("Output file", "-o")
28 # Shall `init` methods/constructors be wrapped as methods?
30 # By default, these methods/constructors are wrapped as extern constructors.
31 # So initializing an extern Objective-C object looks like:
33 # var o = new NSArray.init_with_array(some_other_array)
36 # If this option is set, the object must first be allocated and then initialized.
37 # This is closer to the Objective-C behavior:
40 # o.init_with_array(some_other_array)
42 var opt_init_as_methods
= new OptionBool(
43 "Wrap `init...` constructors as Nit methods instead of Nit constructors",
46 private var objc_to_nit_types
: Map[String, String] is lazy
do
47 var types
= new HashMap[String, String]
48 types
["char"] = "Byte"
49 types
["short"] = "Int"
50 types
["short int"] = "Int"
53 types
["long int"] = "Int"
54 types
["long long"] = "Int"
55 types
["long long int"] = "Int"
56 types
["float"] = "Float"
57 types
["double"] = "Float"
58 types
["long double"] = "Float"
60 types
["NSUInteger"] = "Int"
61 types
["NSInteger"] = "Int"
62 types
["CGFloat"] = "Float"
63 types
["BOOL"] = "Bool"
65 types
["id"] = "NSObject"
66 types
["constid"] = "NSObject"
67 types
["SEL"] = "NSObject"
68 types
["void"] = "Pointer"
75 redef fun knows_type
(objc_type
) do return super or
76 objc_to_nit_types
.keys
.has
(objc_type
)
85 # Generate Nit code to wrap `classes`
88 var classes
= model
.classes
90 # Open specified path or stdin
92 var path
= opt_output
.value
94 if path
.file_extension
!= "nit" then
95 print_error
"Warning: output file path does not end with '.nit'"
98 file
= new FileWriter.open
(path
)
105 # File generated by objcwrapper with the following command:
106 # {{{program_name}}} {{{args.join(" ")}}}
110 file
.write
"import cocoa::foundation\n"
111 for classe
in classes
do
112 write_class
(classe
, file
)
115 if path
!= null then file
.close
118 private fun write_class
(classe
: ObjcClass, file
: Writer)
123 extern class {{{classe.name}}} in "ObjC" `{ {{{classe.name}}} * `}
127 for super_name
in classe
.super_names
do file
.write
"""
128 super {{{super_name}}}
130 if classe
.super_names
.is_empty
then file
.write
"""
134 # Constructor or constructors
135 write_constructors
(classe
, file
)
138 for attribute
in classe
.attributes
do
139 write_attribute
(attribute
, file
)
142 # Instance methods '-'
143 for method
in classe
.methods
do
144 if not model
.knows_all_types
(method
) then method
.is_commented
= true
146 if not opt_init_as_methods
.value
and method
.is_init
then continue
147 if method
.is_class_property
then continue
149 write_method_signature
(method
, file
)
150 write_objc_method_call
(method
, file
)
158 for method
in classe
.methods
do
159 if not method
.is_class_property
then continue
161 write_method_signature
(method
, file
)
162 write_objc_method_call
(method
, file
)
166 private fun write_constructors
(classe
: ObjcClass, file
: Writer)
168 if opt_init_as_methods
.value
then
169 # A single constructor for `alloc`
173 return [{{{classe.name}}} alloc];
179 # A constructor per `init...` method
180 for method
in classe
.methods
do
181 if not method
.is_init
then continue
183 if not model
.knows_all_types
(method
) then method
.is_commented
= true
185 write_method_signature
(method
, file
)
187 write_objc_init_call
(classe
.name
, method
, file
)
191 private fun write_attribute
(attribute
: ObjcAttribute, file
: Writer)
193 if not model
.knows_type
(attribute
.return_type
) then attribute
.is_commented
= true
195 write_attribute_getter
(attribute
, file
)
196 # TODO write_attribute_setter if there is no `readonly` annotation
199 private fun write_attribute_getter
(attribute
: ObjcAttribute, file
: Writer)
201 var nit_attr_name
= attribute
.name
.to_snake_case
202 var nit_attr_type
= attribute
.return_type
.objc_to_nit_type
204 var c
= attribute
.comment_str
209 {{{c}}} fun {{{nit_attr_name}}}: {{{nit_attr_type}}} in "ObjC" `{
210 {{{c}}} return [self {{{attribute.name}}}];
215 private fun write_attribute_setter
(attribute
: ObjcAttribute, file
: Writer)
217 var nit_attr_name
= attribute
.name
.to_snake_case
218 var nit_attr_type
= attribute
.return_type
.objc_to_nit_type
220 var c
= attribute
.comment_str
225 {{{c}}} fun {{{nit_attr_name}}}=(value: {{{nit_attr_type}}}) in "ObjC" `{
226 {{{c}}} return self.{{{attribute.name}}} = value;
231 private fun write_method_signature
(method
: ObjcMethod, file
: Writer)
233 var c
= method
.comment_str
235 # Build Nit method name
237 for param
in method
.params
do
238 name
+= param
.name
[0].to_upper
.to_s
+ param
.name
.substring_from
(1)
240 name
= name
.to_snake_case
242 if name
== "init" then name
= ""
244 name
= name
.to_nit_name
(property
=true, pointer
=true)
246 # If class method, prefix with class name
247 if method
.is_class_property
then name
= "{method.objc_class.name.to_snake_case}_{name}"
250 var fun_keyword
= "fun"
251 if not opt_init_as_methods
.value
and method
.is_init
then
256 var params
= new Array[String]
257 for param
in method
.params
do
258 if param
.is_single
then break
259 params
.add
"{param.nit_variable_name}: {param.return_type.objc_to_nit_type}"
262 var params_with_par
= ""
263 if params
.not_empty
then params_with_par
= "({params.join(", ")})"
267 if method
.return_type
!= "void" and fun_keyword
!= "new" then
268 ret
= ": {method.return_type.objc_to_nit_type}"
274 {{{c}}}{{{fun_keyword}}} {{{name}}}{{{params_with_par}}}{{{ret}}} in "ObjC" `{
278 # Write a combined call to alloc and to a constructor/method
279 private fun write_objc_init_call
(class_name
: String, method
: ObjcMethod, file
: Writer)
281 # Method name and other params
282 var params
= new Array[String]
283 for param
in method
.params
do
284 if not param
.is_single
then
285 params
.add
"{param.name}: {param.nit_variable_name}"
286 else params
.add param
.name
289 var c
= method
.comment_str
292 {{{c}}} return [[{{{class_name}}} alloc] {{{params.join(" ")}}}];
297 private fun write_objc_method_call
(method
: ObjcMethod, file
: Writer)
299 # Is there a value to return?
301 if method
.return_type
!= "void" then ret
= "return "
303 # Method name and other params
304 var params
= new Array[String]
305 for param
in method
.params
do
306 if not param
.is_single
then
307 params
.add
"{param.name}: {param.nit_variable_name}"
308 else params
.add param
.name
311 # Receiver, instance or class
313 if method
.is_class_property
then recv
= method
.objc_class
.name
315 var c
= method
.comment_str
318 {{{c}}} {{{ret}}}[{{{recv}}} {{{params.join(" ")}}}];
325 # Nit equivalent to this type
326 private fun objc_to_nit_type
: String
328 var types
= sys
.objc_to_nit_types
330 if types
.has_key
(self) then
337 # Convert to a safe Nit name for a `property`, a property in a subclass of `pointer` or a variable
338 private fun to_nit_name
(property
, pointer
: nullable Bool): String
341 name
= name
.to_snake_case
343 while not name
.is_empty
and name
.chars
.first
== '_' do name
= name
.substring_from
(1)
345 if keywords
.has
(name
) then name
= name
+ "0"
347 if property
== true then
348 if methods_in_object
.has
(name
) then name
= name
+ "0"
349 if pointer
== true and methods_in_pointer
.has
(name
) then name
= name
+ "0"
356 redef class ObjcProperty
357 private fun comment_str
: String do if is_commented
then
361 # Full documentation to be generated for the Nit code
362 private fun doc
: String is abstract
365 redef class ObjcMethod
366 private fun indent
: String do return if is_class_property
then "" else "\t"
368 redef fun comment_str
do return indent
+ super
372 var recv
= if is_class_property
then objc_class
.name
else "self"
373 return "{indent}# Wraps: `[{recv} {params.join(" ")}]`"
377 redef class ObjcAttribute
378 redef fun doc
do return "\t# Wraps: `{objc_class.name}.{name}`"
381 redef class ObjcParam
382 # `variable_name` mangled for the Nit language
383 private fun nit_variable_name
: String do return variable_name
.to_nit_name