/*
 * COPYRIGHT:       See COPYING in the top level directory
 * PROJECT:         ReactOS Console Server DLL
 * FILE:            win32ss/user/winsrv/consrv/frontends/gui/graphics.c
 * PURPOSE:         GUI Terminal Front-End - Support for graphics-mode screen-buffers
 * PROGRAMMERS:     Hermes Belusca-Maito (hermes.belusca@sfr.fr)
 */

/* INCLUDES *******************************************************************/

#include <consrv.h>

#define NDEBUG
#include <debug.h>

#include "guiterm.h"

/* FUNCTIONS ******************************************************************/

VOID
GuiCopyFromGraphicsBuffer(PGRAPHICS_SCREEN_BUFFER Buffer,
                          PGUI_CONSOLE_DATA GuiData)
{
    /*
     * This function supposes that the system clipboard was opened.
     */

    HDC hMemDC;
    HBITMAP  hBitmapTarget, hBitmapOld;
    HPALETTE hPalette, hPaletteOld;
    ULONG selWidth, selHeight;

    if (Buffer->BitMap == NULL) return;

    selWidth  = ConioRectWidth(&GuiData->Selection.srSelection);
    selHeight = ConioRectHeight(&GuiData->Selection.srSelection);
    DPRINT("Selection is (%d|%d) to (%d|%d)\n",
           GuiData->Selection.srSelection.Left,
           GuiData->Selection.srSelection.Top,
           GuiData->Selection.srSelection.Right,
           GuiData->Selection.srSelection.Bottom);

    hMemDC = CreateCompatibleDC(GuiData->hMemDC);
    if (hMemDC == NULL) return;

    /* Allocate a bitmap to be given to the clipboard, so it will not be freed here */
    hBitmapTarget = CreateCompatibleBitmap(GuiData->hMemDC, selWidth, selHeight);
    if (hBitmapTarget == NULL)
    {
        DeleteDC(hMemDC);
        return;
    }

    /* Select the new bitmap */
    hBitmapOld = SelectObject(hMemDC, hBitmapTarget);

    /* Change the palette in hMemDC if the current palette does exist */
    if (Buffer->PaletteHandle == NULL)
        hPalette = GuiData->hSysPalette;
    else
        hPalette = Buffer->PaletteHandle;

    if (hPalette) hPaletteOld = SelectPalette(hMemDC, hPalette, FALSE);

    /* Grab the mutex */
    NtWaitForSingleObject(Buffer->Mutex, FALSE, NULL);

    // The equivalent of a SetDIBitsToDevice call...
    // It seems to be broken: it does not copy the tail of the bitmap.
    // http://wiki.allegro.cc/index.php?title=StretchDIBits
#if 0
    StretchDIBits(hMemDC,
                  0, 0,
                  selWidth, selHeight,
                  GuiData->Selection.srSelection.Left,
                  GuiData->Selection.srSelection.Top,
                  selWidth, selHeight,
                  Buffer->BitMap,
                  Buffer->BitMapInfo,
                  Buffer->BitMapUsage,
                  SRCCOPY);
#else
    SetDIBitsToDevice(hMemDC,
                      /* Coordinates / size of the repainted rectangle, in the framebuffer's frame */
                      0, 0,
                      selWidth, selHeight,
                      /* Coordinates / size of the corresponding image portion, in the graphics screen-buffer's frame */
                      GuiData->Selection.srSelection.Left,
                      GuiData->Selection.srSelection.Top,
                      0,
                      Buffer->ScreenBufferSize.Y, // == Buffer->BitMapInfo->bmiHeader.biHeight
                      Buffer->BitMap,
                      Buffer->BitMapInfo,
                      Buffer->BitMapUsage);
#endif

    /* Release the mutex */
    NtReleaseMutant(Buffer->Mutex, NULL);

    /* Restore the palette and the old bitmap */
    if (hPalette) SelectPalette(hMemDC, hPaletteOld, FALSE);
    SelectObject(hMemDC, hBitmapOld);

    EmptyClipboard();
    SetClipboardData(CF_BITMAP, hBitmapTarget);

    DeleteDC(hMemDC);
}

VOID
GuiPasteToGraphicsBuffer(PGRAPHICS_SCREEN_BUFFER Buffer,
                         PGUI_CONSOLE_DATA GuiData)
{
    /*
     * This function supposes that the system clipboard was opened.
     */

    // PCONSRV_CONSOLE Console = Buffer->Header.Console;

    UNIMPLEMENTED;
}

VOID
GuiPaintGraphicsBuffer(PGRAPHICS_SCREEN_BUFFER Buffer,
                       PGUI_CONSOLE_DATA GuiData,
                       PRECT rcView,
                       PRECT rcFramebuffer)
{
    PCONSRV_CONSOLE Console = (PCONSRV_CONSOLE)Buffer->Header.Console;
    // ASSERT(Console == GuiData->Console);

    ConioInitLongRect(rcFramebuffer, 0, 0, 0, 0);

    if (Buffer->BitMap == NULL)
        return;

    if (!ConDrvValidateConsoleUnsafe((PCONSOLE)Console, CONSOLE_RUNNING, TRUE))
        return;

    ConioInitLongRect(rcFramebuffer,
                      Buffer->ViewOrigin.Y * 1 + rcView->top,
                      Buffer->ViewOrigin.X * 1 + rcView->left,
                      Buffer->ViewOrigin.Y * 1 + rcView->bottom,
                      Buffer->ViewOrigin.X * 1 + rcView->right);

    /* Grab the mutex */
    NtWaitForSingleObject(Buffer->Mutex, FALSE, NULL);

    /*
     * The seventh parameter (YSrc) of SetDIBitsToDevice always designates
     * the Y-coordinate of the "lower-left corner" of the image, be the DIB
     * in bottom-up or top-down mode.
     */
    SetDIBitsToDevice(GuiData->hMemDC,
                      /* Coordinates / size of the repainted rectangle, in the framebuffer's frame */
                      rcFramebuffer->left,
                      rcFramebuffer->top,
                      rcFramebuffer->right  - rcFramebuffer->left,
                      rcFramebuffer->bottom - rcFramebuffer->top,
                      /* Coordinates / size of the corresponding image portion, in the graphics screen-buffer's frame */
                      rcFramebuffer->left,
                      rcFramebuffer->top,
                      0,
                      Buffer->ScreenBufferSize.Y, // == Buffer->BitMapInfo->bmiHeader.biHeight
                      Buffer->BitMap,
                      Buffer->BitMapInfo,
                      Buffer->BitMapUsage);

    /* Release the mutex */
    NtReleaseMutant(Buffer->Mutex, NULL);

    LeaveCriticalSection(&Console->Lock);
}

/* EOF */