import re
import struct

from ipaddress import IPv6Address

import dns
import dns.name
import dns.rdtypes.txtbase, dns.rdtypes.svcbbase
import dns.rdtypes.ANY.CERT, dns.rdtypes.ANY.MX, dns.rdtypes.ANY.NS
import dns.rdtypes.IN.AAAA, dns.rdtypes.IN.SRV


def _strip_quotes_decorator(func):
    return lambda *args, **kwargs: func(*args, **kwargs)[1:-1]


# Ensure that dnspython agrees with pdns' expectations for SVCB / HTTPS parameters.
# WARNING: This is a global side-effect. It can't be done by extending a class, because dnspython hardcodes the use of
# their dns.rdtypes.svcbbase.*Param classes in the global dns.rdtypes.svcbbase._class_for_key dictionary. We either have
# to globally mess with that dict and insert our custom class, or we just mess with their classes directly.
dns.rdtypes.svcbbase.ALPNParam.to_text = _strip_quotes_decorator(
    dns.rdtypes.svcbbase.ALPNParam.to_text
)
dns.rdtypes.svcbbase.IPv4HintParam.to_text = _strip_quotes_decorator(
    dns.rdtypes.svcbbase.IPv4HintParam.to_text
)
dns.rdtypes.svcbbase.IPv6HintParam.to_text = _strip_quotes_decorator(
    dns.rdtypes.svcbbase.IPv6HintParam.to_text
)
dns.rdtypes.svcbbase.MandatoryParam.to_text = _strip_quotes_decorator(
    dns.rdtypes.svcbbase.MandatoryParam.to_text
)
dns.rdtypes.svcbbase.PortParam.to_text = _strip_quotes_decorator(
    dns.rdtypes.svcbbase.PortParam.to_text
)


@dns.immutable.immutable
class CERT(dns.rdtypes.ANY.CERT.CERT):
    def to_text(self, origin=None, relativize=True, **kw):
        certificate_type = str(
            self.certificate_type
        )  # upstream implementation calls _ctype_to_text
        return "%s %d %s %s" % (
            certificate_type,
            self.key_tag,
            dns.dnssec.algorithm_to_text(self.algorithm),
            dns.rdata._base64ify(self.certificate, **kw),
        )


@dns.immutable.immutable
class AAAA(dns.rdtypes.IN.AAAA.AAAA):
    def to_text(self, origin=None, relativize=True, **kw):
        address = super().to_text(origin, relativize, **kw)
        return IPv6Address(address).compressed


@dns.immutable.immutable
class LongQuotedTXT(dns.rdtypes.txtbase.TXTBase):
    """
    A TXT record like RFC 1035, but
    - allows arbitrarily long tokens, and
    - all tokens must be quoted.
    """

    def __init__(self, rdclass, rdtype, strings):
        # Same as in parent class, but with max_length=None. Note that we are calling __init__ from the grandparent.
        super(dns.rdtypes.txtbase.TXTBase, self).__init__(rdclass, rdtype)
        self.strings = self._as_tuple(
            strings, lambda x: self._as_bytes(x, True, max_length=None)
        )

    @classmethod
    def from_text(cls, rdclass, rdtype, tok, origin=None, relativize=True):
        strings = []
        for token in tok.get_remaining():
            token = token.unescape_to_bytes()
            # The 'if' below is always true in the current code, but we
            # are leaving this check in in case things change some day.
            if not token.is_quoted_string():
                raise dns.exception.SyntaxError("Content must be quoted.")
            strings.append(token.value)
        if len(strings) == 0:
            raise dns.exception.UnexpectedEnd
        return cls(rdclass, rdtype, strings)

    def _to_wire(self, file, compress=None, origin=None, canonicalize=False):
        for long_s in self.strings:
            for s in [long_s[i : i + 255] for i in range(0, max(len(long_s), 1), 255)]:
                l = len(s)
                assert l < 256
                file.write(struct.pack("!B", l))
                file.write(s)


def _HostnameMixin(name_field, *, allow_root):
    # Taken from https://github.com/PowerDNS/pdns/blob/4646277d05f293777a3d2423a3b188ccdf42c6bc/pdns/dnsname.cc#L419
    hostname_re = re.compile(r"^(([A-Za-z0-9]([A-Za-z0-9-]*[A-Za-z0-9])?)\.)+$")

    class Mixin:
        def to_text(self, origin=None, relativize=True, **kw):
            name = getattr(self, name_field)
            if (
                not (allow_root and name == dns.name.root)
                and hostname_re.match(str(name)) is None
            ):
                raise ValueError(f"invalid {name_field}: {name}")
            return super().to_text(origin, relativize, **kw)

    return Mixin


@dns.immutable.immutable
class MX(_HostnameMixin("exchange", allow_root=True), dns.rdtypes.ANY.MX.MX):
    pass


@dns.immutable.immutable
class NS(_HostnameMixin("target", allow_root=False), dns.rdtypes.ANY.NS.NS):
    pass


@dns.immutable.immutable
class SRV(_HostnameMixin("target", allow_root=True), dns.rdtypes.IN.SRV.SRV):
    pass