มีเครื่องมือบรรทัดคำสั่ง unix ที่สามารถวิเคราะห์ไฟล์ตัวอักษร?

ให้ไดเรกทอรีของไฟล์ฟอนต์ (TTF และ OTF) ฉันต้องการตรวจสอบแต่ละฟอนต์และกำหนดว่าสไตล์ใด (ปกติ, ตัวเอียง, ตัวหนา, ตัวหนา - ตัวเอียง) มีเครื่องมือบรรทัดคำสั่งสำหรับระบบปฏิบัติการ unix ปรุงแต่งที่สามารถทำได้หรือไม่? หรือใครรู้วิธีการดึงข้อมูลเมตาจากไฟล์แบบอักษร TTF หรือ OTF?

ผมคิดว่าคุณกำลังมองหาotfinfo ดูเหมือนจะไม่มีตัวเลือกให้ไปที่อนุวงศ์โดยตรง แต่คุณสามารถทำได้:

otfinfo --info *.ttf | grep Subfamily

โปรดทราบว่าแบบอักษรจำนวนหนึ่งที่ฉันดูใช้ "เฉียง" แทน "ตัวเอียง"

ใน Linux ถ้าคุณมีฟอนต์. ttf คุณก็อาจมีฟอนต์configซึ่งมาพร้อมกับ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";