]> git.saurik.com Git - wxWidgets.git/blob - src/motif/bmpmotif.cpp
merge of new wxMac code
[wxWidgets.git] / src / motif / bmpmotif.cpp
1 /////////////////////////////////////////////////////////////////////////////
2 // Name: bitmap.cpp
3 // Purpose: wxBitmap
4 // Author: Julian Smart, originally in bitmap.cpp
5 // Modified by:
6 // Created: 25/03/2003
7 // RCS-ID: $Id$
8 // Copyright: (c) Julian Smart
9 // Licence: wxWindows licence
10 /////////////////////////////////////////////////////////////////////////////
11
12 #if defined(__GNUG__) && !defined(NO_GCC_PRAGMA)
13 #pragma implementation "bmpmotif.h"
14 #endif
15
16 #ifdef __VMS
17 #define XtParent XTPARENT
18 #define XtDisplay XTDISPLAY
19 #endif
20
21 #include "wx/defs.h"
22 #include "wx/motif/bmpmotif.h"
23
24 #ifdef __VMS__
25 #pragma message disable nosimpint
26 #endif
27 #include <Xm/Xm.h>
28 #ifdef __VMS__
29 #pragma message enable nosimpint
30 #endif
31
32 #include "wx/motif/private.h"
33
34 #if wxHAVE_LIB_XPM
35 #include <X11/xpm.h>
36 #endif
37 #include <math.h>
38
39 Pixmap XCreateInsensitivePixmap( Display *display, Pixmap pixmap );
40
41 wxBitmapCache::~wxBitmapCache()
42 {
43 if( m_display )
44 {
45 Screen* screen = DefaultScreenOfDisplay( (Display*)m_display );
46
47 if( m_labelPixmap )
48 XmDestroyPixmap( screen, (Pixmap)m_labelPixmap );
49
50 if( m_armPixmap )
51 XmDestroyPixmap( screen, (Pixmap)m_armPixmap );
52
53 if( m_insensPixmap )
54 XmDestroyPixmap( screen, (Pixmap)m_insensPixmap );
55
56 }
57
58 if( m_image )
59 {
60 XmUninstallImage( (XImage*)m_image );
61 XtFree( (char*)(XImage*)m_image );
62 }
63 }
64
65 void wxBitmapCache::SetBitmap( const wxBitmap& bitmap )
66 {
67 if( m_bitmap != bitmap )
68 {
69 InvalidateCache();
70 m_bitmap = bitmap;
71
72 if( m_image )
73 {
74 XmUninstallImage( (XImage*)m_image );
75 XtFree( (char*)(XImage*)m_image );
76 m_image = (WXImage*)NULL;
77 }
78 }
79 }
80
81 void wxBitmapCache::InvalidateCache()
82 {
83 m_recalcPixmaps.label = true;
84 m_recalcPixmaps.arm = true;
85 m_recalcPixmaps.insens = true;
86 }
87
88 void wxBitmapCache::SetColoursChanged()
89 {
90 InvalidateCache();
91 }
92
93 void wxBitmapCache::CreateImageIfNeeded( WXWidget w )
94 {
95 if( m_image )
96 return;
97
98 m_display = w ?
99 (WXDisplay*)XtDisplay( (Widget)w ) :
100 (WXDisplay*)wxGetDisplay();
101
102 XImage *ximage = XGetImage( (Display*)m_display,
103 (Drawable)m_bitmap.GetDrawable(),
104 0, 0,
105 m_bitmap.GetWidth(), m_bitmap.GetHeight(),
106 AllPlanes, ZPixmap );
107
108 m_image = (WXImage*)ximage;
109
110 if( m_image )
111 {
112 char tmp[128];
113 sprintf( tmp, "Im%x", (unsigned int)ximage );
114 XmInstallImage( ximage, tmp );
115 }
116 }
117
118 WXPixmap wxBitmapCache::GetLabelPixmap( WXWidget w )
119 {
120 if( m_labelPixmap && !m_recalcPixmaps.label )
121 return m_labelPixmap;
122
123 CreateImageIfNeeded( w );
124
125 Screen* screen = DefaultScreenOfDisplay( (Display*)m_display );
126
127 if( m_labelPixmap )
128 XmDestroyPixmap( screen, (Pixmap)m_labelPixmap );
129
130 if( !m_image )
131 return (WXPixmap)NULL;
132
133 char tmp[128];
134 sprintf( tmp, "Im%x", (unsigned int)m_image );
135
136 Pixel fg, bg;
137 Widget widget = (Widget)w;
138
139 while( XmIsGadget( widget ) )
140 widget = XtParent( widget );
141 XtVaGetValues( widget,
142 XmNbackground, &bg,
143 XmNforeground, &fg,
144 NULL );
145
146 m_labelPixmap = (WXPixmap)XmGetPixmap( screen, tmp, fg, bg );
147
148 m_recalcPixmaps.label = !m_labelPixmap;
149 return m_labelPixmap;
150 }
151
152 WXPixmap wxBitmapCache::GetArmPixmap( WXWidget w )
153 {
154 if( m_armPixmap && !m_recalcPixmaps.arm )
155 return m_armPixmap;
156
157 CreateImageIfNeeded( w );
158
159 Screen* screen = DefaultScreenOfDisplay( (Display*)m_display );
160
161 if( m_armPixmap )
162 XmDestroyPixmap( screen, (Pixmap)m_armPixmap );
163
164 if( !m_image )
165 return (WXPixmap)NULL;
166
167 char tmp[128];
168 sprintf( tmp, "Im%x", (unsigned int)m_image );
169
170 Pixel fg, bg;
171 Widget widget = (Widget) w;
172
173 XtVaGetValues( widget, XmNarmColor, &bg, NULL );
174 while( XmIsGadget( widget ) )
175 widget = XtParent( widget );
176 XtVaGetValues( widget, XmNforeground, &fg, NULL );
177
178 m_armPixmap = (WXPixmap)XmGetPixmap( screen, tmp, fg, bg );
179
180 m_recalcPixmaps.arm = !m_armPixmap;
181 return m_armPixmap;
182 }
183
184 WXPixmap wxBitmapCache::GetInsensPixmap( WXWidget w )
185 {
186 if( m_insensPixmap && !m_recalcPixmaps.insens )
187 return m_insensPixmap;
188
189 CreateImageIfNeeded( w );
190
191 Screen* screen = DefaultScreenOfDisplay( (Display*)m_display );
192
193 if( m_insensPixmap )
194 XmDestroyPixmap( screen, (Pixmap)m_insensPixmap );
195
196 if( !m_image )
197 return (WXPixmap)NULL;
198
199 m_insensPixmap =
200 (WXPixmap)XCreateInsensitivePixmap( (Display*)m_display,
201 (Pixmap)m_bitmap.GetDrawable() );
202
203 m_recalcPixmaps.insens = !m_insensPixmap;
204 return m_insensPixmap;
205 }
206
207 //////////////////////////////////////////////////////////////////////////////
208 // Utility function
209 //////////////////////////////////////////////////////////////////////////////
210
211 /****************************************************************************
212
213 NAME
214 XCreateInsensitivePixmap - create a grayed-out copy of a pixmap
215
216 SYNOPSIS
217 Pixmap XCreateInsensitivePixmap( Display *display, Pixmap pixmap )
218
219 DESCRIPTION
220 This function creates a grayed-out copy of the argument pixmap, suitable
221 for use as a XmLabel's XmNlabelInsensitivePixmap resource.
222
223 RETURN VALUES
224 The return value is the new Pixmap id or zero on error. Errors include
225 a NULL display argument or an invalid Pixmap argument.
226
227 ERRORS
228 If one of the XLib functions fail, it will produce a X error. The
229 default X error handler prints a diagnostic and calls exit().
230
231 SEE ALSO
232 XCopyArea(3), XCreateBitmapFromData(3), XCreateGC(3), XCreatePixmap(3),
233 XFillRectangle(3), exit(2)
234
235 AUTHOR
236 John R Veregge - john@puente.jpl.nasa.gov
237 Advanced Engineering and Prototyping Group (AEG)
238 Information Systems Technology Section (395)
239 Jet Propulsion Lab - Calif Institute of Technology
240
241 *****************************************************************************/
242
243 Pixmap
244 XCreateInsensitivePixmap( Display *display, Pixmap pixmap )
245
246 {
247 static char stipple_data[] =
248 {
249 0x55, 0x55, 0xAA, 0xAA, 0x55, 0x55, 0xAA, 0xAA,
250 0x55, 0x55, 0xAA, 0xAA, 0x55, 0x55, 0xAA, 0xAA,
251 0x55, 0x55, 0xAA, 0xAA, 0x55, 0x55, 0xAA, 0xAA,
252 0x55, 0x55, 0xAA, 0xAA, 0x55, 0x55, 0xAA, 0xAA
253 };
254 GC gc;
255 Pixmap ipixmap, stipple;
256 unsigned width, height, depth;
257
258 Window window; /* These return values */
259 unsigned border; /* from XGetGeometry() */
260 int x, y; /* are not needed. */
261
262 ipixmap = 0;
263
264 if ( NULL == display || 0 == pixmap )
265 return ipixmap;
266
267 if ( 0 == XGetGeometry( display, pixmap, &window, &x, &y,
268 &width, &height, &border, &depth )
269 )
270 return ipixmap; /* BadDrawable: probably an invalid pixmap */
271
272 /* Get the stipple pixmap to be used to 'gray-out' the argument pixmap.
273 */
274 stipple = XCreateBitmapFromData( display, pixmap, stipple_data, 16, 16 );
275 if ( 0 != stipple )
276 {
277 gc = XCreateGC( display, pixmap, (XtGCMask)0, (XGCValues*)NULL );
278 if ( NULL != gc )
279 {
280 /* Create an identical copy of the argument pixmap.
281 */
282 ipixmap = XCreatePixmap( display, pixmap, width, height, depth );
283 if ( 0 != ipixmap )
284 {
285 /* Copy the argument pixmap into the new pixmap.
286 */
287 XCopyArea( display, pixmap, ipixmap,
288 gc, 0, 0, width, height, 0, 0 );
289
290 /* Refill the new pixmap using the stipple algorithm/pixmap.
291 */
292 XSetStipple( display, gc, stipple );
293 XSetFillStyle( display, gc, FillStippled );
294 XFillRectangle( display, ipixmap, gc, 0, 0, width, height );
295 }
296 XFreeGC( display, gc );
297 }
298 XFreePixmap( display, stipple );
299 }
300 return ipixmap;
301 }