#include <SDL.h>
#include <SDL_image.h>

int main(int argc, char *argv[]) {

    if(SDL_Init(SDL_INIT_VIDEO) < 0) {
        SDL_Log("SDL could not initialize SDL2: %s\n", SDL_GetError());
        return(1);
    }
    if(!(IMG_Init(IMG_INIT_PNG)&IMG_INIT_PNG)) {
        SDL_Log("SDL_image could not initialize! SDL_image Error: %s\n", IMG_GetError());
        return(1);
    }

    SDL_Event e;
    SDL_Window* window = NULL;
    SDL_Renderer* renderer = NULL;
    SDL_Surface* icon = IMG_Load("img/icon.png");
    SDL_Surface* background = IMG_Load("img/bg.png");
    SDL_Texture* texture = NULL;
    SDL_Texture* bg_texture = NULL;
    int quit = 1;
    FILE* hand = NULL;

    window = SDL_CreateWindow(
            "RCG High Hand",
            SDL_WINDOWPOS_UNDEFINED,
            0,
            900,
            400,
            SDL_WINDOW_FULLSCREEN_DESKTOP|SDL_WINDOW_ALLOW_HIGHDPI
        );
    if(window == NULL) {
        SDL_Log("Failed to create window: %s\n", SDL_GetError());
        return(1);
    }
    SDL_SetWindowIcon(window, icon);

    renderer = SDL_CreateRenderer(
            window,
            -1,
            SDL_RENDERER_ACCELERATED|SDL_RENDERER_PRESENTVSYNC
        );
    if(renderer == NULL) {
        SDL_Log("Failed to create renderer: %s\n", SDL_GetError());
        return(1);
    }
    SDL_SetHint(SDL_HINT_RENDER_SCALE_QUALITY, "liner");
    SDL_RenderSetLogicalSize(renderer, 900, 400);
    SDL_DisableScreenSaver();

    SDL_SetRenderDrawColor(renderer, 0x00, 0x00, 0x00, 0x00);

    SDL_Rect card1 = {65, 10, 150, 218};
    SDL_Rect card2 = {220, 10, 150, 218};
    SDL_Rect card3 = {375, 10, 150, 218};
    SDL_Rect card4 = {530, 10, 150, 218};
    SDL_Rect card5 = {685, 10, 150, 218};
    SDL_Rect message = {65, 248, 770, 142};

    char c1[] = "img/cards/rj.png", c2[] = "img/cards/rj.png", c3[] = "img/cards/rj.png", c4[] = "img/cards/rj.png", c5[] = "img/cards/rj.png";

    SDL_Surface* card = NULL;
    SDL_Texture* ct1 = NULL, *ct2 = NULL, *ct3 = NULL, *ct4 = NULL, *ct5 = NULL;
    SDL_FreeSurface(card);
    SDL_DestroyTexture(ct1);
    card = IMG_Load(c1);
    ct1 = SDL_CreateTextureFromSurface(renderer, card);
    if(ct1 == NULL) {
        SDL_Log( "Unable to create texture: %s\n", SDL_GetError());
        return(1);
    }
    SDL_FreeSurface(card);
    SDL_DestroyTexture(ct2);
    card = IMG_Load(c2);
    ct2 = SDL_CreateTextureFromSurface(renderer, card);
    if(ct2 == NULL) {
        SDL_Log( "Unable to create texture: %s\n", SDL_GetError());
        return(1);
    }
    SDL_FreeSurface(card);
    SDL_DestroyTexture(ct3);
    card = IMG_Load(c3);
    ct3 = SDL_CreateTextureFromSurface(renderer, card);
    if(ct3 == NULL) {
        SDL_Log( "Unable to create texture: %s\n", SDL_GetError());
        return(1);
    }
    SDL_FreeSurface(card);
    SDL_DestroyTexture(ct4);
    card = IMG_Load(c4);
    ct4 = SDL_CreateTextureFromSurface(renderer, card);
    if(ct4 == NULL) {
        SDL_Log( "Unable to create texture: %s\n", SDL_GetError());
        return(1);
    }
    SDL_FreeSurface(card);
    SDL_DestroyTexture(ct5);
    card = IMG_Load(c5);
    ct5 = SDL_CreateTextureFromSurface(renderer, card);
    if(ct5 == NULL) {
        SDL_Log( "Unable to create texture: %s\n", SDL_GetError());
        return(1);
    }

    SDL_Surface* message_surf = IMG_Load("img/mes.png");
    SDL_Texture* mes = NULL;
    mes = SDL_CreateTextureFromSurface(renderer, message_surf);
    if(mes == NULL) {
        SDL_Log( "Unable to create texture: %s\n", SDL_GetError());
        return(1);
    }


    while(quit) {
        while(SDL_PollEvent(&e)) {
            if(e.type == SDL_QUIT) {
                quit = 0;
            }
            if(e.type == SDL_KEYDOWN) {
                hand = fopen("hand.txt", "r");
                fscanf(hand, "%c%c\n%c%c\n%c%c\n%c%c\n%c%c\n", &c1[10], &c1[11], &c2[10], &c2[11], &c3[10], &c3[11], &c4[10], &c4[11], &c5[10], &c5[11]);
                if(fclose(hand) != 0) {
                    SDL_Log("File Close Error!\n");
                    return(1);
                }
                SDL_FreeSurface(card);
                SDL_DestroyTexture(ct1);
                card = IMG_Load(c1);
                ct1 = SDL_CreateTextureFromSurface(renderer, card);
                if(ct1 == NULL) {
                    SDL_Log( "Unable to create texture: %s\n", SDL_GetError());
                    return(1);
                }
                SDL_FreeSurface(card);
                SDL_DestroyTexture(ct2);
                card = IMG_Load(c2);
                ct2 = SDL_CreateTextureFromSurface(renderer, card);
                if(ct2 == NULL) {
                    SDL_Log( "Unable to create texture: %s\n", SDL_GetError());
                    return(1);
                }
                SDL_FreeSurface(card);
                SDL_DestroyTexture(ct3);
                card = IMG_Load(c3);
                ct3 = SDL_CreateTextureFromSurface(renderer, card);
                if(ct3 == NULL) {
                    SDL_Log( "Unable to create texture: %s\n", SDL_GetError());
                    return(1);
                }
                SDL_FreeSurface(card);
                SDL_DestroyTexture(ct4);
                card = IMG_Load(c4);
                ct4 = SDL_CreateTextureFromSurface(renderer, card);
                if(ct4 == NULL) {
                    SDL_Log( "Unable to create texture: %s\n", SDL_GetError());
                    return(1);
                }
                SDL_FreeSurface(card);
                SDL_DestroyTexture(ct5);
                card = IMG_Load(c5);
                ct5 = SDL_CreateTextureFromSurface(renderer, card);
                if(ct5 == NULL) {
                    SDL_Log( "Unable to create texture: %s\n", SDL_GetError());
                    return(1);
                }
            }
        }

        SDL_RenderClear(renderer);

        SDL_RenderCopy(renderer, bg_texture, NULL, NULL);

        SDL_RenderSetViewport(renderer, &card1);
        SDL_RenderCopy(renderer, ct1, NULL, NULL);

        SDL_RenderSetViewport(renderer, &card2);
        SDL_RenderCopy(renderer, ct2, NULL, NULL);

        SDL_RenderSetViewport(renderer, &card3);
        SDL_RenderCopy(renderer, ct3, NULL, NULL);

        SDL_RenderSetViewport(renderer, &card4);
        SDL_RenderCopy(renderer, ct4, NULL, NULL);

        SDL_RenderSetViewport(renderer, &card5);
        SDL_RenderCopy(renderer, ct5, NULL, NULL);

        SDL_RenderSetViewport(renderer, &message);
        SDL_RenderCopy(renderer, mes, NULL, NULL);

        SDL_RenderPresent(renderer);

        SDL_Delay(100);
    }
    SDL_FreeSurface(message_surf);
    SDL_FreeSurface(card);
    SDL_DestroyTexture(ct1);
    SDL_DestroyTexture(ct2);
    SDL_DestroyTexture(ct3);
    SDL_DestroyTexture(ct4);
    SDL_DestroyTexture(ct5);
    SDL_DestroyTexture(mes);
    SDL_DestroyTexture(texture);
    SDL_DestroyTexture(bg_texture);
    SDL_FreeSurface(background);
    SDL_FreeSurface(icon);


    SDL_DestroyRenderer(renderer);
    SDL_DestroyWindow(window);

    IMG_Quit();
    SDL_Quit();

    return(0);
}