Added LGPL standard comment, and copyright notices where necessary.
[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 <string.h>
22 #include "winbase.h"
23 #include "winreg.h"
24 #include "ntddk.h"
25
26 #include "gdi.h"
27 #include "win16drv.h"
28 #include "wine/debug.h"
29
30 WINE_DEFAULT_DEBUG_CHANNEL(driver);
31
32 struct graphics_driver
33 {
34     struct graphics_driver *next;
35     struct graphics_driver *prev;
36     HMODULE                 module;  /* module handle */
37     unsigned int            count;   /* reference count */
38     DC_FUNCTIONS            funcs;
39 };
40
41 static struct graphics_driver *first_driver;
42 static struct graphics_driver *display_driver;
43 static const DC_FUNCTIONS *win16_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(BitmapBits);
73     GET_FUNC(ChoosePixelFormat);
74     GET_FUNC(Chord);
75     GET_FUNC(CloseFigure);
76     GET_FUNC(CreateBitmap);
77     GET_FUNC(CreateDC);
78     GET_FUNC(CreateDIBSection);
79     GET_FUNC(DeleteDC);
80     GET_FUNC(DeleteObject);
81     GET_FUNC(DescribePixelFormat);
82     GET_FUNC(DeviceCapabilities);
83     GET_FUNC(Ellipse);
84     GET_FUNC(EndDoc);
85     GET_FUNC(EndPage);
86     GET_FUNC(EndPath);
87     GET_FUNC(EnumDeviceFonts);
88     GET_FUNC(ExcludeClipRect);
89     GET_FUNC(ExtDeviceMode);
90     GET_FUNC(ExtEscape);
91     GET_FUNC(ExtFloodFill);
92     GET_FUNC(ExtTextOut);
93     GET_FUNC(FillPath);
94     GET_FUNC(FillRgn);
95     GET_FUNC(FlattenPath);
96     GET_FUNC(FrameRgn);
97     GET_FUNC(GetCharWidth);
98     GET_FUNC(GetDCOrgEx);
99     GET_FUNC(GetDeviceCaps);
100     GET_FUNC(GetDeviceGammaRamp);
101     GET_FUNC(GetPixel);
102     GET_FUNC(GetPixelFormat);
103     GET_FUNC(GetTextExtentPoint);
104     GET_FUNC(GetTextMetrics);
105     GET_FUNC(IntersectClipRect);
106     GET_FUNC(InvertRgn);
107     GET_FUNC(LineTo);
108     GET_FUNC(MoveTo);
109     GET_FUNC(OffsetClipRgn);
110     GET_FUNC(OffsetViewportOrg);
111     GET_FUNC(OffsetWindowOrg);
112     GET_FUNC(PaintRgn);
113     GET_FUNC(PatBlt);
114     GET_FUNC(Pie);
115     GET_FUNC(PolyBezier);
116     GET_FUNC(PolyBezierTo);
117     GET_FUNC(PolyDraw);
118     GET_FUNC(PolyPolygon);
119     GET_FUNC(PolyPolyline);
120     GET_FUNC(Polygon);
121     GET_FUNC(Polyline);
122     GET_FUNC(PolylineTo);
123     GET_FUNC(RealizePalette);
124     GET_FUNC(Rectangle);
125     GET_FUNC(RestoreDC);
126     GET_FUNC(RoundRect);
127     GET_FUNC(SaveDC);
128     GET_FUNC(ScaleViewportExt);
129     GET_FUNC(ScaleWindowExt);
130     GET_FUNC(SelectClipPath);
131     GET_FUNC(SelectClipRgn);
132     GET_FUNC(SelectObject);
133     GET_FUNC(SelectPalette);
134     GET_FUNC(SetBkColor);
135     GET_FUNC(SetBkMode);
136     GET_FUNC(SetDIBitsToDevice);
137     GET_FUNC(SetDeviceClipping);
138     GET_FUNC(SetDeviceGammaRamp);
139     GET_FUNC(SetMapMode);
140     GET_FUNC(SetMapperFlags);
141     GET_FUNC(SetPixel);
142     GET_FUNC(SetPixelFormat);
143     GET_FUNC(SetPolyFillMode);
144     GET_FUNC(SetROP2);
145     GET_FUNC(SetRelAbs);
146     GET_FUNC(SetStretchBltMode);
147     GET_FUNC(SetTextAlign);
148     GET_FUNC(SetTextCharacterExtra);
149     GET_FUNC(SetTextColor);
150     GET_FUNC(SetTextJustification);
151     GET_FUNC(SetViewportExt);
152     GET_FUNC(SetViewportOrg);
153     GET_FUNC(SetWindowExt);
154     GET_FUNC(SetWindowOrg);
155     GET_FUNC(StartDoc);
156     GET_FUNC(StartPage);
157     GET_FUNC(StretchBlt);
158     GET_FUNC(StretchDIBits);
159     GET_FUNC(StrokeAndFillPath);
160     GET_FUNC(StrokePath);
161     GET_FUNC(SwapBuffers);
162     GET_FUNC(WidenPath);
163 #undef GET_FUNC
164
165     /* add it to the list */
166     driver->prev = NULL;
167     if ((driver->next = first_driver)) driver->next->prev = driver;
168     first_driver = driver;
169     return driver;
170 }
171
172
173 /**********************************************************************
174  *           load_display_driver
175  *
176  * Special case for loading the display driver: get the name from the config file
177  */
178 static struct graphics_driver *load_display_driver(void)
179 {
180     char buffer[MAX_PATH];
181     HMODULE module;
182     HKEY hkey;
183
184     if (display_driver)  /* already loaded */
185     {
186         display_driver->count++;
187         return display_driver;
188     }
189
190     strcpy( buffer, "x11drv" );  /* default value */
191     if (!RegOpenKeyA( HKEY_LOCAL_MACHINE, "Software\\Wine\\Wine\\Config\\Wine", &hkey ))
192     {
193         DWORD type, count = sizeof(buffer);
194         RegQueryValueExA( hkey, "GraphicsDriver", 0, &type, buffer, &count );
195         RegCloseKey( hkey );
196     }
197
198     if (!(module = LoadLibraryA( buffer )))
199     {
200         MESSAGE( "Could not load graphics driver '%s'\n", buffer );
201         return NULL;
202     }
203
204     if (!(display_driver = create_driver( module )))
205     {
206         MESSAGE( "Could not create graphics driver '%s'\n", buffer );
207         FreeLibrary( module );
208         return NULL;
209     }
210
211     display_driver->count++;  /* we don't want to free it */
212     return display_driver;
213 }
214
215
216 /**********************************************************************
217  *           DRIVER_load_driver
218  */
219 const DC_FUNCTIONS *DRIVER_load_driver( LPCSTR name )
220 {
221     HMODULE module;
222     struct graphics_driver *driver;
223
224     RtlEnterCriticalSection( &driver_section );
225
226     /* display driver is a special case */
227     if (!strcasecmp( name, "display" ))
228     {
229         driver = load_display_driver();
230         RtlLeaveCriticalSection( &driver_section );
231         return &driver->funcs;
232     }
233
234     if ((module = GetModuleHandleA( name )))
235     {
236         for (driver = first_driver; driver; driver = driver->next)
237         {
238             if (driver->module == module)
239             {
240                 driver->count++;
241                 RtlLeaveCriticalSection( &driver_section );
242                 return &driver->funcs;
243             }
244         }
245     }
246
247     if (!(module = LoadLibraryA( name )))
248     {
249         if (!win16_driver) win16_driver = WIN16DRV_Init();
250         RtlLeaveCriticalSection( &driver_section );
251         return win16_driver;
252     }
253
254     if (!(driver = create_driver( module )))
255     {
256         FreeLibrary( module );
257         RtlLeaveCriticalSection( &driver_section );
258         return NULL;
259     }
260
261     TRACE( "loaded driver %p for %s\n", driver, name );
262     RtlLeaveCriticalSection( &driver_section );
263     return &driver->funcs;
264 }
265
266
267 /**********************************************************************
268  *           DRIVER_get_driver
269  *
270  * Get a new copy of an existing driver.
271  */
272 const DC_FUNCTIONS *DRIVER_get_driver( const DC_FUNCTIONS *funcs )
273 {
274     struct graphics_driver *driver;
275
276     RtlEnterCriticalSection( &driver_section );
277     if (funcs != win16_driver)
278     {
279         for (driver = first_driver; driver; driver = driver->next)
280             if (&driver->funcs == funcs) break;
281         if (!driver) ERR( "driver not found, trouble ahead\n" );
282         driver->count++;
283     }
284     RtlLeaveCriticalSection( &driver_section );
285     return funcs;
286 }
287
288
289 /**********************************************************************
290  *           DRIVER_release_driver
291  *
292  * Release a driver by decrementing ref count and freeing it if needed.
293  */
294 void DRIVER_release_driver( const DC_FUNCTIONS *funcs )
295 {
296     struct graphics_driver *driver;
297
298     RtlEnterCriticalSection( &driver_section );
299
300     if (funcs == win16_driver) goto done;
301
302     for (driver = first_driver; driver; driver = driver->next)
303         if (&driver->funcs == funcs) break;
304
305     if (!driver) goto done;
306     if (--driver->count) goto done;
307
308     /* removed last reference, free it */
309     if (driver->next) driver->next->prev = driver->prev;
310     if (driver->prev) driver->prev->next = driver->next;
311     else first_driver = driver->next;
312     if (driver == display_driver) display_driver = NULL;
313
314     FreeLibrary( driver->module );
315     HeapFree( GetProcessHeap(), 0, driver );
316  done:
317     RtlLeaveCriticalSection( &driver_section );
318 }
319
320
321 /*****************************************************************************
322  *      DRIVER_GetDriverName
323  *
324  */
325 BOOL DRIVER_GetDriverName( LPCSTR device, LPSTR driver, DWORD size )
326 {
327     char *p;
328     size = GetProfileStringA("devices", device, "", driver, size);
329     if(!size) {
330         WARN("Unable to find '%s' in [devices] section of win.ini\n", device);
331         return FALSE;
332     }
333     p = strchr(driver, ',');
334     if(!p)
335     {
336         WARN("'%s' entry in [devices] section of win.ini is malformed.\n", device);
337         return FALSE;
338     }
339     *p = '\0';
340     TRACE("Found '%s' for '%s'\n", driver, device);
341     return TRUE;
342 }
343
344 /*****************************************************************************
345  *      @ [GDI32.100]
346  *
347  * This should thunk to 16-bit and simply call the proc with the given args.
348  */
349 INT WINAPI GDI_CallDevInstall16( FARPROC16 lpfnDevInstallProc, HWND hWnd,
350                                  LPSTR lpModelName, LPSTR OldPort, LPSTR NewPort )
351 {
352     FIXME("(%p, %04x, %s, %s, %s)\n", lpfnDevInstallProc, hWnd, lpModelName, OldPort, NewPort );
353     return -1;
354 }
355
356 /*****************************************************************************
357  *      @ [GDI32.101]
358  *
359  * This should load the correct driver for lpszDevice and calls this driver's
360  * ExtDeviceModePropSheet proc. 
361  *
362  * Note: The driver calls a callback routine for each property sheet page; these 
363  * pages are supposed to be filled into the structure pointed to by lpPropSheet.
364  * The layout of this structure is:
365  * 
366  * struct
367  * {
368  *   DWORD  nPages;
369  *   DWORD  unknown;
370  *   HPROPSHEETPAGE  pages[10];
371  * };
372  */
373 INT WINAPI GDI_CallExtDeviceModePropSheet16( HWND hWnd, LPCSTR lpszDevice,
374                                              LPCSTR lpszPort, LPVOID lpPropSheet )
375 {
376     FIXME("(%04x, %s, %s, %p)\n", hWnd, lpszDevice, lpszPort, lpPropSheet );
377     return -1;
378 }
379
380 /*****************************************************************************
381  *      @ [GDI32.102]
382  *
383  * This should load the correct driver for lpszDevice and calls this driver's
384  * ExtDeviceMode proc.
385  */
386 INT WINAPI GDI_CallExtDeviceMode16( HWND hwnd,
387                                     LPDEVMODEA lpdmOutput, LPSTR lpszDevice,
388                                     LPSTR lpszPort, LPDEVMODEA lpdmInput,
389                                     LPSTR lpszProfile, DWORD fwMode )
390 {
391     char buf[300];
392     HDC hdc;
393     DC *dc;
394     INT ret = -1;
395     INT (*pExtDeviceMode)(LPSTR,HWND,LPDEVMODEA,LPSTR,LPSTR,LPDEVMODEA,LPSTR,DWORD);
396
397     TRACE("(%04x, %p, %s, %s, %p, %s, %ld)\n",
398           hwnd, lpdmOutput, lpszDevice, lpszPort, lpdmInput, lpszProfile, fwMode );
399
400     if(!DRIVER_GetDriverName( lpszDevice, buf, sizeof(buf) )) return -1;
401
402     if (!(hdc = CreateICA( buf, lpszDevice, lpszPort, NULL ))) return -1;
403
404     if ((dc = DC_GetDCPtr( hdc )))
405     {
406         pExtDeviceMode = dc->funcs->pExtDeviceMode;
407         GDI_ReleaseObj( hdc );
408         if (pExtDeviceMode)
409             ret = pExtDeviceMode(buf, hwnd, lpdmOutput, lpszDevice, lpszPort,
410                                             lpdmInput, lpszProfile, fwMode);
411     }
412     DeleteDC( hdc );
413     return ret;
414 }
415
416 /****************************************************************************
417  *      @ [GDI32.103]
418  *
419  * This should load the correct driver for lpszDevice and calls this driver's
420  * AdvancedSetupDialog proc.
421  */
422 INT WINAPI GDI_CallAdvancedSetupDialog16( HWND hwnd, LPSTR lpszDevice,
423                                           LPDEVMODEA devin, LPDEVMODEA devout )
424 {
425     TRACE("(%04x, %s, %p, %p)\n", hwnd, lpszDevice, devin, devout );
426     return -1;
427 }
428
429 /*****************************************************************************
430  *      @ [GDI32.104]
431  *
432  * This should load the correct driver for lpszDevice and calls this driver's
433  * DeviceCapabilities proc.
434  */
435 DWORD WINAPI GDI_CallDeviceCapabilities16( LPCSTR lpszDevice, LPCSTR lpszPort,
436                                            WORD fwCapability, LPSTR lpszOutput,
437                                            LPDEVMODEA lpdm )
438 {
439     char buf[300];
440     HDC hdc;
441     DC *dc;
442     INT ret = -1;
443
444     TRACE("(%s, %s, %d, %p, %p)\n", lpszDevice, lpszPort, fwCapability, lpszOutput, lpdm );
445
446     if(!DRIVER_GetDriverName( lpszDevice, buf, sizeof(buf) )) return -1;
447
448     if (!(hdc = CreateICA( buf, lpszDevice, lpszPort, NULL ))) return -1;
449
450     if ((dc = DC_GetDCPtr( hdc )))
451     {
452         if (dc->funcs->pDeviceCapabilities)
453             ret = dc->funcs->pDeviceCapabilities( buf, lpszDevice, lpszPort,
454                                                   fwCapability, lpszOutput, lpdm );
455         GDI_ReleaseObj( hdc );
456     }
457     DeleteDC( hdc );
458     return ret;
459 }