#!/usr/bin/env python3

import ast
from datetime import datetime
import math
import socket
from time import sleep

import pickle
import pymongo
import pika

from params import rmq_params, socket_params

def checkpoint(message):
    """Prints [CHeckpoint] <message>
    """
    print("[Checkpoint] {}".format(message))

def get_info(id):
    """Looks up all data for an id
    """
    checkpoint("Looking up data for id \'{}\'".format(id))

    # Connect to mongodb & return user
    collection = pymongo.MongoClient().group23.bac_monitoring
    return collection.find({'id': 123456})[0]

def add_drink(id):
    """Adds 1 drink to the user
    """
    checkpoint("Adding 1 drink for id \'{}\'".format(id))

    ## Connect to mongodb & add drink
    collection = pymongo.MongoClient().group23.bac_monitoring
    
    curr_time = int(datetime.today().timestamp())
    collection.update({'id': id}, {'$push': {'drinks': curr_time}})

def remove_drinks(id=None, finished_drinks=None):
    """Remove finished drinks. Removes all drinks from all ids
    if id==None, all drinks from specific if if finished_drinks==None, otherwise
    removes drinks in finished_drinks
    """
    # Connecto to mongodb
    collection = pymongo.MongoClient().group23.bac_monitoring

    # Remove all drinks from all users
    if id == None:
        checkpoint('Removing all drinks for all users')
        collection.update({}, {'$set': {'drinks': []}}, multi=True)
    # Remove all drinks for specific user
    elif finished_drinks == None:
        checkpoint("Removing all drinks for user \'{}\'".format(id))
        collection.update({'id': id}, {'$set': {'drinks': []}})
    # Remove only specified drinks
    else:
        checkpoint("Removing drinks: \'{}\' for user \'{}\'"
            .format(finished_drinks, id))
        for drink in finished_drinks:
            collection.update({'id': id}, {'$pull': {'drinks': drink}})     

def allowed_drinks(id):
    """Gets the amount of drinks someone is allowed to have, taking into account
    their body weight & gender
    """
    ## Calculate current BAC
    # Lookup BAC for 1 drink
    user_info = get_info(id)
    bac_lookup = {'M': {'100': .06, '120': .05, '140': .045, '160': .04,
                        '180': .035, '200': .03, '220': .033, '240': .025},
                  'F': {'100': .07, '120': .06, '140': .05,  '160': .04,
                        '180': .04,  '200': .035, '220': .03, '240': .03}}
    # Lookup gender & rounded weight
    weight = int(20 * round(float(user_info['weight']) / 20))
    one_drink = bac_lookup[user_info['gender']][str(weight)]

    # Add up BAC for each drink
    bac = 0
    finished_drinks = []
    # According the the BAC chart, for ever 40 minutes .01% is subtracted from BAC
    #  and there are 2400 seconds on 40 minutes
    curr_time = int(datetime.today().timestamp()) / 2400
    for drink in user_info['drinks']:
        # Calculate drinking time and bac
        drink_time = drink / 2400
        drinking_time = curr_time - drink_time
        # Calculate BAC from specific drink, or remove it 
        drink_bac = one_drink - (drinking_time * .01)
        if drink_bac == 0:
            finished_drinks.append[drink]
        else:
            bac += drink_bac

    # Debugging
    checkpoint("BAC for \'{}\': {}".format(id, bac))

    # Remove all drinks not contributing to current BAC
    remove_drinks(id, finished_drinks)
    
    # Calculate drinks left
    drinks_left = int(math.ceil((.06 - bac) / one_drink))
    checkpoint("Allowed drinks for id \'{}\': {}".format(id, drinks_left))
   
    return drinks_left

def order_callback(ch, method, properties, body):
    """Process 1 drink being ordered
    """

    # Decode body
    body = body.decode('utf-8')
    client_params = ast.literal_eval(body)

    # Extract things from client data
    id = int(client_params.get('id'))
    host = client_params.get('ip')
    port = int(client_params.get('port'))
    
    add_drink(id)
    drinks = allowed_drinks(id)

    # Add drink for user

    # Try to send response to client
    try:
        # Connect to client socket
        s = socket.socket(socket.AF_INET, socket.SOCK_STREAM)
        s.connect((host, port))
        checkpoint("Created socket at {} on port {}".format(host, port))

        # Send num drinks to client
        s.send(pickle.dumps(drinks))
        s.close()
    except Exception as ex:
        print(ex)

def reject_callback(ch, method, properties, body):
    """Remove most recent drink for user
    """

    # Decode body
    id = int(body.decode('utf-8'))

    # Remove most recent drink
    remove_drink = get_info(id)['drinks'][-1]
    remove_drinks(id, [remove_drink])
    checkpoint("Removed most recent drink for \'{}\'".format(id))

def main():
    """Create & start 'drinks' queue for submitting drinks
    """
    # Temp TODO
    remove_drinks(123456)

    # Connect to RMQ
    credentials = pika.PlainCredentials(rmq_params['username'], rmq_params['password'])
    parameters = pika.ConnectionParameters(host='localhost',
                                           virtual_host=rmq_params['vhost'],
                                           credentials=credentials)
    connection = pika.BlockingConnection(parameters)
    channel = connection.channel()

    checkpoint('Connect to RMQ server')

    # Create order queue
    checkpoint('Setting up exchanges and queue...')
    channel.exchange_declare(exchange=rmq_params['exchange'],
                             exchange_type='direct',
                             auto_delete=True)
    channel.queue_declare(queue=rmq_params['order_queue'], auto_delete=True)
    channel.queue_bind(exchange=rmq_params['exchange'], queue=rmq_params['order_queue'])
    channel.queue_declare(queue=rmq_params['reject_queue'], auto_delete=True)
    channel.queue_bind(exchange=rmq_params['exchange'], queue=rmq_params['reject_queue'])

    # Start consuming drink queue
    channel.basic_consume(lambda ch, method, properties,
                          body: order_callback(ch, method, properties, body),
                          queue=rmq_params['order_queue'], no_ack=True)
    channel.basic_consume(lambda ch, method, properties,
                          body: reject_callback(ch, method, properties, body),
                          queue=rmq_params['reject_queue'], no_ack=True)

    checkpoint("Consuming RMQ queues: \'{}\' and \'{}\'"
        .format(rmq_params['order_queue'], rmq_params['reject_queue']))
    channel.start_consuming()

main()