Dont auto-free slices passed to Rust
[ldk-java] / genbindings.py
1 #!/usr/bin/env python3
2 import sys, re
3
4 if len(sys.argv) != 5:
5     print("USAGE: /path/to/lightning.h /path/to/bindings/output.java /path/to/bindings/output.c debug")
6     print("debug should be true or false and indicates whether to track allocations and ensure we don't leak")
7     sys.exit(1)
8
9 class TypeInfo:
10     def __init__(self, rust_obj, java_ty, java_fn_ty_arg, c_ty, passed_as_ptr, is_ptr, var_name, arr_len):
11         self.rust_obj = rust_obj
12         self.java_ty = java_ty
13         self.java_fn_ty_arg = java_fn_ty_arg
14         self.c_ty = c_ty
15         self.passed_as_ptr = passed_as_ptr
16         self.is_ptr = is_ptr
17         self.var_name = var_name
18         self.arr_len = arr_len
19
20 class ConvInfo:
21     def __init__(self, ty_info, arg_name, arg_conv, arg_conv_name, ret_conv, ret_conv_name):
22         assert(ty_info.c_ty is not None)
23         assert(ty_info.java_ty is not None)
24         assert(arg_name is not None)
25         self.c_ty = ty_info.c_ty
26         self.java_ty = ty_info.java_ty
27         self.java_fn_ty_arg = ty_info.java_fn_ty_arg
28         self.arg_name = arg_name
29         self.arg_conv = arg_conv
30         self.arg_conv_name = arg_conv_name
31         self.ret_conv = ret_conv
32         self.ret_conv_name = ret_conv_name
33
34     def print_ty(self):
35         out_c.write(self.c_ty)
36         out_java.write(self.java_ty)
37
38     def print_name(self):
39         if self.arg_name != "":
40             out_java.write(" " + self.arg_name)
41             out_c.write(" " + self.arg_name)
42         else:
43             out_java.write(" arg")
44             out_c.write(" arg")
45
46 with open(sys.argv[1]) as in_h, open(sys.argv[2], "w") as out_java, open(sys.argv[3], "w") as out_c:
47     opaque_structs = set()
48     trait_structs = set()
49     unitary_enums = set()
50
51     var_is_arr_regex = re.compile("\(\*([A-za-z_]*)\)\[([0-9]*)\]")
52     var_ty_regex = re.compile("([A-za-z_0-9]*)(.*)")
53     def java_c_types(fn_arg, ret_arr_len):
54         fn_arg = fn_arg.strip()
55         if fn_arg.startswith("MUST_USE_RES "):
56             fn_arg = fn_arg[13:]
57         is_const = False
58         if fn_arg.startswith("const "):
59             fn_arg = fn_arg[6:]
60             is_const = True
61
62         is_ptr = False
63         take_by_ptr = False
64         rust_obj = None
65         if fn_arg.startswith("void"):
66             java_ty = "void"
67             c_ty = "void"
68             fn_ty_arg = "V"
69             fn_arg = fn_arg[4:].strip()
70         elif fn_arg.startswith("bool"):
71             java_ty = "boolean"
72             c_ty = "jboolean"
73             fn_ty_arg = "Z"
74             fn_arg = fn_arg[4:].strip()
75         elif fn_arg.startswith("uint8_t"):
76             java_ty = "byte"
77             c_ty = "jbyte"
78             fn_ty_arg = "B"
79             fn_arg = fn_arg[7:].strip()
80         elif fn_arg.startswith("uint16_t"):
81             java_ty = "short"
82             c_ty = "jshort"
83             fn_ty_arg = "S"
84             fn_arg = fn_arg[8:].strip()
85         elif fn_arg.startswith("uint32_t"):
86             java_ty = "int"
87             c_ty = "jint"
88             fn_ty_arg = "I"
89             fn_arg = fn_arg[8:].strip()
90         elif fn_arg.startswith("uint64_t") or fn_arg.startswith("uintptr_t"):
91             java_ty = "long"
92             c_ty = "jlong"
93             fn_ty_arg = "J"
94             if fn_arg.startswith("uint64_t"):
95                 fn_arg = fn_arg[8:].strip()
96             else:
97                 fn_arg = fn_arg[9:].strip()
98         elif is_const and fn_arg.startswith("char *"):
99             java_ty = "String"
100             c_ty = "const char*"
101             fn_ty_arg = "Ljava/lang/String;"
102             fn_arg = fn_arg[6:].strip()
103         else:
104             ma = var_ty_regex.match(fn_arg)
105             if ma.group(1).strip() in unitary_enums:
106                 java_ty = ma.group(1).strip()
107                 c_ty = "jclass"
108                 fn_ty_arg = "Lorg/ldk/impl/bindings$" + ma.group(1).strip() + ";"
109                 fn_arg = ma.group(2).strip()
110                 rust_obj = ma.group(1).strip()
111                 take_by_ptr = True
112             else:
113                 java_ty = "long"
114                 c_ty = "jlong"
115                 fn_ty_arg = "J"
116                 fn_arg = ma.group(2).strip()
117                 rust_obj = ma.group(1).strip()
118                 take_by_ptr = True
119
120         if fn_arg.startswith(" *") or fn_arg.startswith("*"):
121             fn_arg = fn_arg.replace("*", "").strip()
122             is_ptr = True
123             c_ty = "jlong"
124             java_ty = "long"
125             fn_ty_arg = "J"
126
127         var_is_arr = var_is_arr_regex.match(fn_arg)
128         if var_is_arr is not None or ret_arr_len is not None:
129             assert(not take_by_ptr)
130             assert(not is_ptr)
131             java_ty = java_ty + "[]"
132             c_ty = c_ty + "Array"
133             if var_is_arr is not None:
134                 return TypeInfo(rust_obj=None, java_ty=java_ty, java_fn_ty_arg="[" + fn_ty_arg, c_ty=c_ty,
135                     passed_as_ptr=False, is_ptr=False, var_name=var_is_arr.group(1), arr_len=var_is_arr.group(2))
136         return TypeInfo(rust_obj=rust_obj, java_ty=java_ty, java_fn_ty_arg=fn_ty_arg, c_ty=c_ty, passed_as_ptr=is_ptr or take_by_ptr,
137             is_ptr=is_ptr, var_name=fn_arg, arr_len=None)
138
139     def map_type(fn_arg, print_void, ret_arr_len, is_free):
140         ty_info = java_c_types(fn_arg, ret_arr_len)
141
142         if ty_info.c_ty == "void":
143             if not print_void:
144                 return ConvInfo(ty_info = ty_info, arg_name = ty_info.var_name,
145                     arg_conv = None, arg_conv_name = None, ret_conv = None, ret_conv_name = None)
146
147         if ty_info.c_ty.endswith("Array"):
148             arr_len = ty_info.arr_len
149             if arr_len is not None:
150                 arr_name = ty_info.var_name
151             else:
152                 arr_name = "ret"
153                 arr_len = ret_arr_len
154             assert(ty_info.c_ty == "jbyteArray")
155             return ConvInfo(ty_info = ty_info, arg_name = ty_info.var_name,
156                 arg_conv = "unsigned char " + arr_name + "_arr[" + arr_len + "];\n" +
157                     "(*_env)->GetByteArrayRegion (_env, """ + arr_name + ", 0, " + arr_len + ", " + arr_name + "_arr);\n" +
158                     "unsigned char (*""" + arr_name + "_ref)[" + arr_len + "] = &" + arr_name + "_arr;",
159                 arg_conv_name = arr_name + "_ref",
160                 ret_conv = ("jbyteArray " + arr_name + "_arr = (*_env)->NewByteArray(_env, " + arr_len + ");\n" +
161                     "(*_env)->SetByteArrayRegion(_env, " + arr_name + "_arr, 0, " + arr_len + ", *",
162                     ");"),
163                 ret_conv_name = arr_name + "_arr")
164         elif ty_info.var_name != "":
165             # If we have a parameter name, print it (noting that it may indicate its a pointer)
166             if ty_info.rust_obj is not None:
167                 assert(ty_info.passed_as_ptr)
168                 if not ty_info.is_ptr:
169                     if ty_info.rust_obj in unitary_enums:
170                         return ConvInfo(ty_info = ty_info, arg_name = ty_info.var_name,
171                             arg_conv = ty_info.rust_obj + " " + ty_info.var_name + "_conv = " + ty_info.rust_obj + "_from_java(_env, " + ty_info.var_name + ");",
172                             arg_conv_name = ty_info.var_name + "_conv",
173                             ret_conv = ("jclass " + ty_info.var_name + "_conv = " + ty_info.rust_obj + "_to_java(_env, ", ");"),
174                             ret_conv_name = ty_info.var_name + "_conv")
175                     base_conv = ty_info.rust_obj + " " + ty_info.var_name + "_conv = *(" + ty_info.rust_obj + "*)" + ty_info.var_name + ";";
176                     if ty_info.rust_obj in trait_structs:
177                         if not is_free:
178                             base_conv = base_conv + "\nif (" + ty_info.var_name + "_conv.free == " + ty_info.rust_obj + "_JCalls_free) {\n"
179                             base_conv = base_conv + "\t// If this_arg is a JCalls struct, then we need to increment the refcnt in it.\n"
180                             base_conv = base_conv + "\t" + ty_info.rust_obj + "_JCalls_clone(" + ty_info.var_name + "_conv.this_arg);\n}"
181                         else:
182                             base_conv = base_conv + "\n" + "FREE((void*)" + ty_info.var_name + ");"
183                         return ConvInfo(ty_info = ty_info, arg_name = ty_info.var_name,
184                             arg_conv = base_conv,
185                             arg_conv_name = ty_info.var_name + "_conv",
186                             ret_conv = None, ret_conv_name = None)
187                     if ty_info.rust_obj != "LDKu8slice":
188                         # Don't bother free'ing slices passed in - we often pass them Rust -> Rust
189                         base_conv = base_conv + "\nFREE((void*)" + ty_info.var_name + ");";
190                     if ty_info.rust_obj in opaque_structs:
191                         return ConvInfo(ty_info = ty_info, arg_name = ty_info.var_name,
192                             arg_conv = base_conv + "\n" + ty_info.var_name + "_conv.is_owned = true;",
193                             arg_conv_name = ty_info.var_name + "_conv",
194                             ret_conv = None, ret_conv_name = None)
195
196                     return ConvInfo(ty_info = ty_info, arg_name = ty_info.var_name,
197                         arg_conv = base_conv, arg_conv_name = ty_info.var_name + "_conv",
198                         ret_conv = None, ret_conv_name = None)
199                 else:
200                     assert(not is_free)
201                     return ConvInfo(ty_info = ty_info, arg_name = ty_info.var_name,
202                         arg_conv = ty_info.rust_obj + "* " + ty_info.var_name + "_conv = (" + ty_info.rust_obj + "*)" + ty_info.var_name + ";",
203                         arg_conv_name = ty_info.var_name + "_conv",
204                         ret_conv = None, ret_conv_name = None)
205             elif ty_info.is_ptr:
206                 return ConvInfo(ty_info = ty_info, arg_name = ty_info.var_name,
207                     arg_conv = None, arg_conv_name = ty_info.var_name, ret_conv = None, ret_conv_name = None)
208             elif ty_info.java_ty == "String":
209                 return ConvInfo(ty_info = ty_info, arg_name = ty_info.var_name,
210                     arg_conv = None, arg_conv_name = None,
211                     ret_conv = ("jstring " + ty_info.var_name + "_conv = (*_env)->NewStringUTF(_env, ", ");"), ret_conv_name = ty_info.var_name + "_conv")
212             else:
213                 return ConvInfo(ty_info = ty_info, arg_name = ty_info.var_name,
214                     arg_conv = None, arg_conv_name = ty_info.var_name, ret_conv = None, ret_conv_name = None)
215         elif not print_void:
216             # We don't have a parameter name, and want one, just call it arg
217             if ty_info.rust_obj is not None:
218                 assert(not is_free or ty_info.rust_obj not in opaque_structs);
219                 return ConvInfo(ty_info = ty_info, arg_name = ty_info.var_name,
220                     arg_conv = ty_info.rust_obj + " arg_conv = *(" + ty_info.rust_obj + "*)arg;\nFREE((void*)arg);",
221                     arg_conv_name = "arg_conv",
222                     ret_conv = None, ret_conv_name = None)
223             else:
224                 assert(not is_free)
225                 return ConvInfo(ty_info = ty_info, arg_name = ty_info.var_name,
226                     arg_conv = None, arg_conv_name = "arg", ret_conv = None, ret_conv_name = None)
227         else:
228             # We don't have a parameter name, and don't want one (cause we're returning)
229             if ty_info.rust_obj is not None:
230                 if not ty_info.is_ptr:
231                     if ty_info.rust_obj in unitary_enums:
232                         return ConvInfo(ty_info = ty_info, arg_name = ty_info.var_name,
233                             arg_conv = ty_info.rust_obj + " ret = " + ty_info.rust_obj + "_from_java(_env, " + ty_info.var_name + ");",
234                             arg_conv_name = "ret",
235                             ret_conv = ("jclass ret = " + ty_info.rust_obj + "_to_java(_env, ", ");"), ret_conv_name = "ret")
236                     if ty_info.rust_obj in opaque_structs:
237                         # If we're returning a newly-allocated struct, we don't want Rust to ever
238                         # free, instead relying on the Java GC to lose the ref. We undo this in
239                         # any _free function.
240                         # To avoid any issues, we first assert that the incoming object is non-ref.
241                         return ConvInfo(ty_info = ty_info, arg_name = ty_info.var_name,
242                             ret_conv = (ty_info.rust_obj + "* ret = MALLOC(sizeof(" + ty_info.rust_obj + "), \"" + ty_info.rust_obj + "\");\n*ret = ", ";\nassert(ret->is_owned);\nret->is_owned = false;"),
243                             ret_conv_name = "(long)ret",
244                             arg_conv = None, arg_conv_name = None)
245                     else:
246                         return ConvInfo(ty_info = ty_info, arg_name = ty_info.var_name,
247                             ret_conv = (ty_info.rust_obj + "* ret = MALLOC(sizeof(" + ty_info.rust_obj + "), \"" + ty_info.rust_obj + "\");\n*ret = ", ";"),
248                             ret_conv_name = "(long)ret",
249                             arg_conv = None, arg_conv_name = None)
250                 else:
251                     return ConvInfo(ty_info = ty_info, arg_name = ty_info.var_name,
252                         ret_conv = ("long ret = (long)", ";"), ret_conv_name = "ret",
253                         arg_conv = None, arg_conv_name = None)
254             else:
255                 return ConvInfo(ty_info = ty_info, arg_name = ty_info.var_name,
256                     arg_conv = None, arg_conv_name = None, ret_conv = None, ret_conv_name = None)
257
258     def map_fn(line, re_match, ret_arr_len, c_call_string):
259         out_java.write("\t// " + line)
260         out_java.write("\tpublic static native ")
261         out_c.write("JNIEXPORT ")
262
263         ret_info = map_type(re_match.group(1), True, ret_arr_len, False)
264         ret_info.print_ty()
265         if ret_info.ret_conv is not None:
266             ret_conv_pfx, ret_conv_sfx = ret_info.ret_conv
267
268         out_java.write(" " + re_match.group(2) + "(")
269         out_c.write(" JNICALL Java_org_ldk_impl_bindings_" + re_match.group(2).replace('_', '_1') + "(JNIEnv * _env, jclass _b")
270
271         arg_names = []
272         for idx, arg in enumerate(re_match.group(3).split(',')):
273             if idx != 0:
274                 out_java.write(", ")
275             if arg != "void":
276                 out_c.write(", ")
277             arg_conv_info = map_type(arg, False, None, re_match.group(2).endswith("_free"))
278             if arg_conv_info.c_ty != "void":
279                 arg_conv_info.print_ty()
280                 arg_conv_info.print_name()
281             arg_names.append(arg_conv_info)
282
283         out_java.write(");\n")
284         out_c.write(") {\n")
285
286         for info in arg_names:
287             if info.arg_conv is not None:
288                 out_c.write("\t" + info.arg_conv.replace('\n', "\n\t") + "\n");
289
290         if ret_info.ret_conv is not None:
291             out_c.write("\t" + ret_conv_pfx.replace('\n', '\n\t'));
292         else:
293             out_c.write("\treturn ");
294
295         if c_call_string is None:
296             out_c.write(re_match.group(2) + "(")
297         else:
298             out_c.write(c_call_string)
299         for idx, info in enumerate(arg_names):
300             if info.arg_conv_name is not None:
301                 if idx != 0:
302                     out_c.write(", ")
303                 elif c_call_string is not None:
304                     continue
305                 out_c.write(info.arg_conv_name)
306         out_c.write(")")
307         if ret_info.ret_conv is not None:
308             out_c.write(ret_conv_sfx.replace('\n', '\n\t'))
309             out_c.write("\n\treturn " + ret_info.ret_conv_name + ";")
310         else:
311             out_c.write(";")
312         out_c.write("\n}\n\n")
313
314     def map_trait(struct_name, field_var_lines, trait_fn_lines):
315         out_c.write("typedef struct " + struct_name + "_JCalls {\n")
316         out_c.write("\tatomic_size_t refcnt;\n")
317         out_c.write("\tJNIEnv *env;\n")
318         out_c.write("\tjobject o;\n")
319         for var_line in field_var_lines:
320             if var_line.group(1) in trait_structs:
321                 out_c.write("\t" + var_line.group(1) + "_JCalls* " + var_line.group(2) + ";\n")
322         for fn_line in trait_fn_lines:
323             if fn_line.group(2) != "free" and fn_line.group(2) != "clone":
324                 out_c.write("\tjmethodID " + fn_line.group(2) + "_meth;\n")
325         out_c.write("} " + struct_name + "_JCalls;\n")
326
327         out_java.write("\tpublic interface " + struct_name + " {\n")
328         java_meths = []
329         for fn_line in trait_fn_lines:
330             java_meth_descr = "("
331             if fn_line.group(2) != "free" and fn_line.group(2) != "clone":
332                 ret_ty_info = java_c_types(fn_line.group(1), None)
333
334                 out_java.write("\t\t " + ret_ty_info.java_ty + " " + fn_line.group(2) + "(")
335                 is_const = fn_line.group(3) is not None
336                 out_c.write(fn_line.group(1) + fn_line.group(2) + "_jcall(")
337                 if is_const:
338                     out_c.write("const void* this_arg")
339                 else:
340                     out_c.write("void* this_arg")
341
342                 arg_names = []
343                 for idx, arg in enumerate(fn_line.group(4).split(',')):
344                     if arg == "":
345                         continue
346                     if idx >= 2:
347                         out_java.write(", ")
348                     out_c.write(", ")
349                     arg_conv_info = map_type(arg, True, None, False)
350                     out_c.write(arg.strip())
351                     out_java.write(arg_conv_info.java_ty + " " + arg_conv_info.arg_name)
352                     arg_names.append(arg_conv_info)
353                     java_meth_descr = java_meth_descr + arg_conv_info.java_fn_ty_arg
354                 java_meth_descr = java_meth_descr + ")" + ret_ty_info.java_fn_ty_arg
355                 java_meths.append(java_meth_descr)
356
357                 out_java.write(");\n")
358                 out_c.write(") {\n")
359                 out_c.write("\t" + struct_name + "_JCalls *j_calls = (" + struct_name + "_JCalls*) this_arg;\n")
360
361                 for arg_info in arg_names:
362                     if arg_info.ret_conv is not None:
363                         out_c.write("\t" + arg_info.ret_conv[0].replace('\n', '\n\t').replace("_env", "j_calls->env"));
364                         out_c.write(arg_info.arg_name)
365                         out_c.write(arg_info.ret_conv[1].replace('\n', '\n\t').replace("_env", "j_calls->env") + "\n")
366
367                 if not ret_ty_info.passed_as_ptr:
368                     out_c.write("\treturn (*j_calls->env)->Call" + ret_ty_info.java_ty.title() + "Method(j_calls->env, j_calls->o, j_calls->" + fn_line.group(2) + "_meth")
369                 else:
370                     out_c.write("\t" + fn_line.group(1).strip() + "* ret = (" + fn_line.group(1).strip() + "*)(*j_calls->env)->CallLongMethod(j_calls->env, j_calls->o, j_calls->" + fn_line.group(2) + "_meth");
371
372                 for arg_info in arg_names:
373                     if arg_info.ret_conv is not None:
374                         out_c.write(", " + arg_info.ret_conv_name)
375                     else:
376                         out_c.write(", " + arg_info.arg_name)
377                 out_c.write(");\n");
378
379                 if ret_ty_info.passed_as_ptr:
380                     out_c.write("\t" + fn_line.group(1).strip() + " res = *ret;\n")
381                     out_c.write("\tFREE(ret);\n")
382                     out_c.write("\treturn res;\n")
383                 out_c.write("}\n")
384             elif fn_line.group(2) == "free":
385                 out_c.write("static void " + struct_name + "_JCalls_free(void* this_arg) {\n")
386                 out_c.write("\t" + struct_name + "_JCalls *j_calls = (" + struct_name + "_JCalls*) this_arg;\n")
387                 out_c.write("\tif (atomic_fetch_sub_explicit(&j_calls->refcnt, 1, memory_order_acquire) == 1) {\n")
388                 out_c.write("\t\t(*j_calls->env)->DeleteGlobalRef(j_calls->env, j_calls->o);\n")
389                 out_c.write("\t\tFREE(j_calls);\n")
390                 out_c.write("\t}\n}\n")
391
392         # Write out a clone function whether we need one or not, as we use them in moving to rust
393         out_c.write("static void* " + struct_name + "_JCalls_clone(const void* this_arg) {\n")
394         out_c.write("\t" + struct_name + "_JCalls *j_calls = (" + struct_name + "_JCalls*) this_arg;\n")
395         out_c.write("\tatomic_fetch_add_explicit(&j_calls->refcnt, 1, memory_order_release);\n")
396         for var_line in field_var_lines:
397             if var_line.group(1) in trait_structs:
398                 out_c.write("\tatomic_fetch_add_explicit(&j_calls->" + var_line.group(2) + "->refcnt, 1, memory_order_release);\n")
399         out_c.write("\treturn (void*) this_arg;\n")
400         out_c.write("}\n")
401
402         out_java.write("\t}\n")
403
404         out_java.write("\tpublic static native long " + struct_name + "_new(" + struct_name + " impl")
405         out_c.write("static inline " + struct_name + " " + struct_name + "_init (JNIEnv * env, jclass _a, jobject o")
406         for var_line in field_var_lines:
407             if var_line.group(1) in trait_structs:
408                 out_java.write(", " + var_line.group(1) + " " + var_line.group(2))
409                 out_c.write(", jobject " + var_line.group(2))
410         out_java.write(");\n")
411         out_c.write(") {\n")
412
413         out_c.write("\tjclass c = (*env)->GetObjectClass(env, o);\n")
414         out_c.write("\tassert(c != NULL);\n")
415         out_c.write("\t" + struct_name + "_JCalls *calls = MALLOC(sizeof(" + struct_name + "_JCalls), \"" + struct_name + "_JCalls\");\n")
416         out_c.write("\tatomic_init(&calls->refcnt, 1);\n")
417         out_c.write("\tcalls->env = env;\n")
418         out_c.write("\tcalls->o = (*env)->NewGlobalRef(env, o);\n")
419         for (fn_line, java_meth_descr) in zip(trait_fn_lines, java_meths):
420             if fn_line.group(2) != "free" and fn_line.group(2) != "clone":
421                 out_c.write("\tcalls->" + fn_line.group(2) + "_meth = (*env)->GetMethodID(env, c, \"" + fn_line.group(2) + "\", \"" + java_meth_descr + "\");\n")
422                 out_c.write("\tassert(calls->" + fn_line.group(2) + "_meth != NULL);\n")
423         out_c.write("\n\t" + struct_name + " ret = {\n")
424         out_c.write("\t\t.this_arg = (void*) calls,\n")
425         for fn_line in trait_fn_lines:
426             if fn_line.group(2) != "free" and fn_line.group(2) != "clone":
427                 out_c.write("\t\t." + fn_line.group(2) + " = " + fn_line.group(2) + "_jcall,\n")
428             elif fn_line.group(2) == "free":
429                 out_c.write("\t\t.free = " + struct_name + "_JCalls_free,\n")
430             else:
431                 out_c.write("\t\t.clone = " + struct_name + "_JCalls_clone,\n")
432         for var_line in field_var_lines:
433             if var_line.group(1) in trait_structs:
434                 out_c.write("\t\t." + var_line.group(2) + " = " + var_line.group(1) + "_init(env, _a, " + var_line.group(2) + "),\n")
435         out_c.write("\t};\n")
436         for var_line in field_var_lines:
437             if var_line.group(1) in trait_structs:
438                 out_c.write("\tcalls->" + var_line.group(2) + " = ret." + var_line.group(2) + ".this_arg;\n")
439         out_c.write("\treturn ret;\n")
440         out_c.write("}\n")
441
442         out_c.write("JNIEXPORT long JNICALL Java_org_ldk_impl_bindings_" + struct_name.replace("_", "_1") + "_1new (JNIEnv * env, jclass _a, jobject o")
443         for var_line in field_var_lines:
444             if var_line.group(1) in trait_structs:
445                 out_c.write(", jobject " + var_line.group(2))
446         out_c.write(") {\n")
447         out_c.write("\t" + struct_name + " *res_ptr = MALLOC(sizeof(" + struct_name + "), \"" + struct_name + "\");\n")
448         out_c.write("\t*res_ptr = " + struct_name + "_init(env, _a, o")
449         for var_line in field_var_lines:
450             if var_line.group(1) in trait_structs:
451                 out_c.write(", " + var_line.group(2))
452         out_c.write(");\n")
453         out_c.write("\treturn (long)res_ptr;\n")
454         out_c.write("}\n")
455
456         out_java.write("\tpublic static native " + struct_name + " " + struct_name + "_get_obj_from_jcalls(long val);\n")
457         out_c.write("JNIEXPORT jobject JNICALL Java_org_ldk_impl_bindings_" + struct_name.replace("_", "_1") + "_1get_1obj_1from_1jcalls (JNIEnv * env, jclass _a, jlong val) {\n")
458         out_c.write("\treturn ((" + struct_name + "_JCalls*)val)->o;\n")
459         out_c.write("}\n")
460
461         for fn_line in trait_fn_lines:
462             # For now, just disable enabling the _call_log - we don't know how to inverse-map String
463             is_log = fn_line.group(2) == "log" and struct_name == "LDKLogger"
464             if fn_line.group(2) != "free" and fn_line.group(2) != "clone" and fn_line.group(2) != "eq" and not is_log:
465                 dummy_line = fn_line.group(1) + struct_name + "_call_" + fn_line.group(2) + " " + struct_name + "* arg" + fn_line.group(4) + "\n"
466                 map_fn(dummy_line, re.compile("([A-Za-z_0-9]*) *([A-Za-z_0-9]*) *(.*)").match(dummy_line), None, "(arg_conv->" + fn_line.group(2) + ")(arg_conv->this_arg")
467
468     out_java.write("""package org.ldk.impl;
469
470 public class bindings {
471         static {
472                 System.loadLibrary(\"lightningjni\");
473                 init(java.lang.Enum.class);
474         }
475 """)
476     out_c.write("""#include \"org_ldk_impl_bindings.h\"
477 #include <rust_types.h>
478 #include <lightning.h>
479 #include <assert.h>
480 #include <string.h>
481 #include <stdatomic.h>
482 """)
483
484     if sys.argv[4] == "false":
485         out_c.write("#define MALLOC(a, _) malloc(a)\n")
486         out_c.write("#define FREE free\n")
487     else:
488         out_c.write("""
489 #include <threads.h>
490 static mtx_t allocation_mtx;
491
492 void __attribute__((constructor)) init_mtx() {
493         assert(mtx_init(&allocation_mtx, mtx_plain) == thrd_success);
494 }
495
496 typedef struct allocation {
497         struct allocation* next;
498         void* ptr;
499         const char* struct_name;
500 } allocation;
501 static allocation* allocation_ll = NULL;
502
503 void* MALLOC(size_t len, const char* struct_name) {
504         void* res = malloc(len);
505         allocation* new_alloc = malloc(sizeof(allocation));
506         new_alloc->ptr = res;
507         new_alloc->struct_name = struct_name;
508         assert(mtx_lock(&allocation_mtx) == thrd_success);
509         new_alloc->next = allocation_ll;
510         allocation_ll = new_alloc;
511         assert(mtx_unlock(&allocation_mtx) == thrd_success);
512         return res;
513 }
514
515 void FREE(void* ptr) {
516         allocation* p = NULL;
517         assert(mtx_lock(&allocation_mtx) == thrd_success);
518         allocation* it = allocation_ll;
519         while (it->ptr != ptr) { p = it; it = it->next; }
520         if (p) { p->next = it->next; } else { allocation_ll = it->next; }
521         assert(mtx_unlock(&allocation_mtx) == thrd_success);
522         assert(it->ptr == ptr);
523         free(it);
524         free(ptr);
525 }
526
527 void __attribute__((destructor)) check_leaks() {
528         for (allocation* a = allocation_ll; a != NULL; a = a->next) { fprintf(stderr, "%s %p remains\\n", a->struct_name, a->ptr); }
529         assert(allocation_ll == NULL);
530 }
531 """)
532
533     out_java.write("""
534         static native void init(java.lang.Class c);
535
536         public static native boolean deref_bool(long ptr);
537         public static native long deref_long(long ptr);
538         public static native void free_heap_ptr(long ptr);
539         public static native long u8_vec_len(long vec);
540
541 """)
542     out_c.write("""
543 jmethodID ordinal_meth = NULL;
544 JNIEXPORT void Java_org_ldk_impl_bindings_init(JNIEnv * env, jclass _b, jclass enum_class) {
545         ordinal_meth = (*env)->GetMethodID(env, enum_class, "ordinal", "()I");
546         assert(ordinal_meth != NULL);
547 }
548
549 JNIEXPORT jboolean JNICALL Java_org_ldk_impl_bindings_deref_1bool (JNIEnv * env, jclass _a, jlong ptr) {
550         return *((bool*)ptr);
551 }
552 JNIEXPORT jlong JNICALL Java_org_ldk_impl_bindings_deref_1long (JNIEnv * env, jclass _a, jlong ptr) {
553         return *((long*)ptr);
554 }
555 JNIEXPORT void JNICALL Java_org_ldk_impl_bindings_free_1heap_1ptr (JNIEnv * env, jclass _a, jlong ptr) {
556         FREE((void*)ptr);
557 }
558 JNIEXPORT jlong JNICALL Java_org_ldk_impl_bindings_u8_1vec_1len (JNIEnv * env, jclass _a, jlong ptr) {
559         LDKCVec_u8Z *vec = (LDKCVec_u8Z*)ptr;
560         return (long)vec->datalen;
561 }
562
563 // We assume that CVec_u8Z and u8slice are the same size and layout (and thus pointers to the two can be mixed)
564 _Static_assert(sizeof(LDKCVec_u8Z) == sizeof(LDKu8slice), "Vec<u8> and [u8] need to have been mapped identically");
565 _Static_assert(offsetof(LDKCVec_u8Z, data) == offsetof(LDKu8slice, data), "Vec<u8> and [u8] need to have been mapped identically");
566 _Static_assert(offsetof(LDKCVec_u8Z, datalen) == offsetof(LDKu8slice, datalen), "Vec<u8> and [u8] need to have been mapped identically");
567
568 """)
569
570     # XXX: Temporarily write out a manual SecretKey_new() for testing, we should auto-gen this kind of thing
571     out_java.write("\tpublic static native long LDKSecretKey_new();\n\n") # TODO: rm me
572     out_c.write("JNIEXPORT jlong JNICALL Java_org_ldk_impl_bindings_LDKSecretKey_1new(JNIEnv * _env, jclass _b) {\n") # TODO: rm me
573     out_c.write("\tLDKSecretKey* key = (LDKSecretKey*)MALLOC(sizeof(LDKSecretKey), \"LDKSecretKey\");\n") # TODO: rm me
574     out_c.write("\treturn (long)key;\n") # TODO: rm me
575     out_c.write("}\n") # TODO: rm me
576
577     in_block_comment = False
578     cur_block_obj = None
579
580     fn_ptr_regex = re.compile("^extern const ([A-Za-z_0-9\* ]*) \(\*(.*)\)\((.*)\);$")
581     fn_ret_arr_regex = re.compile("(.*) \(\*(.*)\((.*)\)\)\[([0-9]*)\];$")
582     reg_fn_regex = re.compile("([A-Za-z_0-9\* ]* \*?)([a-zA-Z_0-9]*)\((.*)\);$")
583     const_val_regex = re.compile("^extern const ([A-Za-z_0-9]*) ([A-Za-z_0-9]*);$")
584
585     line_indicates_result_regex = re.compile("^   bool result_ok;$")
586     line_indicates_opaque_regex = re.compile("^   bool is_owned;$")
587     line_indicates_trait_regex = re.compile("^   ([A-Za-z_0-9]* \*?)\(\*([A-Za-z_0-9]*)\)\((const )?void \*this_arg(.*)\);$")
588     assert(line_indicates_trait_regex.match("   uintptr_t (*send_data)(void *this_arg, LDKu8slice data, bool resume_read);"))
589     assert(line_indicates_trait_regex.match("   LDKCVec_MessageSendEventZ (*get_and_clear_pending_msg_events)(const void *this_arg);"))
590     assert(line_indicates_trait_regex.match("   void *(*clone)(const void *this_arg);"))
591     line_field_var_regex = re.compile("^   ([A-Za-z_0-9]*) ([A-Za-z_0-9]*);$")
592     assert(line_field_var_regex.match("   LDKMessageSendEventsProvider MessageSendEventsProvider;"))
593     struct_name_regex = re.compile("^typedef (struct|enum|union) (MUST_USE_STRUCT )?(LDK[A-Za-z_0-9]*) {$")
594     assert(struct_name_regex.match("typedef struct LDKCVecTempl_u8 {"))
595     assert(struct_name_regex.match("typedef enum LDKNetwork {"))
596     struct_alias_regex = re.compile("^typedef (LDK[A-Za-z_0-9]*) (LDK[A-Za-z_0-9]*);$")
597     assert(struct_alias_regex.match("typedef LDKCResultTempl_bool__PeerHandleError LDKCResult_boolPeerHandleErrorZ;"))
598
599     result_templ_structs = set()
600     for line in in_h:
601         if in_block_comment:
602             #out_java.write("\t" + line)
603             if line.endswith("*/\n"):
604                 in_block_comment = False
605         elif cur_block_obj is not None:
606             cur_block_obj  = cur_block_obj + line
607             if line.startswith("} "):
608                 field_lines = []
609                 struct_name = None
610                 obj_lines = cur_block_obj.split("\n")
611                 is_opaque = False
612                 is_result = False
613                 is_unitary_enum = False
614                 is_union_enum = False
615                 is_union = False
616                 trait_fn_lines = []
617                 field_var_lines = []
618
619                 for idx, struct_line in enumerate(obj_lines):
620                     if struct_line.strip().startswith("/*"):
621                         in_block_comment = True
622                     if in_block_comment:
623                         if struct_line.endswith("*/"):
624                             in_block_comment = False
625                     else:
626                         struct_name_match = struct_name_regex.match(struct_line)
627                         if struct_name_match is not None:
628                             struct_name = struct_name_match.group(3)
629                             if struct_name_match.group(1) == "enum":
630                                 if not struct_name.endswith("_Tag"):
631                                     is_unitary_enum = True
632                                 else:
633                                     is_union_enum = True
634                             elif struct_name_match.group(1) == "union":
635                                 is_union = True
636                         if line_indicates_opaque_regex.match(struct_line):
637                             is_opaque = True
638                         elif line_indicates_result_regex.match(struct_line):
639                             is_result = True
640                         trait_fn_match = line_indicates_trait_regex.match(struct_line)
641                         if trait_fn_match is not None:
642                             trait_fn_lines.append(trait_fn_match)
643                         field_var_match = line_field_var_regex.match(struct_line)
644                         if field_var_match is not None:
645                             field_var_lines.append(field_var_match)
646                         field_lines.append(struct_line)
647
648                 assert(struct_name is not None)
649                 assert(len(trait_fn_lines) == 0 or not (is_opaque or is_unitary_enum or is_union_enum or is_union))
650                 assert(not is_opaque or not (len(trait_fn_lines) != 0 or is_unitary_enum or is_union_enum or is_union))
651                 assert(not is_unitary_enum or not (len(trait_fn_lines) != 0 or is_opaque or is_union_enum or is_union))
652                 assert(not is_union_enum or not (len(trait_fn_lines) != 0 or is_unitary_enum or is_opaque or is_union))
653                 assert(not is_union or not (len(trait_fn_lines) != 0 or is_unitary_enum or is_union_enum or is_opaque))
654                 if is_opaque:
655                     opaque_structs.add(struct_name)
656                 elif is_result:
657                     result_templ_structs.add(struct_name)
658                 elif is_unitary_enum:
659                     unitary_enums.add(struct_name)
660                     out_c.write("static inline " + struct_name + " " + struct_name + "_from_java(JNIEnv *env, jclass val) {\n")
661                     out_c.write("\tswitch ((*env)->CallIntMethod(env, val, ordinal_meth)) {\n")
662                     ord_v = 0
663                     for idx, struct_line in enumerate(field_lines):
664                         if idx == 0:
665                             out_java.write("\tpublic enum " + struct_name + " {\n")
666                         elif idx == len(field_lines) - 3:
667                             assert(struct_line.endswith("_Sentinel,"))
668                         elif idx == len(field_lines) - 2:
669                             out_java.write("\t}\n")
670                         elif idx == len(field_lines) - 1:
671                             assert(struct_line == "")
672                         else:
673                             out_java.write("\t" + struct_line + "\n")
674                             out_c.write("\t\tcase %d: return %s;\n" % (ord_v, struct_line.strip().strip(",")))
675                             ord_v = ord_v + 1
676                     out_c.write("\t}\n")
677                     out_c.write("\tassert(false);\n")
678                     out_c.write("}\n")
679
680                     ord_v = 0
681                     out_c.write("static inline jclass " + struct_name + "_to_java(JNIEnv *env, " + struct_name + " val) {\n")
682                     out_c.write("\t// TODO: This is pretty inefficient, we really need to cache the field IDs and class\n")
683                     out_c.write("\tjclass enum_class = (*env)->FindClass(env, \"Lorg/ldk/impl/bindings$" + struct_name + ";\");\n")
684                     out_c.write("\tassert(enum_class != NULL);\n")
685                     out_c.write("\tswitch (val) {\n")
686                     for idx, struct_line in enumerate(field_lines):
687                         if idx > 0 and idx < len(field_lines) - 3:
688                             variant = struct_line.strip().strip(",")
689                             out_c.write("\t\tcase " + variant + ": {\n")
690                             out_c.write("\t\t\tjfieldID field = (*env)->GetStaticFieldID(env, enum_class, \"" + variant + "\", \"Lorg/ldk/impl/bindings$" + struct_name + ";\");\n")
691                             out_c.write("\t\t\tassert(field != NULL);\n")
692                             out_c.write("\t\t\treturn (*env)->GetStaticObjectField(env, enum_class, field);\n")
693                             out_c.write("\t\t}\n")
694                             ord_v = ord_v + 1
695                     out_c.write("\t\tdefault: assert(false);\n")
696                     out_c.write("\t}\n")
697                     out_c.write("}\n\n")
698                 elif len(trait_fn_lines) > 0:
699                     trait_structs.add(struct_name)
700                     map_trait(struct_name, field_var_lines, trait_fn_lines)
701                 cur_block_obj = None
702         else:
703             fn_ptr = fn_ptr_regex.match(line)
704             fn_ret_arr = fn_ret_arr_regex.match(line)
705             reg_fn = reg_fn_regex.match(line)
706             const_val = const_val_regex.match(line)
707
708             if line.startswith("#include <"):
709                 pass
710             elif line.startswith("/*"):
711                 #out_java.write("\t" + line)
712                 if not line.endswith("*/\n"):
713                     in_block_comment = True
714             elif line.startswith("typedef enum "):
715                 cur_block_obj = line
716             elif line.startswith("typedef struct "):
717                 cur_block_obj = line
718             elif line.startswith("typedef union "):
719                 cur_block_obj = line
720             elif line.startswith("typedef "):
721                 alias_match =  struct_alias_regex.match(line)
722                 if alias_match.group(1) in result_templ_structs:
723                     out_java.write("\tpublic static native boolean " + alias_match.group(2) + "_result_ok(long arg);\n")
724                     out_java.write("\tpublic static native long " + alias_match.group(2) + "_get_inner(long arg);\n")
725                     out_c.write("JNIEXPORT jboolean JNICALL Java_org_ldk_impl_bindings_" + alias_match.group(2).replace("_", "_1") + "_1result_1ok (JNIEnv * env, jclass _a, jlong arg) {\n")
726                     out_c.write("\treturn ((" + alias_match.group(2) + "*)arg)->result_ok;\n")
727                     out_c.write("}\n")
728                     out_c.write("JNIEXPORT jlong JNICALL Java_org_ldk_impl_bindings_" + alias_match.group(2).replace("_", "_1") + "_1get_1inner (JNIEnv * env, jclass _a, jlong arg) {\n")
729                     out_c.write("\tif (((" + alias_match.group(2) + "*)arg)->result_ok) {\n")
730                     out_c.write("\t\treturn (long)((" + alias_match.group(2) + "*)arg)->contents.result;\n")
731                     out_c.write("\t} else {\n")
732                     out_c.write("\t\treturn (long)((" + alias_match.group(2) + "*)arg)->contents.err;\n")
733                     out_c.write("\t}\n}\n")
734                 pass
735             elif fn_ptr is not None:
736                 map_fn(line, fn_ptr, None, None)
737             elif fn_ret_arr is not None:
738                 map_fn(line, fn_ret_arr, fn_ret_arr.group(4), None)
739             elif reg_fn is not None:
740                 map_fn(line, reg_fn, None, None)
741             elif const_val_regex is not None:
742                 # TODO Map const variables
743                 pass
744             else:
745                 assert(line == "\n")
746
747     out_java.write("}\n")