# Copyright (c) Microsoft Corporation.
# Licensed under the MIT license.

"""Utilities to process the value choice compositions,
in the way that is most convenient to one-shot algorithms."""

import itertools
from typing import List, Any, Dict, Tuple, Optional, Union

from nni.common.hpo_utils import ParameterSpec
from nni.retiarii.nn.pytorch.api import ValueChoiceX


Choice = Any

__all__ = ['dedup_inner_choices', 'evaluate_value_choice_with_dict', 'traverse_all_options']


def dedup_inner_choices(value_choices: List[ValueChoiceX]) -> Dict[str, ParameterSpec]:
    """Find all leaf nodes in ``value_choices``,
    save them into in the format of ``{label: parameter_spec}``.
    """
    result = {}
    for value_choice in value_choices:
        for choice in value_choice.inner_choices():
            param_spec = ParameterSpec(choice.label, 'choice', choice.candidates, (choice.label, ), True, size=len(choice.candidates))
            if choice.label in result:
                if param_spec != result[choice.label]:
                    raise ValueError('Value choice conflict: same label with different candidates: '
                                     f'{param_spec} vs. {result[choice.label]}')
            else:
                result[choice.label] = param_spec
    return result


def evaluate_value_choice_with_dict(value_choice: ValueChoiceX, chosen: Dict[str, Choice]) -> Any:
    """To evaluate a composition of value-choice with a dict,
    with format of ``{label: chosen_value}``.
    The implementation is two-pass. We first get a list of values,
    then feed the values into ``value_choice.evaluate``.
    This can be potentially optimized in terms of speed.

    Examples
    --------
    >>> chosen = {"exp_ratio": 3}
    >>> evaluate_value_choice_with_dict(value_choice_in, chosen)
    48
    >>> evaluate_value_choice_with_dict(value_choice_out, chosen)
    96
    """
    choice_inner_values = []
    for choice in value_choice.inner_choices():
        if choice.label not in chosen:
            raise KeyError(f'{value_choice} depends on a value with key {choice.label}, but not found in {chosen}')
        choice_inner_values.append(chosen[choice.label])
    return value_choice.evaluate(choice_inner_values)


def traverse_all_options(value_choice: ValueChoiceX,
                         weights: Optional[Dict[str, List[float]]] = None) -> List[Union[Tuple[Any, float], Any]]:
    """Traverse all possible computation outcome of a value choice.
    If ``weights`` is not None, it will also compute the probability of each possible outcome.

    Parameters
    ----------
    value_choice : ValueChoiceX
        The value choice to traverse.
    weights : Optional[Dict[str, List[float]]], default = None
        If there's a prior on leaf nodes, and we intend to know the (joint) prior on results,
        weights can be provided. The key is label, value are list of float indicating probability.
        Normally, they should sum up to 1, but we will not check them in this function.

    Returns
    -------
    List[Union[Tuple[Any, float], Any]]
        Results will be sorted and duplicates will be eliminated.
        If weights is provided, the return value will be a list of tuple, with option and its weight.
        Otherwise, it will be a list of options.
    """
    # get a dict of {label: list of tuple of choice and weight}
    leafs: Dict[str, List[Tuple[Choice, float]]] = {}
    for label, param_spec in dedup_inner_choices([value_choice]).items():
        if weights is not None:
            if label not in weights:
                raise KeyError(f'{value_choice} depends on a weight with key {label}, but not found in {weights}')
            if len(weights[label]) != param_spec.size:
                raise KeyError(f'Expect weights with {label} to be of length {param_spec.size}, but {len(weights[label])} found')
            leafs[label] = list(zip(param_spec.values, weights[label]))
        else:
            # create a dummy weight of zero, in case that weights are not provided.
            leafs[label] = list(zip(param_spec.values, itertools.repeat(0., param_spec.size)))

    # result is a dict from a option to its weight
    result: Dict[str, Optional[float]] = {}
    labels, values = list(leafs.keys()), list(leafs.values())

    if not labels:
        raise ValueError(f'There expects at least one leaf value choice in {value_choice}, but nothing found')

    # get all combinations
    for prod_value in itertools.product(*values):
        # For example,
        # prod_value = ((3, 0.1), ("cat", 0.3), ({"in": 5}, 0.5))
        # the first dim is chosen value, second dim is probability
        # chosen = {"ks": 3, "animal": "cat", "linear_args": {"in": 5}}
        # chosen_weight = np.prod([0.1, 0.3, 0.5])
        chosen = {label: value[0] for label, value in zip(labels, prod_value)}

        eval_res = evaluate_value_choice_with_dict(value_choice, chosen)

        if weights is None:
            result[eval_res] = None
        else:
            # we can't use reduce or inplace product here,
            # because weight can sometimes be tensors
            chosen_weight = prod_value[0][1]
            for value in prod_value[1:]:
                if chosen_weight is None:
                    chosen_weight = value[1]
                else:
                    chosen_weight = chosen_weight * value[1]

            if eval_res in result:
                result[eval_res] = result[eval_res] + chosen_weight
            else:
                result[eval_res] = chosen_weight

    if weights is None:
        return sorted(result.keys())
    else:
        return sorted(result.items())
