import dns.name
import dns.zone
import dns.rdatatype
import dns.rdataclass
from .logger import get_logger
from netbox_dns.models import Zone
from netbox_dns.choices import ZoneStatusChoices
from netbox_dns_bridge.models import IntegerKeyValueSetting, CatalogZoneMemberIdentifier
from uuid import uuid4
from base64 import b32encode
from django.db import transaction

logger = get_logger(__name__)


def init() -> None:
    _init_soa_serial()
    _create_missing_member_identifiers()


def _init_soa_serial() -> None:
    try:
        IntegerKeyValueSetting.objects.get(key="catalog-zone-soa-serial")
        logger.info("Catalog zone SOA serial number loaded from database")
    except IntegerKeyValueSetting.DoesNotExist:
        IntegerKeyValueSetting.objects.create(key="catalog-zone-soa-serial", value=1)
        logger.debug(
            "Catalog zone SOA serial number was not set in the database. Set to 1"
        )


def increment_soa_serial() -> int:
    with transaction.atomic():
        soa_serial = IntegerKeyValueSetting.objects.select_for_update().get(
            key="catalog-zone-soa-serial"
        )

        new_soa_serial = soa_serial.value + 1
        if new_soa_serial > 0xFFFFFFFF:
            logger.warning(
                f"Catalog serial {soa_serial.value} reached max — wrapping back to 1"
            )
            new_soa_serial = 1
        soa_serial.value = new_soa_serial
        soa_serial.save()
        soa_serial.refresh_from_db()
        logger.debug(f"Catalog zone SOA serial number is now {soa_serial.value}")

        return soa_serial.value


def _create_missing_member_identifiers() -> None:
    existing_zone_ids = CatalogZoneMemberIdentifier.objects.values_list(
        "zone_id", flat=True
    )

    missing_zones = Zone.objects.exclude(id__in=existing_zone_ids)

    new_objects = [
        CatalogZoneMemberIdentifier(
            zone=zone,
            name=_generate_member_identifier(),
        )
        for zone in missing_zones
    ]

    for identifier in new_objects:
        logger.debug(
            f"Zone {identifier.zone} missing catz member identifier. Creating..."
        )

    CatalogZoneMemberIdentifier.objects.bulk_create(
        new_objects,
        ignore_conflicts=False,
    )


def create_zone(name, view_name) -> dns.zone.Zone:
    soa_serial = IntegerKeyValueSetting.objects.get(key="catalog-zone-soa-serial").value

    # Zone origin
    origin = dns.name.from_text(name, dns.name.root)

    # Create a new empty zone
    zone = dns.zone.Zone(origin)
    zone.rdclass = dns.rdataclass.IN

    # get zones from netbox
    nb_zones = Zone.objects.filter(
        view__name=view_name, status=ZoneStatusChoices.STATUS_ACTIVE
    ).select_related("catz_identifier")

    ptr_base = dns.name.from_text("zones", origin)

    for nb_zone in nb_zones:
        ttl = 0
        qname = dns.name.from_text(nb_zone.name, dns.name.root)

        # Create PTR record
        p_name = nb_zone.catz_identifier.name

        ptr_name = dns.name.from_text(p_name, ptr_base)
        if not ptr_name.is_subdomain(origin):
            raise ValueError(
                f"Catalog zone member identifier {ptr_name.to_text()} not a subdomain"
            )
        rdata = dns.rdata.from_text(
            dns.rdataclass.IN, dns.rdatatype.PTR, qname.to_text()
        )
        rdataset = zone.find_rdataset(ptr_name, dns.rdatatype.PTR, create=True)
        rdataset.add(rdata, ttl)

        # Configure DNSSec Policy for member Zone if DNSSec is enabled
        if nb_zone.dnssec_policy:
            rid = dns.name.from_text("group", ptr_name)
            policy_name = nb_zone.dnssec_policy.name.rstrip(" ")
            group_name = f"dnssec-policy-{policy_name}"
            rdata = dns.rdata.from_text(
                dns.rdataclass.IN, dns.rdatatype.TXT, group_name
            )
            rdataset = zone.find_rdataset(rid, dns.rdatatype.TXT, create=True)
            rdataset.add(rdata, ttl)

    # SOA Record components
    ttl = 0
    rclass = dns.rdataclass.IN
    rtype = dns.rdatatype.SOA
    mname = dns.name.from_text("invalid", dns.name.root)
    rname = dns.name.from_text("invalid", dns.name.root)
    refresh = 60
    retry = 10
    expire = 1209600
    minimum = 0

    # Create SOA rdata object
    soa_rdata = dns.rdata.from_text(
        rclass,
        rtype,
        f"{mname} {rname} {soa_serial} {refresh} {retry} {expire} {minimum}",
    )

    # Create Rdataset and add the RDATA to it
    soa_rdataset = dns.rdataset.Rdataset(rclass, rtype)
    soa_rdataset.add(soa_rdata, ttl)

    # Add to the origin node in the zone
    node = zone.find_node(origin, create=True)
    node.rdatasets.append(soa_rdataset)

    # NS record for catz.
    ns_name = dns.name.from_text("invalid", dns.name.root)
    ns_rdata = dns.rdata.from_text(dns.rdataclass.IN, dns.rdatatype.NS, str(ns_name))
    ns_rdataset = dns.rdataset.Rdataset(dns.rdataclass.IN, dns.rdatatype.NS)
    ns_rdataset.add(ns_rdata, 0)

    # Add to node (catz. is the origin)
    ns_node = zone.find_node(origin, create=True)
    ns_node.rdatasets.append(ns_rdataset)

    # TXT record for version.catz.
    version_name = dns.name.from_text("version", origin)
    txt_rdata = dns.rdata.from_text(dns.rdataclass.IN, dns.rdatatype.TXT, '"2"')

    txt_rdataset = dns.rdataset.Rdataset(dns.rdataclass.IN, dns.rdatatype.TXT)
    txt_rdataset.add(txt_rdata, 0)

    # Add to node version.catz.
    txt_node = zone.find_node(version_name, create=True)
    txt_node.rdatasets.append(txt_rdataset)

    return zone


def _generate_member_identifier() -> str:
    return b32encode(uuid4().bytes)[0:26].lower().decode("UTF-8")


def update_member_identifier(zone: Zone) -> None:
    CatalogZoneMemberIdentifier.objects.update_or_create(
        zone=zone,
        defaults={"name": _generate_member_identifier()},
    )