/*** $Id: gdi.c,v 1.56 2003/09/04 06:02:53 weiym Exp $**** The graphics display interface module of MiniGUI.**** Copyright (C) 2003 Feynman Software.** Copyright (C) 1999 ~ 2002 Wei Yongming.**** Current maintainer: Wei Yongming.**** Create date: 1999.01.03*//*** This program is free software; you can redistribute it and/or modify** it under the terms of the GNU General Public License as published by** the Free Software Foundation; either version 2 of the License, or** (at your option) any later version.**** This program is distributed in the hope that it will be useful,** but WITHOUT ANY WARRANTY; without even the implied warranty of** MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the** GNU General Public License for more details.**** You should have received a copy of the GNU General Public License** along with this program; if not, write to the Free Software** Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA*//*** TODO:*/#include <stdio.h>#include <string.h>#include <malloc.h>#include "common.h"#include "minigui.h"#include "gdi.h"#include "window.h"#include "cliprect.h"#include "gal.h"#include "cursor.h"#include "internals.h"#include "inline.h"#include "memops.h"#include "ctrlclass.h"#include "dc.h"#include "sysfont.h"#include "devfont.h"#include "drawtext.h"#if defined(_LITE_VERSION) && !defined(_STAND_ALONE)    #include "ourhdr.h"    #include "client.h"    #include "sharedres.h"#endif/************************* global data define ********************************/DC __mg_screen_dc;gal_pixel SysPixelIndex [17];// This should be the standard EGA palette.const RGB SysPixelColor [] = {    {0x00, 0x00, 0x00},     // transparent   --0    {0x00, 0x00, 0x80},     // dark blue     --1    {0x00, 0x80, 0x00},     // dark green    --2    {0x00, 0x80, 0x80},     // dark cyan     --3    {0x80, 0x00, 0x00},     // dark red      --4    {0x80, 0x00, 0x80},     // dark magenta  --5    {0x80, 0x80, 0x00},     // dark yellow   --6    {0x80, 0x80, 0x80},     // dark gray     --7    {0xC0, 0xC0, 0xC0},     // light gray    --8    {0x00, 0x00, 0xFF},     // blue          --9    {0x00, 0xFF, 0x00},     // green         --10    {0x00, 0xFF, 0xFF},     // cyan          --11    {0xFF, 0x00, 0x00},     // red           --12    {0xFF, 0x00, 0xFF},     // magenta       --13    {0xFF, 0xFF, 0x00},     // yellow        --14    {0xFF, 0xFF, 0xFF},     // light white   --15    {0x00, 0x00, 0x00}      // black         --16};#ifndef _LITE_VERSION// mutex ensuring exclusive access to gdi. pthread_mutex_t __mg_gdilock;#endif/************************* global functions declaration **********************/// the following functions, which defined in other module// but used in this module.extern PGCRINFO GetGCRgnInfo (HWND hWnd);/**************************** static data ************************************/// General DCstatic DC DCSlot [DCSLOTNUMBER];#ifndef _LITE_VERSION// mutex ensuring exclusive access to DC slot. static pthread_mutex_t dcslot;#endifstatic BLOCKHEAP sg_FreeClipRectList;/************************* static functions declaration **********************/static void dc_InitClipRgnInfo (void);static void dc_InitDC (PDC pdc, HWND hWnd, BOOL bIsClient);static void dc_InitScreenDC (void);/************************** inline functions *********************************/inline void WndRect(HWND hWnd, PRECT prc){    PCONTROL pParent;    PCONTROL pCtrl;    pParent = pCtrl = (PCONTROL) hWnd;    if (hWnd == HWND_DESKTOP) {        *prc = g_rcScr;        return;    }    prc->left = pCtrl->left;    prc->top  = pCtrl->top;    prc->right = pCtrl->right;    prc->bottom = pCtrl->bottom;    while ((pParent = pParent->pParent)) {        prc->left += pParent->cl;        prc->top  += pParent->ct;        prc->right += pParent->cl;        prc->bottom += pParent->ct;    }}inline void WndClientRect(HWND hWnd, PRECT prc){    PCONTROL pCtrl;    PCONTROL pParent;    pParent = pCtrl = (PCONTROL) hWnd;    if (hWnd == HWND_DESKTOP) {        *prc = g_rcScr;        return;    }    prc->left = pCtrl->cl;    prc->top  = pCtrl->ct;    prc->right = pCtrl->cr;    prc->bottom = pCtrl->cb;    while ((pParent = pParent->pParent)) {        prc->left += pParent->cl;        prc->top  += pParent->ct;        prc->right += pParent->cl;        prc->bottom += pParent->ct;    }}static void RestrictControlECRGN (RECT* minimal, PCONTROL pCtrl){    RECT rc;    PCONTROL pRoot = (PCONTROL) (pCtrl->pMainWin);    int off_x = 0, off_y = 0;    do {        PCONTROL pParent = pCtrl;        rc.left = pRoot->cl + off_x;        rc.top  = pRoot->ct + off_y;        rc.right = pRoot->cr + off_x;        rc.bottom = pRoot->cb + off_y;        IntersectRect (minimal, minimal, &rc);        if (pRoot == pCtrl->pParent)            break;        off_x += pRoot->cl;        off_y += pRoot->ct;        while (TRUE) {            if (pRoot->children == pParent->pParent->children) {                pRoot = pParent;                break;            }            pParent = pParent->pParent;        }    } while (TRUE);}/******************* Initialization and termination of GDI *******************/BOOL InitScreenDC (void){    InitFreeClipRectList (&sg_FreeClipRectList, SIZE_CLIPRECTHEAP);        INIT_LOCK (&__mg_gdilock, NULL);    INIT_LOCK (&dcslot, NULL);    dc_InitClipRgnInfo();    dc_InitScreenDC ();    return TRUE;}void TerminateScreenDC (void){    DestroyFreeClipRectList (&sg_FreeClipRectList);    DESTROY_LOCK (&__mg_gdilock);    DESTROY_LOCK (&dcslot);}BOOL InitGDI (void){       if (!InitTextBitmapBuffer ()) {        fprintf (stderr,             "GDI: Can not initialize text bitmap buffer!\n");        goto error;    }#ifdef _RBF_SUPPORT#ifdef _INCORE_RES    if (!InitIncoreRBFonts ()) {        fprintf (stderr,             "GDI: Can not initialize incore RBF fonts!\n");        goto error;    }#endif#endif#ifdef _VBF_SUPPORT    if (!InitIncoreVBFonts ()) {        fprintf (stderr,             "GDI: Can not initialize incore VBF fonts!\n");        goto error;    }#endif#ifndef _INCORE_RES#ifdef _RBF_SUPPORT    if (!InitRawBitmapFonts ()) {        fprintf (stderr,             "GDI: Can not initialize raw bitmap fonts!\n");        goto error;    }#endif#ifdef _VBF_SUPPORT    if (!InitVarBitmapFonts ()) {        fprintf (stderr,             "GDI: Can not initialize var bitmap fonts!\n");        goto error;    }#endif#ifdef _QPF_SUPPORT    if (!InitQPFonts ()) {        fprintf (stderr,             "GDI: Can not initialize QPF fonts!\n");        goto error;    }#endif#ifndef _LITE_VERSION#ifdef _TTF_SUPPORT    if (!InitFreeTypeFonts ()) {        fprintf (stderr,             "GDI: Can not initialize TrueType fonts!\n");        goto error;    }#endif#ifdef _TYPE1_SUPPORT    if (!InitType1Fonts ()) {        fprintf (stderr,             "GDI: Can not initialize Type1 fonts!\n");        goto error;    }#endif#endif /* _LITE_VERSION */#endif /* _INCORE_RES */    /* TODO: add other font support here */#ifdef _DEBUG    dumpDevFonts ();#endif    if (!InitSysFont ()) {        fprintf (stderr,             "GDI: Can not create system fonts!\n");        goto error;    }    return TRUE;error:    return FALSE;}void TerminateGDI( void ){    TermSysFont ();    /* TODO: add other font support here */#ifndef _INCORE_RES#ifndef _LITE_VERSION#ifdef _TTF_SUPPORT    TermFreeTypeFonts ();#endif#ifdef _TYPE1_SUPPORT	TermType1Fonts();#endif#endif /* _LITE_VERSION */#ifdef _QPF_SUPPORT    TermQPFonts ();#endif#ifdef _VBF_SUPPORT    TermVarBitmapFonts ();#endif#ifdef _RBF_SUPPORT    TermRawBitmapFonts ();#endif#endif /* _INCORE_RES */#ifdef _VBF_SUPPORT    TermIncoreVBFonts ();#endif#ifdef _RBF_SUPPORT#ifdef _INCORE_RES    TermIncoreRBFonts ();#endif#endif    ResetDevFont ();    TermTextBitmapBuffer ();}/* * Function: int GUIAPI GetGDCapability( int iItem)  *      This Function return DC parameters. * Parameters: *      The element want to retrive. * Return: *      The parameter. */unsigned int GUIAPI GetGDCapability (HDC hdc, int iItem){    PDC pdc;    unsigned int iret = 0xFFFFFFFF;    pdc = dc_HDC2PDC (hdc);    LOCK (&__mg_gdilock);    switch (iItem)    {        case GDCAP_DEPTH:            iret = GAL_BitsPerPixel (pdc->surface);            break;        case GDCAP_BPP:            iret = GAL_BytesPerPixel (pdc->surface);            break;        case GDCAP_COLORNUM:            iret = GAL_BitsPerPixel (pdc->surface);            if (iret < 32)                iret = 1 << iret;            else                iret = 0xFFFFFFFF;            break;         case GDCAP_HPIXEL:            iret = GAL_Width (pdc->surface);            break;        case GDCAP_VPIXEL:            iret = GAL_Height (pdc->surface);            break;        case GDCAP_MAXX:            iret = GAL_Width (pdc->surface) - 1;            break;        case GDCAP_MAXY:            iret = GAL_Height (pdc->surface) - 1;            break;    }    UNLOCK(&__mg_gdilock);    return iret;}// This function init clip region in all DC slots.static void dc_InitClipRgnInfo(void){    int i;    for (i=0; i<DCSLOTNUMBER; i++) {        // Local clip region        InitClipRgn (&DCSlot[i].lcrgn, &sg_FreeClipRectList);        // Global clip region info        DCSlot[i].pGCRInfo = NULL;        DCSlot[i].oldage = 0;        // Effective clip region        InitClipRgn (&DCSlot[i].ecrgn, &sg_FreeClipRectList);    }   }// This function generates effective clip region from// local clip region and global clip region.// if the global clip region has a new age,// this function empty effective clip region first,// and then intersect local clip region and global clip region.BOOL dc_GenerateECRgn(PDC pdc, BOOL fForce){    PCLIPRECT pcr;    PCONTROL pCtrl;    RECT minimal;    // is global clip region is empty?    if ((!fForce) && (!dc_IsVisible (pdc)))        return FALSE;    // need regenerate?    if (fForce || (pdc->oldage != pdc->pGCRInfo->age)) {        /* copy local clipping region to effective clipping region. */        ClipRgnCopy (&pdc->ecrgn, &pdc->lcrgn);        /* transfer device coordinates to screen coordinates. */        pcr = pdc->ecrgn.head;        while (pcr) {            coor_DP2SP (pdc, &pcr->rc.left, &pcr->rc.top);            coor_DP2SP (pdc, &pcr->rc.right, &pcr->rc.bottom);                        pcr = pcr->next;        }        /* intersect with global clipping region. */        if (pdc->lcrgn.head == NULL)            ClipRgnCopy (&pdc->ecrgn, &pdc->pGCRInfo->crgn);        else {            coor_DP2SP (pdc, &pdc->ecrgn.rcBound.left, &pdc->ecrgn.rcBound.top);            coor_DP2SP (pdc, &pdc->ecrgn.rcBound.right, &pdc->ecrgn.rcBound.bottom);            ClipRgnIntersect (&pdc->ecrgn, &pdc->ecrgn, &pdc->pGCRInfo->crgn);#ifdef _REGION_DEBUG            dumpRegion (&pdc->pGCRInfo->crgn);            dumpRegion (&pdc->ecrgn);#endif        }        /*          * update pdc->DevRC, and restrict the effective          * clipping region more with pdc->DevRC.         */        if (pdc->bIsClient)            WndClientRect (pdc->hwnd, &pdc->DevRC);        else            WndRect (pdc->hwnd, &pdc->DevRC);        minimal = pdc->DevRC;        /* restrict control's effective region. */        pCtrl = Control (pdc->hwnd);        if (pCtrl && !(pCtrl->dwExStyle & WS_EX_CTRLASMAINWIN))            RestrictControlECRGN (&minimal, pCtrl);        IntersectClipRect (&pdc->ecrgn, &minimal);        pdc->oldage = pdc->pGCRInfo->age;    }    return TRUE;}PDC check_ecrgn (HDC hdc){    PDC pdc = dc_HDC2PDC(hdc);    if (dc_IsGeneralDC (pdc)) {        LOCK (&pdc->pGCRInfo->lock);        if (!dc_GenerateECRgn (pdc, FALSE)) {            UNLOCK (&pdc->pGCRInfo->lock);            return NULL;        }    }    return pdc;}int enter_drawing (PDC pdc){    BLOCK_DRAW_SEM (pdc);#ifdef _LITE_VERSION    if (CHECK_DRAWING (pdc))        goto fail;    if (CHECK_CLI_SCREEN (pdc, pdc->rc_output))        goto fail;#endif    if (!IntersectRect (&pdc->rc_output, &pdc->rc_output, &pdc->ecrgn.rcBound))        goto fail;    LOCK (&__mg_gdilock);    if (!dc_IsMemDC (pdc))        ShowCursorForGDI (FALSE, &pdc->rc_output);    return 0;fail:    UNBLOCK_DRAW_SEM (pdc);    return -1;}void enter_drawing_nocheck (PDC pdc){    BLOCK_DRAW_SEM (pdc);    LOCK (&__mg_gdilock);    if (!dc_IsMemDC (pdc))        ShowCursorForGDI (FALSE, &pdc->rc_output);}void leave_drawing(PDC pdc){    if (!dc_IsMemDC (pdc))        ShowCursorForGDI (TRUE, &pdc->rc_output);    UNLOCK (&__mg_gdilock);    UNBLOCK_DRAW_SEM (pdc);}static void _dc_set_pixel_1 (PDC pdc){    *pdc->cur_dst = (Uint8) pdc->cur_pixel;}static void _dc_set_pixel_2 (PDC pdc){    *(Uint16 *) pdc->cur_dst = (Uint16) pdc->cur_pixel;}static void _dc_set_pixel_3 (PDC pdc){    *(Uint16*) pdc->cur_dst = (Uint16) pdc->cur_pixel;    *(pdc->cur_dst + 2) = (Uint8) (pdc->cur_pixel >> 16);}static void _dc_set_pixel_4 (PDC pdc){    *(Uint32 *) pdc->cur_dst = (Uint32) pdc->cur_pixel;}static void _dc_and_pixel_1 (PDC pdc){    *pdc->cur_dst &= (Uint8) pdc->cur_pixel;}static void _dc_and_pixel_2 (PDC pdc){    *(Uint16 *) pdc->cur_dst &= (Uint16) pdc->cur_pixel;}static void _dc_and_pixel_3 (PDC pdc)