import asyncio
import logging
import os
import random
import string
import subprocess
import time
from operator import itemgetter


import bpy
import mathutils
from pathlib import Path

from . import client, draw, helpers, ui
from .libs import umsgpack

logger = logging.getLogger(__name__)

# client_instance = None
client_keys = None
client_state = 1
server = None
context = None




def clean_scene(elements=helpers.BPY_TYPES.keys()):
    for datablock in elements:
        datablock_ref =getattr(bpy.data, helpers.BPY_TYPES[datablock])
        for item in datablock_ref:
            try:
                datablock_ref.remove(item)
            #Catch last scene remove
            except RuntimeError:
                pass


def upload_client_instance_position():
    username = bpy.context.window_manager.session.username
    if client.instance:

        key = "Client/{}".format(username)

        
        current_coords = draw.get_client_view_rect()
        client_list = client.instance.get(key)

        if current_coords and client_list:
            if current_coords != client_list[0][1]['location']:
                client_list[0][1]['location'] = current_coords
                client.instance.set(key, client_list[0][1])
        

def update_client_selected_object(context):
    session = bpy.context.window_manager.session

    username = bpy.context.window_manager.session.username
    client_key = "Client/{}".format(username)
    client_data = client.instance.get(client_key)

    selected_objects = helpers.get_selected_objects(context.scene)

    if len(selected_objects) > 0:

        for obj in selected_objects:
            # if obj not in client_data[0][1]['active_objects']:
            client_data[0][1]['active_objects'] = selected_objects

            client.instance.set(client_key, client_data[0][1])
            break

    elif client_data and client_data[0][1]['active_objects']:
        client_data[0][1]['active_objects'] = []
        client.instance.set(client_key, client_data[0][1])

#TODO: cleanup
def init_datablocks():
    for datatype in helpers.BPY_TYPES.keys():
        for item in getattr(bpy.data, helpers.BPY_TYPES[datatype]):
            item.id = bpy.context.window_manager.session.username
            key = "{}/{}".format(datatype, item.name)
            client.instance.set(key)


def refresh_session_data():
    global client_keys, client_state

    keys = client.instance.list()

    if keys:
        client_keys = keys
    state = client.instance.state()

    if state:
        client_state = state


def default_tick():    
    refresh_session_data()
    upload_client_instance_position()
    
    return .2


def register_ticks():
    # REGISTER Updaters
    bpy.app.timers.register(default_tick)
    

def unregister_ticks():
    # REGISTER Updaters
    try:
        bpy.app.timers.unregister(default_tick)
    except:
        pass
    
# OPERATORS
class SessionJoinOperator(bpy.types.Operator):
    bl_idname = "session.join"
    bl_label = "join"
    bl_description = "connect to a net server"
    bl_options = {"REGISTER"}

    @classmethod
    def poll(cls, context):
        return True

    def execute(self, context):
        net_settings = context.window_manager.session
        # Scene setup
        if net_settings.clear_scene:
            clean_scene()

        # Session setup
        if net_settings.username == "DefaultUser":
            net_settings.username = "{}_{}".format(
                net_settings.username, randomStringDigits())

        username = str(context.window_manager.session.username)

        if len(net_settings.ip) < 1:
            net_settings.ip = "127.0.0.1"

        client.instance = client.Client()
        client.instance.connect(net_settings.username,
                                net_settings.ip, net_settings.port)

        # net_settings.is_running = True
        # bpy.ops.session.refresh()
        register_ticks()

        # Launch drawing module
        if net_settings.enable_draw:
            draw.renderer.run()

        return {"FINISHED"}


class SessionRefreshOperator(bpy.types.Operator):
    bl_idname = "session.refresh"
    bl_label = "refresh"
    bl_description = "refresh client ui keys "
    bl_options = {"REGISTER"}

    @classmethod
    def poll(cls, context):
        return True

    def execute(self, context):
        refresh_session_data()

        return {"FINISHED"}


class SessionPropertyAddOperator(bpy.types.Operator):
    bl_idname = "session.add_prop"
    bl_label = "add"
    bl_description = "broadcast a property to connected client_instances"
    bl_options = {"REGISTER"}

    property_path: bpy.props.StringProperty(default="None")
    depth: bpy.props.IntProperty(default=1)

    @classmethod
    def poll(cls, context):
        return True

    def execute(self, context):

        client.instance.add(self.property_path)

        return {"FINISHED"}


class SessionPropertyGetOperator(bpy.types.Operator):
    bl_idname = "session.get_prop"
    bl_label = "get"
    bl_description = "broadcast a property to connected client_instances"
    bl_options = {"REGISTER"}

    @classmethod
    def poll(cls, context):
        return True

    def execute(self, context):
        global client_instance

        client.instance.get("client")

        return {"FINISHED"}


class SessionPropertyRemoveOperator(bpy.types.Operator):
    bl_idname = "session.remove_prop"
    bl_label = "remove"
    bl_description = "broadcast a property to connected client_instances"
    bl_options = {"REGISTER"}

    property_path: bpy.props.StringProperty(default="None")

    @classmethod
    def poll(cls, context):
        return True

    def execute(self, context):
        try:
            del client.instance.property_map[self.property_path]

            return {"FINISHED"}
        except:
            return {"CANCELED"}


class SessionHostOperator(bpy.types.Operator):
    bl_idname = "session.create"
    bl_label = "create"
    bl_description = "create to a net session"
    bl_options = {"REGISTER"}

    @classmethod
    def poll(cls, context):
        return True

    def execute(self, context):
        global server

        net_settings = context.window_manager.session

        script_dir = os.path.join(os.path.dirname(os.path.abspath(__file__)),"server.py")

        python_path = Path(bpy.app.binary_path_python)
        cwd_for_subprocesses = python_path.parent

        server = subprocess.Popen(
            [str(python_path),script_dir],shell=False, stdout=subprocess.PIPE)

        bpy.ops.session.join()

        if net_settings.init_scene:
            init_datablocks()

        # client_instance.init()
        net_settings.is_admin = True

        return {"FINISHED"}


class SessionStopOperator(bpy.types.Operator):
    bl_idname = "session.stop"
    bl_label = "close"
    bl_description = "stop net service"
    bl_options = {"REGISTER"}

    @classmethod
    def poll(cls, context):
        return True

    def execute(self, context):
        global server
        global client_keys, client_state

        net_settings = context.window_manager.session

        if server:
            server.kill()
            time.sleep(0.25)

            server = None

        if client.instance:
            client.instance.exit()
            time.sleep(0.25)
            # del client_instance

            # client_instance = None
            client_keys = None
            net_settings.is_admin = False
            client_state = 1

            unregister_ticks()
            draw.renderer.stop()
        else:
            logger.debug("No server/client_instance running.")

        return {"FINISHED"}


class SessionPropertyRightOperator(bpy.types.Operator):
    bl_idname = "session.right"
    bl_label = "Change owner to"
    bl_description = "stop net service"
    bl_options = {"REGISTER"}

    key: bpy.props.StringProperty(default="None")

    @classmethod
    def poll(cls, context):
        return True

    def invoke(self, context, event):
        wm = context.window_manager
        return wm.invoke_props_dialog(self)

    def draw(self, context):
        layout = self.layout
        net_settings = context.window_manager.session

        col = layout.column()
        col.prop(net_settings, "clients")

    def execute(self, context):
        global server
        global client_keys, client_state

        net_settings = context.window_manager.session

        if net_settings.is_admin:
            val = client.instance.get(self.key)
            val[0][1]['id'] = net_settings.clients

            client.instance.set(key=self.key, value=val[0][1], override=True)

            print("Updating {} rights to {}".format(
                self.key, net_settings.clients))
        else:
            print("Not admin")

        return {"FINISHED"}


class SessionSnapUserOperator(bpy.types.Operator):
    bl_idname = "session.snapview"
    bl_label = "draw client_instances"
    bl_description = "Description that shows in blender tooltips"
    bl_options = {"REGISTER"}

    target_client = bpy.props.StringProperty()

    @classmethod
    def poll(cls, context):
        return True

    def execute(self, context):
        area, region, rv3d = draw.view3d_find()

        target_client = client.instance.get("Client/{}".format(self.target_client))
        if target_client:
            rv3d.view_location = target_client[0][1]['location'][0]
            rv3d.view_distance = 30.0

            return {"FINISHED"}

        return {"CANCELLED"}

        pass


# TODO: Rename to match official blender convention
classes = (
    SessionJoinOperator,
    SessionRefreshOperator,
    SessionPropertyAddOperator,
    SessionPropertyGetOperator,
    SessionStopOperator,
    SessionHostOperator,
    SessionPropertyRemoveOperator,
    SessionSnapUserOperator,
    SessionPropertyRightOperator,
)


def is_replicated(update):
    # global client_keys
    # dickt = dict(client_keys)
    object_type = update.id.bl_rna.name
    object_name = update.id.name

    #Master collection special cae
    if  update.id.name == 'Master Collection':
        object_type = 'Scene' 
        object_name = bpy.context.scene.name
    if 'Light' in update.id.bl_rna.name:
        object_type = 'Light' 
        
    key = "{}/{}".format(object_type, object_name)

    if client.instance.exist(key):
        return True
    else:
        logger.info("{} Not rep".format(key))
        return False


def get_datablock_from_update(update,context):
    item_type = update.id.__class__.__name__
    item_id = update.id.name
   
    datablock_ref = None

    if item_id == 'Master Collection':
        datablock_ref= bpy.context.scene
    elif item_type in helpers.BPY_TYPES.keys():
        datablock_ref = getattr(bpy.data, helpers.BPY_TYPES[update.id.__class__.__name__])[update.id.name]
    else:
        if item_id in bpy.data.lights.keys():
            datablock_ref = bpy.data.lights[item_id]
    

    return datablock_ref


def toogle_update_dirty(context, update):
    data_ref = get_datablock_from_update(update,context)
                    
    if data_ref:
        logger.info(update.id.bl_rna.__class__.__name__)
        data_ref.is_dirty= True


def depsgraph_update(scene):
    global client_keys
    global client_state
    
    ctx = bpy.context

    if client_state == 3:
       
        if ctx.mode in ['OBJECT','PAINT_GPENCIL']:
            updates = ctx.view_layer.depsgraph.updates
            username = ctx.window_manager.session.username
            

            selected_objects = helpers.get_selected_objects(scene)

            for update in reversed(updates):
                if is_replicated(update):
                    if update.id.id == username or update.id.id == 'Common':
                        toogle_update_dirty(ctx, update)
                else:
                    item = get_datablock_from_update(update,ctx)
                    
                    #get parent authority
                    if hasattr(item,"id"):
                        parent_id = ctx.collection.id if ctx.collection.id != 'None' else ctx.scene.id 

                        if parent_id == username or parent_id == 'Common':
                            item.id = username

                            item_type = item.__class__.__name__
                            
                            if 'Light'in item.__class__.__name__:
                                item_type = 'Light'
                                
                            key = "{}/{}".format(item_type , item.name)
                            client.instance.set(key)
                        else:
                            try:
                                getattr(bpy.data, helpers.BPY_TYPES[update.id.__class__.__name__]).remove(item)
                            except:
                                pass
                            break

            update_client_selected_object(ctx)   


def register():
    from bpy.utils import register_class
    for cls in classes:
        register_class(cls)
   
    bpy.app.handlers.depsgraph_update_post.append(depsgraph_update)
    draw.register()


def unregister():
    global server
    global client_keys

    draw.unregister()

    if  bpy.app.handlers.depsgraph_update_post.count(depsgraph_update) > 0:
        bpy.app.handlers.depsgraph_update_post.remove(depsgraph_update)

    if server:
        server.kill()
        server = None
        del server

    if client.instance:
        client.instance.exit()
        client.instance = None
        del client_keys

    from bpy.utils import unregister_class
    for cls in reversed(classes):
        unregister_class(cls)


if __name__ == "__main__":
    register()