# Copyright 2017 Pants project contributors (see CONTRIBUTORS.md).
# Licensed under the Apache License, Version 2.0 (see LICENSE).

from __future__ import annotations

import argparse
import base64
import fnmatch
import glob
import hashlib
import os
import re
import zipfile

from pants.util.contextutil import open_zip, temporary_dir
from pants.util.dirutil import read_file, safe_file_dump


def replace_in_file(workspace, src_file_path, from_str, to_str):
    """Replace from_str with to_str in the name and content of the given file.

    If any edits were necessary, returns the new filename (which may be the same as the old
    filename).
    """
    from_bytes = from_str.encode("ascii")
    to_bytes = to_str.encode("ascii")
    data = read_file(os.path.join(workspace, src_file_path), binary_mode=True)
    if from_bytes not in data and from_str not in src_file_path:
        return None

    dst_file_path = src_file_path.replace(from_str, to_str)
    safe_file_dump(
        os.path.join(workspace, dst_file_path), data.replace(from_bytes, to_bytes), mode="wb"
    )
    if src_file_path != dst_file_path:
        os.unlink(os.path.join(workspace, src_file_path))
    return dst_file_path


def any_match(globs, filename):
    return any(fnmatch.fnmatch(filename, g) for g in globs)


def locate_dist_info_dir(workspace):
        raise Exception("Too many `{}` directories in input whl: {}".format(dir_suffix, matches))
    return os.path.relpath(matches[0], workspace)


def fingerprint_file(workspace, filename):
    """Given a relative filename located in a workspace, fingerprint the file.

    Returns a tuple of fingerprint string and size string.
    """
    content = read_file(os.path.join(workspace, filename), binary_mode=True)
    fingerprint = hashlib.sha256(content)
    b64_encoded = base64.b64encode(fingerprint.digest())
    return f"sha256={b64_encoded.decode()}", str(len(content))


def rewrite_record_file(workspace, src_record_file, mutated_file_tuples):
    """Given a RECORD file and list of mutated file tuples, update the RECORD file in place.

    The RECORD file should always be a member of the mutated files, due to both containing versions,
    and having a version in its filename.
    """
    mutated_files = set()
    dst_record_file = None
    for src, dst in mutated_file_tuples:
        if src == src_record_file:
            dst_record_file = dst
        else:
            mutated_files.add(dst)
    if not dst_record_file:
        raise Exception(
            "Malformed whl or bad globs: `{}` was not rewritten.".format(src_record_file)
        )

    output_records = []
    file_name = os.path.join(workspace, dst_record_file)
    for line in read_file(file_name).splitlines():
        filename, fingerprint_str, size_str = line.rsplit(",", 3)
        if filename in mutated_files:
            fingerprint_str, size_str = fingerprint_file(workspace, filename)
            output_line = ",".join((filename, fingerprint_str, size_str))
        else:
            output_line = line
        output_records.append(output_line)

    safe_file_dump(file_name, "\r\n".join(output_records) + "\r\n")


# The wheel METADATA file will contain a line like: `Version: 1.11.0.dev3+7951ec01`.
# We don't parse the entire file because it's large (it contains the entire release notes history).
_version_re = re.compile(r"Version: (?P<version>\S+)")


def reversion(
    *, whl_file: str, dest_dir: str, target_version: str, extra_globs: list[str] | None = None
) -> None:
    all_globs = ["*.dist-info/*", "*-nspkg.pth", *(extra_globs or ())]
    with temporary_dir() as workspace:
        # Extract the input.
        with open_zip(whl_file, "r") as whl:
            src_filenames = whl.namelist()
            whl.extractall(workspace)

        # Determine the location of the `dist-info` directory.
        dist_info_dir = locate_dist_info_dir(workspace)
        record_file = os.path.join(dist_info_dir, "RECORD")

        # Get version from the input whl's metadata.
        input_version = None
        metadata_file = os.path.join(workspace, dist_info_dir, "METADATA")
        with open(metadata_file, "r") as info:
            for line in info:
                mo = _version_re.match(line)
                if mo:
                    input_version = mo.group("version")
                    break
        if not input_version:
            raise Exception("Could not find `Version:` line in {}".format(metadata_file))

        # Rewrite and move all files (including the RECORD file), recording which files need to be
        # re-fingerprinted due to content changes.
        dst_filenames = []
        refingerprint = []
        for src_filename in src_filenames:
            if os.path.isdir(os.path.join(workspace, src_filename)):
                continue
            dst_filename = src_filename
            if any_match(all_globs, src_filename):
                rewritten = replace_in_file(workspace, src_filename, input_version, target_version)
                if rewritten is not None:
                    dst_filename = rewritten
                    refingerprint.append((src_filename, dst_filename))
            dst_filenames.append(dst_filename)

        # Refingerprint relevant entries in the RECORD file under their new names.
        rewrite_record_file(workspace, record_file, refingerprint)

        # Create a new output whl in the destination.
        dst_whl_filename = os.path.basename(whl_file).replace(input_version, target_version)
        dst_whl_file = os.path.join(dest_dir, dst_whl_filename)
        with open_zip(dst_whl_file, "w", zipfile.ZIP_DEFLATED) as whl:
            for dst_filename in dst_filenames:
                whl.write(os.path.join(workspace, dst_filename), dst_filename)

        print("Wrote whl with version {} to {}.\n".format(target_version, dst_whl_file))


def create_parser() -> argparse.ArgumentParser:
    parser = argparse.ArgumentParser()
    parser.add_argument("whl_file", help="The input whl file.")
    parser.add_argument("dest_dir", help="The destination directory for the output whl.")
    parser.add_argument("target_version", help="The target version of the output whl.")
    parser.add_argument(
        "--extra-globs",
        action="append",
        default=[],
        help="Extra globs (fnmatch) to rewrite within the whl: may be specified multiple times.",
    )
    return parser


def main():
    """Given an input whl file and target version, create a copy of the whl with that version.

    This is accomplished via string replacement in files matching a list of globs. Pass the optional
    `--glob` argument to add additional globs: ie  `--glob='thing-to-match*.txt'`.
    """
    args = create_parser().parse_args()
    reversion(
        whl_file=args.whl_file,
        dest_dir=args.dest_dir,
        target_version=args.target_version,
        extra_globs=args.extra_globs,
    )


if __name__ == "__main__":
    main()
    dir_suffix = "*.dist-info"
    matches = glob.glob(os.path.join(workspace, dir_suffix))
    if not matches:
        raise Exception("Unable to locate `{}` directory in input whl.".format(dir_suffix))
    if len(matches) > 1: