import functools
from pathlib import Path
from typing import List, MutableSet

from ee.db import ObjDb
from ee.digikey import Digikey, DigikeyParser, DigikeyClient, SearchResponseTypes, DigikeyProduct, DigikeyStore
from ee.part import PartDb, load_db, save_db, Part
from ee.xml import types
from ee.xml.uris import make_digikey_fact_key

__all__ = ["search_parts"]


@functools.total_ordering
class QueryByPn(object):
    def __init__(self, pn: str, is_spn):
        self.pn = pn
        self.is_spn = is_spn

    def __eq__(self, other):
        return self.pn == other.pn and self.is_spn == other.is_spn

    def __lt__(self, other):
        return (self.pn, self.is_spn) < (other.pn, other.is_spn)

    def __hash__(self):
        return hash((self.pn, self.is_spn))


def resolved(supplier, p: DigikeyProduct) -> Part:
    # TODO: fix uri
    xml = types.Part(uri="https://digikey.com/pn#{}".format(p.part_number),
                     supplier=supplier,
                     description=p.description,
                     links=types.LinkList(),
                     facts=types.FactList(),
                     references=types.ReferenceList())
    part = Part(xml)

    if p.url:
        part.get_links().append(types.Link(url=p.url, relation="canonical", media_type="text/html"))

    for d in p.documents:
        title = "{}: {}".format(d.kind, d.title)
        part.get_links().append(types.Link(url=d.url, relation="http://purl.org/ee/link-relation#documentation",
                                           media_type="text/html", title=title))

    part.add_spn(p.part_number)

    if p.mpn:
        part.add_mpn(p.mpn)

    facts: List[types.Fact] = xml.factsProp.factProp
    for a in p.attributes:
        key = make_digikey_fact_key(a.attribute_type.id)
        facts.append(types.Fact(key=key, label=a.attribute_type.label, value=a.value))

    if len(p.price_breaks):
        xml.price_breaksProp = types.PriceBreakList()

        price_breaks: List[types.PriceBreak] = xml.price_breaksProp.price_break
        for pb in p.price_breaks:
            amount = types.Amount(value=str(pb.per_piece_price.amount), currency=pb.per_piece_price.currency)
            price_breaks.append(types.PriceBreak(pb.quantity, amount=amount))

    return part


def search_parts(in_path: Path, out_path: Path, log_path: Path, cache_dir: Path, store_code):
    print_result = True
    with log_path.open("w") as log:
        run_search_parts(in_path, out_path, log, cache_dir, store_code, print_result)


def run_search_parts(in_path: Path, out_path: Path, log, cache_dir: Path, store_code, print_result):
    in_db = load_db(in_path)

    store = DigikeyStore.from_store_code(store_code)

    pn_qs: MutableSet[QueryByPn] = set()

    for xml in in_db.iterparts():
        part = Part(xml)
        # print("Searching for {}".format(part.printable_reference), file=log)

        if xml.supplierProp is not None and xml.supplierProp != store.url:
            assert False, "Something is fishy"  # Not sure why I made this rule

        found_any = False
        for pn in part.get_mpns():
            pn_qs.add(QueryByPn(pn.valueProp, False))
            found_any = True

        for pn in part.get_spns():
            pn_qs.add(QueryByPn(pn.valueProp, True))
            found_any = True

        if not found_any:
            print("Could not find anything for search by, checked product numbers and supplier product numbers")

    pn_queries = list(sorted(pn_qs))

    parser = DigikeyParser(Digikey())
    client = DigikeyClient(store.products_url, cache_dir)

    out_parts: ObjDb[Part] = ObjDb[Part]()
    uri_idx = out_parts.add_unique_index("uri", lambda p: p.uri)
    out_parts.add_index("pn", lambda p: [pn.value for pn in p.get_part_references()], multiple=True)
    out_parts.add_index("spn", lambda p: [pn.value for pn in p.get_spns()], multiple=True)

    print("Executing {} product number searches\n\n".format(len(pn_queries)), file=log)

    for q in pn_queries:
        out_part = None
        result = None

        text = client.search(q.pn)
        response = parser.parse_string(text)

        if response.response_type == SearchResponseTypes.SINGLE:
            out_part = resolved(store.url, response.products[0])
            result = "found"
        elif response.response_type == SearchResponseTypes.MANY:

            # find those with an exact match. Digikey uses a prefix search so a query for "FOO" will return "FOO"
            # and "FOOT".
            def get_field(p):
                return p.part_number if q.is_spn else p.mpn

            filtered_products = [p for p in response.products if get_field(p) == q.pn]

            if len(filtered_products) == 0:
                result = "not-found"
            else:
                dpn = sorted(filtered_products, key=lambda p: p.part_number)[0].part_number

                response = parser.parse_string(client.search(dpn))
                if response.response_type == SearchResponseTypes.SINGLE:
                    out_part = resolved(store.url, response.products[0])
                    result = "found"
                else:
                    result = "many"

        elif response.response_type == SearchResponseTypes.TOO_MANY:
            result = "too-many"
        elif response.response_type == SearchResponseTypes.NO_MATCHES:
            result = "not-found"

        if out_part:
            if out_part.uri not in uri_idx:
                out_parts.add(out_part)

        print("Searching for '{}': {}".format(q.pn, result), file=log)
        print("", file=log)

    part_db = PartDb()
    for part in out_parts:
        part_db.add_entry(part, True)
    save_db(out_path, part_db, sort=True)