// SPDX-License-Identifier: CC0-1.0
//
// SPDX-FileContributor: NightFox & Co., 2009-2011
//
// Basic example of using a 16-bit bitmap and zooming an image.
// http://www.nightfoxandco.com

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

#include <nds.h>
#include <filesystem.h>

#include <nf_lib.h>

int main(int argc, char **argv)
{
    // Prepare a NitroFS initialization screen
    NF_Set2D(0, 0);
    NF_Set2D(1, 0);
    consoleDemoInit();
    printf("\n NitroFS init. Please wait.\n\n");
    printf(" Iniciando NitroFS,\n por favor, espere.\n\n");
    swiWaitForVBlank();

    // Initialize NitroFS and set it as the root folder of the filesystem
    nitroFSInit(NULL);
    NF_SetRootFolder("NITROFS");

    // Initialize 2D engine in both screens and use mode 5
    NF_Set2D(0, 5);
    NF_Set2D(1, 5);

    // Initialize bitmap backgrounds system
    NF_InitBitmapBgSys(0, 1);
    NF_InitBitmapBgSys(1, 1);

    // Initialize storage buffers
    NF_Init16bitsBgBuffers();

    // Initialize backbuffers
    NF_Init16bitsBackBuffer(0);
    NF_Init16bitsBackBuffer(1);

    // Enable backbuffers
    NF_Enable16bitsBackBuffer(0);
    NF_Enable16bitsBackBuffer(1);

    // Load bitmap background files from NitroFS
    NF_Load16bitsBg("bmp/bitmap16", 0);

    // Tranfer image to the backbuffer of the bottom screen
    NF_Copy16bitsBuffer(1, 1, 0);

    // Window position
    s16 square_x = 0;
    s16 square_y = 0;

    while (1)
    {
        // Copy original image
        NF_Copy16bitsBuffer(1, 1, 0);

        // Read keys and touchscreen
        scanKeys();
        touchPosition touchscreen;
        touchRead(&touchscreen);
        u16 keys = keysHeld();
        if (keys & KEY_TOUCH)
        {
            square_x = touchscreen.px - 64;
            square_y = touchscreen.py - 48;
        }

        // Restrict coordinates of the window
        if (square_x < 0)
            square_x = 0;
        if (square_x > 127)
            square_x = 127;

        if (square_y < 0)
            square_y = 0;
        if (square_y > 95)
            square_y = 95;

        // Reset source buffer read pointers
        u32 zoom_x = 0;
        u32 zoom_y = 0;

        // Fill the destination buffer
        for (int y = square_y; y < square_y + 96; y++)
        {
            for (int x = square_x; x < square_x + 128; x++)
            {
                // Get current color
                u32 rgb = NF_16BITS_BACKBUFFER[1][(y << 8) + x];

                // Write value in 2x2 pixels in the bacbuffer of the bottom
                // screen for the zoom effect.
                NF_16BITS_BACKBUFFER[0][(zoom_y << 8) + zoom_x] = rgb;
                NF_16BITS_BACKBUFFER[0][(zoom_y << 8) + (zoom_x + 1)] = rgb;
                NF_16BITS_BACKBUFFER[0][((zoom_y + 1) << 8) + zoom_x] = rgb;
                NF_16BITS_BACKBUFFER[0][((zoom_y + 1) << 8) + (zoom_x + 1)] = rgb;

                // Get RGB components
                u32 r = rgb & 0x1F;
                u32 g = (rgb >> 5) & 0x1F;
                u32 b = (rgb >> 10) & 0x1F;

                // Generate a grayscale value based on the RGB components
                u32 composite = ((r + g + b) / 3) + 3;
                if (composite > 31)
                    composite = 31;

                // Replace the RGB values by the grayscale value (this shows up
                // as a rectangular window on the screen)
                r = composite;
                g = composite >> 2;
                b = composite >> 1;

                // Pack the components as a RGB value
                rgb = r | (g << 5) | (b << 10) | BIT(15);

                // Write RGB value in the backbuffer
                NF_16BITS_BACKBUFFER[1][(y << 8) + x] = rgb;

                // Increment X coordinate pointer
                zoom_x += 2;
            }

            // Set X coordinate from the beginning
            zoom_x = 0;
            // Increment Y coordinate pointer
            zoom_y += 2;
        }

        // Wait for the screen refresh
        swiWaitForVBlank();

        // Swap backbuffers and visible buffers
        NF_Flip16bitsBackBuffer(0);
        NF_Flip16bitsBackBuffer(1);
    }

    return 0;
}