use std::io::{
    self,
    Write,
    Read,
    BufRead,
    BufReader,
};

use std::net::TcpStream;

use message;
use message::{ Command, Message };
use ::{ DEBUG, Result, IrscError };


#[cfg(feature = "ssl")]
use openssl::ssl::{ SslContext, SslMethod, SslStream };

/// Yes, I don't like the name either, but it's private, so...
enum StreamKind {
    Plain(TcpStream),
    #[cfg(feature = "ssl")]
    Ssl(SslStream)
}

impl Write for StreamKind {
    fn write(&mut self, buf: &[u8]) -> io::Result<usize> {
        match *self {
            StreamKind::Plain(ref mut s) => s.write(buf),
            #[cfg(feature = "ssl")]
            StreamKind::Ssl(ref mut s) => s.write(buf)
        }
    }

    fn flush(&mut self) -> io::Result<()> {
        match *self {
            StreamKind::Plain(ref mut s) => s.flush(),
            #[cfg(feature = "ssl")]
            StreamKind::Ssl(ref mut s) => s.flush()
        }
    }
}

impl Read for StreamKind {
    fn read(&mut self, buf: &mut [u8]) -> io::Result<usize> {
        match *self {
            StreamKind::Plain(ref mut s) => s.read(buf),
            #[cfg(feature = "ssl")]
            StreamKind::Ssl(ref mut s) => s.read(buf)
        }
    }
}

pub struct Server {
    stream: Option<StreamKind>,
}

impl Server {
    pub fn new() -> Server {
        Server {
            stream: None
        }
    }

    fn handle_event(&mut self, msg: &message::Message) {
        if *msg.command == "PING" {
            let _ = self.send(Command::Pong { server1: msg.suffix.clone(), server2: None }.to_message());
        }
    }

    pub fn connect(&mut self, host: String, port: u16) -> Result<()> {
        let s = &mut self.stream;
        match *s { Some(_) => return Err(IrscError::AlreadyConnected), _ => () };
        *s = match TcpStream::connect((host.as_ref(), port)) {
            Ok(tcp) => Some(StreamKind::Plain(tcp)),
            Err(e) => return Err(IrscError::Io(e))
        };

        Ok(())
    }

    #[cfg(feature = "ssl")]
    pub fn connect_ssl(&mut self, host: String, port: u16) -> Result<()> {
        let mut s = self.stream.lock();
        match *s { Some(_) => return Err(IrscError::AlreadyConnected), _ => () };
        let tcp_stream = match TcpStream::connect((host.as_ref(), port)) {
            Ok(tcp) => Some(tcp),
            Err(e) => return Err(IrscError::Io(e))
        };

        let ssl = SslContext::new(SslMethod::Tlsv1);
        let ssl_stream = SslStream::new(&ssl, tcp_stream);
        *s = ssl_stream;

        Ok(())
    }

    #[inline]
    fn sendraw(&mut self, s: &str) -> Result<()> {
        info!(">> {}", s);
        if DEBUG && s.len() > 512 {
            panic!("Message too long, kittens will die if this runs in release mode. Msg: {}", s)
        }

        self.stream.as_mut()
            .ok_or(IrscError::NotConnected)
            .and_then(|mut stream| stream.write_all(s.as_bytes())
                                         .and_then(|_| stream.flush())
                                         .map_err(IrscError::Io))
    }

    pub fn send(&mut self, msg: message::Message) -> Result<()> {
        self.sendraw(&msg.to_string())
    }

    pub fn join(&mut self, channel: &str) -> Result<()> {
        self.sendraw(format!("JOIN {}\r\n", channel).as_ref())
    }

    pub fn part(&mut self, channel: &str) -> Result<()> {
        self.sendraw(format!("PART {}\r\n", channel).as_ref())
    }

    pub fn nick(&mut self, nick: &str) -> Result<()> {
        self.sendraw(format!("NICK {}\r\n", nick).as_ref())
    }

    pub fn user(&mut self, username: &str, hostname: &str, servername: &str, realname: &str) -> Result<()> {
        self.sendraw(format!("USER {} {} {} :{}\r\n", username, hostname, servername, realname).as_ref())
    }

    pub fn password(&mut self, password: &str) -> Result<()> {
        self.sendraw(format!("PASS {}\r\n", password).as_ref())
    }

    pub fn msg(&mut self, target: &str, message: &str) -> Result<()> {
        self.sendraw(format!("PRIVMSG {} :{}\r\n", target, message).as_ref())
    }

    pub fn listen(&mut self, events: &[fn(&mut Server, &Message)]) -> Result<()> {
        let reader = BufReader::new(match self.stream {
            Some(StreamKind::Plain(ref s)) => (*s).try_clone().unwrap(),
            #[cfg(feature = "ssl")]
            Some(StreamKind::Ssl(ref s)) => (*s).try_clone().unwrap(),
            None => return Err(IrscError::NotConnected)
        });

        for line in reader.lines() {
            let line = line.unwrap().parse();

            if let Ok(msg) = line {
                println!("{:?}", msg);
                self.handle_event(&msg);
                for e in events.iter() {
                    e(self, &msg)
                }
            }
        }
        Ok(())
    }
}