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