Fixed a possible memory corruption.
[wine] / dlls / gdi / driver.c
1 /*
2  * Graphics driver management functions
3  *
4  * Copyright 1996 Alexandre Julliard
5  *
6  * This library is free software; you can redistribute it and/or
7  * modify it under the terms of the GNU Lesser General Public
8  * License as published by the Free Software Foundation; either
9  * version 2.1 of the License, or (at your option) any later version.
10  *
11  * This library is distributed in the hope that it will be useful,
12  * but WITHOUT ANY WARRANTY; without even the implied warranty of
13  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
14  * Lesser General Public License for more details.
15  *
16  * You should have received a copy of the GNU Lesser General Public
17  * License along with this library; if not, write to the Free Software
18  * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
19  */
20
21 #include "config.h"
22 #include "wine/port.h"
23
24 #include <string.h>
25 #include "winbase.h"
26 #include "winreg.h"
27
28 #include "gdi.h"
29 #include "wine/debug.h"
30
31 WINE_DEFAULT_DEBUG_CHANNEL(driver);
32
33 struct graphics_driver
34 {
35     struct graphics_driver *next;
36     struct graphics_driver *prev;
37     HMODULE                 module;  /* module handle */
38     unsigned int            count;   /* reference count */
39     DC_FUNCTIONS            funcs;
40 };
41
42 static struct graphics_driver *first_driver;
43 static struct graphics_driver *display_driver;
44 static CRITICAL_SECTION driver_section = CRITICAL_SECTION_INIT( "driver_section" );
45
46 /**********************************************************************
47  *           create_driver
48  *
49  * Allocate and fill the driver structure for a given module.
50  */
51 static struct graphics_driver *create_driver( HMODULE module )
52 {
53     struct graphics_driver *driver;
54
55     if (!(driver = HeapAlloc( GetProcessHeap(), 0, sizeof(*driver)))) return NULL;
56     driver->next   = NULL;
57     driver->prev   = NULL;
58     driver->module = module;
59     driver->count  = 1;
60
61     /* fill the function table */
62
63 #define GET_FUNC(name) driver->funcs.p##name = (void*)GetProcAddress( module, #name )
64
65     GET_FUNC(AbortDoc);
66     GET_FUNC(AbortPath);
67     GET_FUNC(AngleArc);
68     GET_FUNC(Arc);
69     GET_FUNC(ArcTo);
70     GET_FUNC(BeginPath);
71     GET_FUNC(BitBlt);
72     GET_FUNC(ChoosePixelFormat);
73     GET_FUNC(Chord);
74     GET_FUNC(CloseFigure);
75     GET_FUNC(CreateBitmap);
76     GET_FUNC(CreateDC);
77     GET_FUNC(CreateDIBSection);
78     GET_FUNC(DeleteBitmap);
79     GET_FUNC(DeleteDC);
80     GET_FUNC(DescribePixelFormat);
81     GET_FUNC(DeviceCapabilities);
82     GET_FUNC(Ellipse);
83     GET_FUNC(EndDoc);
84     GET_FUNC(EndPage);
85     GET_FUNC(EndPath);
86     GET_FUNC(EnumDeviceFonts);
87     GET_FUNC(ExcludeClipRect);
88     GET_FUNC(ExtDeviceMode);
89     GET_FUNC(ExtEscape);
90     GET_FUNC(ExtFloodFill);
91     GET_FUNC(ExtSelectClipRgn);
92     GET_FUNC(ExtTextOut);
93     GET_FUNC(FillPath);
94     GET_FUNC(FillRgn);
95     GET_FUNC(FlattenPath);
96     GET_FUNC(FrameRgn);
97     GET_FUNC(GetBitmapBits);
98     GET_FUNC(GetCharWidth);
99     GET_FUNC(GetDCOrgEx);
100     GET_FUNC(GetDIBColorTable);
101     GET_FUNC(GetDIBits);
102     GET_FUNC(GetDeviceCaps);
103     GET_FUNC(GetDeviceGammaRamp);
104     GET_FUNC(GetNearestColor);
105     GET_FUNC(GetPixel);
106     GET_FUNC(GetPixelFormat);
107     GET_FUNC(GetSystemPaletteEntries);
108     GET_FUNC(GetTextExtentPoint);
109     GET_FUNC(GetTextMetrics);
110     GET_FUNC(IntersectClipRect);
111     GET_FUNC(InvertRgn);
112     GET_FUNC(LineTo);
113     GET_FUNC(MoveTo);
114     GET_FUNC(OffsetClipRgn);
115     GET_FUNC(OffsetViewportOrg);
116     GET_FUNC(OffsetWindowOrg);
117     GET_FUNC(PaintRgn);
118     GET_FUNC(PatBlt);
119     GET_FUNC(Pie);
120     GET_FUNC(PolyBezier);
121     GET_FUNC(PolyBezierTo);
122     GET_FUNC(PolyDraw);
123     GET_FUNC(PolyPolygon);
124     GET_FUNC(PolyPolyline);
125     GET_FUNC(Polygon);
126     GET_FUNC(Polyline);
127     GET_FUNC(PolylineTo);
128     GET_FUNC(RealizeDefaultPalette);
129     GET_FUNC(RealizePalette);
130     GET_FUNC(Rectangle);
131     GET_FUNC(ResetDC);
132     GET_FUNC(RestoreDC);
133     GET_FUNC(RoundRect);
134     GET_FUNC(SaveDC);
135     GET_FUNC(ScaleViewportExt);
136     GET_FUNC(ScaleWindowExt);
137     GET_FUNC(SelectBitmap);
138     GET_FUNC(SelectBrush);
139     GET_FUNC(SelectClipPath);
140     GET_FUNC(SelectFont);
141     GET_FUNC(SelectPalette);
142     GET_FUNC(SelectPen);
143     GET_FUNC(SetBitmapBits);
144     GET_FUNC(SetBkColor);
145     GET_FUNC(SetBkMode);
146     GET_FUNC(SetDCOrg);
147     GET_FUNC(SetDIBColorTable);
148     GET_FUNC(SetDIBits);
149     GET_FUNC(SetDIBitsToDevice);
150     GET_FUNC(SetDeviceClipping);
151     GET_FUNC(SetDeviceGammaRamp);
152     GET_FUNC(SetMapMode);
153     GET_FUNC(SetMapperFlags);
154     GET_FUNC(SetPixel);
155     GET_FUNC(SetPixelFormat);
156     GET_FUNC(SetPolyFillMode);
157     GET_FUNC(SetROP2);
158     GET_FUNC(SetRelAbs);
159     GET_FUNC(SetStretchBltMode);
160     GET_FUNC(SetTextAlign);
161     GET_FUNC(SetTextCharacterExtra);
162     GET_FUNC(SetTextColor);
163     GET_FUNC(SetTextJustification);
164     GET_FUNC(SetViewportExt);
165     GET_FUNC(SetViewportOrg);
166     GET_FUNC(SetWindowExt);
167     GET_FUNC(SetWindowOrg);
168     GET_FUNC(StartDoc);
169     GET_FUNC(StartPage);
170     GET_FUNC(StretchBlt);
171     GET_FUNC(StretchDIBits);
172     GET_FUNC(StrokeAndFillPath);
173     GET_FUNC(StrokePath);
174     GET_FUNC(SwapBuffers);
175     GET_FUNC(WidenPath);
176 #undef GET_FUNC
177
178     /* add it to the list */
179     driver->prev = NULL;
180     if ((driver->next = first_driver)) driver->next->prev = driver;
181     first_driver = driver;
182     return driver;
183 }
184
185
186 /**********************************************************************
187  *           load_display_driver
188  *
189  * Special case for loading the display driver: get the name from the config file
190  */
191 static struct graphics_driver *load_display_driver(void)
192 {
193     char buffer[MAX_PATH];
194     HMODULE module;
195     HKEY hkey;
196
197     if (display_driver)  /* already loaded */
198     {
199         display_driver->count++;
200         return display_driver;
201     }
202
203     strcpy( buffer, "x11drv" );  /* default value */
204     if (!RegOpenKeyA( HKEY_LOCAL_MACHINE, "Software\\Wine\\Wine\\Config\\Wine", &hkey ))
205     {
206         DWORD type, count = sizeof(buffer);
207         RegQueryValueExA( hkey, "GraphicsDriver", 0, &type, buffer, &count );
208         RegCloseKey( hkey );
209     }
210
211     if (!(module = LoadLibraryA( buffer )))
212     {
213         MESSAGE( "Could not load graphics driver '%s'\n", buffer );
214         return NULL;
215     }
216
217     if (!(display_driver = create_driver( module )))
218     {
219         MESSAGE( "Could not create graphics driver '%s'\n", buffer );
220         FreeLibrary( module );
221         return NULL;
222     }
223
224     display_driver->count++;  /* we don't want to free it */
225     return display_driver;
226 }
227
228
229 /**********************************************************************
230  *           DRIVER_load_driver
231  */
232 const DC_FUNCTIONS *DRIVER_load_driver( LPCSTR name )
233 {
234     HMODULE module;
235     struct graphics_driver *driver;
236
237     EnterCriticalSection( &driver_section );
238
239     /* display driver is a special case */
240     if (!strcasecmp( name, "display" ))
241     {
242         driver = load_display_driver();
243         LeaveCriticalSection( &driver_section );
244         return &driver->funcs;
245     }
246
247     if ((module = GetModuleHandleA( name )))
248     {
249         for (driver = first_driver; driver; driver = driver->next)
250         {
251             if (driver->module == module)
252             {
253                 driver->count++;
254                 LeaveCriticalSection( &driver_section );
255                 return &driver->funcs;
256             }
257         }
258     }
259
260     if (!(module = LoadLibraryA( name )))
261     {
262         LeaveCriticalSection( &driver_section );
263         return NULL;
264     }
265
266     if (!(driver = create_driver( module )))
267     {
268         FreeLibrary( module );
269         LeaveCriticalSection( &driver_section );
270         return NULL;
271     }
272
273     TRACE( "loaded driver %p for %s\n", driver, name );
274     LeaveCriticalSection( &driver_section );
275     return &driver->funcs;
276 }
277
278
279 /**********************************************************************
280  *           DRIVER_get_driver
281  *
282  * Get a new copy of an existing driver.
283  */
284 const DC_FUNCTIONS *DRIVER_get_driver( const DC_FUNCTIONS *funcs )
285 {
286     struct graphics_driver *driver;
287
288     EnterCriticalSection( &driver_section );
289     for (driver = first_driver; driver; driver = driver->next)
290         if (&driver->funcs == funcs) break;
291     if (!driver) ERR( "driver not found, trouble ahead\n" );
292     driver->count++;
293     LeaveCriticalSection( &driver_section );
294     return funcs;
295 }
296
297
298 /**********************************************************************
299  *           DRIVER_release_driver
300  *
301  * Release a driver by decrementing ref count and freeing it if needed.
302  */
303 void DRIVER_release_driver( const DC_FUNCTIONS *funcs )
304 {
305     struct graphics_driver *driver;
306
307     EnterCriticalSection( &driver_section );
308
309     for (driver = first_driver; driver; driver = driver->next)
310         if (&driver->funcs == funcs) break;
311
312     if (!driver) goto done;
313     if (--driver->count) goto done;
314
315     /* removed last reference, free it */
316     if (driver->next) driver->next->prev = driver->prev;
317     if (driver->prev) driver->prev->next = driver->next;
318     else first_driver = driver->next;
319     if (driver == display_driver) display_driver = NULL;
320
321     FreeLibrary( driver->module );
322     HeapFree( GetProcessHeap(), 0, driver );
323  done:
324     LeaveCriticalSection( &driver_section );
325 }
326
327
328 /*****************************************************************************
329  *      DRIVER_GetDriverName
330  *
331  */
332 BOOL DRIVER_GetDriverName( LPCSTR device, LPSTR driver, DWORD size )
333 {
334     char *p;
335     size = GetProfileStringA("devices", device, "", driver, size);
336     if(!size) {
337         WARN("Unable to find '%s' in [devices] section of win.ini\n", device);
338         return FALSE;
339     }
340     p = strchr(driver, ',');
341     if(!p)
342     {
343         WARN("'%s' entry in [devices] section of win.ini is malformed.\n", device);
344         return FALSE;
345     }
346     *p = '\0';
347     TRACE("Found '%s' for '%s'\n", driver, device);
348     return TRUE;
349 }
350
351 /*****************************************************************************
352  *      @ [GDI32.100]
353  *
354  * This should thunk to 16-bit and simply call the proc with the given args.
355  */
356 INT WINAPI GDI_CallDevInstall16( FARPROC16 lpfnDevInstallProc, HWND hWnd,
357                                  LPSTR lpModelName, LPSTR OldPort, LPSTR NewPort )
358 {
359     FIXME("(%p, %p, %s, %s, %s)\n", lpfnDevInstallProc, hWnd, lpModelName, OldPort, NewPort );
360     return -1;
361 }
362
363 /*****************************************************************************
364  *      @ [GDI32.101]
365  *
366  * This should load the correct driver for lpszDevice and calls this driver's
367  * ExtDeviceModePropSheet proc.
368  *
369  * Note: The driver calls a callback routine for each property sheet page; these
370  * pages are supposed to be filled into the structure pointed to by lpPropSheet.
371  * The layout of this structure is:
372  *
373  * struct
374  * {
375  *   DWORD  nPages;
376  *   DWORD  unknown;
377  *   HPROPSHEETPAGE  pages[10];
378  * };
379  */
380 INT WINAPI GDI_CallExtDeviceModePropSheet16( HWND hWnd, LPCSTR lpszDevice,
381                                              LPCSTR lpszPort, LPVOID lpPropSheet )
382 {
383     FIXME("(%p, %s, %s, %p)\n", hWnd, lpszDevice, lpszPort, lpPropSheet );
384     return -1;
385 }
386
387 /*****************************************************************************
388  *      @ [GDI32.102]
389  *
390  * This should load the correct driver for lpszDevice and calls this driver's
391  * ExtDeviceMode proc.
392  */
393 INT WINAPI GDI_CallExtDeviceMode16( HWND hwnd,
394                                     LPDEVMODEA lpdmOutput, LPSTR lpszDevice,
395                                     LPSTR lpszPort, LPDEVMODEA lpdmInput,
396                                     LPSTR lpszProfile, DWORD fwMode )
397 {
398     char buf[300];
399     HDC hdc;
400     DC *dc;
401     INT ret = -1;
402     INT (*pExtDeviceMode)(LPSTR,HWND,LPDEVMODEA,LPSTR,LPSTR,LPDEVMODEA,LPSTR,DWORD);
403
404     TRACE("(%p, %p, %s, %s, %p, %s, %ld)\n",
405           hwnd, lpdmOutput, lpszDevice, lpszPort, lpdmInput, lpszProfile, fwMode );
406
407     if(!DRIVER_GetDriverName( lpszDevice, buf, sizeof(buf) )) return -1;
408
409     if (!(hdc = CreateICA( buf, lpszDevice, lpszPort, NULL ))) return -1;
410
411     if ((dc = DC_GetDCPtr( hdc )))
412     {
413         pExtDeviceMode = dc->funcs->pExtDeviceMode;
414         GDI_ReleaseObj( hdc );
415         if (pExtDeviceMode)
416             ret = pExtDeviceMode(buf, hwnd, lpdmOutput, lpszDevice, lpszPort,
417                                             lpdmInput, lpszProfile, fwMode);
418     }
419     DeleteDC( hdc );
420     return ret;
421 }
422
423 /****************************************************************************
424  *      @ [GDI32.103]
425  *
426  * This should load the correct driver for lpszDevice and calls this driver's
427  * AdvancedSetupDialog proc.
428  */
429 INT WINAPI GDI_CallAdvancedSetupDialog16( HWND hwnd, LPSTR lpszDevice,
430                                           LPDEVMODEA devin, LPDEVMODEA devout )
431 {
432     TRACE("(%p, %s, %p, %p)\n", hwnd, lpszDevice, devin, devout );
433     return -1;
434 }
435
436 /*****************************************************************************
437  *      @ [GDI32.104]
438  *
439  * This should load the correct driver for lpszDevice and calls this driver's
440  * DeviceCapabilities proc.
441  */
442 DWORD WINAPI GDI_CallDeviceCapabilities16( LPCSTR lpszDevice, LPCSTR lpszPort,
443                                            WORD fwCapability, LPSTR lpszOutput,
444                                            LPDEVMODEA lpdm )
445 {
446     char buf[300];
447     HDC hdc;
448     DC *dc;
449     INT ret = -1;
450
451     TRACE("(%s, %s, %d, %p, %p)\n", lpszDevice, lpszPort, fwCapability, lpszOutput, lpdm );
452
453     if(!DRIVER_GetDriverName( lpszDevice, buf, sizeof(buf) )) return -1;
454
455     if (!(hdc = CreateICA( buf, lpszDevice, lpszPort, NULL ))) return -1;
456
457     if ((dc = DC_GetDCPtr( hdc )))
458     {
459         if (dc->funcs->pDeviceCapabilities)
460             ret = dc->funcs->pDeviceCapabilities( buf, lpszDevice, lpszPort,
461                                                   fwCapability, lpszOutput, lpdm );
462         GDI_ReleaseObj( hdc );
463     }
464     DeleteDC( hdc );
465     return ret;
466 }