#!/usr/bin/perl -w

use strict;
use warnings;
use Carp;

use Source::Repository::Mass;
use Source::Repository::Mass::ALTLinuxImport qw!rosaimport/Sisyphus!;
use RPM::Source::Convert::Plugins::ROSA2ALT;
use Source::Shared::FindLocalMirror;
$Source::Repository::Mass::origin_reponame='Origin repository (ROSA)';

my $URL=$ENV{'USE_YANDEX_MIRROR'} ? 'rsync://mirror.yandex.ru/rosa-linux' :
    'rsync://mirror.rosalab.ru/rosa';

my $SRPMS='rosa2021.1/repository/SRPMS';
my $MIRRORROOT=&Source::Shared::FindLocalMirror::find_local_mirror(['rosa/'.$SRPMS]);
if (!$MIRRORROOT) {
    print STDERR "$Source::Repository::Mass::origin_reponame: local mirror not found, using web mirror...\n" if $Source::Shared::verbose;
    $MIRRORROOT=$URL.'/'.$SRPMS;
}

my @subdirs;
foreach my $level1 (qw!main contrib non-free!) {
    foreach my $level2 (qw!updates release testing!) {
	push @subdirs, $level1.'/'.$level2;
    }
}
$Source::Repository::Mass::ORIGINPATH=join(':',map {$MIRRORROOT.'/'.$_} @subdirs);

my $convert=Source::Repository::Mass::ALTLinuxImport->new();
$convert->process();
