1 /*
2 * metafile driver text functions
3 *
4 * Copyright 1993, 1994 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., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301, USA
19 */
20
21 #include <stdarg.h>
22 #include <string.h>
23
24 #include "windef.h"
25 #include "winbase.h"
26 #include "wine/wingdi16.h"
27 #include "mfdrv/metafiledrv.h"
28 #include "wine/debug.h"
29
30 WINE_DEFAULT_DEBUG_CHANNEL(metafile);
31
32
33 /******************************************************************
34 * MFDRV_MetaExtTextOut
35 */
MFDRV_MetaExtTextOut(PHYSDEV dev,short x,short y,UINT16 flags,const RECT16 * rect,LPCSTR str,short count,const INT16 * lpDx)36 static BOOL MFDRV_MetaExtTextOut( PHYSDEV dev, short x, short y, UINT16 flags,
37 const RECT16 *rect, LPCSTR str, short count,
38 const INT16 *lpDx)
39 {
40 BOOL ret;
41 DWORD len;
42 METARECORD *mr;
43 BOOL isrect = flags & (ETO_CLIPPED | ETO_OPAQUE);
44
45 len = sizeof(METARECORD) + (((count + 1) >> 1) * 2) + 2 * sizeof(short)
46 + sizeof(UINT16);
47 if (isrect)
48 len += sizeof(RECT16);
49 if (lpDx)
50 len+=count*sizeof(INT16);
51 if (!(mr = HeapAlloc( GetProcessHeap(), HEAP_ZERO_MEMORY, len)))
52 return FALSE;
53
54 mr->rdSize = len / 2;
55 mr->rdFunction = META_EXTTEXTOUT;
56 *(mr->rdParm) = y;
57 *(mr->rdParm + 1) = x;
58 *(mr->rdParm + 2) = count;
59 *(mr->rdParm + 3) = flags;
60 if (isrect) memcpy(mr->rdParm + 4, rect, sizeof(RECT16));
61 memcpy(mr->rdParm + (isrect ? 8 : 4), str, count);
62 if (lpDx)
63 memcpy(mr->rdParm + (isrect ? 8 : 4) + ((count + 1) >> 1),lpDx,
64 count*sizeof(INT16));
65 ret = MFDRV_WriteRecord( dev, mr, mr->rdSize * 2);
66 HeapFree( GetProcessHeap(), 0, mr);
67 return ret;
68 }
69
70
71
72 /***********************************************************************
73 * MFDRV_ExtTextOut
74 */
MFDRV_ExtTextOut(PHYSDEV dev,INT x,INT y,UINT flags,const RECT * lprect,LPCWSTR str,UINT count,const INT * lpDx)75 BOOL MFDRV_ExtTextOut( PHYSDEV dev, INT x, INT y, UINT flags,
76 const RECT *lprect, LPCWSTR str, UINT count, const INT *lpDx )
77 {
78 RECT16 rect16;
79 LPINT16 lpdx16 = NULL;
80 BOOL ret;
81 unsigned int i, j;
82 LPSTR ascii;
83 DWORD len;
84 CHARSETINFO csi;
85 int charset = GetTextCharset( dev->hdc );
86 UINT cp = CP_ACP;
87
88 if(TranslateCharsetInfo(ULongToPtr(charset), &csi, TCI_SRCCHARSET))
89 cp = csi.ciACP;
90 else {
91 switch(charset) {
92 case OEM_CHARSET:
93 cp = GetOEMCP();
94 break;
95 case DEFAULT_CHARSET:
96 cp = GetACP();
97 break;
98
99 case VISCII_CHARSET:
100 case TCVN_CHARSET:
101 case KOI8_CHARSET:
102 case ISO3_CHARSET:
103 case ISO4_CHARSET:
104 case ISO10_CHARSET:
105 case CELTIC_CHARSET:
106 /* FIXME: These have no place here, but because x11drv
107 enumerates fonts with these (made up) charsets some apps
108 might use them and then the FIXME below would become
109 annoying. Now we could pick the intended codepage for
110 each of these, but since it's broken anyway we'll just
111 use CP_ACP and hope it'll go away...
112 */
113 cp = CP_ACP;
114 break;
115
116
117 default:
118 FIXME("Can't find codepage for charset %d\n", charset);
119 break;
120 }
121 }
122
123
124 TRACE("cp == %d\n", cp);
125 len = WideCharToMultiByte(cp, 0, str, count, NULL, 0, NULL, NULL);
126 ascii = HeapAlloc(GetProcessHeap(), 0, len);
127 WideCharToMultiByte(cp, 0, str, count, ascii, len, NULL, NULL);
128 TRACE("mapped %s -> %s\n", debugstr_wn(str, count), debugstr_an(ascii, len));
129
130
131 if (lprect)
132 {
133 rect16.left = lprect->left;
134 rect16.top = lprect->top;
135 rect16.right = lprect->right;
136 rect16.bottom = lprect->bottom;
137 }
138
139 if(lpDx) {
140 lpdx16 = HeapAlloc( GetProcessHeap(), 0, sizeof(INT16)*len );
141 for(i = j = 0; i < len; )
142 if(IsDBCSLeadByteEx(cp, ascii[i])) {
143 lpdx16[i++] = lpDx[j++];
144 lpdx16[i++] = 0;
145 } else
146 lpdx16[i++] = lpDx[j++];
147 }
148
149 ret = MFDRV_MetaExtTextOut(dev,x,y,flags,lprect?&rect16:NULL,ascii,len,lpdx16);
150 HeapFree( GetProcessHeap(), 0, ascii );
151 HeapFree( GetProcessHeap(), 0, lpdx16 );
152 return ret;
153 }
154