# Copyright (c) 2023, NVIDIA CORPORATION & AFFILIATES.  All rights reserved.
#
# Licensed under the Apache License, Version 2.0 (the "License");
# you may not use this file except in compliance with the License.
# You may obtain a copy of the License at
#
#     http://www.apache.org/licenses/LICENSE-2.0
#
# Unless required by applicable law or agreed to in writing, software
# distributed under the License is distributed on an "AS IS" BASIS,
# WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
# See the License for the specific language governing permissions and
# limitations under the License.

import pynini
from pynini.lib import pynutil

from nemo_text_processing.text_normalization.en.graph_utils import (
    NEMO_NOT_QUOTE,
    NEMO_SIGMA,
    NEMO_SPACE,
    GraphFst,
    delete_preserve_order,
)
from nemo_text_processing.text_normalization.es.graph_utils import shift_cardinal_gender, strip_cardinal_apocope
from nemo_text_processing.text_normalization.it.utils import get_abs_path

fem = pynini.string_file((get_abs_path("data/money/currency_plural_fem.tsv")))
masc = pynini.string_file((get_abs_path("data/money/currency_plural_masc.tsv")))

fem_singular = pynini.project(fem, "input")
masc_singular = pynini.project(masc, "input")

fem_plural = pynini.project(fem, "output")
masc_plural = pynini.project(masc, "output")


class MoneyFst(GraphFst):
    """
    Finite state transducer for verbalizing money, e.g.
        money { currency_maj: "euro" integer_part: "un"} -> "un euro"
        money { integer_part: "quattro" currency_maj: "sterline" fractional_part: "venti" currency_min: "penny" preserve_order: true } -> "quattro sterline venti penny"
        
    Args:
        decimal: GraphFst
        deterministic: if True will provide a single transduction option,
            for False multiple transduction are generated (used for audio-based normalization)
    """

    def __init__(self, decimal: GraphFst, deterministic: bool = True):
        super().__init__(name="money", kind="verbalize", deterministic=deterministic)

        maj_singular_masc = (
            pynutil.delete("currency_maj: \"")
            + (pynini.closure(NEMO_NOT_QUOTE, 1) @ masc_singular)
            + pynutil.delete("\"")
        )
        maj_singular_fem = (
            pynutil.delete("currency_maj: \"")
            + (pynini.closure(NEMO_NOT_QUOTE, 1) @ fem_singular)
            + pynutil.delete("\"")
        )

        maj_plural_masc = (
            pynutil.delete("currency_maj: \"")
            + (pynini.closure(NEMO_NOT_QUOTE, 1) @ masc_plural)
            + pynutil.delete("\"")
        )
        maj_plural_fem = (
            pynutil.delete("currency_maj: \"")
            + (pynini.closure(NEMO_NOT_QUOTE, 1) @ fem_plural)
            + pynutil.delete("\"")
        )

        maj_masc = maj_plural_masc | maj_singular_masc
        maj_fem = maj_plural_fem | maj_singular_fem

        min_singular_masc = (
            pynutil.delete("currency_min: \"")
            + (pynini.closure(NEMO_NOT_QUOTE, 1) @ masc_singular)
            + pynutil.delete("\"")
        )
        min_singular_fem = (
            pynutil.delete("currency_min: \"")
            + (pynini.closure(NEMO_NOT_QUOTE, 1) @ fem_singular)
            + pynutil.delete("\"")
        )

        min_plural_masc = (
            pynutil.delete("currency_min: \"")
            + (pynini.closure(NEMO_NOT_QUOTE, 1) @ masc_plural)
            + pynutil.delete("\"")
        )
        min_plural_fem = (
            pynutil.delete("currency_min: \"")
            + (pynini.closure(NEMO_NOT_QUOTE, 1) @ fem_plural)
            + pynutil.delete("\"")
        )

        min_masc = min_plural_masc | min_singular_masc
        min_fem = min_plural_fem | min_singular_fem

        fractional_part = (
            pynutil.delete("fractional_part: \"") + pynini.closure(NEMO_NOT_QUOTE, 1) + pynutil.delete("\"")
        )

        integer_part = pynutil.delete("integer_part: \"") + pynini.closure(NEMO_NOT_QUOTE, 1) + pynutil.delete("\"")
        optional_add_and = pynini.closure(pynutil.insert(pynini.union("con ", "y ")), 0, 1)

        graph_integer_masc = integer_part + NEMO_SPACE + maj_masc
        graph_integer_fem = shift_cardinal_gender(integer_part) + NEMO_SPACE + maj_fem

        graph_integer = graph_integer_fem | graph_integer_masc

        graph_integer_with_minor_masc = (
            graph_integer_masc
            + NEMO_SPACE
            + pynini.union(
                optional_add_and + strip_cardinal_apocope(fractional_part),
                (optional_add_and + fractional_part + NEMO_SPACE + min_masc),
                (optional_add_and + shift_cardinal_gender(fractional_part) + NEMO_SPACE + min_fem),
            )
            + delete_preserve_order
        )

        graph_integer_with_minor_fem = (
            graph_integer_fem
            + NEMO_SPACE
            + pynini.union(
                optional_add_and + shift_cardinal_gender(fractional_part),
                (optional_add_and + fractional_part + NEMO_SPACE + min_masc),
                (optional_add_and + shift_cardinal_gender(fractional_part) + NEMO_SPACE + min_fem),
            )
            + delete_preserve_order
        )

        graph_integer_with_minor = graph_integer_with_minor_fem | graph_integer_with_minor_masc

        graph_decimal_masc = decimal.graph + NEMO_SPACE + maj_masc

        graph_decimal_fem = decimal.graph
        graph_decimal_fem += NEMO_SPACE + maj_fem

        graph_decimal = graph_decimal_fem | graph_decimal_masc
        graph_decimal = (
            pynini.cdrewrite(
                pynutil.insert(" di"), "quantity: \"" + pynini.closure(NEMO_NOT_QUOTE, 1), "\"", NEMO_SIGMA
            )
            @ graph_decimal
        )

        graph_minor_masc = fractional_part + NEMO_SPACE + min_masc + delete_preserve_order
        graph_minor_fem = shift_cardinal_gender(fractional_part) + NEMO_SPACE + min_fem + delete_preserve_order

        graph_minor = graph_minor_fem | graph_minor_masc

        graph = graph_integer | graph_integer_with_minor | graph_decimal | graph_minor

        delete_tokens = self.delete_tokens(graph)
        self.fst = delete_tokens.optimize()