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


import bpy
from bpy_extras.io_utils import ExportHelper
import mathutils
from pathlib import Path

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

logger = logging.getLogger(__name__)

# client_instance = None

server = None
context = None
execution_queue = queue.Queue()

# This function can savely be called in another thread.
# The function will be executed when the timer runs the next time.


def run_in_main_thread(function, args):
    execution_queue.put(function)


def execute_queued_functions():
    while not execution_queue.empty():
        function, args = execution_queue.get()
        function(args[0], args[1])
    return .1


def clean_scene(elements=environment.rtypes):
    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 and len(client_data) > 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 environment.rtypes:
        if bpy.context.window_manager.session.supported_datablock[datatype].is_replicated:
            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 default_tick():
    upload_client_instance_position()

    return .1


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


def unregister_ticks():
    # REGISTER Updaters
    try:
        bpy.app.timers.unregister(default_tick)
        bpy.app.timers.unregister(execute_queued_functions)
    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):
        global execution_queue
        net_settings = context.window_manager.session
        # save config
        net_settings.save(context)
        
        # Scene setup
        if net_settings.start_empty:
            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(execution_queue)
        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_presence:
            draw.renderer.run()

        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()

        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

        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
            net_settings.is_admin = False

            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

        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)
            item = helpers.resolve_bpy_path(self.key)
            if item:
                item.id = net_settings.clients
                logger.info("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


class SessionDumpDatabase(bpy.types.Operator, ExportHelper):
    bl_idname = "session.dump"
    bl_label = "dump json data"
    bl_description = "dump session stored data to a json file"
    bl_options = {"REGISTER"}

    # ExportHelper mixin class uses this
    filename_ext = ".json"

    filter_glob: bpy.props.StringProperty(
        default="*.json",
        options={'HIDDEN'},
        maxlen=255,  # Max internal buffer length, longer would be clamped.
    )

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

    def execute(self, context):
        print(self.filepath)
        if client.instance and client.instance.state() == 3:
            client.instance.dump(self.filepath)
            return {"FINISHED"}

        return {"CANCELLED"}

        pass


class SessionSaveConfig(bpy.types.Operator):
    bl_idname = "session.save"
    bl_label = "Save session configuration"
    bl_description = "Save session configuration"
    bl_options = {"REGISTER"}

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

    def execute(self, context):
        context.window_manager.session.save()


classes = (
    SessionJoinOperator,
    SessionPropertyAddOperator,
    SessionPropertyGetOperator,
    SessionStopOperator,
    SessionHostOperator,
    SessionPropertyRemoveOperator,
    SessionSnapUserOperator,
    SessionPropertyRightOperator,
    SessionDumpDatabase,
    SessionSaveConfig,
)


def is_replicated(update):
    object_type = update.id.bl_rna.__class__.__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.debug("{} 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.debug(update.id.bl_rna.__class__.__name__)
        data_ref.is_dirty= True


def depsgraph_update(scene):
    ctx = bpy.context

    if client.instance and client.instance.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

    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

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


if __name__ == "__main__":
    register()