gdi32: Implement FontIsLinked as a standard driver entry point.
[wine] / dlls / winex11.drv / text.c
1 /*
2  * X11 graphics 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 "config.h"
22
23 #include <stdarg.h>
24 #include <stdlib.h>
25 #include <math.h>
26
27 #include "windef.h"
28 #include "winbase.h"
29 #include "x11font.h"
30 #include "wine/debug.h"
31
32 WINE_DEFAULT_DEBUG_CHANNEL(text);
33
34 #define IROUND(x) (int)((x)>0? (x)+0.5 : (x) - 0.5)
35
36
37 /***********************************************************************
38  *           X11DRV_ExtTextOut
39  */
40 BOOL X11DRV_ExtTextOut( PHYSDEV dev, INT x, INT y, UINT flags,
41                         const RECT *lprect, LPCWSTR wstr, UINT count, const INT *lpDx )
42 {
43     X11DRV_PDEVICE *physDev = get_x11drv_dev( dev );
44     RGNDATA *saved_region = NULL;
45     unsigned int i;
46     fontObject*         pfo = XFONT_GetFontObject( physDev->font );
47     XFontStruct*        font;
48     BOOL                rotated = FALSE;
49     XChar2b             *str2b = NULL;
50     BOOL                dibUpdateFlag = FALSE;
51     BOOL                result = TRUE;
52
53     if (!pfo)
54     {
55         dev = GET_NEXT_PHYSDEV( dev, pExtTextOut );
56         return dev->funcs->pExtTextOut( dev, x, y, flags, lprect, wstr, count, lpDx );
57     }
58
59     if (!X11DRV_SetupGCForText( physDev )) return TRUE;
60
61     font = pfo->fs;
62
63     if (pfo->lf.lfEscapement && pfo->lpX11Trans)
64         rotated = TRUE;
65
66     TRACE("hdc=%p df=%04x %d,%d rc %s %s, %d  flags=%d lpDx=%p\n",
67           dev->hdc, (UINT16)physDev->font, x, y, wine_dbgstr_rect(lprect),
68           debugstr_wn (wstr, count), count, flags, lpDx);
69
70       /* Draw the rectangle */
71
72     if (flags & ETO_OPAQUE)
73     {
74         X11DRV_LockDIBSection( physDev, DIB_Status_GdiMod );
75         dibUpdateFlag = TRUE;
76         wine_tsx11_lock();
77         XSetForeground( gdi_display, physDev->gc, physDev->backgroundPixel );
78         XFillRectangle( gdi_display, physDev->drawable, physDev->gc,
79                         physDev->dc_rect.left + lprect->left, physDev->dc_rect.top + lprect->top,
80                         lprect->right - lprect->left, lprect->bottom - lprect->top );
81         wine_tsx11_unlock();
82     }
83     if (!count) goto END;  /* Nothing more to do */
84
85
86       /* Set the clip region */
87
88     if (flags & ETO_CLIPPED)
89     {
90         HRGN clip_region = CreateRectRgnIndirect( lprect );
91         saved_region = add_extra_clipping_region( physDev, clip_region );
92         DeleteObject( clip_region );
93     }
94
95       /* Draw the text background if necessary */
96
97     if (!dibUpdateFlag)
98     {
99         X11DRV_LockDIBSection( physDev, DIB_Status_GdiMod );
100         dibUpdateFlag = TRUE;
101     }
102
103
104     /* Draw the text (count > 0 verified) */
105     if (!(str2b = X11DRV_cptable[pfo->fi->cptable].punicode_to_char2b( pfo, wstr, count )))
106     {
107         result = FALSE;
108         goto END;
109     }
110
111     wine_tsx11_lock();
112     XSetForeground( gdi_display, physDev->gc, physDev->textPixel );
113     wine_tsx11_unlock();
114     if(!rotated)
115     {
116         if (!lpDx)
117         {
118             X11DRV_cptable[pfo->fi->cptable].pDrawString(
119                            pfo, gdi_display, physDev->drawable, physDev->gc,
120                            physDev->dc_rect.left + x, physDev->dc_rect.top + y, str2b, count );
121         }
122         else
123         {
124             XTextItem16 *items;
125
126             items = HeapAlloc( GetProcessHeap(), 0, count * sizeof(XTextItem16) );
127             if(items == NULL)
128             {
129                 result = FALSE;
130                 goto END;
131             }
132             items[0].chars = str2b;
133             items[0].delta = 0;
134             items[0].nchars = 1;
135             items[0].font = None;
136             for(i = 1; i < count; i++)
137             {
138                 items[i].chars  = str2b + i;
139                 items[i].delta  = (flags & ETO_PDY) ? lpDx[(i - 1) * 2] : lpDx[i - 1];
140                 items[i].delta -= X11DRV_cptable[pfo->fi->cptable].pTextWidth( pfo, str2b + i - 1, 1 );
141                 items[i].nchars = 1;
142                 items[i].font   = None;
143             }
144             X11DRV_cptable[pfo->fi->cptable].pDrawText( pfo, gdi_display,
145                                   physDev->drawable, physDev->gc,
146                                   physDev->dc_rect.left + x, physDev->dc_rect.top + y, items, count );
147             HeapFree( GetProcessHeap(), 0, items );
148         }
149     }
150     else /* rotated */
151     {
152         /* have to render character by character. */
153         double offset = 0.0;
154         UINT i;
155
156         for (i=0; i<count; i++)
157         {
158             int char_metric_offset = str2b[i].byte2 + (str2b[i].byte1 << 8)
159                 - font->min_char_or_byte2;
160             int x_i = IROUND((double) (physDev->dc_rect.left + x) + offset *
161                              pfo->lpX11Trans->a / pfo->lpX11Trans->pixelsize );
162             int y_i = IROUND((double) (physDev->dc_rect.top + y) - offset *
163                              pfo->lpX11Trans->b / pfo->lpX11Trans->pixelsize );
164
165             X11DRV_cptable[pfo->fi->cptable].pDrawString(
166                                     pfo, gdi_display, physDev->drawable, physDev->gc,
167                                     x_i, y_i, &str2b[i], 1);
168             if (lpDx)
169             {
170                 offset += (flags & ETO_PDY) ? lpDx[i * 2] : lpDx[i];
171             }
172             else
173             {
174                 offset += (double) (font->per_char ?
175                                     font->per_char[char_metric_offset].attributes:
176                                     font->min_bounds.attributes)
177                     * pfo->lpX11Trans->pixelsize / 1000.0;
178             }
179         }
180     }
181
182 END:
183     HeapFree( GetProcessHeap(), 0, str2b );
184     if (dibUpdateFlag) X11DRV_UnlockDIBSection( physDev, TRUE );
185     restore_clipping_region( physDev, saved_region );
186     return result;
187 }
188
189
190 /***********************************************************************
191  *           X11DRV_GetTextExtentExPoint
192  */
193 BOOL X11DRV_GetTextExtentExPoint( PHYSDEV dev, LPCWSTR str, INT count,
194                                   INT maxExt, LPINT lpnFit, LPINT alpDx, LPSIZE size )
195 {
196     X11DRV_PDEVICE *physDev = get_x11drv_dev( dev );
197     fontObject* pfo = XFONT_GetFontObject( physDev->font );
198
199     TRACE("%s %d\n", debugstr_wn(str,count), count);
200     if( pfo ) {
201         XChar2b *p = X11DRV_cptable[pfo->fi->cptable].punicode_to_char2b( pfo, str, count );
202         if (!p) return FALSE;
203         if( !pfo->lpX11Trans ) {
204             int dir, ascent, descent;
205             int info_width;
206             X11DRV_cptable[pfo->fi->cptable].pTextExtents( pfo, p,
207                                 count, &dir, &ascent, &descent, &info_width,
208                                 maxExt, lpnFit, alpDx );
209
210           size->cx = info_width;
211           size->cy = pfo->fs->ascent + pfo->fs->descent;
212         } else {
213             INT i;
214             INT nfit = 0;
215             float x = 0.0, y = 0.0;
216             float scaled_x = 0.0, pixsize = pfo->lpX11Trans->pixelsize;
217             /* FIXME: Deal with *_char_or_byte2 != 0 situations */
218             for(i = 0; i < count; i++) {
219                 x += pfo->fs->per_char ?
220            pfo->fs->per_char[p[i].byte2 - pfo->fs->min_char_or_byte2].attributes :
221            pfo->fs->min_bounds.attributes;
222                 scaled_x = x * pixsize / 1000.0;
223                 if (alpDx)
224                     alpDx[i] = scaled_x;
225                 if (scaled_x <= maxExt)
226                     ++nfit;
227             }
228             y = pfo->lpX11Trans->RAW_ASCENT + pfo->lpX11Trans->RAW_DESCENT;
229             TRACE("x = %f y = %f\n", x, y);
230             size->cx = x * pfo->lpX11Trans->pixelsize / 1000.0;
231             size->cy = y * pfo->lpX11Trans->pixelsize / 1000.0;
232             if (lpnFit)
233                 *lpnFit = nfit;
234         }
235         size->cx *= pfo->rescale;
236         size->cy *= pfo->rescale;
237         HeapFree( GetProcessHeap(), 0, p );
238         return TRUE;
239     }
240
241     dev = GET_NEXT_PHYSDEV( dev, pGetTextExtentExPoint );
242     return dev->funcs->pGetTextExtentExPoint( dev, str, count, maxExt, lpnFit, alpDx, size );
243 }