Added CSIDL_MYVIDEO|MYPICTURES|MYMUSIC to _SHRegisterUserShellFolders.
[wine] / dlls / gdi / mfdrv / init.c
1 /*
2  * Metafile driver initialisation 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 <stdarg.h>
22 #include <string.h>
23
24 #include "windef.h"
25 #include "winbase.h"
26 #include "wine/winbase16.h"
27 #include "gdi.h"
28 #include "wownt32.h"
29 #include "gdi_private.h"
30 #include "mfdrv/metafiledrv.h"
31 #include "wine/debug.h"
32
33 WINE_DEFAULT_DEBUG_CHANNEL(metafile);
34
35 static const DC_FUNCTIONS MFDRV_Funcs =
36 {
37     NULL,                            /* pAbortDoc */
38     MFDRV_AbortPath,                 /* pAbortPath */
39     NULL,                            /* pAlphaBlend */
40     NULL,                            /* pAngleArc */
41     MFDRV_Arc,                       /* pArc */
42     NULL,                            /* pArcTo */
43     MFDRV_BeginPath,                 /* pBeginPath */
44     MFDRV_BitBlt,                    /* pBitBlt */
45     NULL,                            /* pChoosePixelFormat */
46     MFDRV_Chord,                     /* pChord */
47     MFDRV_CloseFigure,               /* pCloseFigure */
48     NULL,                            /* pCreateBitmap */
49     NULL,                            /* pCreateDC */
50     NULL,                            /* pCreateDIBSection */
51     NULL,                            /* pDeleteBitmap */
52     NULL,                            /* pDeleteDC */
53     MFDRV_DeleteObject,              /* pDeleteObject */
54     NULL,                            /* pDescribePixelFormat */
55     NULL,                            /* pDeviceCapabilities */
56     MFDRV_Ellipse,                   /* pEllipse */
57     NULL,                            /* pEndDoc */
58     NULL,                            /* pEndPage */
59     MFDRV_EndPath,                   /* pEndPath */
60     NULL,                            /* pEnumDeviceFonts */
61     MFDRV_ExcludeClipRect,           /* pExcludeClipRect */
62     NULL,                            /* pExtDeviceMode */
63     MFDRV_ExtEscape,                 /* pExtEscape */
64     MFDRV_ExtFloodFill,              /* pExtFloodFill */
65     MFDRV_ExtSelectClipRgn,          /* pExtSelectClipRgn */
66     MFDRV_ExtTextOut,                /* pExtTextOut */
67     MFDRV_FillPath,                  /* pFillPath */
68     MFDRV_FillRgn,                   /* pFillRgn */
69     MFDRV_FlattenPath,               /* pFlattenPath */
70     MFDRV_FrameRgn,                  /* pFrameRgn */
71     NULL,                            /* pGdiComment */
72     NULL,                            /* pGetBitmapBits */
73     NULL,                            /* pGetCharWidth */
74     NULL,                            /* pGetDCOrgEx */
75     NULL,                            /* pGetDIBColorTable */
76     NULL,                            /* pGetDIBits */
77     MFDRV_GetDeviceCaps,             /* pGetDeviceCaps */
78     NULL,                            /* pGetDeviceGammaRamp */
79     NULL,                            /* pGetNearestColor */
80     NULL,                            /* pGetPixel */
81     NULL,                            /* pGetPixelFormat */
82     NULL,                            /* pGetSystemPaletteEntries */
83     NULL,                            /* pGetTextExtentPoint */
84     NULL,                            /* pGetTextMetrics */
85     MFDRV_IntersectClipRect,         /* pIntersectClipRect */
86     MFDRV_InvertRgn,                 /* pInvertRgn */
87     MFDRV_LineTo,                    /* pLineTo */
88     NULL,                            /* pModifyWorldTransform */
89     MFDRV_MoveTo,                    /* pMoveTo */
90     MFDRV_OffsetClipRgn,             /* pOffsetClipRgn */
91     MFDRV_OffsetViewportOrg,         /* pOffsetViewportOrg */
92     MFDRV_OffsetWindowOrg,           /* pOffsetWindowOrg */
93     MFDRV_PaintRgn,                  /* pPaintRgn */
94     MFDRV_PatBlt,                    /* pPatBlt */
95     MFDRV_Pie,                       /* pPie */
96     MFDRV_PolyBezier,                /* pPolyBezier */
97     MFDRV_PolyBezierTo,              /* pPolyBezierTo */
98     NULL,                            /* pPolyDraw */
99     MFDRV_PolyPolygon,               /* pPolyPolygon */
100     NULL,                            /* pPolyPolyline */
101     MFDRV_Polygon,                   /* pPolygon */
102     MFDRV_Polyline,                  /* pPolyline */
103     NULL,                            /* pPolylineTo */
104     NULL,                            /* pRealizeDefaultPalette */
105     MFDRV_RealizePalette,            /* pRealizePalette */
106     MFDRV_Rectangle,                 /* pRectangle */
107     NULL,                            /* pResetDC */
108     MFDRV_RestoreDC,                 /* pRestoreDC */
109     MFDRV_RoundRect,                 /* pRoundRect */
110     MFDRV_SaveDC,                    /* pSaveDC */
111     MFDRV_ScaleViewportExt,          /* pScaleViewportExt */
112     MFDRV_ScaleWindowExt,            /* pScaleWindowExt */
113     MFDRV_SelectBitmap,              /* pSelectBitmap */
114     MFDRV_SelectBrush,               /* pSelectBrush */
115     MFDRV_SelectClipPath,            /* pSelectClipPath */
116     MFDRV_SelectFont,                /* pSelectFont */
117     MFDRV_SelectPalette,             /* pSelectPalette */
118     MFDRV_SelectPen,                 /* pSelectPen */
119     NULL,                            /* pSetArcDirection */
120     NULL,                            /* pSetBitmapBits */
121     MFDRV_SetBkColor,                /* pSetBkColor */
122     MFDRV_SetBkMode,                 /* pSetBkMode */
123     NULL,                            /* pSetDCBrushColor*/
124     NULL,                            /* pSetDCOrg */
125     NULL,                            /* pSetDCPenColor*/
126     NULL,                            /* pSetDIBColorTable */
127     NULL,                            /* pSetDIBits */
128     MFDRV_SetDIBitsToDevice,         /* pSetDIBitsToDevice */
129     NULL,                            /* pSetDeviceClipping */
130     NULL,                            /* pSetDeviceGammaRamp */
131     MFDRV_SetMapMode,                /* pSetMapMode */
132     MFDRV_SetMapperFlags,            /* pSetMapperFlags */
133     MFDRV_SetPixel,                  /* pSetPixel */
134     NULL,                            /* pSetPixelFormat */
135     MFDRV_SetPolyFillMode,           /* pSetPolyFillMode */
136     MFDRV_SetROP2,                   /* pSetROP2 */
137     MFDRV_SetRelAbs,                 /* pSetRelAbs */
138     MFDRV_SetStretchBltMode,         /* pSetStretchBltMode */
139     MFDRV_SetTextAlign,              /* pSetTextAlign */
140     MFDRV_SetTextCharacterExtra,     /* pSetTextCharacterExtra */
141     MFDRV_SetTextColor,              /* pSetTextColor */
142     MFDRV_SetTextJustification,      /* pSetTextJustification */
143     MFDRV_SetViewportExt,            /* pSetViewportExt */
144     MFDRV_SetViewportOrg,            /* pSetViewportOrg */
145     MFDRV_SetWindowExt,              /* pSetWindowExt */
146     MFDRV_SetWindowOrg,              /* pSetWindowOrg */
147     NULL,                            /* pSetWorldTransform */
148     NULL,                            /* pStartDoc */
149     NULL,                            /* pStartPage */
150     MFDRV_StretchBlt,                /* pStretchBlt */
151     MFDRV_StretchDIBits,             /* pStretchDIBits */
152     MFDRV_StrokeAndFillPath,         /* pStrokeAndFillPath */
153     MFDRV_StrokePath,                /* pStrokePath */
154     NULL,                            /* pSwapBuffers */
155     MFDRV_WidenPath                  /* pWidenPath */
156 };
157
158
159
160 /**********************************************************************
161  *           MFDRV_AllocMetaFile
162  */
163 static DC *MFDRV_AllocMetaFile(void)
164 {
165     DC *dc;
166     METAFILEDRV_PDEVICE *physDev;
167
168     if (!(dc = DC_AllocDC( &MFDRV_Funcs, METAFILE_DC_MAGIC ))) return NULL;
169
170     physDev = HeapAlloc(GetProcessHeap(),0,sizeof(*physDev));
171     if (!physDev)
172     {
173         GDI_FreeObject( dc->hSelf, dc );
174         return NULL;
175     }
176     dc->physDev = (PHYSDEV)physDev;
177     physDev->hdc = dc->hSelf;
178     physDev->dc = dc;
179
180     if (!(physDev->mh = HeapAlloc( GetProcessHeap(), 0, sizeof(*physDev->mh) )))
181     {
182         HeapFree( GetProcessHeap(), 0, physDev );
183         GDI_FreeObject( dc->hSelf, dc );
184         return NULL;
185     }
186
187     physDev->handles = HeapAlloc(GetProcessHeap(), HEAP_ZERO_MEMORY, HANDLE_LIST_INC * sizeof(physDev->handles[0]));
188     physDev->handles_size = HANDLE_LIST_INC;
189     physDev->cur_handles = 0;
190
191     physDev->hFile = 0;
192
193     physDev->mh->mtHeaderSize   = sizeof(METAHEADER) / sizeof(WORD);
194     physDev->mh->mtVersion      = 0x0300;
195     physDev->mh->mtSize         = physDev->mh->mtHeaderSize;
196     physDev->mh->mtNoObjects    = 0;
197     physDev->mh->mtMaxRecord    = 0;
198     physDev->mh->mtNoParameters = 0;
199
200     return dc;
201 }
202
203
204 /**********************************************************************
205  *           MFDRV_DeleteDC
206  */
207 static BOOL MFDRV_DeleteDC( PHYSDEV dev )
208 {
209     METAFILEDRV_PDEVICE *physDev = (METAFILEDRV_PDEVICE *)dev;
210     DC *dc = physDev->dc;
211     DWORD index;
212
213     HeapFree( GetProcessHeap(), 0, physDev->mh );
214     for(index = 0; index < physDev->handles_size; index++)
215         if(physDev->handles[index])
216             GDI_hdc_not_using_object(physDev->handles[index], physDev->hdc);
217     HeapFree( GetProcessHeap(), 0, physDev->handles );
218     HeapFree( GetProcessHeap(), 0, physDev );
219     dc->physDev = NULL;
220     GDI_FreeObject( dc->hSelf, dc );
221     return TRUE;
222 }
223
224
225 /**********************************************************************
226  *           CreateMetaFileW   (GDI32.@)
227  *
228  *  Create a new DC and associate it with a metafile. Pass a filename
229  *  to create a disk-based metafile, NULL to create a memory metafile.
230  *
231  * PARAMS
232  *  filename [I] Filename of disk metafile
233  *
234  * RETURNS
235  *  A handle to the metafile DC if successful, NULL on failure.
236  */
237 HDC WINAPI CreateMetaFileW( LPCWSTR filename )
238 {
239     HDC ret;
240     DC *dc;
241     METAFILEDRV_PDEVICE *physDev;
242     HANDLE hFile;
243
244     TRACE("'%s'\n", debugstr_w(filename) );
245
246     if (!(dc = MFDRV_AllocMetaFile())) return 0;
247     physDev = (METAFILEDRV_PDEVICE *)dc->physDev;
248
249     if (filename)  /* disk based metafile */
250     {
251         physDev->mh->mtType = METAFILE_DISK;
252         if ((hFile = CreateFileW(filename, GENERIC_WRITE, 0, NULL,
253                                 CREATE_ALWAYS, 0, 0)) == INVALID_HANDLE_VALUE) {
254             MFDRV_DeleteDC( dc->physDev );
255             return 0;
256         }
257         if (!WriteFile( hFile, physDev->mh, sizeof(*physDev->mh), NULL,
258                         NULL )) {
259             MFDRV_DeleteDC( dc->physDev );
260             return 0;
261         }
262         physDev->hFile = hFile;
263
264         /* Grow METAHEADER to include filename */
265         physDev->mh = MF_CreateMetaHeaderDisk(physDev->mh, filename, TRUE);
266     }
267     else  /* memory based metafile */
268         physDev->mh->mtType = METAFILE_MEMORY;
269
270     TRACE("returning %p\n", dc->hSelf);
271     ret = dc->hSelf;
272     GDI_ReleaseObj( dc->hSelf );
273     return ret;
274 }
275
276 /**********************************************************************
277  *          CreateMetaFileA   (GDI32.@)
278  *
279  * See CreateMetaFileW.
280  */
281 HDC WINAPI CreateMetaFileA(LPCSTR filename)
282 {
283     LPWSTR filenameW;
284     DWORD len;
285     HDC hReturnDC;
286
287     if (!filename) return CreateMetaFileW(NULL);
288
289     len = MultiByteToWideChar( CP_ACP, 0, filename, -1, NULL, 0 );
290     filenameW = HeapAlloc( GetProcessHeap(), 0, len*sizeof(WCHAR) );
291     MultiByteToWideChar( CP_ACP, 0, filename, -1, filenameW, len );
292
293     hReturnDC = CreateMetaFileW(filenameW);
294
295     HeapFree( GetProcessHeap(), 0, filenameW );
296
297     return hReturnDC;
298 }
299
300
301 /**********************************************************************
302  *          MFDRV_CloseMetaFile
303  */
304 static DC *MFDRV_CloseMetaFile( HDC hdc )
305 {
306     DC *dc;
307     METAFILEDRV_PDEVICE *physDev;
308
309     TRACE("(%p)\n", hdc );
310
311     if (!(dc = (DC *) GDI_GetObjPtr( hdc, METAFILE_DC_MAGIC ))) return 0;
312     physDev = (METAFILEDRV_PDEVICE *)dc->physDev;
313
314     /* Construct the end of metafile record - this is documented
315      * in SDK Knowledgebase Q99334.
316      */
317
318     if (!MFDRV_MetaParam0(dc->physDev, META_EOF))
319     {
320         MFDRV_DeleteDC( dc->physDev );
321         return 0;
322     }
323
324     if (physDev->mh->mtType == METAFILE_DISK)  /* disk based metafile */
325     {
326         if (SetFilePointer(physDev->hFile, 0, NULL, FILE_BEGIN) != 0) {
327             MFDRV_DeleteDC( dc->physDev );
328             return 0;
329         }
330
331         physDev->mh->mtType = METAFILE_MEMORY; /* This is what windows does */
332         if (!WriteFile(physDev->hFile, (LPSTR)physDev->mh,
333                        sizeof(*physDev->mh), NULL, NULL)) {
334             MFDRV_DeleteDC( dc->physDev );
335             return 0;
336         }
337         CloseHandle(physDev->hFile);
338         physDev->mh->mtType = METAFILE_DISK;
339     }
340
341     return dc;
342 }
343
344 /******************************************************************
345  *           CloseMetaFile     (GDI.126)
346  *
347  * PARAMS
348  *  hdc [I] Metafile DC to close 
349  */
350 HMETAFILE16 WINAPI CloseMetaFile16(HDC16 hdc)
351 {
352     HMETAFILE16 hmf;
353     METAFILEDRV_PDEVICE *physDev;
354     DC *dc = MFDRV_CloseMetaFile(HDC_32(hdc));
355     if (!dc) return 0;
356     physDev = (METAFILEDRV_PDEVICE *)dc->physDev;
357
358     /* Now allocate a global handle for the metafile */
359
360     hmf = MF_Create_HMETAFILE16( physDev->mh );
361
362     physDev->mh = NULL;  /* So it won't be deleted */
363     MFDRV_DeleteDC( dc->physDev );
364     return hmf;
365 }
366
367 /******************************************************************
368  *           CloseMetaFile   (GDI32.@)
369  *
370  *  Stop recording graphics operations in metafile associated with
371  *  hdc and retrieve metafile.
372  *
373  * PARAMS
374  *  hdc [I] Metafile DC to close 
375  *
376  * RETURNS
377  *  Handle of newly created metafile on success, NULL on failure.
378  */
379 HMETAFILE WINAPI CloseMetaFile(HDC hdc)
380 {
381     HMETAFILE hmf;
382     METAFILEDRV_PDEVICE *physDev;
383     DC *dc = MFDRV_CloseMetaFile(hdc);
384     if (!dc) return 0;
385     physDev = (METAFILEDRV_PDEVICE *)dc->physDev;
386
387     /* Now allocate a global handle for the metafile */
388
389     hmf = MF_Create_HMETAFILE( physDev->mh );
390
391     physDev->mh = NULL;  /* So it won't be deleted */
392     MFDRV_DeleteDC( dc->physDev );
393     return hmf;
394 }
395
396
397 /******************************************************************
398  *         MFDRV_WriteRecord
399  *
400  * Warning: this function can change the pointer to the metafile header.
401  */
402 BOOL MFDRV_WriteRecord( PHYSDEV dev, METARECORD *mr, DWORD rlen)
403 {
404     DWORD len, size;
405     METAHEADER *mh;
406     METAFILEDRV_PDEVICE *physDev = (METAFILEDRV_PDEVICE *)dev;
407
408     switch(physDev->mh->mtType)
409     {
410     case METAFILE_MEMORY:
411         len = physDev->mh->mtSize * 2 + rlen;
412         /* reallocate memory if needed */
413         size = HeapSize( GetProcessHeap(), 0, physDev->mh );
414         if (len > size)
415         {
416             /*expand size*/
417             size += size / 2 + rlen;
418             mh = HeapReAlloc( GetProcessHeap(), 0, physDev->mh, size);
419             if (!mh) return FALSE;
420             physDev->mh = mh;
421             TRACE("Reallocated metafile: new size is %ld\n",size);
422         }
423         memcpy((WORD *)physDev->mh + physDev->mh->mtSize, mr, rlen);
424         break;
425     case METAFILE_DISK:
426         TRACE("Writing record to disk\n");
427         if (!WriteFile(physDev->hFile, (char *)mr, rlen, NULL, NULL))
428             return FALSE;
429         break;
430     default:
431         ERR("Unknown metafile type %d\n", physDev->mh->mtType );
432         return FALSE;
433     }
434
435     physDev->mh->mtSize += rlen / 2;
436     physDev->mh->mtMaxRecord = max(physDev->mh->mtMaxRecord, rlen / 2);
437     return TRUE;
438 }
439
440
441 /******************************************************************
442  *         MFDRV_MetaParam0
443  */
444
445 BOOL MFDRV_MetaParam0(PHYSDEV dev, short func)
446 {
447     char buffer[8];
448     METARECORD *mr = (METARECORD *)&buffer;
449
450     mr->rdSize = 3;
451     mr->rdFunction = func;
452     return MFDRV_WriteRecord( dev, mr, mr->rdSize * 2);
453 }
454
455
456 /******************************************************************
457  *         MFDRV_MetaParam1
458  */
459 BOOL MFDRV_MetaParam1(PHYSDEV dev, short func, short param1)
460 {
461     char buffer[8];
462     METARECORD *mr = (METARECORD *)&buffer;
463
464     mr->rdSize = 4;
465     mr->rdFunction = func;
466     *(mr->rdParm) = param1;
467     return MFDRV_WriteRecord( dev, mr, mr->rdSize * 2);
468 }
469
470
471 /******************************************************************
472  *         MFDRV_MetaParam2
473  */
474 BOOL MFDRV_MetaParam2(PHYSDEV dev, short func, short param1, short param2)
475 {
476     char buffer[10];
477     METARECORD *mr = (METARECORD *)&buffer;
478
479     mr->rdSize = 5;
480     mr->rdFunction = func;
481     *(mr->rdParm) = param2;
482     *(mr->rdParm + 1) = param1;
483     return MFDRV_WriteRecord( dev, mr, mr->rdSize * 2);
484 }
485
486
487 /******************************************************************
488  *         MFDRV_MetaParam4
489  */
490
491 BOOL MFDRV_MetaParam4(PHYSDEV dev, short func, short param1, short param2,
492                       short param3, short param4)
493 {
494     char buffer[14];
495     METARECORD *mr = (METARECORD *)&buffer;
496
497     mr->rdSize = 7;
498     mr->rdFunction = func;
499     *(mr->rdParm) = param4;
500     *(mr->rdParm + 1) = param3;
501     *(mr->rdParm + 2) = param2;
502     *(mr->rdParm + 3) = param1;
503     return MFDRV_WriteRecord( dev, mr, mr->rdSize * 2);
504 }
505
506
507 /******************************************************************
508  *         MFDRV_MetaParam6
509  */
510
511 BOOL MFDRV_MetaParam6(PHYSDEV dev, short func, short param1, short param2,
512                       short param3, short param4, short param5, short param6)
513 {
514     char buffer[18];
515     METARECORD *mr = (METARECORD *)&buffer;
516
517     mr->rdSize = 9;
518     mr->rdFunction = func;
519     *(mr->rdParm) = param6;
520     *(mr->rdParm + 1) = param5;
521     *(mr->rdParm + 2) = param4;
522     *(mr->rdParm + 3) = param3;
523     *(mr->rdParm + 4) = param2;
524     *(mr->rdParm + 5) = param1;
525     return MFDRV_WriteRecord( dev, mr, mr->rdSize * 2);
526 }
527
528
529 /******************************************************************
530  *         MFDRV_MetaParam8
531  */
532 BOOL MFDRV_MetaParam8(PHYSDEV dev, short func, short param1, short param2,
533                       short param3, short param4, short param5,
534                       short param6, short param7, short param8)
535 {
536     char buffer[22];
537     METARECORD *mr = (METARECORD *)&buffer;
538
539     mr->rdSize = 11;
540     mr->rdFunction = func;
541     *(mr->rdParm) = param8;
542     *(mr->rdParm + 1) = param7;
543     *(mr->rdParm + 2) = param6;
544     *(mr->rdParm + 3) = param5;
545     *(mr->rdParm + 4) = param4;
546     *(mr->rdParm + 5) = param3;
547     *(mr->rdParm + 6) = param2;
548     *(mr->rdParm + 7) = param1;
549     return MFDRV_WriteRecord( dev, mr, mr->rdSize * 2);
550 }
551
552
553 /**********************************************************************
554  *           MFDRV_ExtEscape
555  */
556 INT MFDRV_ExtEscape( PHYSDEV dev, INT nEscape, INT cbInput, LPCVOID in_data,
557                      INT cbOutput, LPVOID out_data )
558 {
559     METARECORD *mr;
560     DWORD len;
561     INT ret;
562
563     len = sizeof(*mr) + sizeof(WORD) + ((cbInput + 1) & ~1);
564     mr = HeapAlloc(GetProcessHeap(), HEAP_ZERO_MEMORY, len);
565     mr->rdSize = len / 2;
566     mr->rdFunction = META_ESCAPE;
567     mr->rdParm[0] = nEscape;
568     mr->rdParm[1] = cbInput;
569     memcpy(&(mr->rdParm[2]), in_data, cbInput);
570     ret = MFDRV_WriteRecord( dev, mr, len);
571     HeapFree(GetProcessHeap(), 0, mr);
572     return ret;
573 }
574
575
576 /******************************************************************
577  *         MFDRV_GetDeviceCaps
578  *
579  *A very simple implementation that returns DT_METAFILE
580  */
581 INT MFDRV_GetDeviceCaps(PHYSDEV dev, INT cap)
582 {
583     switch(cap)
584     {
585     case TECHNOLOGY:
586         return DT_METAFILE;
587     case TEXTCAPS:
588         return 0;
589     default:
590         TRACE(" unsupported capability %d, will return 0\n", cap );
591     }
592     return 0;
593 }