X-Git-Url: https://git.deb.at/?a=blobdiff_plain;f=lib%2FPackages%2FDoDownload.pm;h=89da639639cad7ced9e5f9352b2e191aeb6856a4;hb=67c4e1e424e081fa0cd77c97ce7a9d82053f6bb5;hp=d2dab309060bf2419d0f7913c4f5b7cd74fd860c;hpb=0d5547e211c0c21886db6f4f9a7b4ac70848408a;p=deb%2Fpackages.git diff --git a/lib/Packages/DoDownload.pm b/lib/Packages/DoDownload.pm index d2dab30..89da639 100644 --- a/lib/Packages/DoDownload.pm +++ b/lib/Packages/DoDownload.pm @@ -133,7 +133,12 @@ our @kfreebsd_european_sites = ( "kfreebsd-gnu.debian.net/debian", "ftp.easynet.be/ftp/gnuab/debian", "ftp.de.debian.org/debian-kfreebsd", + "ftp.sh.cvut.cz/MIRRORS/debian-non-linux", + "ftp.eila.jussieu.fr/pub/Debian-gnuab", ); +my @kfreebsd_asian_sites = ( + "ftp.citkit.ru/pub/HURD/debian", + ); our @nonus_north_american_sites = ( # "ftp.ca.debian.org/debian-non-US", "debian.yorku.ca/debian/non-US", @@ -193,7 +198,8 @@ our %arches = ( s390 => 'IBM S/390', "hurd-i386" => 'Hurd (i386)', amd64 => 'AMD64', - "kfreebsd-i386" => 'GNU/kFreeBSD (i386)' + "kfreebsd-i386" => 'GNU/kFreeBSD (i386)', + "kfreebsd-amd64" => 'GNU/kFreeBSD (amd64)' ); sub do_download { @@ -232,6 +238,7 @@ sub do_download { read_entry( \%packages, $pkg, \@results, $opts ); + @results = grep { $_->[7] ne 'v' } @results; unless (@results) { fatal_error( _g( "No such package." )."
". sprintf( _g( 'Search for the package' ), "$SEARCH_URL/$pkg" ) ); @@ -243,6 +250,7 @@ sub do_download { } } + debug( "final_result=@$final_result", 1 ); $archive = $final_result->[1]; my %data = split /\000/, $packages_all{"$pkg $arch $final_result->[7]"}; $file = $data{filename}; @@ -270,38 +278,44 @@ sub do_download { $$page_content .= "

".sprintf( _g( 'You can download the requested file from the %s subdirectory at:' ), $directory )."

\n"; } - hint(_g("If you are running Debian, it's strongly suggested to use a - package manager like aptitude or synaptic to download and install - packages, instead of doing so manually via this website")); + hint(sprintf(_g("If you are running Debian, it's strongly suggested to use a + package manager like aptitude or synaptic to download and install + packages, instead of doing so manually via this website."), + make_url('aptitude','',{arch=>undef}), + make_url('synaptic','',{arch=>undef}) ) ); if ($archive eq 'security') { $$page_content .= ""; $$page_content .= '

'._g( 'Debian security updates are currently officially distributed only via security.debian.org.' ).'

'; - } elsif ($arch eq 'amd64') { + } elsif ($archive eq 'amd64') { $$page_content .= print_links( _g( "North America" ), $file, @amd64_north_american_sites ); $$page_content .= print_links( _g( "Europe" ), $file, @amd64_european_sites ); $$page_content .= print_links( _g( "Asia" ), $file, @amd64_asian_sites ); $$page_content .= '

'._g( 'Note that AMD64 is not officialy included in the Debian archive yet, but the AMD64 porter group keeps their archive in sync with the official archive as close as possible. See the AMD64 ports page for current information.' ).'

'; - } elsif ($arch eq 'kfreebsd-i386') { + } elsif ($archive eq 'kfreebsd') { $$page_content .= print_links( _g( "North America" ), $file, @kfreebsd_north_american_sites ); $$page_content .= print_links( _g( "Europe" ), $file, @kfreebsd_european_sites ); + $$page_content .= print_links( _g( "Asia" ), $file, @kfreebsd_asian_sites ); $$page_content .= '

'._g( 'Note that GNU/kFreeBSD is not officialy included in the Debian archive yet, but the GNU/kFreeBSD porter group keeps their archive in sync with the official archive as close as possible. See the GNU/kFreeBSD ports page for current information.' ).'

'; } elsif ($archive eq 'non-US') { + $$page_content .= '
'; $$page_content .= print_links( _g( "North America" ), $file, @nonus_north_american_sites ); - $$page_content .= print_links( _g( "Europe" ), $file, @nonus_european_sites ); $$page_content .= print_links( _g( "Australia and New Zealand" ), $file, @nonus_australian_sites ); $$page_content .= print_links( _g( "Asia" ), $file, @nonus_asian_sites ); $$page_content .= print_links( _g( "South America" ), $file, @nonus_south_american_sites ); - - $$page_content .= '

'.sprintf( _g('If none of the above sites are fast enough for you, please see our complete mirror list.' ), 'http://www.debian.org/mirror/list-non-US' ).'

'; + $$page_content .= '
'; + $$page_content .= print_links( _g( "Europe" ), $file, @nonus_european_sites ); + $$page_content .= '
'; + + $$page_content .= '

'.sprintf( _g('If none of the above sites are fast enough for you, please see our complete mirror list.' ), 'http://www.debian.org/mirror/list-non-US' ).'

'; } elsif ($archive eq 'backports') { $$page_content .= '
';