/*
This is part of WHY2
Copyright (C) 2022 Václav Šmejkal

This program is free software: you can redistribute it and/or modify
it under the terms of the GNU General Public License as published by
the Free Software Foundation, either version 3 of the License, or
(at your option) any later version.

This program is distributed in the hope that it will be useful,
but WITHOUT ANY WARRANTY; without even the implied warranty of
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
GNU General Public License for more details.

You should have received a copy of the GNU General Public License
along with this program.  If not, see <https://www.gnu.org/licenses/>.
*/

#include <why2/flags.h>

#include <stdlib.h>
#include <string.h>

#include <why2/llist.h>
#include <why2/memory.h>

//CONSTS (this is just local)
#define DEFAULT_FLAGS (why2_input_flags) { 0, 0, 0, WHY2_v4, WHY2_OUTPUT_TEXT, 64 }
#define DEFAULT_MEMORY_IDENTIFIER ""

int encryptionOperation(int text, int encryptedText);

//VARIABLES
char encryption_separator = '.'; //NOPE     > DO NOT TOUCH THIS, USE why2_set_encryption_separator instead <
unsigned long keyLength = 50; //LENGTH OF KEY     > DO NOT TOUCH THIS, USE why2_set_key_length instead <
why2_input_flags used_flags = DEFAULT_FLAGS; //IT IS CALLED used_flags CUZ flags CAUSED SOME FUCKING MEMORY PROBLEMS
why2_encryption_operation_cb encryptionOperation_cb = encryptionOperation;
why2_bool flags_changed = 0; //CHANGES TO 1 WHEN U USE why2_set_flags
why2_bool padding_changed = 0; //SAME AS flags_changed BUT FOR PADDING
char *memory_identifier = DEFAULT_MEMORY_IDENTIFIER;

why2_list_t identifier_list = WHY2_LIST_EMPTY;

char *get_last_node_identifier(void)
{
    if (identifier_list.head == NULL) return DEFAULT_MEMORY_IDENTIFIER;

    why2_node_t *buffer = identifier_list.head;
    while (buffer -> next != NULL) buffer = buffer -> next;

    return buffer -> value;
}

//GETTERS
char why2_get_encryption_separator(void)
{
    return encryption_separator;
}

unsigned long why2_get_key_length(void)
{
    return keyLength;
}

why2_input_flags why2_get_default_flags(void)
{
    return DEFAULT_FLAGS;
}

why2_input_flags why2_get_flags(void)
{
    return used_flags;
}

why2_output_flags why2_no_output(enum WHY2_EXIT_CODES exit_code)
{
    char *empty_text = why2_malloc(1); //TEXT
    empty_text[0] = '\0';

    char *empty_key = why2_malloc(why2_get_key_length() + 1); //KEY
    for (unsigned long i = 0; i < why2_get_key_length(); i++)
    {
        empty_key[i] = 'x';
    }
    empty_key[why2_get_key_length()] = '\0';

    return (why2_output_flags) { empty_text, 0, empty_key, 0, 0, 0, exit_code };
}

why2_encryption_operation_cb why2_get_encryption_operation(void)
{
    return encryptionOperation_cb;
}

why2_bool why2_get_flags_changed(void)
{
    return flags_changed;
}

why2_bool why2_get_padding_changed(void)
{
    return padding_changed;
}

char *why2_get_memory_identifier(void)
{
    return memory_identifier;
}

char *why2_get_default_memory_identifier(void)
{
    return DEFAULT_MEMORY_IDENTIFIER;
}

//SETTERS
void why2_set_encryption_separator(char encryption_separator_new)
{
    if
    (
        encryption_separator_new <= 31 ||
        (encryption_separator_new >= 48 && encryption_separator_new <= 57) ||
        encryption_separator_new == 45
    ) return;

    encryption_separator = encryption_separator_new;
}

void why2_set_key_length(int keyLengthNew)
{
    if (keyLengthNew < 1) return;

    keyLength = keyLengthNew;
}

void why2_set_flags(why2_input_flags new_flags)
{
    __why2_set_flags_anon(new_flags);

    if (!flags_changed)
    {
        flags_changed = 1;
        padding_changed = 1;
    }
}

void __why2_set_flags_anon(why2_input_flags new_flags)
{
    used_flags = new_flags;
}

void why2_set_encryption_operation(why2_encryption_operation_cb newEncryptionOperation)
{
    encryptionOperation_cb = newEncryptionOperation;
}

void why2_set_memory_identifier(char *new_memory_identifier)
{
    why2_list_push(&identifier_list, new_memory_identifier, strlen(new_memory_identifier) + 1); //TODO: Check memory problems

    memory_identifier = new_memory_identifier;
}

void why2_set_padding(unsigned long padding)
{
    __why2_set_padding_anon(padding);
    if (!padding_changed) padding_changed = 1;
}

void __why2_set_padding_anon(unsigned long padding)
{
    used_flags.padding = padding;
}

void why2_reset_memory_identifier(void)
{
    why2_list_remove_back(&identifier_list);

    memory_identifier = get_last_node_identifier();
}

//SOME OTHER SHIT
int encryptionOperation(int text, int encryptedText)
{
    //CHANGE THE '-' (MINUS) OPERATOR TO SOMETHING YOU WANT TO USE I GUESS
    return text - encryptedText;

    //I DO NOT RECOMMEND CHANGING THIS, BUT IF YOU WANT TO, XOR IS A GOOD OPERATOR (IDK IF OTHERS WORK lmao)
}