Octachron / olivine

Ocaml binding generator for vulkan
40 stars 2 forks source link
ocaml vulkan

Olivine is a binding generator for Vulkan and OCaml. It generates OCaml code from the xml specification of the Vulkan API and a modest amount of a priori knowledge. The bindings themselves use the Ocaml Ctype library.

Olivine aims to generate thin but well-typed bindings.

Currently, the generated bindings covers all vulkan api except for the WSL extensions (i.e. the interface with the various windows systems) due to a lack of OCaml libraries covering the corresponding window systems.

Consequently, interaction with windows system is delegated to graphical interface libraries. Recent version of the SDL libary (≥ 2.06) and the tsdl bindings (≥0.9.6) comes with Vulkan suport.

Installation

If you want to experiment with the current generated bindings, you can try (this currently requires to disable opam sandboxing due to the donwloading of the vulkan spec)

  opam pin add olivine https://github.com/Octachron/olivine.git

Running examples

The examples can be run with either

make test-triangle

and

make test-tesseract

or by calling the executable by hand. Using make test-* enable the Lunarg standard validation layer for a more verbose log.

Generated binding naming conventions :

First, all names use a snake case convention from type names, enum names, function names etc. Second the vk prefix is not used in the generated binding. Instead, the binding provides a nested module hierarchy of modules starting with a top module called Vk. If possible redundant prefix and suffix are eliminated.

Module hierarchy

The current module hierarchy modules is

Vk
├———— Const for constants
│
├———— Types for type definitions
│       └ Each type definition defines its own module
│
├———— Core for functions
│
└———— $Extension_name for extensions
      └ Each extension is defined as an functor that takes as an argument
      an instance or device module depending on the scope of the extension

Type mapping

Each type definition is mapped to a module Vk.Types.Type_name which defines a main type t. All type definitions comes with a pretty-printer definition and a variety of helper functions.

Enums

C Enums are mapped either to

Vulkan enum names are prefixed with the type name, olivine removes these prefixes.

Handle

Handle are mapped to an abstract type

Bitset

Bitset are mapped to a olivine built-in through the Bitset.make functor. This type distinguish supports standard set operations and distinguish between singleton and non-singleton values through a phantom type parameter

Unions

Unions are mapped to a Ctype union type. A constructor is generated for each field of the union type

Records

Records are mapped to a Ctype record type. Moreover getter functions and a labelled make functions are generated for the convenience sake. Like for functions (see next section), olivine try to reconstruct higher level types from the types of record fields:

A array function (`t list -> t Ctypes.CArray) is also provided to ensure that the GC does not collect the values living on the C side too soon.

Function pointer

Ctypes view are generated for each function pointer typedef

Function binding

Function binding are generated in three different modes: raw, regular or native.

The raw mode maps directly to the C function. The regular mode regularizes the format of structure elements. The native mode maps low-level C types to higher level types:

In presence of optional argument, a last unit argument is added

As an illustration the vkCreateInstance function

VkResult
  vkCreateInstance(
    const VkCreateInstanceInfo*,
    const VkAllocationCallbacks*, VkInstance*
  )

is mapped to

val create_info:
Vk.Types.Instance_create_info.t ->
?allocator:Vk.Types.Allocation_callbacks.t Ctypes_static.ptr ->
unit ->
([ `Success ] * Vk.Types.Instance.t,
 [ `Error_extension_not_present
 | `Error_incompatible_driver
 | `Error_initialization_failed
 | `Error_layer_not_present
 | `Error_out_of_device_memory
 | `Error_out_of_host_memory ])
result