src/os2/dcmemory.cpp

   1 /////////////////////////////////////////////////////////////////////////////
   2 // Name:        dcmemory.cpp
   3 // Purpose:     wxMemoryDC class
   4 // Author:      David Webster
   5 // Modified by:
   6 // Created:     10/14/99
   7 // RCS-ID:      $Id$
   8 // Copyright:   (c) David Webster
   9 // Licence:     wxWindows licence
  10 /////////////////////////////////////////////////////////////////////////////
  11
  12 // For compilers that support precompilation, includes "wx.h".
  13 #include "wx/wxprec.h"
  14
  15 #ifndef WX_PRECOMP
  16 #include "wx/utils.h"
  17 #include "wx/app.h"
  18 #include "wx/log.h"
  19 #endif
  20
  21 #include "wx/os2/private.h"
  22
  23 #include "wx/dcmemory.h"
  24
  25 IMPLEMENT_DYNAMIC_CLASS(wxMemoryDC, wxDC)
  26
  27 /////////////////////////////////////////////////////////////////////////////
  28 // Memory DC
  29 /////////////////////////////////////////////////////////////////////////////
  30
  31 wxMemoryDC::wxMemoryDC(void)
  32 {
  33     CreateCompatible(NULL);
  34     Init();
  35 } // end of wxMemoryDC::wxMemoryDC
  36
  37 wxMemoryDC::wxMemoryDC(
  38   wxDC*                             pOldDC
  39 )
  40 {
  41     pOldDC->BeginDrawing();
  42     CreateCompatible(pOldDC);
  43     pOldDC->EndDrawing();
  44     Init();
  45 } // end of wxMemoryDC::wxMemoryDC
  46
  47 void wxMemoryDC::Init()
  48 {
  49     if (m_ok)
  50     {
  51         SetBrush(*wxWHITE_BRUSH);
  52         SetPen(*wxBLACK_PEN);
  53
  54         // the background mode is only used for text background and is set in
  55         // DrawText() to OPAQUE as required, otherwise always TRANSPARENT
  56         ::GpiSetBackMix( GetHPS(), BM_LEAVEALONE );
  57     }
  58     memset(&m_vRclPaint, 0, sizeof(m_vRclPaint));
  59 } // end of wxMemoryDC::Init
  60
  61 bool wxMemoryDC::CreateCompatible(
  62   wxDC*                             pDC
  63 )
  64 {
  65     HDC                             hDC;
  66     HPS                             hPS;
  67     DEVOPENSTRUC                    vDOP = {0L, "DISPLAY", NULL, 0L, 0L, 0L, 0L, 0L, 0L};
  68     SIZEL                           vSize = {0, 0};
  69
  70     //
  71     // Create a memory device context
  72     //
  73     hDC = ::DevOpenDC(vHabmain, OD_MEMORY, "*", 5L, (PDEVOPENDATA)&vDOP, NULLHANDLE);
  74     if (hDC != DEV_ERROR)
  75     {
  76         hPS = ::GpiCreatePS(vHabmain, hDC, &vSize, PU_PELS | GPIT_MICRO | GPIA_ASSOC);
  77         if (hPS != GPI_ERROR)
  78         {
  79             m_hPS = hPS;
  80             m_hDC = hDC;
  81             m_ok = TRUE;
  82             m_bOwnsDC = TRUE;
  83             //
  84             // Set the wxWindows color table
  85             //
  86             ::GpiCreateLogColorTable( m_hPS
  87                                      ,0L
  88                                      ,LCOLF_CONSECRGB
  89                                      ,0L
  90                                      ,(LONG)wxTheColourDatabase->m_nSize
  91                                      ,(PLONG)wxTheColourDatabase->m_palTable
  92                                     );
  93             ::GpiCreateLogColorTable( m_hPS
  94                                      ,0L
  95                                      ,LCOLF_RGB
  96                                      ,0L
  97                                      ,0L
  98                                      ,NULL
  99                                     );
 100         }
 101         else
 102         {
 103             m_hPS = NULLHANDLE;
 104             m_hDC = NULLHANDLE;
 105             m_ok  = FALSE;
 106             m_bOwnsDC = FALSE;
 107         }
 108     }
 109     else
 110     {
 111         m_hPS = NULLHANDLE;
 112         m_hDC = NULLHANDLE;
 113         m_ok  = FALSE;
 114         m_bOwnsDC = FALSE;
 115     }
 116
 117     //
 118     // As we created the DC, we must delete it in the dtor
 119     //
 120     m_bOwnsDC = TRUE;
 121     m_ok = m_hDC != 0;
 122     return m_ok;
 123 } // end of wxMemoryDC::CreateCompatible
 124
 125 void wxMemoryDC::SelectObject(
 126   const wxBitmap&                   rBitmap
 127 )
 128 {
 129     //
 130     // Select old bitmap out of the device context
 131     //
 132     if (m_hOldBitmap)
 133     {
 134         ::GpiSetBitmap(m_hPS, NULLHANDLE);
 135         if (m_vSelectedBitmap.Ok())
 136         {
 137             m_vSelectedBitmap.SetSelectedInto(NULL);
 138             m_vSelectedBitmap = wxNullBitmap;
 139         }
 140     }
 141
 142     //
 143     // Check for whether the bitmap is already selected into a device context
 144     //
 145     wxCHECK_RET( !rBitmap.GetSelectedInto() ||
 146                  (rBitmap.GetSelectedInto() == this),
 147                  wxT("Bitmap is selected in another wxMemoryDC, delete the first wxMemoryDC or use SelectObject(NULL)") );
 148
 149     m_vSelectedBitmap = rBitmap;
 150
 151     WXHBITMAP                       hBmp = rBitmap.GetHBITMAP();
 152
 153     if (!hBmp)
 154         return;
 155
 156     m_vSelectedBitmap.SetSelectedInto(this);
 157     hBmp = (WXHBITMAP)::GpiSetBitmap(m_hPS, (HBITMAP)hBmp);
 158
 159     if (hBmp == HBM_ERROR)
 160     {
 161         wxLogLastError(wxT("SelectObject(memDC, bitmap)"));
 162         wxFAIL_MSG(wxT("Couldn't select a bitmap into wxMemoryDC"));
 163     }
 164     else if (!m_hOldBitmap)
 165     {
 166         m_hOldBitmap = hBmp;
 167     }
 168 } // end of wxMemoryDC::SelectObject
 169
 170 void wxMemoryDC::DoGetSize(
 171   int*                              pWidth
 172 , int*                              pHeight
 173 ) const
 174 {
 175     if (!m_vSelectedBitmap.Ok())
 176     {
 177         *pWidth  = 0;
 178         *pHeight = 0;
 179         return;
 180     }
 181     *pWidth = m_vSelectedBitmap.GetWidth();
 182     *pHeight = m_vSelectedBitmap.GetHeight();
 183 } // end of wxMemoryDC::DoGetSize
 184
 185 void wxMemoryDC::DoDrawRectangle(
 186   wxCoord                           vX
 187 , wxCoord                           vY
 188 , wxCoord                           vWidth
 189 , wxCoord                           vHeight
 190 )
 191 {
 192     wxDC::DoDrawRectangle(vX, vY, vWidth, vHeight);
 193
 194     //
 195     // Debug testing:
 196     //
 197     if (m_vSelectedBitmap.GetHBITMAP() != NULLHANDLE)
 198     {
 199         BITMAPINFOHEADER2           vHeader;
 200         BITMAPINFO2                 vInfo;
 201
 202         vHeader.cbFix = 16L;
 203         if (::GpiQueryBitmapInfoHeader(m_vSelectedBitmap.GetHBITMAP(), &vHeader))
 204         {
 205             unsigned char*          pucData = NULL;
 206             unsigned char*          pucBits;
 207             int                     nBytesPerLine = vWidth * 3;
 208             LONG                    lScans = 0L;
 209             POINTL                  vPoint;
 210             LONG                    lColor;
 211
 212             vInfo.cbFix     = 16;
 213             vInfo.cx        = vHeader.cx;
 214             vInfo.cy        = vHeader.cy;
 215             vInfo.cPlanes   = vHeader.cPlanes;
 216             vInfo.cBitCount = 24;
 217             pucData = (unsigned char*)malloc(nBytesPerLine * m_vSelectedBitmap.GetHeight());
 218             if ((lScans = ::GpiQueryBitmapBits( m_hPS
 219                                                ,0L
 220                                                ,(LONG)m_vSelectedBitmap.GetHeight()
 221                                                ,(PBYTE)pucData
 222                                                ,&vInfo
 223                                               )) == GPI_ALTERROR)
 224             {
 225                 ERRORID                     vError;
 226                 wxString                    sError;
 227
 228                 vError = ::WinGetLastError(vHabmain);
 229                 sError = wxPMErrorToStr(vError);
 230             }
 231             pucBits = pucData;
 232             for (int i = 0; i < m_vSelectedBitmap.GetHeight(); i++)
 233             {
 234                 for (int j = vX; j < m_vSelectedBitmap.GetWidth(); j++)
 235                 {
 236                     if (i >= vY && j >= vX && i < vHeight && j < vWidth)
 237                     {
 238                         vPoint.x = j; vPoint.y = i;
 239                         if (i == vY || j == vX ||
 240                             i == m_vSelectedBitmap.GetWidth() -1 ||
 241                             j == m_vSelectedBitmap.GetHeight()
 242                            )
 243                             lColor = m_pen.GetColour().GetPixel();
 244                         else
 245                             lColor = m_brush.GetColour().GetPixel();
 246                         *(pucBits++) = (unsigned char)lColor;
 247                         *(pucBits++) = (unsigned char)(lColor >> 8);
 248                         *(pucBits++) = (unsigned char)(lColor >> 16);
 249                     }
 250                     else
 251                         pucBits += 3;
 252                 }
 253             }
 254             if ((lScans = ::GpiSetBitmapBits( m_hPS
 255                                              ,0
 256                                              ,(LONG)m_vSelectedBitmap.GetHeight()
 257                                              ,(PBYTE)pucData
 258                                              ,&vInfo
 259                                             )) == GPI_ALTERROR)
 260             {
 261                 ERRORID             vError;
 262                 wxString            sError;
 263
 264                 vError = ::WinGetLastError(vHabmain);
 265                 sError = wxPMErrorToStr(vError);
 266             }
 267             free(pucData);
 268         }
 269     }
 270 } // end of wxMemoryDC::DoDrawRectangle
 271