☰

有没有可以分析字体文件的unix命令行工具？

tag-icon • tag-icon linux shell command-line fonts
有没有可以分析字体文件的unix命令行工具？

给定一个字体文件目录（TTF 和 OTF），我想检查每种字体并确定它的样式（常规、斜体、粗体、粗斜体）。有没有适用于 UNIX 风格的操作系统的命令行工具可以做到这一点？或者有谁知道如何从 TTF 或 OTF 字体文件中提取元数据？

答案1

我想你正在寻找奥特芬信息。好像没有一个选项直接进入亚科，但你可以这样做：

otfinfo --info *.ttf | grep Subfamily

请注意，我查看的许多字体都使用“Oblique”而不是“Italic”。

答案2

在 Linux 中，如果您有 .ttf 字体，那么您很可能也有字体配置，该实用程序附带fc-scan。您可以解析输出以获取所需的信息，或使用记录错误的--format选项。

例如：

fc-scan --format "%{foundry} : %{family}\n" /usr/share/fonts/truetype/msttcorefonts/arialbd.ttf

您可以通过这种方式打印的字体属性如下所示：http://www.freedesktop.org/software/fontconfig/fontconfig-user.html#AEN21

某些属性以多种语言列出。例如，%{fullname}可以是一个列表。在这种情况下，%{fullnamelang}将列出语言。如果这显示您的语言位于列表中的第四位，您可以使用%{fullname[3]}格式字符串仅以该语言打印全名。

这种语言的东西非常不方便，我最终编写了一个完整的 Perl 脚本来仅用一种语言列出我想要的信息：

#!/usr/bin/perl
use strict;
my $VERSION = 0.1;
my $debug = 1;

my @wanted = qw(foundry family fullname style weight slant width spacing file);
my @lang_dependent = qw(family fullname style);
my $lang = "en";

my $separator = ", ";


use File::Basename;
use Data::Dumper; $Data::Dumper::Sortkeys = 1;


my $me = basename $0;
die "Usage: $me FILENAME\n" unless @ARGV;

my $fontfile = shift;

unless (-f $fontfile) {
    die "Bad argument: '$fontfile' is not a file !\n";
}


my $fc_format = join( "\\n", map { "\%{$_}" } @wanted );

my @info = `fc-scan --format "$fc_format" "$fontfile"`;
chomp @info;

my %fontinfo;
@fontinfo{@wanted} = @info;

if ( grep /,/, @fontinfo{ @lang_dependent } ) {
    my $format = join( "\\n", map { "\%{${_}lang}" } @lang_dependent );
    my @langs = `fc-scan --format "$format" "$fontfile"`;

    for my $i (0..$#lang_dependent) {
        my @lang_list = split /,/, $langs[$i];
        my ($pos) = grep { $lang_list[$_] ~~ $lang } 0 .. $#lang_list;
        my @vals = split /,/, $fontinfo{$lang_dependent[$i]};
        $fontinfo{$lang_dependent[$i]} = $vals[$pos];
    }
}

warn Dumper(\%fontinfo), "\n" if $debug;

$fontinfo{'fullname'} ||= $fontinfo{'family'}; # some old fonts don't have a fullname? (WINNT/Fonts/marlett.ttf)

print join($separator, @fontinfo{@wanted}), "\n";

相关内容