#!/usr/bin/python -u
# -*- coding: utf-8 -1 -*-

# Welcome to WelcomeBot.  Find source, documentation, etc here: https://github.com/shaunagm/WelcomeBot/  Licensed https://creativecommons.org/licenses/by-sa/2.0/

# Import some necessary libraries.
import socket, sys, time, csv, Queue, random, re, pdb, select, os.path, datetime
from threading import Thread

# To configure bot, please make changes in bot_settings.py
import bot_settings as settings

#########################
### Class Definitions ###
#########################

# Defines a bot
class Bot(object):

    def __init__(self, botnick=settings.botnick, welcome_message=settings.welcome_message,
        nick_source=settings.nick_source, wait_time=settings.wait_time,
        hello_list=settings.hello_list, help_list=settings.help_list):
    	self.botnick = botnick
    	self.welcome_message = welcome_message
        self.nick_source = nick_source
        self.wait_time = wait_time
        self.known_nicks = []
        with open(self.nick_source, 'rb') as csv_file:
            csv_file_data = csv.reader(csv_file, delimiter=',', quotechar='|')
            for row in csv_file_data:
                row = clean_nick(row[0])    # Sends nicks to remove unnecessary decorators. Hacked to deal with list-of-string format. :(
                self.known_nicks.append([row])
        self.newcomers = []
        self.hello_regex = re.compile(get_regex(hello_list, botnick), re.I)  # Regexed version of hello list
        self.help_regex = re.compile(get_regex(help_list, botnick), re.I)  # Regexed version of help list

    # Adds the current newcomer's nick to nicks.csv and known_nicks.
    def add_known_nick(self,new_known_nick):
        new_known_nick = new_known_nick.replace("_", "")
        self.known_nicks.append([new_known_nick])
        with open(self.nick_source, 'a') as csvfile:
            nickwriter = csv.writer(csvfile, delimiter=',', quotechar='|',
                                quoting=csv.QUOTE_MINIMAL)
            nickwriter.writerow([new_known_nick])

# Defines a newcomer object
class NewComer(object):

    def __init__(self, nick, bot):
        self.nick = nick
	self.clean_nick = clean_nick(self.nick)
        self.born = time.time()
        bot.newcomers.append(self)

    def around_for(self):
        return time.time() - self.born


#########################
### Startup Functions ###
#########################

# Creates a socket that will be used to send and receive messages,
# then connects the socket to an IRC server and joins the channel.
def irc_start(server): # pragma: no cover  (this excludes this function from testing)
    ircsock = socket.socket(socket.AF_INET, socket.SOCK_STREAM)
    ircsock.connect((server, 6667))  # Here we connect to server using port 6667.
    return ircsock

def join_irc(ircsock, botnick, channel):
    ircsock.send("USER {0} {0} {0} :Robot d'accueil de https://april.org."
             ".\n".format(botnick))  # bot authentication
    ircsock.send("NICK {}\n".format(botnick))  # Assign the nick to the bot.
    if os.path.isfile("password.txt"):
        with open("password.txt", 'r') as f:
            password = f.read()
            if registered == True:
                ircsock.send("PRIVMSG {} {} {} {}".format("NickServ","IDENTIFY", botnick, password))
    ircsock.send("JOIN {} \n".format(channel)) # Joins channel

# Reads the messages from the server and adds them to the Queue and prints
# them to the console. This function will be run in a thread, see below.
def msg_handler(ircsock):  # pragma: no cover  (this excludes this function from testing)
    new_msg = ircsock.recv(2048)  # receive data from the server
    new_msg = new_msg.strip('\n\r')  # removing any unnecessary linebreaks
    if new_msg != '':
        print(datetime.datetime.now().isoformat() + " " + new_msg) #### Potentially make this a log instead?
    return new_msg

# Called by bot on startup.  Builds a regex that matches one of the options + (space) botnick.
def get_regex(options, botnick):
    pattern = "("
    for s in options:
        pattern += s
        pattern += "|"
    pattern = pattern[:-1]
    pattern += ").({})".format(botnick)
    return pattern


#########################
### General Functions ###
#########################

# Welcomes the "person" passed to it.
def welcome_nick(newcomer, ircsock, channel, channel_greeters):
    ircsock.send("PRIVMSG {0} :Bonjour {1} Je suis un robot IRC. Ce salon est tranquille actuellement, "
                 "je me permets donc de vous dire bonjour. Je signale à des actifs de l'April "
                 "(comme {2}) que vous êtes là."
                 "\n".format(channel, newcomer, greeter_string(channel_greeters)))

    ircsock.send("PRIVMSG {0} :{1} Si personne ne répond d'ici quelques minutes, "
                 "vous pouvez nous envoyer un courriel à contact@april.org (vous recevrez une demande "
                 "de confirmation, merci d'y répondre pour diffuser votre message) ou revenir plus tard."
                 "\n".format(channel, newcomer))

    ircsock.send("PRIVMSG {0} :{1} Vous êtes désormais dans ma liste d'identifiants connus. "
                 "Je ne vous enverrai plus de message."
                 "\n".format(channel, newcomer))


# Checks and manages the status of newcomers.
def process_newcomers(bot, newcomerlist, ircsock, channel, greeters, welcome=1):
    for person in newcomerlist:
        if welcome == 1:
            welcome_nick(person.nick, ircsock, channel, greeters)
        bot.add_known_nick(person.nick)
        bot.newcomers.remove(person)

# Checks for messages.
def parse_messages(ircmsg):
    try:
        actor = ircmsg.split(":")[1].split("!")[0] # and get the nick of the msg sender
        return " ".join(ircmsg.split()), actor
    except:
        return None, None

# Cleans a nickname of decorators/identifiers
def clean_nick(actor):
    if actor:   # In case an empty string gets passed
        if actor.find("april") != -1:  # If nick is like "openhatch_1234" don't clean.
            return actor
        actor = actor.replace("_", "")  # Strip out trailing _ characters
        while(actor[-1]) in "1234567890": # Remove trailing numbers
            actor = actor[:-1]
        if ('|' in actor):  # Remove location specifiers, etc.
            actor = actor.split('|')[0]
    return actor

# Parses messages and responds to them appropriately.
def message_response(bot, ircmsg, actor, ircsock, channel, greeters):

    # if someone other than a newcomer speaks into the channel
    if ircmsg.find("PRIVMSG " + channel) != -1 and actor not in [i.nick for i in bot.newcomers]:
        process_newcomers(bot,bot.newcomers, ircsock, channel, greeters, welcome=0)   # Process/check newcomers without welcoming them

    # if someone (other than the bot) joins the channel
    if ircmsg.find("JOIN " + channel) != -1 and actor != bot.botnick:
        if [actor.replace("_", "")] not in bot.known_nicks + [i.nick for i in bot.newcomers]:  # And they're new
            NewComer(actor, bot)

    # if someone changes their nick while still in newcomers update that nick
    if ircmsg.find("NICK :") != -1 and actor != bot.botnick:
        for i in bot.newcomers: # if that person was in the newlist
            if i.nick == actor:
                i.nick = ircmsg.split(":")[2] # update to new nick (and clean up the nick)
		i.clean_nick = clean_nick(i.nick)

    # If someone parts or quits the #channel...
    if ircmsg.find("PART " + channel) != -1 or ircmsg.find("QUIT") != -1:
        for i in bot.newcomers:  # and that person is on the newlist
            if clean_nick(actor) == i.clean_nick:
                bot.newcomers.remove(i)   # remove them from the list

    # If someone talks to (or refers to) the bot.
    if bot.botnick.lower() and "PRIVMSG".lower() in ircmsg.lower():
        if bot.hello_regex.search(ircmsg):
            bot_hello(random.choice(settings.hello_list), actor, ircsock, channel)
        if bot.help_regex.search(ircmsg):
            bot_help(ircsock, channel)

    # If someone tries to change the wait time...
    if ircmsg.find(bot.botnick + " --wait-time ") != -1:
        bot.wait_time = wait_time_change(actor, ircmsg, ircsock, channel, greeters, bot)  # call this to check and change it

    # If the server pings us then we've got to respond!
    if ircmsg.find("PING :") != -1:
        pong(ircsock, ircmsg)


#############################################################
### Bot Response Functions (called by message_response()) ###
#############################################################

# Responds to a user that inputs "Hello Mybot".
def bot_hello(greeting, actor, ircsock, channel):
    ircsock.send("PRIVMSG {0} :{1} {2}\n".format(channel, greeting, actor))

# Explains what the bot is when queried.
def bot_help(ircsock, channel):
    ircsock.send("PRIVMSG {} :I'm a bot!  I'm from here <https://github"
                 ".com/shaunagm/oh-irc-bot>.  You can change my behavior by "
                 "submitting a pull request or by talking to shauna"
                 ".\n".format(channel))

# Returns a grammatically correct string of the channel_greeters.
def greeter_string(greeters):
    greeterstring = ""
    if len(greeters) > 2:
        for name in greeters[:-1]:
            greeterstring += "{}, ".format(name)
        greeterstring += "et {}".format(greeters[-1])
    elif len(greeters) == 2:
        greeterstring = "{0} et {1}".format(greeters[0], greeters[1])
    else:
        greeterstring = greeters[0]
    return greeterstring

# Changes the wait time from the channel.
def wait_time_change(actor, ircmsg, ircsock, channel, channel_greeters, bot):
    for admin in channel_greeters:
        if actor == admin:
            finder = re.search(r'\d\d*', re.search(r'--wait-time \d\d*', ircmsg)
                            .group())
            ircsock.send("PRIVMSG {0} :{1} the wait time is changing to {2} "
                         "seconds.\n".format(channel, actor, finder.group()))
            new_wait_time = int(finder.group())
            return new_wait_time
    ircsock.send("PRIVMSG {0} :{1} you are not authorized to make that "
                 "change. Please contact one of the channel greeters, like {2}, for "
                 "assistance.\n".format(channel, actor, greeter_string(channel_greeters)))
    unchanged_wait_time = bot.wait_time
    return unchanged_wait_time

# Responds to server Pings.
def pong(ircsock, ircmsg):
    response = "PONG :" + ircmsg.split("PING :")[1] + "\n"
    ircsock.send(response)


##########################
### The main function. ###
##########################

def main():
    print datetime.datetime.now().isoformat() + " WelcomeBot starting…"
    ircsock = irc_start(settings.server)
    join_irc(ircsock, settings.botnick, settings.channel)
    WelcomeBot = Bot()
    while 1:  # Loop forever
        ready_to_read, b, c = select.select([ircsock],[],[], 1)  # b&c are ignored here
        process_newcomers(WelcomeBot, [i for i in WelcomeBot.newcomers if i.around_for() > WelcomeBot.wait_time], ircsock,settings.channel, settings.channel_greeters)
        if ready_to_read:
            last_read = datetime.datetime.utcnow()
            ircmsg = msg_handler(ircsock) # gets message from ircsock
            ircmsg, actor = parse_messages(ircmsg)  # parses it or returns None
            if ircmsg is not None: # If we were able to parse it
                message_response(WelcomeBot, ircmsg, actor, ircsock, settings.channel, settings.channel_greeters)  # Respond to the parsed message
        if datetime.datetime.utcnow() - last_read > datetime.timedelta(minutes=10):
                            raise Exception('timeout: nothing to read on socket since 10 minutes')

if __name__ == "__main__": # This line tells the interpreter to only execute main() if the program is being run, not imported.
    sys.exit(main())