@typeberry/lib 0.2.0-b6667ce → 0.2.0-c3df163

package/index.d.ts

@@ -14196,6 +14196,82 @@ interface GasCounter {
   sub(g: Gas): boolean;
 }
 
+declare const NO_OF_REGISTERS$1 = 13;
+
+type RegisterIndex = Opaque<number, "register index">;
+
+declare class Registers {
+  private asSigned: BigInt64Array;
+  private asUnsigned: BigUint64Array;
+
+  constructor(private readonly bytes = safeAllocUint8Array(NO_OF_REGISTERS << REGISTER_SIZE_SHIFT)) {
+    check`${bytes.length === NO_OF_REGISTERS << REGISTER_SIZE_SHIFT} Invalid size of registers array.`;
+    this.asSigned = new BigInt64Array(bytes.buffer, bytes.byteOffset);
+    this.asUnsigned = new BigUint64Array(bytes.buffer, bytes.byteOffset);
+  }
+
+  static fromBytes(bytes: Uint8Array) {
+    check`${bytes.length === NO_OF_REGISTERS << REGISTER_SIZE_SHIFT} Invalid size of registers array.`;
+    return new Registers(bytes);
+  }
+
+  getBytesAsLittleEndian(index: number, len: number) {
+    const offset = index << REGISTER_SIZE_SHIFT;
+    return this.bytes.subarray(offset, offset + len);
+  }
+
+  getAllBytesAsLittleEndian() {
+    return this.bytes;
+  }
+
+  copyFrom(regs: Registers | BigUint64Array) {
+    const array = regs instanceof BigUint64Array ? regs : regs.asUnsigned;
+    this.asUnsigned.set(array);
+  }
+
+  reset() {
+    for (let i = 0; i < NO_OF_REGISTERS; i++) {
+      this.asUnsigned[i] = 0n;
+    }
+  }
+
+  getLowerU32(registerIndex: number) {
+    return Number(this.asUnsigned[registerIndex] & 0xff_ff_ff_ffn);
+  }
+
+  getLowerI32(registerIndex: number) {
+    return Number(this.getLowerU32(registerIndex)) >> 0;
+  }
+
+  setU32(registerIndex: number, value: number) {
+    this.asUnsigned[registerIndex] = signExtend32To64(value);
+  }
+
+  setI32(registerIndex: number, value: number) {
+    this.asSigned[registerIndex] = signExtend32To64(value);
+  }
+
+  getU64(registerIndex: number) {
+    return this.asUnsigned[registerIndex];
+  }
+
+  getI64(registerIndex: number) {
+    return this.asSigned[registerIndex];
+  }
+
+  setU64(registerIndex: number, value: bigint) {
+    this.asUnsigned[registerIndex] = value;
+  }
+
+  setI64(registerIndex: number, value: bigint) {
+    this.asSigned[registerIndex] = value;
+  }
+
+  getAllU64() {
+    return this.asUnsigned;
+  }
+}
+
 /**
  * Mask class is an implementation of skip function defined in GP.
  *
@@ -14365,82 +14441,6 @@ declare class ImmediateDecoder {
   }
 }
 
-declare const NO_OF_REGISTERS$1 = 13;
-
-type RegisterIndex = Opaque<number, "register index">;
-
-declare class Registers {
-  private asSigned: BigInt64Array;
-  private asUnsigned: BigUint64Array;
-
-  constructor(private readonly bytes = safeAllocUint8Array(NO_OF_REGISTERS << REGISTER_SIZE_SHIFT)) {
-    check`${bytes.length === NO_OF_REGISTERS << REGISTER_SIZE_SHIFT} Invalid size of registers array.`;
-    this.asSigned = new BigInt64Array(bytes.buffer, bytes.byteOffset);
-    this.asUnsigned = new BigUint64Array(bytes.buffer, bytes.byteOffset);
-  }
-
-  static fromBytes(bytes: Uint8Array) {
-    check`${bytes.length === NO_OF_REGISTERS << REGISTER_SIZE_SHIFT} Invalid size of registers array.`;
-    return new Registers(bytes);
-  }
-
-  getBytesAsLittleEndian(index: number, len: number) {
-    const offset = index << REGISTER_SIZE_SHIFT;
-    return this.bytes.subarray(offset, offset + len);
-  }
-
-  getAllBytesAsLittleEndian() {
-    return this.bytes;
-  }
-
-  copyFrom(regs: Registers | BigUint64Array) {
-    const array = regs instanceof BigUint64Array ? regs : regs.asUnsigned;
-    this.asUnsigned.set(array);
-  }
-
-  reset() {
-    for (let i = 0; i < NO_OF_REGISTERS; i++) {
-      this.asUnsigned[i] = 0n;
-    }
-  }
-
-  getLowerU32(registerIndex: number) {
-    return Number(this.asUnsigned[registerIndex] & 0xff_ff_ff_ffn);
-  }
-
-  getLowerI32(registerIndex: number) {
-    return Number(this.getLowerU32(registerIndex)) >> 0;
-  }
-
-  setU32(registerIndex: number, value: number) {
-    this.asUnsigned[registerIndex] = signExtend32To64(value);
-  }
-
-  setI32(registerIndex: number, value: number) {
-    this.asSigned[registerIndex] = signExtend32To64(value);
-  }
-
-  getU64(registerIndex: number) {
-    return this.asUnsigned[registerIndex];
-  }
-
-  getI64(registerIndex: number) {
-    return this.asSigned[registerIndex];
-  }
-
-  setU64(registerIndex: number, value: bigint) {
-    this.asUnsigned[registerIndex] = value;
-  }
-
-  setI64(registerIndex: number, value: bigint) {
-    this.asSigned[registerIndex] = value;
-  }
-
-  getAllU64() {
-    return this.asUnsigned;
-  }
-}
-
 declare class NibblesDecoder {
   private byte = new Int8Array(1);
 
@@ -17877,870 +17877,865 @@ declare namespace index$8 {
   export type { index$8_BigGas as BigGas, index$8_Gas as Gas, index$8_GasCounter as GasCounter, index$8_InterpreterOptions as InterpreterOptions, index$8_MemoryIndex as MemoryIndex, index$8_SbrkIndex as SbrkIndex, index$8_SmallGas as SmallGas };
 }
 
-/**
- * Program counter is a 64-bit unsigned integer that points to the next instruction
- *
- * https://graypaper.fluffylabs.dev/#/1c979cb/2e3f012e3f01?v=0.7.1
- */
-type ProgramCounter = Opaque<U64, "ProgramCounter[u64]">;
-/** Convert a number into ProgramCounter. */
-declare const tryAsProgramCounter = (v: number | bigint): ProgramCounter => asOpaqueType(tryAsU64(v));
+interface IHostCallMemory {
+  storeFrom(address: U64, bytes: Uint8Array): Result$2<OK, PageFault | OutOfBounds>;
+  loadInto(result: Uint8Array, startAddress: U64): Result$2<OK, PageFault | OutOfBounds>;
+}
 
-/** Running PVM instance identifier. */
-type MachineId = Opaque<U64, "MachineId[u64]">;
-/** Convert a number into PVM instance identifier. */
-declare const tryAsMachineId = (v: number | bigint): MachineId => asOpaqueType(tryAsU64(v));
+declare class HostCallMemory implements IHostCallMemory {
+  constructor(private readonly memory: Memory) {}
 
-declare class MachineInstance {
-  async run(gas: BigGas, registers: Registers): Promise<MachineResult> {
-    return {
-      result: {
-        status: Status.OK,
-      },
-      gas,
-      registers,
-    };
+  storeFrom(address: U64, bytes: Uint8Array): Result$2<OK, PageFault | OutOfBounds> {
+    if (bytes.length === 0) {
+      return Result.ok(OK);
+    }
+
+    if (address + tryAsU64(bytes.length) > MEMORY_SIZE) {
+      return Result.error(new OutOfBounds());
+    }
+
+    return this.memory.storeFrom(tryAsMemoryIndex(Number(address)), bytes);
   }
-}
 
-type MachineStatus =
-  | {
-      status: typeof Status.HOST;
-      hostCallIndex: U64;
+  loadInto(result: Uint8Array, startAddress: U64): Result$2<OK, PageFault | OutOfBounds> {
+    if (result.length === 0) {
+      return Result.ok(OK);
     }
-  | {
-      status: typeof Status.FAULT;
-      address: U64;
+
+    if (startAddress + tryAsU64(result.length) > MEMORY_SIZE) {
+      return Result.error(new OutOfBounds());
     }
-  | {
-      status: typeof Status.OK | typeof Status.HALT | typeof Status.PANIC | typeof Status.OOG;
-    };
 
-/** Data returned by a machine invocation. */
-type MachineResult = {
-  result: MachineStatus;
-  gas: BigGas;
-  registers: Registers;
-};
+    return this.memory.loadInto(result, tryAsMemoryIndex(Number(startAddress)));
+  }
+}
 
-/** Types of possbile operations to request by Pages host call. */
-declare enum MemoryOperation {
-  /** Zeroes memory and set access to unreadable. */
-  Void = 0,
-  /** Zeroes memory and set access to read-only. */
-  ZeroRead = 1,
-  /** Zeroes memory and set access to read-write. */
-  ZeroWrite = 2,
-  /** Preserve memory and set access to read-only. */
-  Read = 3,
-  /** Preserve memory and set access to read-write. */
-  Write = 4,
+interface IHostCallRegisters {
+  get(registerIndex: number): U64;
+  set(registerIndex: number, value: U64): void;
 }
 
-/** Convert a number into MemoryOperation or null (if invalid). */
-declare const toMemoryOperation = (v: number | bigint): MemoryOperation | null =>
-  v <= MemoryOperation.Write && v >= MemoryOperation.Void ? Number(v) : null;
+declare class HostCallRegisters implements IHostCallRegisters {
+  constructor(private readonly registers: Registers) {}
 
-/** An error that may occur during `peek` or `poke` host call. */
-declare enum PeekPokeError {
-  /** Source page fault. */
-  SourcePageFault = 0,
-  /** Destination page fault. */
-  DestinationPageFault = 1,
-  /** No machine under given machine index. */
-  NoMachine = 2,
-}
+  get(registerIndex: number): U64 {
+    return tryAsU64(this.registers.getU64(registerIndex));
+  }
 
-declare enum ZeroVoidError {
-  /** No machine under given machine index. */
-  NoMachine = 0,
-  /** Attempting to void or zero non-accessible page. */
-  InvalidPage = 1,
+  set(registerIndex: number, value: U64) {
+    this.registers.setU64(registerIndex, value);
+  }
 }
 
-declare enum PagesError {
-  /** No machine under given machine index. */
-  NoMachine = 0,
-  /** Invalid memory operation. */
-  InvalidOperation = 1,
-  /** Attempting to change non-accessible page or trying to preserve value of voided page. */
-  InvalidPage = 2,
-}
-
-/** Error machine is not found. */
-declare const NoMachineError = Symbol("Machine index not found.");
-type NoMachineError = typeof NoMachineError;
-
-/** Too many segments already exported. */
-declare const SegmentExportError = Symbol("Too many segments already exported.");
-type SegmentExportError = typeof SegmentExportError;
-
-/** Host functions external invocations available during refine phase. */
-interface RefineExternalities {
-  /** Forget a previously started nested VM. */
-  machineExpunge(machineIndex: MachineId): Promise<Result$2<ProgramCounter, NoMachineError>>;
+/** Strictly-typed host call index. */
+type HostCallIndex = Opaque<U32, "HostCallIndex[U32]">;
+/** Attempt to convert a number into `HostCallIndex`. */
+declare const tryAsHostCallIndex = (v: number): HostCallIndex => asOpaqueType(tryAsU32(v));
 
-  /** Set given range of pages as non-accessible and re-initialize them with zeros. */
-  machineVoidPages(machineIndex: MachineId, pageStart: U64, pageCount: U64): Promise<Result$2<OK, ZeroVoidError>>;
+/**
+ * Host-call exit reason.
+ *
+ * https://graypaper.fluffylabs.dev/#/ab2cdbd/24a30124a501?v=0.7.2
+ */
+declare enum PvmExecution {
+  Halt = 0,
+  Panic = 1,
+  OOG = 2, // out-of-gas
+}
 
-  /** Set given range of pages as writeable and initialize them with zeros. */
-  machineZeroPages(machineIndex: MachineId, pageStart: U64, pageCount: U64): Promise<Result$2<OK, ZeroVoidError>>;
+/** A utility function to easily trace a bunch of registers. */
+declare function traceRegisters(...regs: number[]) {
+  return regs.map(tryAsRegisterIndex);
+}
 
-  /** Copy a fragment of memory from `machineIndex` into given destination memory. */
-  machinePeekFrom(
-    machineIndex: MachineId,
-    destinationStart: U64,
-    sourceStart: U64,
-    length: U64,
-    destination: Memory,
-  ): Promise<Result$2<OK, PeekPokeError>>;
+/** An interface for a host call implementation */
+interface HostCallHandler {
+  /** Index of that host call (i.e. what PVM invokes via `ecalli`) */
+  readonly index: HostCallIndex;
 
-  /** Write a fragment of memory into `machineIndex` from given source memory. */
-  machinePokeInto(
-    machineIndex: MachineId,
-    sourceStart: U64,
-    destinationStart: U64,
-    length: U64,
-    source: Memory,
-  ): Promise<Result$2<OK, PeekPokeError>>;
+  /**
+   * The gas cost of invocation of that host call.
+   *
+   * NOTE: `((reg: IHostCallRegisters) => Gas)` function is for compatibility reasons: pre GP 0.7.2
+   */
+  readonly basicGasCost: SmallGas | ((reg: IHostCallRegisters) => Gas);
 
-  /** Start an inner PVM instance with given entry point and starting code. */
-  machineInit(code: BytesBlob, programCounter: ProgramCounter): Promise<Result$2<MachineId, ProgramDecoderError>>;
+  /** Currently executing service id. */
+  readonly currentServiceId: U32;
 
-  /** Run a previously initialized PVM instance with given gas and registers. */
-  machineInvoke(
-    machineIndex: MachineId,
-    gas: BigGas,
-    registers: Registers,
-  ): Promise<Result$2<MachineResult, NoMachineError>>;
+  /** Input&Output registers that we should add to tracing log. */
+  readonly tracedRegisters: RegisterIndex[];
 
   /**
-   * Export segment for future retrieval.
+   * Actually execute the host call.
    *
-   * Returns the index assigned to that segment or an error if there is too many already exported.
+   * NOTE the call is ALLOWED and expected to modify registers and memory.
    */
-  exportSegment(segment: Segment): Result$2<SegmentIndex, SegmentExportError>;
-
-  /** Lookup a historical preimage. */
-  historicalLookup(serviceId: ServiceId | null, hash: Blake2bHash): Promise<BytesBlob | null>;
-
-  /** Change access to and/or zero the value of memory. */
-  machinePages(
-    machineIndex: MachineId,
-    pageStart: U64,
-    pageCount: U64,
-    requestType: MemoryOperation | null,
-  ): Promise<Result$2<OK, PagesError>>;
+  execute(gas: GasCounter, regs: IHostCallRegisters, memory: IHostCallMemory): Promise<undefined | PvmExecution>;
 }
 
-declare const InsufficientFundsError = "insufficient funds";
-type InsufficientFundsError = typeof InsufficientFundsError;
-
-/** Update of the state entries coming from accumulation of a single service. */
-type ServiceStateUpdate = Partial<Pick<State, "privilegedServices" | "authQueues" | "designatedValidatorData">> &
-  ServicesUpdate;
+/** Container for all available host calls. */
+declare class HostCallsManager {
+  private readonly hostCalls = new Map<HostCallIndex, HostCallHandler>();
+  private readonly missing;
 
-/**
- * State updates that currently accumulating service produced.
- *
- * `x_u`: https://graypaper.fluffylabs.dev/#/9a08063/2f31012f3101?v=0.6.6
- */
-declare class AccumulationStateUpdate {
-  /** Updated authorization queues for cores. */
-  public readonly authorizationQueues: Map<CoreIndex, FixedSizeArray<AuthorizerHash, AUTHORIZATION_QUEUE_SIZE>> =
-    new Map();
-  /** New validators data. */
-  public validatorsData: PerValidator<ValidatorData> | null = null;
-  /** Updated priviliged services. */
-  public privilegedServices: PrivilegedServices | null = null;
+  constructor({
+    missing,
+    handlers = [],
+  }: {
+    missing: HostCallHandler;
+    handlers?: HostCallHandler[];
+  }) {
+    this.missing = missing;
 
-  private constructor(
-    /** Services state updates. */
-    public readonly services: ServicesUpdate,
-    /** Pending transfers. */
-    public transfers: PendingTransfer[],
-    /** Yielded accumulation root. */
-    public readonly yieldedRoots: Map<ServiceId, OpaqueHash> = new Map(),
-  ) {}
+    for (const handler of handlers) {
+      check`${this.hostCalls.get(handler.index) === undefined} Overwriting host call handler at index ${handler.index}`;
+      this.hostCalls.set(handler.index, handler);
+    }
+  }
 
-  /** Create new empty state update. */
-  static empty(): AccumulationStateUpdate {
-    return new AccumulationStateUpdate(
-      {
-        servicesUpdates: [],
-        servicesRemoved: [],
-        preimages: [],
-        storage: [],
-      },
-      [],
-    );
+  /** Get a host call by index. */
+  get(hostCallIndex: HostCallIndex): HostCallHandler {
+    return this.hostCalls.get(hostCallIndex) ?? this.missing;
   }
 
-  /** Create a state update with some existing, yet uncommited services updates. */
-  static new(update: ServicesUpdate): AccumulationStateUpdate {
-    return new AccumulationStateUpdate(
-      {
-        ...update,
-      },
-      [],
-    );
+  traceHostCall(
+    context: string,
+    hostCallIndex: HostCallIndex,
+    hostCallHandler: HostCallHandler,
+    registers: IHostCallRegisters,
+    gas: Gas,
+  ) {
+    const { currentServiceId } = hostCallHandler;
+    const requested = hostCallIndex !== hostCallHandler.index ? ` (${hostCallIndex})` : "";
+    const name = `${hostCallHandler.constructor.name}:${hostCallHandler.index}`;
+    const registerValues = hostCallHandler.tracedRegisters
+      .map((idx) => [idx.toString().padStart(2, "0"), registers.get(idx)] as const)
+      .filter((v) => v[1] !== 0n)
+      .map(([idx, value]) => {
+        return `r${idx}=${value} (0x${value.toString(16)})`;
+      })
+      .join(", ");
+    logger.insane`[${currentServiceId}] ${context} ${name}${requested}.  Gas: ${gas}. Regs: ${registerValues}.`;
   }
+}
 
-  /** Create a copy of another `StateUpdate`. Used by checkpoints. */
-  static copyFrom(from: AccumulationStateUpdate): AccumulationStateUpdate {
-    const serviceUpdates: ServicesUpdate = {
-      servicesUpdates: [...from.services.servicesUpdates],
-      servicesRemoved: [...from.services.servicesRemoved],
-      preimages: [...from.services.preimages],
-      storage: [...from.services.storage],
-    };
-    const transfers = [...from.transfers];
-    const update = new AccumulationStateUpdate(serviceUpdates, transfers, new Map(from.yieldedRoots));
+type ResolveFn = (pvm: Interpreter) => void;
 
-    // update entries
-    for (const [k, v] of from.authorizationQueues) {
-      update.authorizationQueues.set(k, v);
-    }
+declare class InterpreterInstanceManager {
+  private instances: Interpreter[] = [];
+  private waitingQueue: ResolveFn[] = [];
 
-    if (from.validatorsData !== null) {
-      update.validatorsData = asKnownSize([...from.validatorsData]);
+  constructor(noOfPvmInstances: number) {
+    for (let i = 0; i < noOfPvmInstances; i++) {
+      this.instances.push(
+        new Interpreter({
+          useSbrkGas: false,
+        }),
+      );
     }
+  }
 
-    if (from.privilegedServices !== null) {
-      update.privilegedServices = PrivilegedServices.create({
-        ...from.privilegedServices,
-        assigners: asKnownSize([...from.privilegedServices.assigners]),
-      });
+  async getInstance(): Promise<Interpreter> {
+    const instance = this.instances.pop();
+    if (instance !== undefined) {
+      return Promise.resolve(instance);
     }
-    return update;
+    return new Promise((resolve) => {
+      this.waitingQueue.push(resolve);
+    });
   }
 
-  /** Retrieve and clear pending transfers. */
-  takeTransfers() {
-    const transfers = this.transfers;
-    this.transfers = [];
-    return transfers;
+  releaseInstance(pvm: Interpreter) {
+    const waiting = this.waitingQueue.shift();
+    if (waiting !== undefined) {
+      return waiting(pvm);
+    }
+    this.instances.push(pvm);
   }
 }
 
-type StateSlice = Pick<State, "getService" | "privilegedServices">;
-
-declare class PartiallyUpdatedState<T extends StateSlice = StateSlice> {
-  /** A collection of state updates. */
-  public readonly stateUpdate;
-
-  constructor(
-    /** Original (unmodified state). */
-    public readonly state: T,
-    stateUpdate?: AccumulationStateUpdate,
+declare class ReturnValue {
+  private constructor(
+    public consumedGas: Gas,
+    public status: Status | null,
+    public memorySlice: Uint8Array | null,
   ) {
-    this.stateUpdate =
-      stateUpdate === undefined ? AccumulationStateUpdate.empty() : AccumulationStateUpdate.copyFrom(stateUpdate);
+    check`
+      ${(status === null && memorySlice !== null) || (status !== null && memorySlice === null)}
+      'status' and 'memorySlice' must not both be null or both be non-null — exactly one must be provided
+    `;
   }
 
-  /**
-   * Retrieve info of service with given id.
-   *
-   * NOTE the info may be updated compared to what is in the state.
-   *
-   * Takes into account ejected and newly created services as well.
-   */
-  getServiceInfo(destination: ServiceId | null): ServiceAccountInfo | null {
-    if (destination === null) {
-      return null;
-    }
-
-    const maybeNewService = this.stateUpdate.services.servicesUpdates.find(
-      (update) => update.serviceId === destination,
-    );
-
-    if (maybeNewService !== undefined) {
-      return maybeNewService.action.account;
-    }
-
-    const maybeService = this.state.getService(destination);
-    if (maybeService === null) {
-      return null;
-    }
+  static fromStatus(consumedGas: Gas, status: Status) {
+    return new ReturnValue(consumedGas, status, null);
+  }
 
-    return maybeService.getInfo();
+  static fromMemorySlice(consumedGas: Gas, memorySlice: Uint8Array) {
+    return new ReturnValue(consumedGas, null, memorySlice);
   }
 
-  getStorage(serviceId: ServiceId, rawKey: StorageKey): BytesBlob | null {
-    const item = this.stateUpdate.services.storage.find((x) => x.serviceId === serviceId && x.key.isEqualTo(rawKey));
-    if (item !== undefined) {
-      return item.value;
-    }
+  hasMemorySlice(): this is this & { status: null; memorySlice: Uint8Array } {
+    return this.memorySlice instanceof Uint8Array && this.status === null;
+  }
 
-    const service = this.state.getService(serviceId);
-    return service?.getStorage(rawKey) ?? null;
+  hasStatus(): this is this & { status: Status; memorySlice: null } {
+    return !this.hasMemorySlice();
   }
+}
+declare class HostCalls {
+  constructor(
+    private pvmInstanceManager: InterpreterInstanceManager,
+    private hostCalls: HostCallsManager,
+  ) {}
 
-  /**
-   * Returns `true` if the preimage is already provided either in current
-   * accumulation scope or earlier.
-   *
-   * NOTE: Does not check if the preimage is available, we just check
-   * the existence in `preimages` map.
-   */
-  hasPreimage(serviceId: ServiceId, hash: PreimageHash): boolean {
-    const providedPreimage = this.stateUpdate.services.preimages.find(
-      // we ignore the action here, since if there is <any> update on that
-      // hash it means it has to exist, right?
-      (p) => p.serviceId === serviceId && p.hash.isEqualTo(hash),
-    );
-    if (providedPreimage !== undefined) {
-      return true;
+  private getReturnValue(status: Status, pvmInstance: Interpreter): ReturnValue {
+    const gasConsumed = pvmInstance.getGasConsumed();
+    if (status === Status.OOG) {
+      return ReturnValue.fromStatus(gasConsumed, status);
     }
 
-    // fallback to state preimages
-    const service = this.state.getService(serviceId);
-    if (service === undefined) {
-      return false;
-    }
+    if (status === Status.HALT) {
+      const memory = pvmInstance.getMemory();
+      const regs = pvmInstance.getRegisters();
+      const maybeAddress = regs.getLowerU32(7);
+      const maybeLength = regs.getLowerU32(8);
 
-    return service?.hasPreimage(hash) ?? false;
-  }
+      const result = safeAllocUint8Array(maybeLength);
+      const startAddress = tryAsMemoryIndex(maybeAddress);
+      const loadResult = memory.loadInto(result, startAddress);
 
-  getPreimage(serviceId: ServiceId, hash: PreimageHash): BytesBlob | null {
-    // TODO [ToDr] Should we verify availability here?
-    const freshlyProvided = this.stateUpdate.services.preimages.find(
-      (x) => x.serviceId === serviceId && x.hash.isEqualTo(hash),
-    );
-    if (freshlyProvided !== undefined && freshlyProvided.action.kind === UpdatePreimageKind.Provide) {
-      return freshlyProvided.action.preimage.blob;
+      if (loadResult.isError) {
+        return ReturnValue.fromMemorySlice(gasConsumed, new Uint8Array());
+      }
+
+      return ReturnValue.fromMemorySlice(gasConsumed, result);
     }
 
-    const service = this.state.getService(serviceId);
-    return service?.getPreimage(hash) ?? null;
+    return ReturnValue.fromStatus(gasConsumed, Status.PANIC);
   }
 
-  /** Get status of a preimage of current service taking into account any updates. */
-  getLookupHistory(
-    currentTimeslot: TimeSlot,
-    serviceId: ServiceId,
-    hash: PreimageHash,
-    length: U64,
-  ): LookupHistoryItem | null {
-    // TODO [ToDr] This is most likely wrong. We may have `provide` and `remove` within
-    // the same state update. We should however switch to proper "updated state"
-    // representation soon.
-    const updatedPreimage = this.stateUpdate.services.preimages.findLast(
-      (update) => update.serviceId === serviceId && update.hash.isEqualTo(hash) && BigInt(update.length) === length,
-    );
-
-    const stateFallback = () => {
-      // fallback to state lookup
-      const service = this.state.getService(serviceId);
-      const lenU32 = preimageLenAsU32(length);
-      if (lenU32 === null || service === null) {
-        return null;
+  private async execute(pvmInstance: Interpreter) {
+    pvmInstance.runProgram();
+    for (;;) {
+      let status = pvmInstance.getStatus();
+      if (status !== Status.HOST) {
+        return this.getReturnValue(status, pvmInstance);
       }
+      check`
+        ${pvmInstance.getExitParam() !== null}
+        "We know that the exit param is not null, because the status is 'Status.HOST'
+      `;
+      const hostCallIndex = pvmInstance.getExitParam() ?? -1;
+      const gas = pvmInstance.getGasCounter();
+      const regs = new HostCallRegisters(pvmInstance.getRegisters());
+      const memory = new HostCallMemory(pvmInstance.getMemory());
+      const index = tryAsHostCallIndex(hostCallIndex);
 
-      const slots = service.getLookupHistory(hash, lenU32);
-      return slots === null ? null : new LookupHistoryItem(hash, lenU32, slots);
-    };
+      const hostCall = this.hostCalls.get(index);
+      const gasBefore = gas.get();
+      // NOTE: `basicGasCost(regs)` function is for compatibility reasons: pre GP 0.7.2
+      const basicGasCost =
+        typeof hostCall.basicGasCost === "number" ? hostCall.basicGasCost : hostCall.basicGasCost(regs);
+      const underflow = gas.sub(basicGasCost);
 
-    if (updatedPreimage === undefined) {
-      return stateFallback();
-    }
+      const pcLog = `[PC: ${pvmInstance.getPC()}]`;
+      if (underflow) {
+        this.hostCalls.traceHostCall(`${pcLog} OOG`, index, hostCall, regs, gas.get());
+        return ReturnValue.fromStatus(pvmInstance.getGasConsumed(), Status.OOG);
+      }
+      this.hostCalls.traceHostCall(`${pcLog} Invoking`, index, hostCall, regs, gasBefore);
+      const result = await hostCall.execute(gas, regs, memory);
+      this.hostCalls.traceHostCall(
+        result === undefined ? `${pcLog} Result` : `${pcLog} Status(${PvmExecution[result]})`,
+        index,
+        hostCall,
+        regs,
+        gas.get(),
+      );
 
-    const { action } = updatedPreimage;
-    switch (action.kind) {
-      case UpdatePreimageKind.Provide: {
-        // casting to U32 is safe, since we compare with object we have in memory.
-        return new LookupHistoryItem(hash, updatedPreimage.length, tryAsLookupHistorySlots([currentTimeslot]));
+      if (result === PvmExecution.Halt) {
+        status = Status.HALT;
+        return this.getReturnValue(status, pvmInstance);
       }
-      case UpdatePreimageKind.Remove: {
-        const state = stateFallback();
-        // kinda impossible, since we know it's there because it's removed.
-        if (state === null) {
-          return null;
-        }
 
-        return new LookupHistoryItem(hash, state.length, tryAsLookupHistorySlots([...state.slots, currentTimeslot]));
+      if (result === PvmExecution.Panic) {
+        status = Status.PANIC;
+        return this.getReturnValue(status, pvmInstance);
       }
-      case UpdatePreimageKind.UpdateOrAdd: {
-        return action.item;
+
+      if (result === PvmExecution.OOG) {
+        status = Status.OOG;
+        return this.getReturnValue(status, pvmInstance);
+      }
+
+      if (result === undefined) {
+        pvmInstance.runProgram();
+        status = pvmInstance.getStatus();
+        continue;
       }
+
+      assertNever(result);
     }
+  }
 
-    assertNever(action);
+  async runProgram(
+    rawProgram: Uint8Array,
+    initialPc: number,
+    initialGas: Gas,
+    maybeRegisters?: Registers,
+    maybeMemory?: Memory,
+  ): Promise<ReturnValue> {
+    const pvmInstance = await this.pvmInstanceManager.getInstance();
+    pvmInstance.reset(rawProgram, initialPc, initialGas, maybeRegisters, maybeMemory);
+    try {
+      return await this.execute(pvmInstance);
+    } finally {
+      this.pvmInstanceManager.releaseInstance(pvmInstance);
+    }
   }
+}
 
-  /* State update functions. */
+type index$7_HostCallHandler = HostCallHandler;
+type index$7_HostCallMemory = HostCallMemory;
+declare const index$7_HostCallMemory: typeof HostCallMemory;
+type index$7_HostCallRegisters = HostCallRegisters;
+declare const index$7_HostCallRegisters: typeof HostCallRegisters;
+type index$7_IHostCallMemory = IHostCallMemory;
+type index$7_IHostCallRegisters = IHostCallRegisters;
+type index$7_PvmExecution = PvmExecution;
+declare const index$7_PvmExecution: typeof PvmExecution;
+declare const index$7_traceRegisters: typeof traceRegisters;
+declare const index$7_tryAsHostCallIndex: typeof tryAsHostCallIndex;
+declare namespace index$7 {
+  export { index$7_HostCallMemory as HostCallMemory, index$7_HostCallRegisters as HostCallRegisters, HostCallsManager as HostCalls, index$7_PvmExecution as PvmExecution, HostCalls as PvmHostCallExtension, InterpreterInstanceManager as PvmInstanceManager, index$7_traceRegisters as traceRegisters, index$7_tryAsHostCallIndex as tryAsHostCallIndex };
+  export type { index$7_HostCallHandler as HostCallHandler, index$7_IHostCallMemory as IHostCallMemory, index$7_IHostCallRegisters as IHostCallRegisters };
+}
 
-  updateStorage(serviceId: ServiceId, key: StorageKey, value: BytesBlob | null) {
-    const update =
-      value === null
-        ? UpdateStorage.remove({ serviceId, key })
-        : UpdateStorage.set({
-            serviceId,
-            storage: StorageItem.create({ key, value }),
-          });
+/**
+ * Program counter is a 64-bit unsigned integer that points to the next instruction
+ *
+ * https://graypaper.fluffylabs.dev/#/1c979cb/2e3f012e3f01?v=0.7.1
+ */
+type ProgramCounter = Opaque<U64, "ProgramCounter[u64]">;
+/** Convert a number into ProgramCounter. */
+declare const tryAsProgramCounter = (v: number | bigint): ProgramCounter => asOpaqueType(tryAsU64(v));
 
-    const index = this.stateUpdate.services.storage.findIndex(
-      (x) => x.serviceId === update.serviceId && x.key.isEqualTo(key),
-    );
-    const count = index === -1 ? 0 : 1;
-    this.stateUpdate.services.storage.splice(index, count, update);
+/** Running PVM instance identifier. */
+type MachineId = Opaque<U64, "MachineId[u64]">;
+/** Convert a number into PVM instance identifier. */
+declare const tryAsMachineId = (v: number | bigint): MachineId => asOpaqueType(tryAsU64(v));
+
+declare class MachineInstance {
+  async run(gas: BigGas, registers: Registers): Promise<MachineResult> {
+    return {
+      result: {
+        status: Status.OK,
+      },
+      gas,
+      registers,
+    };
   }
+}
 
-  /**
-   * Update a preimage.
-   *
-   * Note we store all previous entries as well, since there might be a sequence of:
-   * `provide` -> `remove` and both should update the end state somehow.
-   */
-  updatePreimage(newUpdate: UpdatePreimage) {
-    this.stateUpdate.services.preimages.push(newUpdate);
-  }
+type MachineStatus =
+  | {
+      status: typeof Status.HOST;
+      hostCallIndex: U64;
+    }
+  | {
+      status: typeof Status.FAULT;
+      address: U64;
+    }
+  | {
+      status: typeof Status.OK | typeof Status.HALT | typeof Status.PANIC | typeof Status.OOG;
+    };
 
-  updateServiceStorageUtilisation(
-    serviceId: ServiceId,
-    items: number,
-    bytes: bigint,
-    serviceInfo: ServiceAccountInfo,
-  ): Result$2<OK, InsufficientFundsError> {
-    check`${items >= 0} storageUtilisationCount has to be a positive number, got: ${items}`;
-    check`${bytes >= 0} storageUtilisationBytes has to be a positive number, got: ${bytes}`;
+/** Data returned by a machine invocation. */
+type MachineResult = {
+  result: MachineStatus;
+  gas: BigGas;
+  registers: Registers;
+};
 
-    const overflowItems = !isU32(items);
-    const overflowBytes = !isU64(bytes);
+/** Types of possbile operations to request by Pages host call. */
+declare enum MemoryOperation {
+  /** Zeroes memory and set access to unreadable. */
+  Void = 0,
+  /** Zeroes memory and set access to read-only. */
+  ZeroRead = 1,
+  /** Zeroes memory and set access to read-write. */
+  ZeroWrite = 2,
+  /** Preserve memory and set access to read-only. */
+  Read = 3,
+  /** Preserve memory and set access to read-write. */
+  Write = 4,
+}
 
-    // TODO [ToDr] this is not specified in GP, but it seems sensible.
-    if (overflowItems || overflowBytes) {
-      return Result.error(InsufficientFundsError);
-    }
+/** Convert a number into MemoryOperation or null (if invalid). */
+declare const toMemoryOperation = (v: number | bigint): MemoryOperation | null =>
+  v <= MemoryOperation.Write && v >= MemoryOperation.Void ? Number(v) : null;
 
-    const thresholdBalance = ServiceAccountInfo.calculateThresholdBalance(items, bytes, serviceInfo.gratisStorage);
-    if (serviceInfo.balance < thresholdBalance) {
-      return Result.error(InsufficientFundsError);
-    }
+/** An error that may occur during `peek` or `poke` host call. */
+declare enum PeekPokeError {
+  /** Source page fault. */
+  SourcePageFault = 0,
+  /** Destination page fault. */
+  DestinationPageFault = 1,
+  /** No machine under given machine index. */
+  NoMachine = 2,
+}
 
-    // Update service info with new details.
-    this.updateServiceInfo(
-      serviceId,
-      ServiceAccountInfo.create({
-        ...serviceInfo,
-        storageUtilisationBytes: bytes,
-        storageUtilisationCount: items,
-      }),
-    );
-    return Result.ok(OK);
-  }
+declare enum ZeroVoidError {
+  /** No machine under given machine index. */
+  NoMachine = 0,
+  /** Attempting to void or zero non-accessible page. */
+  InvalidPage = 1,
+}
 
-  updateServiceInfo(serviceId: ServiceId, newInfo: ServiceAccountInfo) {
-    const idx = this.stateUpdate.services.servicesUpdates.findIndex((x) => x.serviceId === serviceId);
-    const toRemove = idx === -1 ? 0 : 1;
-    const existingItem = this.stateUpdate.services.servicesUpdates[idx];
+declare enum PagesError {
+  /** No machine under given machine index. */
+  NoMachine = 0,
+  /** Invalid memory operation. */
+  InvalidOperation = 1,
+  /** Attempting to change non-accessible page or trying to preserve value of voided page. */
+  InvalidPage = 2,
+}
 
-    if (existingItem?.action.kind === UpdateServiceKind.Create) {
-      this.stateUpdate.services.servicesUpdates.splice(
-        idx,
-        toRemove,
-        UpdateService.create({
-          serviceId,
-          serviceInfo: newInfo,
-          lookupHistory: existingItem.action.lookupHistory,
-        }),
-      );
+/** Error machine is not found. */
+declare const NoMachineError = Symbol("Machine index not found.");
+type NoMachineError = typeof NoMachineError;
 
-      return;
-    }
+/** Too many segments already exported. */
+declare const SegmentExportError = Symbol("Too many segments already exported.");
+type SegmentExportError = typeof SegmentExportError;
 
-    this.stateUpdate.services.servicesUpdates.splice(
-      idx,
-      toRemove,
-      UpdateService.update({
-        serviceId,
-        serviceInfo: newInfo,
-      }),
-    );
-  }
+/** Host functions external invocations available during refine phase. */
+interface RefineExternalities {
+  /** Forget a previously started nested VM. */
+  machineExpunge(machineIndex: MachineId): Promise<Result$2<ProgramCounter, NoMachineError>>;
 
-  getPrivilegedServices() {
-    if (this.stateUpdate.privilegedServices !== null) {
-      return this.stateUpdate.privilegedServices;
-    }
+  /** Set given range of pages as non-accessible and re-initialize them with zeros. */
+  machineVoidPages(machineIndex: MachineId, pageStart: U64, pageCount: U64): Promise<Result$2<OK, ZeroVoidError>>;
 
-    return this.state.privilegedServices;
-  }
-}
+  /** Set given range of pages as writeable and initialize them with zeros. */
+  machineZeroPages(machineIndex: MachineId, pageStart: U64, pageCount: U64): Promise<Result$2<OK, ZeroVoidError>>;
 
-declare function preimageLenAsU32(length: U64) {
-  // Safe to convert to Number and U32: we check that len < 2^32 before conversion
-  return length >= 2n ** 32n ? null : tryAsU32(Number(length));
+  /** Copy a fragment of memory from `machineIndex` into given destination memory. */
+  machinePeekFrom(
+    machineIndex: MachineId,
+    destinationStart: U64,
+    sourceStart: U64,
+    length: U64,
+    destination: IHostCallMemory,
+  ): Promise<Result$2<OK, PeekPokeError>>;
+
+  /** Write a fragment of memory into `machineIndex` from given source memory. */
+  machinePokeInto(
+    machineIndex: MachineId,
+    sourceStart: U64,
+    destinationStart: U64,
+    length: U64,
+    source: IHostCallMemory,
+  ): Promise<Result$2<OK, PeekPokeError>>;
+
+  /** Start an inner PVM instance with given entry point and starting code. */
+  machineInit(code: BytesBlob, programCounter: ProgramCounter): Promise<Result$2<MachineId, ProgramDecoderError>>;
+
+  /** Run a previously initialized PVM instance with given gas and registers. */
+  machineInvoke(
+    machineIndex: MachineId,
+    gas: BigGas,
+    registers: Registers,
+  ): Promise<Result$2<MachineResult, NoMachineError>>;
+
+  /**
+   * Export segment for future retrieval.
+   *
+   * Returns the index assigned to that segment or an error if there is too many already exported.
+   */
+  exportSegment(segment: Segment): Result$2<SegmentIndex, SegmentExportError>;
+
+  /** Lookup a historical preimage. */
+  historicalLookup(serviceId: ServiceId | null, hash: Blake2bHash): Promise<BytesBlob | null>;
+
+  /** Change access to and/or zero the value of memory. */
+  machinePages(
+    machineIndex: MachineId,
+    pageStart: U64,
+    pageCount: U64,
+    requestType: MemoryOperation | null,
+  ): Promise<Result$2<OK, PagesError>>;
 }
 
+declare const InsufficientFundsError = "insufficient funds";
+type InsufficientFundsError = typeof InsufficientFundsError;
+
+/** Update of the state entries coming from accumulation of a single service. */
+type ServiceStateUpdate = Partial<Pick<State, "privilegedServices" | "authQueues" | "designatedValidatorData">> &
+  ServicesUpdate;
+
 /**
- * Host call result constants.
+ * State updates that currently accumulating service produced.
  *
- * https://graypaper.fluffylabs.dev/#/85129da/2c7c022c7c02?v=0.6.3
+ * `x_u`: https://graypaper.fluffylabs.dev/#/9a08063/2f31012f3101?v=0.6.6
  */
-declare const HostCallResult = {
-  /** The return value indicating an item does not exist. */
-  NONE: tryAsU64(0xffff_ffff_ffff_ffffn), // 2**64 - 1
-  /** Name unknown. */
-  WHAT: tryAsU64(0xffff_ffff_ffff_fffen), // 2**64 - 2
-  /** The inner PVM memory index provided for reading/writing is not accessible. */
-  OOB: tryAsU64(0xffff_ffff_ffff_fffdn), // 2**64 - 3
-  /** Index unknown. */
-  WHO: tryAsU64(0xffff_ffff_ffff_fffcn), // 2**64 - 4
-  /** Storage full or resource already allocated. */
-  FULL: tryAsU64(0xffff_ffff_ffff_fffbn), // 2**64 - 5
-  /** Core index unknown. */
-  CORE: tryAsU64(0xffff_ffff_ffff_fffan), // 2**64 - 6
-  /** Insufficient funds. */
-  CASH: tryAsU64(0xffff_ffff_ffff_fff9n), // 2**64 - 7
-  /** Gas limit too low. */
-  LOW: tryAsU64(0xffff_ffff_ffff_fff8n), // 2**64 - 8
-  /** The item is already solicited, cannot be forgotten or the operation is invalid due to privilege level. */
-  HUH: tryAsU64(0xffff_ffff_ffff_fff7n), // 2**64 - 9
-  /** The return value indicating general success. */
-  OK: tryAsU64(0n),
-} as const;
-
-interface IHostCallMemory {
-  storeFrom(address: U64, bytes: Uint8Array): Result$2<OK, PageFault | OutOfBounds>;
-  loadInto(result: Uint8Array, startAddress: U64): Result$2<OK, PageFault | OutOfBounds>;
-  getMemory(): Memory;
-}
-
-declare class HostCallMemory implements IHostCallMemory {
-  constructor(private readonly memory: Memory) {}
+declare class AccumulationStateUpdate {
+  /** Updated authorization queues for cores. */
+  public readonly authorizationQueues: Map<CoreIndex, FixedSizeArray<AuthorizerHash, AUTHORIZATION_QUEUE_SIZE>> =
+    new Map();
+  /** New validators data. */
+  public validatorsData: PerValidator<ValidatorData> | null = null;
+  /** Updated priviliged services. */
+  public privilegedServices: PrivilegedServices | null = null;
 
-  storeFrom(address: U64, bytes: Uint8Array): Result$2<OK, PageFault | OutOfBounds> {
-    if (bytes.length === 0) {
-      return Result.ok(OK);
-    }
+  private constructor(
+    /** Services state updates. */
+    public readonly services: ServicesUpdate,
+    /** Pending transfers. */
+    public transfers: PendingTransfer[],
+    /** Yielded accumulation root. */
+    public readonly yieldedRoots: Map<ServiceId, OpaqueHash> = new Map(),
+  ) {}
 
-    if (address + tryAsU64(bytes.length) > MEMORY_SIZE) {
-      return Result.error(new OutOfBounds());
-    }
+  /** Create new empty state update. */
+  static empty(): AccumulationStateUpdate {
+    return new AccumulationStateUpdate(
+      {
+        servicesUpdates: [],
+        servicesRemoved: [],
+        preimages: [],
+        storage: [],
+      },
+      [],
+    );
+  }
 
-    return this.memory.storeFrom(tryAsMemoryIndex(Number(address)), bytes);
+  /** Create a state update with some existing, yet uncommited services updates. */
+  static new(update: ServicesUpdate): AccumulationStateUpdate {
+    return new AccumulationStateUpdate(
+      {
+        ...update,
+      },
+      [],
+    );
   }
 
-  loadInto(result: Uint8Array, startAddress: U64): Result$2<OK, PageFault | OutOfBounds> {
-    if (result.length === 0) {
-      return Result.ok(OK);
+  /** Create a copy of another `StateUpdate`. Used by checkpoints. */
+  static copyFrom(from: AccumulationStateUpdate): AccumulationStateUpdate {
+    const serviceUpdates: ServicesUpdate = {
+      servicesUpdates: [...from.services.servicesUpdates],
+      servicesRemoved: [...from.services.servicesRemoved],
+      preimages: [...from.services.preimages],
+      storage: [...from.services.storage],
+    };
+    const transfers = [...from.transfers];
+    const update = new AccumulationStateUpdate(serviceUpdates, transfers, new Map(from.yieldedRoots));
+
+    // update entries
+    for (const [k, v] of from.authorizationQueues) {
+      update.authorizationQueues.set(k, v);
     }
 
-    if (startAddress + tryAsU64(result.length) > MEMORY_SIZE) {
-      return Result.error(new OutOfBounds());
+    if (from.validatorsData !== null) {
+      update.validatorsData = asKnownSize([...from.validatorsData]);
     }
 
-    return this.memory.loadInto(result, tryAsMemoryIndex(Number(startAddress)));
+    if (from.privilegedServices !== null) {
+      update.privilegedServices = PrivilegedServices.create({
+        ...from.privilegedServices,
+        assigners: asKnownSize([...from.privilegedServices.assigners]),
+      });
+    }
+    return update;
   }
 
-  getMemory(): Memory {
-    return this.memory;
+  /** Retrieve and clear pending transfers. */
+  takeTransfers() {
+    const transfers = this.transfers;
+    this.transfers = [];
+    return transfers;
   }
 }
 
-interface IHostCallRegisters {
-  get(registerIndex: number): U64;
-  set(registerIndex: number, value: U64): void;
-}
-
-declare class HostCallRegisters implements IHostCallRegisters {
-  constructor(private readonly registers: Registers) {}
+type StateSlice = Pick<State, "getService" | "privilegedServices">;
 
-  get(registerIndex: number): U64 {
-    return tryAsU64(this.registers.getU64(registerIndex));
-  }
+declare class PartiallyUpdatedState<T extends StateSlice = StateSlice> {
+  /** A collection of state updates. */
+  public readonly stateUpdate;
 
-  set(registerIndex: number, value: U64) {
-    this.registers.setU64(registerIndex, value);
+  constructor(
+    /** Original (unmodified state). */
+    public readonly state: T,
+    stateUpdate?: AccumulationStateUpdate,
+  ) {
+    this.stateUpdate =
+      stateUpdate === undefined ? AccumulationStateUpdate.empty() : AccumulationStateUpdate.copyFrom(stateUpdate);
   }
-}
 
-/** Strictly-typed host call index. */
-type HostCallIndex = Opaque<U32, "HostCallIndex[U32]">;
-/** Attempt to convert a number into `HostCallIndex`. */
-declare const tryAsHostCallIndex = (v: number): HostCallIndex => asOpaqueType(tryAsU32(v));
+  /**
+   * Retrieve info of service with given id.
+   *
+   * NOTE the info may be updated compared to what is in the state.
+   *
+   * Takes into account ejected and newly created services as well.
+   */
+  getServiceInfo(destination: ServiceId | null): ServiceAccountInfo | null {
+    if (destination === null) {
+      return null;
+    }
 
-/**
- * Host-call exit reason.
- *
- * https://graypaper.fluffylabs.dev/#/ab2cdbd/24a30124a501?v=0.7.2
- */
-declare enum PvmExecution {
-  Halt = 0,
-  Panic = 1,
-  OOG = 2, // out-of-gas
-}
+    const maybeNewService = this.stateUpdate.services.servicesUpdates.find(
+      (update) => update.serviceId === destination,
+    );
 
-/** A utility function to easily trace a bunch of registers. */
-declare function traceRegisters(...regs: number[]) {
-  return regs.map(tryAsRegisterIndex);
-}
+    if (maybeNewService !== undefined) {
+      return maybeNewService.action.account;
+    }
 
-/** An interface for a host call implementation */
-interface HostCallHandler {
-  /** Index of that host call (i.e. what PVM invokes via `ecalli`) */
-  readonly index: HostCallIndex;
+    const maybeService = this.state.getService(destination);
+    if (maybeService === null) {
+      return null;
+    }
 
-  /**
-   * The gas cost of invocation of that host call.
-   *
-   * NOTE: `((reg: IHostCallRegisters) => Gas)` function is for compatibility reasons: pre GP 0.7.2
-   */
-  readonly basicGasCost: SmallGas | ((reg: IHostCallRegisters) => Gas);
+    return maybeService.getInfo();
+  }
 
-  /** Currently executing service id. */
-  readonly currentServiceId: U32;
+  getStorage(serviceId: ServiceId, rawKey: StorageKey): BytesBlob | null {
+    const item = this.stateUpdate.services.storage.find((x) => x.serviceId === serviceId && x.key.isEqualTo(rawKey));
+    if (item !== undefined) {
+      return item.value;
+    }
 
-  /** Input&Output registers that we should add to tracing log. */
-  readonly tracedRegisters: RegisterIndex[];
+    const service = this.state.getService(serviceId);
+    return service?.getStorage(rawKey) ?? null;
+  }
 
   /**
-   * Actually execute the host call.
+   * Returns `true` if the preimage is already provided either in current
+   * accumulation scope or earlier.
    *
-   * NOTE the call is ALLOWED and expected to modify registers and memory.
+   * NOTE: Does not check if the preimage is available, we just check
+   * the existence in `preimages` map.
    */
-  execute(gas: GasCounter, regs: IHostCallRegisters, memory: IHostCallMemory): Promise<undefined | PvmExecution>;
-}
+  hasPreimage(serviceId: ServiceId, hash: PreimageHash): boolean {
+    const providedPreimage = this.stateUpdate.services.preimages.find(
+      // we ignore the action here, since if there is <any> update on that
+      // hash it means it has to exist, right?
+      (p) => p.serviceId === serviceId && p.hash.isEqualTo(hash),
+    );
+    if (providedPreimage !== undefined) {
+      return true;
+    }
 
-/** Container for all available host calls. */
-declare class HostCallsManager {
-  private readonly hostCalls = new Map<HostCallIndex, HostCallHandler>();
-  private readonly missing;
+    // fallback to state preimages
+    const service = this.state.getService(serviceId);
+    if (service === undefined) {
+      return false;
+    }
 
-  constructor({
-    missing,
-    handlers = [],
-  }: {
-    missing: HostCallHandler;
-    handlers?: HostCallHandler[];
-  }) {
-    this.missing = missing;
+    return service?.hasPreimage(hash) ?? false;
+  }
 
-    for (const handler of handlers) {
-      check`${this.hostCalls.get(handler.index) === undefined} Overwriting host call handler at index ${handler.index}`;
-      this.hostCalls.set(handler.index, handler);
+  getPreimage(serviceId: ServiceId, hash: PreimageHash): BytesBlob | null {
+    // TODO [ToDr] Should we verify availability here?
+    const freshlyProvided = this.stateUpdate.services.preimages.find(
+      (x) => x.serviceId === serviceId && x.hash.isEqualTo(hash),
+    );
+    if (freshlyProvided !== undefined && freshlyProvided.action.kind === UpdatePreimageKind.Provide) {
+      return freshlyProvided.action.preimage.blob;
     }
-  }
 
-  /** Get a host call by index. */
-  get(hostCallIndex: HostCallIndex): HostCallHandler {
-    return this.hostCalls.get(hostCallIndex) ?? this.missing;
+    const service = this.state.getService(serviceId);
+    return service?.getPreimage(hash) ?? null;
   }
 
-  traceHostCall(
-    context: string,
-    hostCallIndex: HostCallIndex,
-    hostCallHandler: HostCallHandler,
-    registers: IHostCallRegisters,
-    gas: Gas,
-  ) {
-    const { currentServiceId } = hostCallHandler;
-    const requested = hostCallIndex !== hostCallHandler.index ? ` (${hostCallIndex})` : "";
-    const name = `${hostCallHandler.constructor.name}:${hostCallHandler.index}`;
-    const registerValues = hostCallHandler.tracedRegisters
-      .map((idx) => [idx.toString().padStart(2, "0"), registers.get(idx)] as const)
-      .filter((v) => v[1] !== 0n)
-      .map(([idx, value]) => {
-        return `r${idx}=${value} (0x${value.toString(16)})`;
-      })
-      .join(", ");
-    logger.insane`[${currentServiceId}] ${context} ${name}${requested}.  Gas: ${gas}. Regs: ${registerValues}.`;
-  }
-}
+  /** Get status of a preimage of current service taking into account any updates. */
+  getLookupHistory(
+    currentTimeslot: TimeSlot,
+    serviceId: ServiceId,
+    hash: PreimageHash,
+    length: U64,
+  ): LookupHistoryItem | null {
+    // TODO [ToDr] This is most likely wrong. We may have `provide` and `remove` within
+    // the same state update. We should however switch to proper "updated state"
+    // representation soon.
+    const updatedPreimage = this.stateUpdate.services.preimages.findLast(
+      (update) => update.serviceId === serviceId && update.hash.isEqualTo(hash) && BigInt(update.length) === length,
+    );
 
-type ResolveFn = (pvm: Interpreter) => void;
+    const stateFallback = () => {
+      // fallback to state lookup
+      const service = this.state.getService(serviceId);
+      const lenU32 = preimageLenAsU32(length);
+      if (lenU32 === null || service === null) {
+        return null;
+      }
 
-declare class InterpreterInstanceManager {
-  private instances: Interpreter[] = [];
-  private waitingQueue: ResolveFn[] = [];
+      const slots = service.getLookupHistory(hash, lenU32);
+      return slots === null ? null : new LookupHistoryItem(hash, lenU32, slots);
+    };
 
-  constructor(noOfPvmInstances: number) {
-    for (let i = 0; i < noOfPvmInstances; i++) {
-      this.instances.push(
-        new Interpreter({
-          useSbrkGas: false,
-        }),
-      );
+    if (updatedPreimage === undefined) {
+      return stateFallback();
     }
-  }
 
-  async getInstance(): Promise<Interpreter> {
-    const instance = this.instances.pop();
-    if (instance !== undefined) {
-      return Promise.resolve(instance);
-    }
-    return new Promise((resolve) => {
-      this.waitingQueue.push(resolve);
-    });
-  }
+    const { action } = updatedPreimage;
+    switch (action.kind) {
+      case UpdatePreimageKind.Provide: {
+        // casting to U32 is safe, since we compare with object we have in memory.
+        return new LookupHistoryItem(hash, updatedPreimage.length, tryAsLookupHistorySlots([currentTimeslot]));
+      }
+      case UpdatePreimageKind.Remove: {
+        const state = stateFallback();
+        // kinda impossible, since we know it's there because it's removed.
+        if (state === null) {
+          return null;
+        }
 
-  releaseInstance(pvm: Interpreter) {
-    const waiting = this.waitingQueue.shift();
-    if (waiting !== undefined) {
-      return waiting(pvm);
+        return new LookupHistoryItem(hash, state.length, tryAsLookupHistorySlots([...state.slots, currentTimeslot]));
+      }
+      case UpdatePreimageKind.UpdateOrAdd: {
+        return action.item;
+      }
     }
-    this.instances.push(pvm);
-  }
-}
 
-declare class ReturnValue {
-  private constructor(
-    public consumedGas: Gas,
-    public status: Status | null,
-    public memorySlice: Uint8Array | null,
-  ) {
-    check`
-      ${(status === null && memorySlice !== null) || (status !== null && memorySlice === null)}
-      'status' and 'memorySlice' must not both be null or both be non-null — exactly one must be provided
-    `;
+    assertNever(action);
   }
 
-  static fromStatus(consumedGas: Gas, status: Status) {
-    return new ReturnValue(consumedGas, status, null);
-  }
+  /* State update functions. */
 
-  static fromMemorySlice(consumedGas: Gas, memorySlice: Uint8Array) {
-    return new ReturnValue(consumedGas, null, memorySlice);
-  }
+  updateStorage(serviceId: ServiceId, key: StorageKey, value: BytesBlob | null) {
+    const update =
+      value === null
+        ? UpdateStorage.remove({ serviceId, key })
+        : UpdateStorage.set({
+            serviceId,
+            storage: StorageItem.create({ key, value }),
+          });
 
-  hasMemorySlice(): this is this & { status: null; memorySlice: Uint8Array } {
-    return this.memorySlice instanceof Uint8Array && this.status === null;
+    const index = this.stateUpdate.services.storage.findIndex(
+      (x) => x.serviceId === update.serviceId && x.key.isEqualTo(key),
+    );
+    const count = index === -1 ? 0 : 1;
+    this.stateUpdate.services.storage.splice(index, count, update);
   }
 
-  hasStatus(): this is this & { status: Status; memorySlice: null } {
-    return !this.hasMemorySlice();
+  /**
+   * Update a preimage.
+   *
+   * Note we store all previous entries as well, since there might be a sequence of:
+   * `provide` -> `remove` and both should update the end state somehow.
+   */
+  updatePreimage(newUpdate: UpdatePreimage) {
+    this.stateUpdate.services.preimages.push(newUpdate);
   }
-}
-declare class HostCalls {
-  constructor(
-    private pvmInstanceManager: InterpreterInstanceManager,
-    private hostCalls: HostCallsManager,
-  ) {}
-
-  private getReturnValue(status: Status, pvmInstance: Interpreter): ReturnValue {
-    const gasConsumed = pvmInstance.getGasConsumed();
-    if (status === Status.OOG) {
-      return ReturnValue.fromStatus(gasConsumed, status);
-    }
 
-    if (status === Status.HALT) {
-      const memory = pvmInstance.getMemory();
-      const regs = pvmInstance.getRegisters();
-      const maybeAddress = regs.getLowerU32(7);
-      const maybeLength = regs.getLowerU32(8);
+  updateServiceStorageUtilisation(
+    serviceId: ServiceId,
+    items: number,
+    bytes: bigint,
+    serviceInfo: ServiceAccountInfo,
+  ): Result$2<OK, InsufficientFundsError> {
+    check`${items >= 0} storageUtilisationCount has to be a positive number, got: ${items}`;
+    check`${bytes >= 0} storageUtilisationBytes has to be a positive number, got: ${bytes}`;
 
-      const result = safeAllocUint8Array(maybeLength);
-      const startAddress = tryAsMemoryIndex(maybeAddress);
-      const loadResult = memory.loadInto(result, startAddress);
+    const overflowItems = !isU32(items);
+    const overflowBytes = !isU64(bytes);
 
-      if (loadResult.isError) {
-        return ReturnValue.fromMemorySlice(gasConsumed, new Uint8Array());
-      }
+    // TODO [ToDr] this is not specified in GP, but it seems sensible.
+    if (overflowItems || overflowBytes) {
+      return Result.error(InsufficientFundsError);
+    }
 
-      return ReturnValue.fromMemorySlice(gasConsumed, result);
+    const thresholdBalance = ServiceAccountInfo.calculateThresholdBalance(items, bytes, serviceInfo.gratisStorage);
+    if (serviceInfo.balance < thresholdBalance) {
+      return Result.error(InsufficientFundsError);
     }
 
-    return ReturnValue.fromStatus(gasConsumed, Status.PANIC);
+    // Update service info with new details.
+    this.updateServiceInfo(
+      serviceId,
+      ServiceAccountInfo.create({
+        ...serviceInfo,
+        storageUtilisationBytes: bytes,
+        storageUtilisationCount: items,
+      }),
+    );
+    return Result.ok(OK);
   }
 
-  private async execute(pvmInstance: Interpreter) {
-    pvmInstance.runProgram();
-    for (;;) {
-      let status = pvmInstance.getStatus();
-      if (status !== Status.HOST) {
-        return this.getReturnValue(status, pvmInstance);
-      }
-      check`
-        ${pvmInstance.getExitParam() !== null}
-        "We know that the exit param is not null, because the status is 'Status.HOST'
-      `;
-      const hostCallIndex = pvmInstance.getExitParam() ?? -1;
-      const gas = pvmInstance.getGasCounter();
-      const regs = new HostCallRegisters(pvmInstance.getRegisters());
-      const memory = new HostCallMemory(pvmInstance.getMemory());
-      const index = tryAsHostCallIndex(hostCallIndex);
-
-      const hostCall = this.hostCalls.get(index);
-      const gasBefore = gas.get();
-      // NOTE: `basicGasCost(regs)` function is for compatibility reasons: pre GP 0.7.2
-      const basicGasCost =
-        typeof hostCall.basicGasCost === "number" ? hostCall.basicGasCost : hostCall.basicGasCost(regs);
-      const underflow = gas.sub(basicGasCost);
+  updateServiceInfo(serviceId: ServiceId, newInfo: ServiceAccountInfo) {
+    const idx = this.stateUpdate.services.servicesUpdates.findIndex((x) => x.serviceId === serviceId);
+    const toRemove = idx === -1 ? 0 : 1;
+    const existingItem = this.stateUpdate.services.servicesUpdates[idx];
 
-      const pcLog = `[PC: ${pvmInstance.getPC()}]`;
-      if (underflow) {
-        this.hostCalls.traceHostCall(`${pcLog} OOG`, index, hostCall, regs, gas.get());
-        return ReturnValue.fromStatus(pvmInstance.getGasConsumed(), Status.OOG);
-      }
-      this.hostCalls.traceHostCall(`${pcLog} Invoking`, index, hostCall, regs, gasBefore);
-      const result = await hostCall.execute(gas, regs, memory);
-      this.hostCalls.traceHostCall(
-        result === undefined ? `${pcLog} Result` : `${pcLog} Status(${PvmExecution[result]})`,
-        index,
-        hostCall,
-        regs,
-        gas.get(),
+    if (existingItem?.action.kind === UpdateServiceKind.Create) {
+      this.stateUpdate.services.servicesUpdates.splice(
+        idx,
+        toRemove,
+        UpdateService.create({
+          serviceId,
+          serviceInfo: newInfo,
+          lookupHistory: existingItem.action.lookupHistory,
+        }),
       );
 
-      if (result === PvmExecution.Halt) {
-        status = Status.HALT;
-        return this.getReturnValue(status, pvmInstance);
-      }
-
-      if (result === PvmExecution.Panic) {
-        status = Status.PANIC;
-        return this.getReturnValue(status, pvmInstance);
-      }
-
-      if (result === PvmExecution.OOG) {
-        status = Status.OOG;
-        return this.getReturnValue(status, pvmInstance);
-      }
-
-      if (result === undefined) {
-        pvmInstance.runProgram();
-        status = pvmInstance.getStatus();
-        continue;
-      }
-
-      assertNever(result);
+      return;
     }
+
+    this.stateUpdate.services.servicesUpdates.splice(
+      idx,
+      toRemove,
+      UpdateService.update({
+        serviceId,
+        serviceInfo: newInfo,
+      }),
+    );
   }
 
-  async runProgram(
-    rawProgram: Uint8Array,
-    initialPc: number,
-    initialGas: Gas,
-    maybeRegisters?: Registers,
-    maybeMemory?: Memory,
-  ): Promise<ReturnValue> {
-    const pvmInstance = await this.pvmInstanceManager.getInstance();
-    pvmInstance.reset(rawProgram, initialPc, initialGas, maybeRegisters, maybeMemory);
-    try {
-      return await this.execute(pvmInstance);
-    } finally {
-      this.pvmInstanceManager.releaseInstance(pvmInstance);
+  getPrivilegedServices() {
+    if (this.stateUpdate.privilegedServices !== null) {
+      return this.stateUpdate.privilegedServices;
     }
+
+    return this.state.privilegedServices;
   }
 }
 
-type index$7_HostCallHandler = HostCallHandler;
-type index$7_HostCallMemory = HostCallMemory;
-declare const index$7_HostCallMemory: typeof HostCallMemory;
-type index$7_HostCallRegisters = HostCallRegisters;
-declare const index$7_HostCallRegisters: typeof HostCallRegisters;
-type index$7_IHostCallMemory = IHostCallMemory;
-type index$7_IHostCallRegisters = IHostCallRegisters;
-type index$7_PvmExecution = PvmExecution;
-declare const index$7_PvmExecution: typeof PvmExecution;
-declare const index$7_traceRegisters: typeof traceRegisters;
-declare const index$7_tryAsHostCallIndex: typeof tryAsHostCallIndex;
-declare namespace index$7 {
-  export { index$7_HostCallMemory as HostCallMemory, index$7_HostCallRegisters as HostCallRegisters, HostCallsManager as HostCalls, index$7_PvmExecution as PvmExecution, HostCalls as PvmHostCallExtension, InterpreterInstanceManager as PvmInstanceManager, index$7_traceRegisters as traceRegisters, index$7_tryAsHostCallIndex as tryAsHostCallIndex };
-  export type { index$7_HostCallHandler as HostCallHandler, index$7_IHostCallMemory as IHostCallMemory, index$7_IHostCallRegisters as IHostCallRegisters };
+declare function preimageLenAsU32(length: U64) {
+  // Safe to convert to Number and U32: we check that len < 2^32 before conversion
+  return length >= 2n ** 32n ? null : tryAsU32(Number(length));
 }
 
+/**
+ * Host call result constants.
+ *
+ * https://graypaper.fluffylabs.dev/#/85129da/2c7c022c7c02?v=0.6.3
+ */
+declare const HostCallResult = {
+  /** The return value indicating an item does not exist. */
+  NONE: tryAsU64(0xffff_ffff_ffff_ffffn), // 2**64 - 1
+  /** Name unknown. */
+  WHAT: tryAsU64(0xffff_ffff_ffff_fffen), // 2**64 - 2
+  /** The inner PVM memory index provided for reading/writing is not accessible. */
+  OOB: tryAsU64(0xffff_ffff_ffff_fffdn), // 2**64 - 3
+  /** Index unknown. */
+  WHO: tryAsU64(0xffff_ffff_ffff_fffcn), // 2**64 - 4
+  /** Storage full or resource already allocated. */
+  FULL: tryAsU64(0xffff_ffff_ffff_fffbn), // 2**64 - 5
+  /** Core index unknown. */
+  CORE: tryAsU64(0xffff_ffff_ffff_fffan), // 2**64 - 6
+  /** Insufficient funds. */
+  CASH: tryAsU64(0xffff_ffff_ffff_fff9n), // 2**64 - 7
+  /** Gas limit too low. */
+  LOW: tryAsU64(0xffff_ffff_ffff_fff8n), // 2**64 - 8
+  /** The item is already solicited, cannot be forgotten or the operation is invalid due to privilege level. */
+  HUH: tryAsU64(0xffff_ffff_ffff_fff7n), // 2**64 - 9
+  /** The return value indicating general success. */
+  OK: tryAsU64(0n),
+} as const;
+
 declare const MAX_U32 = tryAsU32(2 ** 32 - 1);
 declare const MAX_U32_BIG_INT = tryAsU64(MAX_U32);
 declare const SERVICE_ID_BYTES = 4;