From: Eli Zaretskii <eliz@gnu.org>
To: Dmitry Antipov <dmantipov@yandex.ru>
Cc: sva-news@mygooglest.com, 15876@debbugs.gnu.org
Subject: bug#15876: 24.3.50; Highly degraded performance between rev 114715 and 115006
Date: Mon, 02 Dec 2013 19:52:58 +0200 [thread overview]
Message-ID: <834n6r5edh.fsf@gnu.org> (raw)
In-Reply-To: <529C64C5.2040509@yandex.ru>
> Date: Mon, 02 Dec 2013 14:45:25 +0400
> From: Dmitry Antipov <dmantipov@yandex.ru>
> CC: 15876@debbugs.gnu.org
>
> On 12/01/2013 08:31 PM, Eli Zaretskii wrote:
>
> > Dmitry, can you please look into this? I'm not familiar enough with
> > the font stuff, so I don't see how was the font-spec and its
> > font-entities stored in the font cache supposed to be referenced from
> > some other Lisp object, to make sure they are marked and not GC'ed.
>
> It should be easy - just use this:
>
> === modified file 'src/alloc.c'
> --- src/alloc.c 2013-12-01 22:33:13 +0000
> +++ src/alloc.c 2013-12-02 09:32:55 +0000
> @@ -5731,7 +5731,18 @@
> eassert (!VECTOR_MARKED_P (ptr));
> VECTOR_MARK (ptr); /* Else mark it. */
> if (size & PSEUDOVECTOR_FLAG)
> - size &= PSEUDOVECTOR_SIZE_MASK;
> + {
> + size &= PSEUDOVECTOR_SIZE_MASK;
> + if (PSEUDOVECTOR_TYPEP (&ptr->header, PVEC_FONT))
> + {
> + Lisp_Object tmp;
> + XSETFONT (tmp, ptr);
> + if (FONT_SPEC_P (tmp))
> + fprintf (stderr, "mark font-spec\n");
> + else if (FONT_ENTITY_P (tmp))
> + fprintf (stderr, "mark font-entity\n");
> + }
> + }
>
> and set breakpoints to fprintf(). I tried this and see that font-spec
> objects can be referenced from face caches:
Thanks. But I think I didn't make myself clear: the issue is not just
to see ANY font-spec objects being marked. The issue is with those
font-spec objects that are recorded in the font caches that are
compacted by compact_font_caches. I don't see any code that makes
sure some Lisp object references those caches. Without that, they
cannot be possibly marked, and will be GC'ed, right?
> But the most of font-spec and font-entity objects are referenced via
> staticpro'ed globals Vfontset_table and ft_face_cache.
Those staticpro'ed objects might just be the reason why you don't see
the problem. Your build uses the ftfont driver, doesn't it? Because
ftfont.c has this implementation of the get_cache method:
static Lisp_Object
ftfont_get_cache (struct frame *f)
{
return freetype_font_cache;
}
and freetype_font_cache is a staticpro'ed variable. By contrast,
w32font.c does this:
Lisp_Object
w32font_get_cache (struct frame *f)
{
struct w32_display_info *dpyinfo = FRAME_DISPLAY_INFO (f);
return (dpyinfo->name_list_element);
}
and dpyinfo->name_list_element is what compact_font_caches examines.
(Note that xfont.c and xftfont.c also use a cache stored in
dpyinfo->name_list_element, so this issue is not entirely Windows
specific.)
> > In any case, it seems like they are never marked on Windows, because
> > if I set a breakpoint in the line marked below:
> >
> > /* If font-spec is not marked, most likely all font-entities
> > are not marked too. But we must be sure that nothing is
> > marked within OBJ before we really drop it. */
> > for (i = 0; i < size; i++)
> > if (VECTOR_MARKED_P (XFONT_ENTITY (AREF (XCDR (obj), i))))
> > break;
> >
> > if (i == size) <<<<<<<<<<<<<<<<<<<<<
> > drop = 1;
> > }
> >
> > with a condition i != size, that breakpoint never breaks.
>
> The best way to hit this breakpoint is to run something like:
>
> (defun bloat-font ()
> (interactive)
> (let ((fonts (x-list-fonts "*")))
> (while fonts
> (condition-case nil (set-frame-font (car fonts)) (error nil))
> (setq fonts (cdr fonts))
> (redisplay))))
>
> (This is X-specific; I believe there should be a similar MS-Windows method).
What is X-specific here? If you mean x-list-fonts, then it exists on
Windows and does the same.
Anyway, I think we are mis-communicating again: the above Lisp code
will cause the breakpoint to fire with i == size, i.e. we will remove
the font-entities from the cache. I wanted the opposite: to see at
least 1 font-entity that is NOT removed. So my breakpoint condition
was "i != size", which means we will NOT drop the font-entity. What I
saw is that this condition is never true, which means we remove ALL of
the font-entities from the cache.
> Subtle "triangle example" works just fine for me (with default font used by
> GTK3 build and 'emacs -Q' at least).
If the font cache is not cleared, you will not see any problem at all.
> Also I'm curious how to reproduce this issue with X. In particular, how to
> find a font so "heavy" that an attempt to load it creates a lot of Lisp data
> (hundreds Kbytes, enough to reach gc_cons_threshold each time)?
Well, you could lower gc_cons_threshold instead, couldn't you?
next prev parent reply other threads:[~2013-12-02 17:52 UTC|newest]
Thread overview: 59+ messages / expand[flat|nested] mbox.gz Atom feed top
2013-11-12 15:32 bug#15876: 24.3.50; Highly degraded performance between rev 114715 and 115006 Sebastien Vauban
2013-11-12 17:11 ` Glenn Morris
[not found] ` <wzwqkdfsts.fsf-iW7gFb+/I3LZHJUXO5efmti2O/JbrIOy@public.gmane.org>
2013-11-12 19:13 ` Sebastien Vauban
2013-11-13 11:43 ` Dani Moncayo
[not found] ` <mailman.5954.1384343055.10748.bug-gnu-emacs@gnu.org>
2013-11-13 13:58 ` Sebastien Vauban
[not found] ` <mailman.5925.1384283656.10748.bug-gnu-emacs@gnu.org>
[not found] ` <mailman.5925.1384283656.10748.bug-gnu-emacs-mXXj517/zsQ@public.gmane.org>
2013-11-13 14:04 ` Sebastien Vauban
2013-11-13 16:11 ` Eli Zaretskii
[not found] ` <83fvr01du4.fsf-mXXj517/zsQ@public.gmane.org>
2013-11-13 20:23 ` Sebastien Vauban
2013-11-13 20:35 ` Eli Zaretskii
2013-11-14 3:05 ` Glenn Morris
[not found] ` <jxeh6j1y4x.fsf-iW7gFb+/I3LZHJUXO5efmti2O/JbrIOy@public.gmane.org>
2013-11-14 10:05 ` Sebastien Vauban
[not found] ` <mailman.6048.1384423574.10748.bug-gnu-emacs@gnu.org>
2013-11-14 10:13 ` Sebastien Vauban
2013-11-14 17:04 ` Glenn Morris
[not found] ` <mailman.6048.1384423574.10748.bug-gnu-emacs-mXXj517/zsQ@public.gmane.org>
2013-11-19 22:52 ` Sebastien Vauban
2013-11-20 1:47 ` Stefan Monnier
2013-11-20 3:53 ` Eli Zaretskii
2013-11-20 3:48 ` Eli Zaretskii
[not found] ` <mailman.6579.1384912163.10748.bug-gnu-emacs@gnu.org>
[not found] ` <mailman.6579.1384912163.10748.bug-gnu-emacs-mXXj517/zsQ@public.gmane.org>
2013-11-20 8:48 ` Sebastien Vauban
[not found] ` <mailman.6575.1384901595.10748.bug-gnu-emacs@gnu.org>
[not found] ` <mailman.6575.1384901595.10748.bug-gnu-emacs-mXXj517/zsQ@public.gmane.org>
2013-11-20 22:32 ` Sebastien Vauban
2013-11-21 3:42 ` Eli Zaretskii
[not found] ` <mailman.6739.1385005456.10748.bug-gnu-emacs@gnu.org>
[not found] ` <mailman.6739.1385005456.10748.bug-gnu-emacs-mXXj517/zsQ@public.gmane.org>
2013-11-26 20:52 ` Sebastien Vauban
2013-11-26 21:04 ` Eli Zaretskii
[not found] ` <mailman.7212.1385499914.10748.bug-gnu-emacs@gnu.org>
[not found] ` <mailman.7212.1385499914.10748.bug-gnu-emacs-mXXj517/zsQ@public.gmane.org>
2013-11-29 21:01 ` Sebastien Vauban
2013-12-01 16:31 ` Eli Zaretskii
2013-12-02 10:45 ` Dmitry Antipov
2013-12-02 11:43 ` Dmitry Antipov
2013-12-02 18:00 ` Eli Zaretskii
2013-12-02 17:52 ` Eli Zaretskii [this message]
2013-12-03 9:57 ` Dmitry Antipov
2013-12-03 13:16 ` Eli Zaretskii
2013-12-03 15:09 ` Dmitry Antipov
2013-12-04 17:53 ` Eli Zaretskii
2013-12-05 6:29 ` Dmitry Antipov
2013-12-05 17:36 ` Eli Zaretskii
2013-12-11 6:52 ` Dmitry Antipov
2013-12-11 7:16 ` bug#15876: [SPAM] " Jarek Czekalski
2013-12-11 9:24 ` Dmitry Antipov
2013-12-11 16:28 ` Eli Zaretskii
2013-12-11 18:00 ` Dmitry Antipov
2013-12-11 18:12 ` Eli Zaretskii
2013-12-11 19:50 ` Jan Djärv
2013-12-13 15:22 ` Eli Zaretskii
2013-12-13 16:12 ` Dmitry Antipov
2013-12-13 16:45 ` Stefan Monnier
2013-12-13 18:53 ` Eli Zaretskii
2013-12-13 18:44 ` Eli Zaretskii
2013-12-16 8:05 ` Dmitry Antipov
2013-12-13 16:50 ` Stefan Monnier
2013-12-13 18:55 ` Eli Zaretskii
2013-12-14 2:13 ` Stefan Monnier
2013-12-14 8:47 ` Jan Djärv
[not found] ` <mailman.7746.1385915595.10748.bug-gnu-emacs@gnu.org>
[not found] ` <mailman.7746.1385915595.10748.bug-gnu-emacs-mXXj517/zsQ@public.gmane.org>
2013-12-01 20:20 ` Sebastien Vauban
2013-12-01 20:37 ` Eli Zaretskii
[not found] ` <mailman.7763.1385930292.10748.bug-gnu-emacs@gnu.org>
[not found] ` <mailman.7763.1385930292.10748.bug-gnu-emacs-mXXj517/zsQ@public.gmane.org>
2013-12-01 21:51 ` Sebastien Vauban
2013-12-02 3:45 ` Eli Zaretskii
[not found] ` <mailman.7786.1385955973.10748.bug-gnu-emacs@gnu.org>
[not found] ` <mailman.7786.1385955973.10748.bug-gnu-emacs-mXXj517/zsQ@public.gmane.org>
2013-12-02 9:29 ` Sebastien Vauban
2013-11-13 16:52 ` Stefan Monnier
2013-11-14 11:03 ` Jarek Czekalski
2013-11-14 16:35 ` Eli Zaretskii
Reply instructions:
You may reply publicly to this message via plain-text email
using any one of the following methods:
* Save the following mbox file, import it into your mail client,
and reply-to-all from there: mbox
Avoid top-posting and favor interleaved quoting:
https://en.wikipedia.org/wiki/Posting_style#Interleaved_style
* Reply using the --to, --cc, and --in-reply-to
switches of git-send-email(1):
git send-email \
--in-reply-to=834n6r5edh.fsf@gnu.org \
--to=eliz@gnu.org \
--cc=15876@debbugs.gnu.org \
--cc=dmantipov@yandex.ru \
--cc=sva-news@mygooglest.com \
/path/to/YOUR_REPLY
https://kernel.org/pub/software/scm/git/docs/git-send-email.html
* If your mail client supports setting the In-Reply-To header
via mailto: links, try the mailto: link
Be sure your reply has a Subject: header at the top and a blank line
before the message body.
Code repositories for project(s) associated with this external index
https://git.savannah.gnu.org/cgit/emacs.git
https://git.savannah.gnu.org/cgit/emacs/org-mode.git
This is an external index of several public inboxes,
see mirroring instructions on how to clone and mirror
all data and code used by this external index.