AuroraMiddleware/gtk
1
0
Fork 1
mirror of https://gitlab.gnome.org/GNOME/gtk.git synced 2024-09-30 19:17:34 +00:00
Code Issues Projects Releases Wiki Activity
08fc500e8d
gtk/gdk/win32/gdkfont-win32.c
Tor Lillqvist e96a41be45 gdk/win32/gdkprivate-win32.h Rename all global variables and functions to 
2002-11-12  Tor Lillqvist  <tml@iki.fi>

	* gdk/win32/gdkprivate-win32.h
	* gdk/win32/*.c: Rename all global variables and functions to
	start with underscore.

	Merge from stable:

	More work on the Win32 backend. The cause of some scrolling
	problems was that SetWindowPos() and ScrollWindowEx() don't blit
	those parts of the window they think are invalid. As we didn't
	keep Windows's update region in synch with GDK's, Windows thought
	those areas that in fact had been updated were invalid. Calling
	ValidateRgn() in _gdk_windowing_window_queue_antiexpose() seems to
	be an elegant and efficient solution, removing from Windows's
	update region those areas we are about to repaint proactively.

	In some cases garbage leftover values were used for the clip
	origin in GdkGCWin32. This showed up as odd blank areas around the
	pixmaps included in the Text Widget in gtk-demo.

	Having the clip region either as a GdkRegion or a HRGN in
	GdkGCWin32 was unnecessary, it's better to just use a HRGN.

	The translation and antiexpose queue handling in
	gdkgeometry-win32.c seems unnecessary (and not implementable in
	the same way as on X11 anyway, no serial numbers) on Windows,
	ifdeffed out.

	Don't (try to) do guffaw scrolling as there is no static window
	gravity on Windows. Guffaw scrolling would be unnecessary anyway,
	as there is the ScrollWindow() API. This improves the behaviour of
	the Text Widget demo in gtk-demo a lot. But I have no idea how the
	lack of static win gravity should be handled in other places where
	the X11 code uses it. Especially _gdk_window_move_resize_child().

	There is still some problem in expose handling. By moving an
	obscuring window back and forth over testgtk's main window, for
	instance, every now and then you typically get narrow vertical or
	horizontal strips of pixels that haven't been properly redrawn
	after being exposed. A fencepost error somewhere?

	Otherwise, all of testgtk and gtk-demo except "big windows" now
	seem to work pretty well.

	Bug #79720 should be fixed now.

	* gdk/win32/gdkcolor-win32.c (gdk_win32_color_to_string,
	gdk_win32_print_paletteentries, gdk_win32_print_system_palette,
	gdk_win32_print_hpalette)
	* gdk/win32/gdkdrawable-win32.c (gdk_win32_drawable_description)
	* gdk/win32/gdkevents-win32.c (gdk_win32_message_name):
	Move all debugging helper functions to gdkmain-win32.c.

	* gdk/win32/gdkdrawable-win32.c (_gdk_win32_draw_tiles):
	Rewrite. Make static. Must take tile origin parameters, too.

	(gdk_win32_draw_rectangle): Pass the tile/stipple origin to
	_gdk_win32_draw_tiles(). Remove #if 0 code.

	(blit_inside_window): Don't call ScrollDC(), that didn't work at
	all like I thought. A simple call to BitBlt() is enough.

	* gdk/win32/gdkevents-win32.c (gdk_event_translate) Remove unused
	latin_locale_loaded variable.

	(_gdk_win32_get_next_tick): New function. Used to make sure
	timestamps of events are always increasing, both in events
	generated from the window procedure and in events gotten via
	PeekMessage(). Not sure whether this is actually useful, but it
	seemed as a good idea.

	(real_window_procedure): Don't use a local GdkEventPrivate
	variable. Don't attempt any compression of configure or expose
	events here, handled elsewhere.

	(erase_background): Accumulate window offsets when traversing up
	the parent chain for GDK_PARENT_RELATIVE_BG, in order to get
	correct alignment of background pixmaps. Don't fill with
	BLACK_BRUSH if GDK_NO_BG.

	(gdk_event_get_graphics_expose): A bit more verbose debugging output.

	(gdk_event_translate): Use _gdk_win32_get_next_tick(). In the
	WM_PAINT handler, don't check for empty update rect. When we get a
	WM_PAINT, the update region isn't empty. And if it for some
	strange reason is, that will be handled later anyway. Call
	GetUpdateRgn() before calling BeginPaint() and EndPaint() (which
	empty the update region).

	* gdk/win32/gdkdnd-win32.c
	* gdk/win32/gdkinput-win32.c:
	Use _gdk_win32_get_next_tick().

	* gdk/win32/gdkfont-win32.c: Use %p to print HFONTs.

	(gdk_text_size): Remove, unused.

	* gdk/win32/gdkgc-win32.c:  Set clip origins to zero
	when appropriate.

	(gdk_gc_copy): Increase refcount on colormap if present.

	(gdk_win32_hdc_get): Handle just hcliprgn. If we have a stipple,
	combine it with clip region after selecting into the DC.

	(_gdk_win32_bitmap_to_hrgn): Rename from _gdk_win32_bitmap_to_region.

	(_gdk_win3_gdkregion_to_hrgn): New function, code snippet
	extracted from gdk_win32_hdc_get().

	* gdk/win32/gdkgeometry-win32.c: Ifdef out the translate_queue
	handling.

	(gdk_window_copy_area_scroll): Increase clipRect to avoid
	ScrollWindowEx() not scrolling pixels it thinks are invalid.
	Scroll also children with the ScrollWindowEx() call. No need to
	call gdk_window_move() on the children.

	(gdk_window_scroll): Don't do guffaw scrolling.

	(gdk_window_compute_position): Fix typo, used win32_y where x was
	intended.

	(gdk_window_premove, gdk_window_postmove,
	gdk_window_clip_changed): Add debugging output.

	(_gdk_windowing_window_queue_antiexpose): Just call ValidateRgn()
	on the region.

	(_gdk_window_process_expose): No use for the serial number
	parameter now. Instead of a rectangle, take a region parameter, as
	Windows gives us one in WM_PAINT.

	* gdk/win32/gdkmain-win32.c (_gdk_win32_lbstyle_to_string,
	_gdk_win32_pstype_to_string, _gdk_win32_psstyle_to_string,
	_gdk_win32_psendcap_to_string, _gdk_win32_psjoin_to_string,
	_gdk_win32_rect_to_string, _gdk_win32_gdkrectangle_to_string,
	_gdk_win32_gdkregion_to_string): New debugging functions.

	(static_printf): Helper function for the above. sprintfs into a
	static circular buffer, return value should be used "soon".

	* gdk/win32/gdkwindow-win32.c (gdk_propagate_shapes): Plug memory
	leak, free list after use.

	(gdk_window_gravity_works): Remove, we know that there is no such
	thing on Windows.

	(gdk_window_set_static_bit_gravity,
	gdk_window_set_static_win_gravity): Ditto, remove, they didn't do
	anything anyway.

	(_gdk_windowing_window_init, gdk_window_foreign_new): Call
	_gdk_window_init_position() like in the X11 backend.

	(gdk_window_reparent): Don't call the now nonexistent
	gdk_window_set_static_win_gravity(). No idea what should be done
	instead.

	(gdk_window_get_geometry): The returned x and y should be relative
	to parent. Used to be always zero..

	(gdk_window_set_static_gravities): Return FALSE if trying to set
	static gravity.

	* gdk/win32/gdkprivate-win32.h: Drop the clip_region field from
	GdkGCWin32. Only use the HRGN hcliprgn. Declare new
	functions.

	* gdk/win32/*.c: Use new debugging functions.

	* gdk/win32/rc/gdk.rc.in: Update copyright year.
2002-11-12 22:17:48 +00:00

1703 lines
48 KiB
C
Raw Blame History

/* GDK - The GIMP Drawing Kit
* Copyright (C) 1995-1997 Peter Mattis, Spencer Kimball and Josh MacDonald
* Copyright (C) 1998-2002 Tor Lillqvist
*
* This library is free software; you can redistribute it and/or
* modify it under the terms of the GNU Lesser General Public
* License as published by the Free Software Foundation; either
* version 2 of the License, or (at your option) any later version.
*
* This library is distributed in the hope that it will be useful,
* but WITHOUT ANY WARRANTY; without even the implied warranty of
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
* Lesser General Public License for more details.
*
* You should have received a copy of the GNU Lesser General Public
* License along with this library; if not, write to the
* Free Software Foundation, Inc., 59 Temple Place - Suite 330,
* Boston, MA 02111-1307, USA.
*/
/*
* Modified by the GTK+ Team and others 1997-2000. See the AUTHORS
* file for a list of people on the GTK+ Team. See the ChangeLog
* files for a list of changes. These files are distributed with
* GTK+ at ftp://ftp.gtk.org/pub/gtk/.
*/
#include <stdio.h>
#include <stdlib.h>
#include <ctype.h>
#include <pango/pangowin32.h>
#include "gdkfont.h"
#include "gdkpango.h" /* gdk_pango_context_get() */
#include "gdkdisplay.h"
#include "gdkprivate-win32.h"
static GHashTable *font_name_hash = NULL;
static GHashTable *fontset_name_hash = NULL;
static void
gdk_font_hash_insert (GdkFontType type,
GdkFont *font,
const gchar *font_name)
{
GdkFontPrivateWin32 *private = (GdkFontPrivateWin32 *) font;
GHashTable **hashp = (type == GDK_FONT_FONT) ?
&font_name_hash : &fontset_name_hash;
if (!*hashp)
*hashp = g_hash_table_new (g_str_hash, g_str_equal);
private->names = g_slist_prepend (private->names, g_strdup (font_name));
g_hash_table_insert (*hashp, private->names->data, font);
}
static void
gdk_font_hash_remove (GdkFontType type,
GdkFont *font)
{
GdkFontPrivateWin32 *private = (GdkFontPrivateWin32 *) font;
GSList *tmp_list;
GHashTable *hash = (type == GDK_FONT_FONT) ?
font_name_hash : fontset_name_hash;
tmp_list = private->names;
while (tmp_list)
{
g_hash_table_remove (hash, tmp_list->data);
g_free (tmp_list->data);
tmp_list = tmp_list->next;
}
g_slist_free (private->names);
private->names = NULL;
}
static GdkFont *
gdk_font_hash_lookup (GdkFontType type,
const gchar *font_name)
{
GdkFont *result;
GHashTable *hash = (type == GDK_FONT_FONT) ?
font_name_hash : fontset_name_hash;
if (!hash)
return NULL;
else
{
result = g_hash_table_lookup (hash, font_name);
if (result)
gdk_font_ref (result);
return result;
}
}
static const char *
charset_name (DWORD charset)
{
switch (charset)
{
case ANSI_CHARSET: return "ansi";
case DEFAULT_CHARSET: return "default";
case SYMBOL_CHARSET: return "symbol";
case SHIFTJIS_CHARSET: return "shiftjis";
case HANGEUL_CHARSET: return "hangeul";
case GB2312_CHARSET: return "gb2312";
case CHINESEBIG5_CHARSET: return "big5";
case JOHAB_CHARSET: return "johab";
case HEBREW_CHARSET: return "hebrew";
case ARABIC_CHARSET: return "arabic";
case GREEK_CHARSET: return "greek";
case TURKISH_CHARSET: return "turkish";
case VIETNAMESE_CHARSET: return "vietnamese";
case THAI_CHARSET: return "thai";
case EASTEUROPE_CHARSET: return "easteurope";
case RUSSIAN_CHARSET: return "russian";
case MAC_CHARSET: return "mac";
case BALTIC_CHARSET: return "baltic";
}
return "unknown";
}
/* This table classifies Unicode characters according to the Microsoft
* Unicode subset numbering. This is based on the table in "Developing
* International Software for Windows 95 and Windows NT". This is almost,
* but not quite, the same as the official Unicode block table in
* Blocks.txt from ftp.unicode.org. The bit number field is the bitfield
* number as in the FONTSIGNATURE struct's fsUsb field.
* There are some grave bugs in the table in the books. For instance
* it claims there are Hangul at U+3400..U+4DFF while this range in
* fact contains CJK Unified Ideographs Extension A. Also, the whole
* block of Hangul Syllables U+AC00..U+D7A3 is missing from the book.
*/
typedef enum
{
U_BASIC_LATIN = 0,
U_LATIN_1_SUPPLEMENT = 1,
U_LATIN_EXTENDED_A = 2,
U_LATIN_EXTENDED_B = 3,
U_IPA_EXTENSIONS = 4,
U_SPACING_MODIFIER_LETTERS = 5,
U_COMBINING_DIACRITICAL_MARKS = 6,
U_BASIC_GREEK = 7,
U_GREEK_SYMBOLS_AND_COPTIC = 8,
U_CYRILLIC = 9,
U_ARMENIAN = 10,
U_HEBREW_EXTENDED = 12,
U_BASIC_HEBREW = 11,
U_BASIC_ARABIC = 13,
U_ARABIC_EXTENDED = 14,
U_DEVANAGARI = 15,
U_BENGALI = 16,
U_GURMUKHI = 17,
U_GUJARATI = 18,
U_ORIYA = 19,
U_TAMIL = 20,
U_TELUGU = 21,
U_KANNADA = 22,
U_MALAYALAM = 23,
U_THAI = 24,
U_LAO = 25,
U_GEORGIAN_EXTENDED = 27,
U_BASIC_GEORGIAN = 26,
U_HANGUL_JAMO = 28,
U_LATIN_EXTENDED_ADDITIONAL = 29,
U_GREEK_EXTENDED = 30,
U_GENERAL_PUNCTUATION = 31,
U_SUPERSCRIPTS_AND_SUBSCRIPTS = 32,
U_CURRENCY_SYMBOLS = 33,
U_COMBINING_DIACRITICAL_MARKS_FOR_SYMBOLS = 34,
U_LETTERLIKE_SYMBOLS = 35,
U_NUMBER_FORMS = 36,
U_ARROWS = 37,
U_MATHEMATICAL_OPERATORS = 38,
U_MISCELLANEOUS_TECHNICAL = 39,
U_CONTROL_PICTURES = 40,
U_OPTICAL_CHARACTER_RECOGNITION = 41,
U_ENCLOSED_ALPHANUMERICS = 42,
U_BOX_DRAWING = 43,
U_BLOCK_ELEMENTS = 44,
U_GEOMETRIC_SHAPES = 45,
U_MISCELLANEOUS_SYMBOLS = 46,
U_DINGBATS = 47,
U_CJK_SYMBOLS_AND_PUNCTUATION = 48,
U_HIRAGANA = 49,
U_KATAKANA = 50,
U_BOPOMOFO = 51,
U_HANGUL_COMPATIBILITY_JAMO = 52,
U_CJK_MISCELLANEOUS = 53,
U_ENCLOSED_CJK = 54,
U_CJK_COMPATIBILITY = 55,
U_HANGUL = 56,
U_HANGUL_SUPPLEMENTARY_A = 57,
U_HANGUL_SUPPLEMENTARY_B = 58,
U_CJK_UNIFIED_IDEOGRAPHS = 59,
U_PRIVATE_USE_AREA = 60,
U_CJK_COMPATIBILITY_IDEOGRAPHS = 61,
U_ALPHABETIC_PRESENTATION_FORMS = 62,
U_ARABIC_PRESENTATION_FORMS_A = 63,
U_COMBINING_HALF_MARKS = 64,
U_CJK_COMPATIBILITY_FORMS = 65,
U_SMALL_FORM_VARIANTS = 66,
U_ARABIC_PRESENTATION_FORMS_B = 67,
U_SPECIALS = 69,
U_HALFWIDTH_AND_FULLWIDTH_FORMS = 68,
U_LAST_PLUS_ONE
} unicode_subset;
static struct {
wchar_t low, high;
unicode_subset bit;
gchar *name;
} utab[] =
{
{ 0x0000, 0x007E,
U_BASIC_LATIN, "Basic Latin" },
{ 0x00A0, 0x00FF,
U_LATIN_1_SUPPLEMENT, "Latin-1 Supplement" },
{ 0x0100, 0x017F,
U_LATIN_EXTENDED_A, "Latin Extended-A" },
{ 0x0180, 0x024F,
U_LATIN_EXTENDED_B, "Latin Extended-B" },
{ 0x0250, 0x02AF,
U_IPA_EXTENSIONS, "IPA Extensions" },
{ 0x02B0, 0x02FF,
U_SPACING_MODIFIER_LETTERS, "Spacing Modifier Letters" },
{ 0x0300, 0x036F,
U_COMBINING_DIACRITICAL_MARKS, "Combining Diacritical Marks" },
{ 0x0370, 0x03CF,
U_BASIC_GREEK, "Basic Greek" },
{ 0x03D0, 0x03FF,
U_GREEK_SYMBOLS_AND_COPTIC, "Greek Symbols and Coptic" },
{ 0x0400, 0x04FF,
U_CYRILLIC, "Cyrillic" },
{ 0x0530, 0x058F,
U_ARMENIAN, "Armenian" },
{ 0x0590, 0x05CF,
U_HEBREW_EXTENDED, "Hebrew Extended" },
{ 0x05D0, 0x05FF,
U_BASIC_HEBREW, "Basic Hebrew" },
{ 0x0600, 0x0652,
U_BASIC_ARABIC, "Basic Arabic" },
{ 0x0653, 0x06FF,
U_ARABIC_EXTENDED, "Arabic Extended" },
{ 0x0900, 0x097F,
U_DEVANAGARI, "Devanagari" },
{ 0x0980, 0x09FF,
U_BENGALI, "Bengali" },
{ 0x0A00, 0x0A7F,
U_GURMUKHI, "Gurmukhi" },
{ 0x0A80, 0x0AFF,
U_GUJARATI, "Gujarati" },
{ 0x0B00, 0x0B7F,
U_ORIYA, "Oriya" },
{ 0x0B80, 0x0BFF,
U_TAMIL, "Tamil" },
{ 0x0C00, 0x0C7F,
U_TELUGU, "Telugu" },
{ 0x0C80, 0x0CFF,
U_KANNADA, "Kannada" },
{ 0x0D00, 0x0D7F,
U_MALAYALAM, "Malayalam" },
{ 0x0E00, 0x0E7F,
U_THAI, "Thai" },
{ 0x0E80, 0x0EFF,
U_LAO, "Lao" },
{ 0x10A0, 0x10CF,
U_GEORGIAN_EXTENDED, "Georgian Extended" },
{ 0x10D0, 0x10FF,
U_BASIC_GEORGIAN, "Basic Georgian" },
{ 0x1100, 0x11FF,
U_HANGUL_JAMO, "Hangul Jamo" },
{ 0x1E00, 0x1EFF,
U_LATIN_EXTENDED_ADDITIONAL, "Latin Extended Additional" },
{ 0x1F00, 0x1FFF,
U_GREEK_EXTENDED, "Greek Extended" },
{ 0x2000, 0x206F,
U_GENERAL_PUNCTUATION, "General Punctuation" },
{ 0x2070, 0x209F,
U_SUPERSCRIPTS_AND_SUBSCRIPTS, "Superscripts and Subscripts" },
{ 0x20A0, 0x20CF,
U_CURRENCY_SYMBOLS, "Currency Symbols" },
{ 0x20D0, 0x20FF,
U_COMBINING_DIACRITICAL_MARKS_FOR_SYMBOLS, "Combining Diacritical Marks for Symbols" },
{ 0x2100, 0x214F,
U_LETTERLIKE_SYMBOLS, "Letterlike Symbols" },
{ 0x2150, 0x218F,
U_NUMBER_FORMS, "Number Forms" },
{ 0x2190, 0x21FF,
U_ARROWS, "Arrows" },
{ 0x2200, 0x22FF,
U_MATHEMATICAL_OPERATORS, "Mathematical Operators" },
{ 0x2300, 0x23FF,
U_MISCELLANEOUS_TECHNICAL, "Miscellaneous Technical" },
{ 0x2400, 0x243F,
U_CONTROL_PICTURES, "Control Pictures" },
{ 0x2440, 0x245F,
U_OPTICAL_CHARACTER_RECOGNITION, "Optical Character Recognition" },
{ 0x2460, 0x24FF,
U_ENCLOSED_ALPHANUMERICS, "Enclosed Alphanumerics" },
{ 0x2500, 0x257F,
U_BOX_DRAWING, "Box Drawing" },
{ 0x2580, 0x259F,
U_BLOCK_ELEMENTS, "Block Elements" },
{ 0x25A0, 0x25FF,
U_GEOMETRIC_SHAPES, "Geometric Shapes" },
{ 0x2600, 0x26FF,
U_MISCELLANEOUS_SYMBOLS, "Miscellaneous Symbols" },
{ 0x2700, 0x27BF,
U_DINGBATS, "Dingbats" },
{ 0x3000, 0x303F,
U_CJK_SYMBOLS_AND_PUNCTUATION, "CJK Symbols and Punctuation" },
{ 0x3040, 0x309F,
U_HIRAGANA, "Hiragana" },
{ 0x30A0, 0x30FF,
U_KATAKANA, "Katakana" },
{ 0x3100, 0x312F,
U_BOPOMOFO, "Bopomofo" },
{ 0x3130, 0x318F,
U_HANGUL_COMPATIBILITY_JAMO, "Hangul Compatibility Jamo" },
{ 0x3190, 0x319F,
U_CJK_MISCELLANEOUS, "CJK Miscellaneous" },
{ 0x3200, 0x32FF,
U_ENCLOSED_CJK, "Enclosed CJK" },
{ 0x3300, 0x33FF,
U_CJK_COMPATIBILITY, "CJK Compatibility" },
/* The book claims:
* U+3400..U+3D2D = Hangul
* U+3D2E..U+44B7 = Hangul Supplementary A
* U+44B8..U+4DFF = Hangul Supplementary B
* but actually in Unicode
* U+3400..U+4DB5 = CJK Unified Ideographs Extension A
*/
{ 0x3400, 0x4DB5,
U_CJK_UNIFIED_IDEOGRAPHS, "CJK Unified Ideographs Extension A" },
{ 0x4E00, 0x9FFF,
U_CJK_UNIFIED_IDEOGRAPHS, "CJK Unified Ideographs" },
/* This was missing completely from the book's table. */
{ 0xAC00, 0xD7A3,
U_HANGUL, "Hangul Syllables" },
{ 0xE000, 0xF8FF,
U_PRIVATE_USE_AREA, "Private Use Area" },
{ 0xF900, 0xFAFF,
U_CJK_COMPATIBILITY_IDEOGRAPHS, "CJK Compatibility Ideographs" },
{ 0xFB00, 0xFB4F,
U_ALPHABETIC_PRESENTATION_FORMS, "Alphabetic Presentation Forms" },
{ 0xFB50, 0xFDFF,
U_ARABIC_PRESENTATION_FORMS_A, "Arabic Presentation Forms-A" },
{ 0xFE20, 0xFE2F,
U_COMBINING_HALF_MARKS, "Combining Half Marks" },
{ 0xFE30, 0xFE4F,
U_CJK_COMPATIBILITY_FORMS, "CJK Compatibility Forms" },
{ 0xFE50, 0xFE6F,
U_SMALL_FORM_VARIANTS, "Small Form Variants" },
{ 0xFE70, 0xFEFE,
U_ARABIC_PRESENTATION_FORMS_B, "Arabic Presentation Forms-B" },
{ 0xFEFF, 0xFEFF,
U_SPECIALS, "Specials" },
{ 0xFF00, 0xFFEF,
U_HALFWIDTH_AND_FULLWIDTH_FORMS, "Halfwidth and Fullwidth Forms" },
{ 0xFFF0, 0xFFFD,
U_SPECIALS, "Specials" }
};
static void
print_unicode_subranges (FONTSIGNATURE *fsp)
{
int i;
gboolean checked[G_N_ELEMENTS (utab)];
gboolean need_comma = FALSE;
memset (checked, 0, sizeof (checked));
for (i = 0; i < G_N_ELEMENTS (utab); i++)
if (!checked[i]
&& (fsp->fsUsb[utab[i].bit/32] & (1 << (utab[i].bit % 32))))
{
g_print ("%s %s", (need_comma ? "," : ""), utab[i].name);
need_comma = TRUE;
checked[i] = TRUE;
}
if (!need_comma)
g_print (" none!");
g_print ("\n");
}
static gboolean
check_unicode_subranges (UINT charset,
FONTSIGNATURE *fsp)
{
gint i;
gboolean retval = FALSE;
/* If the fsUsb bit array has at least one of the bits set, trust it */
for (i = 0; i < U_LAST_PLUS_ONE; i++)
if (i != U_PRIVATE_USE_AREA && (fsp->fsUsb[i/32] & (1 << (i % 32))))
return FALSE;
/* Otherwise, guess what subranges there should be in the font */
fsp->fsUsb[0] = fsp->fsUsb[1] = fsp->fsUsb[2] = fsp->fsUsb[3] = 0;
#define set_bit(bitno) (fsp->fsUsb[(bitno)/32] |= (1 << ((bitno) % 32)))
/* Set Unicode subrange bits based on code pages supported.
* This is mostly just guesswork.
*/
#define check_cp(bit) (fsp->fsCsb[0] & (bit))
if (check_cp(FS_LATIN1))
{
set_bit (U_BASIC_LATIN);
set_bit (U_LATIN_1_SUPPLEMENT);
set_bit (U_CURRENCY_SYMBOLS);
retval = TRUE;
}
if (check_cp (FS_LATIN2))
{
set_bit (U_BASIC_LATIN);
set_bit (U_LATIN_1_SUPPLEMENT);
set_bit (U_LATIN_EXTENDED_A);
set_bit (U_CURRENCY_SYMBOLS);
retval = TRUE;
}
if (check_cp (FS_CYRILLIC))
{
set_bit (U_BASIC_LATIN);
set_bit (U_CYRILLIC);
retval = TRUE;
}
if (check_cp (FS_GREEK))
{
set_bit (U_BASIC_LATIN);
set_bit (U_BASIC_GREEK);
retval = TRUE;
}
if (check_cp (FS_TURKISH))
{
set_bit (U_BASIC_LATIN);
set_bit (U_LATIN_1_SUPPLEMENT);
set_bit (U_LATIN_EXTENDED_A);
set_bit (U_CURRENCY_SYMBOLS);
retval = TRUE;
}
if (check_cp (FS_HEBREW))
{
set_bit (U_BASIC_LATIN);
set_bit (U_CURRENCY_SYMBOLS);
set_bit (U_BASIC_HEBREW);
set_bit (U_HEBREW_EXTENDED);
retval = TRUE;
}
if (check_cp (FS_ARABIC))
{
set_bit (U_BASIC_LATIN);
set_bit (U_CURRENCY_SYMBOLS);
set_bit (U_BASIC_ARABIC);
set_bit (U_ARABIC_EXTENDED);
retval = TRUE;
}
if (check_cp (FS_BALTIC))
{
set_bit (U_BASIC_LATIN);
set_bit (U_LATIN_1_SUPPLEMENT);
set_bit (U_CURRENCY_SYMBOLS);
set_bit (U_LATIN_EXTENDED_A);
set_bit (U_LATIN_EXTENDED_B);
retval = TRUE;
}
if (check_cp (FS_VIETNAMESE))
{
/* ??? */
set_bit (U_BASIC_LATIN);
retval = TRUE;
}
if (check_cp (FS_THAI))
{
set_bit (U_BASIC_LATIN);
set_bit (U_THAI);
retval = TRUE;
}
if (check_cp (FS_JISJAPAN))
{
/* Based on MS Gothic */
set_bit (U_BASIC_LATIN);
set_bit (U_CJK_SYMBOLS_AND_PUNCTUATION);
set_bit (U_HIRAGANA);
set_bit (U_KATAKANA);
set_bit (U_CJK_UNIFIED_IDEOGRAPHS);
set_bit (U_HALFWIDTH_AND_FULLWIDTH_FORMS);
retval = TRUE;
}
if (check_cp (FS_CHINESESIMP))
{
/* Based on MS Hei */
set_bit (U_BASIC_LATIN);
set_bit (U_HIRAGANA);
set_bit (U_KATAKANA);
set_bit (U_BOPOMOFO);
set_bit (U_CJK_UNIFIED_IDEOGRAPHS);
retval = TRUE;
}
if (check_cp (FS_WANSUNG)
|| check_cp (FS_JOHAB)) /* ??? */
{
/* Based on GulimChe. I wonder if all Korean fonts
* really support this large range of Unicode subranges?
*/
set_bit (U_BASIC_LATIN);
set_bit (U_LATIN_1_SUPPLEMENT);
set_bit (U_LATIN_EXTENDED_A);
set_bit (U_SPACING_MODIFIER_LETTERS);
set_bit (U_BASIC_GREEK);
set_bit (U_CYRILLIC);
set_bit (U_HANGUL_JAMO);
set_bit (U_GENERAL_PUNCTUATION);
set_bit (U_SUPERSCRIPTS_AND_SUBSCRIPTS);
set_bit (U_CURRENCY_SYMBOLS);
set_bit (U_LETTERLIKE_SYMBOLS);
set_bit (U_NUMBER_FORMS);
set_bit (U_ARROWS);
set_bit (U_MATHEMATICAL_OPERATORS);
set_bit (U_MISCELLANEOUS_TECHNICAL);
set_bit (U_ENCLOSED_ALPHANUMERICS);
set_bit (U_BOX_DRAWING);
set_bit (U_BLOCK_ELEMENTS);
set_bit (U_GEOMETRIC_SHAPES);
set_bit (U_MISCELLANEOUS_SYMBOLS);
set_bit (U_CJK_SYMBOLS_AND_PUNCTUATION);
set_bit (U_HIRAGANA);
set_bit (U_KATAKANA);
set_bit (U_HANGUL_COMPATIBILITY_JAMO);
set_bit (U_ENCLOSED_CJK);
set_bit (U_CJK_COMPATIBILITY_FORMS);
set_bit (U_HANGUL);
set_bit (U_CJK_UNIFIED_IDEOGRAPHS);
set_bit (U_CJK_COMPATIBILITY_IDEOGRAPHS);
set_bit (U_HALFWIDTH_AND_FULLWIDTH_FORMS);
retval = TRUE;
}
if (check_cp (FS_CHINESETRAD))
{
/* Based on MingLiU */
set_bit (U_BASIC_LATIN);
set_bit (U_GENERAL_PUNCTUATION);
set_bit (U_BOX_DRAWING);
set_bit (U_BLOCK_ELEMENTS);
set_bit (U_CJK_SYMBOLS_AND_PUNCTUATION);
set_bit (U_BOPOMOFO);
set_bit (U_CJK_UNIFIED_IDEOGRAPHS);
set_bit (U_CJK_COMPATIBILITY_IDEOGRAPHS);
set_bit (U_SMALL_FORM_VARIANTS);
set_bit (U_HALFWIDTH_AND_FULLWIDTH_FORMS);
retval = TRUE;
}
if (check_cp (FS_SYMBOL) || charset == MAC_CHARSET)
{
/* Non-Unicode encoding, I guess. Pretend it covers
* the single-byte range of values.
*/
set_bit (U_BASIC_LATIN);
set_bit (U_LATIN_1_SUPPLEMENT);
retval = TRUE;
}
if (retval)
return TRUE;
GDK_NOTE (MISC, g_print ("... No code page bits set!\n"));
/* Sigh. Not even any code page bits were set. Guess based on
* charset, then. These somewhat optimistic guesses are based on the
* table in Appendix M in the book "Developing ..." mentioned
* above.
*/
switch (charset)
{
case ANSI_CHARSET:
set_bit (U_BASIC_LATIN);
set_bit (U_LATIN_1_SUPPLEMENT);
set_bit (U_LATIN_EXTENDED_A);
set_bit (U_LATIN_EXTENDED_B);
set_bit (U_SPACING_MODIFIER_LETTERS);
set_bit (U_COMBINING_DIACRITICAL_MARKS);
set_bit (U_GENERAL_PUNCTUATION);
set_bit (U_SUPERSCRIPTS_AND_SUBSCRIPTS);
set_bit (U_CURRENCY_SYMBOLS);
#if 0 /* I find this too hard to believe... */
set_bit (U_BASIC_GREEK);
set_bit (U_CYRILLIC);
set_bit (U_BASIC_HEBREW);
set_bit (U_HEBREW_EXTENDED);
set_bit (U_BASIC_ARABIC);
set_bit (U_ARABIC_EXTENDED);
set_bit (U_LETTERLIKE_SYMBOLS);
set_bit (U_NUMBER_FORMS);
set_bit (U_ARROWS);
set_bit (U_MATHEMATICAL_OPERATORS);
set_bit (U_MISCELLANEOUS_TECHNICAL);
set_bit (U_ENCLOSED_ALPHANUMERICS);
set_bit (U_BOX_DRAWING);
set_bit (U_BLOCK_ELEMENTS);
set_bit (U_GEOMETRIC_SHAPES);
set_bit (U_MISCELLANEOUS_SYMBOLS);
set_bit (U_HIRAGANA);
set_bit (U_KATAKANA);
set_bit (U_BOPOMOFO);
set_bit (U_HANGUL_COMPATIBILITY_JAMO);
set_bit (U_CJK_MISCELLANEOUS);
set_bit (U_CJK_COMPATIBILITY);
set_bit (U_HANGUL);
set_bit (U_HANGUL_SUPPLEMENTARY_A);
set_bit (U_CJK_COMPATIBILITY_IDEOGRAPHS);
set_bit (U_ALPHABETIC_PRESENTATION_FORMS);
set_bit (U_SMALL_FORM_VARIANTS);
set_bit (U_ARABIC_PRESENTATION_FORMS_B);
set_bit (U_HALFWIDTH_AND_FULLWIDTH_FORMS);
set_bit (U_SPECIALS);
#endif
retval = TRUE;
break;
case SYMBOL_CHARSET:
/* Unggh */
set_bit (U_BASIC_LATIN);
set_bit (U_LATIN_1_SUPPLEMENT);
retval = TRUE;
break;
case SHIFTJIS_CHARSET:
case HANGEUL_CHARSET:
case GB2312_CHARSET:
case CHINESEBIG5_CHARSET:
case JOHAB_CHARSET:
/* The table really does claim these "locales" (it doesn't
* talk about charsets per se) cover the same Unicode
* subranges
*/
set_bit (U_BASIC_LATIN);
set_bit (U_LATIN_1_SUPPLEMENT);
set_bit (U_LATIN_EXTENDED_A);
set_bit (U_LATIN_EXTENDED_B);
set_bit (U_SPACING_MODIFIER_LETTERS);
set_bit (U_COMBINING_DIACRITICAL_MARKS_FOR_SYMBOLS);
set_bit (U_BASIC_GREEK);
set_bit (U_CYRILLIC);
set_bit (U_HANGUL_JAMO);
set_bit (U_GENERAL_PUNCTUATION);
set_bit (U_SUPERSCRIPTS_AND_SUBSCRIPTS);
set_bit (U_CURRENCY_SYMBOLS);
set_bit (U_LETTERLIKE_SYMBOLS);
set_bit (U_NUMBER_FORMS);
set_bit (U_ARROWS);
set_bit (U_MATHEMATICAL_OPERATORS);
set_bit (U_MISCELLANEOUS_TECHNICAL);
set_bit (U_ENCLOSED_ALPHANUMERICS);
set_bit (U_BOX_DRAWING);
set_bit (U_BLOCK_ELEMENTS);
set_bit (U_GEOMETRIC_SHAPES);
set_bit (U_MISCELLANEOUS_SYMBOLS);
set_bit (U_CJK_SYMBOLS_AND_PUNCTUATION);
set_bit (U_HIRAGANA);
set_bit (U_KATAKANA);
set_bit (U_BOPOMOFO);
set_bit (U_HANGUL_COMPATIBILITY_JAMO);
set_bit (U_CJK_MISCELLANEOUS);
set_bit (U_CJK_COMPATIBILITY);
set_bit (U_HANGUL);
set_bit (U_HANGUL_SUPPLEMENTARY_A);
set_bit (U_CJK_UNIFIED_IDEOGRAPHS);
set_bit (U_CJK_COMPATIBILITY_IDEOGRAPHS);
set_bit (U_ALPHABETIC_PRESENTATION_FORMS);
set_bit (U_SMALL_FORM_VARIANTS);
set_bit (U_ARABIC_PRESENTATION_FORMS_B);
set_bit (U_SPECIALS);
retval = TRUE;
break;
case HEBREW_CHARSET:
set_bit (U_BASIC_LATIN);
set_bit (U_LATIN_1_SUPPLEMENT);
set_bit (U_LATIN_EXTENDED_B);
set_bit (U_SPACING_MODIFIER_LETTERS);
set_bit (U_BASIC_HEBREW);
set_bit (U_HEBREW_EXTENDED);
set_bit (U_GENERAL_PUNCTUATION);
set_bit (U_LETTERLIKE_SYMBOLS);
retval = TRUE;
break;
case ARABIC_CHARSET:
set_bit (U_BASIC_LATIN);
set_bit (U_LATIN_1_SUPPLEMENT);
set_bit (U_LATIN_EXTENDED_A);
set_bit (U_LATIN_EXTENDED_B);
set_bit (U_SPACING_MODIFIER_LETTERS);
set_bit (U_BASIC_GREEK);
set_bit (U_BASIC_ARABIC);
set_bit (U_ARABIC_EXTENDED);
set_bit (U_GENERAL_PUNCTUATION);
set_bit (U_LETTERLIKE_SYMBOLS);
set_bit (U_ARROWS);
set_bit (U_MATHEMATICAL_OPERATORS);
set_bit (U_MISCELLANEOUS_TECHNICAL);
set_bit (U_BOX_DRAWING);
set_bit (U_BLOCK_ELEMENTS);
set_bit (U_GEOMETRIC_SHAPES);
set_bit (U_MISCELLANEOUS_SYMBOLS);
set_bit (U_HALFWIDTH_AND_FULLWIDTH_FORMS);
retval = TRUE;
break;
case GREEK_CHARSET:
set_bit (U_BASIC_LATIN);
set_bit (U_LATIN_1_SUPPLEMENT);
set_bit (U_LATIN_EXTENDED_B);
set_bit (U_BASIC_GREEK);
set_bit (U_GENERAL_PUNCTUATION);
set_bit (U_SUPERSCRIPTS_AND_SUBSCRIPTS);
set_bit (U_LETTERLIKE_SYMBOLS);
set_bit (U_ARROWS);
set_bit (U_MATHEMATICAL_OPERATORS);
set_bit (U_MISCELLANEOUS_TECHNICAL);
set_bit (U_BOX_DRAWING);
set_bit (U_BLOCK_ELEMENTS);
set_bit (U_GEOMETRIC_SHAPES);
set_bit (U_MISCELLANEOUS_SYMBOLS);
retval = TRUE;
break;
case TURKISH_CHARSET:
set_bit (U_BASIC_LATIN);
set_bit (U_LATIN_1_SUPPLEMENT);
set_bit (U_LATIN_EXTENDED_A);
set_bit (U_LATIN_EXTENDED_B);
set_bit (U_SPACING_MODIFIER_LETTERS);
set_bit (U_BASIC_GREEK);
set_bit (U_GENERAL_PUNCTUATION);
set_bit (U_SUPERSCRIPTS_AND_SUBSCRIPTS);
set_bit (U_CURRENCY_SYMBOLS);
set_bit (U_LETTERLIKE_SYMBOLS);
set_bit (U_ARROWS);
set_bit (U_MATHEMATICAL_OPERATORS);
set_bit (U_MISCELLANEOUS_TECHNICAL);
set_bit (U_BOX_DRAWING);
set_bit (U_BLOCK_ELEMENTS);
set_bit (U_GEOMETRIC_SHAPES);
set_bit (U_MISCELLANEOUS_SYMBOLS);
retval = TRUE;
break;
case VIETNAMESE_CHARSET:
case THAI_CHARSET:
/* These are not in the table, so I have no idea */
break;
case BALTIC_CHARSET:
set_bit (U_BASIC_LATIN);
set_bit (U_LATIN_1_SUPPLEMENT);
set_bit (U_LATIN_EXTENDED_A);
set_bit (U_LATIN_EXTENDED_B);
set_bit (U_SPACING_MODIFIER_LETTERS);
set_bit (U_BASIC_GREEK);
set_bit (U_GENERAL_PUNCTUATION);
set_bit (U_SUPERSCRIPTS_AND_SUBSCRIPTS);
set_bit (U_CURRENCY_SYMBOLS);
set_bit (U_LETTERLIKE_SYMBOLS);
set_bit (U_ARROWS);
set_bit (U_MATHEMATICAL_OPERATORS);
set_bit (U_MISCELLANEOUS_TECHNICAL);
set_bit (U_BOX_DRAWING);
set_bit (U_BLOCK_ELEMENTS);
set_bit (U_GEOMETRIC_SHAPES);
set_bit (U_MISCELLANEOUS_SYMBOLS);
retval = TRUE;
break;
case EASTEUROPE_CHARSET:
set_bit (U_BASIC_LATIN);
set_bit (U_LATIN_1_SUPPLEMENT);
set_bit (U_LATIN_EXTENDED_A);
set_bit (U_LATIN_EXTENDED_B);
set_bit (U_SPACING_MODIFIER_LETTERS);
set_bit (U_BASIC_GREEK);
set_bit (U_GENERAL_PUNCTUATION);
set_bit (U_SUPERSCRIPTS_AND_SUBSCRIPTS);
set_bit (U_CURRENCY_SYMBOLS);
set_bit (U_LETTERLIKE_SYMBOLS);
set_bit (U_ARROWS);
set_bit (U_MATHEMATICAL_OPERATORS);
set_bit (U_MISCELLANEOUS_TECHNICAL);
set_bit (U_BOX_DRAWING);
set_bit (U_BLOCK_ELEMENTS);
set_bit (U_GEOMETRIC_SHAPES);
set_bit (U_MISCELLANEOUS_SYMBOLS);
retval = TRUE;
break;
case RUSSIAN_CHARSET:
set_bit (U_BASIC_LATIN);
set_bit (U_LATIN_1_SUPPLEMENT);
set_bit (U_CYRILLIC);
set_bit (U_GENERAL_PUNCTUATION);
set_bit (U_LETTERLIKE_SYMBOLS);
set_bit (U_ARROWS);
set_bit (U_MATHEMATICAL_OPERATORS);
set_bit (U_MISCELLANEOUS_TECHNICAL);
set_bit (U_BOX_DRAWING);
set_bit (U_BLOCK_ELEMENTS);
set_bit (U_GEOMETRIC_SHAPES);
set_bit (U_MISCELLANEOUS_SYMBOLS);
retval = TRUE;
break;
}
#undef set_bit
return retval;
}
static GdkWin32SingleFont *
gdk_font_load_logfont (LOGFONT *lfp)
{
GdkWin32SingleFont *singlefont;
HFONT hfont;
LOGFONT logfont;
CHARSETINFO csi;
HGDIOBJ oldfont;
int tries;
gchar face[100];
for (tries = 0; ; tries++)
{
GDK_NOTE (MISC, g_print ("... trying %ld,%ld,%ld,%ld,"
"%ld,%d,%d,%d,"
"%d,%d,%d,"
"%d,%#.02x,\"%s\"\n",
lfp->lfHeight, lfp->lfWidth,
lfp->lfEscapement, lfp->lfOrientation,
lfp->lfWeight, lfp->lfItalic,
lfp->lfUnderline, lfp->lfStrikeOut,
lfp->lfCharSet,
lfp->lfOutPrecision, lfp->lfClipPrecision,
lfp->lfQuality, lfp->lfPitchAndFamily,
lfp->lfFaceName));
hfont = CreateFontIndirect (lfp);
if (hfont != NULL)
break;
/* If we fail, try some similar fonts often found on Windows. */
if (tries == 0)
{
if (g_strcasecmp (lfp->lfFaceName, "helvetica") == 0)
strcpy (lfp->lfFaceName, "arial");
else if (g_strcasecmp (lfp->lfFaceName, "new century schoolbook") == 0)
strcpy (lfp->lfFaceName, "century schoolbook");
else if (g_strcasecmp (lfp->lfFaceName, "courier") == 0)
strcpy (lfp->lfFaceName, "courier new");
else if (g_strcasecmp (lfp->lfFaceName, "lucida") == 0)
strcpy (lfp->lfFaceName, "lucida sans unicode");
else if (g_strcasecmp (lfp->lfFaceName, "lucidatypewriter") == 0)
strcpy (lfp->lfFaceName, "lucida console");
else if (g_strcasecmp (lfp->lfFaceName, "times") == 0)
strcpy (lfp->lfFaceName, "times new roman");
}
else if (tries == 1)
{
if (g_strcasecmp (lfp->lfFaceName, "courier") == 0)
{
strcpy (lfp->lfFaceName, "");
lfp->lfPitchAndFamily |= FF_MODERN;
}
else if (g_strcasecmp (lfp->lfFaceName, "times new roman") == 0)
{
strcpy (lfp->lfFaceName, "");
lfp->lfPitchAndFamily |= FF_ROMAN;
}
else if (g_strcasecmp (lfp->lfFaceName, "helvetica") == 0
|| g_strcasecmp (lfp->lfFaceName, "lucida") == 0)
{
strcpy (lfp->lfFaceName, "");
lfp->lfPitchAndFamily |= FF_SWISS;
}
else
{
strcpy (lfp->lfFaceName, "");
lfp->lfPitchAndFamily = (lfp->lfPitchAndFamily & 0x0F) | FF_DONTCARE;
}
}
else
break;
tries++;
}
if (!hfont)
return NULL;
singlefont = g_new (GdkWin32SingleFont, 1);
singlefont->hfont = hfont;
GetObject (singlefont->hfont, sizeof (logfont), &logfont);
oldfont = SelectObject (_gdk_display_hdc, singlefont->hfont);
memset (&singlefont->fs, 0, sizeof (singlefont->fs));
singlefont->charset = GetTextCharsetInfo (_gdk_display_hdc, &singlefont->fs, 0);
GetTextFace (_gdk_display_hdc, sizeof (face), face);
SelectObject (_gdk_display_hdc, oldfont);
if (TranslateCharsetInfo ((DWORD *) singlefont->charset, &csi,
TCI_SRCCHARSET)
&& singlefont->charset != MAC_CHARSET)
singlefont->codepage = csi.ciACP;
else
singlefont->codepage = 0;
GDK_NOTE (MISC, (g_print ("... = %p %s cs %s cp%d\n",
singlefont->hfont, face,
charset_name (singlefont->charset),
singlefont->codepage),
g_print ("... Unicode subranges:"),
print_unicode_subranges (&singlefont->fs)));
if (check_unicode_subranges (singlefont->charset, &singlefont->fs))
GDK_NOTE (MISC, (g_print ("... Guesstimated Unicode subranges:"),
print_unicode_subranges (&singlefont->fs)));
return singlefont;
}
static GdkWin32SingleFont *
gdk_font_load_internal (const gchar *font_name)
{
LOGFONT logfont;
char *fn;
int numfields, n1, n2;
char foundry[32], family[100], weight[32], slant[32], set_width[32],
spacing[32], registry[32], encoding[32];
char pixel_size[10], point_size[10], res_x[10], res_y[10], avg_width[10];
int c;
char *p;
int logpixelsy;
g_return_val_if_fail (font_name != NULL, NULL);
GDK_NOTE (MISC, g_print ("gdk_font_load_internal: %s\n", font_name));
numfields = sscanf (font_name,
"-%30[^-]-%100[^-]-%30[^-]-%30[^-]-%30[^-]-%n",
foundry,
family,
weight,
slant,
set_width,
&n1);
if (numfields == 0)
{
/* Probably a plain Windows font name */
logfont.lfHeight = 0;
logfont.lfWidth = 0;
logfont.lfEscapement = 0;
logfont.lfOrientation = 0;
logfont.lfWeight = FW_DONTCARE;
logfont.lfItalic = FALSE;
logfont.lfUnderline = FALSE;
logfont.lfStrikeOut = FALSE;
logfont.lfCharSet = ANSI_CHARSET;
logfont.lfOutPrecision = OUT_TT_ONLY_PRECIS;
logfont.lfClipPrecision = CLIP_DEFAULT_PRECIS;
logfont.lfQuality = PROOF_QUALITY;
logfont.lfPitchAndFamily = DEFAULT_PITCH;
fn = g_filename_from_utf8 (font_name, -1, NULL, NULL, NULL);
strcpy (logfont.lfFaceName, fn);
g_free (fn);
}
else if (numfields != 5)
{
g_warning ("gdk_font_load: font name %s illegal", font_name);
return NULL;
}
else
{
/* It must be a XLFD name */
/* Check for hex escapes in the font family,
* put in there by logfont_to_xlfd. Convert them in-place.
*/
p = family;
while (*p)
{
if (*p == '%' && isxdigit (p[1]) && isxdigit (p[2]))
{
sscanf (p+1, "%2x", &c);
*p = c;
strcpy (p+1, p+3);
}
p++;
}
/* Skip add_style which often is empty in the requested font name */
while (font_name[n1] && font_name[n1] != '-')
n1++;
numfields++;
numfields += sscanf (font_name + n1,
"-%8[^-]-%8[^-]-%8[^-]-%8[^-]-%30[^-]-%8[^-]-%30[^-]-%30[^-]%n",
pixel_size,
point_size,
res_x,
res_y,
spacing,
avg_width,
registry,
encoding,
&n2);
if (numfields != 14 || font_name[n1 + n2] != '\0')
{
g_warning ("gdk_font_load: font name %s illegal", font_name);
return NULL;
}
logpixelsy = GetDeviceCaps (_gdk_display_hdc, LOGPIXELSY);
if (strcmp (pixel_size, "*") == 0)
if (strcmp (point_size, "*") == 0)
logfont.lfHeight = 0;
else
logfont.lfHeight = (int) (((double) atoi (point_size))/720.*logpixelsy);
else
logfont.lfHeight = atoi (pixel_size);
logfont.lfWidth = 0;
logfont.lfEscapement = 0;
logfont.lfOrientation = 0;
if (g_strcasecmp (weight, "thin") == 0)
logfont.lfWeight = FW_THIN;
else if (g_strcasecmp (weight, "extralight") == 0)
logfont.lfWeight = FW_EXTRALIGHT;
else if (g_strcasecmp (weight, "ultralight") == 0)
#ifdef FW_ULTRALIGHT
logfont.lfWeight = FW_ULTRALIGHT;
#else
logfont.lfWeight = FW_EXTRALIGHT; /* In fact, FW_ULTRALIGHT really is
* defined as FW_EXTRALIGHT anyway.
*/
#endif
else if (g_strcasecmp (weight, "light") == 0)
logfont.lfWeight = FW_LIGHT;
else if (g_strcasecmp (weight, "normal") == 0)
logfont.lfWeight = FW_NORMAL;
else if (g_strcasecmp (weight, "regular") == 0)
logfont.lfWeight = FW_REGULAR;
else if (g_strcasecmp (weight, "medium") == 0)
logfont.lfWeight = FW_MEDIUM;
else if (g_strcasecmp (weight, "semibold") == 0)
logfont.lfWeight = FW_SEMIBOLD;
else if (g_strcasecmp (weight, "demibold") == 0)
#ifdef FW_DEMIBOLD
logfont.lfWeight = FW_DEMIBOLD;
#else
logfont.lfWeight = FW_SEMIBOLD; /* As above */
#endif
else if (g_strcasecmp (weight, "bold") == 0)
logfont.lfWeight = FW_BOLD;
else if (g_strcasecmp (weight, "extrabold") == 0)
logfont.lfWeight = FW_EXTRABOLD;
else if (g_strcasecmp (weight, "ultrabold") == 0)
#ifdef FW_ULTRABOLD
logfont.lfWeight = FW_ULTRABOLD;
#else
logfont.lfWeight = FW_EXTRABOLD; /* As above */
#endif
else if (g_strcasecmp (weight, "heavy") == 0)
logfont.lfWeight = FW_HEAVY;
else if (g_strcasecmp (weight, "black") == 0)
#ifdef FW_BLACK
logfont.lfWeight = FW_BLACK;
#else
logfont.lfWeight = FW_HEAVY; /* As above */
#endif
else
logfont.lfWeight = FW_DONTCARE;
if (g_strcasecmp (slant, "italic") == 0
|| g_strcasecmp (slant, "oblique") == 0
|| g_strcasecmp (slant, "i") == 0
|| g_strcasecmp (slant, "o") == 0)
logfont.lfItalic = TRUE;
else
logfont.lfItalic = FALSE;
logfont.lfUnderline = FALSE;
logfont.lfStrikeOut = FALSE;
if (g_strcasecmp (registry, "iso8859") == 0)
if (strcmp (encoding, "1") == 0)
logfont.lfCharSet = ANSI_CHARSET;
else if (strcmp (encoding, "2") == 0)
logfont.lfCharSet = EASTEUROPE_CHARSET;
else if (strcmp (encoding, "7") == 0)
logfont.lfCharSet = GREEK_CHARSET;
else if (strcmp (encoding, "8") == 0)
logfont.lfCharSet = HEBREW_CHARSET;
else if (strcmp (encoding, "9") == 0)
logfont.lfCharSet = TURKISH_CHARSET;
else
logfont.lfCharSet = ANSI_CHARSET; /* XXX ??? */
else if (g_strcasecmp (registry, "jisx0208.1983") == 0)
logfont.lfCharSet = SHIFTJIS_CHARSET;
else if (g_strcasecmp (registry, "ksc5601.1987") == 0)
logfont.lfCharSet = HANGEUL_CHARSET;
else if (g_strcasecmp (registry, "gb2312.1980") == 0)
logfont.lfCharSet = GB2312_CHARSET;
else if (g_strcasecmp (registry, "big5") == 0)
logfont.lfCharSet = CHINESEBIG5_CHARSET;
else if (g_strcasecmp (registry, "windows") == 0
|| g_strcasecmp (registry, "microsoft") == 0)
if (g_strcasecmp (encoding, "symbol") == 0)
logfont.lfCharSet = SYMBOL_CHARSET;
else if (g_strcasecmp (encoding, "shiftjis") == 0)
logfont.lfCharSet = SHIFTJIS_CHARSET;
else if (g_strcasecmp (encoding, "gb2312") == 0)
logfont.lfCharSet = GB2312_CHARSET;
else if (g_strcasecmp (encoding, "hangeul") == 0)
logfont.lfCharSet = HANGEUL_CHARSET;
else if (g_strcasecmp (encoding, "big5") == 0)
logfont.lfCharSet = CHINESEBIG5_CHARSET;
else if (g_strcasecmp (encoding, "johab") == 0)
logfont.lfCharSet = JOHAB_CHARSET;
else if (g_strcasecmp (encoding, "hebrew") == 0)
logfont.lfCharSet = HEBREW_CHARSET;
else if (g_strcasecmp (encoding, "arabic") == 0)
logfont.lfCharSet = ARABIC_CHARSET;
else if (g_strcasecmp (encoding, "greek") == 0)
logfont.lfCharSet = GREEK_CHARSET;
else if (g_strcasecmp (encoding, "turkish") == 0)
logfont.lfCharSet = TURKISH_CHARSET;
else if (g_strcasecmp (encoding, "easteurope") == 0)
logfont.lfCharSet = EASTEUROPE_CHARSET;
else if (g_strcasecmp (encoding, "russian") == 0)
logfont.lfCharSet = RUSSIAN_CHARSET;
else if (g_strcasecmp (encoding, "mac") == 0)
logfont.lfCharSet = MAC_CHARSET;
else if (g_strcasecmp (encoding, "baltic") == 0)
logfont.lfCharSet = BALTIC_CHARSET;
else if (g_strcasecmp (encoding, "cp1251") == 0)
logfont.lfCharSet = RUSSIAN_CHARSET;
else
logfont.lfCharSet = ANSI_CHARSET; /* XXX ??? */
else
logfont.lfCharSet = ANSI_CHARSET; /* XXX ??? */
logfont.lfOutPrecision = OUT_TT_PRECIS;
logfont.lfClipPrecision = CLIP_DEFAULT_PRECIS;
logfont.lfQuality = PROOF_QUALITY;
if (g_strcasecmp (spacing, "m") == 0)
logfont.lfPitchAndFamily = FIXED_PITCH;
else if (g_strcasecmp (spacing, "p") == 0)
logfont.lfPitchAndFamily = VARIABLE_PITCH;
else
logfont.lfPitchAndFamily = DEFAULT_PITCH;
fn = g_filename_from_utf8 (family, -1, NULL, NULL, NULL);
strcpy (logfont.lfFaceName, fn);
g_free (fn);
}
return gdk_font_load_logfont (&logfont);
}
static GdkFont *
gdk_font_from_one_singlefont (GdkWin32SingleFont *singlefont)
{
GdkFont *font;
GdkFontPrivateWin32 *private;
HGDIOBJ oldfont;
TEXTMETRIC textmetric;
private = g_new (GdkFontPrivateWin32, 1);
font = (GdkFont*) private;
private->base.ref_count = 1;
private->names = NULL;
private->fonts = g_slist_append (NULL, singlefont);
/* Pretend all fonts are fontsets... Gtktext and gtkentry work better
* that way, they use wide chars, which is necessary for non-ASCII
* chars to work. (Yes, even Latin-1, as we use Unicode internally.)
*/
font->type = GDK_FONT_FONTSET;
oldfont = SelectObject (_gdk_display_hdc, singlefont->hfont);
GetTextMetrics (_gdk_display_hdc, &textmetric);
SelectObject (_gdk_display_hdc, oldfont);
font->ascent = textmetric.tmAscent;
font->descent = textmetric.tmDescent;
GDK_NOTE (MISC, g_print ("... asc %d desc %d\n",
font->ascent, font->descent));
return font;
}
GdkFont*
gdk_font_load_for_display (GdkDisplay *display,
const gchar *font_name)
{
GdkFont *font;
GdkFontPrivateWin32 *private;
GdkWin32SingleFont *singlefont;
HGDIOBJ oldfont;
TEXTMETRIC textmetric;
g_return_val_if_fail (font_name != NULL, NULL);
g_return_val_if_fail (display == gdk_display_get_default (), NULL);
font = gdk_font_hash_lookup (GDK_FONT_FONTSET, font_name);
if (font)
return font;
private = g_new (GdkFontPrivateWin32, 1);
font = (GdkFont*) private;
singlefont = gdk_font_load_internal (font_name);
private->base.ref_count = 1;
private->names = NULL;
private->fonts = g_slist_append (NULL, singlefont);
/* Pretend all fonts are fontsets... Gtktext and gtkentry work better
* that way, they use wide chars, which is necessary for non-ASCII
* chars to work. (Yes, even Latin-1, as we use Unicode internally.)
*/
font->type = GDK_FONT_FONTSET;
oldfont = SelectObject (_gdk_display_hdc, singlefont->hfont);
GetTextMetrics (_gdk_display_hdc, &textmetric);
SelectObject (_gdk_display_hdc, oldfont);
font->ascent = textmetric.tmAscent;
font->descent = textmetric.tmDescent;
GDK_NOTE (MISC, g_print ("... asc %d desc %d\n",
font->ascent, font->descent));
gdk_font_hash_insert (GDK_FONT_FONTSET, font, font_name);
return gdk_font_from_one_singlefont (gdk_font_load_internal (font_name));
}
GdkFont*
gdk_font_from_description_for_display (GdkDisplay *display,
PangoFontDescription *font_desc)
{
PangoFontMap *font_map;
PangoFont *font;
GdkFont *result = NULL;
g_return_val_if_fail (font_desc != NULL, NULL);
g_return_val_if_fail (display == gdk_display_get_default (), NULL);
font_map = pango_win32_font_map_for_display ();
font = pango_font_map_load_font (font_map, gdk_pango_context_get (), font_desc);
if (font)
{
LOGFONT *lfp =
pango_win32_font_logfont (font);
result = gdk_font_from_one_singlefont (gdk_font_load_logfont (lfp));
g_free (lfp);
g_object_unref (font);
}
return result;
}
GdkFont*
gdk_fontset_load (const gchar *fontset_name)
{
GdkFont *font;
GdkFontPrivateWin32 *private;
GdkWin32SingleFont *singlefont;
HGDIOBJ oldfont;
TEXTMETRIC textmetric;
gchar *fs;
gchar *b, *p, *s;
g_return_val_if_fail (fontset_name != NULL, NULL);
font = gdk_font_hash_lookup (GDK_FONT_FONTSET, fontset_name);
if (font)
return font;
s = fs = g_strdup (fontset_name);
while (*s && isspace (*s))
s++;
g_return_val_if_fail (*s, NULL);
private = g_new (GdkFontPrivateWin32, 1);
font = (GdkFont*) private;
private->base.ref_count = 1;
private->names = NULL;
private->fonts = NULL;
font->type = GDK_FONT_FONTSET;
font->ascent = 0;
font->descent = 0;
while (TRUE)
{
if ((p = strchr (s, ',')) != NULL)
b = p;
else
b = s + strlen (s);
while (isspace (b[-1]))
b--;
*b = '\0';
singlefont = gdk_font_load_internal (s);
if (singlefont)
{
private->fonts = g_slist_append (private->fonts, singlefont);
oldfont = SelectObject (_gdk_display_hdc, singlefont->hfont);
GetTextMetrics (_gdk_display_hdc, &textmetric);
SelectObject (_gdk_display_hdc, oldfont);
font->ascent = MAX (font->ascent, textmetric.tmAscent);
font->descent = MAX (font->descent, textmetric.tmDescent);
}
if (p)
{
s = p + 1;
while (*s && isspace (*s))
s++;
}
else
break;
if (!*s)
break;
}
g_free (fs);
gdk_font_hash_insert (GDK_FONT_FONTSET, font, fontset_name);
return font;
}
void
_gdk_font_destroy (GdkFont *font)
{
GdkFontPrivateWin32 *private = (GdkFontPrivateWin32 *) font;
GdkWin32SingleFont *singlefont;
GSList *list;
singlefont = (GdkWin32SingleFont *) private->fonts->data;
GDK_NOTE (MISC, g_print ("_gdk_font_destroy %p\n",
singlefont->hfont));
gdk_font_hash_remove (font->type, font);
switch (font->type)
{
case GDK_FONT_FONT:
DeleteObject (singlefont->hfont);
break;
case GDK_FONT_FONTSET:
list = private->fonts;
while (list)
{
singlefont = (GdkWin32SingleFont *) list->data;
DeleteObject (singlefont->hfont);
list = list->next;
}
g_slist_free (private->fonts);
break;
}
g_free (font);
}
gint
_gdk_font_strlen (GdkFont *font,
const gchar *str)
{
g_return_val_if_fail (font != NULL, -1);
g_return_val_if_fail (str != NULL, -1);
return strlen (str);
}
gint
gdk_font_id (const GdkFont *font)
{
const GdkFontPrivateWin32 *private;
g_return_val_if_fail (font != NULL, 0);
private = (const GdkFontPrivateWin32 *) font;
if (font->type == GDK_FONT_FONT)
return (gint) ((GdkWin32SingleFont *) private->fonts->data)->hfont;
else
return 0;
}
gboolean
gdk_font_equal (const GdkFont *fonta,
const GdkFont *fontb)
{
const GdkFontPrivateWin32 *privatea;
const GdkFontPrivateWin32 *privateb;
g_return_val_if_fail (fonta != NULL, FALSE);
g_return_val_if_fail (fontb != NULL, FALSE);
privatea = (const GdkFontPrivateWin32 *) fonta;
privateb = (const GdkFontPrivateWin32 *) fontb;
if (fonta->type == GDK_FONT_FONT && fontb->type == GDK_FONT_FONT)
return (((GdkWin32SingleFont *) privatea->fonts->data)->hfont
== ((GdkWin32SingleFont *) privateb->fonts->data)->hfont);
else if (fonta->type == GDK_FONT_FONTSET && fontb->type == GDK_FONT_FONTSET)
{
GSList *lista = privatea->fonts;
GSList *listb = privateb->fonts;
while (lista && listb)
{
if (((GdkWin32SingleFont *) lista->data)->hfont
!= ((GdkWin32SingleFont *) listb->data)->hfont)
return 0;
lista = lista->next;
listb = listb->next;
}
if (lista || listb)
return 0;
else
return 1;
}
else
return 0;
}
/* Return the Unicode Subset bitfield number for a Unicode character */
static int
unicode_classify (wchar_t wc)
{
int min = 0;
int max = G_N_ELEMENTS (utab) - 1;
int mid;
while (max >= min)
{
mid = (min + max) / 2;
if (utab[mid].high < wc)
min = mid + 1;
else if (wc < utab[mid].low)
max = mid - 1;
else if (utab[mid].low <= wc && wc <= utab[mid].high)
return utab[mid].bit;
else
break;
}
/* Fallback... returning -1 might cause problems. Returning
* U_BASIC_LATIN won't help handling strange characters, but won't
* do harm either.
*/
return U_BASIC_LATIN;
}
void
_gdk_wchar_text_handle (GdkFont *font,
const wchar_t *wcstr,
int wclen,
void (*handler)(GdkWin32SingleFont *,
const wchar_t *,
int,
void *),
void *arg)
{
GdkFontPrivateWin32 *private;
GdkWin32SingleFont *singlefont;
GSList *list;
int block;
const wchar_t *start, *end, *wcp;
wcp = wcstr;
end = wcp + wclen;
private = (GdkFontPrivateWin32 *) font;
g_assert (private->base.ref_count > 0);
GDK_NOTE (MISC, g_print ("_gdk_wchar_text_handle: "));
while (wcp < end)
{
/* Split Unicode string into pieces of the same class */
start = wcp;
block = unicode_classify (*wcp);
while (wcp + 1 < end && unicode_classify (wcp[1]) == block)
wcp++;
/* Find a font in the fontset that can handle this class */
list = private->fonts;
while (list)
{
singlefont = (GdkWin32SingleFont *) list->data;
if (singlefont->fs.fsUsb[block/32] & (1 << (block % 32)))
break;
list = list->next;
}
if (!list)
singlefont = NULL;
GDK_NOTE (MISC, g_print ("%d:%d:%d:%p ",
start-wcstr, wcp-wcstr, block,
(singlefont ? singlefont->hfont : 0)));
/* Call the callback function */
(*handler) (singlefont, start, wcp+1 - start, arg);
wcp++;
}
GDK_NOTE (MISC, g_print ("\n"));
}
typedef struct
{
SIZE total;
} gdk_text_size_arg;
static void
gdk_text_size_handler (GdkWin32SingleFont *singlefont,
const wchar_t *wcstr,
int wclen,
void *argp)
{
SIZE this_size;
HGDIOBJ oldfont;
gdk_text_size_arg *arg = (gdk_text_size_arg *) argp;
if (!singlefont)
return;
if ((oldfont = SelectObject (_gdk_display_hdc, singlefont->hfont)) == NULL)
{
WIN32_GDI_FAILED ("SelectObject");
return;
}
GetTextExtentPoint32W (_gdk_display_hdc, wcstr, wclen, &this_size);
SelectObject (_gdk_display_hdc, oldfont);
arg->total.cx += this_size.cx;
arg->total.cy = MAX (arg->total.cy, this_size.cy);
}
gint
gdk_text_width (GdkFont *font,
const gchar *text,
gint text_length)
{
gint width = -1;
gdk_text_extents (font, text, text_length, NULL, NULL, &width, NULL, NULL);
return width;
}
gint
gdk_text_width_wc (GdkFont *font,
const GdkWChar *text,
gint text_length)
{
gint width = -1;
gdk_text_extents_wc (font, text, text_length, NULL, NULL, &width, NULL, NULL);
return width;
}
void
gdk_text_extents (GdkFont *font,
const gchar *text,
gint text_length,
gint *lbearing,
gint *rbearing,
gint *width,
gint *ascent,
gint *descent)
{
gdk_text_size_arg arg;
gint wlen;
wchar_t *wcstr;
g_return_if_fail (font != NULL);
g_return_if_fail (text != NULL);
if (text_length == 0)
{
if (lbearing)
*lbearing = 0;
if (rbearing)
*rbearing = 0;
if (width)
*width = 0;
if (ascent)
*ascent = 0;
if (descent)
*descent = 0;
return;
}
g_assert (font->type == GDK_FONT_FONT || font->type == GDK_FONT_FONTSET);
arg.total.cx = arg.total.cy = 0;
wcstr = g_new (wchar_t, text_length);
if (text_length == 1)
{
wcstr[0] = (guchar) text[0];
_gdk_wchar_text_handle (font, wcstr, 1, gdk_text_size_handler, &arg);
}
else
{
if ((wlen = _gdk_utf8_to_ucs2 (wcstr, text, text_length, text_length)) == -1)
g_warning ("gdk_text_extents: _gdk_utf8_to_ucs2 failed");
else
_gdk_wchar_text_handle (font, wcstr, wlen, gdk_text_size_handler, &arg);
}
g_free (wcstr);
/* XXX This is quite bogus */
if (lbearing)
*lbearing = 0;
if (rbearing)
*rbearing = arg.total.cx;
/* What should be the difference between width and rbearing? */
if (width)
*width = arg.total.cx;
if (ascent)
*ascent = arg.total.cy + 1;
if (descent)
*descent = font->descent + 1;
}
void
gdk_text_extents_wc (GdkFont *font,
const GdkWChar *text,
gint text_length,
gint *lbearing,
gint *rbearing,
gint *width,
gint *ascent,
gint *descent)
{
gdk_text_size_arg arg;
wchar_t *wcstr;
gint i;
g_return_if_fail (font != NULL);
g_return_if_fail (text != NULL);
if (text_length == 0)
{
if (lbearing)
*lbearing = 0;
if (rbearing)
*rbearing = 0;
if (width)
*width = 0;
if (ascent)
*ascent = 0;
if (descent)
*descent = 0;
return;
}
g_assert (font->type == GDK_FONT_FONT || font->type == GDK_FONT_FONTSET);
if (sizeof (wchar_t) != sizeof (GdkWChar))
{
wcstr = g_new (wchar_t, text_length);
for (i = 0; i < text_length; i++)
wcstr[i] = text[i];
}
else
wcstr = (wchar_t *) text;
arg.total.cx = arg.total.cy = 0;
_gdk_wchar_text_handle (font, wcstr, text_length,
gdk_text_size_handler, &arg);
if (sizeof (wchar_t) != sizeof (GdkWChar))
g_free (wcstr);
/* XXX This is quite bogus */
if (lbearing)
*lbearing = 0;
if (rbearing)
*rbearing = arg.total.cx;
if (width)
*width = arg.total.cx;
if (ascent)
*ascent = arg.total.cy + 1;
if (descent)
*descent = font->descent + 1;
}
Reference in New Issue View Git Blame Copy Permalink