naumachia 0.2.0

use crate::scripts::ValidatorCode;
use crate::{
    address::Address, backend::tx_checks::can_spend_inputs, error::Result,
    ledger_client::LedgerClient, output::Output, TxActions,
};
use std::{fmt::Debug, hash::Hash, marker::PhantomData};

pub mod selection;
pub mod tx_checks;

#[cfg(test)]
mod tests;

#[derive(Debug)]
pub struct Backend<Datum, Redeemer, LC>
where
    Redeemer: Clone + Eq,
    LC: LedgerClient<Datum, Redeemer>,
{
    // TODO: Make fields private
    pub _datum: PhantomData<Datum>,
    pub _redeemer: PhantomData<Redeemer>,
    pub ledger_client: LC,
}

pub type RedemptionDetails<Datum, Redeemer> = (
    Output<Datum>,
    Redeemer,
    Box<dyn ValidatorCode<Datum, Redeemer>>,
);

impl<Datum, Redeemer, LC> Backend<Datum, Redeemer, LC>
where
    Datum: Clone + Eq + Debug,
    Redeemer: Clone + Eq + Hash,
    LC: LedgerClient<Datum, Redeemer>,
{
    pub fn new(txo_record: LC) -> Self {
        Backend {
            _datum: PhantomData::default(),
            _redeemer: PhantomData::default(),
            ledger_client: txo_record,
        }
    }

    pub async fn process(&self, actions: TxActions<Datum, Redeemer>) -> Result<()> {
        let tx = actions.to_unbuilt_tx()?;
        // TODO: I don't know that we need to check this here. That is more the business of the
        //   ledger implementation, I think.
        can_spend_inputs(&tx, self.signer().await?)?;
        // TODO: Move this to ledger client impls
        // can_mint_tokens(&tx, &self.ledger_client.signer().await?)?;
        self.ledger_client.issue(tx).await?;
        Ok(())
    }

    pub fn ledger_client(&self) -> &LC {
        &self.ledger_client
    }

    pub async fn signer(&self) -> Result<Address> {
        let addr = self.ledger_client.signer().await?;
        Ok(addr)
    }
}