import main
import modules.keyword as keyword
from copy import deepcopy

def testNetTarget(name, target):
    called = False
    for i in main.monitor.keys():
        if "sources" in main.monitor[i].keys():
            if name in main.monitor[i]["sources"]:
                if main.monitor[i]["sources"][name] == True:
                    yield i
                    called = True
                elif target in main.monitor[i]["sources"][name]:
                    yield i
                    called = True
        else:
            yield i
            called = True
    if not called:
        return False

def magicFunction(A, B):
    if "send" in B.keys():
        del B["send"]
    if "sources" in B.keys():
        del B["sources"]
    return all(A[k] in B[k] for k in set(A) & set(B)) and set(B) <= set(A)

def event(name, target, cast):
    monitorGroups = testNetTarget(name, target)
    if monitorGroups == False:
        return
    for monitorGroup in monitorGroups:
        matcher = magicFunction(deepcopy(cast), deepcopy(main.monitor[monitorGroup]))
        if matcher == True:
            if "send" in main.monitor[monitorGroup].keys():
                for i in main.monitor[monitorGroup]["send"].keys():
                    if isinstance(main.monitor[monitorGroup]["send"][i], bool):
                        keyword.sendMaster("ERRDELIV MONITOR [%s] (%s/%s) %s " % (monitorGroup, name, target, cast))
                        continue
                    if not i in main.pool.keys():
                        keyword.sendMaster("ERROR on monitor %s: No such name: %s" % (monitorGroup, i))
                    if not i in main.IRCPool.keys():
                        keyword.sendMaster("ERROR on monitor %s: No such instance: %s" % (monitorGroup, i))
                    for x in main.monitor[monitorGroup]["send"][i]:
                        main.IRCPool[i].msg(x, "MONITOR [%s] (%s/%s) %s" % (monitorGroup, name, target, cast))
            else:
                keyword.sendMaster("MONITOR [%s] (%s/%s) %s " % (monitorGroup, name, target, cast))