assemblyscript-dice/assembly/index.ts

// import "allocator/tlsf";
// import "collector/itcm";
import "allocator/buddy";
// import "allocator/arena";

import {handler} from "./game_handler";

export function allocate(size: i32) :i32 {
  return memory.allocate(size);
}

export function deallocate(ptr: i32, size: i32): void {
  memory.free(ptr);
}

export function invoke(ptr: i32, size: i32): i32 {

    let bb: Uint8Array = new Uint8Array(size);

    for (let i = 0; i < size; i++) {
        bb[i] = load<u8>(ptr + i)
    }

    let result = handler(bb);

    let strLen: i32 = result.length;
    let addr = memory.allocate(strLen + 4);
    for (let i = 0; i < 4; i++) {
      let b: u8 = (strLen >> i * 8) as u8 & 0xFF;
      store<u8>(addr + i, b);
    }

    let strAddr = addr + 4;
    for (let i = 0; i < strLen; i++) {
        let b: u8 = result.charCodeAt(i) as u8;
      store<u8>(strAddr + i, b);
    }

    memory.free(changetype<usize>(result));
    memory.free(ptr);
    memory.free(changetype<usize>(bb));
    memory.free(changetype<usize>(bb.buffer));

    return addr;
}