xref: /aoo41x/main/vcl/win/source/gdi/salbmp.cxx (revision 5ca7f190)
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             if ( pRetval->GetLastStatus() == Gdiplus::Ok )
314             {
315                 sal_uInt8* pSrcRGB(pRGB->mpBits);
316                 const sal_uInt32 nExtraRGB(pRGB->mnScanlineSize - (nW * 3));
317                 const bool bTopDown(pRGB->mnFormat & BMP_FORMAT_TOP_DOWN);
318                 const Gdiplus::Rect aAllRect(0, 0, nW, nH);
319                 Gdiplus::BitmapData aGdiPlusBitmapData;
320                 pRetval->LockBits(&aAllRect, Gdiplus::ImageLockModeWrite, PixelFormat24bppRGB, &aGdiPlusBitmapData);
321 
322                 // copy data to Gdiplus::Bitmap; format is BGR here in both cases, so memcpy is possible
323                 for(sal_uInt32 y(0); y < nH; y++)
324                 {
325                     const sal_uInt32 nYInsert(bTopDown ? y : nH - y - 1);
326                     sal_uInt8* targetPixels = (sal_uInt8*)aGdiPlusBitmapData.Scan0 + (nYInsert * aGdiPlusBitmapData.Stride);
327 
328                     memcpy(targetPixels, pSrcRGB, nW * 3);
329                     pSrcRGB += nW * 3 + nExtraRGB;
330                 }
331 
332                 pRetval->UnlockBits(&aGdiPlusBitmapData);
333             }
334             else
335             {
336                 delete pRetval;
337                 pRetval = NULL;
338             }
339         }
340     }
341 
342     if(pExtraRGB)
343     {
344         // #123478# shockingly, BitmapBuffer does not free the memory it is controlling
345         // in it's destructor, this *has to be done handish*. Doing it here now
346         delete[] pExtraRGB->mpBits;
347         delete pExtraRGB;
348     }
349     else
350     {
351         pSalRGB->ReleaseBuffer(pRGB, true);
352     }
353 
354     if(pExtraWinSalRGB)
355     {
356         delete pExtraWinSalRGB;
357     }
358 
359     return pRetval;
360 }
361 
362 // ------------------------------------------------------------------
363 
364 Gdiplus::Bitmap* WinSalBitmap::ImplCreateGdiPlusBitmap(const WinSalBitmap& rAlphaSource)
365 {
366     Gdiplus::Bitmap* pRetval(0);
367     WinSalBitmap* pSalRGB = const_cast< WinSalBitmap* >(this);
368     WinSalBitmap* pExtraWinSalRGB = 0;
369 
370     if(!pSalRGB->ImplGethDIB())
371     {
372         // we need DIB for success with AcquireBuffer, create a replacement WinSalBitmap
373         pExtraWinSalRGB = new WinSalBitmap();
374         pExtraWinSalRGB->Create(*pSalRGB, pSalRGB->GetBitCount());
375         pSalRGB = pExtraWinSalRGB;
376     }
377 
378     BitmapBuffer* pRGB = pSalRGB->AcquireBuffer(true);
379     BitmapBuffer* pExtraRGB = 0;
380 
381     if(pRGB && BMP_FORMAT_24BIT_TC_BGR != (pRGB->mnFormat & ~BMP_FORMAT_TOP_DOWN))
382     {
383         // convert source bitmap to BMP_FORMAT_24BIT_TC_BGR format if not yet in that format
384         SalTwoRect aSalTwoRect;
385 
386         aSalTwoRect.mnSrcX = aSalTwoRect.mnSrcY = aSalTwoRect.mnDestX = aSalTwoRect.mnDestY = 0;
387         aSalTwoRect.mnSrcWidth = aSalTwoRect.mnDestWidth = pRGB->mnWidth;
388         aSalTwoRect.mnSrcHeight = aSalTwoRect.mnDestHeight = pRGB->mnHeight;
389 
390         pExtraRGB = StretchAndConvert(
391             *pRGB,
392             aSalTwoRect,
393             BMP_FORMAT_24BIT_TC_BGR,
394             0);
395 
396         pSalRGB->ReleaseBuffer(pRGB, true);
397         pRGB = pExtraRGB;
398     }
399 
400     WinSalBitmap* pSalA = const_cast< WinSalBitmap* >(&rAlphaSource);
401     WinSalBitmap* pExtraWinSalA = 0;
402 
403     if(!pSalA->ImplGethDIB())
404     {
405         // we need DIB for success with AcquireBuffer, create a replacement WinSalBitmap
406         pExtraWinSalA = new WinSalBitmap();
407         pExtraWinSalA->Create(*pSalA, pSalA->GetBitCount());
408         pSalA = pExtraWinSalA;
409     }
410 
411     BitmapBuffer* pA = pSalA->AcquireBuffer(true);
412     BitmapBuffer* pExtraA = 0;
413 
414     if(pA && BMP_FORMAT_8BIT_PAL != (pA->mnFormat & ~BMP_FORMAT_TOP_DOWN))
415     {
416         // convert alpha bitmap to BMP_FORMAT_8BIT_PAL format if not yet in that format
417         SalTwoRect aSalTwoRect;
418 
419         aSalTwoRect.mnSrcX = aSalTwoRect.mnSrcY = aSalTwoRect.mnDestX = aSalTwoRect.mnDestY = 0;
420         aSalTwoRect.mnSrcWidth = aSalTwoRect.mnDestWidth = pA->mnWidth;
421         aSalTwoRect.mnSrcHeight = aSalTwoRect.mnDestHeight = pA->mnHeight;
422         const BitmapPalette& rTargetPalette = Bitmap::GetGreyPalette(256);
423 
424         pExtraA = StretchAndConvert(
425             *pA,
426             aSalTwoRect,
427             BMP_FORMAT_8BIT_PAL,
428             &rTargetPalette);
429 
430         pSalA->ReleaseBuffer(pA, true);
431         pA = pExtraA;
432     }
433 
434     if(pRGB
435         && pA
436         && pRGB->mnWidth > 0
437         && pRGB->mnHeight > 0
438         && pRGB->mnWidth == pA->mnWidth
439         && pRGB->mnHeight == pA->mnHeight
440         && BMP_FORMAT_24BIT_TC_BGR == (pRGB->mnFormat & ~BMP_FORMAT_TOP_DOWN)
441         && BMP_FORMAT_8BIT_PAL == (pA->mnFormat & ~BMP_FORMAT_TOP_DOWN))
442     {
443         // we have alpha and bitmap in known formats, create GdiPlus Bitmap as 32bit ARGB
444         const sal_uInt32 nW(pRGB->mnWidth);
445         const sal_uInt32 nH(pRGB->mnHeight);
446 
447         pRetval = new Gdiplus::Bitmap(nW, nH, PixelFormat32bppARGB);
448 
449         if(pRetval)
450         {
451             sal_uInt8* pSrcRGB(pRGB->mpBits);
452             sal_uInt8* pSrcA(pA->mpBits);
453             const sal_uInt32 nExtraRGB(pRGB->mnScanlineSize - (nW * 3));
454             const sal_uInt32 nExtraA(pA->mnScanlineSize - nW);
455             const bool bTopDown(pRGB->mnFormat & BMP_FORMAT_TOP_DOWN);
456             const Gdiplus::Rect aAllRect(0, 0, nW, nH);
457             Gdiplus::BitmapData aGdiPlusBitmapData;
458             pRetval->LockBits(&aAllRect, Gdiplus::ImageLockModeWrite, PixelFormat32bppARGB, &aGdiPlusBitmapData);
459 
460             // copy data to Gdiplus::Bitmap; format is BGRA; need to mix BGR from Bitmap and
461             // A from alpha, so inner loop is needed (who invented BitmapEx..?)
462             for(sal_uInt32 y(0); y < nH; y++)
463             {
464                 const sal_uInt32 nYInsert(bTopDown ? y : nH - y - 1);
465                 sal_uInt8* targetPixels = (sal_uInt8*)aGdiPlusBitmapData.Scan0 + (nYInsert * aGdiPlusBitmapData.Stride);
466 
467                 for(sal_uInt32 x(0); x < nW; x++)
468                 {
469                     *targetPixels++ = *pSrcRGB++;
470                     *targetPixels++ = *pSrcRGB++;
471                     *targetPixels++ = *pSrcRGB++;
472                     *targetPixels++ = 0xff - *pSrcA++;
473                 }
474 
475                 pSrcRGB += nExtraRGB;
476                 pSrcA += nExtraA;
477             }
478 
479             pRetval->UnlockBits(&aGdiPlusBitmapData);
480         }
481     }
482 
483     if(pExtraA)
484     {
485         // #123478# shockingly, BitmapBuffer does not free the memory it is controlling
486         // in it's destructor, this *has to be done handish*. Doing it here now
487         delete[] pExtraA->mpBits;
488         delete pExtraA;
489     }
490     else
491     {
492         pSalA->ReleaseBuffer(pA, true);
493     }
494 
495     if(pExtraWinSalA)
496     {
497         delete pExtraWinSalA;
498     }
499 
500     if(pExtraRGB)
501     {
502         // #123478# shockingly, BitmapBuffer does not free the memory it is controlling
503         // in it's destructor, this *has to be done handish*. Doing it here now
504         delete[] pExtraRGB->mpBits;
505         delete pExtraRGB;
506     }
507     else
508     {
509         pSalRGB->ReleaseBuffer(pRGB, true);
510     }
511 
512     if(pExtraWinSalRGB)
513     {
514         delete pExtraWinSalRGB;
515     }
516 
517     return pRetval;
518 }
519 
520 // ------------------------------------------------------------------
521 
522 bool WinSalBitmap::Create( HANDLE hBitmap, bool bDIB, bool bCopyHandle )
523 {
524 	bool bRet = TRUE;
525 
526 	if( bDIB )
527 		mhDIB = (HGLOBAL) ( bCopyHandle ? ImplCopyDIBOrDDB( hBitmap, TRUE ) : hBitmap );
528 	else
529 		mhDDB = (HBITMAP) ( bCopyHandle ? ImplCopyDIBOrDDB( hBitmap, FALSE ) : hBitmap );
530 
531 	if( mhDIB )
532 	{
533 		PBITMAPINFOHEADER pBIH = (PBITMAPINFOHEADER) GlobalLock( mhDIB );
534 
535 		maSize = Size( pBIH->biWidth, pBIH->biHeight );
536 		mnBitCount = pBIH->biBitCount;
537 
538 		if( mnBitCount )
539 			mnBitCount = ( mnBitCount <= 1 ) ? 1 : ( mnBitCount <= 4 ) ? 4 : ( mnBitCount <= 8 ) ? 8 : 24;
540 
541 		GlobalUnlock( mhDIB );
542 	}
543 	else if( mhDDB )
544 	{
545 		BITMAP	aDDBInfo;
546 
547 		if( WIN_GetObject( mhDDB, sizeof( BITMAP ), &aDDBInfo ) )
548 		{
549 			maSize = Size( aDDBInfo.bmWidth, aDDBInfo.bmHeight );
550 			mnBitCount = aDDBInfo.bmPlanes * aDDBInfo.bmBitsPixel;
551 
552 			if( mnBitCount )
553 			{
554 				mnBitCount = ( mnBitCount <= 1 ) ? 1 :
555 							 ( mnBitCount <= 4 ) ? 4 :
556 							 ( mnBitCount <= 8 ) ? 8 : 24;
557 			}
558 		}
559 		else
560 		{
561 			mhDDB = 0;
562 			bRet = FALSE;
563 		}
564 	}
565 	else
566 		bRet = FALSE;
567 
568 	return bRet;
569 }
570 
571 // ------------------------------------------------------------------
572 
573 bool WinSalBitmap::Create( const Size& rSize, sal_uInt16 nBitCount, const BitmapPalette& rPal )
574 {
575 	bool bRet = FALSE;
576 
577 	mhDIB = ImplCreateDIB( rSize, nBitCount, rPal );
578 
579 	if( mhDIB )
580 	{
581 		maSize = rSize;
582 		mnBitCount = nBitCount;
583 		bRet = TRUE;
584 	}
585 
586 	return bRet;
587 }
588 
589 // ------------------------------------------------------------------
590 
591 bool WinSalBitmap::Create( const SalBitmap& rSSalBitmap )
592 {
593 	bool bRet = FALSE;
594     const WinSalBitmap& rSalBitmap = static_cast<const WinSalBitmap&>(rSSalBitmap);
595 
596 	if ( rSalBitmap.mhDIB || rSalBitmap.mhDDB )
597 	{
598 		HANDLE hNewHdl = ImplCopyDIBOrDDB( rSalBitmap.mhDIB ? rSalBitmap.mhDIB : rSalBitmap.mhDDB,
599 										   rSalBitmap.mhDIB != 0 );
600 
601 		if ( hNewHdl )
602 		{
603 			if( rSalBitmap.mhDIB )
604 				mhDIB = (HGLOBAL) hNewHdl;
605 			else if( rSalBitmap.mhDDB )
606 				mhDDB = (HBITMAP) hNewHdl;
607 
608 			maSize = rSalBitmap.maSize;
609 			mnBitCount = rSalBitmap.mnBitCount;
610 
611 			bRet = TRUE;
612 		}
613 	}
614 
615 	return bRet;
616 }
617 
618 // ------------------------------------------------------------------
619 
620 bool WinSalBitmap::Create( const SalBitmap& rSSalBmp, SalGraphics* pSGraphics )
621 {
622 	bool bRet = FALSE;
623 
624     const WinSalBitmap& rSalBmp = static_cast<const WinSalBitmap&>(rSSalBmp);
625     WinSalGraphics* pGraphics = static_cast<WinSalGraphics*>(pSGraphics);
626 
627 	if( rSalBmp.mhDIB )
628 	{
629 		PBITMAPINFO 		pBI = (PBITMAPINFO) GlobalLock( rSalBmp.mhDIB );
630 		PBITMAPINFOHEADER	pBIH = (PBITMAPINFOHEADER) pBI;
631 		HDC 				hDC  = pGraphics->getHDC();
632 		HBITMAP 			hNewDDB;
633 		BITMAP				aDDBInfo;
634 		PBYTE				pBits = (PBYTE) pBI + *(DWORD*) pBI +
635 							ImplGetDIBColorCount( rSalBmp.mhDIB ) * sizeof( RGBQUAD );
636 
637 		if( pBIH->biBitCount == 1 )
638 		{
639 			hNewDDB = CreateBitmap( pBIH->biWidth, pBIH->biHeight, 1, 1, NULL );
640 
641 			if( hNewDDB )
642 				SetDIBits( hDC, hNewDDB, 0, pBIH->biHeight, pBits, pBI, DIB_RGB_COLORS );
643 		}
644 		else
645 			hNewDDB = CreateDIBitmap( hDC, (PBITMAPINFOHEADER) pBI, CBM_INIT, pBits, pBI, DIB_RGB_COLORS );
646 
647 		GlobalUnlock( rSalBmp.mhDIB );
648 
649 		if( hNewDDB && WIN_GetObject( hNewDDB, sizeof( BITMAP ), &aDDBInfo ) )
650 		{
651 			mhDDB = hNewDDB;
652 			maSize = Size( aDDBInfo.bmWidth, aDDBInfo.bmHeight );
653 			mnBitCount = aDDBInfo.bmPlanes * aDDBInfo.bmBitsPixel;
654 
655 			bRet = TRUE;
656 		}
657 		else if( hNewDDB )
658 			DeleteObject( hNewDDB );
659 	}
660 
661 	return bRet;
662 }
663 
664 // ------------------------------------------------------------------
665 
666 bool WinSalBitmap::Create( const SalBitmap& rSSalBmp, sal_uInt16 nNewBitCount )
667 {
668 	bool bRet = FALSE;
669 
670     const WinSalBitmap& rSalBmp = static_cast<const WinSalBitmap&>(rSSalBmp);
671 
672 	if( rSalBmp.mhDDB )
673 	{
674 		mhDIB = ImplCreateDIB( rSalBmp.maSize, nNewBitCount, BitmapPalette() );
675 
676 		if( mhDIB )
677 		{
678 			PBITMAPINFO pBI = (PBITMAPINFO) GlobalLock( mhDIB );
679 			const int	nLines = (int) rSalBmp.maSize.Height();
680 			HDC 		hDC = GetDC( 0 );
681 			PBYTE		pBits = (PBYTE) pBI + *(DWORD*) pBI +
682 								ImplGetDIBColorCount( mhDIB ) * sizeof( RGBQUAD );
683 			SalData*	pSalData = GetSalData();
684 			HPALETTE	hOldPal = 0;
685 
686 			if ( pSalData->mhDitherPal )
687 			{
688 				hOldPal = SelectPalette( hDC, pSalData->mhDitherPal, TRUE );
689 				RealizePalette( hDC );
690 			}
691 
692 			if( GetDIBits( hDC, rSalBmp.mhDDB, 0, nLines, pBits, pBI, DIB_RGB_COLORS ) == nLines )
693 			{
694 				GlobalUnlock( mhDIB );
695 				maSize = rSalBmp.maSize;
696 				mnBitCount = nNewBitCount;
697 				bRet = TRUE;
698 			}
699 			else
700 			{
701 				GlobalUnlock( mhDIB );
702 				GlobalFree( mhDIB );
703 				mhDIB = 0;
704 			}
705 
706 			if( hOldPal )
707 				SelectPalette( hDC, hOldPal, TRUE );
708 
709 			ReleaseDC( 0, hDC );
710 		}
711 	}
712 
713 	return bRet;
714 }
715 
716 // ------------------------------------------------------------------
717 
718 sal_uInt16 WinSalBitmap::ImplGetDIBColorCount( HGLOBAL hDIB )
719 {
720 	sal_uInt16 nColors = 0;
721 
722 	if( hDIB )
723 	{
724 		PBITMAPINFO 		pBI = (PBITMAPINFO) GlobalLock( hDIB );
725 		PBITMAPINFOHEADER	pBIH = (PBITMAPINFOHEADER) pBI;
726 
727 		if ( pBIH->biSize != sizeof( BITMAPCOREHEADER ) )
728 		{
729 			if( pBIH->biBitCount <= 8 )
730 			{
731 				if ( pBIH->biClrUsed )
732 					nColors = (sal_uInt16) pBIH->biClrUsed;
733 				else
734 					nColors = 1 << pBIH->biBitCount;
735 			}
736 		}
737 		else if( ( (PBITMAPCOREHEADER) pBI )->bcBitCount <= 8 )
738 			nColors = 1 << ( (PBITMAPCOREHEADER) pBI )->bcBitCount;
739 
740 		GlobalUnlock( hDIB );
741 	}
742 
743 	return nColors;
744 }
745 
746 // ------------------------------------------------------------------
747 
748 HGLOBAL WinSalBitmap::ImplCreateDIB( const Size& rSize, sal_uInt16 nBits, const BitmapPalette& rPal )
749 {
750 	DBG_ASSERT( nBits == 1 || nBits == 4 || nBits == 8 || nBits == 16 || nBits == 24, "Unsupported BitCount!" );
751 
752 	HGLOBAL hDIB = 0;
753 
754 	if( rSize.Width() <= 0 || rSize.Height() <= 0 )
755 		return hDIB;
756 
757 	// calculate bitmap size in Bytes
758 	const sal_uLong nAlignedWidth4Bytes = AlignedWidth4Bytes( nBits * rSize.Width() );
759 	const sal_uLong nImageSize = nAlignedWidth4Bytes * rSize.Height();
760 	bool bOverflow = (nImageSize / nAlignedWidth4Bytes) != rSize.Height();
761 	if( bOverflow )
762 		return hDIB;
763 
764 	// allocate bitmap memory including header and palette
765 	const sal_uInt16 nColors = (nBits <= 8) ? (1 << nBits) : 0;
766 	const sal_uLong nHeaderSize = sizeof( BITMAPINFOHEADER ) + nColors * sizeof( RGBQUAD );
767 	bOverflow = (nHeaderSize + nImageSize) < nImageSize;
768 	if( bOverflow )
769 		return hDIB;
770 
771 	hDIB = GlobalAlloc( GHND, nHeaderSize + nImageSize );
772 	if( !hDIB )
773 		return hDIB;
774 
775 	PBITMAPINFO pBI = static_cast<PBITMAPINFO>( GlobalLock( hDIB ) );
776 	PBITMAPINFOHEADER pBIH = reinterpret_cast<PBITMAPINFOHEADER>( pBI );
777 
778 	pBIH->biSize = sizeof( BITMAPINFOHEADER );
779 	pBIH->biWidth = rSize.Width();
780 	pBIH->biHeight = rSize.Height();
781 	pBIH->biPlanes = 1;
782 	pBIH->biBitCount = nBits;
783 	pBIH->biCompression = BI_RGB;
784 	pBIH->biSizeImage = nImageSize;
785 	pBIH->biXPelsPerMeter = 0;
786 	pBIH->biYPelsPerMeter = 0;
787 	pBIH->biClrUsed = 0;
788 	pBIH->biClrImportant = 0;
789 
790 	if( nColors )
791 	{
792 		// copy the palette entries if any
793 		const sal_uInt16 nMinCount = Min( nColors, rPal.GetEntryCount() );
794 		if( nMinCount )
795 			memcpy( pBI->bmiColors, rPal.ImplGetColorBuffer(), nMinCount * sizeof(RGBQUAD) );
796 	}
797 
798 	GlobalUnlock( hDIB );
799 
800 	return hDIB;
801 }
802 
803 // ------------------------------------------------------------------
804 
805 HANDLE WinSalBitmap::ImplCopyDIBOrDDB( HANDLE hHdl, bool bDIB )
806 {
807 	HANDLE	hCopy = 0;
808 
809 	if ( bDIB && hHdl )
810 	{
811 		const sal_uLong nSize = GlobalSize( hHdl );
812 
813 		if ( (hCopy = GlobalAlloc( GHND, nSize  )) != 0 )
814 		{
815 			memcpy( (LPSTR) GlobalLock( hCopy ), (LPSTR) GlobalLock( hHdl ), nSize );
816 
817 			GlobalUnlock( hCopy );
818 			GlobalUnlock( hHdl );
819 		}
820 	}
821 	else if ( hHdl )
822 	{
823 		BITMAP aBmp;
824 
825 		// Source-Bitmap nach Groesse befragen
826 		WIN_GetObject( hHdl, sizeof( BITMAP ), (LPSTR) &aBmp );
827 
828 		// Destination-Bitmap erzeugen
829 		if ( (hCopy = CreateBitmapIndirect( &aBmp )) != 0 )
830 		{
831 			HDC 	hBmpDC = CreateCompatibleDC( 0 );
832 			HBITMAP hBmpOld = (HBITMAP) SelectObject( hBmpDC, hHdl );
833 			HDC 	hCopyDC = CreateCompatibleDC( hBmpDC );
834 			HBITMAP hCopyOld = (HBITMAP) SelectObject( hCopyDC, hCopy );
835 
836 			BitBlt( hCopyDC, 0, 0, aBmp.bmWidth, aBmp.bmHeight, hBmpDC, 0, 0, SRCCOPY );
837 
838 			SelectObject( hCopyDC, hCopyOld );
839 			DeleteDC( hCopyDC );
840 
841 			SelectObject( hBmpDC, hBmpOld );
842 			DeleteDC( hBmpDC );
843 		}
844 	}
845 
846 	return hCopy;
847 }
848 
849 // ------------------------------------------------------------------
850 
851 BitmapBuffer* WinSalBitmap::AcquireBuffer( bool /*bReadOnly*/ )
852 {
853 	BitmapBuffer* pBuffer = NULL;
854 
855 	if( mhDIB )
856 	{
857 		PBITMAPINFO 		pBI = (PBITMAPINFO) GlobalLock( mhDIB );
858 		PBITMAPINFOHEADER	pBIH = (PBITMAPINFOHEADER) pBI;
859 
860 		if( ( pBIH->biCompression == BI_RLE4 ) || ( pBIH->biCompression == BI_RLE8 ) )
861 		{
862 			Size	aSizePix( pBIH->biWidth, pBIH->biHeight );
863 			HGLOBAL hNewDIB = ImplCreateDIB( aSizePix, pBIH->biBitCount, BitmapPalette() );
864 
865 			if( hNewDIB )
866 			{
867 				PBITMAPINFO 		pNewBI = (PBITMAPINFO) GlobalLock( hNewDIB );
868 				PBITMAPINFOHEADER	pNewBIH = (PBITMAPINFOHEADER) pNewBI;
869 				const sal_uInt16		nColorCount = ImplGetDIBColorCount( hNewDIB );
870 				const sal_uLong 		nOffset = *(DWORD*) pBI + nColorCount * sizeof( RGBQUAD );
871 				BYTE*				pOldBits = (PBYTE) pBI + nOffset;
872 				BYTE*				pNewBits = (PBYTE) pNewBI + nOffset;
873 
874 				memcpy( pNewBI, pBI, nOffset );
875 				pNewBIH->biCompression = 0;
876 				ImplDecodeRLEBuffer( pOldBits, pNewBits, aSizePix, pBIH->biCompression == BI_RLE4 );
877 
878 				GlobalUnlock( mhDIB );
879 				GlobalFree( mhDIB );
880 				mhDIB = hNewDIB;
881 				pBI = pNewBI;
882 				pBIH = pNewBIH;
883 			}
884 		}
885 
886 		if( pBIH->biPlanes == 1 )
887 		{
888 			pBuffer = new BitmapBuffer;
889 
890 			pBuffer->mnFormat = BMP_FORMAT_BOTTOM_UP |
891 								( pBIH->biBitCount == 1 ? BMP_FORMAT_1BIT_MSB_PAL :
892 								  pBIH->biBitCount == 4 ? BMP_FORMAT_4BIT_MSN_PAL :
893 								  pBIH->biBitCount == 8 ? BMP_FORMAT_8BIT_PAL :
894 								  pBIH->biBitCount == 16 ? BMP_FORMAT_16BIT_TC_LSB_MASK :
895 								  pBIH->biBitCount == 24 ? BMP_FORMAT_24BIT_TC_BGR :
896 								  pBIH->biBitCount == 32 ? BMP_FORMAT_32BIT_TC_MASK : 0UL );
897 
898 			if( BMP_SCANLINE_FORMAT( pBuffer->mnFormat ) )
899 			{
900 				pBuffer->mnWidth = maSize.Width();
901 				pBuffer->mnHeight = maSize.Height();
902 				pBuffer->mnScanlineSize = AlignedWidth4Bytes( maSize.Width() * pBIH->biBitCount );
903 				pBuffer->mnBitCount = (sal_uInt16) pBIH->biBitCount;
904 
905 				if( pBuffer->mnBitCount <= 8 )
906 				{
907 					const sal_uInt16 nPalCount = ImplGetDIBColorCount( mhDIB );
908 
909 					pBuffer->maPalette.SetEntryCount( nPalCount );
910 					memcpy( pBuffer->maPalette.ImplGetColorBuffer(), pBI->bmiColors, nPalCount * sizeof( RGBQUAD ) );
911 					pBuffer->mpBits = (PBYTE) pBI + *(DWORD*) pBI + nPalCount * sizeof( RGBQUAD );
912 				}
913 				else if( ( pBIH->biBitCount == 16 ) || ( pBIH->biBitCount == 32 ) )
914 				{
915 					sal_uLong nOffset = 0UL;
916 
917 					if( pBIH->biCompression == BI_BITFIELDS )
918 					{
919 						nOffset = 3 * sizeof( RGBQUAD );
920 						pBuffer->maColorMask = ColorMask( *(UINT32*) &pBI->bmiColors[ 0 ],
921 														  *(UINT32*) &pBI->bmiColors[ 1 ],
922 														  *(UINT32*) &pBI->bmiColors[ 2 ] );
923 					}
924 					else if( pBIH->biBitCount == 16 )
925 						pBuffer->maColorMask = ColorMask( 0x00007c00UL, 0x000003e0UL, 0x0000001fUL );
926 					else
927 						pBuffer->maColorMask = ColorMask( 0x00ff0000UL, 0x0000ff00UL, 0x000000ffUL );
928 
929 					pBuffer->mpBits = (PBYTE) pBI + *(DWORD*) pBI + nOffset;
930 				}
931 				else
932 					pBuffer->mpBits = (PBYTE) pBI + *(DWORD*) pBI;
933 			}
934 			else
935 			{
936 				GlobalUnlock( mhDIB );
937 				delete pBuffer;
938 				pBuffer = NULL;
939 			}
940 		}
941 		else
942 			GlobalUnlock( mhDIB );
943 	}
944 
945 	return pBuffer;
946 }
947 
948 // ------------------------------------------------------------------
949 
950 void WinSalBitmap::ReleaseBuffer( BitmapBuffer* pBuffer, bool bReadOnly )
951 {
952 	if( pBuffer )
953 	{
954 		if( mhDIB )
955 		{
956 			if( !bReadOnly && !!pBuffer->maPalette )
957 			{
958 				PBITMAPINFO 	pBI = (PBITMAPINFO) GlobalLock( mhDIB );
959 				const sal_uInt16	nCount = pBuffer->maPalette.GetEntryCount();
960 				const sal_uInt16	nDIBColorCount = ImplGetDIBColorCount( mhDIB );
961 				memcpy( pBI->bmiColors, pBuffer->maPalette.ImplGetColorBuffer(), Min( nDIBColorCount, nCount ) * sizeof( RGBQUAD ) );
962 				GlobalUnlock( mhDIB );
963 			}
964 
965 			GlobalUnlock( mhDIB );
966 		}
967 
968 		delete pBuffer;
969 	}
970 }
971 
972 // ------------------------------------------------------------------
973 
974 void WinSalBitmap::ImplDecodeRLEBuffer( const BYTE* pSrcBuf, BYTE* pDstBuf,
975 									 const Size& rSizePixel, bool bRLE4 )
976 {
977 	HPBYTE			pRLE = (HPBYTE) pSrcBuf;
978 	HPBYTE			pDIB = (HPBYTE) pDstBuf;
979 	HPBYTE			pRow = (HPBYTE) pDstBuf;
980 	sal_uLong			nWidthAl = AlignedWidth4Bytes( rSizePixel.Width() * ( bRLE4 ? 4UL : 8UL ) );
981 	HPBYTE			pLast = pDIB + rSizePixel.Height() * nWidthAl - 1;
982 	sal_uLong			nCountByte;
983 	sal_uLong			nRunByte;
984 	sal_uLong			nX = 0;
985 	sal_uLong			i;
986 	BYTE			cTmp;
987 	bool			bEndDecoding = FALSE;
988 
989 	if( pRLE && pDIB )
990 	{
991 		do
992 		{
993 			if( ( nCountByte = *pRLE++ ) == 0 )
994 			{
995 				nRunByte = *pRLE++;
996 
997 				if( nRunByte > 2UL )
998 				{
999 					if( bRLE4 )
1000 					{
1001 						nCountByte = nRunByte >> 1UL;
1002 
1003 						for( i = 0; i < nCountByte; i++ )
1004 						{
1005 							cTmp = *pRLE++;
1006 							ImplSetPixel4( pDIB, nX++, cTmp >> 4 );
1007 							ImplSetPixel4( pDIB, nX++, cTmp & 0x0f );
1008 						}
1009 
1010 						if( nRunByte & 1 )
1011 							ImplSetPixel4( pDIB, nX++, *pRLE++ >> 4 );
1012 
1013 						if( ( ( nRunByte + 1 ) >> 1 ) & 1 )
1014 							pRLE++;
1015 					}
1016 					else
1017 					{
1018 						memcpy( &pDIB[ nX ], pRLE, nRunByte );
1019 						pRLE += nRunByte;
1020 						nX += nRunByte;
1021 
1022 						if( nRunByte & 1 )
1023 							pRLE++;
1024 					}
1025 				}
1026 				else if( !nRunByte )
1027 				{
1028 					pDIB = ( pRow += nWidthAl );
1029 					nX = 0UL;
1030 				}
1031 				else if( nRunByte == 1 )
1032 					bEndDecoding = TRUE;
1033 				else
1034 				{
1035 					nX += *pRLE++;
1036 					pDIB = ( pRow += ( *pRLE++ ) * nWidthAl );
1037 				}
1038 			}
1039 			else
1040 			{
1041 				cTmp = *pRLE++;
1042 
1043 				if( bRLE4 )
1044 				{
1045 					nRunByte = nCountByte >> 1;
1046 
1047 					for( i = 0; i < nRunByte; i++ )
1048 					{
1049 						ImplSetPixel4( pDIB, nX++, cTmp >> 4 );
1050 						ImplSetPixel4( pDIB, nX++, cTmp & 0x0f );
1051 					}
1052 
1053 					if( nCountByte & 1 )
1054 						ImplSetPixel4( pDIB, nX++, cTmp >> 4 );
1055 				}
1056 				else
1057 				{
1058 					for( i = 0; i < nCountByte; i++ )
1059 						pDIB[ nX++ ] = cTmp;
1060 				}
1061 			}
1062 		}
1063 		while( !bEndDecoding && ( pDIB <= pLast ) );
1064 	}
1065 }
1066 
1067 bool WinSalBitmap::GetSystemData( BitmapSystemData& rData )
1068 {
1069     bool bRet = false;
1070     if( mhDIB || mhDDB )
1071     {
1072         bRet = true;
1073         rData.pDIB = mhDIB;
1074         rData.pDDB = mhDDB;
1075         const Size& rSize = GetSize ();
1076         rData.mnWidth = rSize.Width();
1077         rData.mnHeight = rSize.Height();
1078     }
1079     return bRet;
1080 }
1081