use std::sync::Arc;

use either::Either;
use futures_core::future::BoxFuture;
use futures_core::stream::BoxStream;
use futures_util::{FutureExt, TryStreamExt};
use hashbrown::HashMap;

use crate::common::StatementCache;
use crate::error::Error;
use crate::executor::{Execute, Executor};
use crate::ext::ustr::UStr;
use crate::sqlite::connection::describe::describe;
use crate::sqlite::connection::ConnectionHandle;
use crate::sqlite::statement::{SqliteStatement, StatementHandle};
use crate::sqlite::{Sqlite, SqliteArguments, SqliteColumn, SqliteConnection, SqliteRow};
use crate::statement::StatementInfo;

fn prepare<'a>(
    conn: &mut ConnectionHandle,
    statements: &'a mut StatementCache<SqliteStatement>,
    statement: &'a mut Option<SqliteStatement>,
    query: &str,
    persistent: bool,
) -> Result<&'a mut SqliteStatement, Error> {
    if !persistent || statements.capacity() == 0 {
        *statement = Some(SqliteStatement::prepare(conn, query, false)?);
        return Ok(statement.as_mut().unwrap());
    }

    let exists = statements.contains_key(query);

    if !exists {
        let statement = SqliteStatement::prepare(conn, query, true)?;
        statements.insert(query, statement);
    }

    let statement = statements.get_mut(query).unwrap();

    if exists {
        // as this statement has been executed before, we reset before continuing
        // this also causes any rows that are from the statement to be inflated
        statement.reset();
    }

    Ok(statement)
}

fn bind(
    statement: &mut SqliteStatement,
    arguments: Option<SqliteArguments<'_>>,
) -> Result<(), Error> {
    if let Some(arguments) = arguments {
        arguments.bind(&*statement)?;
    }

    Ok(())
}

fn emplace_row_metadata(
    statement: &StatementHandle,
    columns: &mut Vec<SqliteColumn>,
    column_names: &mut HashMap<UStr, usize>,
) -> Result<(), Error> {
    columns.clear();
    column_names.clear();

    let num = statement.column_count();

    column_names.reserve(num);
    columns.reserve(num);

    for i in 0..num {
        let name: UStr = statement.column_name(i).to_owned().into();
        let type_info = statement.column_type_info(i);

        columns.push(SqliteColumn {
            ordinal: i,
            name: name.clone(),
            type_info,
        });

        column_names.insert(name, i);
    }

    Ok(())
}

impl<'c> Executor<'c> for &'c mut SqliteConnection {
    type Database = Sqlite;

    fn fetch_many<'e, 'q: 'e, E: 'q>(
        self,
        mut query: E,
    ) -> BoxStream<'e, Result<Either<u64, SqliteRow>, Error>>
    where
        'c: 'e,
        E: Execute<'q, Self::Database>,
    {
        let s = query.query();
        let arguments = query.take_arguments();

        Box::pin(try_stream! {
            let SqliteConnection {
                handle: ref mut conn,
                ref mut statements,
                ref mut statement,
                ref worker,
                ref mut scratch_row_column_names,
                ..
            } = self;

            // prepare statement object (or checkout from cache)
            let mut stmt = prepare(conn, statements, statement, s, arguments.is_some())?;

            // bind arguments, if any, to the statement
            bind(&mut stmt, arguments)?;

            while let Some((handle, columns, last_row_values)) = stmt.execute()? {
                let mut have_metadata = false;

                // tell the worker about the new statement
                worker.execute(handle);

                // wake up the worker if needed
                // the worker parks its thread on async-std when not in use
                worker.wake();

                loop {
                    // save the rows from the _current_ position on the statement
                    // and send them to the still-live row object
                    SqliteRow::inflate_if_needed(handle, &*columns, last_row_values.take());

                    let s = worker.step(handle).await?;

                    if !have_metadata {
                        have_metadata = true;

                        emplace_row_metadata(
                            handle,
                            Arc::make_mut(columns),
                            Arc::make_mut(scratch_row_column_names),
                        )?;
                    }

                    match s {
                        Either::Left(changes) => {
                            r#yield!(Either::Left(changes));

                            break;
                        }

                        Either::Right(()) => {
                            let (row, weak_values_ref) = SqliteRow::current(
                                *handle,
                                columns,
                                scratch_row_column_names
                            );

                            let v = Either::Right(row);
                            *last_row_values = Some(weak_values_ref);

                            r#yield!(v);
                        }
                    }
                }
            }

            Ok(())
        })
    }

    fn fetch_optional<'e, 'q: 'e, E: 'q>(
        self,
        query: E,
    ) -> BoxFuture<'e, Result<Option<SqliteRow>, Error>>
    where
        'c: 'e,
        E: Execute<'q, Self::Database>,
    {
        let mut s = self.fetch_many(query);

        Box::pin(async move {
            while let Some(v) = s.try_next().await? {
                if let Either::Right(r) = v {
                    return Ok(Some(r));
                }
            }

            Ok(None)
        })
    }

    #[doc(hidden)]
    fn describe<'e, 'q: 'e, E: 'q>(
        self,
        query: E,
    ) -> BoxFuture<'e, Result<StatementInfo<Sqlite>, Error>>
    where
        'c: 'e,
        E: Execute<'q, Self::Database>,
    {
        describe(self, query.query()).boxed()
    }
}