# pylint: disable=no-member
import logging
from string import punctuation

import demisto_ml
import numpy as np
from CommonServerPython import *

# Suppress logging for a specific library
logging.getLogger("transformers").setLevel(logging.ERROR)

FASTTEXT_MODEL_TYPE = "FASTTEXT_MODEL_TYPE"
UNKNOWN_MODEL_TYPE = "UNKNOWN_MODEL_TYPE"
TORCH_TYPE = "torch_phishing"
FASTTEXT_TYPE = "fasttext_phishing"


def OrderedSet(iterable):
    return list(dict.fromkeys(iterable))


def update_model_in_server(model_data, model_type, model_name):
    res = demisto.executeCommand(
        "createMLModel",
        {
            "modelData": model_data,
            "modelName": model_name,
            "modelType": model_type,
        },
    )
    if is_error(res):
        raise DemistoException(f"Unable to update model: {res}")
    demisto.debug(f"Updated model {model_name!r}: {res=}")


def get_model_data(model_name: str, store_type: str, is_return_error: bool) -> tuple[str, str]:
    def load_from_models(model_name: str) -> None | tuple[str, str]:
        res_model = demisto.executeCommand("getMLModel", {"modelName": model_name})
        if is_error(res_model):
            demisto.debug(get_error(res_model))
            return None
        model_data = res_model[0]["Contents"]["modelData"]
        model_type = dict_safe_get(res_model, [0, "Contents", "model", "type", "type"], UNKNOWN_MODEL_TYPE)
        return model_data, model_type

    def load_from_list(model_name):
        res_model = demisto.executeCommand("getList", {"listName": model_name})
        if is_error(res_model):
            demisto.debug(get_error(res_model))
            return None
        return res_model[0]["Contents"], UNKNOWN_MODEL_TYPE

    res = None
    if store_type == "mlModel":
        res = load_from_models(model_name) or load_from_list(model_name)
    elif store_type == "list":
        res = load_from_list(model_name) or load_from_models(model_name)

    return res or handle_error(f"error reading model {model_name} from Demisto", is_return_error)  # type: ignore


def handle_error(message, is_return_error):
    if is_return_error:
        return_error(message)
    else:
        demisto.results(message)
        sys.exit(0)


def preprocess_text(text, model_type, is_return_error):
    hash_seed, clean_html, preprocess_type = None, None, None

    if model_type in [FASTTEXT_MODEL_TYPE, UNKNOWN_MODEL_TYPE]:
        preprocess_type = "nlp"
        hash_seed = demisto.args().get("hashSeed")
        clean_html = "true"
    elif model_type == TORCH_TYPE:
        preprocess_type = "none"
        hash_seed = None
        clean_html = "false"

    input_type, input_ = None, None

    if isinstance(text, str):
        input_type = "string"
        input_ = text
    elif isinstance(text, list):
        input_type = "json_string"
        input_ = json.dumps(text)
    language = demisto.args().get("language", "English")
    tokenization = demisto.args().get("tokenizationMethod", "tokenizer")
    args = {
        "input": input_,
        "hashSeed": hash_seed,
        "language": language,
        "tokenizationMethod": tokenization,
        "inputType": input_type,
        "preProcessType": preprocess_type,
        "dedupThreshold": "-1",
        "outputFormat": "json",
        "textFields": "text",
        "removeShortTextThreshold": "-1",
        "cleanHTML": clean_html,
    }
    res = demisto.executeCommand("DBotPreProcessTextData", args)
    if is_error(res):
        handle_error(res[0]["Contents"], is_return_error)
    if isinstance(text, list):
        return [x["dbot_processed_text"] for x in json.loads(res[0]["Contents"])]
    elif isinstance(text, str):
        tokenized_text_result = res[0]["Contents"]
        input_text = (
            tokenized_text_result["hashedTokenizedText"]
            if tokenized_text_result.get("hashedTokenizedText")
            else tokenized_text_result["tokenizedText"]
        )
        if tokenized_text_result.get("hashedTokenizedText"):
            words_to_token_maps = tokenized_text_result["wordsToHashedTokens"]
        else:
            words_to_token_maps = tokenized_text_result["originalWordsToTokens"]
        return input_text, words_to_token_maps
    return None


def predict_phishing_words(
    model_name,
    model_store_type,
    email_subject,
    email_body,
    min_text_length,
    label_threshold,
    word_threshold,
    top_word_limit,
    is_return_error,
    set_incidents_fields=False,
):
    model_data, model_type = get_model_data(model_name, model_store_type, is_return_error)

    if model_type in ("Phishing", "torch"):
        model_data, model_type = demisto_ml.renew_model(model_data.encode(), model_type)
        update_model_in_server(model_data, model_type, model_name)

    model_type = {
        "": FASTTEXT_MODEL_TYPE,
        FASTTEXT_TYPE: FASTTEXT_MODEL_TYPE,
        TORCH_TYPE: TORCH_TYPE,
        UNKNOWN_MODEL_TYPE: UNKNOWN_MODEL_TYPE,
    }.get(model_type.strip(), UNKNOWN_MODEL_TYPE)

    phishing_model = demisto_ml.phishing_model_loads_handler(model_data, model_type)

    is_model_applied_on_a_single_incidents = isinstance(email_subject, str) and isinstance(email_body, str)
    if is_model_applied_on_a_single_incidents:
        return predict_single_incident_full_output(
            email_subject,
            email_body,
            is_return_error,
            label_threshold,
            min_text_length,
            model_type,
            phishing_model,
            set_incidents_fields,
            top_word_limit,
            word_threshold,
        )
    else:
        return predict_batch_incidents_light_output(email_subject, email_body, phishing_model, model_type, min_text_length)


def predict_batch_incidents_light_output(email_subject, email_body, phishing_model, model_type, min_text_length):
    text_list = [{"text": f"{subject} \n{body}"} for subject, body in zip(email_subject, email_body)]
    preprocessed_text_list = preprocess_text(text_list, model_type, is_return_error=False)
    batch_predictions = []
    for input_text in preprocessed_text_list:
        incident_res = {"Label": -1, "Probability": -1, "Error": ""}
        filtered_text, filtered_text_number_of_words = phishing_model.filter_model_words(input_text)
        if filtered_text_number_of_words == 0:
            incident_res["Error"] = "The model does not contain any of the input text words"
        elif filtered_text_number_of_words < min_text_length:
            incident_res["Error"] = f"The model contains fewer than {min_text_length} words"
        else:
            pred = phishing_model.predict(input_text)
            incident_res["Label"] = pred[0]
            prob = pred[1]
            if isinstance(prob, np.floating):
                prob = prob.item()
            incident_res["Probability"] = prob
        batch_predictions.append(incident_res)
    return {
        "Type": entryTypes["note"],
        "Contents": batch_predictions,
        "ContentsFormat": formats["json"],
        "HumanReadable": f"Applied predictions on {len(batch_predictions)} incidents.",
    }


def predict_single_incident_full_output(
    email_subject,
    email_body,
    is_return_error,
    label_threshold,
    min_text_length,
    model_type,
    phishing_model,
    set_incidents_fields,
    top_word_limit,
    word_threshold,
):
    text = f"{email_subject} \n{email_body}"
    input_text, words_to_token_maps = preprocess_text(text, model_type, is_return_error)
    filtered_text, filtered_text_number_of_words = phishing_model.filter_model_words(input_text)
    if filtered_text_number_of_words == 0:
        handle_error("The model does not contain any of the input text words", is_return_error)
    if filtered_text_number_of_words < min_text_length:
        handle_error(f"The model contains fewer than {min_text_length} words", is_return_error)

    explain_result = phishing_model.explain_model_words(input_text, 0, word_threshold, top_word_limit)
    explain_result["Probability"] = float(explain_result["Probability"])
    predicted_prob = explain_result["Probability"]
    if predicted_prob < label_threshold:
        handle_error(f"Label probability is {predicted_prob:.2f} and it's below the input confidence threshold", is_return_error)

    positive_tokens = OrderedSet(explain_result["PositiveWords"])
    negative_tokens = OrderedSet(explain_result["NegativeWords"])
    positive_words = find_words_contain_tokens(positive_tokens, words_to_token_maps)
    negative_words = find_words_contain_tokens(negative_tokens, words_to_token_maps)
    positive_words = OrderedSet([s.strip(punctuation) for s in positive_words])
    negative_words = OrderedSet([s.strip(punctuation) for s in negative_words])
    positive_words = [w for w in positive_words if w.isalnum()]
    negative_words = [w for w in negative_words if w.isalnum()]
    highlighted_text_markdown = text.strip()
    for word in positive_words:
        for cased_word in [word.lower(), word.title(), word.upper()]:
            highlighted_text_markdown = re.sub(rf"(?<!\w)({cased_word})(?!\w)", f"**{cased_word}**", highlighted_text_markdown)
    highlighted_text_markdown = re.sub(r"\n+", "\n", highlighted_text_markdown)
    explain_result["PositiveWords"] = [w.lower() for w in positive_words]
    explain_result["NegativeWords"] = [w.lower() for w in negative_words]
    explain_result["OriginalText"] = text.strip()
    explain_result["TextTokensHighlighted"] = highlighted_text_markdown
    predicted_label = explain_result["Label"]
    explain_result_hr = {}
    explain_result_hr["TextTokensHighlighted"] = highlighted_text_markdown
    explain_result_hr["Label"] = predicted_label
    explain_result_hr["Probability"] = f"{predicted_prob:.2f}"
    explain_result_hr["Confidence"] = f"{predicted_prob:.2f}"
    explain_result_hr["PositiveWords"] = ", ".join([w.lower() for w in positive_words])
    explain_result_hr["NegativeWords"] = ", ".join([w.lower() for w in negative_words])
    incident_context = demisto.incidents()[0]
    if not incident_context["isPlayground"] and set_incidents_fields:
        demisto.executeCommand(
            "setIncident",
            {
                "dbotprediction": predicted_label,
                "dbotpredictionprobability": predicted_prob,
                "dbottextsuggestionhighlighted": highlighted_text_markdown,
            },
        )
    return {
        "Type": entryTypes["note"],
        "Contents": explain_result,
        "ContentsFormat": formats["json"],
        "HumanReadable": tableToMarkdown(
            "DBot Predict Phishing Words",
            explain_result_hr,
            headers=["TextTokensHighlighted", "Label", "Confidence", "PositiveWords", "NegativeWords"],
            removeNull=True,
        ),
        "HumanReadableFormat": formats["markdown"],
        "EntryContext": {"DBotPredictPhishingWords": explain_result},
    }


def find_words_contain_tokens(positive_tokens, words_to_token_maps):
    positive_words = []
    for word, word_in_tokens_list in words_to_token_maps.items():
        if any(token in positive_tokens for token in word_in_tokens_list):
            positive_words.append(word)
    return positive_words


def try_get_incident_field(field):
    return dict_safe_get(demisto.incident(), ["CustomFields", field]) or ""


def main():
    confidence_threshold = 0
    confidence_threshold = float(demisto.args().get("labelProbabilityThreshold", confidence_threshold))
    confidence_threshold = float(demisto.args().get("confidenceThreshold", confidence_threshold))
    email_subject = demisto.args().get("emailSubject", "")
    email_body = demisto.args().get("emailBody", "") or demisto.args().get("emailBodyHTML", "")
    if email_subject == "":
        email_subject = try_get_incident_field(field="emailsubject")
    if email_body == "":
        email_body = try_get_incident_field(field="emailbody")
    result = predict_phishing_words(
        demisto.args()["modelName"],
        demisto.args()["modelStoreType"],
        email_subject,
        email_body,
        int(demisto.args()["minTextLength"]),
        confidence_threshold,
        float(demisto.args().get("wordThreshold", 0)),
        int(demisto.args()["topWordsLimit"]),
        demisto.args()["returnError"] == "true",
        demisto.args().get("setIncidentFields", "false") == "true",
    )
    return result


if __name__ in ["__main__", "__builtin__", "builtins"]:
    demisto.results(main())