use crate::app::Web3ProxyApp;
use crate::errors::{Web3ProxyError, Web3ProxyResponse};
use anyhow::Context;
use axum::{
    extract::Path,
    headers::{authorization::Bearer, Authorization},
    response::IntoResponse,
    Extension, Json, TypedHeader,
};
use axum_macros::debug_handler;
use entities::{balance, increase_on_chain_balance_receipt, user};
use ethbloom::Input as BloomInput;
use ethers::abi::{AbiEncode, ParamType};
use ethers::prelude::abigen;
use ethers::types::{Address, TransactionReceipt, H256, U256};
use hashbrown::HashMap;
use http::StatusCode;
use log::{debug, info, trace, warn};
use migration::sea_orm::prelude::Decimal;
use migration::sea_orm::{
    self, ActiveModelTrait, ColumnTrait, EntityTrait, IntoActiveModel, QueryFilter,
    TransactionTrait,
};
use num_traits::Pow;
use serde_json::json;
use std::str::FromStr;
use std::sync::Arc;

// TODO: do this in a build.rs so that the editor autocomplete and docs are better
abigen!(
    IERC20,
    r#"[
        decimals() external view returns (uint256)
        event Transfer(address indexed from, address indexed to, uint256 value)
        event Approval(address indexed owner, address indexed spender, uint256 value)
    ]"#,
);

abigen!(
    PaymentFactory,
    r#"[
        event PaymentReceived(address indexed account, address token, uint256 amount)
        account_to_payment_address(address) external view returns (address)
        payment_address_to_account(address) external view returns (address)
    ]"#,
);

abigen!(
    PaymentSweeper,
    r#"[
    ]"#,
);

/// Implements any logic related to payments
/// Removed this mainly from "user" as this was getting clogged
///
/// `GET /user/balance` -- Use a bearer token to get the user's balance and spend.
///
/// - show balance in USD
/// - show deposits history (currency, amounts, transaction id)
#[debug_handler]
pub async fn user_balance_get(
    Extension(app): Extension<Arc<Web3ProxyApp>>,
    TypedHeader(Authorization(bearer)): TypedHeader<Authorization<Bearer>>,
) -> Web3ProxyResponse {
    let (_user, _semaphore) = app.bearer_is_authorized(bearer).await?;

    let db_replica = app.db_replica().context("Getting database connection")?;

    // Just return the balance for the user
    let user_balance = balance::Entity::find()
        .filter(balance::Column::UserId.eq(_user.id))
        .one(db_replica.as_ref())
        .await?
        .map(|x| x.available_balance)
        .unwrap_or_default();

    let response = json!({
        "balance": user_balance,
    });

    // TODO: Gotta create a new table for the spend part
    Ok(Json(response).into_response())
}

/// `GET /user/deposits` -- Use a bearer token to get the user's balance and spend.
///
/// - shows a list of all deposits, including their chain-id, amount and tx-hash
#[debug_handler]
pub async fn user_deposits_get(
    Extension(app): Extension<Arc<Web3ProxyApp>>,
    TypedHeader(Authorization(bearer)): TypedHeader<Authorization<Bearer>>,
) -> Web3ProxyResponse {
    let (user, _semaphore) = app.bearer_is_authorized(bearer).await?;

    let db_replica = app.db_replica().context("Getting database connection")?;

    // Filter by user ...
    let receipts = increase_on_chain_balance_receipt::Entity::find()
        .filter(increase_on_chain_balance_receipt::Column::DepositToUserId.eq(user.id))
        .all(db_replica.as_ref())
        .await?;

    // Return the response, all except the user ...
    let mut response = HashMap::new();
    let receipts = receipts
        .into_iter()
        .map(|x| {
            let mut out = HashMap::new();
            out.insert("amount", serde_json::Value::String(x.amount.to_string()));
            out.insert("chain_id", serde_json::Value::Number(x.chain_id.into()));
            out.insert("tx_hash", serde_json::Value::String(x.tx_hash));
            // TODO: log_index
            out
        })
        .collect::<Vec<_>>();
    response.insert(
        "user",
        json!(format!("{:?}", Address::from_slice(&user.address))),
    );
    response.insert("deposits", json!(receipts));

    Ok(Json(response).into_response())
}

/// `POST /user/balance/:tx_hash` -- Manually process a confirmed txid to update a user's balance.
///
/// We will subscribe to events to watch for any user deposits, but sometimes events can be missed.
/// TODO: change this. just have a /tx/:txhash that is open to anyone. rate limit like we rate limit /login
#[debug_handler]
pub async fn user_balance_post(
    Extension(app): Extension<Arc<Web3ProxyApp>>,
    TypedHeader(Authorization(bearer)): TypedHeader<Authorization<Bearer>>,
    Path(mut params): Path<HashMap<String, String>>,
) -> Web3ProxyResponse {
    // I suppose this is ok / good, so people don't spam this endpoint as it is not "cheap"
    // Check that the user is logged-in and authorized
    // The semaphore keeps a user from submitting tons of transactions in parallel which would DOS our backends
    let (_, _semaphore) = app.bearer_is_authorized(bearer).await?;

    // Get the transaction hash, and the amount that the user wants to top up by.
    // Let's say that for now, 1 credit is equivalent to 1 dollar (assuming any stablecoin has a 1:1 peg)
    let tx_hash: H256 = params
        .remove("tx_hash")
        .ok_or(Web3ProxyError::BadRequest(
            "You have not provided a tx_hash".into(),
        ))?
        .parse()
        .map_err(|err| {
            Web3ProxyError::BadRequest(format!("unable to parse tx_hash: {}", err).into())
        })?;

    let db_conn = app.db_conn().context("query_user_stats needs a db")?;

    // Return straight false if the tx was already added ...
    if increase_on_chain_balance_receipt::Entity::find()
        .filter(increase_on_chain_balance_receipt::Column::TxHash.eq(tx_hash.encode_hex()))
        .one(&db_conn)
        .await?
        .is_some()
    {
        // this will be status code 200, not 204
        let response = Json(json!({
            "result": "success",
            "message": "this transaction was already in the database",
        }))
        .into_response();

        return Ok(response);
    }

    // get the transaction receipt
    let transaction_receipt = app
        .internal_request::<_, Option<TransactionReceipt>>("eth_getTransactionReceipt", (tx_hash,))
        .await?
        .ok_or(Web3ProxyError::BadRequest(
            format!("transaction receipt not found for {}", tx_hash,).into(),
        ))?;

    trace!("Transaction receipt: {:#?}", transaction_receipt);

    // TODO: if the transaction doesn't have enough confirmations yet, add it to a queue to try again later

    let payment_factory_address = app
        .config
        .deposit_factory_contract
        .context("A deposit_contract must be provided in the config to parse payments")?;

    let payment_factory =
        PaymentFactory::new(payment_factory_address, app.internal_provider().clone());

    // TODO: this should be in the abigen stuff somewhere
    // let payment_factory_deposit_topic = payment_factory.something?;
    let payment_factory_deposit_topic = app
        .config
        .deposit_topic
        .context("A deposit_topic must be provided in the config to parse payments")?;

    let bloom_input = BloomInput::Raw(payment_factory_deposit_topic.as_bytes());

    // do a quick check that this transaction contains the required log
    if !transaction_receipt.logs_bloom.contains_input(bloom_input) {
        return Err(Web3ProxyError::BadRequest("no matching logs found".into()));
    }

    let mut response_data = vec![];

    let txn = db_conn.begin().await?;

    // parse the logs from the transaction receipt
    // there might be multiple logs with the event if the transaction is doing things in bulk
    // TODO: change the indexes to be unique on (chain, txhash, log_index)
    for log in transaction_receipt.logs {
        // TODO: use abigen to make this simpler?
        if log.address != payment_factory_address {
            trace!(
                "Out: Address is not relevant: {:?} {:?}",
                log.address,
                payment_factory_address,
            );
            continue;
        }

        // TODO: use abigen to make this simpler?
        let topic = log.topics.get(0).unwrap();
        if *topic != payment_factory_deposit_topic {
            trace!(
                "Out: Topic is not relevant: {:?} {:?}",
                topic,
                payment_factory_deposit_topic,
            );
            continue;
        }

        // TODO: use abigen to make this simpler
        let (recipient_account, payment_token_address, payment_token_wei): (
            Address,
            Address,
            U256,
        ) = match ethers::abi::decode(
            &[ParamType::Address, ParamType::Address, ParamType::Uint(256)],
            &log.data,
        ) {
            Ok(tpl) => (
                tpl.get(0)
                    .unwrap()
                    .clone()
                    .into_address()
                    .context("Could not decode recipient")?,
                tpl.get(1)
                    .unwrap()
                    .clone()
                    .into_address()
                    .context("Could not decode token")?,
                tpl.get(2)
                    .unwrap()
                    .clone()
                    .into_uint()
                    .context("Could not decode amount")?,
            ),
            Err(err) => {
                trace!("Out: Could not decode! {:?}", err);
                continue;
            }
        };

        // there is no need to check that payment_token_address is an allowed token
        // the smart contract already reverts if the token isn't accepted

        // we used to skip here if amount is 0, but that means the txid wouldn't ever show up in the database which could be confusing
        // also, the contract already reverts for 0 value

        let log_index = log
            .log_index
            .context("no log_index. transaction must not be confirmed")?;

        // the internal provider will handle caching
        let payment_token = IERC20::new(payment_token_address, app.internal_provider().clone());

        // get the decimals for the token
        let payment_token_decimals = payment_token.decimals().call().await?;

        // TODO: how should we do U256 to Decimal?
        let decimal_shift = Decimal::from(10).pow(payment_token_decimals.as_u64());

        let mut payment_token_amount =
            Decimal::from_str(&format!("{}", payment_token_wei)).unwrap();
        payment_token_amount.set_scale(payment_token_decimals.as_u32())?;
        payment_token_amount /= decimal_shift;

        info!(
            "Found deposit transaction for: {:?} {:?} {:?}",
            recipient_account, payment_token_address, payment_token_amount
        );

        // Encoding is inefficient, revisit later
        let recipient = match user::Entity::find()
            .filter(user::Column::Address.eq(recipient_account.encode_hex()))
            .one(&db_conn)
            .await?
        {
            Some(x) => x,
            None => todo!("make their account"),
        };

        // For now we only accept stablecoins
        // And we hardcode the peg (later we would have to depeg this, for example
        // 1$ = Decimal(1) for any stablecoin
        // TODO: Let's assume that people don't buy too much at _once_, we do support >$1M which should be fine for now
        debug!(
            "Arithmetic is: {:?} / 10 ^ {:?} = {:?}",
            payment_token_wei, payment_token_decimals, payment_token_amount
        );

        // Check if the item is in the database. If it is not, then add it into the database
        // TODO: select ... for update
        let user_balance = balance::Entity::find()
            .filter(balance::Column::UserId.eq(recipient.id))
            .one(&txn)
            .await?;

        match user_balance {
            Some(user_balance) => {
                // Update the entry, adding the balance
                let balance_plus_amount = user_balance.available_balance + payment_token_amount;

                let mut active_user_balance = user_balance.into_active_model();
                active_user_balance.available_balance = sea_orm::Set(balance_plus_amount);

                debug!("New user balance: {:?}", active_user_balance);
                active_user_balance.save(&txn).await?;
            }
            None => {
                // Create the entry with the respective balance
                let active_user_balance = balance::ActiveModel {
                    available_balance: sea_orm::ActiveValue::Set(payment_token_amount),
                    user_id: sea_orm::ActiveValue::Set(recipient.id),
                    ..Default::default()
                };

                debug!("New user balance: {:?}", active_user_balance);
                active_user_balance.save(&txn).await?;
            }
        };

        debug!("Setting tx_hash: {:?}", tx_hash);
        let receipt = increase_on_chain_balance_receipt::ActiveModel {
            tx_hash: sea_orm::ActiveValue::Set(tx_hash.encode_hex()),
            chain_id: sea_orm::ActiveValue::Set(app.config.chain_id),
            // TODO: log_index
            amount: sea_orm::ActiveValue::Set(payment_token_amount),
            deposit_to_user_id: sea_orm::ActiveValue::Set(recipient.id),
            ..Default::default()
        };

        receipt.save(&txn).await?;

        let x = json!({
            "tx_hash": tx_hash,
            "log_index": log_index,
            "token": payment_token_address,
            "amount": payment_token_amount,
        });

        response_data.push(x);
    }

    txn.commit().await?;
    debug!("Saved to db");

    let response = (StatusCode::CREATED, Json(json!(response_data))).into_response();

    Ok(response)
}