zontreck/wine
1
0
Fork 0
mirror of https://gitlab.winehq.org/wine/wine.git synced 2024-11-19 17:06:04 -07:00
Code Issues Projects Releases Packages Wiki Activity Actions

tools: Download all Unicode data files before generating anything.

Browse source
This commit is contained in:
Alexandre Julliard 2024-11-13 11:20:53 +01:00
parent 6208d61055
commit 9accb76341
1 changed files with 28 additions and 15 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

43
tools/make_unicode
View file

@ -1932,26 +1932,38 @@ sub to_utf16(@)
return @ret;
}
################################################################
# download all data files into the cache
sub download_data_files()
{
my $cache = ($ENV{XDG_CACHE_HOME} || "$ENV{HOME}/.cache") . "/wine";
foreach my $id (keys %data_files)
{
my $data = $data_files{$id};
my $url = $data->{url};
my $filename = "$cache/" . ($data->{name} || ($url =~ s/.*\/([^\/]+)$/$1/r));
unless (-f $filename)
{
print "Fetching $url...\n";
system "mkdir", "-p", $cache;
!system "wget", "-q", "-O", $filename, $url or die "cannot fetch $url";
}
my $sha = Digest::SHA->new( "sha256" )->addfile( $filename )->hexdigest;
die "invalid checksum $sha for $filename" unless $sha eq $data->{sha};
$data->{filename} = $filename;
}
}
################################################################
# fetch a unicode.org file and open it
sub open_data_file($@)
{
my ($id, $name) = @_;
my $data = $data_files{$id};
my $cache = ($ENV{XDG_CACHE_HOME} || "$ENV{HOME}/.cache") . "/wine";
local *FILE;
my $url = $data->{url};
my $filename = "$cache/" . ($data->{name} || ($url =~ s/.*\/([^\/]+)$/$1/r));
unless (-f $filename)
{
print "Fetching $url...\n";
system "mkdir", "-p", $cache;
!system "wget", "-q", "-O", $filename, $url or die "cannot fetch $url";
}
my $sha = Digest::SHA->new( "sha256" )->addfile( $filename )->hexdigest;
die "invalid checksum $sha for $filename" unless $sha eq $data->{sha};
my $url = $data_files{$id}->{url};
my $filename = $data_files{$id}->{filename};
if ($filename =~ /\.zip$/)
{
@ -5833,6 +5845,7 @@ sub save_file($)
# main routine
chdir ".." if -f "./make_unicode";
download_data_files();
load_data();
dump_bidi_dir_table( "dlls/gdi32/uniscribe/direction.c" );
dump_bidi_dir_table( "dlls/dwrite/direction.c" );