use std::net::SocketAddr;
use std::sync::Arc;
use std::time::Duration;

use bytes::IntoBuf;
use hyper::{Body, Method, Request, StatusCode};
use hyper::client::Client;
use futures::stream::futures_unordered::FuturesUnordered;
use futures::stream::StreamExt;

use crate::data::*;
use crate::error::Error;
use crate::proto::Message;
use crate::membership::System;

pub async fn rpc_call_many(sys: Arc<System>,
						   to: &[UUID],
						   msg: &Message,
						   timeout: Duration)
	-> Vec<Result<Message, Error>>
{
	let mut resp_stream = to.iter()
		.map(|to| rpc_call(sys.clone(), to, msg, timeout))
		.collect::<FuturesUnordered<_>>();

	let mut results = vec![];
	while let Some(resp) = resp_stream.next().await {
		results.push(resp);
	}
	results
}

pub async fn rpc_try_call_many(sys: Arc<System>,
						       to: &[UUID],
						       msg: &Message,
						       stop_after: usize,
						       timeout: Duration)
	-> Result<Vec<Message>, Error>
{
	let mut resp_stream = to.iter()
		.map(|to| rpc_call(sys.clone(), to, msg, timeout))
		.collect::<FuturesUnordered<_>>();

	let mut results = vec![];
	let mut errors = vec![];

	while let Some(resp) = resp_stream.next().await {
		match resp {
			Ok(msg) => {
				results.push(msg);
				if results.len() >= stop_after {
					break
				}
			}
			Err(e) => {
				errors.push(e);
			}
		}
	}

	if results.len() >= stop_after {
		Ok(results)
	} else {
		let mut msg = "Too many failures:".to_string();
		for e in errors {
			msg += &format!("\n{}", e);
		}
		Err(Error::Message(msg))
	}
}

pub async fn rpc_call(sys: Arc<System>,
					  to: &UUID,
					  msg: &Message,
					  timeout: Duration)
	-> Result<Message, Error>
{
	let addr = {
		let members = sys.members.read().await;
		match members.status.get(to) {
			Some(status) => status.addr.clone(),
			None => return Err(Error::Message(format!("Peer ID not found"))),
		}
	};
	sys.rpc_client.call(&addr, msg, timeout).await
}

pub struct RpcClient {
	pub client: Client<hyper::client::HttpConnector, hyper::Body>,
}

impl RpcClient {
	pub fn new() -> Self {
		RpcClient{
			client: Client::new(),
		}
	}

	pub async fn call(&self,
					   to_addr: &SocketAddr,
					   msg: &Message,
					   timeout: Duration)
		-> Result<Message, Error>
	{
		let uri = format!("http://{}/rpc", to_addr);
		let req = Request::builder()
			.method(Method::POST)
			.uri(uri)
			.body(Body::from(rmp_to_vec_all_named(msg)?))?;

		let resp_fut = self.client.request(req);
		let resp = tokio::time::timeout(timeout, resp_fut).await??;

		if resp.status() == StatusCode::OK {
			let body = hyper::body::to_bytes(resp.into_body()).await?;
			let msg = rmp_serde::decode::from_read::<_, Message>(body.into_buf())?;
			match msg {
				Message::Error(e) => Err(Error::RPCError(e)),
				x => Ok(x)
			}
		} else {
			Err(Error::RPCError(format!("Status code {}", resp.status())))
		}
	}
}