wasp_vm

defmodule WaspVM.Decoder.MemorySectionParser do
  alias WaspVM.LEB128

  @moduledoc false

  def parse(section) do
    {count, entries} = LEB128.decode_unsigned(section)

    # Right now each module can have only 1 memory entry.
    # Might have to refactor this if a new version of Wasm
    # allows for multiple memory section entries
    entries =
      if count > 0 do
        <<flags, rest::binary>> = entries

        {initial, rest} = LEB128.decode_unsigned(rest)

        entry = %{initial: initial}

        if flags == 1 do
          {max, _rest} = LEB128.decode_unsigned(rest)

          Map.put(entry, :max, max)
        else
          entry
        end
      else
        []
      end

    {:memory, entries}
  end

end