# downloaded data and generated includes
/data
-# data includes automatically generated by tools/
-/countries.inc.pl
- # tools/mkcountries-geonames
-/digraphs.inc.pl
- # tools/mkdigraphlist
-/unicode-char.inc.pl
- # tools/mkcharinfo
-/unicode-age.inc.pl
- # tools/mkcharver
-/ttfsupport/
- # tools/convert-allfonts
-/unicode-cover.inc.pl
- # tools/mkfontinfo
-
# site owner tag for google webmaster tools
/google????????????????.html
-all: digraphs.inc.pl unicode-cover.inc.pl countries.inc.pl data/browser data/termcol-xcolor.inc.pl
+all: data/digraphs.inc.pl data/unicode-cover.inc.pl data/countries.inc.pl data/browser data/termcol-xcolor.inc.pl
more: all data/digraphs-xorg.inc.pl
download: data/DerivedAge.txt data/rfc1345.txt data/xorg-compose data/countryInfo.txt data/browser/caniuse data/browser/usage-wm.tsv data/xcolors
data/DerivedAge.txt:
tools/wget-ifmodified http://www.unicode.org/Public/UNIDATA/$(@F) $@
-unicode-age.inc.pl: tools/mkcharver data/DerivedAge.txt
+data/unicode-age.inc.pl: tools/mkcharver data/DerivedAge.txt
$< $(word 2,$^) >$@
data/rfc1345.txt:
data/digraphs-vim.inc.pl: tools/mkdigraphs-vim
$< >$@
-digraphs.inc.pl: tools/mkdigraphlist data/digraphs-rfc.inc.pl data/digraphs-vim.inc.pl data/digraphs-shiar.inc.pl unicode-char.inc.pl
+data/digraphs.inc.pl: tools/mkdigraphlist data/digraphs-rfc.inc.pl data/digraphs-vim.inc.pl data/digraphs-shiar.inc.pl data/unicode-char.inc.pl
$< >$@
-unicode-char.inc.pl: tools/mkcharinfo data/digraphs-rfc.inc.pl data/digraphs-shiar.inc.pl unicode-age.inc.pl unicode-table.inc.pl
+data/unicode-char.inc.pl: tools/mkcharinfo data/digraphs-rfc.inc.pl data/digraphs-shiar.inc.pl data/unicode-age.inc.pl unicode-table.inc.pl
$< >$@
-ttfsupport/%.inc.pl: tools/mkttfinfo data/font/%.ttf
+data/font/%.inc.pl: tools/mkttfinfo data/font/%.ttf
$< $(word 2,$^) $@ || true
data/xcolors/themes: data/xcolors
data/font/noto%.ttf:
find /usr/share/fonts/truetype/noto/ -iname "Noto$(*F)-Regular.ttf" | head -1 | xargs -i ln -sf {} $@
-ttfsupport: tools/mkttfinfo
+data/font: tools/mkttfinfo
mkdir -p $@
- $(MAKE) ttfsupport/all
+ $(MAKE) data/font/all
touch $@
-ttfsupport/all: ttfsupport/all-win2k ttfsupport/all-dejavu ttfsupport/all-google ttfsupport/all-other
-ttfsupport/all-win2k: ttfsupport/verdana.win2k.inc.pl ttfsupport/times.win2k.inc.pl ttfsupport/arial.win2k.inc.pl ttfsupport/cour.win2k.inc.pl ttfsupport/comic.win2k.inc.pl ttfsupport/georgia.win2k.inc.pl ttfsupport/arialuni.inc.pl
-ttfsupport/all-dejavu: ttfsupport/dvsans.inc.pl ttfsupport/dvserif.inc.pl ttfsupport/dvmono.inc.pl
-ttfsupport/all-google: ttfsupport/droidsans.inc.pl ttfsupport/droidserif.inc.pl ttfsupport/droidmono.inc.pl ttfsupport/roboto.inc.pl ttfsupport/notosans.inc.pl ttfsupport/notoserif.inc.pl
-ttfsupport/all-other: ttfsupport/unifont.inc.pl ttfsupport/code2000.inc.pl ttfsupport/freesans.inc.pl ttfsupport/freeserif.inc.pl
+data/font/all: data/font/all-win2k data/font/all-dejavu data/font/all-google data/font/all-other
+data/font/all-win2k: data/font/verdana.win2k.inc.pl data/font/times.win2k.inc.pl data/font/arial.win2k.inc.pl data/font/cour.win2k.inc.pl data/font/comic.win2k.inc.pl data/font/georgia.win2k.inc.pl data/font/arialuni.inc.pl
+data/font/all-dejavu: data/font/dvsans.inc.pl data/font/dvserif.inc.pl data/font/dvmono.inc.pl
+data/font/all-google: data/font/droidsans.inc.pl data/font/droidserif.inc.pl data/font/droidmono.inc.pl data/font/roboto.inc.pl data/font/notosans.inc.pl data/font/notoserif.inc.pl
+data/font/all-other: data/font/unifont.inc.pl data/font/code2000.inc.pl data/font/freesans.inc.pl data/font/freeserif.inc.pl
-#ttfsupport/unifont.inc.pl: tools/mkttfinfo
+#data/font/unifont.inc.pl: tools/mkttfinfo
# $< unifont.ttf $@
# $< --headless unifont_upper.ttf >>$@
-unicode-cover.inc.pl: tools/mkfontinfo ttfsupport $(patsubst data/font/%.ttf,ttfsupport/%.inc.pl,$(wildcard data/font/*.ttf))
+data/unicode-cover.inc.pl: tools/mkfontinfo data/font $(patsubst data/font/%.ttf,data/font/%.inc.pl,$(wildcard data/font/*.ttf))
$< >$@
data/countryInfo.txt:
tools/wget-ifmodified http://download.geonames.org/export/dump/$(@F) $@
-countries.inc.pl: tools/mkcountries-geonames data/countryInfo.txt
+data/countries.inc.pl: tools/mkcountries-geonames data/countryInfo.txt
$< $(word 2,$^) >$@
data/browser: data/browser/support.inc.pl data/browser/usage-wm.inc.pl
$< $(word 2,$^) >$@
clean:
- -rm digraphs.inc.pl
- -rm unicode-char.inc.pl
- -rm unicode-age.inc.pl
- -rm -rf ttfsupport/
- -rm unicode-cover.inc.pl
+ -rm data/digraphs.inc.pl
+ -rm data/unicode-char.inc.pl
+ -rm data/unicode-age.inc.pl
+ -rm -rf data/font/
+ -rm data/unicode-cover.inc.pl
-rm data/browser/support.inc.pl
-rm data/browser/usage-wm.inc.pl
our $VERSION = '1.08';
-our $uc = do 'unicode-char.inc.pl';
+our $uc = do 'data/unicode-char.inc.pl';
sub new {
my ($class) = @_;
if ($self->{style} eq 'univer') {
if ($input =~ /\p{age=unassigned}/) {
# check include for assignments after unicode 6.0 (perl v5.14)
- state $agemap = do 'unicode-age.inc.pl';
+ state $agemap = do 'data/unicode-age.inc.pl';
my $version = $agemap->{$codepoint};
push @class, $version ? 'l2' : 'l1';
}
unicode glyph char character reference common ipa symbol sign mark table digraph
'],
stylesheet => [qw'light dark mono circus red'],
- data => [qw( unicode-cover.inc.pl ttfsupport unicode-char.inc.pl )],
+ data => [qw( data/unicode-cover.inc.pl data/font data/unicode-char.inc.pl )],
raw => <<'EOT',
<style>
tbody tr:hover th {
use Shiar_Sheet::FormatChar;
my $glyphs = Shiar_Sheet::FormatChar->new;
-my $groupinfo = do 'unicode-cover.inc.pl' or die $@ || $!;
+my $groupinfo = do 'data/unicode-cover.inc.pl' or die $@ || $!;
my @ossel = @{ $groupinfo->{osdefault} };
my @fontlist = map { $_->{file} }
my %font;
for my $fontid (@fontlist) {
- my ($fontmeta, @fontrange) = do "ttfsupport/$fontid.inc.pl";
+ my ($fontmeta, @fontrange) = do "data/font/$fontid.inc.pl";
$fontmeta or next;
$font{$fontid} = {
(map { (-$_ => $fontmeta->{$_}) } keys %{$fontmeta}),
"Table of ISO-3166-1 country codes with the names of reserved territories.",
keywords => [qw'country code cc tld cctld continent territory land table'],
stylesheet => [qw'light dark circus mono red'],
- data => ['countries.inc.pl'],
+ data => ['data/countries.inc.pl'],
});
:>
<h1>ISO-3166-1α2 Country codes</h1>
<:
-my $cc = do 'countries.inc.pl';
+my $cc = do 'data/countries.inc.pl';
{
printf '<table class="mcmap">';
character char glyph table unicode vim xorg x11 x
'],
stylesheet => [qw'light'],
- data => [qw( digraphs.inc.pl )],
+ data => [qw( data/digraphs.inc.pl )],
});
:>
:>
<:
-my $di = do 'digraphs.inc.pl'
+my $di = do 'data/digraphs.inc.pl'
or die "Error loading digraphs data: ", $@ // $!;
if (exists $get{v}) {
script block symbol sign mark reference table
)],
stylesheet => [qw( light dark mono circus red )],
- data => [qw( unicode-cover.inc.pl )],
+ data => [qw( data/unicode-cover.inc.pl )],
});
if ($font) {
- my ($fontmeta, @cover) = do "ttfsupport/$font.inc.pl";
+ my ($fontmeta, @cover) = do "data/font/$font.inc.pl";
$fontmeta or die "Unknown font $font\n";
my $map = eval {
$get{map} or return;
- my $groupinfo = do 'unicode-cover.inc.pl' or die $@ || $!;
+ my $groupinfo = do 'data/unicode-cover.inc.pl' or die $@ || $!;
my ($cat, $name) = split m{/}, $get{map}, 2 or die "invalid map\n";
if (!$name) {
<:
-my $cover = do 'unicode-cover.inc.pl' or die $@ || $!;
+my $cover = do 'data/unicode-cover.inc.pl' or die $@ || $!;
my @ossel = @{ $cover->{osdefault} };
my @fontlist = map { @{ $cover->{os}->{$_} } } @ossel;
eval {
# read introducing unicode versions for known characters
- my $agemap = do 'unicode-age.inc.pl' or die $@ || $!;
+ my $agemap = do 'data/unicode-age.inc.pl' or die $@ || $!;
for my $chr (keys %info) {
my $version = $agemap->{ord $chr} or next;
$info{$chr}->{class}->{'u-v'.$version}++
my $di = { %{$vim // {}}, %{$rfc}, %{$extra // {}} };
# optionally get unicode character information
-my $uninfo = do 'unicode-char.inc.pl'
+my $uninfo = do 'data/unicode-char.inc.pl'
or warn "could not include unicode details: ", $@ // $!;
# output perl code of hash
my %cover;
my $incsuffix = '.inc.pl';
-for my $fontfile (glob 'ttfsupport/*'.$incsuffix) {
+for my $fontfile (glob 'data/font/*'.$incsuffix) {
my ($fontid) = basename($fontfile, $incsuffix);
my ($fontmeta, @fontrange) = do $fontfile or next;
$fontmeta->{file} = $fontid;
} or warn "Could not include count for html entities: $@";
eval {
- my $agemap = do 'unicode-age.inc.pl'
+ my $agemap = do 'data/unicode-age.inc.pl'
or warn "Could not include unicode version data: $!";
use Unicode::UCD 'charinfo';
use Shiar_Sheet::Colour 1.05;
+say "# automatically generated by $0";
say 'use strict;';
say '+{';
my @names;
unicode glyph char character reference common ipa symbol sign mark table digraph
'],
stylesheet => [qw'light dark mono circus red'],
- data => [qw'unicode-table.inc.pl unicode-char.inc.pl'],
+ data => [qw( unicode-table.inc.pl data/unicode-char.inc.pl )],
});
:>