/*******************************************************************************************
*
*   rexm [raylib examples manager] - A simple command-line tool to manage raylib examples
*
*   Supported processes:
*    - create <new_example_name>
*    - add <example_name>
*    - rename <old_examples_name> <new_example_name>
*    - remove <example_name>
*    - validate
*
*   Files involved in the processes:
*    - raylib/examples/<category>/<category>_example_name.c
*    - raylib/examples/<category>/<category>_example_name.png
*    - raylib/examples/<category>/resources/..
*    - raylib/examples/Makefile
*    - raylib/examples/Makefile.Web
*    - raylib/examples/README.md
*    - raylib/projects/VS2022/examples/<category>_example_name.vcxproj
*    - raylib/projects/VS2022/raylib.sln
*    - raylib.com/common/examples.js
*    - raylib.com/examples/<category>/<category>_example_name.html
*    - raylib.com/examples/<category>/<category>_example_name.data
*    - raylib.com/examples/<category>/<category>_example_name.wasm
*    - raylib.com/examples/<category>/<category>_example_name.js
*
*   LICENSE: zlib/libpng
*
*   Copyright (c) 2025 Ramon Santamaria (@raysan5)
*
*   This software is provided "as-is", without any express or implied warranty. In no event
*   will the authors be held liable for any damages arising from the use of this software.
*
*   Permission is granted to anyone to use this software for any purpose, including commercial
*   applications, and to alter it and redistribute it freely, subject to the following restrictions:
*
*     1. The origin of this software must not be misrepresented; you must not claim that you
*     wrote the original software. If you use this software in a product, an acknowledgment
*     in the product documentation would be appreciated but is not required.
*
*     2. Altered source versions must be plainly marked as such, and must not be misrepresented
*     as being the original software.
*
*     3. This notice may not be removed or altered from any source distribution.
*
**********************************************************************************************/

#include "raylib.h"

#include <stdlib.h>
#include <stdio.h>      // Required for: rename(), remove()
#include <string.h>     // Required for: strcmp(), strcpy()

#define SUPPORT_LOG_INFO
#if defined(SUPPORT_LOG_INFO) && defined(_DEBUG)
    #define LOG(...) printf(__VA_ARGS__)
#else
    #define LOG(...)
#endif

//----------------------------------------------------------------------------------
// Types and Structures Definition
//----------------------------------------------------------------------------------
// raylib example info struct
typedef struct {
    char category[16];
    char name[64];
    char stars;
    float verCreated;
    float verUpdated;
    char author[64];
    char authorGitHub[32];
} rlExampleInfo;

// Example management operations
typedef enum {
    OP_NONE     = 0,    // No process to do
    OP_CREATE   = 1,    // Create new example, using default template
    OP_ADD      = 2,    // Add existing examples (hopefully following template)
    OP_RENAME   = 3,    // Rename existing example
    OP_REMOVE   = 4,    // Remove existing example
    OP_VALIDATE = 5,    // Validate examples, using [examples_list.txt] as main source by default
} rlExampleOperation;

//----------------------------------------------------------------------------------
// Module specific functions declaration
//----------------------------------------------------------------------------------
static int FileTextReplace(const char *fileName, const char *textLookUp, const char *textReplace);
static int FileCopy(const char *srcPath, const char *dstPath);
static int FileRename(const char *fileName, const char *fileRename);
static int FileRemove(const char *fileName);

// Load examples collection information
static rlExampleInfo *LoadExamplesData(const char *fileName, int *exCount);
static void UnloadExamplesData(rlExampleInfo *exInfo);

// Get text lines (by line-breaks '\n')
// WARNING: It does not copy text data, just returns line pointers 
static const char **GetTextLines(const char *text, int *count);

// raylib example line info parser
// Parses following line format: core/core_basic_window;⭐️☆☆☆;1.0;1.0;"Ray"/@raysan5
static int ParseExampleInfoLine(const char *line, rlExampleInfo *entry);

// Sort array of strings by name
// WARNING: items[] pointers are reorganized
static void SortStringsByName(char **items, int count);

//------------------------------------------------------------------------------------
// Program main entry point
//------------------------------------------------------------------------------------
int main(int argc, char *argv[])
{
    // Paths required for examples management
    // TODO: Avoid hardcoding path values...
    char *exBasePath = "C:/GitHub/raylib/examples";
    char *exWebPath = "C:/GitHub/raylib.com/examples";
    char *exTemplateFilePath = "C:/GitHub/raylib/examples/examples_template.c";
    char *exTemplateScreenshot = "C:/GitHub/raylib/examples/examples_template.png";
    char *exCollectionList = "C:/GitHub/raylib/examples/examples_list.txt";

    char inFileName[1024] = { 0 };  // Example input filename (to be added)

    char exName[64] = { 0 };        // Example name, without extension: core_basic_window
    char exCategory[32] = { 0 };    // Example category: core
    char exRename[64] = { 0 };      // Example re-name, without extension

    int opCode = OP_NONE;           // Operation code: 0-None(Help), 1-Create, 2-Add, 3-Rename, 4-Remove

    // Command-line usage mode
    //--------------------------------------------------------------------------------------
    if (argc > 1)
    {
        // Supported commands:
        //    help                          : Provides command-line usage information (default)
        //    create <new_example_name>     : Creates an empty example, from internal template
        //    add <example_name>            : Add existing example, category extracted from name
        //    rename <old_examples_name> <new_example_name> : Rename an existing example
        //    remove <example_name>         : Remove an existing example
        //    validate                      : Validate examples collection
        if (strcmp(argv[1], "create") == 0)
        {
            // Check for valid upcoming argument
            if (argc == 2) LOG("WARNING: No filename provided to create\n");
            else if (argc > 3) LOG("WARNING: Too many arguments provided\n");
            else
            {
                // TODO: Additional security checks for file name?

                strcpy(exName, argv[2]); // Register filename for new example creation
                strncpy(exCategory, exName, TextFindIndex(exName, "_"));
                opCode = 1;
            }
        }
        else if (strcmp(argv[1], "add") == 0)
        {
            // Check for valid upcoming argument
            if (argc == 2) LOG("WARNING: No filename provided to create\n");
            else if (argc > 3) LOG("WARNING: Too many arguments provided\n");
            else
            {
                if (IsFileExtension(argv[2], ".c")) // Check for valid file extension: input
                {
                    if (FileExists(inFileName))
                    {
                        strcpy(inFileName, argv[2]); // Register filename for addition
                        strcpy(exName, GetFileNameWithoutExt(argv[2])); // Register example name
                        strncpy(exCategory, exName, TextFindIndex(exName, "_"));
                        opCode = 2;
                    }
                    else LOG("WARNING: Input file not found, include path\n");
                }
                else LOG("WARNING: Input file extension not recognized (.c)\n");
            }
        }
        else if (strcmp(argv[1], "rename") == 0)
        {
            if (argc == 2) LOG("WARNING: No filename provided to be renamed\n");
            else if (argc > 4) LOG("WARNING: Too many arguments provided\n");
            else
            {
                strcpy(exName, argv[2]); // Register example name
                strncpy(exCategory, exName, TextFindIndex(exName, "_"));
                strcpy(exRename, argv[3]);
                // TODO: Consider rename with change of category
                opCode = 3;
            }
        }
        else if (strcmp(argv[1], "remove") == 0)
        {
            // Check for valid upcoming argument
            if (argc == 2) LOG("WARNING: No filename provided to create\n");
            else if (argc > 3) LOG("WARNING: Too many arguments provided\n");
            else
            {
                strcpy(exName, argv[2]); // Register filename for removal
                opCode = 4;
            }
        }
        else if (strcmp(argv[1], "validate") == 0)
        {
            opCode = 5;
        }
    }

    switch (opCode)
    {
        case 1:     // Create: New example from template
        {
            // Create: raylib/examples/<category>/<category>_example_name.c
            FileCopy(exTemplateFilePath, TextFormat("%s/%s/%s.c", exBasePath, exCategory, exName));
        }
        case 2:     // Add: Example from command-line input filename
        {
            // Create: raylib/examples/<category>/<category>_example_name.c
            if (opCode != 1) FileCopy(inFileName, TextFormat("%s/%s/%s.c", exBasePath, exCategory, exName));

            // Create: raylib/examples/<category>/<category>_example_name.png
            FileCopy(exTemplateScreenshot, TextFormat("%s/%s/%s.png", exBasePath, exCategory, exName)); // WARNING: To be updated manually!

            // Copy: raylib/examples/<category>/resources/...  // WARNING: To be updated manually!
            
            // Check if example is already listed
            
            // If not, add to the main examples_list

            // TODO: Update the required files to add new example in the required position (ordered by category and name),
            // it could require some logic to make it possible...

            // Edit: raylib/examples/Makefile --> Add new example
            char *mkText = LoadFileText(TextFormat("%s/Makefile", exBasePath));
            int exListStartIndex = TextFindIndex(mkText, "#EXAMPLES_LIST_START");
            int exListEndIndex = TextFindIndex(mkText, "#EXAMPLES_LIST_END");
            char *mkTextUpdate = (char *)RL_CALLOC(2*1024*1024, 1); // 2MB
            memcpy(mkTextUpdate, mkText, exListStartIndex);
            // TODO: Update required lines...
            //SaveFileText(TextFormat("%s/Makefile", exBasePath), mkTextUpdate);
            UnloadFileText(mkText);
            RL_FREE(mkTextUpdate);
            
            // Edit: raylib/examples/Makefile.Web --> Add new example

            // Edit: raylib/examples/README.md --> Add new example
            // TODO: Use [examples_list.txt] to update/regen README.md
            
            // Create: raylib/projects/VS2022/examples/<category>_example_name.vcxproj
            FileCopy(TextFormat("%s/../projects/VS2022/examples/core_basic_window.vcxproj", exBasePath),
                TextFormat("%s/../projects/VS2022/examples/%s.vcxproj", exBasePath, exName));
            FileTextReplace(, "core_basic_window", exName);
            FileTextReplace(, "..\..\examples\core", TextFormat("..\..\examples\%s", exCategory));
            
            // Edit: raylib/projects/VS2022/raylib.sln --> Add new example project
            system(TextFormat("dotnet solution raylib.sln add %s/../projects/VS2022/examples/%s.vcxproj", exBasePath, exName));
            
            // Edit: raylib.com/common/examples.js --> Add new example
            //Entries format: exampleEntry('⭐️☆☆☆' , 'core'    , 'basic_window'),
            char *jsText = LoadFileText(TextFormat("%s/../common/examples.js", exWebPath));
            int exListStartIndex = TextFindIndex(jsText, "//EXAMPLE_DATA_LIST_START");
            int exListEndIndex = TextFindIndex(jsText, "//EXAMPLE_DATA_LIST_END");

            UnloadFileText(jsText);

            // Recompile example (on raylib side)
            // NOTE: Tools requirements: emscripten, w64devkit
            // Compile to: raylib.com/examples/<category>/<category>_example_name.html
            // Compile to: raylib.com/examples/<category>/<category>_example_name.data
            // Compile to: raylib.com/examples/<category>/<category>_example_name.wasm
            // Compile to: raylib.com/examples/<category>/<category>_example_name.js
            system(TextFormat("%s/../build_example_web.bat %s\%s", exBasePath, exCategory, exName));

            // Copy results to web side
            FileCopy(TextFormat("%s/%s/%s.html", exBasePath, exCategory, exName),
                TextFormat("%s/%s/%s.html", exWebPath, exCategory, exName));
            FileCopy(TextFormat("%s/%s/%s.data", exBasePath, exCategory, exName),
                TextFormat("%s/%s/%s.data", exWebPath, exCategory, exName));
            FileCopy(TextFormat("%s/%s/%s.wasm", exBasePath, exCategory, exName),
                TextFormat("%s/%s/%s.wasm", exWebPath, exCategory, exName));
            FileCopy(TextFormat("%s/%s/%s.js", exBasePath, exCategory, exName),
                TextFormat("%s/%s/%s.js", exWebPath, exCategory, exName));
        } break;
        case 3:     // Rename
        {
            // Rename all required files
            rename(TextFormat("%s/%s/%s.c", exBasePath, exCategory, exName),
                TextFormat("%s/%s/%s.c", exBasePath, exCategory, exRename));
            rename(TextFormat("%s/%s/%s.png", exBasePath, exCategory, exName),
                TextFormat("%s/%s/%s.png", exBasePath, exCategory, exRename));

            FileTextReplace(TextFormat("%s/Makefile", exBasePath), exName, exRename);
            FileTextReplace(TextFormat("%s/Makefile.Web", exBasePath), exName, exRename);
            FileTextReplace(TextFormat("%s/README.md", exBasePath), exName, exRename);

            rename(TextFormat("%s/../projects/VS2022/examples/%s.vcxproj", exBasePath, exName),
                TextFormat("%s/../projects/VS2022/examples/%s.vcxproj", exBasePath, exRename));
            FileTextReplace(TextFormat("%s/../projects/VS2022/raylib.sln", exBasePath), exName, exRename);

            // Remove old web compilation
            FileTextReplace(TextFormat("%s/../common/examples.js", exWebPath), exName, exRename);
            remove(TextFormat("%s/%s/%s.html", exWebPath, exCategory, exName));
            remove(TextFormat("%s/%s/%s.data", exWebPath, exCategory, exName));
            remove(TextFormat("%s/%s/%s.wasm", exWebPath, exCategory, exName));
            remove(TextFormat("%s/%s/%s.js", exWebPath, exCategory, exName));

            // Recompile example (on raylib side)
            // NOTE: Tools requirements: emscripten, w64devkit
            system(TextFormat("%s/../build_example_web.bat %s\%s", exBasePath, exCategory, exName));

            // Copy results to web side
            FileCopy(TextFormat("%s/%s/%s.html", exBasePath, exCategory, exName),
                TextFormat("%s/%s/%s.html", exWebPath, exCategory, exName));
            FileCopy(TextFormat("%s/%s/%s.data", exBasePath, exCategory, exName),
                TextFormat("%s/%s/%s.data", exWebPath, exCategory, exName));
            FileCopy(TextFormat("%s/%s/%s.wasm", exBasePath, exCategory, exName),
                TextFormat("%s/%s/%s.wasm", exWebPath, exCategory, exName));
            FileCopy(TextFormat("%s/%s/%s.js", exBasePath, exCategory, exName),
                TextFormat("%s/%s/%s.js", exWebPath, exCategory, exName));
        } break;
        case 4:     // Remove
        {
            // TODO: Remove and update all required files...

        } break;
        case 5:     // Validate
        {
            // TODO: Validate examples collection against [examples_list.txt]
            
            // Validate: raylib/examples/<category>/<category>_example_name.c
            // Validate: raylib/examples/<category>/<category>_example_name.png
            // Validate: raylib/examples/<category>/resources/.. -> Not possible for now...
            // Validate: raylib/examples/Makefile
            // Validate: raylib/examples/Makefile.Web
            // Validate: raylib/examples/README.md
            // Validate: raylib/projects/VS2022/examples/<category>_example_name.vcxproj
            // Validate: raylib/projects/VS2022/raylib.sln
            // Validate: raylib.com/common/examples.js
            // Validate: raylib.com/examples/<category>/<category>_example_name.html
            // Validate: raylib.com/examples/<category>/<category>_example_name.data
            // Validate: raylib.com/examples/<category>/<category>_example_name.wasm
            // Validate: raylib.com/examples/<category>/<category>_example_name.js
            
        } break;
        default:    // Help
        {
            // Supported commands:
            //    help                          : Provides command-line usage information
            //    create <new_example_name>     : Creates an empty example, from internal template
            //    add <example_name>            : Add existing example, category extracted from name
            //    rename <old_examples_name> <new_example_name> : Rename an existing example
            //    remove <example_name>         : Remove an existing example

            printf("\n////////////////////////////////////////////////////////////////////////////////////////////\n");
            printf("//                                                                                        //\n");
            printf("// rexm [raylib examples manager] - A simple command-line tool to manage raylib examples  //\n");
            printf("// powered by raylib v5.6-dev                                                             //\n");
            printf("//                                                                                        //\n");
            printf("// Copyright (c) 2025 Ramon Santamaria (@raysan5)                                         //\n");
            printf("//                                                                                        //\n");
            printf("////////////////////////////////////////////////////////////////////////////////////////////\n\n");

            printf("USAGE:\n\n");
            printf("    > rexm help|create|add|rename|remove <example_name> [<example_rename>]\n");

            printf("\nOPTIONS:\n\n");
            printf("    help                          : Provides command-line usage information\n");
            printf("    create <new_example_name>     : Creates an empty example, from internal template\n");
            printf("    add <example_name>            : Add existing example, category extracted from name\n");
            printf("                                    Supported categories: core, shapes, textures, text, models\n");
            printf("    rename <old_examples_name> <new_example_name> : Rename an existing example\n");
            printf("    remove <example_name>         : Remove an existing example\n\n");
            printf("\nEXAMPLES:\n\n");
            printf("    > rexm add shapes_custom_stars\n");
            printf("        Add and updates new example provided <shapes_custom_stars>\n\n");
            printf("    > rexm rename core_basic_window core_cool_window\n");
            printf("        Renames and updates example <core_basic_window> to <core_cool_window>\n\n");
        } break;
    }

    return 0;
}

//----------------------------------------------------------------------------------
// Module specific functions definition
//----------------------------------------------------------------------------------
// Load examples collection information
static rlExampleInfo *LoadExamplesData(const char *fileName, int *exCount)
{
    #define MAX_EXAMPLES_INFO   256
    
    *exCount = 0;
    rlExampleInfo *exInfo = (rlExampleInfo *)RL_CALLOC(MAX_EXAMPLES_INFO, sizeof(rlExampleInfo));
    
    const char *text = LoadFileText(fileName);
    
    if (text != NULL)
    {
        int lineCount = 0;
        const char **linePtrs = GetTextLines(text, &lineCount);
        
        for (int i = 0; i < lineCount; i++)
        {
            // Basic validation for lines start categories
            if ((linePtrs[i][0] != '#') && 
               ((linePtrs[i][0] == 'c') ||      // core
                (linePtrs[i][0] == 's') ||      // shapes, shaders
                (linePtrs[i][0] == 't') ||      // textures, text
                (linePtrs[i][0] == 'm') ||      // models
                (linePtrs[i][0] == 'a') ||      // audio
                (linePtrs[i][0] == 'o')))       // others
            {
                if (ParseExampleInfoLine(linePtrs[i], &exInfo[*exCount]) == 0) *exCount += 1;
            }
        }
    }
    
    return exInfo;
}

// Unload examples collection data
static void UnloadExamplesData(rlExampleInfo *exInfo)
{
    RL_FREE(exInfo);
}

// Replace text in an existing file
static int FileTextReplace(const char *fileName, const char *textLookUp, const char *textReplace)
{
    int result = 0;
    char *fileText = NULL;
    char *fileTextUpdated = { 0 };
    
    if (FileExists(fileName))
    {
        fileText = LoadFileText(fileName);
        fileTextUpdated = TextReplace(fileText, textLookUp, textReplace);
        result = SaveFileText(fileName, fileTextUpdated);
        MemFree(fileTextUpdated);
        UnloadFileText(fileText);
    }

    return result;
}

// Copy file from one path to another
// WARNING: Destination path must exist
static int FileCopy(const char *srcPath, const char *dstPath)
{
    int result = 0;
    int srcDataSize = 0;
    unsigned char *srcFileData = LoadFileData(srcPath, &srcDataSize);
    
    // TODO: Create required paths if they do not exist

    if ((srcFileData != NULL) && (srcDataSize > 0)) result = SaveFileData(dstPath, srcFileData, srcDataSize);

    UnloadFileData(srcFileData);

    return result;
}

// Rename file (if exists)
// NOTE: Only rename file name required, not full path
static int FileRename(const char *fileName, const char *fileRename)
{
    int result = 0;

    if (FileExists(fileName)) rename(fileName, TextFormat("%s/%s", GetDirectoryPath(fileName), fileRename));

    return result;
}

// Remove file (if exists)
static int FileRemove(const char *fileName)
{
    int result = 0;

    if (FileExists(fileName)) remove(fileName);

    return result;
}

// Get text lines (by line-breaks '\n')
// WARNING: It does not copy text data, just returns line pointers 
static const char **GetTextLines(const char *text, int *count)
{
    #define MAX_TEXT_LINE_PTRS   128

    static const char *linePtrs[MAX_TEXT_LINE_PTRS] = { 0 };
    for (int i = 0; i < MAX_TEXT_LINE_PTRS; i++) linePtrs[i] = NULL;    // Init NULL pointers to substrings

    int textSize = (int)strlen(text);

    linePtrs[0] = text;
    int len = 0;
    *count = 1;

    for (int i = 0, k = 0; (i < textSize) && (*count < MAX_TEXT_LINE_PTRS); i++)
    {
        if (text[i] == '\n')
        {
            k++;
            linePtrs[k] = &text[i + 1]; // WARNING: next value is valid?
            len = 0;
            *count += 1;
        }
        else len++;
    }

    return linePtrs;
}

// raylib example line info parser
// Parses following line format: core/core_basic_window;⭐️☆☆☆;1.0;1.0;"Ray"/@raysan5
static int ParseExampleInfoLine(const char *line, rlExampleInfo *entry)
{
    #define MAX_EXAMPLE_INFO_LINE_LEN   512
    
    char temp[MAX_EXAMPLE_INFO_LINE_LEN] = { 0 };
    strncpy(temp, line, MAX_EXAMPLE_INFO_LINE_LEN); // WARNING: Copy is needed because strtok() modifies string, adds '\0' 
    temp[MAX_EXAMPLE_INFO_LINE_LEN - 1] = '\0'; // Ensure null termination
    
    int tokenCount = 0;
    char **tokens = TextSplit(line, ';', &tokenCount);

    // Get category and name
    strncpy(entry->category, tokens[0], sizeof(entry->category));
    strncpy(entry->name, tokens[1], sizeof(entry->name));

    // Parsing stars
    // NOTE: Counting the unicode char occurrences: ⭐️
    const char *ptr = tokens[2];
    while (*ptr) 
    {
        if (((unsigned char)ptr[0] == 0xE2) && 
            ((unsigned char)ptr[1] == 0xAD) && 
            ((unsigned char)ptr[2] == 0x90))
        {
            entry->stars++;
            ptr += 3; // Advance past multibyte character
        }
        else ptr++;
    }

    // Get raylib creation/update versions
    entry->verCreated = strtof(tokens[3], NULL);
    entry->verUpdated = strtof(tokens[4], NULL);

    // Get author and github
    char *quote1 = strchr(tokens[5], '"');
    char *quote2 = quote1? strchr(quote1 + 1, '"') : NULL;
    if (quote1 && quote2) strncpy(entry->author, quote1 + 1, sizeof(entry->author));
    strncpy(entry->authorGitHub, tokens[6], sizeof(entry->authorGitHub));

    return 1;
}

// Text compare, required for qsort() function
static int SortTextCompare(const void *a, const void *b)
{
    const char *str1 = *(const char **)a;
    const char *str2 = *(const char **)b;
    
    return strcmp(str1, str2);
}

// Sort array of strings by name
// WARNING: items[] pointers are reorganized
static void SortStringsByName(char **items, int count)
{
    qsort(items, count, sizeof(char *), SortTextCompare);
}