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

[Urs Liska]

Am 28.04.2015 um 10:12 schrieb Thomas Morley:
2015-04-28 9:48 GMT+02:00 Urs Liska <u...@openlilylib.org>:

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"

For me this returns:

Given font name: Emmentaler-13
Determined font file: /home/harm/.fonts/wds052801.ttf
Actual font in that file: WaltDisneyScript
Given font is present: #f

Given font name: Fancy-Font
Determined font file: /home/harm/.fonts/wds052801.ttf
Actual font in that file: WaltDisneyScript
Given font is present: #f

OMG!


Again, on an outdated Ubuntu.

But that shouldn't make a difference. At least we can't accept that it 
makes a difference.

What is the result of ly:ttf-ps-name when you pass it the full path to a 
real emmentaler file (I can't see where they are on your system of course)?

Urs


Cheers,
   Harm


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



_______________________________________________
lilypond-user mailing list
lilypond-user@gnu.org
https://lists.gnu.org/mailman/listinfo/lilypond-user



_______________________________________________
lilypond-user mailing list
lilypond-user@gnu.org
https://lists.gnu.org/mailman/listinfo/lilypond-user