// This file is part of Substrate.

// Copyright (C) Parity Technologies (UK) Ltd.
// SPDX-License-Identifier: Apache-2.0

// Licensed under the Apache License, Version 2.0 (the "License");
// you may not use this file except in compliance with the License.
// You may obtain a copy of the License at
//
// 	http://www.apache.org/licenses/LICENSE-2.0
//
// Unless required by applicable law or agreed to in writing, software
// distributed under the License is distributed on an "AS IS" BASIS,
// WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
// See the License for the specific language governing permissions and
// limitations under the License.

#![no_std]
#![no_main]

use common::input;
use uapi::{HostFn, HostFnImpl as api, StorageFlags};

#[no_mangle]
#[polkavm_derive::polkavm_export]
pub extern "C" fn deploy() {
	call();
}

/// Reads the first byte as the exit status and copy all but the first 4 bytes of the input as
/// output data.
#[no_mangle]
#[polkavm_derive::polkavm_export]
pub extern "C" fn call() {
	input!(
		input, 128,
		exit_status: [u8; 4],
		output: [u8],
	);

	// Burn some PoV, clear_storage consumes some PoV as in order to clear the storage we need to we
	// need to read its size first.
	api::clear_storage(StorageFlags::empty(), b"");

	let exit_status = uapi::ReturnFlags::from_bits(exit_status[0] as u32).unwrap();
	api::return_value(exit_status, output);
}