Added functions in the primitive interface

.gitignore

@@ -23,3 +23,10 @@ Cargo.lock
 
 *.wasm.v1
 *.wasm.v0
+
+# Editor specific
+**/.helix
+
+# Nix artifacts
+**/*.nix
+**/flake.lock

concordium-std/CHANGELOG.md

@@ -1,5 +1,35 @@
 # Changelog
 
+## Unreleased
+
+- Added the following functions in the primitive interface, that can only
+  be called in testing environments:
+  - `set_slot_time`
+  - `set_receive_self_address`
+  - `set_receive_self_balance`
+  - `set_parameter`
+  - `set_init_origin`
+  - `set_receive_invoker`
+  - `set_receive_sender`
+  - `set_receive_owner`
+  - `set_receive_entrypoint`
+  - `get_event`
+  - `get_event_size`
+
+- Added a more user-friendly interface `TestEnv` that allows users to build
+  a test host environment using method chaining and proper types. It supports
+  the following operations:
+  - `set_slot_time`
+  - `set_receive_balance`
+  - `set_receive_self_address`
+  - `set_parameter`
+  - `set_init_origin`
+  - `set_receive_invoker`
+  - `set_receive_sender`
+  - `set_receive_owner`
+  - `set_receive_entrypoint`
+  - `get_event`
+
 ## concordium-std 10.1.0 (2024-04-04)
 
 - Add support for querying the module reference and contract name of an instance,

concordium-std/src/lib.rs

@@ -393,7 +393,7 @@
 //! [test_infrastructure]: ./test_infrastructure/index.html
 //! [concordium_smart_contract_testing]: https://docs.rs/concordium-smart-contract-testing
 
 #![cfg_attr(not(feature = "std"), no_std, feature(core_intrinsics))]
 
 #[cfg(not(feature = "std"))]
 pub extern crate alloc;
@@ -463,6 +463,7 @@
 mod impls;
 pub mod prims;
 mod state_btree;
+pub mod test_env;
 mod traits;
 mod types;
 pub use concordium_contracts_common::*;

concordium-std/src/prims.rs

@@ -205,7 +205,7 @@
     pub fn state_entry_resize(entry: u64, new_size: u32) -> u32;
 
     // Getter for the init context.
-    /// Address of the sender, 32 bytes
+    /// Address of the sender, AccountAddress.
     pub fn get_init_origin(start: *mut u8);
 
     // Getters for the receive context
@@ -215,7 +215,7 @@
     pub fn get_receive_self_address(start: *mut u8);
     /// Self-balance of the contract, returns the amount
     pub fn get_receive_self_balance() -> u64;
-    /// Immediate sender of the message (either contract or account).
+    /// Immediate sender of the message, Address (either contract or account).
     pub fn get_receive_sender(start: *mut u8);
     /// Owner of the contract, AccountAddress.
     pub fn get_receive_owner(start: *mut u8);
@@ -225,6 +225,10 @@
 
     /// Write the receive entrypoint name into the given location.
     /// It is assumed that the location contains enough space to write the name.
+    ///
+    /// Note that the name is expected to be the receive name encoded as bytes
+    /// without the length, i.e. not a serialized EntrypointName (since it's
+    /// byte-encoding has 2 length bytes) but a String.
     pub fn get_receive_entrypoint(start: *mut u8);
 
     // Getters for the chain meta data
@@ -288,6 +292,54 @@
         column: u32,
     );
 
+    /// Set the slot time in milliseconds.
+    /// The slot time represents the beginning of the smart contract's block.
+    #[cfg(all(feature = "wasm-test", target_arch = "wasm32"))]
+    pub(crate) fn set_slot_time(slot_time: u64);
+
+    /// Sets the address of this smart contract
+    #[cfg(all(feature = "wasm-test", target_arch = "wasm32"))]
+    pub(crate) fn set_receive_self_balance(balance: u64);
+
+    /// Sets the current balance of this smart contract
+    #[cfg(all(feature = "wasm-test", target_arch = "wasm32"))]
+    pub(crate) fn set_receive_self_address(start: *const u8);
+
+    /// Sets parameter `i` of the smart contract to the given value.
+    #[cfg(all(feature = "wasm-test", target_arch = "wasm32"))]
+    pub(crate) fn set_parameter(i: u32, start: *const u8, length: u32);
+
+    /// Sets the address of the sender, AccountAddress
+    #[cfg(all(feature = "wasm-test", target_arch = "wasm32"))]
+    pub(crate) fn set_init_origin(start: *const u8);
+
+    /// Set the invoker of the top-level transaction, AccountAddress.
+    #[cfg(all(feature = "wasm-test", target_arch = "wasm32"))]
+    pub(crate) fn set_receive_invoker(start: *const u8);
+
+    /// Set the immediate sender of the message, Address (either contract or
+    /// account).
+    #[cfg(all(feature = "wasm-test", target_arch = "wasm32"))]
+    pub(crate) fn set_receive_sender(start: *const u8);
+
+    /// Owner of the contract, AccountAddress.
+    #[cfg(all(feature = "wasm-test", target_arch = "wasm32"))]
+    pub(crate) fn set_receive_owner(start: *const u8);
+
+    /// Set the receive entrypoint name, EntryPointName.
+    #[cfg(all(feature = "wasm-test", target_arch = "wasm32"))]
+    pub(crate) fn set_receive_entrypoint(start: *const u8);
+
+    /// Gets event number `i` in the smart contract state. Returns `-1` if `i`
+    /// is an invalid index. Otherwise returns bytes written.
+    #[cfg(all(feature = "wasm-test", target_arch = "wasm32"))]
+    pub(crate) fn get_event(i: u32, start: *mut u8) -> i32;
+
+    /// Gets the size of event number `i` in the smart contract state. Returns
+    /// `-1` if `i` is an invalid index.
+    #[cfg(all(feature = "wasm-test", target_arch = "wasm32"))]
+    pub(crate) fn get_event_size(i: u32) -> i32;
+
     #[cfg(feature = "debug")]
     /// Emit text together with the source location.
     /// This is used as the equivalent of the `dbg!` macro when the