xref: /trunk/main/vcl/win/source/gdi/salbmp.cxx (revision dfbf5fd71e5d6a24d1fe5b6874b682c628cd37aa)
1 /**************************************************************
2  *
3  * Licensed to the Apache Software Foundation (ASF) under one
4  * or more contributor license agreements.  See the NOTICE file
5  * distributed with this work for additional information
6  * regarding copyright ownership.  The ASF licenses this file
7  * to you under the Apache License, Version 2.0 (the
8  * "License"); you may not use this file except in compliance
9  * with the License.  You may obtain a copy of the License at
10  *
11  *   http://www.apache.org/licenses/LICENSE-2.0
12  *
13  * Unless required by applicable law or agreed to in writing,
14  * software distributed under the License is distributed on an
15  * "AS IS" BASIS, WITHOUT WARRANTIES OR CONDITIONS OF ANY
16  * KIND, either express or implied.  See the License for the
17  * specific language governing permissions and limitations
18  * under the License.
19  *
20  *************************************************************/
21 
22 // MARKER(update_precomp.py): autogen include statement, do not remove
23 #include "precompiled_vcl.hxx"
24 
25 #include <tools/svwin.h>
26 #include <vcl/bitmap.hxx> // for BitmapSystemData
27 #include <vcl/salbtype.hxx>
28 #include <win/wincomp.hxx>
29 #include <win/salgdi.h>
30 #include <win/saldata.hxx>
31 #include <win/salbmp.h>
32 #include <string.h>
33 #include <vcl/timer.hxx>
34 #include <comphelper/broadcasthelper.hxx>
35 #include <map>
36 
37 #ifndef min
38 #define min(a,b)    (((a) < (b)) ? (a) : (b))
39 #endif
40 #ifndef max
41 #define max(a,b)    (((a) > (b)) ? (a) : (b))
42 #endif
43 
44 #include <GdiPlus.h>
45 
46 // ------------------------------------------------------------------
47 // - Inlines -
48 
49 inline void ImplSetPixel4( const HPBYTE pScanline, long nX, const BYTE cIndex )
50 {
51     BYTE& rByte = pScanline[ nX >> 1 ];
52 
53     ( nX & 1 ) ? ( rByte &= 0xf0, rByte |= ( cIndex & 0x0f ) ) :
54                  ( rByte &= 0x0f, rByte |= ( cIndex << 4 ) );
55 }
56 
57 // ------------------------------------------------------------------
58 // Helper class to manage Gdiplus::Bitmap instances inside of
59 // WinSalBitmap
60 
61 struct Comparator
62 {
63     bool operator()(WinSalBitmap* pA, WinSalBitmap* pB) const
64     {
65         return pA < pB;
66     }
67 };
68 
69 typedef ::std::map< WinSalBitmap*, sal_uInt32, Comparator > EntryMap;
70 static const sal_uInt32 nDefaultCycles(60);
71 
72 class GdiPlusBuffer : protected comphelper::OBaseMutex, public Timer
73 {
74 private:
75     EntryMap        maEntries;
76 
77 public:
78     GdiPlusBuffer()
79     :   Timer(),
80         maEntries()
81     {
82         SetTimeout(1000);
83         Stop();
84     }
85 
86     ~GdiPlusBuffer()
87     {
88         Stop();
89     }
90 
91     void addEntry(WinSalBitmap& rEntry)
92     {
93         ::osl::MutexGuard aGuard(m_aMutex);
94         EntryMap::iterator aFound = maEntries.find(&rEntry);
95 
96         if(aFound == maEntries.end())
97         {
98             if(maEntries.empty())
99             {
100                 Start();
101             }
102 
103             maEntries[&rEntry] = nDefaultCycles;
104         }
105     }
106 
107     void remEntry(WinSalBitmap& rEntry)
108     {
109         ::osl::MutexGuard aGuard(m_aMutex);
110         EntryMap::iterator aFound = maEntries.find(&rEntry);
111 
112         if(aFound != maEntries.end())
113         {
114             maEntries.erase(aFound);
115 
116             if(maEntries.empty())
117             {
118                 Stop();
119             }
120         }
121     }
122 
123     void touchEntry(WinSalBitmap& rEntry)
124     {
125         ::osl::MutexGuard aGuard(m_aMutex);
126         EntryMap::iterator aFound = maEntries.find(&rEntry);
127 
128         if(aFound != maEntries.end())
129         {
130             aFound->second = nDefaultCycles;
131         }
132     }
133 
134     // from parent Timer
135     virtual void Timeout()
136     {
137         ::osl::MutexGuard aGuard(m_aMutex);
138         EntryMap::iterator aIter(maEntries.begin());
139 
140         while(aIter != maEntries.end())
141         {
142             if(aIter->second)
143             {
144                 aIter->second--;
145                 aIter++;
146             }
147             else
148             {
149                 EntryMap::iterator aDelete(aIter);
150                 WinSalBitmap* pSource = aDelete->first;
151                 aIter++;
152                 maEntries.erase(aDelete);
153 
154                 if(maEntries.empty())
155                 {
156                     Stop();
157                 }
158 
159                 // delete at WinSalBitmap after entry is removed; this
160                 // way it would not hurt to call remEntry from there, too
161                 if(pSource->maGdiPlusBitmap.get())
162                 {
163                     pSource->maGdiPlusBitmap.reset();
164                     pSource->mpAssociatedAlpha = 0;
165                 }
166             }
167         }
168 
169         if(!maEntries.empty())
170         {
171             Start();
172         }
173     }
174 };
175 
176 // ------------------------------------------------------------------
177 // Global instance of GdiPlusBuffer which manages Gdiplus::Bitmap
178 // instances
179 
180 static GdiPlusBuffer aGdiPlusBuffer;
181 
182 // ------------------------------------------------------------------
183 // - WinSalBitmap -
184 
185 WinSalBitmap::WinSalBitmap()
186 :   maSize(),
187     mhDIB(0),
188     mhDDB(0),
189     maGdiPlusBitmap(),
190     mpAssociatedAlpha(0),
191     mnBitCount(0)
192 {
193 }
194 
195 // ------------------------------------------------------------------
196 
197 WinSalBitmap::~WinSalBitmap()
198 {
199     Destroy();
200 }
201 
202 // ------------------------------------------------------------------
203 
204 void WinSalBitmap::Destroy()
205 {
206     if(maGdiPlusBitmap.get())
207     {
208         aGdiPlusBuffer.remEntry(*this);
209     }
210 
211     if( mhDIB )
212         GlobalFree( mhDIB );
213     else if( mhDDB )
214         DeleteObject( mhDDB );
215 
216     maSize = Size();
217     mnBitCount = 0;
218 }
219 
220 // ------------------------------------------------------------------
221 
222 GdiPlusBmpPtr WinSalBitmap::ImplGetGdiPlusBitmap(const WinSalBitmap* pAlphaSource) const
223 {
224     WinSalBitmap* pThat = const_cast< WinSalBitmap* >(this);
225 
226     if(maGdiPlusBitmap.get() && pAlphaSource != mpAssociatedAlpha)
227     {
228         // #122350# if associated alpha with which the GDIPlus was constructed has changed
229         // it is necessary to remove it from buffer, reset reference to it and reconstruct
230         pThat->maGdiPlusBitmap.reset();
231         aGdiPlusBuffer.remEntry(const_cast< WinSalBitmap& >(*this));
232     }
233 
234     if(maGdiPlusBitmap.get())
235     {
236         aGdiPlusBuffer.touchEntry(const_cast< WinSalBitmap& >(*this));
237     }
238     else
239     {
240         if(maSize.Width() > 0 && maSize.Height() > 0)
241         {
242             if(pAlphaSource)
243             {
244                 pThat->maGdiPlusBitmap.reset(pThat->ImplCreateGdiPlusBitmap(*pAlphaSource));
245                 pThat->mpAssociatedAlpha = pAlphaSource;
246             }
247             else
248             {
249                 pThat->maGdiPlusBitmap.reset(pThat->ImplCreateGdiPlusBitmap());
250                 pThat->mpAssociatedAlpha = 0;
251             }
252 
253             if(maGdiPlusBitmap.get())
254             {
255                 aGdiPlusBuffer.addEntry(*pThat);
256             }
257         }
258     }
259 
260     return maGdiPlusBitmap;
261 }
262 
263 // ------------------------------------------------------------------
264 
265 Gdiplus::Bitmap* WinSalBitmap::ImplCreateGdiPlusBitmap()
266 {
267     Gdiplus::Bitmap* pRetval(0);
268     WinSalBitmap* pSalRGB = const_cast< WinSalBitmap* >(this);
269     WinSalBitmap* pExtraWinSalRGB = 0;
270 
271     if(!pSalRGB->ImplGethDIB())
272     {
273         // we need DIB for success with AcquireBuffer, create a replacement WinSalBitmap
274         pExtraWinSalRGB = new WinSalBitmap();
275         pExtraWinSalRGB->Create(*pSalRGB, pSalRGB->GetBitCount());
276         pSalRGB = pExtraWinSalRGB;
277     }
278 
279     BitmapBuffer* pRGB = pSalRGB->AcquireBuffer(true);
280     BitmapBuffer* pExtraRGB = 0;
281 
282     if(pRGB && BMP_FORMAT_24BIT_TC_BGR != (pRGB->mnFormat & ~BMP_FORMAT_TOP_DOWN))
283     {
284         // convert source bitmap to BMP_FORMAT_24BIT_TC_BGR format if not yet in that format
285         SalTwoRect aSalTwoRect;
286 
287         aSalTwoRect.mnSrcX = aSalTwoRect.mnSrcY = aSalTwoRect.mnDestX = aSalTwoRect.mnDestY = 0;
288         aSalTwoRect.mnSrcWidth = aSalTwoRect.mnDestWidth = pRGB->mnWidth;
289         aSalTwoRect.mnSrcHeight = aSalTwoRect.mnDestHeight = pRGB->mnHeight;
290 
291         pExtraRGB = StretchAndConvert(
292             *pRGB,
293             aSalTwoRect,
294             BMP_FORMAT_24BIT_TC_BGR,
295             0);
296 
297         pSalRGB->ReleaseBuffer(pRGB, true);
298         pRGB = pExtraRGB;
299     }
300 
301     if(pRGB
302         && pRGB->mnWidth > 0
303         && pRGB->mnHeight > 0
304         && BMP_FORMAT_24BIT_TC_BGR == (pRGB->mnFormat & ~BMP_FORMAT_TOP_DOWN))
305     {
306         const sal_uInt32 nW(pRGB->mnWidth);
307         const sal_uInt32 nH(pRGB->mnHeight);
308 
309         pRetval = new Gdiplus::Bitmap(nW, nH, PixelFormat24bppRGB);
310 
311         if(pRetval)
312         {
313             sal_uInt8* pSrcRGB(pRGB->mpBits);
314             const sal_uInt32 nExtraRGB(pRGB->mnScanlineSize - (nW * 3));
315             const bool bTopDown(pRGB->mnFormat & BMP_FORMAT_TOP_DOWN);
316             const Gdiplus::Rect aAllRect(0, 0, nW, nH);
317             Gdiplus::BitmapData aGdiPlusBitmapData;
318             pRetval->LockBits(&aAllRect, Gdiplus::ImageLockModeWrite, PixelFormat24bppRGB, &aGdiPlusBitmapData);
319 
320             // copy data to Gdiplus::Bitmap; format is BGR here in both cases, so memcpy is possible
321             for(sal_uInt32 y(0); y < nH; y++)
322             {
323                 const sal_uInt32 nYInsert(bTopDown ? y : nH - y - 1);
324                 sal_uInt8* targetPixels = (sal_uInt8*)aGdiPlusBitmapData.Scan0 + (nYInsert * aGdiPlusBitmapData.Stride);
325 
326                 memcpy(targetPixels, pSrcRGB, nW * 3);
327                 pSrcRGB += nW * 3 + nExtraRGB;
328             }
329 
330             pRetval->UnlockBits(&aGdiPlusBitmapData);
331         }
332     }
333 
334     if(pExtraRGB)
335     {
336         delete pExtraRGB;
337     }
338     else
339     {
340         pSalRGB->ReleaseBuffer(pRGB, true);
341     }
342 
343     if(pExtraWinSalRGB)
344     {
345         delete pExtraWinSalRGB;
346     }
347 
348     return pRetval;
349 }
350 
351 // ------------------------------------------------------------------
352 
353 Gdiplus::Bitmap* WinSalBitmap::ImplCreateGdiPlusBitmap(const WinSalBitmap& rAlphaSource)
354 {
355     Gdiplus::Bitmap* pRetval(0);
356     WinSalBitmap* pSalRGB = const_cast< WinSalBitmap* >(this);
357     WinSalBitmap* pExtraWinSalRGB = 0;
358 
359     if(!pSalRGB->ImplGethDIB())
360     {
361         // we need DIB for success with AcquireBuffer, create a replacement WinSalBitmap
362         pExtraWinSalRGB = new WinSalBitmap();
363         pExtraWinSalRGB->Create(*pSalRGB, pSalRGB->GetBitCount());
364         pSalRGB = pExtraWinSalRGB;
365     }
366 
367     BitmapBuffer* pRGB = pSalRGB->AcquireBuffer(true);
368     BitmapBuffer* pExtraRGB = 0;
369 
370     if(pRGB && BMP_FORMAT_24BIT_TC_BGR != (pRGB->mnFormat & ~BMP_FORMAT_TOP_DOWN))
371     {
372         // convert source bitmap to BMP_FORMAT_24BIT_TC_BGR format if not yet in that format
373         SalTwoRect aSalTwoRect;
374 
375         aSalTwoRect.mnSrcX = aSalTwoRect.mnSrcY = aSalTwoRect.mnDestX = aSalTwoRect.mnDestY = 0;
376         aSalTwoRect.mnSrcWidth = aSalTwoRect.mnDestWidth = pRGB->mnWidth;
377         aSalTwoRect.mnSrcHeight = aSalTwoRect.mnDestHeight = pRGB->mnHeight;
378 
379         pExtraRGB = StretchAndConvert(
380             *pRGB,
381             aSalTwoRect,
382             BMP_FORMAT_24BIT_TC_BGR,
383             0);
384 
385         pSalRGB->ReleaseBuffer(pRGB, true);
386         pRGB = pExtraRGB;
387     }
388 
389     WinSalBitmap* pSalA = const_cast< WinSalBitmap* >(&rAlphaSource);
390     WinSalBitmap* pExtraWinSalA = 0;
391 
392     if(!pSalA->ImplGethDIB())
393     {
394         // we need DIB for success with AcquireBuffer, create a replacement WinSalBitmap
395         pExtraWinSalA = new WinSalBitmap();
396         pExtraWinSalA->Create(*pSalA, pSalA->GetBitCount());
397         pSalA = pExtraWinSalA;
398     }
399 
400     BitmapBuffer* pA = pSalA->AcquireBuffer(true);
401     BitmapBuffer* pExtraA = 0;
402 
403     if(pA && BMP_FORMAT_8BIT_PAL != (pA->mnFormat & ~BMP_FORMAT_TOP_DOWN))
404     {
405         // convert alpha bitmap to BMP_FORMAT_8BIT_PAL format if not yet in that format
406         SalTwoRect aSalTwoRect;
407 
408         aSalTwoRect.mnSrcX = aSalTwoRect.mnSrcY = aSalTwoRect.mnDestX = aSalTwoRect.mnDestY = 0;
409         aSalTwoRect.mnSrcWidth = aSalTwoRect.mnDestWidth = pA->mnWidth;
410         aSalTwoRect.mnSrcHeight = aSalTwoRect.mnDestHeight = pA->mnHeight;
411         const BitmapPalette& rTargetPalette = Bitmap::GetGreyPalette(256);
412 
413         pExtraA = StretchAndConvert(
414             *pA,
415             aSalTwoRect,
416             BMP_FORMAT_8BIT_PAL,
417             &rTargetPalette);
418 
419         pSalA->ReleaseBuffer(pA, true);
420         pA = pExtraA;
421     }
422 
423     if(pRGB
424         && pA
425         && pRGB->mnWidth > 0
426         && pRGB->mnHeight > 0
427         && pRGB->mnWidth == pA->mnWidth
428         && pRGB->mnHeight == pA->mnHeight
429         && BMP_FORMAT_24BIT_TC_BGR == (pRGB->mnFormat & ~BMP_FORMAT_TOP_DOWN)
430         && BMP_FORMAT_8BIT_PAL == (pA->mnFormat & ~BMP_FORMAT_TOP_DOWN))
431     {
432         // we have alpha and bitmap in known formats, create GdiPlus Bitmap as 32bit ARGB
433         const sal_uInt32 nW(pRGB->mnWidth);
434         const sal_uInt32 nH(pRGB->mnHeight);
435 
436         pRetval = new Gdiplus::Bitmap(nW, nH, PixelFormat32bppARGB);
437 
438         if(pRetval)
439         {
440             sal_uInt8* pSrcRGB(pRGB->mpBits);
441             sal_uInt8* pSrcA(pA->mpBits);
442             const sal_uInt32 nExtraRGB(pRGB->mnScanlineSize - (nW * 3));
443             const sal_uInt32 nExtraA(pA->mnScanlineSize - nW);
444             const bool bTopDown(pRGB->mnFormat & BMP_FORMAT_TOP_DOWN);
445             const Gdiplus::Rect aAllRect(0, 0, nW, nH);
446             Gdiplus::BitmapData aGdiPlusBitmapData;
447             pRetval->LockBits(&aAllRect, Gdiplus::ImageLockModeWrite, PixelFormat32bppARGB, &aGdiPlusBitmapData);
448 
449             // copy data to Gdiplus::Bitmap; format is BGRA; need to mix BGR from Bitmap and
450             // A from alpha, so inner loop is needed (who invented BitmapEx..?)
451             for(sal_uInt32 y(0); y < nH; y++)
452             {
453                 const sal_uInt32 nYInsert(bTopDown ? y : nH - y - 1);
454                 sal_uInt8* targetPixels = (sal_uInt8*)aGdiPlusBitmapData.Scan0 + (nYInsert * aGdiPlusBitmapData.Stride);
455 
456                 for(sal_uInt32 x(0); x < nW; x++)
457                 {
458                     *targetPixels++ = *pSrcRGB++;
459                     *targetPixels++ = *pSrcRGB++;
460                     *targetPixels++ = *pSrcRGB++;
461                     *targetPixels++ = 0xff - *pSrcA++;
462                 }
463 
464                 pSrcRGB += nExtraRGB;
465                 pSrcA += nExtraA;
466             }
467 
468             pRetval->UnlockBits(&aGdiPlusBitmapData);
469         }
470     }
471 
472     if(pExtraA)
473     {
474         delete pExtraA;
475     }
476     else
477     {
478         pSalA->ReleaseBuffer(pA, true);
479     }
480 
481     if(pExtraWinSalA)
482     {
483         delete pExtraWinSalA;
484     }
485 
486     if(pExtraRGB)
487     {
488         delete pExtraRGB;
489     }
490     else
491     {
492         pSalRGB->ReleaseBuffer(pRGB, true);
493     }
494 
495     if(pExtraWinSalRGB)
496     {
497         delete pExtraWinSalRGB;
498     }
499 
500     return pRetval;
501 }
502 
503 // ------------------------------------------------------------------
504 
505 bool WinSalBitmap::Create( HANDLE hBitmap, bool bDIB, bool bCopyHandle )
506 {
507     bool bRet = TRUE;
508 
509     if( bDIB )
510         mhDIB = (HGLOBAL) ( bCopyHandle ? ImplCopyDIBOrDDB( hBitmap, TRUE ) : hBitmap );
511     else
512         mhDDB = (HBITMAP) ( bCopyHandle ? ImplCopyDIBOrDDB( hBitmap, FALSE ) : hBitmap );
513 
514     if( mhDIB )
515     {
516         PBITMAPINFOHEADER pBIH = (PBITMAPINFOHEADER) GlobalLock( mhDIB );
517 
518         maSize = Size( pBIH->biWidth, pBIH->biHeight );
519         mnBitCount = pBIH->biBitCount;
520 
521         if( mnBitCount )
522             mnBitCount = ( mnBitCount <= 1 ) ? 1 : ( mnBitCount <= 4 ) ? 4 : ( mnBitCount <= 8 ) ? 8 : 24;
523 
524         GlobalUnlock( mhDIB );
525     }
526     else if( mhDDB )
527     {
528         BITMAP  aDDBInfo;
529 
530         if( WIN_GetObject( mhDDB, sizeof( BITMAP ), &aDDBInfo ) )
531         {
532             maSize = Size( aDDBInfo.bmWidth, aDDBInfo.bmHeight );
533             mnBitCount = aDDBInfo.bmPlanes * aDDBInfo.bmBitsPixel;
534 
535             if( mnBitCount )
536             {
537                 mnBitCount = ( mnBitCount <= 1 ) ? 1 :
538                              ( mnBitCount <= 4 ) ? 4 :
539                              ( mnBitCount <= 8 ) ? 8 : 24;
540             }
541         }
542         else
543         {
544             mhDDB = 0;
545             bRet = FALSE;
546         }
547     }
548     else
549         bRet = FALSE;
550 
551     return bRet;
552 }
553 
554 // ------------------------------------------------------------------
555 
556 bool WinSalBitmap::Create( const Size& rSize, sal_uInt16 nBitCount, const BitmapPalette& rPal )
557 {
558     bool bRet = FALSE;
559 
560     mhDIB = ImplCreateDIB( rSize, nBitCount, rPal );
561 
562     if( mhDIB )
563     {
564         maSize = rSize;
565         mnBitCount = nBitCount;
566         bRet = TRUE;
567     }
568 
569     return bRet;
570 }
571 
572 // ------------------------------------------------------------------
573 
574 bool WinSalBitmap::Create( const SalBitmap& rSSalBitmap )
575 {
576     bool bRet = FALSE;
577     const WinSalBitmap& rSalBitmap = static_cast<const WinSalBitmap&>(rSSalBitmap);
578 
579     if ( rSalBitmap.mhDIB || rSalBitmap.mhDDB )
580     {
581         HANDLE hNewHdl = ImplCopyDIBOrDDB( rSalBitmap.mhDIB ? rSalBitmap.mhDIB : rSalBitmap.mhDDB,
582                                            rSalBitmap.mhDIB != 0 );
583 
584         if ( hNewHdl )
585         {
586             if( rSalBitmap.mhDIB )
587                 mhDIB = (HGLOBAL) hNewHdl;
588             else if( rSalBitmap.mhDDB )
589                 mhDDB = (HBITMAP) hNewHdl;
590 
591             maSize = rSalBitmap.maSize;
592             mnBitCount = rSalBitmap.mnBitCount;
593 
594             bRet = TRUE;
595         }
596     }
597 
598     return bRet;
599 }
600 
601 // ------------------------------------------------------------------
602 
603 bool WinSalBitmap::Create( const SalBitmap& rSSalBmp, SalGraphics* pSGraphics )
604 {
605     bool bRet = FALSE;
606 
607     const WinSalBitmap& rSalBmp = static_cast<const WinSalBitmap&>(rSSalBmp);
608     WinSalGraphics* pGraphics = static_cast<WinSalGraphics*>(pSGraphics);
609 
610     if( rSalBmp.mhDIB )
611     {
612         PBITMAPINFO         pBI = (PBITMAPINFO) GlobalLock( rSalBmp.mhDIB );
613         PBITMAPINFOHEADER   pBIH = (PBITMAPINFOHEADER) pBI;
614         HDC                 hDC  = pGraphics->getHDC();
615         HBITMAP             hNewDDB;
616         BITMAP              aDDBInfo;
617         PBYTE               pBits = (PBYTE) pBI + *(DWORD*) pBI +
618                             ImplGetDIBColorCount( rSalBmp.mhDIB ) * sizeof( RGBQUAD );
619 
620         if( pBIH->biBitCount == 1 )
621         {
622             hNewDDB = CreateBitmap( pBIH->biWidth, pBIH->biHeight, 1, 1, NULL );
623 
624             if( hNewDDB )
625                 SetDIBits( hDC, hNewDDB, 0, pBIH->biHeight, pBits, pBI, DIB_RGB_COLORS );
626         }
627         else
628             hNewDDB = CreateDIBitmap( hDC, (PBITMAPINFOHEADER) pBI, CBM_INIT, pBits, pBI, DIB_RGB_COLORS );
629 
630         GlobalUnlock( rSalBmp.mhDIB );
631 
632         if( hNewDDB && WIN_GetObject( hNewDDB, sizeof( BITMAP ), &aDDBInfo ) )
633         {
634             mhDDB = hNewDDB;
635             maSize = Size( aDDBInfo.bmWidth, aDDBInfo.bmHeight );
636             mnBitCount = aDDBInfo.bmPlanes * aDDBInfo.bmBitsPixel;
637 
638             bRet = TRUE;
639         }
640         else if( hNewDDB )
641             DeleteObject( hNewDDB );
642     }
643 
644     return bRet;
645 }
646 
647 // ------------------------------------------------------------------
648 
649 bool WinSalBitmap::Create( const SalBitmap& rSSalBmp, sal_uInt16 nNewBitCount )
650 {
651     bool bRet = FALSE;
652 
653     const WinSalBitmap& rSalBmp = static_cast<const WinSalBitmap&>(rSSalBmp);
654 
655     if( rSalBmp.mhDDB )
656     {
657         mhDIB = ImplCreateDIB( rSalBmp.maSize, nNewBitCount, BitmapPalette() );
658 
659         if( mhDIB )
660         {
661             PBITMAPINFO pBI = (PBITMAPINFO) GlobalLock( mhDIB );
662             const int   nLines = (int) rSalBmp.maSize.Height();
663             HDC         hDC = GetDC( 0 );
664             PBYTE       pBits = (PBYTE) pBI + *(DWORD*) pBI +
665                                 ImplGetDIBColorCount( mhDIB ) * sizeof( RGBQUAD );
666             SalData*    pSalData = GetSalData();
667             HPALETTE    hOldPal = 0;
668 
669             if ( pSalData->mhDitherPal )
670             {
671                 hOldPal = SelectPalette( hDC, pSalData->mhDitherPal, TRUE );
672                 RealizePalette( hDC );
673             }
674 
675             if( GetDIBits( hDC, rSalBmp.mhDDB, 0, nLines, pBits, pBI, DIB_RGB_COLORS ) == nLines )
676             {
677                 GlobalUnlock( mhDIB );
678                 maSize = rSalBmp.maSize;
679                 mnBitCount = nNewBitCount;
680                 bRet = TRUE;
681             }
682             else
683             {
684                 GlobalUnlock( mhDIB );
685                 GlobalFree( mhDIB );
686                 mhDIB = 0;
687             }
688 
689             if( hOldPal )
690                 SelectPalette( hDC, hOldPal, TRUE );
691 
692             ReleaseDC( 0, hDC );
693         }
694     }
695 
696     return bRet;
697 }
698 
699 // ------------------------------------------------------------------
700 
701 sal_uInt16 WinSalBitmap::ImplGetDIBColorCount( HGLOBAL hDIB )
702 {
703     sal_uInt16 nColors = 0;
704 
705     if( hDIB )
706     {
707         PBITMAPINFO         pBI = (PBITMAPINFO) GlobalLock( hDIB );
708         PBITMAPINFOHEADER   pBIH = (PBITMAPINFOHEADER) pBI;
709 
710         if ( pBIH->biSize != sizeof( BITMAPCOREHEADER ) )
711         {
712             if( pBIH->biBitCount <= 8 )
713             {
714                 if ( pBIH->biClrUsed )
715                     nColors = (sal_uInt16) pBIH->biClrUsed;
716                 else
717                     nColors = 1 << pBIH->biBitCount;
718             }
719         }
720         else if( ( (PBITMAPCOREHEADER) pBI )->bcBitCount <= 8 )
721             nColors = 1 << ( (PBITMAPCOREHEADER) pBI )->bcBitCount;
722 
723         GlobalUnlock( hDIB );
724     }
725 
726     return nColors;
727 }
728 
729 // ------------------------------------------------------------------
730 
731 HGLOBAL WinSalBitmap::ImplCreateDIB( const Size& rSize, sal_uInt16 nBits, const BitmapPalette& rPal )
732 {
733     DBG_ASSERT( nBits == 1 || nBits == 4 || nBits == 8 || nBits == 16 || nBits == 24, "Unsupported BitCount!" );
734 
735     HGLOBAL hDIB = 0;
736 
737     if( rSize.Width() <= 0 || rSize.Height() <= 0 )
738         return hDIB;
739 
740     // calculate bitmap size in Bytes
741     const sal_uLong nAlignedWidth4Bytes = AlignedWidth4Bytes( nBits * rSize.Width() );
742     const sal_uLong nImageSize = nAlignedWidth4Bytes * rSize.Height();
743     bool bOverflow = (nImageSize / nAlignedWidth4Bytes) != rSize.Height();
744     if( bOverflow )
745         return hDIB;
746 
747     // allocate bitmap memory including header and palette
748     const sal_uInt16 nColors = (nBits <= 8) ? (1 << nBits) : 0;
749     const sal_uLong nHeaderSize = sizeof( BITMAPINFOHEADER ) + nColors * sizeof( RGBQUAD );
750     bOverflow = (nHeaderSize + nImageSize) < nImageSize;
751     if( bOverflow )
752         return hDIB;
753 
754     hDIB = GlobalAlloc( GHND, nHeaderSize + nImageSize );
755     if( !hDIB )
756         return hDIB;
757 
758     PBITMAPINFO pBI = static_cast<PBITMAPINFO>( GlobalLock( hDIB ) );
759     PBITMAPINFOHEADER pBIH = reinterpret_cast<PBITMAPINFOHEADER>( pBI );
760 
761     pBIH->biSize = sizeof( BITMAPINFOHEADER );
762     pBIH->biWidth = rSize.Width();
763     pBIH->biHeight = rSize.Height();
764     pBIH->biPlanes = 1;
765     pBIH->biBitCount = nBits;
766     pBIH->biCompression = BI_RGB;
767     pBIH->biSizeImage = nImageSize;
768     pBIH->biXPelsPerMeter = 0;
769     pBIH->biYPelsPerMeter = 0;
770     pBIH->biClrUsed = 0;
771     pBIH->biClrImportant = 0;
772 
773     if( nColors )
774     {
775         // copy the palette entries if any
776         const sal_uInt16 nMinCount = Min( nColors, rPal.GetEntryCount() );
777         if( nMinCount )
778             memcpy( pBI->bmiColors, rPal.ImplGetColorBuffer(), nMinCount * sizeof(RGBQUAD) );
779     }
780 
781     GlobalUnlock( hDIB );
782 
783     return hDIB;
784 }
785 
786 // ------------------------------------------------------------------
787 
788 HANDLE WinSalBitmap::ImplCopyDIBOrDDB( HANDLE hHdl, bool bDIB )
789 {
790     HANDLE  hCopy = 0;
791 
792     if ( bDIB && hHdl )
793     {
794         const sal_uLong nSize = GlobalSize( hHdl );
795 
796         if ( (hCopy = GlobalAlloc( GHND, nSize  )) != 0 )
797         {
798             memcpy( (LPSTR) GlobalLock( hCopy ), (LPSTR) GlobalLock( hHdl ), nSize );
799 
800             GlobalUnlock( hCopy );
801             GlobalUnlock( hHdl );
802         }
803     }
804     else if ( hHdl )
805     {
806         BITMAP aBmp;
807 
808         // Source-Bitmap nach Groesse befragen
809         WIN_GetObject( hHdl, sizeof( BITMAP ), (LPSTR) &aBmp );
810 
811         // Destination-Bitmap erzeugen
812         if ( (hCopy = CreateBitmapIndirect( &aBmp )) != 0 )
813         {
814             HDC     hBmpDC = CreateCompatibleDC( 0 );
815             HBITMAP hBmpOld = (HBITMAP) SelectObject( hBmpDC, hHdl );
816             HDC     hCopyDC = CreateCompatibleDC( hBmpDC );
817             HBITMAP hCopyOld = (HBITMAP) SelectObject( hCopyDC, hCopy );
818 
819             BitBlt( hCopyDC, 0, 0, aBmp.bmWidth, aBmp.bmHeight, hBmpDC, 0, 0, SRCCOPY );
820 
821             SelectObject( hCopyDC, hCopyOld );
822             DeleteDC( hCopyDC );
823 
824             SelectObject( hBmpDC, hBmpOld );
825             DeleteDC( hBmpDC );
826         }
827     }
828 
829     return hCopy;
830 }
831 
832 // ------------------------------------------------------------------
833 
834 BitmapBuffer* WinSalBitmap::AcquireBuffer( bool /*bReadOnly*/ )
835 {
836     BitmapBuffer* pBuffer = NULL;
837 
838     if( mhDIB )
839     {
840         PBITMAPINFO         pBI = (PBITMAPINFO) GlobalLock( mhDIB );
841         PBITMAPINFOHEADER   pBIH = (PBITMAPINFOHEADER) pBI;
842 
843         if( ( pBIH->biCompression == BI_RLE4 ) || ( pBIH->biCompression == BI_RLE8 ) )
844         {
845             Size    aSizePix( pBIH->biWidth, pBIH->biHeight );
846             HGLOBAL hNewDIB = ImplCreateDIB( aSizePix, pBIH->biBitCount, BitmapPalette() );
847 
848             if( hNewDIB )
849             {
850                 PBITMAPINFO         pNewBI = (PBITMAPINFO) GlobalLock( hNewDIB );
851                 PBITMAPINFOHEADER   pNewBIH = (PBITMAPINFOHEADER) pNewBI;
852                 const sal_uInt16        nColorCount = ImplGetDIBColorCount( hNewDIB );
853                 const sal_uLong         nOffset = *(DWORD*) pBI + nColorCount * sizeof( RGBQUAD );
854                 BYTE*               pOldBits = (PBYTE) pBI + nOffset;
855                 BYTE*               pNewBits = (PBYTE) pNewBI + nOffset;
856 
857                 memcpy( pNewBI, pBI, nOffset );
858                 pNewBIH->biCompression = 0;
859                 ImplDecodeRLEBuffer( pOldBits, pNewBits, aSizePix, pBIH->biCompression == BI_RLE4 );
860 
861                 GlobalUnlock( mhDIB );
862                 GlobalFree( mhDIB );
863                 mhDIB = hNewDIB;
864                 pBI = pNewBI;
865                 pBIH = pNewBIH;
866             }
867         }
868 
869         if( pBIH->biPlanes == 1 )
870         {
871             pBuffer = new BitmapBuffer;
872 
873             pBuffer->mnFormat = BMP_FORMAT_BOTTOM_UP |
874                                 ( pBIH->biBitCount == 1 ? BMP_FORMAT_1BIT_MSB_PAL :
875                                   pBIH->biBitCount == 4 ? BMP_FORMAT_4BIT_MSN_PAL :
876                                   pBIH->biBitCount == 8 ? BMP_FORMAT_8BIT_PAL :
877                                   pBIH->biBitCount == 16 ? BMP_FORMAT_16BIT_TC_LSB_MASK :
878                                   pBIH->biBitCount == 24 ? BMP_FORMAT_24BIT_TC_BGR :
879                                   pBIH->biBitCount == 32 ? BMP_FORMAT_32BIT_TC_MASK : 0UL );
880 
881             if( BMP_SCANLINE_FORMAT( pBuffer->mnFormat ) )
882             {
883                 pBuffer->mnWidth = maSize.Width();
884                 pBuffer->mnHeight = maSize.Height();
885                 pBuffer->mnScanlineSize = AlignedWidth4Bytes( maSize.Width() * pBIH->biBitCount );
886                 pBuffer->mnBitCount = (sal_uInt16) pBIH->biBitCount;
887 
888                 if( pBuffer->mnBitCount <= 8 )
889                 {
890                     const sal_uInt16 nPalCount = ImplGetDIBColorCount( mhDIB );
891 
892                     pBuffer->maPalette.SetEntryCount( nPalCount );
893                     memcpy( pBuffer->maPalette.ImplGetColorBuffer(), pBI->bmiColors, nPalCount * sizeof( RGBQUAD ) );
894                     pBuffer->mpBits = (PBYTE) pBI + *(DWORD*) pBI + nPalCount * sizeof( RGBQUAD );
895                 }
896                 else if( ( pBIH->biBitCount == 16 ) || ( pBIH->biBitCount == 32 ) )
897                 {
898                     sal_uLong nOffset = 0UL;
899 
900                     if( pBIH->biCompression == BI_BITFIELDS )
901                     {
902                         nOffset = 3 * sizeof( RGBQUAD );
903                         pBuffer->maColorMask = ColorMask( *(UINT32*) &pBI->bmiColors[ 0 ],
904                                                           *(UINT32*) &pBI->bmiColors[ 1 ],
905                                                           *(UINT32*) &pBI->bmiColors[ 2 ] );
906                     }
907                     else if( pBIH->biBitCount == 16 )
908                         pBuffer->maColorMask = ColorMask( 0x00007c00UL, 0x000003e0UL, 0x0000001fUL );
909                     else
910                         pBuffer->maColorMask = ColorMask( 0x00ff0000UL, 0x0000ff00UL, 0x000000ffUL );
911 
912                     pBuffer->mpBits = (PBYTE) pBI + *(DWORD*) pBI + nOffset;
913                 }
914                 else
915                     pBuffer->mpBits = (PBYTE) pBI + *(DWORD*) pBI;
916             }
917             else
918             {
919                 GlobalUnlock( mhDIB );
920                 delete pBuffer;
921                 pBuffer = NULL;
922             }
923         }
924         else
925             GlobalUnlock( mhDIB );
926     }
927 
928     return pBuffer;
929 }
930 
931 // ------------------------------------------------------------------
932 
933 void WinSalBitmap::ReleaseBuffer( BitmapBuffer* pBuffer, bool bReadOnly )
934 {
935     if( pBuffer )
936     {
937         if( mhDIB )
938         {
939             if( !bReadOnly && !!pBuffer->maPalette )
940             {
941                 PBITMAPINFO     pBI = (PBITMAPINFO) GlobalLock( mhDIB );
942                 const sal_uInt16    nCount = pBuffer->maPalette.GetEntryCount();
943                 const sal_uInt16    nDIBColorCount = ImplGetDIBColorCount( mhDIB );
944                 memcpy( pBI->bmiColors, pBuffer->maPalette.ImplGetColorBuffer(), Min( nDIBColorCount, nCount ) * sizeof( RGBQUAD ) );
945                 GlobalUnlock( mhDIB );
946             }
947 
948             GlobalUnlock( mhDIB );
949         }
950 
951         delete pBuffer;
952     }
953 }
954 
955 // ------------------------------------------------------------------
956 
957 void WinSalBitmap::ImplDecodeRLEBuffer( const BYTE* pSrcBuf, BYTE* pDstBuf,
958                                      const Size& rSizePixel, bool bRLE4 )
959 {
960     HPBYTE          pRLE = (HPBYTE) pSrcBuf;
961     HPBYTE          pDIB = (HPBYTE) pDstBuf;
962     HPBYTE          pRow = (HPBYTE) pDstBuf;
963     sal_uLong           nWidthAl = AlignedWidth4Bytes( rSizePixel.Width() * ( bRLE4 ? 4UL : 8UL ) );
964     HPBYTE          pLast = pDIB + rSizePixel.Height() * nWidthAl - 1;
965     sal_uLong           nCountByte;
966     sal_uLong           nRunByte;
967     sal_uLong           nX = 0;
968     sal_uLong           i;
969     BYTE            cTmp;
970     bool            bEndDecoding = FALSE;
971 
972     if( pRLE && pDIB )
973     {
974         do
975         {
976             if( ( nCountByte = *pRLE++ ) == 0 )
977             {
978                 nRunByte = *pRLE++;
979 
980                 if( nRunByte > 2UL )
981                 {
982                     if( bRLE4 )
983                     {
984                         nCountByte = nRunByte >> 1UL;
985 
986                         for( i = 0; i < nCountByte; i++ )
987                         {
988                             cTmp = *pRLE++;
989                             ImplSetPixel4( pDIB, nX++, cTmp >> 4 );
990                             ImplSetPixel4( pDIB, nX++, cTmp & 0x0f );
991                         }
992 
993                         if( nRunByte & 1 )
994                             ImplSetPixel4( pDIB, nX++, *pRLE++ >> 4 );
995 
996                         if( ( ( nRunByte + 1 ) >> 1 ) & 1 )
997                             pRLE++;
998                     }
999                     else
1000                     {
1001                         memcpy( &pDIB[ nX ], pRLE, nRunByte );
1002                         pRLE += nRunByte;
1003                         nX += nRunByte;
1004 
1005                         if( nRunByte & 1 )
1006                             pRLE++;
1007                     }
1008                 }
1009                 else if( !nRunByte )
1010                 {
1011                     pDIB = ( pRow += nWidthAl );
1012                     nX = 0UL;
1013                 }
1014                 else if( nRunByte == 1 )
1015                     bEndDecoding = TRUE;
1016                 else
1017                 {
1018                     nX += *pRLE++;
1019                     pDIB = ( pRow += ( *pRLE++ ) * nWidthAl );
1020                 }
1021             }
1022             else
1023             {
1024                 cTmp = *pRLE++;
1025 
1026                 if( bRLE4 )
1027                 {
1028                     nRunByte = nCountByte >> 1;
1029 
1030                     for( i = 0; i < nRunByte; i++ )
1031                     {
1032                         ImplSetPixel4( pDIB, nX++, cTmp >> 4 );
1033                         ImplSetPixel4( pDIB, nX++, cTmp & 0x0f );
1034                     }
1035 
1036                     if( nCountByte & 1 )
1037                         ImplSetPixel4( pDIB, nX++, cTmp >> 4 );
1038                 }
1039                 else
1040                 {
1041                     for( i = 0; i < nCountByte; i++ )
1042                         pDIB[ nX++ ] = cTmp;
1043                 }
1044             }
1045         }
1046         while( !bEndDecoding && ( pDIB <= pLast ) );
1047     }
1048 }
1049 
1050 bool WinSalBitmap::GetSystemData( BitmapSystemData& rData )
1051 {
1052     bool bRet = false;
1053     if( mhDIB || mhDDB )
1054     {
1055         bRet = true;
1056         rData.pDIB = mhDIB;
1057         rData.pDDB = mhDDB;
1058         const Size& rSize = GetSize ();
1059         rData.mnWidth = rSize.Width();
1060         rData.mnHeight = rSize.Height();
1061     }
1062     return bRet;
1063 }
1064