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")
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
15 self.passed_as_ptr = passed_as_ptr
17 self.var_name = var_name
18 self.arr_len = arr_len
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
35 out_c.write(self.c_ty)
36 out_java.write(self.java_ty)
39 if self.arg_name != "":
40 out_java.write(" " + self.arg_name)
41 out_c.write(" " + self.arg_name)
43 out_java.write(" arg")
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()
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 "):
58 if fn_arg.startswith("const "):
65 if fn_arg.startswith("void"):
69 fn_arg = fn_arg[4:].strip()
70 elif fn_arg.startswith("bool"):
74 fn_arg = fn_arg[4:].strip()
75 elif fn_arg.startswith("uint8_t"):
79 fn_arg = fn_arg[7:].strip()
80 elif fn_arg.startswith("uint16_t"):
84 fn_arg = fn_arg[8:].strip()
85 elif fn_arg.startswith("uint32_t"):
89 fn_arg = fn_arg[8:].strip()
90 elif fn_arg.startswith("uint64_t") or fn_arg.startswith("uintptr_t"):
94 if fn_arg.startswith("uint64_t"):
95 fn_arg = fn_arg[8:].strip()
97 fn_arg = fn_arg[9:].strip()
98 elif is_const and fn_arg.startswith("char *"):
101 fn_ty_arg = "Ljava/lang/String;"
102 fn_arg = fn_arg[6:].strip()
104 ma = var_ty_regex.match(fn_arg)
105 if ma.group(1).strip() in unitary_enums:
106 java_ty = ma.group(1).strip()
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()
116 fn_arg = ma.group(2).strip()
117 rust_obj = ma.group(1).strip()
120 if fn_arg.startswith(" *") or fn_arg.startswith("*"):
121 fn_arg = fn_arg.replace("*", "").strip()
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)
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)
139 def map_type(fn_arg, print_void, ret_arr_len, is_free):
140 ty_info = java_c_types(fn_arg, ret_arr_len)
142 if ty_info.c_ty == "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)
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
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 + ", *",
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:
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}"
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 base_conv = base_conv + "\nFREE((void*)" + ty_info.var_name + ");";
188 if ty_info.rust_obj in opaque_structs:
189 return ConvInfo(ty_info = ty_info, arg_name = ty_info.var_name,
190 arg_conv = base_conv + "\n" + ty_info.var_name + "_conv.is_owned = true;",
191 arg_conv_name = ty_info.var_name + "_conv",
192 ret_conv = None, ret_conv_name = None)
194 return ConvInfo(ty_info = ty_info, arg_name = ty_info.var_name,
195 arg_conv = base_conv, arg_conv_name = ty_info.var_name + "_conv",
196 ret_conv = None, ret_conv_name = None)
199 return ConvInfo(ty_info = ty_info, arg_name = ty_info.var_name,
200 arg_conv = ty_info.rust_obj + "* " + ty_info.var_name + "_conv = (" + ty_info.rust_obj + "*)" + ty_info.var_name + ";",
201 arg_conv_name = ty_info.var_name + "_conv",
202 ret_conv = None, ret_conv_name = None)
204 return ConvInfo(ty_info = ty_info, arg_name = ty_info.var_name,
205 arg_conv = None, arg_conv_name = ty_info.var_name, ret_conv = None, ret_conv_name = None)
206 elif ty_info.java_ty == "String":
207 return ConvInfo(ty_info = ty_info, arg_name = ty_info.var_name,
208 arg_conv = None, arg_conv_name = None,
209 ret_conv = ("jstring " + ty_info.var_name + "_conv = (*_env)->NewStringUTF(_env, ", ");"), ret_conv_name = ty_info.var_name + "_conv")
211 return ConvInfo(ty_info = ty_info, arg_name = ty_info.var_name,
212 arg_conv = None, arg_conv_name = ty_info.var_name, ret_conv = None, ret_conv_name = None)
214 # We don't have a parameter name, and want one, just call it arg
215 if ty_info.rust_obj is not None:
216 assert(not is_free or ty_info.rust_obj not in opaque_structs);
217 return ConvInfo(ty_info = ty_info, arg_name = ty_info.var_name,
218 arg_conv = ty_info.rust_obj + " arg_conv = *(" + ty_info.rust_obj + "*)arg;\nFREE((void*)arg);",
219 arg_conv_name = "arg_conv",
220 ret_conv = None, ret_conv_name = None)
223 return ConvInfo(ty_info = ty_info, arg_name = ty_info.var_name,
224 arg_conv = None, arg_conv_name = "arg", ret_conv = None, ret_conv_name = None)
226 # We don't have a parameter name, and don't want one (cause we're returning)
227 if ty_info.rust_obj is not None:
228 if not ty_info.is_ptr:
229 if ty_info.rust_obj in unitary_enums:
230 return ConvInfo(ty_info = ty_info, arg_name = ty_info.var_name,
231 arg_conv = ty_info.rust_obj + " ret = " + ty_info.rust_obj + "_from_java(_env, " + ty_info.var_name + ");",
232 arg_conv_name = "ret",
233 ret_conv = ("jclass ret = " + ty_info.rust_obj + "_to_java(_env, ", ");"), ret_conv_name = "ret")
234 if ty_info.rust_obj in opaque_structs:
235 # If we're returning a newly-allocated struct, we don't want Rust to ever
236 # free, instead relying on the Java GC to lose the ref. We undo this in
237 # any _free function.
238 # To avoid any issues, we first assert that the incoming object is non-ref.
239 return ConvInfo(ty_info = ty_info, arg_name = ty_info.var_name,
240 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;"),
241 ret_conv_name = "(long)ret",
242 arg_conv = None, arg_conv_name = None)
244 return ConvInfo(ty_info = ty_info, arg_name = ty_info.var_name,
245 ret_conv = (ty_info.rust_obj + "* ret = MALLOC(sizeof(" + ty_info.rust_obj + "), \"" + ty_info.rust_obj + "\");\n*ret = ", ";"),
246 ret_conv_name = "(long)ret",
247 arg_conv = None, arg_conv_name = None)
249 return ConvInfo(ty_info = ty_info, arg_name = ty_info.var_name,
250 ret_conv = ("long ret = (long)", ";"), ret_conv_name = "ret",
251 arg_conv = None, arg_conv_name = None)
253 return ConvInfo(ty_info = ty_info, arg_name = ty_info.var_name,
254 arg_conv = None, arg_conv_name = None, ret_conv = None, ret_conv_name = None)
256 def map_fn(re_match, ret_arr_len):
257 out_java.write("\t/// " + line)
258 out_java.write("\tpublic static native ")
259 out_c.write("JNIEXPORT ")
261 ret_info = map_type(re_match.group(1), True, ret_arr_len, False)
263 if ret_info.ret_conv is not None:
264 ret_conv_pfx, ret_conv_sfx = ret_info.ret_conv
266 out_java.write(" " + re_match.group(2) + "(")
267 out_c.write(" JNICALL Java_org_ldk_impl_bindings_" + re_match.group(2).replace('_', '_1') + "(JNIEnv * _env, jclass _b")
270 for idx, arg in enumerate(re_match.group(3).split(',')):
275 arg_conv_info = map_type(arg, False, None, re_match.group(2).endswith("_free"))
276 if arg_conv_info.c_ty != "void":
277 arg_conv_info.print_ty()
278 arg_conv_info.print_name()
279 arg_names.append(arg_conv_info)
281 out_java.write(");\n")
284 for info in arg_names:
285 if info.arg_conv is not None:
286 out_c.write("\t" + info.arg_conv.replace('\n', "\n\t") + "\n");
288 if ret_info.ret_conv is not None:
289 out_c.write("\t" + ret_conv_pfx.replace('\n', '\n\t'));
291 out_c.write("\treturn ");
293 out_c.write(re_match.group(2) + "(")
294 for idx, info in enumerate(arg_names):
295 if info.arg_conv_name is not None:
298 out_c.write(info.arg_conv_name)
300 if ret_info.ret_conv is not None:
301 out_c.write(ret_conv_sfx.replace('\n', '\n\t'))
302 out_c.write("\n\treturn " + ret_info.ret_conv_name + ";")
305 out_c.write("\n}\n\n")
307 def map_trait(struct_name, field_var_lines, trait_fn_lines):
308 out_c.write("typedef struct " + struct_name + "_JCalls {\n")
309 out_c.write("\tatomic_size_t refcnt;\n")
310 out_c.write("\tJNIEnv *env;\n")
311 out_c.write("\tjobject o;\n")
312 for var_line in field_var_lines:
313 if var_line.group(1) in trait_structs:
314 out_c.write("\t" + var_line.group(1) + "_JCalls* " + var_line.group(2) + ";\n")
315 for fn_line in trait_fn_lines:
316 if fn_line.group(2) != "free" and fn_line.group(2) != "clone":
317 out_c.write("\tjmethodID " + fn_line.group(2) + "_meth;\n")
318 out_c.write("} " + struct_name + "_JCalls;\n")
320 out_java.write("\tpublic interface " + struct_name + " {\n")
322 for fn_line in trait_fn_lines:
323 java_meth_descr = "("
324 if fn_line.group(2) != "free" and fn_line.group(2) != "clone":
325 ret_ty_info = java_c_types(fn_line.group(1), None)
327 out_java.write("\t\t " + ret_ty_info.java_ty + " " + fn_line.group(2) + "(")
328 is_const = fn_line.group(3) is not None
329 out_c.write(fn_line.group(1) + fn_line.group(2) + "_jcall(")
331 out_c.write("const void* this_arg")
333 out_c.write("void* this_arg")
336 for idx, arg in enumerate(fn_line.group(4).split(',')):
342 arg_conv_info = map_type(arg, True, None, False)
343 out_c.write(arg.strip())
344 out_java.write(arg_conv_info.java_ty + " " + arg_conv_info.arg_name)
345 arg_names.append(arg_conv_info)
346 java_meth_descr = java_meth_descr + arg_conv_info.java_fn_ty_arg
347 java_meth_descr = java_meth_descr + ")" + ret_ty_info.java_fn_ty_arg
348 java_meths.append(java_meth_descr)
350 out_java.write(");\n")
352 out_c.write("\t" + struct_name + "_JCalls *j_calls = (" + struct_name + "_JCalls*) this_arg;\n")
354 for arg_info in arg_names:
355 if arg_info.ret_conv is not None:
356 out_c.write("\t" + arg_info.ret_conv[0].replace('\n', '\n\t').replace("_env", "j_calls->env"));
357 out_c.write(arg_info.arg_name)
358 out_c.write(arg_info.ret_conv[1].replace('\n', '\n\t').replace("_env", "j_calls->env") + "\n")
360 if not ret_ty_info.passed_as_ptr:
361 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")
363 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");
365 for arg_info in arg_names:
366 if arg_info.ret_conv is not None:
367 out_c.write(", " + arg_info.ret_conv_name)
369 out_c.write(", " + arg_info.arg_name)
372 if ret_ty_info.passed_as_ptr:
373 out_c.write("\t" + fn_line.group(1).strip() + " res = *ret;\n")
374 out_c.write("\tFREE(ret);\n")
375 out_c.write("\treturn res;\n")
377 elif fn_line.group(2) == "free":
378 out_c.write("static void " + struct_name + "_JCalls_free(void* this_arg) {\n")
379 out_c.write("\t" + struct_name + "_JCalls *j_calls = (" + struct_name + "_JCalls*) this_arg;\n")
380 out_c.write("\tif (atomic_fetch_sub_explicit(&j_calls->refcnt, 1, memory_order_acquire) == 1) {\n")
381 out_c.write("\t\t(*j_calls->env)->DeleteGlobalRef(j_calls->env, j_calls->o);\n")
382 out_c.write("\t\tFREE(j_calls);\n")
383 out_c.write("\t}\n}\n")
385 # Write out a clone function whether we need one or not, as we use them in moving to rust
386 out_c.write("static void* " + struct_name + "_JCalls_clone(const void* this_arg) {\n")
387 out_c.write("\t" + struct_name + "_JCalls *j_calls = (" + struct_name + "_JCalls*) this_arg;\n")
388 out_c.write("\tatomic_fetch_add_explicit(&j_calls->refcnt, 1, memory_order_release);\n")
389 for var_line in field_var_lines:
390 if var_line.group(1) in trait_structs:
391 out_c.write("\tatomic_fetch_add_explicit(&j_calls->" + var_line.group(2) + "->refcnt, 1, memory_order_release);\n")
392 out_c.write("\treturn (void*) this_arg;\n")
395 out_java.write("\t}\n")
397 out_java.write("\tpublic static native long " + struct_name + "_new(" + struct_name + " impl")
398 out_c.write("static inline " + struct_name + " " + struct_name + "_init (JNIEnv * env, jclass _a, jobject o")
399 for var_line in field_var_lines:
400 if var_line.group(1) in trait_structs:
401 out_java.write(", " + var_line.group(1) + " " + var_line.group(2))
402 out_c.write(", jobject " + var_line.group(2))
403 out_java.write(");\n")
406 out_c.write("\tjclass c = (*env)->GetObjectClass(env, o);\n")
407 out_c.write("\tassert(c != NULL);\n")
408 out_c.write("\t" + struct_name + "_JCalls *calls = MALLOC(sizeof(" + struct_name + "_JCalls), \"" + struct_name + "_JCalls\");\n")
409 out_c.write("\tatomic_init(&calls->refcnt, 1);\n")
410 out_c.write("\tcalls->env = env;\n")
411 out_c.write("\tcalls->o = (*env)->NewGlobalRef(env, o);\n")
412 for (fn_line, java_meth_descr) in zip(trait_fn_lines, java_meths):
413 if fn_line.group(2) != "free" and fn_line.group(2) != "clone":
414 out_c.write("\tcalls->" + fn_line.group(2) + "_meth = (*env)->GetMethodID(env, c, \"" + fn_line.group(2) + "\", \"" + java_meth_descr + "\");\n")
415 out_c.write("\tassert(calls->" + fn_line.group(2) + "_meth != NULL);\n")
416 out_c.write("\n\t" + struct_name + " ret = {\n")
417 out_c.write("\t\t.this_arg = (void*) calls,\n")
418 for fn_line in trait_fn_lines:
419 if fn_line.group(2) != "free" and fn_line.group(2) != "clone":
420 out_c.write("\t\t." + fn_line.group(2) + " = " + fn_line.group(2) + "_jcall,\n")
421 elif fn_line.group(2) == "free":
422 out_c.write("\t\t.free = " + struct_name + "_JCalls_free,\n")
424 out_c.write("\t\t.clone = " + struct_name + "_JCalls_clone,\n")
425 for var_line in field_var_lines:
426 if var_line.group(1) in trait_structs:
427 out_c.write("\t\t." + var_line.group(2) + " = " + var_line.group(1) + "_init(env, _a, " + var_line.group(2) + "),\n")
428 out_c.write("\t};\n")
429 for var_line in field_var_lines:
430 if var_line.group(1) in trait_structs:
431 out_c.write("\tcalls->" + var_line.group(2) + " = ret." + var_line.group(2) + ".this_arg;\n")
432 out_c.write("\treturn ret;\n")
435 out_c.write("JNIEXPORT long JNICALL Java_org_ldk_impl_bindings_" + struct_name.replace("_", "_1") + "_1new (JNIEnv * env, jclass _a, jobject o")
436 for var_line in field_var_lines:
437 if var_line.group(1) in trait_structs:
438 out_c.write(", jobject " + var_line.group(2))
440 out_c.write("\t" + struct_name + " *res_ptr = MALLOC(sizeof(" + struct_name + "), \"" + struct_name + "\");\n")
441 out_c.write("\t*res_ptr = " + struct_name + "_init(env, _a, o")
442 for var_line in field_var_lines:
443 if var_line.group(1) in trait_structs:
444 out_c.write(", " + var_line.group(2))
446 out_c.write("\treturn (long)res_ptr;\n")
451 out_java.write("""package org.ldk.impl;
453 public class bindings {
454 static native void init(java.lang.Class c);
456 System.loadLibrary(\"lightningjni\");
457 init(java.lang.Enum.class);
461 out_c.write("#include \"org_ldk_impl_bindings.h\"\n")
462 out_c.write("#include <rust_types.h>\n")
463 out_c.write("#include <lightning.h>\n")
464 out_c.write("#include <assert.h>\n")
465 out_c.write("#include <string.h>\n")
466 out_c.write("#include <stdatomic.h>\n\n")
468 out_c.write("jmethodID ordinal_meth = NULL;\n")
469 out_c.write("JNIEXPORT void Java_org_ldk_impl_bindings_init(JNIEnv * env, jclass _b, jclass enum_class) {\n")
470 out_c.write("\tordinal_meth = (*env)->GetMethodID(env, enum_class, \"ordinal\", \"()I\");\n")
471 out_c.write("\tassert(ordinal_meth != NULL);\n")
474 if sys.argv[4] == "false":
475 out_c.write("#define MALLOC(a, _) malloc(a)\n")
476 out_c.write("#define FREE free\n\n")
478 out_c.write("#include <threads.h>\n")
479 out_c.write("static mtx_t allocation_mtx;\n\n")
480 out_c.write("void __attribute__((constructor)) init_mtx() {\n")
481 out_c.write("\tassert(mtx_init(&allocation_mtx, mtx_plain) == thrd_success);\n")
483 out_c.write("typedef struct allocation {\n")
484 out_c.write("\tstruct allocation* next;\n")
485 out_c.write("\tvoid* ptr;\n")
486 out_c.write("\tconst char* struct_name;\n")
487 out_c.write("} allocation;\n")
488 out_c.write("static allocation* allocation_ll = NULL;\n\n")
489 out_c.write("void* MALLOC(size_t len, const char* struct_name) {\n")
490 out_c.write("\tvoid* res = malloc(len);\n")
491 out_c.write("\tallocation* new_alloc = malloc(sizeof(allocation));\n")
492 out_c.write("\tnew_alloc->ptr = res;\n")
493 out_c.write("\tnew_alloc->struct_name = struct_name;\n")
494 out_c.write("\tassert(mtx_lock(&allocation_mtx) == thrd_success);\n")
495 out_c.write("\tnew_alloc->next = allocation_ll;\n")
496 out_c.write("\tallocation_ll = new_alloc;\n")
497 out_c.write("\tassert(mtx_unlock(&allocation_mtx) == thrd_success);\n")
498 out_c.write("\treturn res;\n")
500 out_c.write("void FREE(void* ptr) {\n")
501 out_c.write("\tallocation* p = NULL;\n")
502 out_c.write("\tassert(mtx_lock(&allocation_mtx) == thrd_success);\n")
503 out_c.write("\tallocation* it = allocation_ll;\n")
504 out_c.write("\twhile (it->ptr != ptr) { p = it; it = it->next; }\n")
505 out_c.write("\tif (p) { p->next = it->next; } else { allocation_ll = it->next; }\n")
506 out_c.write("\tassert(mtx_unlock(&allocation_mtx) == thrd_success);\n")
507 out_c.write("\tassert(it->ptr == ptr);\n")
508 out_c.write("\tfree(it);\n")
509 out_c.write("\tfree(ptr);\n")
511 out_c.write("void __attribute__((destructor)) check_leaks() {\n")
512 out_c.write("\tfor (allocation* a = allocation_ll; a != NULL; a = a->next) { fprintf(stderr, \"%s %p remains\\n\", a->struct_name, a->ptr); }\n")
513 out_c.write("\tassert(allocation_ll == NULL);\n")
516 # XXX: Temporarily write out a manual SecretKey_new() for testing, we should auto-gen this kind of thing
517 out_java.write("\tpublic static native long LDKSecretKey_new();\n\n") # TODO: rm me
518 out_c.write("JNIEXPORT jlong JNICALL Java_org_ldk_impl_bindings_LDKSecretKey_1new(JNIEnv * _env, jclass _b) {\n") # TODO: rm me
519 out_c.write("\tLDKSecretKey* key = (LDKSecretKey*)MALLOC(sizeof(LDKSecretKey), \"LDKSecretKey\");\n") # TODO: rm me
520 out_c.write("\treturn (long)key;\n") # TODO: rm me
521 out_c.write("}\n") # TODO: rm me
523 in_block_comment = False
526 fn_ptr_regex = re.compile("^extern const ([A-Za-z_0-9\* ]*) \(\*(.*)\)\((.*)\);$")
527 fn_ret_arr_regex = re.compile("(.*) \(\*(.*)\((.*)\)\)\[([0-9]*)\];$")
528 reg_fn_regex = re.compile("([A-Za-z_0-9\* ]* \*?)([a-zA-Z_0-9]*)\((.*)\);$")
529 const_val_regex = re.compile("^extern const ([A-Za-z_0-9]*) ([A-Za-z_0-9]*);$")
531 line_indicates_opaque_regex = re.compile("^ bool is_owned;$")
532 line_indicates_trait_regex = re.compile("^ ([A-Za-z_0-9]* \*?)\(\*([A-Za-z_0-9]*)\)\((const )?void \*this_arg(.*)\);$")
533 assert(line_indicates_trait_regex.match(" uintptr_t (*send_data)(void *this_arg, LDKu8slice data, bool resume_read);"))
534 assert(line_indicates_trait_regex.match(" LDKCVec_MessageSendEventZ (*get_and_clear_pending_msg_events)(const void *this_arg);"))
535 assert(line_indicates_trait_regex.match(" void *(*clone)(const void *this_arg);"))
536 line_field_var_regex = re.compile("^ ([A-Za-z_0-9]*) ([A-Za-z_0-9]*);$")
537 assert(line_field_var_regex.match(" LDKMessageSendEventsProvider MessageSendEventsProvider;"))
538 struct_name_regex = re.compile("^typedef (struct|enum|union) (MUST_USE_STRUCT )?(LDK[A-Za-z_0-9]*) {$")
539 assert(struct_name_regex.match("typedef struct LDKCVecTempl_u8 {"))
540 assert(struct_name_regex.match("typedef enum LDKNetwork {"))
544 #out_java.write("\t" + line)
545 if line.endswith("*/\n"):
546 in_block_comment = False
547 elif cur_block_obj is not None:
548 cur_block_obj = cur_block_obj + line
549 if line.startswith("} "):
552 obj_lines = cur_block_obj.split("\n")
554 is_unitary_enum = False
555 is_union_enum = False
560 for idx, struct_line in enumerate(obj_lines):
561 if struct_line.strip().startswith("/*"):
562 in_block_comment = True
564 if struct_line.endswith("*/"):
565 in_block_comment = False
567 struct_name_match = struct_name_regex.match(struct_line)
568 if struct_name_match is not None:
569 struct_name = struct_name_match.group(3)
570 if struct_name_match.group(1) == "enum":
571 if not struct_name.endswith("_Tag"):
572 is_unitary_enum = True
575 elif struct_name_match.group(1) == "union":
577 if line_indicates_opaque_regex.match(struct_line):
579 trait_fn_match = line_indicates_trait_regex.match(struct_line)
580 if trait_fn_match is not None:
581 trait_fn_lines.append(trait_fn_match)
582 field_var_match = line_field_var_regex.match(struct_line)
583 if field_var_match is not None:
584 field_var_lines.append(field_var_match)
585 field_lines.append(struct_line)
587 assert(struct_name is not None)
588 assert(len(trait_fn_lines) == 0 or not (is_opaque or is_unitary_enum or is_union_enum or is_union))
589 assert(not is_opaque or not (len(trait_fn_lines) != 0 or is_unitary_enum or is_union_enum or is_union))
590 assert(not is_unitary_enum or not (len(trait_fn_lines) != 0 or is_opaque or is_union_enum or is_union))
591 assert(not is_union_enum or not (len(trait_fn_lines) != 0 or is_unitary_enum or is_opaque or is_union))
592 assert(not is_union or not (len(trait_fn_lines) != 0 or is_unitary_enum or is_union_enum or is_opaque))
594 opaque_structs.add(struct_name)
595 elif is_unitary_enum:
596 unitary_enums.add(struct_name)
597 out_c.write("static inline " + struct_name + " " + struct_name + "_from_java(JNIEnv *env, jclass val) {\n")
598 out_c.write("\tswitch ((*env)->CallIntMethod(env, val, ordinal_meth)) {\n")
600 for idx, struct_line in enumerate(field_lines):
602 out_java.write("\tpublic enum " + struct_name + " {\n")
603 elif idx == len(field_lines) - 3:
604 assert(struct_line.endswith("_Sentinel,"))
605 elif idx == len(field_lines) - 2:
606 out_java.write("\t}\n")
607 elif idx == len(field_lines) - 1:
608 assert(struct_line == "")
610 out_java.write("\t" + struct_line + "\n")
611 out_c.write("\t\tcase %d: return %s;\n" % (ord_v, struct_line.strip().strip(",")))
614 out_c.write("\tassert(false);\n")
618 out_c.write("static inline jclass " + struct_name + "_to_java(JNIEnv *env, " + struct_name + " val) {\n")
619 out_c.write("\t// TODO: This is pretty inefficient, we really need to cache the field IDs and class\n")
620 out_c.write("\tjclass enum_class = (*env)->FindClass(env, \"Lorg/ldk/impl/bindings$" + struct_name + ";\");\n")
621 out_c.write("\tassert(enum_class != NULL);\n")
622 out_c.write("\tswitch (val) {\n")
623 for idx, struct_line in enumerate(field_lines):
624 if idx > 0 and idx < len(field_lines) - 3:
625 variant = struct_line.strip().strip(",")
626 out_c.write("\t\tcase " + variant + ": {\n")
627 out_c.write("\t\t\tjfieldID field = (*env)->GetStaticFieldID(env, enum_class, \"" + variant + "\", \"Lorg/ldk/impl/bindings$" + struct_name + ";\");\n")
628 out_c.write("\t\t\tassert(field != NULL);\n")
629 out_c.write("\t\t\treturn (*env)->GetStaticObjectField(env, enum_class, field);\n")
630 out_c.write("\t\t}\n")
632 out_c.write("\t\tdefault: assert(false);\n")
635 elif len(trait_fn_lines) > 0:
636 trait_structs.add(struct_name)
637 map_trait(struct_name, field_var_lines, trait_fn_lines)
640 fn_ptr = fn_ptr_regex.match(line)
641 fn_ret_arr = fn_ret_arr_regex.match(line)
642 reg_fn = reg_fn_regex.match(line)
643 const_val = const_val_regex.match(line)
645 if line.startswith("#include <"):
647 elif line.startswith("/*"):
648 #out_java.write("\t" + line)
649 if not line.endswith("*/\n"):
650 in_block_comment = True
651 elif line.startswith("typedef enum "):
653 elif line.startswith("typedef struct "):
655 elif line.startswith("typedef union "):
657 elif line.startswith("typedef "):
659 elif fn_ptr is not None:
661 elif fn_ret_arr is not None:
662 map_fn(fn_ret_arr, fn_ret_arr.group(4))
663 elif reg_fn is not None:
665 elif const_val_regex is not None:
666 # TODO Map const variables
671 out_java.write("}\n")