diff options
author | Norbert Preining <preining@logic.at> | 2016-04-12 06:07:14 +0000 |
---|---|---|
committer | Norbert Preining <preining@logic.at> | 2016-04-12 06:07:14 +0000 |
commit | 07df4636752b37d5a7b0ae410986dcb96a815e4e (patch) | |
tree | 3dc9702770c4ef5dba5eb9d8561cf266099b17c0 /Master/texmf-dist | |
parent | a4a8a55676ed3f41595b57796593ce3dd300c3fc (diff) |
starting work on tlmgr/gpg
git-svn-id: svn://tug.org/texlive/trunk@40427 c570f23f-e606-0410-a88d-b1316a301751
Diffstat (limited to 'Master/texmf-dist')
-rwxr-xr-x | Master/texmf-dist/scripts/texlive/tlmgr.pl | 7 |
1 files changed, 7 insertions, 0 deletions
diff --git a/Master/texmf-dist/scripts/texlive/tlmgr.pl b/Master/texmf-dist/scripts/texlive/tlmgr.pl index a0e98f8d616..13da7e23c30 100755 --- a/Master/texmf-dist/scripts/texlive/tlmgr.pl +++ b/Master/texmf-dist/scripts/texlive/tlmgr.pl @@ -103,6 +103,7 @@ use TeXLive::TLUtils; use TeXLive::TLWinGoo; use TeXLive::TLDownload; use TeXLive::TLConfFile; +use TeXLive::GPG; TeXLive::TLUtils->import(qw(member info give_ctan_mirror win32 dirname mkdirhier copy log debug tlcmp)); use TeXLive::TLPaper; @@ -5880,6 +5881,12 @@ END_NO_INTERNET } } if (!$local_copy_tlpdb_used) { + # TODO verification + # here we should add code to download the remote .sha256.gpg (.asc?) + # and verify it. + my $path = "$location/$InfraLocation/$DatabaseName.sha256.asc"; + my $fh = TeXLive::TLUtils::download_file($path, "|"); + # TODO verify ... $remotetlpdb = TeXLive::TLPDB->new(root => $location); } if (!defined($remotetlpdb)) { |