diff options
author | Havoc Pennington <hp@redhat.com> | 2000-06-02 03:14:07 +0000 |
---|---|---|
committer | Owen Taylor <otaylor@src.gnome.org> | 2000-06-02 03:14:07 +0000 |
commit | 9ae724bf4d72d1eed98f3e55a640b31ff552e8f1 (patch) | |
tree | 184c2860125ced111f7efcae065219ecec021308 /gtk/gtkfontsel.c | |
parent | 3f0092c4e63f2cc633e270e590a6c30a983f1c7f (diff) | |
download | gdk-pixbuf-9ae724bf4d72d1eed98f3e55a640b31ff552e8f1.tar.gz |
Remove all references to offscreen flag which was no longer used.
Thu Jun 1 23:05:13 2000 Owen Taylor <otaylor@redhat.com>
* gtk/gtkwidget.c: Remove all references to
offscreen flag which was no longer used.
* gtk/gtkprivate.h (enum): Remove unused flags and compress.
* gtk/gtkframe.c (gtk_frame_set_label_widget): Check
for non-null label_widget->parent.
* gtk/gtkentry.c: Get rid of code to deal with PangoAttribute
which no longer was used.
* gdk/gdkpango.c (gdk_pango_context_get_info): make static.
* gdk/gdkpango.c (gdk_draw_layout[_line]): Add checks
for null arguments.
* gdk/x11/gdkgeometry-x11.c (gdk_window_scroll): add
check for destroyed windows.
Thu Jun 1 13:48:45 2000 Owen Taylor <otaylor@redhat.com>
* gtk/gtkimmulticontext.c: Add a finalize method and unref
the slave context there.
* gtk/gtkinvisible.[ch]: Make reference counting behavior
identical to GtkWindow.
Thu Jun 1 01:54:11 2000 Owen Taylor <otaylor@redhat.com>
* Makefile.am gdk/gdkpango.c: Copy the layout render function from
pangox to here, so we can write them independent of rendering
system, using GDK primitives.
* gdk/gdkdrawable.h gdk/gdkdraw.c gdk/gdkwindow.c
gdk/x11/gdkdrawable-x11.c: Remove draw_layout() from the vtable,
since we have a rendering-system independent implementation in
terms of draw_glyphs().
* gdk/gdkpango.c gdkdrawable.h (gdk_draw_layout_line): New
function to render a single line.
* gdk/x11/gdkpango.c: Move the guts of this file mostly
into ../gdkpango.c, which simplifies things, since we
don't have to deal with raw X gc's.
Fri May 19 04:28:16 2000 Owen Taylor <otaylor@redhat.com>
* gtk/gtktextlayout.[ch]: Add get_log_attrs() function to
get the logical attributes for a given GtkTextLine.
Tue May 30 16:05:39 2000 Owen Taylor <otaylor@redhat.com>
* gdk/x11/gdkfont-x11.c (gdk_font_charset_for_locale): Track
g_locale_get_codeset() to g_get_codeset() change.
Tue May 30 15:03:19 2000 Owen Taylor <otaylor@redhat.com>
* gtk/testcalendar.c (calendar_font_selection_ok): Use font
descriptions.
* gtk/gtkentry.c (gtk_entry_draw_text): Center text within
the entry.
* gtk/gtkfontsel.c (gtk_font_selection_dialog_init): Start of
redoing (vastly simplifying) for Pango. Still needs quite
a bit of work. (Size selection is currently poor. List of
predefined sizes is not a good idea, since all of these
sizes won't necessarily be distinct.)
Tue May 30 13:50:19 2000 Owen Taylor <otaylor@redhat.com>
* gdk/x11/gdkfont-x11.c (gdk_font_charset_for_locale): Handle
CODESET results for LANG=C.
Mon May 29 15:49:10 2000 Owen Taylor <otaylor@redhat.com>
* gtk/gtkrc.[ch]: Add a 'font_name' declaration to RC
which takes a stringized pango font description;
ignore the older 'font' and 'fontset' declarations.
* gtk/gtkstyle.c gtk/gtkrc.c: Fill in the style->font
field with a GdkFont derived via gdk_font_from_description(),
for compatibility. (Should we just remove it entirely?
Probably too much compatibility breakage, but people
should be migrating to the new Pango stuff as quickly
as possible.)
Mon May 29 15:47:41 2000 Owen Taylor <otaylor@redhat.com>
* gtk/gtkentry.c gtk/gtkclist.c: s/pango_font_unref/g_object_unref/.
Mon May 29 15:44:46 2000 Owen Taylor <otaylor@redhat.com>
* gtk/gtkcalender.c: Roughly pango-ized. Really needs
redoing; there are some bugs in size allocation right
now, the semi-existant distinction between header / day
fonts was removed, but, with Pango, could actually
be made functional in a nice way.
* gtk/testcalender: Move calender from examples into this
directory as a test program. (We really need to restrcture
testgtk into a whole directory full of tests for every
widget or functionality group, separated into multiple .c
files.)
Mon May 29 15:19:56 2000 Owen Taylor <otaylor@redhat.com>
* gtk/testgtk.c (file_exists): Fix stupid typo that
was keeping RC file from being loaded.
* gtk/testgtkrc gtk/testgtkrc2: Test new pango-ized
RC file font code.
Mon May 29 14:31:27 2000 Owen Taylor <otaylor@redhat.com>
* gdk/gdkfont.h gdk/x11/gdkfont-x11.c (gdk_font_from_description):
Add function to load a GdkFont from a PangoFontDescription.
Fri May 26 17:16:40 2000 Owen Taylor <otaylor@redhat.com>
* gtk/frame.[ch] gtkaspectframe.c: Make frame widgets able
to have any widget for the label, use a GtkLabel widget
to display the text. (Based partially on a patch from
Anders Carlson.)
(Quite a bit of code reorganization - strip 90% of the
guts out of gtkaspectframe and add a single virtual
func to GtkFrameClass - compute_child_allocation.)
Fri May 26 12:00:02 2000 Owen Taylor <otaylor@redhat.com>
* gtk/gtkctree.c gtk/gtkclist.[ch]: Pangoized.
(Removed clist->row_center_offset field because caching
it wasn't saving time or code, added private function
_gtk_clist_create_cell_layout()).
Wed May 24 15:59:37 2000 Owen Taylor <otaylor@redhat.com>
* gtk/gtkaccellabel.c: Pangoized.
* gtk/[hv]ruler.c: Pangoized
Mon May 22 19:23:59 2000 Owen Taylor <otaylor@redhat.com>
* gtk/gtkfilesel.c (gtk_file_selection_init):
Use gtk_clist_set_column_auto_resize() to remove need
need for manual column width computations.
Mon May 22 18:50:26 2000 Owen Taylor <otaylor@redhat.com>
* gtk/gtktooltips.[ch]: Replace custom drawing with a GtkLabel,
ensuring Pango correctness, and considerably simplifying the
code.
* gtk/gtklabel.c gtk[hv]scale.c: 1000 => PANGO_SCALE.
* gtk/gtklabel.c (gtk_label_size_request): Fixed incorrect
getting of numbers of lines.
* gtk/gtklabel.c (gtk_label_size_request): Set the requisition
to the actual requested width of the lable, not to the wrap
width we set.
* gtk/gtktextchild.h: Remove extraneous include of gtk/gtk.h.
* gtk/gtktextbtree.c gtk/gtktextbuffer.c gtk/gtktextlayout.c
gtk/gtktextview.c gtk/gtktextview.[ch]: Fix up includes.
* gtk/gtktextview.c: Fix structure inheritance.
* gtk/gtkprogressbar.c: Pangoize.
Mon May 22 15:47:30 2000 Owen Taylor <otaylor@redhat.com>
* gtk/gtktextview.c (gtk_text_view_get_first_para_iter): Encapsulate
in a function.
* gtk/gtktextlayout.c (find_display_line_above): Fixed
bug with computing line tops.
* gtk/gtktextview.c (changed_handler): Fix < , <= confusion.
Thu May 18 18:53:31 2000 Owen Taylor <otaylor@redhat.com>
* gtk/gtktextdisplay.c (gtk_text_layout_draw): Fix up the x_offset
and y_offset coordinates to do what we need now. (The offset between
buffer and layout coordinates has been reintroduced, but is a
bit different than before.)
* gtk/gtktextview.[ch]: No longer inherit from GtkLayout; instead
handle the adjustments ourselves, and scroll as necessary using
the new gdk_window_scroll().
The advantage of this is that when we are incrementally revalidating,
we are essentially rearranging things around the visible portion
of the screen. With the old setup, the visible portion of the
screen was moved around in the layout, so scrolling and redrawing
to track that caused jumping of the display. Since we now
control the scrolling ourselves, we can suppress this and
only redraw when things actually change.
Thu May 18 18:47:25 2000 Owen Taylor <otaylor@redhat.com>
* gtk/gtktextbtree.c (redisplay_mark): We need to invalidate
the region not just redisplay it after-all, since we store the
cursors in the LineDisplay. (Ugly interactions here between
GtkLayout and GtkTextBTree here.)
* gtk/gtktextbtree.c (redisplay_region): Fixed reversed comparison.
Thu May 18 18:43:21 2000 Owen Taylor <otaylor@redhat.com>
* gdk/gdkwindow.h gdk/x11/gdkgeometry-x11.c (gdk_window_scroll):
Added function to scroll contents of a window while keeping the
window constant. Works by XCopyArea or guffaw-scrolling depending
on the details of how the window is set up. (guffaw-scrolling
still needs to be filled in.)
Wed May 17 22:36:53 2000 Owen Taylor <otaylor@redhat.com>
* gtk/gtktextiter.c gtk/gtkmain.c: Add a debug key for the text widget,
move the debugging that was tied to a global variable
to that.
* gtk/gtkmarshal.list: Add NONE:INT,INT,INT
* gtk/gtktextbtree.[ch] gtk/gtktextlayout.c: Keep a separate
validated flag, in line data instead of setting height/width to
-1. This allows us to perform operations with partially invalid
buffer (using the old size for invalid lines) and thus to do
incremental vaidation. Keep height/width aggregates up to date
when deleting text and rebalancing the tree.
* gtk/gtktextbtree.[ch]: Add functions validate a line
(gtk_text_btree_validate_line), and to validate up
to a number of pixels (gtk_text_btree_validate).
* gtk/gtktextlayout.[ch]: Add an ::invalidated signal
that indicates that something is changed and a revalidation
pass is needed. Change ::need_repaint to ::changed, and
make it take old and new yranges instead of a rectangle.
* gtk/gtktextbtree.[ch] gtk/gtktextlayout.[ch]: Move
the line_data_destroy() function from
gtk_text_btree_add_view() to a virtual function in
GtkTextLayout
* gtk/gtktextbtree.[ch]: Remove gtk_text_btree_get_damage_range(),
since we are handling partial repaints in a different fashion
now.
* gtk/gtktextbtree.[ch]: Only repaint the changed portion
of the selection instead of queueing a repaint on the
entire widget.
* gtk/gtktextbuffer.[ch] gtk/gtktextbtree.[ch]: Move
get_selection_bounds() down to btree, make the function
in buffer a wrapper around the btree function.
* gtk/gtktextlayout.[ch]: Add functions to check if the
layout is valid and to recompute either a range of pixels
aroudn a line or a certain total number of pixels.
* gtk/gtktextlayout.[ch]: Cache a single line display;
now that we only redraw the needed portions, the hit rate
for this cache is quite high.
* gtk/gtktextview.[ch]: Keep track of the first paragraph
on the screen so that when re-laying-out the buffer, we can
keep the same place. This requires connecting to ::value_changed
on the adjustments
* gtk/gtktextview.[ch]: Add idle functions to revalidate
the buffer after we receive an ::invalidated signal.
Wed May 17 22:10:47 2000 Owen Taylor <otaylor@redhat.com>
* gtk/gtklayout.c (gtk_layout_size_allocate): Set upper
to max of allocation and layout size, not just to the
layout size.
* gtk/gtk[hv]scrollbar.c (gtk_[hv]scrollbar_calc_slider_size):
Invalidate window so it gets redrawn properly.
* gdk/gdkwindow.c (gdk_window_invalidate_rect): Allow rect == NULL
to mean the entire window.
* gdk/gdkevents.h: Move definition for GDK_PRIORITY_REDRAW
into public header.
Mon May 15 14:51:31 2000 Owen Taylor <otaylor@redhat.com>
* gtk/gtktextmark.c (gtk_text_mark_get_name): Add function
to get the name of a mark.
* gtk/gtktextlayout.c (gtk_text_layout_get_line_at_y): Add a function
to find the paragraph from a y position.
Thu May 11 12:57:20 2000 Owen Taylor <otaylor@redhat.com>
* gtk/gtktextbtree.c (gtk_text_btree_node_invalidate_upward): Valid
nodes have width/height >= 0, not > 0.
Tue May 9 21:29:06 2000 Owen Taylor <otaylor@redhat.com>
* gtk/gtktextlayout.[ch] gtk/gtktextdisplay.c (gtk_text_layout_get_line_display):
Add a size_only flag, so when we only need the size, we don't create
useless appearance attributes.
* gtk/gtktextview.c (gtk_text_view_ensure_layout): Remove
duplicate setting of font description.
* gtk/gtkscale.c: Use PANGO_SCALE instead of 1000
Wed Apr 26 01:53:23 2000 Owen Taylor <otaylor@redhat.com>
* gtk/Makefile.am (EXTRA_DIST): Add OLD_STAMP into
EXTRA_DIST. It does not work well when the file that
everything depends on is not in the tarball.
Wed Apr 26 00:56:14 2000 Owen Taylor <otaylor@redhat.com>
* gtk/testgtk.c: Some hacks and fixes so that it basically
works when not sitting in the GTK+ build tree.
2000-05-03 Havoc Pennington <hp@redhat.com>
* gtk/gtktextbtree.c (gtk_text_line_next_could_contain_tag):
Properly determine the ordering of the tag root and the current
line within the tree. Previous algorithm only worked if the tag
root's immediate parent was the common root of both the current
line and the tag root.
Wed Apr 26 00:43:00 2000 Owen Taylor <otaylor@redhat.com>
* gtk/gtktextlayout.c (set_para_values): Fix some bugs in
alignment.
* gtk/gtktextview.c (gtk_text_view_ensure_layout): Track
the widget text directional dynamically.
* gtk/gtktextview.[ch]: Added functions to get and set default
wrap mode.
Tue Apr 25 23:47:38 2000 Owen Taylor <otaylor@redhat.com>
* gtk/gtktextlayout.c (gtk_text_layout_get_iter_location): Fix bug
in cursor location computation.
Tue Apr 25 23:22:59 2000 Owen Taylor <otaylor@redhat.com>
* gtk/gtklayout.c (gtk_layout_set_size): Clamp hadjustment/
vadjusment values properly when layout gets smaller.
* gtk/gtktextview.c (need_repaint_handler): Areas being
passed in are far completely inaccurate, and sometimes
too small, so, for now, just queue a redraw on the
whole visible region.
2000-04-25 Havoc Pennington <hp@redhat.com>
* gtk/gtktextbtree.c (summary_destroy): new function to
destroy tag summary nodes
(gtk_text_line_next_could_contain_tag): this function was
totally broken if the line passed in wasn't below the tag
root. Fix it.
(gtk_text_btree_first_could_contain_tag): In the tag == NULL
"wildcard" case, we have to do a linear scan. Blah.
(gtk_text_btree_last_could_contain_tag): In tag == NULL case,
we have to do the linear scan
(tag_removed_cb): When a tag is removed from the tag table,
remove the GtkTextTagInfo node from the btree.
(gtk_text_btree_spew): Implement the spew function, for
our debugging pleasure.
Tue Apr 25 19:40:18 2000 Owen Taylor <otaylor@redhat.com>
* gtk/gtktextlayout.c (gtk_text_layout_set_buffer): Fix
a problem with referring to the wrong buffer.
* gtk/gtkentry.c: Fix focus-in/focus-out confusion.
* gtk/gtkrc.c gtk/gtkstyle.c: Moving setting default
font description to gtk_style_new() - otherwise things
don't work without a .gtkrc file.
* gtk/gtktextbuffer.c (gtk_text_buffer_new): Sink the
tags table if we create it ourself, too.
* gdk/gdktypes.h (enum): Move GDK_RELEASE_MASK, since
it was conflicting with XKB modifiers.
* gtk/gtktextview.[ch]: Add simple support for
GtkIMContext.
Mon Apr 24 19:34:18 2000 Owen Taylor <otaylor@redhat.com>
* gtk/gtkentry.c (gtk_entry_move_cursor_visually): Fix problem
with deletion from last commit.
Mon Apr 24 19:29:40 2000 Owen Taylor <otaylor@redhat.com>
* gtk/gtkwidget.c (gtk_widget_create_pango_context): Set the language
in the context from the current locale.
* gtk/gtkentry.c (gtk_entry_size_request): Use language from the
context, not hardcoded value.
* gtk/gtkentry.c (gtk_entry_move_cursor): Make character movement visual,
not logical.
Sun Apr 23 23:39:18 2000 Owen Taylor <otaylor@redhat.com>
* gtk/gtkentry.c gtk/gtktextdisplay.c: Don't handle selections as
attributes - that doesn't handle partial-glyph selection
properly. Instead use new pango_layout_line_get_x_ranges()
functionality to draw the selection.
* gtk/gtkentry.c: Simplify code since pango_layout_line_index_to_x()
now properly handles out-of-range coordinates.
* gtk/gtktextbuffer.c: Emit "mark_set" when the cursor is moved.
* gtk/gtktextiter.h gtk/gtktextiterprivate.h: Make gtk_text_iter_get_line_byte()
public.
* gtk/gtktextlayout.[ch]: Properly set the direction in the PangoContext
for paragraphs opposite to the base direction of the widget.
* gtk/gtktextlayout.[ch] gtk/gtktextdisplay.c: Fixes for alignment.
* gtk/gtktextlayout.c: Don't split segments on marks, since that
causes Arabic words to reshape as you cursor through.
* gtk/gtktextlayout.[ch] gtk/gtktextview.[ch]: Implement virtual
cursor position when moving vertically with the arrow keys and
scrolling with page-up/page-down. (Arrow keys save only the X,
scrolling saves both X and Y.)
This means you can line-up / line-down or page-up / page-down
without losing your place, and also that moving vertically
with the cursor keys keeps the same X position, not the same
character count:
* gtk/gtktextlayout.[ch] gtk/gtktextview.[ch]: Make vertical
arrow keys move by display lines, not paragraphs.
Tue Apr 18 14:16:50 2000 Owen Taylor <otaylor@redhat.com>
* gtk/gtklayout.c: Make sure that the bin window is at least
as big as the allocation. (Should we also make sure that the
bin window is big enough to completely cover widget->window?)
* gtk/gtktextview.c (gtk_text_view_get_visible_rect): Add
function to get the onscreen rectangle.
* gdk/x11/gdkwindow-x11.c (gdk_window_get_pointer): Correctly account
for offsets in window coordinates.
Sun Apr 16 16:13:27 2000 Owen Taylor <otaylor@redhat.com>
* gtk/gtkentry.c (gtk_entry_get_cursor_locations): Fix index/offset
confusion.
* gtk/gtktextview.c (gtk_text_view_ensure_layout): Set the default direction
from the widget direction.
* gtk/gtktexttag.c gtk/gtktexttagprivate.h (gtk_text_tag_set_arg):
Add a "direction" attribute.
* gtk/gtktextview.c: global s/tkxt/text_view/.
* gtk/testtext.c: Added long block of text in Arabic, to test out
the direction attributes. (Some problems with the shaping system
for arabic become obvious - like the fact the cursor splits words
into unjoined pieces.)
Fri Apr 14 12:54:34 2000 Owen Taylor <otaylor@redhat.com>
* gtk/gtktextdisplay.c (render_layout): Add overstrike handling.
* gtk/gtktextlayout.c: Fix up alignment.
* gtk/testtext.c: Add some tests for centering, wrapping.
Fri Apr 14 09:26:22 2000 Owen Taylor <otaylor@redhat.com>
* gdk/gdkdrawable.h gdk/gdkdraw.c gdk/gdkwindow.c gdk/x11/gdkdrawable-x11.c:
Add a draw_glyphs() operation to the drawable vtable and gdk_draw_glyphs().
If we wrote GTK+-specific layout-render function this could just replace
the draw_layout() operation in the vtable.
* gtk/gtkentry.c: Move guts of gtk_entry_get_cursor_locations to
pango_layout_get_cursor_pos() and use that function.
* gtk/gtktextchild.[ch]: add gtk_ onto pixmap_segment_new(), since it
is a non-static symbol.
* gtk/gtktextbtree.[ch]: Replace gtk_text_btree_find_line_data_by_y()
with gtk_text_btree_find_line_by_y()
* gtk/gtktextdisplay.c: Rewrote for Pango - uses a custom layout
renderer that handles GtkTextAppearance attributes.
* gtk/gtktexttag.[ch] gtk/gtktexttagprivate.h:
- Move the values in the style that don't affect geometry into a
GtkTextAppearance structure.
- Change underline to take a PangoUnderline and "font" a string
representation of a font description
- Add a "font_desc" attribute which takes a FontDescription structure.
* gtk/gtktextlayout.[ch]:
- Get rid of the display-line list per each line. Instead, we
generate, on demand, a GtkTextLineDisplay structure which]
contains a PangoLayout * and other necesary information
(offsets, cursor locations) for displaying a paragraph.
- Get rid of the code to wrap lines, create display chunks,
etc. Instead, we just go through a paragraph and convert
it into the necessary inputs to a PangoLayout.
- Implement a new attribute type, GtkTextAttrAppearance. This
holds a GtkTextAppearance, and is used to pass colors,
stipple, etc, through from the layout to the display without
having to use lots and lots of individual attributes.
- Reimplement gtk_layout_get_iter_at_pixel() gtk_layout_get_iter_pos()
in terms of PangoLayout functions.
* gtk/gtktextview.c:
- Handle passing the necessary PangoContext to the layout
- Some fixups in painting to deal with the automatic backing store
and offsetting of GTK+-1.4
- Add a style_set handler so that the default style reacts
properly to theme changes.
* gtk/gtktext?*.[ch]: Random code-style fixes.
* gtk/testtext.c: Substitute in languages that Pango handles now for Thai
Mon Apr 10 10:33:45 2000 Owen Taylor <otaylor@redhat.com>
* gtk/gtktext?*.[ch]: Check in Havoc's port of the Tk text widget,
in original form preparatory to Pango-ization and gdkimcontext-ization.
Thu Apr 6 19:25:39 2000 Owen Taylor <otaylor@redhat.com>
* gtk/gtkimcontext.c: Move default implementations to real_* vfuncs,
so that we can derive from gtkimcontext in language bindings properly.
Thu Apr 6 16:02:52 2000 Owen Taylor <otaylor@redhat.com>
* gtk/gtkimcontextsimple.[ch]: Use gdk_keyval_to_unicode to gdk_unicode_to_keyval.
Add a compose table including (almost) all the compose combinations
from X. This is 6k of static, shared data as opposed to 50k or so of dynamic
data in the XIM implementation.
* gdk/gdk.h gdk/gdkkeyuni.c gdk/win32/gdkevents-win32.c (gdk_keyval_to_unicode, gdk_unicode_to_keyval):
Moved functions to convert keyvalues from and to unicode here from
the win32 port and made them public.
Wed Apr 5 16:37:29 2000 Owen Taylor <otaylor@redhat.com>
* gtk/gtkeditable.c (gtk_editable_insert_text): Allow new_text_length == -1.
Wed Apr 5 16:27:45 2000 Owen Taylor <otaylor@redhat.com>
* gtk/gtkimcontext.[ch]: Base class for new input context system
* gtk/gtkimmulticontext.[ch]: Proxy input context that allows
the real input context implementation to be loaded from modules
and switched on the fly.
* gtk/gtkcontextsimple.[ch]: Simple implementation of an input
context that just does direct keysymbol => unicode translation.
* gtk/gtkentry.[ch]: Start switching editing over to using
GtkInputContext. (No handling of preedit yet.)
Wed Apr 5 15:48:41 2000 Owen Taylor <otaylor@redhat.com>
* gtk/gtktypeutils.h (GTK_CHECK_GET_CLASS): Fix problem with one too
many substitutions. (klass should not be subsituted.)
Wed Apr 5 00:18:14 2000 Owen Taylor <otaylor@redhat.com>
* configure.in: Add checks for Pango
* configure.in docs/Makefile.am: Add test for sgml2html
and allow 'make dist' without building html, but print out
warnings in that case. (For making snapshots)
* gdk/Makefile.am gdk/x11/Makefile.am gtk/Makefile.am:
Add Pango libraries and C flags
* gdk/gdkdraw.c gdk/gdkdrawable.h gdkwindow.c gdk/x11/gdkdrawable-x11.c:
Add function (gdk_draw_layout) to draw a pango layout.
* gdk/gdkpango.h gdk/x11/gdkpango-x11.c: New file with functions
for getting Pango contexts for GDK.
* gtk/gtkeditable.c: Get rid of dead code gtk_editable_parent_set()
* gtk/gtkentry.[ch]: Complete rewrite to use Pango, add bidirectional
editing.
* gtk/gtkentry.c: Hack in simple Hebrew input with direct
keysym => unicode translations. More languages can be added
here, but real input-method support is needed.
* docs/Changes-1.4.txt: Added note about entry behavior.
* gtk/gtkenums.h gtk/gtkwidget.[ch] testgtk.c gtkprivate.h: Add functions
to set the reading direction for a widget and the global direction.
Add test which allows toggling the global direction. Two private
flags are used to store the direction. (GTK_DIRECTION_SET + GTK_DIRECTION_LTR)
* gtk/gtkcheckbutton.c gtk/gtkframe.c gtk/gtkhbbox.c gtk/gtkhbox.c
gtk/gtkradiobutton.c gtk/gtkspinbutton.c gtk/gtktable.c
* gtk/gtk[hv]scale.c gtk/gtkscale.[ch]: Draw numbers using Pango
* gtk/gtklabel.[ch]: Moved to Pango and considerably rewritten. Line breaking,
underlining now handled by Pango.
* gtk/gtkstyle.[ch] gtk/gtkrc.[ch]: Add a PangoFontDescription
to RCStyle and Style. (Having both this and the old font name and GdkFont
is temporary.)
* gtk/gtkwidget.[ch] (gtk_widget_create_pango_{context,layout}): Added
convenience functions for creating contexts and layouts for widgets.
* gtk/testgtk.c: Enhance label tests with multilingual labels.
Diffstat (limited to 'gtk/gtkfontsel.c')
-rw-r--r-- | gtk/gtkfontsel.c | 3452 |
1 files changed, 299 insertions, 3153 deletions
diff --git a/gtk/gtkfontsel.c b/gtk/gtkfontsel.c index c71206a6e..90c249268 100644 --- a/gtk/gtkfontsel.c +++ b/gtk/gtkfontsel.c @@ -1,6 +1,7 @@ /* GTK - The GIMP Toolkit * Copyright (C) 1995-1997 Peter Mattis, Spencer Kimball and Josh MacDonald * + * Massively updated for Pango by Owen Taylor, May 2000 * GtkFontSelection widget for Gtk+, by Damon Chaplin, May 1998. * Based on the GnomeFontSelector widget, by Elliot Lee, but major changes. * The GnomeFontSelector was derived from app/text_tool.c in the GIMP. @@ -28,95 +29,30 @@ * GTK+ at ftp://ftp.gtk.org/pub/gtk/. */ -/* - * Limits: - * - * Fontnames - A maximum of MAX_FONTS (32767) fontnames will be retrieved - * from X Windows with XListFonts(). Any more are ignored. - * I think this limit may have been set because of a limit in - * GtkList. It could possibly be increased since we are using - * GtkClists now, but I'd be surprised if it was reached. - * Field length - XLFD_MAX_FIELD_LEN is the maximum length that any field of a - * fontname can be for it to be considered valid. Others are - * ignored. - * Properties - Maximum of 65535 choices for each font property - guint16's - * are used as indices, e.g. in the FontInfo struct. - * Combinations - Maximum of 65535 combinations of properties for each font - * family - a guint16 is used in the FontInfo struct. - * Font size - Minimum font size of 2 pixels/points, since trying to load - * some fonts with a size of 1 can cause X to hang. - * (e.g. the Misc Fixed fonts). - */ - -/* - * Possible Improvements: - * - * Font Styles - could sort the styles into a reasonable order - regular - * first, then bold, bold italic etc. - * - * I18N - the default preview text is not useful for international - * fonts. Maybe the first few characters of the font could be - * displayed instead. - * - fontsets? should these be handled by the font dialog? - */ - -/* - * Debugging: compile with -DFONTSEL_DEBUG for lots of debugging output. - */ - #include <stdlib.h> #include <stdio.h> #include <string.h> #include <ctype.h> #include "gdk/gdk.h" -/* Protect against the CHARSET struct in Win32 */ -#ifdef GDK_WINDOWING_WIN32 -# define CHARSET CHARSETstruct -#endif -#include "gdkx.h" -#ifdef GDK_WINDOWING_WIN32 -# undef CHARSET -#endif #include "gdk/gdkkeysyms.h" +#include "gtkfontsel.h" + #include "gtkbutton.h" -#include "gtkcheckbutton.h" #include "gtkclist.h" #include "gtkentry.h" -#include "gtkfontsel.h" #include "gtkframe.h" #include "gtkhbbox.h" #include "gtkhbox.h" #include "gtklabel.h" -#include "gtknotebook.h" -#include "gtkradiobutton.h" +#include "gtkrc.h" #include "gtksignal.h" #include "gtktable.h" #include "gtkvbox.h" #include "gtkscrolledwindow.h" #include "gtkintl.h" -/* The maximum number of fontnames requested with XListFonts(). */ -#define MAX_FONTS 32767 - -/* This is the largest field length we will accept. If a fontname has a field - larger than this we will skip it. */ -#define XLFD_MAX_FIELD_LEN 64 - -/* These are what we use as the standard font sizes, for the size clist. - Note that when using points we still show these integer point values but - we work internally in decipoints (and decipoint values can be typed in). */ -static const guint16 font_sizes[] = { - 8, 9, 10, 11, 12, 13, 14, 16, 18, 20, 22, 24, 26, 28, - 32, 36, 40, 48, 56, 64, 72 -}; - -/* Initial font metric & size (Remember point sizes are in decipoints). - The font size should match one of those in the font_sizes array. */ -#define INITIAL_METRIC GTK_FONT_METRIC_POINTS -#define INITIAL_FONT_SIZE 140 - /* This is the default text shown in the preview entry, though the user can set it. Remember that some fonts only have capital letters. */ #define PREVIEW_TEXT "abcdefghijk ABCDEFGHIJK" @@ -132,267 +68,61 @@ static const guint16 font_sizes[] = { #define FONT_STYLE_LIST_WIDTH 170 #define FONT_SIZE_LIST_WIDTH 60 -/* This is the number of fields in an X Logical Font Description font name. - Note that we count the registry & encoding as 1. */ -#define GTK_XLFD_NUM_FIELDS 13 - -typedef struct _GtkFontSelInfo GtkFontSelInfo; -typedef struct _FontInfo FontInfo; -typedef struct _FontStyle FontStyle; - -/* This struct represents one family of fonts (with one foundry), e.g. adobe - courier or sony fixed. It stores the family name, the index of the foundry - name, and the index of and number of available styles. */ -struct _FontInfo -{ - gchar *family; - guint16 foundry; - gint style_index; - guint16 nstyles; -}; - -/* This represents one style, as displayed in the Font Style clist. It can - have a number of available pixel sizes and point sizes. The indexes point - into the two big fontsel_info->pixel_sizes & fontsel_info->point_sizes - arrays. The displayed flag is used when displaying styles to remember which - styles have already been displayed. Note that it is combined with the - GtkFontType in the flags field. */ -#define GTK_FONT_DISPLAYED (1 << 7) -struct _FontStyle -{ - guint16 properties[GTK_NUM_STYLE_PROPERTIES]; - gint pixel_sizes_index; - guint16 npixel_sizes; - gint point_sizes_index; - guint16 npoint_sizes; - guint8 flags; -}; - -struct _GtkFontSelInfo { - - /* This is a table with each FontInfo representing one font family+foundry */ - FontInfo *font_info; - gint nfonts; - - /* This stores all the valid combinations of properties for every family. - Each FontInfo holds an index into its own space in this one big array. */ - FontStyle *font_styles; - gint nstyles; - - /* This stores all the font sizes available for every style. - Each style holds an index into these arrays. */ - guint16 *pixel_sizes; - guint16 *point_sizes; - - /* These are the arrays of strings of all possible weights, slants, - set widths, spacings, charsets & foundries, and the amount of space - allocated for each array. */ - gchar **properties[GTK_NUM_FONT_PROPERTIES]; - guint16 nproperties[GTK_NUM_FONT_PROPERTIES]; - guint16 space_allocated[GTK_NUM_FONT_PROPERTIES]; -}; - -/* These are the field numbers in the X Logical Font Description fontnames, - e.g. -adobe-courier-bold-o-normal--25-180-100-100-m-150-iso8859-1 */ -typedef enum -{ - XLFD_FOUNDRY = 0, - XLFD_FAMILY = 1, - XLFD_WEIGHT = 2, - XLFD_SLANT = 3, - XLFD_SET_WIDTH = 4, - XLFD_ADD_STYLE = 5, - XLFD_PIXELS = 6, - XLFD_POINTS = 7, - XLFD_RESOLUTION_X = 8, - XLFD_RESOLUTION_Y = 9, - XLFD_SPACING = 10, - XLFD_AVERAGE_WIDTH = 11, - XLFD_CHARSET = 12 -} FontField; - -/* These are the names of the fields, used on the info & filter page. */ -static const gchar* xlfd_field_names[GTK_XLFD_NUM_FIELDS] = { - N_("Foundry:"), - N_("Family:"), - N_("Weight:"), - N_("Slant:"), - N_("Set Width:"), - N_("Add Style:"), - N_("Pixel Size:"), - N_("Point Size:"), - N_("Resolution X:"), - N_("Resolution Y:"), - N_("Spacing:"), - N_("Average Width:"), - N_("Charset:"), -}; - -/* These are the array indices of the font properties used in several arrays, - and should match the xlfd_index array below. */ -typedef enum -{ - WEIGHT = 0, - SLANT = 1, - SET_WIDTH = 2, - SPACING = 3, - CHARSET = 4, - FOUNDRY = 5 -} PropertyIndexType; - -/* This is used to look up a field in a fontname given one of the above - property indices. */ -static const FontField xlfd_index[GTK_NUM_FONT_PROPERTIES] = { - XLFD_WEIGHT, - XLFD_SLANT, - XLFD_SET_WIDTH, - XLFD_SPACING, - XLFD_CHARSET, - XLFD_FOUNDRY -}; - -/* These are the positions of the properties in the filter table - x, y. */ -static const gint filter_positions[GTK_NUM_FONT_PROPERTIES][2] = { - { 1, 0 }, { 0, 2 }, { 1, 2 }, { 2, 2 }, { 2, 0 }, { 0, 0 } -}; -static const gint filter_heights[GTK_NUM_FONT_PROPERTIES] = { - 100, 70, 70, 40, 100, 100 +/* These are what we use as the standard font sizes, for the size clist. + */ +static const guint16 font_sizes[] = { + 8, 9, 10, 11, 12, 13, 14, 16, 18, 20, 22, 24, 26, 28, + 32, 36, 40, 48, 56, 64, 72 }; -/* This is returned by gtk_font_selection_filter_state to describe if a - property value is filtered. e.g. if 'bold' has been selected on the filter - page, then that will return 'FILTERED' and 'black' will be 'NOT_FILTERED'. - If none of the weight values are selected, they all return 'NOT_SET'. */ -typedef enum -{ - FILTERED, - NOT_FILTERED, - NOT_SET -} GtkFontPropertyFilterState; - -static GtkFontSelInfo *fontsel_info = NULL; - -/* The initial size and increment of each of the arrays of property values. */ -#define PROPERTY_ARRAY_INCREMENT 16 - static void gtk_font_selection_class_init (GtkFontSelectionClass *klass); -static void gtk_font_selection_init (GtkFontSelection *fontsel); -static void gtk_font_selection_destroy (GtkObject *object); - -/* These are all used for class initialization - loading in the fonts etc. */ -static void gtk_font_selection_get_fonts (void); -static void gtk_font_selection_insert_font (GSList *fontnames[], - gint *ntable, - gchar *fontname); -static gint gtk_font_selection_insert_field (gchar *fontname, - gint prop); +static void gtk_font_selection_init (GtkFontSelection *fontsel); +static void gtk_font_selection_finalize (GObject *object); /* These are the callbacks & related functions. */ -static void gtk_font_selection_select_font (GtkWidget *w, - gint row, - gint column, - GdkEventButton *bevent, - gpointer data); -static gint gtk_font_selection_on_clist_key_press (GtkWidget *clist, - GdkEventKey *event, - GtkFontSelection *fs); -static gboolean gtk_font_selection_select_next (GtkFontSelection *fs, - GtkWidget *clist, - gint step); -static void gtk_font_selection_show_available_styles -(GtkFontSelection *fs); -static void gtk_font_selection_select_best_style (GtkFontSelection *fs, - gboolean use_first); - -static void gtk_font_selection_select_style (GtkWidget *w, - gint row, - gint column, - GdkEventButton *bevent, - gpointer data); -static void gtk_font_selection_show_available_sizes -(GtkFontSelection *fs); -static gint gtk_font_selection_size_key_press (GtkWidget *w, - GdkEventKey *event, - gpointer data); -static void gtk_font_selection_select_best_size (GtkFontSelection *fs); -static void gtk_font_selection_select_size (GtkWidget *w, - gint row, - gint column, - GdkEventButton *bevent, - gpointer data); - -static void gtk_font_selection_metric_callback (GtkWidget *w, - gpointer data); -static void gtk_font_selection_expose_list (GtkWidget *w, - GdkEventExpose *event, - gpointer data); -static void gtk_font_selection_realize_list (GtkWidget *widget, - gpointer data); - -static void gtk_font_selection_switch_page (GtkWidget *w, - GtkNotebookPage *page, - gint page_num, - gpointer data); -static void gtk_font_selection_show_font_info (GtkFontSelection *fs); - -static void gtk_font_selection_select_filter (GtkWidget *w, - gint row, - gint column, - GdkEventButton *bevent, - GtkFontSelection *fs); -static void gtk_font_selection_unselect_filter (GtkWidget *w, - gint row, - gint column, - GdkEventButton *bevent, - GtkFontSelection *fs); -static void gtk_font_selection_update_filter (GtkFontSelection *fs); -static gboolean gtk_font_selection_style_visible (GtkFontSelection *fs, - FontInfo *font, - gint style); -static void gtk_font_selection_reset_filter (GtkWidget *w, - GtkFontSelection *fs); -static void gtk_font_selection_on_clear_filter (GtkWidget *w, - GtkFontSelection *fs); -static void gtk_font_selection_show_available_fonts - (GtkFontSelection *fs); -static void gtk_font_selection_clear_filter (GtkFontSelection *fs); -static void gtk_font_selection_update_filter_lists(GtkFontSelection *fs); -static GtkFontPropertyFilterState gtk_font_selection_filter_state - (GtkFontSelection *fs, - GtkFontFilterType filter_type, - gint property, - gint index); +static void gtk_font_selection_select_font (GtkWidget *w, + gint row, + gint column, + GdkEventButton *bevent, + gpointer data); +static gint gtk_font_selection_on_clist_key_press (GtkWidget *clist, + GdkEventKey *event, + GtkFontSelection *fs); +static gboolean gtk_font_selection_select_next (GtkFontSelection *fs, + GtkWidget *clist, + gint step); + +static void gtk_font_selection_show_available_fonts (GtkFontSelection *fs); + +static void gtk_font_selection_show_available_styles (GtkFontSelection *fs); +static void gtk_font_selection_select_best_style (GtkFontSelection *fs, + gboolean use_first); +static void gtk_font_selection_select_style (GtkWidget *w, + gint row, + gint column, + GdkEventButton *bevent, + gpointer data); + +static void gtk_font_selection_select_best_size (GtkFontSelection *fs); +static void gtk_font_selection_show_available_sizes (GtkFontSelection *fs); +static gint gtk_font_selection_size_key_press (GtkWidget *w, + GdkEventKey *event, + gpointer data); +static void gtk_font_selection_select_size (GtkWidget *w, + gint row, + gint column, + GdkEventButton *bevent, + gpointer data); + +static void gtk_font_selection_expose_list (GtkWidget *w, + GdkEventExpose *event, + gpointer data); + /* Misc. utility functions. */ -static gboolean gtk_font_selection_load_font (GtkFontSelection *fs); +static void gtk_font_selection_load_font (GtkFontSelection *fs); static void gtk_font_selection_update_preview (GtkFontSelection *fs); -static gint gtk_font_selection_find_font (GtkFontSelection *fs, - gchar *family, - guint16 foundry); -static guint16 gtk_font_selection_field_to_index (gchar **table, - gint ntable, - gchar *field); - -static gchar* gtk_font_selection_expand_slant_code (gchar *slant); -static gchar* gtk_font_selection_expand_spacing_code(gchar *spacing); - -/* Functions for handling X Logical Font Description fontnames. */ -static gboolean gtk_font_selection_is_xlfd_font_name (const gchar *fontname); -static char* gtk_font_selection_get_xlfd_field (const gchar *fontname, - FontField field_num, - gchar *buffer); -static gchar * gtk_font_selection_create_xlfd (gint size, - GtkFontMetricType metric, - gchar *foundry, - gchar *family, - gchar *weight, - gchar *slant, - gchar *set_width, - gchar *spacing, - gchar *charset); - - /* FontSelectionDialog */ static void gtk_font_selection_dialog_class_init (GtkFontSelectionDialogClass *klass); static void gtk_font_selection_dialog_init (GtkFontSelectionDialog *fontseldiag); @@ -401,15 +131,8 @@ static gint gtk_font_selection_dialog_on_configure(GtkWidget *widget, GdkEventConfigure *event, GtkFontSelectionDialog *fsd); -#ifdef GDK_WINDOWING_WIN32 -static char *logfont_to_xlfd (const LOGFONT *lfp, - int size, - int res, - int avg_width); -#endif - static GtkWindowClass *font_selection_parent_class = NULL; -static GtkNotebookClass *font_selection_dialog_parent_class = NULL; +static GtkVBoxClass *font_selection_dialog_parent_class = NULL; GtkType gtk_font_selection_get_type() @@ -430,7 +153,7 @@ gtk_font_selection_get_type() (GtkClassInitFunc) NULL, }; - font_selection_type = gtk_type_unique (GTK_TYPE_NOTEBOOK, + font_selection_type = gtk_type_unique (GTK_TYPE_VBOX, &fontsel_type_info); } @@ -440,15 +163,11 @@ gtk_font_selection_get_type() static void gtk_font_selection_class_init(GtkFontSelectionClass *klass) { - GtkObjectClass *object_class; - - object_class = (GtkObjectClass *) klass; + GObjectClass *gobject_class = G_OBJECT_CLASS (klass); - font_selection_parent_class = gtk_type_class (GTK_TYPE_NOTEBOOK); + font_selection_parent_class = gtk_type_class (GTK_TYPE_VBOX); - object_class->destroy = gtk_font_selection_destroy; - - gtk_font_selection_get_fonts (); + gobject_class->finalize = gtk_font_selection_finalize; } static void @@ -456,70 +175,24 @@ gtk_font_selection_init(GtkFontSelection *fontsel) { GtkWidget *scrolled_win; GtkWidget *text_frame; - GtkWidget *text_box, *frame; - GtkWidget *table, *label, *hbox, *hbox2, *clist, *button, *vbox, *alignment; - gint i, prop, row; - gchar *titles[] = { NULL, NULL, NULL }; - gchar buffer[128]; - gchar *size; - gint size_to_match; - gchar *row_text[3]; - gchar *property, *text; - gboolean inserted; - - /* Number of internationalized titles here must match number - of NULL initializers above */ - titles[0] = _("Font Property"); - titles[1] = _("Requested Value"); - titles[2] = _("Actual Value"); - - /* Initialize the GtkFontSelection struct. We do this here in case any - callbacks are triggered while creating the interface. */ - fontsel->font = NULL; - fontsel->font_index = -1; - fontsel->style = -1; - fontsel->metric = INITIAL_METRIC; - fontsel->size = INITIAL_FONT_SIZE; - fontsel->selected_size = INITIAL_FONT_SIZE; - - fontsel->filters[GTK_FONT_FILTER_BASE].font_type = GTK_FONT_ALL; - fontsel->filters[GTK_FONT_FILTER_USER].font_type = GTK_FONT_BITMAP - | GTK_FONT_SCALABLE; + GtkWidget *text_box; + GtkWidget *table, *label; - - for (prop = 0; prop < GTK_NUM_FONT_PROPERTIES; prop++) - { - fontsel->filters[GTK_FONT_FILTER_BASE].property_filters[prop] = NULL; - fontsel->filters[GTK_FONT_FILTER_BASE].property_nfilters[prop] = 0; - fontsel->filters[GTK_FONT_FILTER_USER].property_filters[prop] = NULL; - fontsel->filters[GTK_FONT_FILTER_USER].property_nfilters[prop] = 0; - } - - for (prop = 0; prop < GTK_NUM_STYLE_PROPERTIES; prop++) - fontsel->property_values[prop] = 0; - - /* Create the main notebook page. */ - gtk_notebook_set_homogeneous_tabs (GTK_NOTEBOOK (fontsel), TRUE); - gtk_notebook_set_tab_hborder (GTK_NOTEBOOK (fontsel), 8); - fontsel->main_vbox = gtk_vbox_new (FALSE, 4); - gtk_widget_show (fontsel->main_vbox); - gtk_container_set_border_width (GTK_CONTAINER (fontsel->main_vbox), 6); - label = gtk_label_new(_("Font")); - gtk_notebook_append_page (GTK_NOTEBOOK (fontsel), - fontsel->main_vbox, label); + fontsel->context = gtk_widget_create_pango_context (GTK_WIDGET (fontsel)); + fontsel->font_desc = pango_font_description_from_string ("sans 12"); /* Create the table of font, style & size. */ table = gtk_table_new (3, 3, FALSE); gtk_widget_show (table); gtk_table_set_col_spacings(GTK_TABLE(table), 8); - gtk_box_pack_start (GTK_BOX (fontsel->main_vbox), table, TRUE, TRUE, 0); + gtk_box_pack_start (GTK_BOX (fontsel), table, TRUE, TRUE, 0); - fontsel->font_label = gtk_label_new(_("Font:")); + fontsel->font_label = gtk_label_new(_("Family:")); gtk_misc_set_alignment (GTK_MISC (fontsel->font_label), 0.0, 0.5); gtk_widget_show (fontsel->font_label); gtk_table_attach (GTK_TABLE (table), fontsel->font_label, 0, 1, 0, 1, GTK_FILL, 0, 0, 0); - label = gtk_label_new(_("Font Style:")); + label = gtk_label_new(_("Style:")); gtk_misc_set_alignment (GTK_MISC (label), 0.0, 0.5); gtk_widget_show (label); gtk_table_attach (GTK_TABLE (table), label, 1, 2, 0, 1, @@ -530,19 +203,21 @@ gtk_font_selection_init(GtkFontSelection *fontsel) gtk_table_attach (GTK_TABLE (table), label, 2, 3, 0, 1, GTK_FILL, 0, 0, 0); - fontsel->font_entry = gtk_entry_new(); + fontsel->font_entry = gtk_entry_new (); gtk_entry_set_editable(GTK_ENTRY(fontsel->font_entry), FALSE); gtk_widget_set_usize (fontsel->font_entry, 20, -1); gtk_widget_show (fontsel->font_entry); gtk_table_attach (GTK_TABLE (table), fontsel->font_entry, 0, 1, 1, 2, GTK_FILL, 0, 0, 0); - fontsel->font_style_entry = gtk_entry_new(); - gtk_entry_set_editable(GTK_ENTRY(fontsel->font_style_entry), FALSE); + + fontsel->font_style_entry = gtk_entry_new (); + gtk_entry_set_editable (GTK_ENTRY(fontsel->font_style_entry), FALSE); gtk_widget_set_usize (fontsel->font_style_entry, 20, -1); gtk_widget_show (fontsel->font_style_entry); gtk_table_attach (GTK_TABLE (table), fontsel->font_style_entry, 1, 2, 1, 2, GTK_FILL, 0, 0, 0); - fontsel->size_entry = gtk_entry_new(); + + fontsel->size_entry = gtk_entry_new (); gtk_widget_set_usize (fontsel->size_entry, 20, -1); gtk_widget_show (fontsel->size_entry); gtk_table_attach (GTK_TABLE (table), fontsel->size_entry, 2, 3, 1, 2, @@ -552,8 +227,8 @@ gtk_font_selection_init(GtkFontSelection *fontsel) fontsel); /* Create the clists */ - fontsel->font_clist = gtk_clist_new(1); - gtk_clist_column_titles_hide (GTK_CLIST(fontsel->font_clist)); + fontsel->font_clist = gtk_clist_new (1); + gtk_clist_column_titles_hide (GTK_CLIST (fontsel->font_clist)); gtk_clist_set_column_auto_resize (GTK_CLIST (fontsel->font_clist), 0, TRUE); scrolled_win = gtk_scrolled_window_new (NULL, NULL); gtk_widget_set_usize (scrolled_win, FONT_LIST_WIDTH, FONT_LIST_HEIGHT); @@ -567,8 +242,8 @@ gtk_font_selection_init(GtkFontSelection *fontsel) GTK_EXPAND | GTK_FILL, GTK_EXPAND | GTK_FILL, 0, 0); - fontsel->font_style_clist = gtk_clist_new(1); - gtk_clist_column_titles_hide (GTK_CLIST(fontsel->font_style_clist)); + fontsel->font_style_clist = gtk_clist_new (1); + gtk_clist_column_titles_hide (GTK_CLIST (fontsel->font_style_clist)); gtk_clist_set_column_auto_resize (GTK_CLIST (fontsel->font_style_clist), 0, TRUE); scrolled_win = gtk_scrolled_window_new (NULL, NULL); @@ -582,7 +257,7 @@ gtk_font_selection_init(GtkFontSelection *fontsel) GTK_EXPAND | GTK_FILL, GTK_EXPAND | GTK_FILL, 0, 0); - fontsel->size_clist = gtk_clist_new(1); + fontsel->size_clist = gtk_clist_new (1); gtk_clist_column_titles_hide (GTK_CLIST(fontsel->size_clist)); gtk_clist_set_column_width (GTK_CLIST(fontsel->size_clist), 0, 20); scrolled_win = gtk_scrolled_window_new (NULL, NULL); @@ -590,12 +265,11 @@ gtk_font_selection_init(GtkFontSelection *fontsel) gtk_container_add (GTK_CONTAINER (scrolled_win), fontsel->size_clist); gtk_scrolled_window_set_policy (GTK_SCROLLED_WINDOW (scrolled_win), GTK_POLICY_AUTOMATIC, GTK_POLICY_ALWAYS); - gtk_widget_show(fontsel->size_clist); - gtk_widget_show(scrolled_win); + gtk_widget_show (fontsel->size_clist); + gtk_widget_show (scrolled_win); gtk_table_attach (GTK_TABLE (table), scrolled_win, 2, 3, 2, 3, GTK_FILL, GTK_FILL, 0, 0); - /* Insert the fonts. If there exist fonts with the same family but different foundries, then the foundry name is appended in brackets. */ gtk_font_selection_show_available_fonts(fontsel); @@ -611,6 +285,8 @@ gtk_font_selection_init(GtkFontSelection *fontsel) GTK_SIGNAL_FUNC(gtk_font_selection_expose_list), fontsel); + gtk_font_selection_show_available_styles (fontsel); + gtk_signal_connect (GTK_OBJECT (fontsel->font_style_clist), "select_row", GTK_SIGNAL_FUNC(gtk_font_selection_select_style), fontsel); @@ -619,28 +295,8 @@ gtk_font_selection_init(GtkFontSelection *fontsel) "key_press_event", GTK_SIGNAL_FUNC(gtk_font_selection_on_clist_key_press), fontsel); - gtk_signal_connect_after (GTK_OBJECT (fontsel->font_style_clist), - "realize", - GTK_SIGNAL_FUNC(gtk_font_selection_realize_list), - fontsel); - - /* Insert the standard font sizes */ - gtk_clist_freeze (GTK_CLIST(fontsel->size_clist)); - size_to_match = INITIAL_FONT_SIZE; - if (INITIAL_METRIC == GTK_FONT_METRIC_POINTS) - size_to_match = size_to_match / 10; - for (i = 0; i < sizeof(font_sizes) / sizeof(font_sizes[0]); i++) - { - sprintf(buffer, "%i", font_sizes[i]); - size = buffer; - gtk_clist_append(GTK_CLIST(fontsel->size_clist), &size); - if (font_sizes[i] == size_to_match) - { - gtk_clist_select_row(GTK_CLIST(fontsel->size_clist), i, 0); - gtk_entry_set_text(GTK_ENTRY(fontsel->size_entry), buffer); - } - } - gtk_clist_thaw (GTK_CLIST(fontsel->size_clist)); + + gtk_font_selection_show_available_sizes (fontsel); gtk_signal_connect (GTK_OBJECT (fontsel->size_clist), "select_row", GTK_SIGNAL_FUNC(gtk_font_selection_select_size), @@ -650,57 +306,11 @@ gtk_font_selection_init(GtkFontSelection *fontsel) GTK_SIGNAL_FUNC(gtk_font_selection_on_clist_key_press), fontsel); - - /* create the Reset Filter & Metric buttons */ - hbox = gtk_hbox_new(FALSE, 8); - gtk_widget_show (hbox); - gtk_box_pack_start (GTK_BOX (fontsel->main_vbox), hbox, FALSE, TRUE, 0); - - fontsel->filter_button = gtk_button_new_with_label(_("Reset Filter")); - gtk_misc_set_padding (GTK_MISC (GTK_BIN (fontsel->filter_button)->child), - 16, 0); - gtk_widget_show(fontsel->filter_button); - gtk_box_pack_start (GTK_BOX (hbox), fontsel->filter_button, FALSE, FALSE, 0); - gtk_widget_set_sensitive (fontsel->filter_button, FALSE); - gtk_signal_connect (GTK_OBJECT (fontsel->filter_button), "clicked", - GTK_SIGNAL_FUNC(gtk_font_selection_on_clear_filter), - fontsel); - - hbox2 = gtk_hbox_new(FALSE, 0); - gtk_widget_show (hbox2); - gtk_box_pack_end (GTK_BOX (hbox), hbox2, FALSE, FALSE, 0); - - label = gtk_label_new(_("Metric:")); - gtk_widget_show (label); - gtk_box_pack_start (GTK_BOX (hbox2), label, FALSE, TRUE, 8); - - fontsel->points_button = gtk_radio_button_new_with_label(NULL, _("Points")); - gtk_widget_show (fontsel->points_button); - gtk_box_pack_start (GTK_BOX (hbox2), fontsel->points_button, FALSE, TRUE, 0); - if (INITIAL_METRIC == GTK_FONT_METRIC_POINTS) - gtk_toggle_button_set_active(GTK_TOGGLE_BUTTON(fontsel->points_button), - TRUE); - - fontsel->pixels_button = gtk_radio_button_new_with_label_from_widget(GTK_RADIO_BUTTON(fontsel->points_button), _("Pixels")); - gtk_widget_show (fontsel->pixels_button); - gtk_box_pack_start (GTK_BOX (hbox2), fontsel->pixels_button, FALSE, TRUE, 0); - if (INITIAL_METRIC == GTK_FONT_METRIC_PIXELS) - gtk_toggle_button_set_active(GTK_TOGGLE_BUTTON(fontsel->pixels_button), - TRUE); - - gtk_signal_connect(GTK_OBJECT(fontsel->points_button), "toggled", - (GtkSignalFunc) gtk_font_selection_metric_callback, - fontsel); - gtk_signal_connect(GTK_OBJECT(fontsel->pixels_button), "toggled", - (GtkSignalFunc) gtk_font_selection_metric_callback, - fontsel); - - /* create the text entry widget */ text_frame = gtk_frame_new (_("Preview:")); gtk_widget_show (text_frame); gtk_frame_set_shadow_type(GTK_FRAME(text_frame), GTK_SHADOW_ETCHED_IN); - gtk_box_pack_start (GTK_BOX (fontsel->main_vbox), text_frame, + gtk_box_pack_start (GTK_BOX (fontsel), text_frame, FALSE, TRUE, 0); /* This is just used to get a 4-pixel space around the preview entry. */ @@ -714,221 +324,8 @@ gtk_font_selection_init(GtkFontSelection *fontsel) gtk_widget_set_usize (fontsel->preview_entry, -1, INITIAL_PREVIEW_HEIGHT); gtk_box_pack_start (GTK_BOX (text_box), fontsel->preview_entry, TRUE, TRUE, 0); - - /* Create the message area */ - fontsel->message_label = gtk_label_new(""); - gtk_widget_show (fontsel->message_label); - gtk_box_pack_start (GTK_BOX (fontsel->main_vbox), fontsel->message_label, - FALSE, FALSE, 0); - - - /* Create the font info page */ - fontsel->info_vbox = gtk_vbox_new (FALSE, 4); - gtk_widget_show (fontsel->info_vbox); - gtk_container_set_border_width (GTK_CONTAINER (fontsel->info_vbox), 2); - label = gtk_label_new(_("Font Information")); - gtk_notebook_append_page (GTK_NOTEBOOK (fontsel), - fontsel->info_vbox, label); - - fontsel->info_clist = gtk_clist_new_with_titles (3, titles); - gtk_widget_set_usize (fontsel->info_clist, 390, 150); - gtk_clist_set_column_width(GTK_CLIST(fontsel->info_clist), 0, 130); - gtk_clist_set_column_width(GTK_CLIST(fontsel->info_clist), 1, 130); - gtk_clist_set_column_width(GTK_CLIST(fontsel->info_clist), 2, 130); - gtk_clist_column_titles_passive(GTK_CLIST(fontsel->info_clist)); - scrolled_win = gtk_scrolled_window_new (NULL, NULL); - gtk_container_add (GTK_CONTAINER (scrolled_win), fontsel->info_clist); - gtk_scrolled_window_set_policy (GTK_SCROLLED_WINDOW (scrolled_win), - GTK_POLICY_AUTOMATIC, GTK_POLICY_AUTOMATIC); - gtk_widget_show(fontsel->info_clist); - gtk_widget_show(scrolled_win); - gtk_box_pack_start (GTK_BOX (fontsel->info_vbox), scrolled_win, - TRUE, TRUE, 0); - - /* Insert the property names */ - gtk_clist_freeze (GTK_CLIST(fontsel->info_clist)); - row_text[1] = ""; - row_text[2] = ""; - for (i = 0; i < GTK_XLFD_NUM_FIELDS; i++) - { - row_text[0] = _(xlfd_field_names[i]); - gtk_clist_append(GTK_CLIST(fontsel->info_clist), row_text); - gtk_clist_set_shift(GTK_CLIST(fontsel->info_clist), i, 0, 0, 4); - gtk_clist_set_shift(GTK_CLIST(fontsel->info_clist), i, 1, 0, 4); - gtk_clist_set_shift(GTK_CLIST(fontsel->info_clist), i, 2, 0, 4); - } - gtk_clist_thaw (GTK_CLIST(fontsel->info_clist)); - - label = gtk_label_new(_("Requested Font Name:")); - gtk_misc_set_alignment (GTK_MISC (label), 0.0, 0.5); - gtk_widget_show (label); - gtk_box_pack_start (GTK_BOX (fontsel->info_vbox), label, FALSE, TRUE, 0); - - fontsel->requested_font_name = gtk_entry_new(); - gtk_entry_set_editable(GTK_ENTRY(fontsel->requested_font_name), FALSE); - gtk_widget_show (fontsel->requested_font_name); - gtk_box_pack_start (GTK_BOX (fontsel->info_vbox), - fontsel->requested_font_name, FALSE, TRUE, 0); - - label = gtk_label_new(_("Actual Font Name:")); - gtk_misc_set_alignment (GTK_MISC (label), 0.0, 0.5); - gtk_widget_show (label); - gtk_box_pack_start (GTK_BOX (fontsel->info_vbox), label, FALSE, TRUE, 0); - - fontsel->actual_font_name = gtk_entry_new(); - gtk_entry_set_editable(GTK_ENTRY(fontsel->actual_font_name), FALSE); - gtk_widget_show (fontsel->actual_font_name); - gtk_box_pack_start (GTK_BOX (fontsel->info_vbox), - fontsel->actual_font_name, FALSE, TRUE, 0); - - sprintf(buffer, _("%i fonts available with a total of %i styles."), - fontsel_info->nfonts, fontsel_info->nstyles); - label = gtk_label_new(buffer); - gtk_widget_show (label); - gtk_box_pack_start (GTK_BOX (fontsel->info_vbox), label, FALSE, FALSE, 0); - - gtk_signal_connect (GTK_OBJECT (fontsel), "switch_page", - GTK_SIGNAL_FUNC(gtk_font_selection_switch_page), - fontsel); - - - /* Create the Filter page. */ - fontsel->filter_vbox = gtk_vbox_new (FALSE, 4); - gtk_widget_show (fontsel->filter_vbox); - gtk_container_set_border_width (GTK_CONTAINER (fontsel->filter_vbox), 2); - label = gtk_label_new(_("Filter")); - gtk_notebook_append_page (GTK_NOTEBOOK (fontsel), - fontsel->filter_vbox, label); - - /* Create the font type checkbuttons. */ - frame = gtk_frame_new (NULL); - gtk_widget_show (frame); - gtk_box_pack_start (GTK_BOX (fontsel->filter_vbox), frame, FALSE, TRUE, 0); - - hbox = gtk_hbox_new (FALSE, 20); - gtk_widget_show (hbox); - gtk_container_add (GTK_CONTAINER (frame), hbox); - label = gtk_label_new(_("Font Types:")); - gtk_widget_show (label); - gtk_box_pack_start (GTK_BOX (hbox), label, FALSE, TRUE, 10); - - hbox2 = gtk_hbox_new (TRUE, 0); - gtk_widget_show (hbox2); - gtk_box_pack_start (GTK_BOX (hbox), hbox2, FALSE, TRUE, 0); - - fontsel->type_bitmaps_button = gtk_check_button_new_with_label (_("Bitmap")); - gtk_toggle_button_set_active (GTK_TOGGLE_BUTTON (fontsel->type_bitmaps_button), TRUE); - gtk_widget_show (fontsel->type_bitmaps_button); - gtk_box_pack_start (GTK_BOX (hbox2), fontsel->type_bitmaps_button, - FALSE, TRUE, 0); - - fontsel->type_scalable_button = gtk_check_button_new_with_label (_("Scalable")); - gtk_toggle_button_set_active (GTK_TOGGLE_BUTTON (fontsel->type_scalable_button), TRUE); - gtk_widget_show (fontsel->type_scalable_button); - gtk_box_pack_start (GTK_BOX (hbox2), fontsel->type_scalable_button, - FALSE, TRUE, 0); - - fontsel->type_scaled_bitmaps_button = gtk_check_button_new_with_label (_("Scaled Bitmap")); - gtk_widget_show (fontsel->type_scaled_bitmaps_button); - gtk_box_pack_start (GTK_BOX (hbox2), fontsel->type_scaled_bitmaps_button, - FALSE, TRUE, 0); - - table = gtk_table_new (4, 3, FALSE); - gtk_table_set_col_spacings(GTK_TABLE(table), 2); - gtk_widget_show (table); - gtk_box_pack_start (GTK_BOX (fontsel->filter_vbox), table, TRUE, TRUE, 0); - - for (prop = 0; prop < GTK_NUM_FONT_PROPERTIES; prop++) - { - gint left = filter_positions[prop][0]; - gint top = filter_positions[prop][1]; - - label = gtk_label_new(_(xlfd_field_names[xlfd_index[prop]])); - gtk_misc_set_alignment (GTK_MISC (label), 0.0, 1.0); - gtk_misc_set_padding (GTK_MISC (label), 0, 2); - gtk_widget_show(label); - gtk_table_attach (GTK_TABLE (table), label, left, left + 1, - top, top + 1, GTK_FILL, GTK_FILL, 0, 0); - - clist = gtk_clist_new(1); - gtk_widget_set_usize (clist, 100, filter_heights[prop]); - gtk_clist_set_selection_mode(GTK_CLIST(clist), GTK_SELECTION_MULTIPLE); - gtk_clist_column_titles_hide(GTK_CLIST(clist)); - gtk_clist_set_column_auto_resize (GTK_CLIST (clist), 0, TRUE); - scrolled_win = gtk_scrolled_window_new (NULL, NULL); - gtk_container_add (GTK_CONTAINER (scrolled_win), clist); - gtk_scrolled_window_set_policy (GTK_SCROLLED_WINDOW (scrolled_win), - GTK_POLICY_AUTOMATIC, - GTK_POLICY_AUTOMATIC); - gtk_widget_show(clist); - gtk_widget_show(scrolled_win); - - /* For the bottom-right cell we add the 'Reset Filter' button. */ - if (top == 2 && left == 2) - { - vbox = gtk_vbox_new(FALSE, 0); - gtk_widget_show(vbox); - gtk_table_attach (GTK_TABLE (table), vbox, left, left + 1, - top + 1, top + 2, GTK_FILL, GTK_FILL, 0, 0); - - gtk_box_pack_start (GTK_BOX (vbox), scrolled_win, TRUE, TRUE, 0); - - alignment = gtk_alignment_new(0.5, 0.0, 0.8, 0.0); - gtk_widget_show(alignment); - gtk_box_pack_start (GTK_BOX (vbox), alignment, FALSE, TRUE, 4); - - button = gtk_button_new_with_label(_("Reset Filter")); - gtk_widget_show(button); - gtk_container_add(GTK_CONTAINER(alignment), button); - gtk_signal_connect (GTK_OBJECT (button), "clicked", - GTK_SIGNAL_FUNC(gtk_font_selection_reset_filter), - fontsel); - } - else - gtk_table_attach (GTK_TABLE (table), scrolled_win, - left, left + 1, top + 1, top + 2, - GTK_EXPAND | GTK_FILL, GTK_EXPAND | GTK_FILL, 0, 0); - - gtk_signal_connect (GTK_OBJECT (clist), "select_row", - GTK_SIGNAL_FUNC(gtk_font_selection_select_filter), - fontsel); - gtk_signal_connect (GTK_OBJECT (clist), "unselect_row", - GTK_SIGNAL_FUNC(gtk_font_selection_unselect_filter), - fontsel); - - /* Insert the property names, expanded, and in sorted order. - But we make sure that the wildcard '*' is first. */ - gtk_clist_freeze (GTK_CLIST(clist)); - property = N_("*"); - gtk_clist_append(GTK_CLIST(clist), &property); - - for (i = 1; i < fontsel_info->nproperties[prop]; i++) { - property = _(fontsel_info->properties[prop][i]); - if (prop == SLANT) - property = gtk_font_selection_expand_slant_code(property); - else if (prop == SPACING) - property = gtk_font_selection_expand_spacing_code(property); - - inserted = FALSE; - for (row = 1; row < GTK_CLIST(clist)->rows; row++) - { - gtk_clist_get_text(GTK_CLIST(clist), row, 0, &text); - if (strcmp(property, text) < 0) - { - inserted = TRUE; - gtk_clist_insert(GTK_CLIST(clist), row, &property); - break; - } - } - if (!inserted) - row = gtk_clist_append(GTK_CLIST(clist), &property); - gtk_clist_set_row_data(GTK_CLIST(clist), row, GINT_TO_POINTER (i)); - } - gtk_clist_select_row(GTK_CLIST(clist), 0, 0); - gtk_clist_thaw (GTK_CLIST(clist)); - fontsel->filter_clists[prop] = clist; - } + gtk_font_selection_update_preview (fontsel); } GtkWidget * @@ -942,7 +339,7 @@ gtk_font_selection_new() } static void -gtk_font_selection_destroy (GtkObject *object) +gtk_font_selection_finalize (GObject *object) { GtkFontSelection *fontsel; @@ -950,13 +347,15 @@ gtk_font_selection_destroy (GtkObject *object) g_return_if_fail (GTK_IS_FONT_SELECTION (object)); fontsel = GTK_FONT_SELECTION (object); - - /* All we have to do is unref the font, if we have one. */ + + pango_context_unref (fontsel->context); + pango_font_description_free (fontsel->font_desc); + if (fontsel->font) gdk_font_unref (fontsel->font); - if (GTK_OBJECT_CLASS (font_selection_parent_class)->destroy) - (* GTK_OBJECT_CLASS (font_selection_parent_class)->destroy) (object); + if (G_OBJECT_CLASS (font_selection_parent_class)->finalize) + (* G_OBJECT_CLASS (font_selection_parent_class)->finalize) (object); } @@ -968,7 +367,6 @@ gtk_font_selection_expose_list (GtkWidget *widget, gpointer data) { GtkFontSelection *fontsel; - FontInfo *font_info; GList *selection; gint index; @@ -977,8 +375,6 @@ gtk_font_selection_expose_list (GtkWidget *widget, #endif fontsel = GTK_FONT_SELECTION(data); - font_info = fontsel_info->font_info; - /* Try to scroll the font family clist to the selected item */ selection = GTK_CLIST(fontsel->font_clist)->selection; if (selection) @@ -1011,73 +407,69 @@ gtk_font_selection_expose_list (GtkWidget *widget, } } - -/* This is called when the style clist is realized. We need to set any - charset rows to insensitive colours. */ +/* This is called when a family is selected in the list. */ static void -gtk_font_selection_realize_list (GtkWidget *widget, - gpointer data) +gtk_font_selection_select_font (GtkWidget *w, + gint row, + gint column, + GdkEventButton *bevent, + gpointer data) { GtkFontSelection *fontsel; - gint row; - GdkColor *inactive_fg, *inactive_bg; - -#ifdef FONTSEL_DEBUG - g_message("In realize_list\n"); -#endif + gchar *family_name; + gint index; + fontsel = GTK_FONT_SELECTION (data); - /* Set the colours for any charset rows to insensitive. */ - inactive_fg = &fontsel->font_style_clist->style->fg[GTK_STATE_INSENSITIVE]; - inactive_bg = &fontsel->font_style_clist->style->bg[GTK_STATE_INSENSITIVE]; - - for (row = 0; row < GTK_CLIST (fontsel->font_style_clist)->rows; row++) + if (GTK_CLIST (fontsel->font_clist)->selection) { - if (GPOINTER_TO_INT (gtk_clist_get_row_data (GTK_CLIST (fontsel->font_style_clist), row)) == -1) + index = GPOINTER_TO_INT (GTK_CLIST (fontsel->font_clist)->selection->data); + + if (gtk_clist_get_text (GTK_CLIST (fontsel->font_clist), index, 0, &family_name) && + strcasecmp (fontsel->font_desc->family_name, family_name) != 0) { - gtk_clist_set_foreground (GTK_CLIST (fontsel->font_style_clist), - row, inactive_fg); - gtk_clist_set_background (GTK_CLIST (fontsel->font_style_clist), - row, inactive_bg); + g_free (fontsel->font_desc->family_name); + fontsel->font_desc->family_name = g_strdup (family_name); + + gtk_font_selection_show_available_styles (fontsel); + gtk_font_selection_select_best_style (fontsel, TRUE); } } } +static int +cmp_strings (const void *a, const void *b) +{ + return strcasecmp (*(const char **)a, *(const char **)b); +} -/* This is called when a family is selected in the list. */ static void -gtk_font_selection_select_font (GtkWidget *w, - gint row, - gint column, - GdkEventButton *bevent, - gpointer data) +gtk_font_selection_show_available_fonts (GtkFontSelection *fontsel) { - GtkFontSelection *fontsel; - FontInfo *font_info; - FontInfo *font; - -#ifdef FONTSEL_DEBUG - g_message("In select_font\n"); -#endif - fontsel = GTK_FONT_SELECTION(data); - font_info = fontsel_info->font_info; - - if (bevent && !GTK_WIDGET_HAS_FOCUS (w)) - gtk_widget_grab_focus (w); - - row = GPOINTER_TO_INT (gtk_clist_get_row_data (GTK_CLIST (fontsel->font_clist), row)); - font = &font_info[row]; - gtk_entry_set_text(GTK_ENTRY(fontsel->font_entry), font->family); - - /* If it is already the current font, just return. */ - if (fontsel->font_index == row) - return; + gchar **families; + int n_families, i; + + pango_context_list_families (fontsel->context, &families, &n_families); + qsort (families, n_families, sizeof(char *), cmp_strings); + + gtk_clist_freeze (GTK_CLIST (fontsel->font_clist)); + gtk_clist_clear (GTK_CLIST (fontsel->font_clist)); + + for (i=0; i<n_families; i++) + { + gtk_clist_append (GTK_CLIST (fontsel->font_clist), &families[i]); + + if (!strcasecmp (families[i], fontsel->font_desc->family_name)) + { + gtk_clist_select_row (GTK_CLIST(fontsel->font_clist), i, 0); + gtk_entry_set_text(GTK_ENTRY(fontsel->font_entry), families[i]); + } + } - fontsel->font_index = row; - gtk_font_selection_show_available_styles (fontsel); - gtk_font_selection_select_best_style (fontsel, TRUE); -} + gtk_clist_thaw (GTK_CLIST(fontsel->font_clist)); + pango_font_map_free_families (families, n_families); +} static gint gtk_font_selection_on_clist_key_press (GtkWidget *clist, @@ -1132,149 +524,77 @@ gtk_font_selection_select_next (GtkFontSelection *fontsel, return TRUE; } +static int +compare_font_descriptions (const PangoFontDescription *a, const PangoFontDescription *b) +{ + int val = strcasecmp (a->family_name, b->family_name); + if (val != 0) + return val; + + if (a->weight != b->weight) + return a->weight - b->weight; + + if (a->style != b->style) + return a->style - b->style; + + if (a->stretch != b->stretch) + return a->stretch - b->stretch; + + if (a->variant != b->variant) + return a->variant - b->variant; + + return 0; +} + +static int +font_description_sort_func (const void *a, const void *b) +{ + return compare_font_descriptions (*(PangoFontDescription **)a, *(PangoFontDescription **)b); +} /* This fills the font style clist with all the possible style combinations for the current font family. */ static void gtk_font_selection_show_available_styles (GtkFontSelection *fontsel) { - FontInfo *font; - FontStyle *styles; - gint style, tmpstyle, row; - gint weight_index, slant_index, set_width_index, spacing_index; - gint charset_index; - gchar *weight, *slant, *set_width, *spacing; - gchar *charset = NULL; - gchar *new_item; - gchar buffer[XLFD_MAX_FIELD_LEN * 6 + 2]; - GdkColor *inactive_fg, *inactive_bg; - gboolean show_charset; + PangoFontDescription **descs; + int n_descs, i; + gint match_row = 0; + gchar *str; -#ifdef FONTSEL_DEBUG - g_message("In show_available_styles\n"); -#endif - font = &fontsel_info->font_info[fontsel->font_index]; - styles = &fontsel_info->font_styles[font->style_index]; - - gtk_clist_freeze (GTK_CLIST(fontsel->font_style_clist)); - gtk_clist_clear (GTK_CLIST(fontsel->font_style_clist)); - - /* First we mark all visible styles as not having been displayed yet, - and check if every style has the same charset. If not then we will - display the charset in the list before the styles. */ - show_charset = FALSE; - charset_index = -1; - for (style = 0; style < font->nstyles; style++) - { - if (gtk_font_selection_style_visible(fontsel, font, style)) - { - styles[style].flags &= ~GTK_FONT_DISPLAYED; - - if (charset_index == -1) - charset_index = styles[style].properties[CHARSET]; - else if (charset_index != styles[style].properties[CHARSET]) - show_charset = TRUE; - } - else - styles[style].flags |= GTK_FONT_DISPLAYED; - } - - /* Step through the undisplayed styles, finding the next charset which - hasn't been displayed yet. Then display the charset on one line, if - necessary, and the visible styles indented beneath it. */ - inactive_fg = &fontsel->font_style_clist->style->fg[GTK_STATE_INSENSITIVE]; - inactive_bg = &fontsel->font_style_clist->style->bg[GTK_STATE_INSENSITIVE]; - - for (style = 0; style < font->nstyles; style++) + pango_context_list_fonts (fontsel->context, fontsel->font_desc->family_name, &descs, &n_descs); + qsort (descs, n_descs, sizeof(PangoFontDescription *), font_description_sort_func); + + gtk_clist_freeze (GTK_CLIST (fontsel->font_style_clist)); + gtk_clist_clear (GTK_CLIST (fontsel->font_style_clist)); + + for (i=0; i<n_descs; i++) { - if (styles[style].flags & GTK_FONT_DISPLAYED) - continue; - - if (show_charset) - { - charset_index = styles[style].properties[CHARSET]; - charset = fontsel_info->properties[CHARSET] [charset_index]; - row = gtk_clist_append(GTK_CLIST(fontsel->font_style_clist), - &charset); - gtk_clist_set_row_data(GTK_CLIST(fontsel->font_style_clist), row, - (gpointer) -1); - if (GTK_WIDGET_REALIZED (fontsel->font_style_clist)) - { - gtk_clist_set_foreground(GTK_CLIST(fontsel->font_style_clist), - row, inactive_fg); - gtk_clist_set_background(GTK_CLIST(fontsel->font_style_clist), - row, inactive_bg); - } - } + PangoFontDescription tmp_desc; + + tmp_desc = *descs[i]; + tmp_desc.family_name = NULL; + tmp_desc.size = 0; + + str = pango_font_description_to_string (&tmp_desc); + gtk_clist_append (GTK_CLIST (fontsel->font_style_clist), &str); + + if (descs[i]->weight == fontsel->font_desc->weight && + descs[i]->style == fontsel->font_desc->style && + descs[i]->stretch == fontsel->font_desc->stretch && + descs[i]->variant == fontsel->font_desc->variant) + match_row = i; - for (tmpstyle = style; tmpstyle < font->nstyles; tmpstyle++) - { - if (styles[tmpstyle].flags & GTK_FONT_DISPLAYED - || charset_index != styles[tmpstyle].properties[CHARSET]) - continue; - - styles[tmpstyle].flags |= GTK_FONT_DISPLAYED; - - weight_index = styles[tmpstyle].properties[WEIGHT]; - slant_index = styles[tmpstyle].properties[SLANT]; - set_width_index = styles[tmpstyle].properties[SET_WIDTH]; - spacing_index = styles[tmpstyle].properties[SPACING]; - weight = fontsel_info->properties[WEIGHT] [weight_index]; - slant = fontsel_info->properties[SLANT] [slant_index]; - set_width = fontsel_info->properties[SET_WIDTH][set_width_index]; - spacing = fontsel_info->properties[SPACING] [spacing_index]; - - /* Convert '(nil)' weights to 'regular', since it looks nicer. */ - if (!g_strcasecmp(weight, N_("(nil)"))) weight = N_("regular"); - - /* We don't show default values or (nil) in the other properties. */ - if (!g_strcasecmp(slant, "r")) slant = NULL; - else if (!g_strcasecmp(slant, "(nil)")) slant = NULL; - else if (!g_strcasecmp(slant, "i")) slant = N_("italic"); - else if (!g_strcasecmp(slant, "o")) slant = N_("oblique"); - else if (!g_strcasecmp(slant, "ri")) slant = N_("reverse italic"); - else if (!g_strcasecmp(slant, "ro")) slant = N_("reverse oblique"); - else if (!g_strcasecmp(slant, "ot")) slant = N_("other"); - - if (!g_strcasecmp(set_width, "normal")) set_width = NULL; - else if (!g_strcasecmp(set_width, "(nil)")) set_width = NULL; - - if (!g_strcasecmp(spacing, "p")) spacing = NULL; - else if (!g_strcasecmp(spacing, "(nil)")) spacing = NULL; - else if (!g_strcasecmp(spacing, "m")) spacing = N_("[M]"); - else if (!g_strcasecmp(spacing, "c")) spacing = N_("[C]"); - - /* Add the strings together, making sure there is 1 space between - them */ - strcpy(buffer, _(weight)); - if (slant) - { - strcat(buffer, " "); - strcat(buffer, _(slant)); - } - if (set_width) - { - strcat(buffer, " "); - strcat(buffer, _(set_width)); - } - if (spacing) - { - strcat(buffer, " "); - strcat(buffer, _(spacing)); - } - - new_item = buffer; - row = gtk_clist_append(GTK_CLIST(fontsel->font_style_clist), - &new_item); - if (show_charset) - gtk_clist_set_shift(GTK_CLIST(fontsel->font_style_clist), row, 0, - 0, 4); - gtk_clist_set_row_data(GTK_CLIST(fontsel->font_style_clist), row, - GINT_TO_POINTER (tmpstyle)); - } + g_free (str); } + + gtk_clist_select_row (GTK_CLIST (fontsel->font_style_clist), match_row, 0); + gtk_clist_get_text (GTK_CLIST (fontsel->font_style_clist), match_row, 0, &str); + gtk_entry_set_text (GTK_ENTRY (fontsel->font_style_entry), str); gtk_clist_thaw (GTK_CLIST(fontsel->font_style_clist)); + + pango_font_descriptions_free (descs, n_descs); } @@ -1287,53 +607,8 @@ static void gtk_font_selection_select_best_style(GtkFontSelection *fontsel, gboolean use_first) { - FontInfo *font; - FontStyle *styles; - gint row, prop, style, matched; - gint best_matched = -1, best_style = -1, best_row = -1; + gint best_row = 0; -#ifdef FONTSEL_DEBUG - g_message("In select_best_style\n"); -#endif - font = &fontsel_info->font_info[fontsel->font_index]; - styles = &fontsel_info->font_styles[font->style_index]; - - for (row = 0; row < GTK_CLIST(fontsel->font_style_clist)->rows; row++) - { - style = GPOINTER_TO_INT (gtk_clist_get_row_data (GTK_CLIST (fontsel->font_style_clist), row)); - /* Skip charset rows. */ - if (style == -1) - continue; - - /* If we just want the first style, we've got it. */ - if (use_first) - { - best_style = style; - best_row = row; - break; - } - - matched = 0; - for (prop = 0; prop < GTK_NUM_STYLE_PROPERTIES; prop++) - { - if (fontsel->property_values[prop] == styles[style].properties[prop]) - matched++; - } - if (matched > best_matched) - { - best_matched = matched; - best_style = style; - best_row = row; - } - } - g_return_if_fail (best_style != -1); - g_return_if_fail (best_row != -1); - - fontsel->style = best_style; - - for (prop = 0; prop < GTK_NUM_STYLE_PROPERTIES; prop++) - fontsel->property_values[prop] = styles[fontsel->style].properties[prop]; - gtk_clist_select_row(GTK_CLIST(fontsel->font_style_clist), best_row, 0); if (gtk_clist_row_is_visible(GTK_CLIST(fontsel->font_style_clist), best_row) != GTK_VISIBILITY_FULL) @@ -1352,162 +627,65 @@ gtk_font_selection_select_style (GtkWidget *w, GdkEventButton *bevent, gpointer data) { - GtkFontSelection *fontsel; - FontInfo *font_info; - FontInfo *font; - FontStyle *styles; - gint style, prop; + GtkFontSelection *fontsel = GTK_FONT_SELECTION (data); + PangoFontDescription *tmp_desc; gchar *text; - -#ifdef FONTSEL_DEBUG - g_message("In select_style\n"); -#endif - fontsel = GTK_FONT_SELECTION(data); - font_info = fontsel_info->font_info; - font = &font_info[fontsel->font_index]; - styles = &fontsel_info->font_styles[font->style_index]; + gint index; if (bevent && !GTK_WIDGET_HAS_FOCUS (w)) gtk_widget_grab_focus (w); - /* The style index is stored in the row data, so we just need to copy - the style values into the fontsel and reload the font. */ - style = GPOINTER_TO_INT (gtk_clist_get_row_data(GTK_CLIST(fontsel->font_style_clist), row)); - - /* Don't allow selection of charset rows. */ - if (style == -1) + if (GTK_CLIST (fontsel->font_style_clist)->selection) { - gtk_clist_unselect_row(GTK_CLIST(fontsel->font_style_clist), row, 0); - return; + index = GPOINTER_TO_INT (GTK_CLIST (fontsel->font_style_clist)->selection->data); + + if (gtk_clist_get_text (GTK_CLIST (fontsel->font_style_clist), index, 0, &text)) + { + tmp_desc = pango_font_description_from_string (text); + + fontsel->font_desc->style = tmp_desc->style; + fontsel->font_desc->variant = tmp_desc->variant; + fontsel->font_desc->weight = tmp_desc->weight; + fontsel->font_desc->stretch = tmp_desc->stretch; + + pango_font_description_free (tmp_desc); + } } - - gtk_clist_get_text(GTK_CLIST(fontsel->font_style_clist), row, 0, &text); - gtk_entry_set_text(GTK_ENTRY(fontsel->font_style_entry), text); - - for (prop = 0; prop < GTK_NUM_STYLE_PROPERTIES; prop++) - fontsel->property_values[prop] = styles[style].properties[prop]; - - if (fontsel->style == style) - return; - - fontsel->style = style; + gtk_font_selection_show_available_sizes (fontsel); gtk_font_selection_select_best_size (fontsel); } - -/* This shows all the available sizes in the size clist, according to the - current metric and the current font & style. */ static void gtk_font_selection_show_available_sizes (GtkFontSelection *fontsel) { - FontInfo *font; - FontStyle *styles, *style; - const guint16 *standard_sizes; - guint16 *bitmapped_sizes; - gint nstandard_sizes, nbitmapped_sizes; - gchar buffer[16], *size; - gfloat bitmap_size_float = 0.; - guint16 bitmap_size = 0; - gboolean can_match; - gint type_filter; - -#ifdef FONTSEL_DEBUG - g_message("In show_available_sizes\n"); -#endif - font = &fontsel_info->font_info[fontsel->font_index]; - styles = &fontsel_info->font_styles[font->style_index]; - style = &styles[fontsel->style]; - - standard_sizes = font_sizes; - nstandard_sizes = sizeof(font_sizes) / sizeof(font_sizes[0]); - if (fontsel->metric == GTK_FONT_METRIC_POINTS) - { - bitmapped_sizes = &fontsel_info->point_sizes[style->point_sizes_index]; - nbitmapped_sizes = style->npoint_sizes; - } - else - { - bitmapped_sizes = &fontsel_info->pixel_sizes[style->pixel_sizes_index]; - nbitmapped_sizes = style->npixel_sizes; - } - - /* Only show the standard sizes if a scalable font is available. */ - type_filter = fontsel->filters[GTK_FONT_FILTER_BASE].font_type - & fontsel->filters[GTK_FONT_FILTER_USER].font_type; + gint i; + gchar buffer[128]; + gchar *size; - if (!((style->flags & GTK_FONT_SCALABLE_BITMAP - && type_filter & GTK_FONT_SCALABLE_BITMAP) - || (style->flags & GTK_FONT_SCALABLE - && type_filter & GTK_FONT_SCALABLE))) - nstandard_sizes = 0; - - gtk_clist_freeze (GTK_CLIST(fontsel->size_clist)); - gtk_clist_clear (GTK_CLIST(fontsel->size_clist)); - - /* Interleave the standard sizes with the bitmapped sizes so we get a list - of ascending sizes. If the metric is points, we have to convert the - decipoints to points. */ - while (nstandard_sizes || nbitmapped_sizes) - { - can_match = TRUE; + /* Insert the standard font sizes */ + gtk_clist_freeze (GTK_CLIST (fontsel->size_clist)); + gtk_clist_clear (GTK_CLIST (fontsel->size_clist)); - if (nbitmapped_sizes) - { - if (fontsel->metric == GTK_FONT_METRIC_POINTS) - { - if (*bitmapped_sizes % 10 != 0) - can_match = FALSE; - bitmap_size = *bitmapped_sizes / 10; - bitmap_size_float = *bitmapped_sizes / 10; - } - else - { - bitmap_size = *bitmapped_sizes; - bitmap_size_float = *bitmapped_sizes; - } - } - - if (can_match && nstandard_sizes && nbitmapped_sizes - && *standard_sizes == bitmap_size) - { - sprintf(buffer, "%i *", *standard_sizes); - standard_sizes++; - nstandard_sizes--; - bitmapped_sizes++; - nbitmapped_sizes--; - } - else if (nstandard_sizes - && (!nbitmapped_sizes - || (gfloat)*standard_sizes < bitmap_size_float)) - { - sprintf(buffer, "%i", *standard_sizes); - standard_sizes++; - nstandard_sizes--; - } - else - { - if (fontsel->metric == GTK_FONT_METRIC_POINTS) - { - if (*bitmapped_sizes % 10 == 0) - sprintf(buffer, "%i *", *bitmapped_sizes / 10); - else - sprintf(buffer, "%i.%i *", *bitmapped_sizes / 10, - *bitmapped_sizes % 10); - } - else - { - sprintf(buffer, "%i *", *bitmapped_sizes); - } - bitmapped_sizes++; - nbitmapped_sizes--; - } + for (i = 0; i < G_N_ELEMENTS (font_sizes); i++) + { + sprintf(buffer, "%i", font_sizes[i]); size = buffer; - gtk_clist_append(GTK_CLIST(fontsel->size_clist), &size); + gtk_clist_append (GTK_CLIST(fontsel->size_clist), &size); + if (font_sizes[i] * PANGO_SCALE == fontsel->font_desc->size) + gtk_clist_select_row(GTK_CLIST(fontsel->size_clist), i, 0); } gtk_clist_thaw (GTK_CLIST(fontsel->size_clist)); + + sprintf (buffer, "%i", fontsel->font_desc->size / PANGO_SCALE); + gtk_entry_set_text (GTK_ENTRY(fontsel->size_entry), buffer); } +static void +gtk_font_selection_select_best_size (GtkFontSelection *fontsel) +{ + gtk_font_selection_load_font (fontsel); +} /* If the user hits return in the font size entry, we change to the new font size. */ @@ -1518,140 +696,25 @@ gtk_font_selection_size_key_press (GtkWidget *w, { GtkFontSelection *fontsel; gint new_size; - gfloat new_size_float; gchar *text; -#ifdef FONTSEL_DEBUG - g_message("In size_key_press\n"); -#endif - fontsel = GTK_FONT_SELECTION(data); + fontsel = GTK_FONT_SELECTION (data); if (event->keyval == GDK_Return) { text = gtk_entry_get_text (GTK_ENTRY (fontsel->size_entry)); - if (fontsel->metric == GTK_FONT_METRIC_PIXELS) - { - new_size = atoi (text); - if (new_size < 2) - new_size = 2; - } - else - { - new_size_float = atof (text) * 10; - new_size = (gint) new_size_float; - if (new_size < 20) - new_size = 20; - } - - /* Remember that this size was set explicitly. */ - fontsel->selected_size = new_size; - - /* Check if the font size has changed, and return if it hasn't. */ - if (fontsel->size == new_size) - return TRUE; - - fontsel->size = new_size; - gtk_font_selection_select_best_size (fontsel); - return TRUE; - } - - return FALSE; -} + new_size = atoi (text) * PANGO_SCALE; - -/* This tries to select the closest size to the current size, though it - may have to change the size if only unscaled bitmaps are available. - Note: this will load a font. */ -static void -gtk_font_selection_select_best_size(GtkFontSelection *fontsel) -{ - FontInfo *font; - FontStyle *styles, *style; - gchar *text; - gint row, best_row = 0, size, size_fraction, best_size = 0, nmatched; - gboolean found = FALSE; - gchar buffer[32]; - GList *selection; - gint type_filter; - -#ifdef FONTSEL_DEBUG - g_message("In select_best_size\n"); -#endif - font = &fontsel_info->font_info[fontsel->font_index]; - styles = &fontsel_info->font_styles[font->style_index]; - style = &styles[fontsel->style]; - - /* Find the closest size available in the size clist. If the exact size is - in the list set found to TRUE. */ - for (row = 0; row < GTK_CLIST(fontsel->size_clist)->rows; row++) - { - gtk_clist_get_text(GTK_CLIST(fontsel->size_clist), row, 0, &text); - nmatched = sscanf(text, "%i.%i", &size, &size_fraction); - if (fontsel->metric == GTK_FONT_METRIC_POINTS) + if (fontsel->font_desc->size != new_size) { - size *= 10; - if (nmatched == 2) - size += size_fraction; - } - - if (size == fontsel->selected_size) - { - found = TRUE; - best_size = size; - best_row = row; - break; - } - else if (best_size == 0 - || abs(size - fontsel->selected_size) - < (abs(best_size - fontsel->selected_size))) - { - best_size = size; - best_row = row; + fontsel->font_desc->size = new_size; + gtk_font_selection_load_font (fontsel); } } - /* If we aren't scaling bitmapped fonts and this is a bitmapped font, we - need to use the closest size found. */ - type_filter = fontsel->filters[GTK_FONT_FILTER_BASE].font_type - & fontsel->filters[GTK_FONT_FILTER_USER].font_type; - - if (!((style->flags & GTK_FONT_SCALABLE_BITMAP - && type_filter & GTK_FONT_SCALABLE_BITMAP) - || (style->flags & GTK_FONT_SCALABLE - && type_filter & GTK_FONT_SCALABLE))) - found = TRUE; - - if (found) - { - fontsel->size = best_size; - gtk_clist_moveto(GTK_CLIST(fontsel->size_clist), best_row, -1, 0.5, 0); - gtk_clist_select_row(GTK_CLIST(fontsel->size_clist), best_row, 0); - } - else - { - fontsel->size = fontsel->selected_size; - selection = GTK_CLIST(fontsel->size_clist)->selection; - if (selection) - gtk_clist_unselect_row(GTK_CLIST(fontsel->size_clist), - GPOINTER_TO_INT (selection->data), 0); - gtk_clist_moveto(GTK_CLIST(fontsel->size_clist), best_row, -1, 0.5, 0); - - /* Show the size in the size entry. */ - if (fontsel->metric == GTK_FONT_METRIC_PIXELS) - sprintf(buffer, "%i", fontsel->size); - else - { - if (fontsel->size % 10 == 0) - sprintf(buffer, "%i", fontsel->size / 10); - else - sprintf(buffer, "%i.%i", fontsel->size / 10, fontsel->size % 10); - } - gtk_entry_set_text (GTK_ENTRY (fontsel->size_entry), buffer); - } - gtk_font_selection_load_font (fontsel); + return FALSE; } - /* This is called when a size is selected in the list. */ static void gtk_font_selection_select_size (GtkWidget *w, @@ -1663,163 +726,33 @@ gtk_font_selection_select_size (GtkWidget *w, GtkFontSelection *fontsel; gint new_size; gchar *text; - gchar buffer[16]; - gint i; -#ifdef FONTSEL_DEBUG - g_message("In select_size\n"); -#endif - fontsel = GTK_FONT_SELECTION(data); + fontsel = GTK_FONT_SELECTION (data); if (bevent && !GTK_WIDGET_HAS_FOCUS (w)) gtk_widget_grab_focus (w); - /* Copy the size from the clist to the size entry, but without the bitmapped - marker ('*'). */ gtk_clist_get_text(GTK_CLIST(fontsel->size_clist), row, 0, &text); - i = 0; - while (i < 15 && (text[i] == '.' || (text[i] >= '0' && text[i] <= '9'))) - { - buffer[i] = text[i]; - i++; - } - buffer[i] = '\0'; - gtk_entry_set_text(GTK_ENTRY(fontsel->size_entry), buffer); - - /* Check if the font size has changed, and return if it hasn't. */ - new_size = atoi(text); - if (fontsel->metric == GTK_FONT_METRIC_POINTS) - new_size *= 10; - - if (fontsel->size == new_size) - return; + new_size = atoi (text) * PANGO_SCALE; - /* If the size was selected by the user we set the selected_size. */ - fontsel->selected_size = new_size; - - fontsel->size = new_size; - gtk_font_selection_load_font (fontsel); -} - - -/* This is called when the pixels or points radio buttons are pressed. */ -static void -gtk_font_selection_metric_callback (GtkWidget *w, - gpointer data) -{ - GtkFontSelection *fontsel = GTK_FONT_SELECTION(data); - -#ifdef FONTSEL_DEBUG - g_message("In metric_callback\n"); -#endif - if (GTK_TOGGLE_BUTTON(fontsel->pixels_button)->active) - { - if (fontsel->metric == GTK_FONT_METRIC_PIXELS) - return; - fontsel->metric = GTK_FONT_METRIC_PIXELS; - fontsel->size = (fontsel->size + 5) / 10; - fontsel->selected_size = (fontsel->selected_size + 5) / 10; - } - else - { - if (fontsel->metric == GTK_FONT_METRIC_POINTS) - return; - fontsel->metric = GTK_FONT_METRIC_POINTS; - fontsel->size *= 10; - fontsel->selected_size *= 10; - } - if (fontsel->font_index != -1) + if (fontsel->font_desc->size != new_size) { - gtk_font_selection_show_available_sizes (fontsel); - gtk_font_selection_select_best_size (fontsel); - } -} + /* If the size was selected by the user we set the selected_size. */ + fontsel->font_desc->size = new_size; - -/* This searches the given property table and returns the index of the given - string, or 0, which is the wildcard '*' index, if it's not found. */ -static guint16 -gtk_font_selection_field_to_index (gchar **table, - gint ntable, - gchar *field) -{ - gint i; - - for (i = 0; i < ntable; i++) - if (strcmp (field, table[i]) == 0) - return i; - - return 0; + gtk_font_selection_load_font (fontsel); + } } - - -/* This attempts to load the current font, and returns TRUE if it succeeds. */ -static gboolean +static void gtk_font_selection_load_font (GtkFontSelection *fontsel) { - GdkFont *font; - gchar *fontname, *label_text; - XFontStruct *xfs; - if (fontsel->font) gdk_font_unref (fontsel->font); fontsel->font = NULL; - - /* If no family has been selected yet, just return FALSE. */ - if (fontsel->font_index == -1) - return FALSE; - - fontname = gtk_font_selection_get_font_name (fontsel); - if (fontname) - { -#ifdef FONTSEL_DEBUG - g_message("Loading: %s\n", fontname); -#endif -#ifndef GDK_WINDOWING_WIN32 - font = gdk_font_load (fontname); - xfs = font ? GDK_FONT_XFONT (font) : NULL; - if (xfs && (xfs->min_byte1 != 0 || xfs->max_byte1 != 0)) - { - gchar *tmp_name; - - gdk_font_unref (font); - tmp_name = g_strconcat (fontname, ",*", NULL); - font = gdk_fontset_load (tmp_name); - g_free (tmp_name); - } -#else - /* Load as a fontset so that gtkentry uses wide chars for it */ - font = gdk_fontset_load (fontname); -#endif - g_free (fontname); - - if (font) - { - fontsel->font = font; - /* Make sure the message label is empty, but don't change it unless - it's necessary as it results in a resize of the whole window! */ - gtk_label_get(GTK_LABEL(fontsel->message_label), &label_text); - if (strcmp(label_text, "")) - gtk_label_set_text(GTK_LABEL(fontsel->message_label), ""); - gtk_font_selection_update_preview (fontsel); - return TRUE; - } - else - { - gtk_label_set_text(GTK_LABEL(fontsel->message_label), - _("The selected font is not available.")); - } - } - else - { - gtk_label_set_text(GTK_LABEL(fontsel->message_label), - _("The selected font is not a valid font.")); - } - - return FALSE; -} + gtk_font_selection_update_preview (fontsel); +} /* This sets the font in the preview entry to the selected font, and tries to make sure that the preview entry is a reasonable size, i.e. so that the @@ -1830,1516 +763,34 @@ gtk_font_selection_load_font (GtkFontSelection *fontsel) static void gtk_font_selection_update_preview (GtkFontSelection *fontsel) { - GtkWidget *preview_entry; - GtkStyle *style; - gint text_height, new_height; + GtkRcStyle *rc_style; + gint new_height; + GtkRequisition old_requisition; + GtkWidget *preview_entry = fontsel->preview_entry; gchar *text; -#ifdef GDK_WINDOWING_X11 - XFontStruct *xfs; -#endif -#ifdef FONTSEL_DEBUG - g_message("In update_preview\n"); -#endif - style = gtk_style_new (); - gdk_font_unref (style->font); - style->font = fontsel->font; - gdk_font_ref (style->font); + gtk_widget_get_child_requisition (preview_entry, &old_requisition); - preview_entry = fontsel->preview_entry; - gtk_widget_set_style (preview_entry, style); - gtk_style_unref(style); + rc_style = gtk_rc_style_new (); + rc_style->font_desc = pango_font_description_copy (fontsel->font_desc); + gtk_widget_modify_style (preview_entry, rc_style); + gtk_rc_style_unref (rc_style); + + gtk_widget_size_request (preview_entry, NULL); - text_height = preview_entry->style->font->ascent - + preview_entry->style->font->descent; /* We don't ever want to be over MAX_PREVIEW_HEIGHT pixels high. */ - new_height = text_height + 20; - if (new_height < INITIAL_PREVIEW_HEIGHT) - new_height = INITIAL_PREVIEW_HEIGHT; - if (new_height > MAX_PREVIEW_HEIGHT) - new_height = MAX_PREVIEW_HEIGHT; - - if ((preview_entry->requisition.height < text_height + 10) - || (preview_entry->requisition.height > text_height + 40)) + new_height = CLAMP (preview_entry->requisition.height, INITIAL_PREVIEW_HEIGHT, MAX_PREVIEW_HEIGHT); + + if (new_height > old_requisition.height || new_height < old_requisition.height - 30) gtk_widget_set_usize(preview_entry, -1, new_height); /* This sets the preview text, if it hasn't been set already. */ - text = gtk_entry_get_text(GTK_ENTRY(fontsel->preview_entry)); + text = gtk_entry_get_text(GTK_ENTRY(preview_entry)); if (strlen(text) == 0) - gtk_entry_set_text(GTK_ENTRY(fontsel->preview_entry), PREVIEW_TEXT); - gtk_entry_set_position(GTK_ENTRY(fontsel->preview_entry), 0); - -#ifdef GDK_WINDOWING_X11 - /* If this is a 2-byte font display a message to say it may not be - displayed properly. */ - xfs = GDK_FONT_XFONT(fontsel->font); - if (xfs->min_byte1 != 0 || xfs->max_byte1 != 0) - gtk_label_set_text(GTK_LABEL(fontsel->message_label), - _("This is a 2-byte font and may not be displayed correctly.")); -#endif -} - - -static void -gtk_font_selection_switch_page (GtkWidget *w, - GtkNotebookPage *page, - gint page_num, - gpointer data) -{ - GtkFontSelection *fontsel = GTK_FONT_SELECTION(data); - - /* This function strangely gets called when the window is destroyed, - so we check here to see if the notebook is visible. */ - if (!GTK_WIDGET_VISIBLE(w)) - return; - - if (page_num == 0) - gtk_font_selection_update_filter(fontsel); - else if (page_num == 1) - gtk_font_selection_show_font_info(fontsel); + gtk_entry_set_text(GTK_ENTRY(preview_entry), PREVIEW_TEXT); + gtk_entry_set_position(GTK_ENTRY(preview_entry), 0); } - -static void -gtk_font_selection_show_font_info (GtkFontSelection *fontsel) -{ -#ifdef GDK_WINDOWING_X11 - Atom font_atom, atom; - Bool status; -#endif - char *name; - gchar *fontname; - gchar field_buffer[XLFD_MAX_FIELD_LEN]; - gchar *field; - gint i; - gboolean shown_actual_fields = FALSE; - - fontname = gtk_font_selection_get_font_name(fontsel); - gtk_entry_set_text(GTK_ENTRY(fontsel->requested_font_name), - fontname ? fontname : ""); - - gtk_clist_freeze (GTK_CLIST(fontsel->info_clist)); - for (i = 0; i < GTK_XLFD_NUM_FIELDS; i++) - { - if (fontname) - field = gtk_font_selection_get_xlfd_field (fontname, i, field_buffer); - else - field = NULL; - if (field) - { - if (i == XLFD_SLANT) - field = gtk_font_selection_expand_slant_code(field); - else if (i == XLFD_SPACING) - field = gtk_font_selection_expand_spacing_code(field); - } - gtk_clist_set_text(GTK_CLIST(fontsel->info_clist), i, 1, - field ? field : ""); - } -#ifdef GDK_WINDOWING_X11 - if (fontsel->font) - { - font_atom = gdk_atom_intern ("FONT", FALSE); - - if (fontsel->font->type == GDK_FONT_FONTSET) - { - XFontStruct **font_structs; - gint num_fonts; - gchar **font_names; - - num_fonts = XFontsOfFontSet (GDK_FONT_XFONT(fontsel->font), - &font_structs, &font_names); - status = XGetFontProperty(font_structs[0], font_atom, &atom); - } - else - { - status = XGetFontProperty(GDK_FONT_XFONT(fontsel->font), font_atom, - &atom); - } - - if (status == True) - { - name = gdk_atom_name (atom); - gtk_entry_set_text (GTK_ENTRY (fontsel->actual_font_name), name); - - for (i = 0; i < GTK_XLFD_NUM_FIELDS; i++) - { - field = gtk_font_selection_get_xlfd_field (name, i, field_buffer); - if (i == XLFD_SLANT) - field = gtk_font_selection_expand_slant_code(field); - else if (i == XLFD_SPACING) - field = gtk_font_selection_expand_spacing_code(field); - gtk_clist_set_text(GTK_CLIST(fontsel->info_clist), i, 2, - field ? field : ""); - } - shown_actual_fields = TRUE; - g_free (name); - } - } -#elif defined (GDK_WINDOWING_WIN32) - if (fontsel->font) - { - LOGFONT logfont; - - if (GetObject (GDK_FONT_XFONT (fontsel->font), - sizeof (LOGFONT), &logfont) > 0) - { - name = logfont_to_xlfd (&logfont, logfont.lfHeight, -1, 0); - gtk_entry_set_text (GTK_ENTRY(fontsel->actual_font_name),name); - for (i = 0; i < GTK_XLFD_NUM_FIELDS; i++) - { - field = gtk_font_selection_get_xlfd_field (name, i, - field_buffer); - if (i == XLFD_SLANT) - field = gtk_font_selection_expand_slant_code(field); - else if (i == XLFD_SPACING) - field = gtk_font_selection_expand_spacing_code(field); - gtk_clist_set_text(GTK_CLIST(fontsel->info_clist), i, 2, - field ? field : ""); - } - shown_actual_fields = TRUE; - g_free (name); - } - } - -#endif - if (!shown_actual_fields) - { - gtk_entry_set_text(GTK_ENTRY(fontsel->actual_font_name), ""); - for (i = 0; i < GTK_XLFD_NUM_FIELDS; i++) - { - gtk_clist_set_text(GTK_CLIST(fontsel->info_clist), i, 2, - fontname ? _("(unknown)") : ""); - } - } - gtk_clist_thaw (GTK_CLIST(fontsel->info_clist)); - g_free(fontname); -} - - -static gchar* -gtk_font_selection_expand_slant_code(gchar *slant) -{ - if (!g_strcasecmp(slant, "r")) return(_("roman")); - else if (!g_strcasecmp(slant, "i")) return(_("italic")); - else if (!g_strcasecmp(slant, "o")) return(_("oblique")); - else if (!g_strcasecmp(slant, "ri")) return(_("reverse italic")); - else if (!g_strcasecmp(slant, "ro")) return(_("reverse oblique")); - else if (!g_strcasecmp(slant, "ot")) return(_("other")); - return slant; -} - -static gchar* -gtk_font_selection_expand_spacing_code(gchar *spacing) -{ - if (!g_strcasecmp(spacing, "p")) return(_("proportional")); - else if (!g_strcasecmp(spacing, "m")) return(_("monospaced")); - else if (!g_strcasecmp(spacing, "c")) return(_("char cell")); - return spacing; -} - - -/***************************************************************************** - * These functions all deal with the Filter page and filtering the fonts. - *****************************************************************************/ - -/* This is called when an item is selected in one of the filter clists. - We make sure that the first row of the clist, i.e. the wildcard '*', is - selected if and only if none of the other items are selected. - Also doesn't allow selections of values filtered out by base filter. - We may need to be careful about triggering other signals. */ -static void -gtk_font_selection_select_filter (GtkWidget *w, - gint row, - gint column, - GdkEventButton *bevent, - GtkFontSelection *fontsel) -{ - gint i, prop, index; - - if (row == 0) - { - for (i = 1; i < GTK_CLIST(w)->rows; i++) - gtk_clist_unselect_row(GTK_CLIST(w), i, 0); - } - else - { - /* Find out which property this is. */ - for (prop = 0; prop < GTK_NUM_FONT_PROPERTIES; prop++) - if (fontsel->filter_clists[prop] == w) - break; - index = GPOINTER_TO_INT (gtk_clist_get_row_data(GTK_CLIST(w), row)); - if (gtk_font_selection_filter_state (fontsel, GTK_FONT_FILTER_BASE, - prop, index) == NOT_FILTERED) - gtk_clist_unselect_row(GTK_CLIST(w), row, 0); - else - gtk_clist_unselect_row(GTK_CLIST(w), 0, 0); - } -} - - -/* Here a filter item is being deselected. If there are now no items selected - we select the first '*' item, unless that it is the item being deselected, - in which case we select all of the other items. This makes it easy to - select all items in the list except one or two. */ -static void -gtk_font_selection_unselect_filter (GtkWidget *w, - gint row, - gint column, - GdkEventButton *bevent, - GtkFontSelection *fontsel) -{ - gint i, prop, index; - - if (!GTK_CLIST(w)->selection) - { - if (row == 0) - { - /* Find out which property this is. */ - for (prop = 0; prop < GTK_NUM_FONT_PROPERTIES; prop++) - if (fontsel->filter_clists[prop] == w) - break; - - for (i = 1; i < GTK_CLIST(w)->rows; i++) - { - index = GPOINTER_TO_INT (gtk_clist_get_row_data(GTK_CLIST(w), - i)); - if (gtk_font_selection_filter_state (fontsel, - GTK_FONT_FILTER_BASE, - prop, index) - != NOT_FILTERED) - gtk_clist_select_row(GTK_CLIST(w), i, 0); - } - } - else - { - gtk_clist_select_row(GTK_CLIST(w), 0, 0); - } - } -} - - -/* This is called when the main notebook page is selected. It checks if the - filter has changed, an if so it creates the filter settings, and filters the - fonts shown. If an empty filter (all '*'s) is applied, then filtering is - turned off. */ -static void -gtk_font_selection_update_filter (GtkFontSelection *fontsel) -{ - GtkWidget *clist; - GList *selection; - gboolean default_filter = TRUE, filter_changed = FALSE; - gint prop, nselected, i, row, index; - GtkFontFilter *filter = &fontsel->filters[GTK_FONT_FILTER_USER]; - gint base_font_type, user_font_type, new_font_type; - -#ifdef FONTSEL_DEBUG - g_message("In update_filter\n"); -#endif - - /* Check if the user filter has changed, and also if it is the default - filter, i.e. bitmap & scalable fonts and all '*'s selected. - We only look at the bits which are not already filtered out by the base - filter, since that overrides the user filter. */ - base_font_type = fontsel->filters[GTK_FONT_FILTER_BASE].font_type - & GTK_FONT_ALL; - user_font_type = fontsel->filters[GTK_FONT_FILTER_USER].font_type - & GTK_FONT_ALL; - new_font_type = GTK_TOGGLE_BUTTON(fontsel->type_bitmaps_button)->active - ? GTK_FONT_BITMAP : 0; - new_font_type |= (GTK_TOGGLE_BUTTON(fontsel->type_scalable_button)->active - ? GTK_FONT_SCALABLE : 0); - new_font_type |= (GTK_TOGGLE_BUTTON(fontsel->type_scaled_bitmaps_button)->active ? GTK_FONT_SCALABLE_BITMAP : 0); - new_font_type &= base_font_type; - new_font_type |= (~base_font_type & user_font_type); - if (new_font_type != (GTK_FONT_BITMAP | GTK_FONT_SCALABLE)) - default_filter = FALSE; - - if (new_font_type != user_font_type) - filter_changed = TRUE; - fontsel->filters[GTK_FONT_FILTER_USER].font_type = new_font_type; - - for (prop = 0; prop < GTK_NUM_FONT_PROPERTIES; prop++) - { - clist = fontsel->filter_clists[prop]; - selection = GTK_CLIST(clist)->selection; - nselected = g_list_length(selection); - if (nselected != 1 || GPOINTER_TO_INT (selection->data) != 0) - { - default_filter = FALSE; - - if (filter->property_nfilters[prop] != nselected) - filter_changed = TRUE; - else - { - for (i = 0; i < nselected; i++) - { - row = GPOINTER_TO_INT (selection->data); - index = GPOINTER_TO_INT (gtk_clist_get_row_data (GTK_CLIST (clist), row)); - if (filter->property_filters[prop][i] != index) - filter_changed = TRUE; - selection = selection->next; - } - } - } - else - { - if (filter->property_nfilters[prop] != 0) - filter_changed = TRUE; - } - } - - /* If the filter hasn't changed we just return. */ - if (!filter_changed) - return; - -#ifdef FONTSEL_DEBUG - g_message(" update_fonts: filter has changed\n"); -#endif - - /* Free the old filter data and create the new arrays. */ - for (prop = 0; prop < GTK_NUM_FONT_PROPERTIES; prop++) - { - g_free(filter->property_filters[prop]); - - clist = fontsel->filter_clists[prop]; - selection = GTK_CLIST(clist)->selection; - nselected = g_list_length(selection); - if (nselected == 1 && GPOINTER_TO_INT (selection->data) == 0) - { - filter->property_filters[prop] = NULL; - filter->property_nfilters[prop] = 0; - } - else - { - filter->property_filters[prop] = g_new(guint16, nselected); - filter->property_nfilters[prop] = nselected; - for (i = 0; i < nselected; i++) - { - row = GPOINTER_TO_INT (selection->data); - index = GPOINTER_TO_INT (gtk_clist_get_row_data (GTK_CLIST (clist), row)); - filter->property_filters[prop][i] = index; - selection = selection->next; - } - } - } - - /* Set the 'Reset Filter' button sensitive if a filter is in effect, and - also set the label above the font list to show this as well. */ - if (default_filter) - { - gtk_widget_set_sensitive(fontsel->filter_button, FALSE); - gtk_label_set_text(GTK_LABEL(fontsel->font_label), _("Font:")); - } - else - { - gtk_widget_set_sensitive(fontsel->filter_button, TRUE); - gtk_label_set_text(GTK_LABEL(fontsel->font_label), _("Font: (Filter Applied)")); - } - gtk_font_selection_show_available_fonts(fontsel); -} - - -/* This shows all the available fonts in the font clist. */ -static void -gtk_font_selection_show_available_fonts (GtkFontSelection *fontsel) -{ - FontInfo *font_info, *font; - GtkFontFilter *filter; - gint nfonts, i, j, k, row, style, font_row = -1; - gchar font_buffer[XLFD_MAX_FIELD_LEN * 2 + 4]; - gchar *font_item; - gboolean matched, matched_style; - -#ifdef FONTSEL_DEBUG - g_message("In show_available_fonts\n"); -#endif - font_info = fontsel_info->font_info; - nfonts = fontsel_info->nfonts; - - /* Filter the list of fonts. */ - gtk_clist_freeze (GTK_CLIST(fontsel->font_clist)); - gtk_clist_clear (GTK_CLIST(fontsel->font_clist)); - for (i = 0; i < nfonts; i++) - { - font = &font_info[i]; - - /* Check if the foundry passes through all filters. */ - matched = TRUE; - for (k = 0; k < GTK_NUM_FONT_FILTERS; k++) - { - filter = &fontsel->filters[k]; - - if (filter->property_nfilters[FOUNDRY] != 0) - { - matched = FALSE; - for (j = 0; j < filter->property_nfilters[FOUNDRY]; j++) - { - if (font->foundry == filter->property_filters[FOUNDRY][j]) - { - matched = TRUE; - break; - } - } - if (!matched) - break; - } - } - - if (!matched) - continue; - - - /* Now check if the other properties are matched in at least one style.*/ - matched_style = FALSE; - for (style = 0; style < font->nstyles; style++) - { - if (gtk_font_selection_style_visible(fontsel, font, style)) - { - matched_style = TRUE; - break; - } - } - if (!matched_style) - continue; - - /* Insert the font in the clist. */ - if ((i > 0 && font->family == font_info[i-1].family) - || (i < nfonts - 1 && font->family == font_info[i+1].family)) - { - sprintf(font_buffer, "%s (%s)", font->family, - fontsel_info->properties[FOUNDRY][font->foundry]); - font_item = font_buffer; - row = gtk_clist_append(GTK_CLIST(fontsel->font_clist), &font_item); - } - else - { - row = gtk_clist_append(GTK_CLIST(fontsel->font_clist), - &font->family); - } - gtk_clist_set_row_data(GTK_CLIST(fontsel->font_clist), row, - GINT_TO_POINTER (i)); - if (fontsel->font_index == i) - font_row = row; - } - gtk_clist_thaw (GTK_CLIST(fontsel->font_clist)); - - /* If the currently-selected font isn't in the new list, reset the - selection. */ - if (font_row == -1) - { - fontsel->font_index = -1; - if (fontsel->font) - gdk_font_unref(fontsel->font); - fontsel->font = NULL; - gtk_entry_set_text(GTK_ENTRY(fontsel->font_entry), ""); - gtk_clist_clear (GTK_CLIST(fontsel->font_style_clist)); - gtk_entry_set_text(GTK_ENTRY(fontsel->font_style_entry), ""); - return; - } - - gtk_clist_select_row(GTK_CLIST(fontsel->font_clist), font_row, 0); - if (gtk_clist_row_is_visible(GTK_CLIST(fontsel->font_clist), font_row) - != GTK_VISIBILITY_FULL) - gtk_clist_moveto(GTK_CLIST(fontsel->font_clist), font_row, -1, 0.5, 0); - - gtk_font_selection_show_available_styles (fontsel); - gtk_font_selection_select_best_style (fontsel, FALSE); -} - - -/* Returns TRUE if the style is not currently filtered out. */ -static gboolean -gtk_font_selection_style_visible(GtkFontSelection *fontsel, - FontInfo *font, - gint style_index) -{ - FontStyle *styles, *style; - GtkFontFilter *filter; - guint16 value; - gint prop, i, j; - gboolean matched; - gint type_filter; - - styles = &fontsel_info->font_styles[font->style_index]; - style = &styles[style_index]; - - /* Check if font_type of style is filtered. */ - type_filter = fontsel->filters[GTK_FONT_FILTER_BASE].font_type - & fontsel->filters[GTK_FONT_FILTER_USER].font_type; - if (!(style->flags & type_filter)) - return FALSE; - - for (prop = 0; prop < GTK_NUM_STYLE_PROPERTIES; prop++) - { - value = style->properties[prop]; - - /* Check each filter. */ - for (i = 0; i < GTK_NUM_FONT_FILTERS; i++) - { - filter = &fontsel->filters[i]; - - if (filter->property_nfilters[prop] != 0) - { - matched = FALSE; - for (j = 0; j < filter->property_nfilters[prop]; j++) - { - if (value == filter->property_filters[prop][j]) - { - matched = TRUE; - break; - } - } - if (!matched) - return FALSE; - } - } - } - return TRUE; -} - - -/* This resets the font type to bitmap or scalable, and sets all the filter - clists to the wildcard '*' options. */ -static void -gtk_font_selection_reset_filter (GtkWidget *w, - GtkFontSelection *fontsel) -{ - gint prop, base_font_type; - - fontsel->filters[GTK_FONT_FILTER_USER].font_type = GTK_FONT_BITMAP - | GTK_FONT_SCALABLE; - - base_font_type = fontsel->filters[GTK_FONT_FILTER_BASE].font_type; - if (base_font_type & GTK_FONT_BITMAP) - gtk_toggle_button_set_active (GTK_TOGGLE_BUTTON (fontsel->type_bitmaps_button), TRUE); - if (base_font_type & GTK_FONT_SCALABLE) - gtk_toggle_button_set_active (GTK_TOGGLE_BUTTON (fontsel->type_scalable_button), TRUE); - if (base_font_type & GTK_FONT_SCALABLE_BITMAP) - gtk_toggle_button_set_active (GTK_TOGGLE_BUTTON (fontsel->type_scaled_bitmaps_button), FALSE); - - for (prop = 0; prop < GTK_NUM_FONT_PROPERTIES; prop++) - gtk_clist_select_row(GTK_CLIST(fontsel->filter_clists[prop]), 0, 0); -} - - -/* This clears the filter, showing all fonts and styles again. */ -static void -gtk_font_selection_on_clear_filter (GtkWidget *w, - GtkFontSelection *fontsel) -{ - gtk_font_selection_clear_filter(fontsel); -} - - -/* This resets the user filter, showing all fonts and styles which pass the - base filter again. Note that the font type is set to bitmaps and scalable - fonts - scaled bitmaps are not shown. */ -static void -gtk_font_selection_clear_filter (GtkFontSelection *fontsel) -{ - GtkFontFilter *filter; - gint prop; - -#ifdef FONTSEL_DEBUG - g_message("In clear_filter\n"); -#endif - /* Clear the filter data. */ - filter = &fontsel->filters[GTK_FONT_FILTER_USER]; - filter->font_type = GTK_FONT_BITMAP | GTK_FONT_SCALABLE; - for (prop = 0; prop < GTK_NUM_FONT_PROPERTIES; prop++) - { - g_free(filter->property_filters[prop]); - filter->property_filters[prop] = NULL; - filter->property_nfilters[prop] = 0; - } - - /* Select all the '*'s on the filter page. */ - gtk_font_selection_reset_filter(NULL, fontsel); - - /* Update the main notebook page. */ - gtk_widget_set_sensitive(fontsel->filter_button, FALSE); - gtk_label_set_text(GTK_LABEL(fontsel->font_label), _("Font:")); - - gtk_font_selection_show_available_fonts(fontsel); -} - - -void -gtk_font_selection_set_filter (GtkFontSelection *fontsel, - GtkFontFilterType filter_type, - GtkFontType font_type, - gchar **foundries, - gchar **weights, - gchar **slants, - gchar **setwidths, - gchar **spacings, - gchar **charsets) -{ - GtkFontFilter *filter; - gchar **filter_strings [GTK_NUM_FONT_PROPERTIES]; - gchar *filter_string; - gchar *property, *property_alt; - gint prop, nfilters, i, j, num_found; - gint base_font_type, user_font_type; - gboolean filter_set; - - /* Put them into an array so we can use a simple loop. */ - filter_strings[FOUNDRY] = foundries; - filter_strings[WEIGHT] = weights; - filter_strings[SLANT] = slants; - filter_strings[SET_WIDTH] = setwidths; - filter_strings[SPACING] = spacings; - filter_strings[CHARSET] = charsets; - - filter = &fontsel->filters[filter_type]; - filter->font_type = font_type; - - /* Free the old filter data, and insert the new. */ - for (prop = 0; prop < GTK_NUM_FONT_PROPERTIES; prop++) - { - g_free(filter->property_filters[prop]); - filter->property_filters[prop] = NULL; - filter->property_nfilters[prop] = 0; - - if (filter_strings[prop]) - { - /* Count how many items in the new array. */ - nfilters = 0; - while (filter_strings[prop][nfilters]) - nfilters++; - - filter->property_filters[prop] = g_new(guint16, nfilters); - filter->property_nfilters[prop] = 0; - - /* Now convert the strings to property indices. */ - num_found = 0; - for (i = 0; i < nfilters; i++) - { - filter_string = filter_strings[prop][i]; - for (j = 0; j < fontsel_info->nproperties[prop]; j++) - { - property = _(fontsel_info->properties[prop][j]); - property_alt = NULL; - if (prop == SLANT) - property_alt = gtk_font_selection_expand_slant_code(property); - else if (prop == SPACING) - property_alt = gtk_font_selection_expand_spacing_code(property); - if (!strcmp (filter_string, property) - || (property_alt && !strcmp (filter_string, property_alt))) - { - filter->property_filters[prop][num_found] = j; - num_found++; - break; - } - } - } - filter->property_nfilters[prop] = num_found; - } - } - - /* Now set the clists on the filter page according to the new filter. */ - gtk_font_selection_update_filter_lists (fontsel); - - if (filter_type == GTK_FONT_FILTER_BASE) - { - user_font_type = fontsel->filters[GTK_FONT_FILTER_USER].font_type; - if (font_type & GTK_FONT_BITMAP) - { - gtk_widget_set_sensitive (fontsel->type_bitmaps_button, TRUE); - gtk_toggle_button_set_active (GTK_TOGGLE_BUTTON (fontsel->type_bitmaps_button), user_font_type & GTK_FONT_BITMAP); - } - else - { - gtk_widget_set_sensitive (fontsel->type_bitmaps_button, FALSE); - gtk_toggle_button_set_active (GTK_TOGGLE_BUTTON (fontsel->type_bitmaps_button), FALSE); - } - - if (font_type & GTK_FONT_SCALABLE) - { - gtk_widget_set_sensitive (fontsel->type_scalable_button, TRUE); - gtk_toggle_button_set_active (GTK_TOGGLE_BUTTON (fontsel->type_scalable_button), user_font_type & GTK_FONT_SCALABLE); - } - else - { - gtk_widget_set_sensitive (fontsel->type_scalable_button, FALSE); - gtk_toggle_button_set_active (GTK_TOGGLE_BUTTON (fontsel->type_scalable_button), FALSE); - } - - if (font_type & GTK_FONT_SCALABLE_BITMAP) - { - gtk_widget_set_sensitive (fontsel->type_scaled_bitmaps_button, TRUE); - gtk_toggle_button_set_active (GTK_TOGGLE_BUTTON (fontsel->type_scaled_bitmaps_button), user_font_type & GTK_FONT_SCALABLE_BITMAP); - } - else - { - gtk_widget_set_sensitive (fontsel->type_scaled_bitmaps_button, FALSE); - gtk_toggle_button_set_active (GTK_TOGGLE_BUTTON (fontsel->type_scaled_bitmaps_button), FALSE); - } - } - else - { - base_font_type = fontsel->filters[GTK_FONT_FILTER_BASE].font_type; - if (base_font_type & GTK_FONT_BITMAP) - gtk_toggle_button_set_active (GTK_TOGGLE_BUTTON (fontsel->type_bitmaps_button), font_type & GTK_FONT_BITMAP); - - if (base_font_type & GTK_FONT_SCALABLE) - gtk_toggle_button_set_active (GTK_TOGGLE_BUTTON (fontsel->type_scalable_button), font_type & GTK_FONT_SCALABLE); - - if (base_font_type & GTK_FONT_SCALABLE_BITMAP) - gtk_toggle_button_set_active (GTK_TOGGLE_BUTTON (fontsel->type_scaled_bitmaps_button), font_type & GTK_FONT_SCALABLE_BITMAP); - - /* If the user filter is not the default, make the 'Reset Filter' button - sensitive. */ - filter_set = FALSE; - if (font_type != (GTK_FONT_BITMAP | GTK_FONT_SCALABLE)) - filter_set = TRUE; - for (prop = 0; prop < GTK_NUM_FONT_PROPERTIES; prop++) - { - if (filter->property_nfilters[prop] != 0) - filter_set = TRUE; - } - if (filter_set) - gtk_widget_set_sensitive (fontsel->filter_button, TRUE); - } - - gtk_font_selection_show_available_fonts (fontsel); -} - - -/* This sets the colour of each property in the filter clists according to - the base filter. i.e. Filtered properties are shown as insensitive. */ -static void -gtk_font_selection_update_filter_lists (GtkFontSelection *fontsel) -{ - GtkWidget *clist; - GdkColor *inactive_fg, *inactive_bg, *fg, *bg; - gint prop, row, index; - - /* We have to make sure the clist is realized to use the colours. */ - for (prop = 0; prop < GTK_NUM_FONT_PROPERTIES; prop++) - { - clist = fontsel->filter_clists[prop]; - gtk_widget_realize (clist); - inactive_fg = &clist->style->fg[GTK_STATE_INSENSITIVE]; - inactive_bg = &clist->style->bg[GTK_STATE_INSENSITIVE]; - for (row = 1; row < GTK_CLIST(clist)->rows; row++) - { - index = GPOINTER_TO_INT (gtk_clist_get_row_data(GTK_CLIST(clist), - row)); - /* Set the colour according to the base filter. */ - if (gtk_font_selection_filter_state (fontsel, GTK_FONT_FILTER_BASE, - prop, index) == NOT_FILTERED) - { - fg = inactive_fg; - bg = inactive_bg; - } - else - { - fg = NULL; - bg = NULL; - } - gtk_clist_set_foreground(GTK_CLIST(clist), row, fg); - gtk_clist_set_background(GTK_CLIST(clist), row, bg); - - /* Set the selection state according to the user filter. */ - if (gtk_font_selection_filter_state (fontsel, GTK_FONT_FILTER_USER, - prop, index) == FILTERED - && fg == NULL) - gtk_clist_select_row (GTK_CLIST (clist), row, 0); - else - gtk_clist_unselect_row (GTK_CLIST (clist), row, 0); - } - } -} - - -/* Returns whether a property value is in the filter or not, or if the - property has no filter set. */ -static GtkFontPropertyFilterState -gtk_font_selection_filter_state (GtkFontSelection *fontsel, - GtkFontFilterType filter_type, - gint property, - gint index) -{ - GtkFontFilter *filter; - gint i; - - filter = &fontsel->filters[filter_type]; - if (filter->property_nfilters[property] == 0) - return NOT_SET; - - for (i = 0; i < filter->property_nfilters[property]; i++) - { - if (filter->property_filters[property][i] == index) - return FILTERED; - } - return NOT_FILTERED; -} - - -#ifdef GDK_WINDOWING_WIN32 - -static gint num_fonts; -static gint font_names_size; -static gchar **xfontnames; -static HDC hdc; - -static char * -logfont_to_xlfd (const LOGFONT *lfp, - int size, - int res, - int avg_width) -{ - const gchar *weight; - const gchar *registry, *encoding; - int point_size; - static int logpixelsy = 0; - gchar facename[LF_FACESIZE*3]; - gchar *p; - const gchar *q; - - if (logpixelsy == 0) - { - HDC hdc = GetDC (NULL); - logpixelsy = GetDeviceCaps (hdc, LOGPIXELSY); - ReleaseDC (NULL, hdc); - } - - /* Don't use _() here, only N_(), the actual translation is done elsewhere */ - if (lfp->lfWeight >= FW_HEAVY) - weight = N_("heavy"); - else if (lfp->lfWeight >= FW_EXTRABOLD) - weight = N_("extrabold"); - else if (lfp->lfWeight >= FW_BOLD) - weight = N_("bold"); -#ifdef FW_DEMIBOLD - else if (lfp->lfWeight >= FW_DEMIBOLD) - weight = N_("demibold"); -#endif - else if (lfp->lfWeight >= FW_MEDIUM) - weight = N_("medium"); - else if (lfp->lfWeight >= FW_NORMAL) - weight = N_("normal"); - else if (lfp->lfWeight >= FW_LIGHT) - weight = N_("light"); - else if (lfp->lfWeight >= FW_EXTRALIGHT) - weight = N_("extralight"); - else if (lfp->lfWeight >= FW_THIN) - weight = N_("thin"); - else - weight = N_("regular"); - - if (lfp->lfCharSet == ANSI_CHARSET) - { - registry = "iso8859"; - encoding = "1"; - } - else - { - registry = "windows"; - if (lfp->lfCharSet == DEFAULT_CHARSET) - encoding = "default"; - else if (lfp->lfCharSet == SYMBOL_CHARSET) - encoding = "symbol"; - else if (lfp->lfCharSet == SHIFTJIS_CHARSET) - encoding = "shiftjis"; - else if (lfp->lfCharSet == GB2312_CHARSET) - encoding = "gb2312"; - else if (lfp->lfCharSet == HANGEUL_CHARSET) - encoding = "hangeul"; - else if (lfp->lfCharSet == CHINESEBIG5_CHARSET) - encoding = "chinesebig5"; - else if (lfp->lfCharSet == OEM_CHARSET) - encoding = "oem"; -#ifdef JOHAB_CHARSET - else if (lfp->lfCharSet == JOHAB_CHARSET) - encoding = "johab"; -#endif - else if (lfp->lfCharSet == HEBREW_CHARSET) - encoding = "hebrew"; - else if (lfp->lfCharSet == ARABIC_CHARSET) - encoding = "arabic"; - else if (lfp->lfCharSet == GREEK_CHARSET) - encoding = "greek"; - else if (lfp->lfCharSet == TURKISH_CHARSET) - encoding = "turkish"; - else if (lfp->lfCharSet == THAI_CHARSET) - encoding = "thai"; - else if (lfp->lfCharSet == EASTEUROPE_CHARSET) - encoding = "easteurope"; - else if (lfp->lfCharSet == RUSSIAN_CHARSET) - encoding = "russian"; - else if (lfp->lfCharSet == MAC_CHARSET) - encoding = "mac"; - else if (lfp->lfCharSet == BALTIC_CHARSET) - encoding = "baltic"; - else - encoding = "unknown"; - } - - point_size = (int) (((double) size/logpixelsy) * 720.); - - if (res == -1) - res = logpixelsy; - - /* Replace illegal characters with hex escapes. */ - p = facename; - q = lfp->lfFaceName; - while (*q) - { - if (*q == '-' || *q == '*' || *q == '?' || *q == '%') - p += sprintf (p, "%%%.02x", *q); - else - *p++ = *q; - q++; - } - *p = '\0'; - - return g_strdup_printf - ("-%s-%s-%s-%s-%s-%s-%d-%d-%d-%d-%s-%d-%s-%s", - "unknown", - facename, - weight, - (lfp->lfItalic ? - ((lfp->lfPitchAndFamily & 0xF0) == FF_ROMAN - || (lfp->lfPitchAndFamily & 0xF0) == FF_SCRIPT ? - "i" : "o") : "r"), - "normal", - "", - size, - point_size, - res, - res, - ((lfp->lfPitchAndFamily & 0x03) == FIXED_PITCH ? "m" : "p"), - avg_width, - registry, encoding); -} - -int CALLBACK -InnerEnumFontFamExProc (const LOGFONT *lfp, - const TEXTMETRIC *metrics, - DWORD fontType, - LPARAM lParam) -{ - int size; - - if (fontType == TRUETYPE_FONTTYPE) - { - size = 0; - } - else - { - size = lfp->lfHeight; - } - - num_fonts++; - if (num_fonts == font_names_size) - { - font_names_size *= 2; - xfontnames = g_realloc (xfontnames, font_names_size * sizeof (gchar *)); - } - xfontnames[num_fonts-1] = - logfont_to_xlfd (lfp, size, 0, 0); - return 1; -} - -int CALLBACK -EnumFontFamExProc (const LOGFONT *lfp, - const TEXTMETRIC *metrics, - DWORD fontType, - LPARAM lParam) -{ - if (fontType == TRUETYPE_FONTTYPE) - { - LOGFONT lf = *lfp; - lf.lfPitchAndFamily = 0; - EnumFontFamiliesEx (hdc, &lf, InnerEnumFontFamExProc, 0, 0); - } - else - InnerEnumFontFamExProc (lfp, metrics, fontType, lParam); - return 1; -} - -#endif - -/***************************************************************************** - * These functions all deal with creating the main class arrays containing - * the data about all available fonts. - *****************************************************************************/ -static void -gtk_font_selection_get_fonts (void) -{ -#ifdef GDK_WINDOWING_X11 - gchar **xfontnames; - gint num_fonts; -#elif defined (GDK_WINDOWING_WIN32) - LOGFONT logfont; -#else - gint num_fonts = 0; - gchar **xfontnames = NULL; -#endif - GSList **fontnames; - gchar *fontname; - GSList * temp_list; - gint i, prop, style, size; - gint npixel_sizes = 0, npoint_sizes = 0; - FontInfo *font; - FontStyle *current_style, *prev_style, *tmp_style; - gboolean matched_style, found_size; - gint pixels, points, res_x, res_y; - gchar field_buffer[XLFD_MAX_FIELD_LEN]; - gchar *field; - guint8 flags; - guint16 *pixel_sizes, *point_sizes, *tmp_sizes; - - fontsel_info = g_new (GtkFontSelInfo, 1); - -#ifdef GDK_WINDOWING_X11 - /* Get a maximum of MAX_FONTS fontnames from the X server. - Use "-*" as the pattern rather than "-*-*-*-*-*-*-*-*-*-*-*-*-*-*" since - the latter may result in fonts being returned which don't actually exist. - xlsfonts also uses "*" so I think it's OK. "-*" gets rid of aliases. */ - xfontnames = XListFonts (GDK_DISPLAY(), "-*", MAX_FONTS, &num_fonts); - /* Output a warning if we actually get MAX_FONTS fonts. */ - if (num_fonts == MAX_FONTS) - g_warning(_("MAX_FONTS exceeded. Some fonts may be missing.")); - -#elif defined (GDK_WINDOWING_WIN32) - num_fonts = 0; - hdc = GetDC (NULL); - font_names_size = 100; - xfontnames = g_new (gchar *, font_names_size); - logfont.lfCharSet = DEFAULT_CHARSET; - logfont.lfFaceName[0] = '\0'; - logfont.lfPitchAndFamily = 0; - EnumFontFamiliesEx (hdc, &logfont, EnumFontFamExProc, 0, 0); - ReleaseDC (NULL, hdc); -#endif - - /* The maximum size of all these tables is the number of font names - returned. We realloc them later when we know exactly how many - unique entries there are. */ - fontsel_info->font_info = g_new (FontInfo, num_fonts); - fontsel_info->font_styles = g_new (FontStyle, num_fonts); - fontsel_info->pixel_sizes = g_new (guint16, num_fonts); - fontsel_info->point_sizes = g_new (guint16, num_fonts); - - fontnames = g_new (GSList*, num_fonts); - - /* Create the initial arrays for the property value strings, though they - may be realloc'ed later. Put the wildcard '*' in the first elements. */ - for (prop = 0; prop < GTK_NUM_FONT_PROPERTIES; prop++) - { - fontsel_info->properties[prop] = g_new(gchar*, PROPERTY_ARRAY_INCREMENT); - fontsel_info->space_allocated[prop] = PROPERTY_ARRAY_INCREMENT; - fontsel_info->nproperties[prop] = 1; - fontsel_info->properties[prop][0] = "*"; - } - - - /* Insert the font families into the main table, sorted by family and - foundry (fonts with different foundries are placed in seaparate FontInfos. - All fontnames in each family + foundry are placed into the fontnames - array of lists. */ - fontsel_info->nfonts = 0; - for (i = 0; i < num_fonts; i++) - { - if (gtk_font_selection_is_xlfd_font_name (xfontnames[i])) - gtk_font_selection_insert_font (fontnames, &fontsel_info->nfonts, xfontnames[i]); - } - - - /* Since many font names will be in the same FontInfo not all of the - allocated FontInfo table will be used, so we will now reallocate it - with the real size. */ - fontsel_info->font_info = g_realloc(fontsel_info->font_info, - sizeof(FontInfo) * fontsel_info->nfonts); - - - /* Now we work out which choices of weight/slant etc. are valid for each - font. */ - fontsel_info->nstyles = 0; - current_style = fontsel_info->font_styles; - for (i = 0; i < fontsel_info->nfonts; i++) - { - font = &fontsel_info->font_info[i]; - - /* Use the next free position in the styles array. */ - font->style_index = fontsel_info->nstyles; - - /* Now step through each of the fontnames with this family, and create - a style for each fontname. Each style contains the index into the - weights/slants etc. arrays, and a number of pixel/point sizes. */ - style = 0; - temp_list = fontnames[i]; - while (temp_list) - { - fontname = temp_list->data; - temp_list = temp_list->next; - - for (prop = 0; prop < GTK_NUM_STYLE_PROPERTIES; prop++) - { - current_style->properties[prop] - = gtk_font_selection_insert_field (fontname, prop); - } - current_style->pixel_sizes_index = npixel_sizes; - current_style->npixel_sizes = 0; - current_style->point_sizes_index = npoint_sizes; - current_style->npoint_sizes = 0; - current_style->flags = 0; - - - field = gtk_font_selection_get_xlfd_field (fontname, XLFD_PIXELS, - field_buffer); - pixels = atoi(field); - - field = gtk_font_selection_get_xlfd_field (fontname, XLFD_POINTS, - field_buffer); - points = atoi(field); - - field = gtk_font_selection_get_xlfd_field (fontname, - XLFD_RESOLUTION_X, - field_buffer); - res_x = atoi(field); - - field = gtk_font_selection_get_xlfd_field (fontname, - XLFD_RESOLUTION_Y, - field_buffer); - res_y = atoi(field); - - if (pixels == 0 && points == 0) - { - if (res_x == 0 && res_y == 0) - flags = GTK_FONT_SCALABLE; - else - flags = GTK_FONT_SCALABLE_BITMAP; - } - else - flags = GTK_FONT_BITMAP; - - /* Now we check to make sure that the style is unique. If it isn't - we forget it. */ - prev_style = fontsel_info->font_styles + font->style_index; - matched_style = FALSE; - while (prev_style < current_style) - { - matched_style = TRUE; - for (prop = 0; prop < GTK_NUM_STYLE_PROPERTIES; prop++) - { - if (prev_style->properties[prop] - != current_style->properties[prop]) - { - matched_style = FALSE; - break; - } - } - if (matched_style) - break; - prev_style++; - } - - /* If we matched an existing style, we need to add the pixels & - point sizes to the style. If not, we insert the pixel & point - sizes into our new style. Note that we don't add sizes for - scalable fonts. */ - if (matched_style) - { - prev_style->flags |= flags; - if (flags == GTK_FONT_BITMAP) - { - pixel_sizes = fontsel_info->pixel_sizes - + prev_style->pixel_sizes_index; - found_size = FALSE; - for (size = 0; size < prev_style->npixel_sizes; size++) - { - if (pixels == *pixel_sizes) - { - found_size = TRUE; - break; - } - else if (pixels < *pixel_sizes) - break; - pixel_sizes++; - } - /* We need to move all the following pixel sizes up, and also - update the indexes of any following styles. */ - if (!found_size) - { - for (tmp_sizes = fontsel_info->pixel_sizes + npixel_sizes; - tmp_sizes > pixel_sizes; tmp_sizes--) - *tmp_sizes = *(tmp_sizes - 1); - - *pixel_sizes = pixels; - npixel_sizes++; - prev_style->npixel_sizes++; - - tmp_style = prev_style + 1; - while (tmp_style < current_style) - { - tmp_style->pixel_sizes_index++; - tmp_style++; - } - } - - point_sizes = fontsel_info->point_sizes - + prev_style->point_sizes_index; - found_size = FALSE; - for (size = 0; size < prev_style->npoint_sizes; size++) - { - if (points == *point_sizes) - { - found_size = TRUE; - break; - } - else if (points < *point_sizes) - break; - point_sizes++; - } - /* We need to move all the following point sizes up, and also - update the indexes of any following styles. */ - if (!found_size) - { - for (tmp_sizes = fontsel_info->point_sizes + npoint_sizes; - tmp_sizes > point_sizes; tmp_sizes--) - *tmp_sizes = *(tmp_sizes - 1); - - *point_sizes = points; - npoint_sizes++; - prev_style->npoint_sizes++; - - tmp_style = prev_style + 1; - while (tmp_style < current_style) - { - tmp_style->point_sizes_index++; - tmp_style++; - } - } - } - } - else - { - current_style->flags = flags; - if (flags == GTK_FONT_BITMAP) - { - fontsel_info->pixel_sizes[npixel_sizes++] = pixels; - current_style->npixel_sizes = 1; - fontsel_info->point_sizes[npoint_sizes++] = points; - current_style->npoint_sizes = 1; - } - style++; - fontsel_info->nstyles++; - current_style++; - } - } - g_slist_free(fontnames[i]); - - /* Set nstyles to the real value, minus duplicated fontnames. - Note that we aren't using all the allocated memory if fontnames are - duplicated. */ - font->nstyles = style; - } - - /* Since some repeated styles may be skipped we won't have used all the - allocated space, so we will now reallocate it with the real size. */ - fontsel_info->font_styles = g_realloc(fontsel_info->font_styles, - sizeof(FontStyle) * fontsel_info->nstyles); - fontsel_info->pixel_sizes = g_realloc(fontsel_info->pixel_sizes, - sizeof(guint16) * npixel_sizes); - fontsel_info->point_sizes = g_realloc(fontsel_info->point_sizes, - sizeof(guint16) * npoint_sizes); - g_free(fontnames); - -#ifdef GDK_WINDOWING_X11 - XFreeFontNames (xfontnames); -#elif defined (GDK_WINDOWING_WIN32) - for (i = 0; i < num_fonts; i++) - g_free (xfontnames[i]); - g_free (xfontnames); -#endif - - /* Debugging Output */ - /* This outputs all FontInfos. */ -#ifdef FONTSEL_DEBUG - g_message("\n\n Font Family Weight Slant Set Width Spacing Charset\n\n"); - for (i = 0; i < fontsel_info->nfonts; i++) - { - FontInfo *font = &fontsel_info->font_info[i]; - FontStyle *styles = fontsel_info->font_styles + font->style_index; - for (style = 0; style < font->nstyles; style++) - { - g_message("%5i %-16.16s ", i, font->family); - for (prop = 0; prop < GTK_NUM_STYLE_PROPERTIES; prop++) - g_message("%-9.9s ", - fontsel_info->properties[prop][styles->properties[prop]]); - g_message("\n "); - - if (styles->flags & GTK_FONT_BITMAP) - g_message("Bitmapped font "); - if (styles->flags & GTK_FONT_SCALABLE) - g_message("Scalable font "); - if (styles->flags & GTK_FONT_SCALABLE_BITMAP) - g_message("Scalable-Bitmapped font "); - g_message("\n"); - - if (styles->npixel_sizes) - { - g_message(" Pixel sizes: "); - tmp_sizes = fontsel_info->pixel_sizes + styles->pixel_sizes_index; - for (size = 0; size < styles->npixel_sizes; size++) - g_message("%i ", *tmp_sizes++); - g_message("\n"); - } - - if (styles->npoint_sizes) - { - g_message(" Point sizes: "); - tmp_sizes = fontsel_info->point_sizes + styles->point_sizes_index; - for (size = 0; size < styles->npoint_sizes; size++) - g_message("%i ", *tmp_sizes++); - g_message("\n"); - } - - g_message("\n"); - styles++; - } - } - /* This outputs all available properties. */ - for (prop = 0; prop < GTK_NUM_FONT_PROPERTIES; prop++) - { - g_message("Property: %s\n", xlfd_field_names[xlfd_index[prop]]); - for (i = 0; i < fontsel_info->nproperties[prop]; i++) - g_message(" %s\n", fontsel_info->properties[prop][i]); - } -#endif -} - -/* This inserts the given fontname into the FontInfo table. - If a FontInfo already exists with the same family and foundry, then the - fontname is added to the FontInfos list of fontnames, else a new FontInfo - is created and inserted in alphabetical order in the table. */ -static void -gtk_font_selection_insert_font (GSList *fontnames[], - gint *ntable, - gchar *fontname) -{ - FontInfo *table; - FontInfo temp_info; - GSList *temp_fontname; - gchar *family; - gboolean family_exists = FALSE; - gint foundry; - gint lower, upper; - gint middle, cmp; - gchar family_buffer[XLFD_MAX_FIELD_LEN]; - - table = fontsel_info->font_info; - - /* insert a fontname into a table */ - family = gtk_font_selection_get_xlfd_field (fontname, XLFD_FAMILY, - family_buffer); - if (!family) - return; - - foundry = gtk_font_selection_insert_field (fontname, FOUNDRY); - - lower = 0; - if (*ntable > 0) - { - /* Do a binary search to determine if we have already encountered - * a font with this family & foundry. */ - upper = *ntable; - while (lower < upper) - { - middle = (lower + upper) >> 1; - - cmp = strcmp (family, table[middle].family); - /* If the family matches we sort by the foundry. */ - if (cmp == 0) - { - family_exists = TRUE; - family = table[middle].family; - cmp = strcmp(fontsel_info->properties[FOUNDRY][foundry], - fontsel_info->properties[FOUNDRY][table[middle].foundry]); - } - - if (cmp == 0) - { - fontnames[middle] = g_slist_prepend (fontnames[middle], - fontname); - return; - } - else if (cmp < 0) - upper = middle; - else - lower = middle+1; - } - } - - /* Add another entry to the table for this new font family */ - temp_info.family = family_exists ? family : g_strdup(family); - temp_info.foundry = foundry; - temp_fontname = g_slist_prepend (NULL, fontname); - - (*ntable)++; - - /* Quickly insert the entry into the table in sorted order - * using a modification of insertion sort and the knowledge - * that the entries proper position in the table was determined - * above in the binary search and is contained in the "lower" - * variable. */ - if (*ntable > 1) - { - upper = *ntable - 1; - while (lower != upper) - { - table[upper] = table[upper-1]; - fontnames[upper] = fontnames[upper-1]; - upper--; - } - } - table[lower] = temp_info; - fontnames[lower] = temp_fontname; -} - - -/* This checks that the specified field of the given fontname is in the - appropriate properties array. If not it is added. Thus eventually we get - arrays of all possible weights/slants etc. It returns the array index. */ -static gint -gtk_font_selection_insert_field (gchar *fontname, - gint prop) -{ - gchar field_buffer[XLFD_MAX_FIELD_LEN]; - gchar *field; - guint16 index; - - field = gtk_font_selection_get_xlfd_field (fontname, xlfd_index[prop], - field_buffer); - if (!field) - return 0; - - /* If the field is already in the array just return its index. */ - for (index = 0; index < fontsel_info->nproperties[prop]; index++) - if (!strcmp(field, fontsel_info->properties[prop][index])) - return index; - - /* Make sure we have enough space to add the field. */ - if (fontsel_info->nproperties[prop] == fontsel_info->space_allocated[prop]) - { - fontsel_info->space_allocated[prop] += PROPERTY_ARRAY_INCREMENT; - fontsel_info->properties[prop] = g_realloc(fontsel_info->properties[prop], - sizeof(gchar*) - * fontsel_info->space_allocated[prop]); - } - - /* Add the new field. */ - index = fontsel_info->nproperties[prop]; - fontsel_info->properties[prop][index] = g_strdup(field); - fontsel_info->nproperties[prop]++; - return index; -} - - /***************************************************************************** * These functions are the main public interface for getting/setting the font. *****************************************************************************/ @@ -3347,7 +798,9 @@ gtk_font_selection_insert_field (gchar *fontname, GdkFont* gtk_font_selection_get_font (GtkFontSelection *fontsel) { - g_return_val_if_fail (fontsel != NULL, NULL); + if (!fontsel->font) + fontsel->font = gdk_font_from_description (fontsel->font_desc); + return fontsel->font; } @@ -3355,42 +808,7 @@ gtk_font_selection_get_font (GtkFontSelection *fontsel) gchar * gtk_font_selection_get_font_name (GtkFontSelection *fontsel) { - FontInfo *font; - gchar *family_str, *foundry_str; - gchar *property_str[GTK_NUM_STYLE_PROPERTIES]; - gint prop; - - g_return_val_if_fail (fontsel != NULL, NULL); - g_return_val_if_fail (GTK_IS_FONT_SELECTION (fontsel), NULL); - - /* If no family has been selected return NULL. */ - if (fontsel->font_index == -1) - return NULL; - - font = &fontsel_info->font_info[fontsel->font_index]; - family_str = font->family; - foundry_str = fontsel_info->properties[FOUNDRY][font->foundry]; - - /* some fonts have a (nil) foundry */ - if (strcmp (foundry_str, "(nil)") == 0) - foundry_str = ""; - - for (prop = 0; prop < GTK_NUM_STYLE_PROPERTIES; prop++) - { - property_str[prop] = fontsel_info->properties[prop][fontsel->property_values[prop]]; - if (strcmp (property_str[prop], "(nil)") == 0) - property_str[prop] = ""; - } - - return gtk_font_selection_create_xlfd (fontsel->size, - fontsel->metric, - foundry_str, - family_str, - property_str[WEIGHT], - property_str[SLANT], - property_str[SET_WIDTH], - property_str[SPACING], - property_str[CHARSET]); + return pango_font_description_to_string (fontsel->font_desc); } @@ -3403,136 +821,41 @@ gboolean gtk_font_selection_set_font_name (GtkFontSelection *fontsel, const gchar *fontname) { - gchar *family, *field; - gint index, prop, size; - guint16 foundry, value; - gchar family_buffer[XLFD_MAX_FIELD_LEN]; - gchar field_buffer[XLFD_MAX_FIELD_LEN]; - gchar buffer[16]; - + PangoFontDescription *new_desc; + PangoFontDescription **descs; + int n_descs, i; + gboolean found = FALSE; + g_return_val_if_fail (fontsel != NULL, FALSE); g_return_val_if_fail (GTK_IS_FONT_SELECTION (fontsel), FALSE); - g_return_val_if_fail (fontname != NULL, FALSE); - - /* Check it is a valid fontname. */ - if (!gtk_font_selection_is_xlfd_font_name(fontname)) - return FALSE; - - family = gtk_font_selection_get_xlfd_field (fontname, XLFD_FAMILY, - family_buffer); - if (!family) - return FALSE; - - field = gtk_font_selection_get_xlfd_field (fontname, XLFD_FOUNDRY, - field_buffer); - foundry = gtk_font_selection_field_to_index (fontsel_info->properties[FOUNDRY], - fontsel_info->nproperties[FOUNDRY], - field); - - index = gtk_font_selection_find_font(fontsel, family, foundry); - if (index == -1) - return FALSE; - - /* Convert the property fields into indices and set them. */ - for (prop = 0; prop < GTK_NUM_STYLE_PROPERTIES; prop++) - { - field = gtk_font_selection_get_xlfd_field (fontname, xlfd_index[prop], - field_buffer); - value = gtk_font_selection_field_to_index (fontsel_info->properties[prop], - fontsel_info->nproperties[prop], - field); - fontsel->property_values[prop] = value; - } - field = gtk_font_selection_get_xlfd_field (fontname, XLFD_POINTS, - field_buffer); - size = atoi(field); - if (size > 0) - { - if (size < 20) - size = 20; - fontsel->size = fontsel->selected_size = size; - fontsel->metric = GTK_FONT_METRIC_POINTS; - gtk_toggle_button_set_active(GTK_TOGGLE_BUTTON(fontsel->points_button), - TRUE); - if (size % 10 == 0) - sprintf (buffer, "%i", size / 10); - else - sprintf (buffer, "%i.%i", size / 10, size % 10); - } - else - { - field = gtk_font_selection_get_xlfd_field (fontname, XLFD_PIXELS, - field_buffer); - size = atoi(field); - if (size < 2) - size = 2; - fontsel->size = fontsel->selected_size = size; - fontsel->metric = GTK_FONT_METRIC_PIXELS; - gtk_toggle_button_set_active(GTK_TOGGLE_BUTTON(fontsel->pixels_button), - TRUE); - sprintf (buffer, "%i", size); - } - gtk_entry_set_text (GTK_ENTRY (fontsel->size_entry), buffer); - - /* Clear any current filter. */ - gtk_font_selection_clear_filter(fontsel); - - /* Now find the best style match. */ - fontsel->font_index = index; - gtk_clist_select_row(GTK_CLIST(fontsel->font_clist), index, 0); - if (GTK_WIDGET_MAPPED (fontsel->font_clist)) - gtk_clist_moveto(GTK_CLIST(fontsel->font_clist), index, -1, 0.5, 0); - - gtk_font_selection_show_available_styles (fontsel); - /* This will load the font. */ - gtk_font_selection_select_best_style (fontsel, FALSE); - - return TRUE; -} + new_desc = pango_font_description_from_string (fontname); + /* Check to make sure that this is in the list of allowed fonts */ -/* Returns the index of the given family, or -1 if not found */ -static gint -gtk_font_selection_find_font (GtkFontSelection *fontsel, - gchar *family, - guint16 foundry) -{ - FontInfo *font_info; - gint lower, upper, middle = -1, cmp, nfonts; - gint found_family = -1; - - font_info = fontsel_info->font_info; - nfonts = fontsel_info->nfonts; - if (nfonts == 0) - return -1; - - /* Do a binary search to find the font family. */ - lower = 0; - upper = nfonts; - while (lower < upper) + pango_context_list_fonts (fontsel->context, new_desc->family_name, &descs, &n_descs); + + for (i=0; i<n_descs; i++) { - middle = (lower + upper) >> 1; - - cmp = strcmp (family, font_info[middle].family); - if (cmp == 0) + if (descs[i]->weight == new_desc->weight && + descs[i]->style == new_desc->style && + descs[i]->stretch == new_desc->stretch && + descs[i]->variant == new_desc->variant) { - found_family = middle; - cmp = strcmp(fontsel_info->properties[FOUNDRY][foundry], - fontsel_info->properties[FOUNDRY][font_info[middle].foundry]); + found = TRUE; + break; } - - if (cmp == 0) - return middle; - else if (cmp < 0) - upper = middle; - else if (cmp > 0) - lower = middle+1; } - - /* We couldn't find the family and foundry, but we may have just found the - family, so we return that. */ - return found_family; + + pango_font_descriptions_free (descs, n_descs); + + if (!found) + return FALSE; + + pango_font_description_free (fontsel->font_desc); + fontsel->font_desc = new_desc; + + return TRUE; } @@ -3541,7 +864,7 @@ gtk_font_selection_find_font (GtkFontSelection *fontsel, gchar* gtk_font_selection_get_preview_text (GtkFontSelection *fontsel) { - return gtk_entry_get_text(GTK_ENTRY(fontsel->preview_entry)); + return gtk_entry_get_text (GTK_ENTRY (fontsel->preview_entry)); } @@ -3550,170 +873,9 @@ void gtk_font_selection_set_preview_text (GtkFontSelection *fontsel, const gchar *text) { - gtk_entry_set_text(GTK_ENTRY(fontsel->preview_entry), text); + gtk_entry_set_text (GTK_ENTRY (fontsel->preview_entry), text); } - -/***************************************************************************** - * These functions all deal with X Logical Font Description (XLFD) fontnames. - * See the freely available documentation about this. - *****************************************************************************/ - -/* - * Returns TRUE if the fontname is a valid XLFD. - * (It just checks if the number of dashes is 14, and that each - * field < XLFD_MAX_FIELD_LEN characters long - that's not in the XLFD but it - * makes it easier for me). - */ -static gboolean -gtk_font_selection_is_xlfd_font_name (const gchar *fontname) -{ - gint i = 0; - gint field_len = 0; - - while (*fontname) - { - if (*fontname++ == '-') - { - if (field_len > XLFD_MAX_FIELD_LEN) return FALSE; - field_len = 0; - i++; - } - else - field_len++; - } - - return (i == 14) ? TRUE : FALSE; -} - -/* - * This fills the buffer with the specified field from the X Logical Font - * Description name, and returns it. If fontname is NULL or the field is - * longer than XFLD_MAX_FIELD_LEN it returns NULL. - * Note: For the charset field, we also return the encoding, e.g. 'iso8859-1'. - */ -static gchar* -gtk_font_selection_get_xlfd_field (const gchar *fontname, - FontField field_num, - gchar *buffer) -{ - const gchar *t1, *t2; - gint countdown, len, num_dashes; -#ifdef GDK_WINDOWING_WIN32 - gchar *p; -#endif - - if (!fontname) - return NULL; - - /* we assume this is a valid fontname...that is, it has 14 fields */ - - countdown = field_num; - t1 = fontname; - while (*t1 && (countdown >= 0)) - if (*t1++ == '-') - countdown--; - - num_dashes = (field_num == XLFD_CHARSET) ? 2 : 1; - for (t2 = t1; *t2; t2++) - { - if (*t2 == '-' && --num_dashes == 0) - break; - } - - if (t1 != t2) - { - /* Check we don't overflow the buffer */ - len = (long) t2 - (long) t1; - if (len > XLFD_MAX_FIELD_LEN - 1) - return NULL; - strncpy (buffer, t1, len); - buffer[len] = 0; -#ifdef GDK_WINDOWING_X11 - /* Convert to lower case. */ - g_strdown (buffer); -#elif defined (GDK_WINDOWING_WIN32) - /* Check for hex escapes in font family */ - if (field_num == XLFD_FAMILY) - { - p = buffer; - while (*p) - { - if (*p == '%' && isxdigit (p[1]) && isxdigit (p[2])) - { - guint c; - sscanf (p+1, "%2x", &c); - *p = c; - strcpy (p+1, p+3); - } - p++; - } - } -#endif - } - else - strcpy(buffer, "(nil)"); - - return buffer; -} - -/* - * This returns a X Logical Font Description font name, given all the pieces. - * Note: this retval must be freed by the caller. - */ -static gchar * -gtk_font_selection_create_xlfd (gint size, - GtkFontMetricType metric, - gchar *foundry, - gchar *family, - gchar *weight, - gchar *slant, - gchar *set_width, - gchar *spacing, - gchar *charset) -{ - gchar buffer[16]; - gchar *pixel_size = "*", *point_size = "*", *fontname; - gchar *fam = family; -#ifdef GDK_WINDOWING_WIN32 - gchar *p, *q; -#endif - - if (size <= 0) - return NULL; - - sprintf (buffer, "%d", (int) size); - if (metric == GTK_FONT_METRIC_PIXELS) - pixel_size = buffer; - else - point_size = buffer; - -#ifdef GDK_WINDOWING_WIN32 - fam = g_malloc (strlen (family) * 3 + 1); - p = fam; - q = family; - while (*q) - { - if (*q == '-' || *q == '*' || *q == '?' || *q == '%') - p += sprintf (p, "%%%.02x", *q); - else - *p++ = *q; - q++; - } - *p = '\0'; -#endif - fontname = g_strdup_printf ("-%s-%s-%s-%s-%s-*-%s-%s-*-*-%s-*-%s", - foundry, fam, weight, slant, - set_width, pixel_size, point_size, - spacing, charset); -#ifdef GDK_WINDOWING_WIN32 - g_free (fam); -#endif - return fontname; -} - - - /***************************************************************************** * GtkFontSelectionDialog *****************************************************************************/ @@ -3772,6 +934,7 @@ gtk_font_selection_dialog_init (GtkFontSelectionDialog *fontseldiag) gtk_container_add (GTK_CONTAINER (fontseldiag), fontseldiag->main_vbox); fontseldiag->fontsel = gtk_font_selection_new(); + gtk_container_set_border_width (GTK_CONTAINER (fontseldiag->fontsel), 4); gtk_widget_show (fontseldiag->fontsel); gtk_box_pack_start (GTK_BOX (fontseldiag->main_vbox), fontseldiag->fontsel, TRUE, TRUE, 0); @@ -3839,23 +1002,6 @@ gtk_font_selection_dialog_set_font_name (GtkFontSelectionDialog *fsd, fontname); } -void -gtk_font_selection_dialog_set_filter (GtkFontSelectionDialog *fsd, - GtkFontFilterType filter_type, - GtkFontType font_type, - gchar **foundries, - gchar **weights, - gchar **slants, - gchar **setwidths, - gchar **spacings, - gchar **charsets) -{ - gtk_font_selection_set_filter (GTK_FONT_SELECTION (fsd->fontsel), - filter_type, font_type, - foundries, weights, slants, setwidths, - spacings, charsets); -} - gchar* gtk_font_selection_dialog_get_preview_text (GtkFontSelectionDialog *fsd) { |