Re: How to determine if a font is a fallback font?

[Urs Liska]

Am 28.04.2015 um 09:38 schrieb Werner LEMBERG:

Is there a function to retrieve the "font name" from a given file
name?  It would be a viable approach if I could compare the result
of that request with the original font name.

For TTFs and TTCs (either with TrueType outlines or embedded CFFs) you
can use `ly:ttf-ps-name'.

Thanks that seems to work perfectly. Try

\version "2.19.19"

fontExists =
#(define-void-function (parser location font-name)(string?)
   (let* ((font-file (ly:font-config-get-font-file font-name))
          (reverse-font-name (ly:ttf-ps-name font-file))
          (font-exists (string=? font-name reverse-font-name)))
     (ly:message (format "\nGiven font name: ~a" font-name))
     (ly:message (format "Determined font file: ~a" font-file))
     (ly:message (format "Actual font in that file: ~a" reverse-font-name))
     (ly:message (format "Given font is present: ~a" font-exists))))

\fontExists "Emmentaler-13"
\fontExists "Fancy-Font"

Looking into lilypond's code, however, I don't see why this shouldn't
work for Type1 fonts (or even pure CFFs) also.  It's worth a try – and
if it works, we should provide an alias name for `ly:ttf-ps-name'.

I don't know how to proceed with this.

However, in the context of my current patch I will add a variant of the above function to font.scm.

Urs

    Werner