2 * X11 codepage handling
4 * Copyright 2000 Hidenori Takeshima <hidenori@a2.ctktv.ne.jp>
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.
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.
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
30 #include "wine/debug.h"
32 WINE_DEFAULT_DEBUG_CHANNEL(text
);
34 /***********************************************************************
35 * IsLegalDBCSChar for cp932/936/949/950/euc
38 int IsLegalDBCSChar_cp932( BYTE lead
, BYTE trail
)
40 return ( ( ( lead
>= (BYTE
)0x81 && lead
<= (BYTE
)0x9f ) ||
41 ( lead
>= (BYTE
)0xe0 && lead
<= (BYTE
)0xfc ) ) &&
42 ( ( trail
>= (BYTE
)0x40 && trail
<= (BYTE
)0x7e ) ||
43 ( trail
>= (BYTE
)0x80 && trail
<= (BYTE
)0xfc ) ) );
47 int IsLegalDBCSChar_cp936( BYTE lead
, BYTE trail
)
49 return ( ( lead
>= (BYTE
)0x81 && lead
<= (BYTE
)0xfe ) &&
50 ( trail
>= (BYTE
)0x40 && trail
<= (BYTE
)0xfe ) );
54 int IsLegalDBCSChar_cp949( BYTE lead
, BYTE trail
)
56 return ( ( lead
>= (BYTE
)0x81 && lead
<= (BYTE
)0xfe ) &&
57 ( trail
>= (BYTE
)0x41 && trail
<= (BYTE
)0xfe ) );
61 int IsLegalDBCSChar_cp950( BYTE lead
, BYTE trail
)
63 return ( ( lead
>= (BYTE
)0x81 && lead
<= (BYTE
)0xfe ) &&
64 ( ( trail
>= (BYTE
)0x40 && trail
<= (BYTE
)0x7e ) ||
65 ( trail
>= (BYTE
)0xa1 && trail
<= (BYTE
)0xfe ) ) );
69 int IsLegalDBCSChar_euc( BYTE lead
, BYTE trail
)
71 return ( ( lead
>= (BYTE
)0xa1 && lead
<= (BYTE
)0xfe ) &&
72 ( trail
>= (BYTE
)0xa1 && trail
<= (BYTE
)0xfe ) );
76 /***********************************************************************
77 * DBCSCharToXChar2b for cp932/euc
81 void DBCSCharToXChar2b_cp932( XChar2b
* pch
, BYTE lead
, BYTE trail
)
83 unsigned int high
, low
;
85 high
= (unsigned int)lead
;
86 low
= (unsigned int)trail
;
89 high
= (high
<<1) - 0xe0;
91 high
= (high
<<1) - 0x160;
105 pch
->byte1
= (unsigned char)high
;
106 pch
->byte2
= (unsigned char)low
;
110 void DBCSCharToXChar2b_euc( XChar2b
* pch
, BYTE lead
, BYTE trail
)
112 pch
->byte1
= lead
& (BYTE
)0x7f;
113 pch
->byte2
= trail
& (BYTE
)0x7f;
119 static WORD
X11DRV_enum_subfont_charset_normal( UINT index
)
121 return DEFAULT_CHARSET
;
124 static WORD
X11DRV_enum_subfont_charset_cp932( UINT index
)
128 case 0: return X11FONT_JISX0201_CHARSET
;
129 case 1: return X11FONT_JISX0212_CHARSET
;
132 return DEFAULT_CHARSET
;
135 static WORD
X11DRV_enum_subfont_charset_cp936( UINT index
)
139 case 0: return ANSI_CHARSET
;
142 return DEFAULT_CHARSET
;
145 static WORD
X11DRV_enum_subfont_charset_cp949( UINT index
)
149 case 0: return ANSI_CHARSET
;
152 return DEFAULT_CHARSET
;
155 static WORD
X11DRV_enum_subfont_charset_cp950( UINT index
)
159 case 0: return ANSI_CHARSET
;
162 return DEFAULT_CHARSET
;
166 static XChar2b
* X11DRV_unicode_to_char2b_sbcs( fontObject
* pfo
,
167 LPCWSTR lpwstr
, UINT count
)
172 UINT codepage
= pfo
->fi
->codepage
;
173 char ch
= pfo
->fs
->default_char
;
175 if (!(str2b
= HeapAlloc( GetProcessHeap(), 0, count
* sizeof(XChar2b
) )))
177 if (!(str
= HeapAlloc( GetProcessHeap(), 0, count
)))
179 HeapFree( GetProcessHeap(), 0, str2b
);
183 WideCharToMultiByte( codepage
, 0, lpwstr
, count
, str
, count
, &ch
, NULL
);
185 for (i
= 0; i
< count
; i
++)
188 str2b
[i
].byte2
= str
[i
];
190 HeapFree( GetProcessHeap(), 0, str
);
195 static XChar2b
* X11DRV_unicode_to_char2b_unicode( fontObject
* pfo
,
196 LPCWSTR lpwstr
, UINT count
)
201 if (!(str2b
= HeapAlloc( GetProcessHeap(), 0, count
* sizeof(XChar2b
) )))
204 for (i
= 0; i
< count
; i
++)
206 str2b
[i
].byte1
= lpwstr
[i
] >> 8;
207 str2b
[i
].byte2
= lpwstr
[i
] & 0xff;
213 /* FIXME: handle jisx0212.1990... */
214 static XChar2b
* X11DRV_unicode_to_char2b_cp932( fontObject
* pfo
,
215 LPCWSTR lpwstr
, UINT count
)
222 char ch
= pfo
->fs
->default_char
;
224 if (!(str2b
= HeapAlloc( GetProcessHeap(), 0, count
* sizeof(XChar2b
) )))
226 if (!(str
= HeapAlloc( GetProcessHeap(), 0, count
*2 )))
228 HeapFree( GetProcessHeap(), 0, str2b
);
232 /* handle jisx0212.1990... */
233 WideCharToMultiByte( 932, 0, lpwstr
, count
, str
, count
*2, &ch
, NULL
);
235 str_src
= (BYTE
*) str
;
237 for (i
= 0; i
< count
; i
++, str_src
++, str2b_dst
++)
239 if ( IsLegalDBCSChar_cp932( *str_src
, *(str_src
+1) ) )
241 DBCSCharToXChar2b_cp932( str2b_dst
, *str_src
, *(str_src
+1) );
246 str2b_dst
->byte1
= 0;
247 str2b_dst
->byte2
= *str_src
;
251 HeapFree( GetProcessHeap(), 0, str
);
257 static XChar2b
* X11DRV_unicode_to_char2b_cp936( fontObject
* pfo
,
258 LPCWSTR lpwstr
, UINT count
)
265 char ch
= pfo
->fs
->default_char
;
267 if (!(str2b
= HeapAlloc( GetProcessHeap(), 0, count
* sizeof(XChar2b
) )))
269 if (!(str
= HeapAlloc( GetProcessHeap(), 0, count
*2 )))
271 HeapFree( GetProcessHeap(), 0, str2b
);
274 WideCharToMultiByte( 936, 0, lpwstr
, count
, str
, count
*2, &ch
, NULL
);
276 str_src
= (BYTE
*) str
;
278 for (i
= 0; i
< count
; i
++, str_src
++, str2b_dst
++)
280 if ( IsLegalDBCSChar_cp936( *str_src
, *(str_src
+1) ) )
282 str2b_dst
->byte1
= *str_src
;
283 str2b_dst
->byte2
= *(str_src
+1);
288 str2b_dst
->byte1
= 0;
289 str2b_dst
->byte2
= *str_src
;
293 HeapFree( GetProcessHeap(), 0, str
);
298 static XChar2b
* X11DRV_unicode_to_char2b_cp949( fontObject
* pfo
,
299 LPCWSTR lpwstr
, UINT count
)
306 char ch
= pfo
->fs
->default_char
;
308 if (!(str2b
= HeapAlloc( GetProcessHeap(), 0, count
* sizeof(XChar2b
) )))
310 if (!(str
= HeapAlloc( GetProcessHeap(), 0, count
*2 )))
312 HeapFree( GetProcessHeap(), 0, str2b
);
315 WideCharToMultiByte( 949, 0, lpwstr
, count
, str
, count
*2, &ch
, NULL
);
317 str_src
= (BYTE
*) str
;
319 for (i
= 0; i
< count
; i
++, str_src
++, str2b_dst
++)
321 if ( IsLegalDBCSChar_cp949( *str_src
, *(str_src
+1) ) )
323 str2b_dst
->byte1
= *str_src
;
324 str2b_dst
->byte2
= *(str_src
+1);
329 str2b_dst
->byte1
= 0;
330 str2b_dst
->byte2
= *str_src
;
334 HeapFree( GetProcessHeap(), 0, str
);
340 static XChar2b
* X11DRV_unicode_to_char2b_cp950( fontObject
* pfo
,
341 LPCWSTR lpwstr
, UINT count
)
348 char ch
= pfo
->fs
->default_char
;
350 if (!(str2b
= HeapAlloc( GetProcessHeap(), 0, count
* sizeof(XChar2b
) )))
352 if (!(str
= HeapAlloc( GetProcessHeap(), 0, count
*2 )))
354 HeapFree( GetProcessHeap(), 0, str2b
);
357 WideCharToMultiByte( 950, 0, lpwstr
, count
, str
, count
*2, &ch
, NULL
);
359 str_src
= (BYTE
*) str
;
361 for (i
= 0; i
< count
; i
++, str_src
++, str2b_dst
++)
363 if ( IsLegalDBCSChar_cp950( *str_src
, *(str_src
+1) ) )
365 str2b_dst
->byte1
= *str_src
;
366 str2b_dst
->byte2
= *(str_src
+1);
371 str2b_dst
->byte1
= 0;
372 str2b_dst
->byte2
= *str_src
;
376 HeapFree( GetProcessHeap(), 0, str
);
381 static XChar2b
* X11DRV_unicode_to_char2b_symbol( fontObject
* pfo
,
382 LPCWSTR lpwstr
, UINT count
)
386 char ch
= pfo
->fs
->default_char
;
388 if (!(str2b
= HeapAlloc( GetProcessHeap(), 0, count
* sizeof(XChar2b
) )))
391 for (i
= 0; i
< count
; i
++)
394 if(lpwstr
[i
] >= 0xf000 && lpwstr
[i
] < 0xf100)
395 str2b
[i
].byte2
= lpwstr
[i
] - 0xf000;
396 else if(lpwstr
[i
] < 0x100)
397 str2b
[i
].byte2
= lpwstr
[i
];
406 static void X11DRV_DrawString_normal( fontObject
* pfo
, Display
* pdisp
,
407 Drawable d
, GC gc
, int x
, int y
,
408 XChar2b
* pstr
, int count
)
411 XDrawString16( pdisp
, d
, gc
, x
, y
, pstr
, count
);
415 static int X11DRV_TextWidth_normal( fontObject
* pfo
, XChar2b
* pstr
, int count
)
419 ret
= XTextWidth16( pfo
->fs
, pstr
, count
);
424 static void X11DRV_DrawText_normal( fontObject
* pfo
, Display
* pdisp
, Drawable d
,
425 GC gc
, int x
, int y
, XTextItem16
* pitems
,
429 XDrawText16( pdisp
, d
, gc
, x
, y
, pitems
, count
);
433 static void X11DRV_TextExtents_normal( fontObject
* pfo
, XChar2b
* pstr
, int count
,
434 int* pdir
, int* pascent
, int* pdescent
,
440 XTextExtents16( pfo
->fs
, pstr
, count
, pdir
, pascent
, pdescent
, &info
);
442 *pwidth
= info
.width
;
445 static void X11DRV_GetTextMetricsW_normal( fontObject
* pfo
, LPTEXTMETRICW pTM
)
447 LPIFONTINFO16 pdf
= &pfo
->fi
->df
;
449 if( ! pfo
->lpX11Trans
) {
450 pTM
->tmAscent
= pfo
->fs
->ascent
;
451 pTM
->tmDescent
= pfo
->fs
->descent
;
453 pTM
->tmAscent
= pfo
->lpX11Trans
->ascent
;
454 pTM
->tmDescent
= pfo
->lpX11Trans
->descent
;
457 pTM
->tmAscent
*= pfo
->rescale
;
458 pTM
->tmDescent
*= pfo
->rescale
;
460 pTM
->tmHeight
= pTM
->tmAscent
+ pTM
->tmDescent
;
462 pTM
->tmAveCharWidth
= pfo
->foAvgCharWidth
* pfo
->rescale
;
463 pTM
->tmMaxCharWidth
= pfo
->foMaxCharWidth
* pfo
->rescale
;
465 pTM
->tmInternalLeading
= pfo
->foInternalLeading
* pfo
->rescale
;
466 pTM
->tmExternalLeading
= pdf
->dfExternalLeading
* pfo
->rescale
;
468 pTM
->tmStruckOut
= (pfo
->fo_flags
& FO_SYNTH_STRIKEOUT
)
469 ? 1 : pdf
->dfStrikeOut
;
470 pTM
->tmUnderlined
= (pfo
->fo_flags
& FO_SYNTH_UNDERLINE
)
471 ? 1 : pdf
->dfUnderline
;
474 if( pfo
->fo_flags
& FO_SYNTH_ITALIC
)
476 pTM
->tmOverhang
+= pTM
->tmHeight
/3;
479 pTM
->tmItalic
= pdf
->dfItalic
;
481 pTM
->tmWeight
= pdf
->dfWeight
;
482 if( pfo
->fo_flags
& FO_SYNTH_BOLD
)
485 pTM
->tmWeight
+= 100;
488 pTM
->tmFirstChar
= pdf
->dfFirstChar
;
489 pTM
->tmLastChar
= pdf
->dfLastChar
;
490 pTM
->tmDefaultChar
= pdf
->dfDefaultChar
;
491 pTM
->tmBreakChar
= pdf
->dfBreakChar
;
493 pTM
->tmCharSet
= pdf
->dfCharSet
;
494 pTM
->tmPitchAndFamily
= pdf
->dfPitchAndFamily
;
496 pTM
->tmDigitizedAspectX
= pdf
->dfHorizRes
;
497 pTM
->tmDigitizedAspectY
= pdf
->dfVertRes
;
503 void X11DRV_DrawString_dbcs( fontObject
* pfo
, Display
* pdisp
,
504 Drawable d
, GC gc
, int x
, int y
,
505 XChar2b
* pstr
, int count
)
513 X11DRV_cptable
[pfo
->fi
->cptable
].pDrawText(
514 pfo
, pdisp
, d
, gc
, x
, y
, &item
, 1 );
518 int X11DRV_TextWidth_dbcs_2fonts( fontObject
* pfo
, XChar2b
* pstr
, int count
)
523 fontObject
* pfos
[X11FONT_REFOBJS_MAX
+1];
525 pfos
[0] = XFONT_GetFontObject( pfo
->prefobjs
[0] );
527 if ( pfos
[0] == NULL
) pfos
[0] = pfo
;
531 for ( i
= 0; i
< count
; i
++ )
533 curfont
= ( pstr
->byte1
!= 0 ) ? 1 : 0;
534 width
+= XTextWidth16( pfos
[curfont
]->fs
, pstr
, 1 );
542 void X11DRV_DrawText_dbcs_2fonts( fontObject
* pfo
, Display
* pdisp
, Drawable d
,
543 GC gc
, int x
, int y
, XTextItem16
* pitems
,
546 int i
, nitems
, prevfont
= -1, curfont
;
550 fontObject
* pfos
[X11FONT_REFOBJS_MAX
+1];
552 pfos
[0] = XFONT_GetFontObject( pfo
->prefobjs
[0] );
554 if ( pfos
[0] == NULL
) pfos
[0] = pfo
;
557 for ( i
= 0; i
< count
; i
++ )
558 nitems
+= pitems
->nchars
;
559 ptibuf
= HeapAlloc( GetProcessHeap(), 0, sizeof(XTextItem16
) * nitems
);
560 if ( ptibuf
== NULL
)
561 return; /* out of memory */
564 while ( count
-- > 0 )
566 pti
->chars
= pstr
= pitems
->chars
;
567 pti
->delta
= pitems
->delta
;
569 for ( i
= 0; i
< pitems
->nchars
; i
++, pstr
++ )
571 curfont
= ( pstr
->byte1
!= 0 ) ? 1 : 0;
572 if ( curfont
!= prevfont
)
574 if ( pstr
!= pti
->chars
)
576 pti
->nchars
= pstr
- pti
->chars
;
581 pti
->font
= pfos
[curfont
]->fs
->fid
;
585 pti
->nchars
= pstr
- pti
->chars
;
589 XDrawText16( pdisp
, d
, gc
, x
, y
, ptibuf
, pti
- ptibuf
);
591 HeapFree( GetProcessHeap(), 0, ptibuf
);
595 void X11DRV_TextExtents_dbcs_2fonts( fontObject
* pfo
, XChar2b
* pstr
, int count
,
596 int* pdir
, int* pascent
, int* pdescent
,
600 int ascent
, descent
, width
;
603 fontObject
* pfos
[X11FONT_REFOBJS_MAX
+1];
605 pfos
[0] = XFONT_GetFontObject( pfo
->prefobjs
[0] );
607 if ( pfos
[0] == NULL
) pfos
[0] = pfo
;
613 for ( i
= 0; i
< count
; i
++ )
615 curfont
= ( pstr
->byte1
!= 0 ) ? 1 : 0;
616 XTextExtents16( pfos
[curfont
]->fs
, pstr
, 1, pdir
, &ascent
, &descent
, &info
);
617 if ( *pascent
< ascent
) *pascent
= ascent
;
618 if ( *pdescent
< descent
) *pdescent
= descent
;
627 static void X11DRV_GetTextMetricsW_cp932( fontObject
* pfo
, LPTEXTMETRICW pTM
)
629 fontObject
* pfo_ansi
= XFONT_GetFontObject( pfo
->prefobjs
[0] );
630 LPIFONTINFO16 pdf
= &pfo
->fi
->df
;
631 LPIFONTINFO16 pdf_ansi
;
633 pdf_ansi
= ( pfo_ansi
!= NULL
) ? (&pfo_ansi
->fi
->df
) : pdf
;
635 if( ! pfo
->lpX11Trans
) {
636 pTM
->tmAscent
= pfo
->fs
->ascent
;
637 pTM
->tmDescent
= pfo
->fs
->descent
;
639 pTM
->tmAscent
= pfo
->lpX11Trans
->ascent
;
640 pTM
->tmDescent
= pfo
->lpX11Trans
->descent
;
643 pTM
->tmAscent
*= pfo
->rescale
;
644 pTM
->tmDescent
*= pfo
->rescale
;
646 pTM
->tmHeight
= pTM
->tmAscent
+ pTM
->tmDescent
;
648 if ( pfo_ansi
!= NULL
)
650 pTM
->tmAveCharWidth
= floor((pfo_ansi
->foAvgCharWidth
* 2.0 + pfo
->foAvgCharWidth
) / 3.0 * pfo
->rescale
+ 0.5);
651 pTM
->tmMaxCharWidth
= max(pfo_ansi
->foMaxCharWidth
, pfo
->foMaxCharWidth
) * pfo
->rescale
;
655 pTM
->tmAveCharWidth
= floor((pfo
->foAvgCharWidth
* pfo
->rescale
+ 1.0) / 2.0);
656 pTM
->tmMaxCharWidth
= pfo
->foMaxCharWidth
* pfo
->rescale
;
659 pTM
->tmInternalLeading
= pfo
->foInternalLeading
* pfo
->rescale
;
660 pTM
->tmExternalLeading
= pdf
->dfExternalLeading
* pfo
->rescale
;
662 pTM
->tmStruckOut
= (pfo
->fo_flags
& FO_SYNTH_STRIKEOUT
)
663 ? 1 : pdf
->dfStrikeOut
;
664 pTM
->tmUnderlined
= (pfo
->fo_flags
& FO_SYNTH_UNDERLINE
)
665 ? 1 : pdf
->dfUnderline
;
668 if( pfo
->fo_flags
& FO_SYNTH_ITALIC
)
670 pTM
->tmOverhang
+= pTM
->tmHeight
/3;
673 pTM
->tmItalic
= pdf
->dfItalic
;
675 pTM
->tmWeight
= pdf
->dfWeight
;
676 if( pfo
->fo_flags
& FO_SYNTH_BOLD
)
679 pTM
->tmWeight
+= 100;
682 pTM
->tmFirstChar
= pdf_ansi
->dfFirstChar
;
683 pTM
->tmLastChar
= pdf_ansi
->dfLastChar
;
684 pTM
->tmDefaultChar
= pdf_ansi
->dfDefaultChar
;
685 pTM
->tmBreakChar
= pdf_ansi
->dfBreakChar
;
687 pTM
->tmCharSet
= pdf
->dfCharSet
;
688 pTM
->tmPitchAndFamily
= pdf
->dfPitchAndFamily
;
690 pTM
->tmDigitizedAspectX
= pdf
->dfHorizRes
;
691 pTM
->tmDigitizedAspectY
= pdf
->dfVertRes
;
698 const X11DRV_CP X11DRV_cptable
[X11DRV_CPTABLE_COUNT
] =
701 X11DRV_enum_subfont_charset_normal
,
702 X11DRV_unicode_to_char2b_sbcs
,
703 X11DRV_DrawString_normal
,
704 X11DRV_TextWidth_normal
,
705 X11DRV_DrawText_normal
,
706 X11DRV_TextExtents_normal
,
707 X11DRV_GetTextMetricsW_normal
,
710 X11DRV_enum_subfont_charset_normal
,
711 X11DRV_unicode_to_char2b_unicode
,
712 X11DRV_DrawString_normal
,
713 X11DRV_TextWidth_normal
,
714 X11DRV_DrawText_normal
,
715 X11DRV_TextExtents_normal
,
716 X11DRV_GetTextMetricsW_normal
,
719 X11DRV_enum_subfont_charset_cp932
,
720 X11DRV_unicode_to_char2b_cp932
,
721 X11DRV_DrawString_dbcs
,
722 X11DRV_TextWidth_dbcs_2fonts
,
723 X11DRV_DrawText_dbcs_2fonts
,
724 X11DRV_TextExtents_dbcs_2fonts
,
725 X11DRV_GetTextMetricsW_cp932
,
728 X11DRV_enum_subfont_charset_cp936
,
729 X11DRV_unicode_to_char2b_cp936
,
730 X11DRV_DrawString_dbcs
,
731 X11DRV_TextWidth_dbcs_2fonts
,
732 X11DRV_DrawText_dbcs_2fonts
,
733 X11DRV_TextExtents_dbcs_2fonts
,
734 X11DRV_GetTextMetricsW_normal
, /* FIXME */
737 X11DRV_enum_subfont_charset_cp949
,
738 X11DRV_unicode_to_char2b_cp949
,
739 X11DRV_DrawString_dbcs
,
740 X11DRV_TextWidth_dbcs_2fonts
,
741 X11DRV_DrawText_dbcs_2fonts
,
742 X11DRV_TextExtents_dbcs_2fonts
,
743 X11DRV_GetTextMetricsW_normal
, /* FIXME */
746 X11DRV_enum_subfont_charset_cp950
,
747 X11DRV_unicode_to_char2b_cp950
,
748 X11DRV_DrawString_dbcs
,
749 X11DRV_TextWidth_dbcs_2fonts
,
750 X11DRV_DrawText_dbcs_2fonts
,
751 X11DRV_TextExtents_dbcs_2fonts
,
752 X11DRV_GetTextMetricsW_cp932
,
755 X11DRV_enum_subfont_charset_normal
,
756 X11DRV_unicode_to_char2b_symbol
,
757 X11DRV_DrawString_normal
,
758 X11DRV_TextWidth_normal
,
759 X11DRV_DrawText_normal
,
760 X11DRV_TextExtents_normal
,
761 X11DRV_GetTextMetricsW_normal
,