feat!: Upgrade to Binaryen v129

Full Diff: WebAssembly/binaryen@version_128...version_129

API Additions:
* Data_segment
* Data_segment.get_num_segments
* Data_segment.get_segment
* Data_segment.get_segment_by_index
* Data_segment.get_segment_name
* Data_segment.get_segment_byte_offset
* Data_segment.get_segment_byte_length
* Data_segment.get_segment_passive
* Data_segment.get_segment_data

* Module.Feature.multibyte

API Changes:
* Table.add_table -> Now takes an optional `init` expression

API Removals:
* Memory.get_num_segments -> became Data_segment.get_num_segments
* Memory.get_segment_byte_offset -> became Data_segment.get_segment_byte_offset
* Memory.get_segment_passive -> became Data_segment.get_segment_passive
* Memory.get_segment_data -> became Data_segment.get_segment_data

NOTE: This needs the prs for v126, v127 & v128 merged first. This is blocked on libbinaryen v129 releasing

Author: spotandjake

binaryen.opam

@@ -16,6 +16,6 @@ depends: [
   "dune" {>= "3.0.0"}
   "dune-configurator" {>= "3.0.0"}
   "js_of_ocaml-compiler" {>= "6.0.0" < "7.0.0"}
-  "libbinaryen" {>= "128.0.0" < "129.0.0"}
+  "libbinaryen" {>= "129.0.0" < "130.0.0"}
 ]
 x-maintenance-intent: ["0.(latest)"]

esy.lock/index.json

@@ -20,7 +20,7 @@
   },
   "resolutions": {
     "@opam/ocp-indent": "1.9.0",
-    "@grain/libbinaryen": "git+https://github.com/grain-lang/libbinaryen.git#a51764b23fc63415cf19e375e6d6fcdb6f756d38"
+    "@grain/libbinaryen": "git+https://github.com/grain-lang/libbinaryen.git#f34739d7270408fc1069dbe6bb3c7068e07fef06"
   },
   "esy": {
     "build": "dune build -p binaryen"

esy.lock/opam/chrome-trace.3.22.0/opam esy.lock/opam/chrome-trace.3.22.1/opamesy.lock/opam/chrome-trace.3.22.0/opam renamed to esy.lock/opam/chrome-trace.3.22.1/opam

@@ -0,0 +1,81 @@
+#define CAML_NAME_SPACE
+#include <caml/mlvalues.h>
+#include <caml/fail.h>
+#include <caml/memory.h>
+#include <caml/alloc.h>
+
+#include "binaryen-c.h"
+#include "ocaml_helpers.h"
+
+
+CAMLprim value
+caml_binaryen_get_num_memory_segments(value _module) {
+  CAMLparam1(_module);
+  BinaryenModuleRef module = BinaryenModuleRef_val(_module);
+  CAMLreturn(Val_int(BinaryenGetNumMemorySegments(module)));
+}
+
+CAMLprim value caml_binaryen_get_data_segment(value _module, value _name) {
+  CAMLparam2(_module, _name);
+  BinaryenModuleRef module = BinaryenModuleRef_val(_module);
+  char* name = Safe_String_val(_name);
+  BinaryenDataSegmentRef segment = BinaryenGetDataSegment(module, name);
+  if (segment == NULL) {
+    CAMLreturn(Val_none);
+  } else {
+    CAMLreturn(caml_alloc_some(alloc_BinaryenDataSegmentRef(segment)));
+  }
+}
+
+CAMLprim value caml_binaryen_get_data_segment_by_index(value _module, value _index) {
+  CAMLparam2(_module, _index);
+  BinaryenModuleRef module = BinaryenModuleRef_val(_module);
+  int index = Int_val(_index);
+  BinaryenDataSegmentRef segment = BinaryenGetDataSegmentByIndex(module, index);
+  CAMLreturn(alloc_BinaryenDataSegmentRef(segment));
+}
+
+CAMLprim value caml_binaryen_data_segment_get_name(value _module, value _segment) {
+  CAMLparam2(_module, _segment);
+  BinaryenDataSegmentRef segment = BinaryenDataSegmentRef_val(_segment);
+  const char* name = BinaryenDataSegmentGetName(segment);
+  CAMLreturn(caml_copy_string(name));
+}
+
+CAMLprim value
+caml_binaryen_get_memory_segment_byte_offset(value _module, value _segment) {
+  CAMLparam2(_module, _segment);
+  BinaryenModuleRef module = BinaryenModuleRef_val(_module);
+  BinaryenDataSegmentRef segment = BinaryenDataSegmentRef_val(_segment);
+  if (BinaryenGetMemorySegmentPassive(segment)) {
+    CAMLreturn(Val_none);
+  } else {
+    int offset = BinaryenGetMemorySegmentByteOffset(module, segment);
+    CAMLreturn(caml_alloc_some(Val_int(offset)));
+  }
+}
+
+CAMLprim value
+caml_binaryen_get_memory_segment_byte_length(value _segment) {
+  CAMLparam1(_segment);
+  BinaryenDataSegmentRef segment = BinaryenDataSegmentRef_val(_segment);
+  int length = BinaryenGetMemorySegmentByteLength(segment);
+  CAMLreturn(Val_int(length));
+}
+
+CAMLprim value
+caml_binaryen_get_memory_segment_passive(value _segment) {
+  CAMLparam1(_segment);
+  BinaryenDataSegmentRef segment = BinaryenDataSegmentRef_val(_segment);
+  CAMLreturn(Val_bool(BinaryenGetMemorySegmentPassive(segment)));
+}
+
+CAMLprim value
+caml_binaryen_get_memory_segment_data(value _module, value _segment) {
+  CAMLparam2(_module, _segment);
+  BinaryenDataSegmentRef segment = BinaryenDataSegmentRef_val(_segment);
+  size_t size = BinaryenGetMemorySegmentByteLength(segment);
+  CAMLprim value bytes = caml_alloc_string(size);
+  BinaryenCopyMemorySegmentData(segment, (char*)Bytes_val(bytes));
+  CAMLreturn(bytes);
+}

esy.lock/opam/dune-build-info.3.22.0/opam esy.lock/opam/dune-build-info.3.22.1/opamesy.lock/opam/dune-build-info.3.22.0/opam renamed to esy.lock/opam/dune-build-info.3.22.1/opam

@@ -0,0 +1,49 @@
+
+//Provides: caml_binaryen_get_num_memory_segments
+function caml_binaryen_get_num_memory_segments(wasm_mod) {
+  return wasm_mod.getNumMemorySegments();
+}
+
+//Provides: caml_binaryen_get_data_segment
+//Requires: caml_jsstring_of_string, to_option
+function caml_binaryen_get_data_segment(wasm_mod, name) {
+  return to_option(wasm_mod.getDataSegment(caml_jsstring_of_string(name)));
+}
+
+//Provides: caml_binaryen_get_data_segment_by_index
+function caml_binaryen_get_data_segment_by_index(wasm_mod, index) {
+  return wasm_mod.getDataSegmentByIndex(index);
+}
+
+// Provides: caml_binaryen_data_segment_get_name
+// Requires: caml_string_of_jsstring
+function caml_binaryen_data_segment_get_name(wasm_mod, segment) {
+  var info = wasm_mod.getMemorySegmentInfo(segment);
+  return caml_string_of_jsstring(info.name);
+}
+
+//Provides: caml_binaryen_get_memory_segment_byte_offset
+//Requires: to_option
+function caml_binaryen_get_memory_segment_byte_offset(wasm_mod, segment) {
+  var info = wasm_mod.getMemorySegmentInfo(segment);
+  return to_option(info.offset);
+}
+
+//Provides: caml_binaryen_get_memory_segment_byte_length
+//Requires: Binaryen
+function caml_binaryen_get_memory_segment_byte_length(segment) {
+  return Binaryen._BinaryenGetMemorySegmentByteLength(segment);
+}
+
+//Provides: caml_binaryen_get_memory_segment_passive
+//Requires: Binaryen
+function caml_binaryen_get_memory_segment_passive(segment) {
+  return Binaryen._BinaryenGetMemorySegmentPassive(segment);
+}
+
+//Provides: caml_binaryen_get_memory_segment_data
+//Requires: caml_bytes_of_array
+function caml_binaryen_get_memory_segment_data(wasm_mod, segment) {
+  var info = wasm_mod.getMemorySegmentInfo(segment);
+  return caml_bytes_of_array(info.data);
+}