source: server/trunk/web/t/controller_Distrib.t @ 374

use strict;
use warnings;
use Test::More;
use Test::More;
use FindBin;
require "$FindBin::Bin/xml.pl";

# know existing data:
my $distribution = 'Mandriva';
my $release = '2010.1';
my $arch = 'x86_64';
my $media = 'main-release';
my $pkgid = '45db73adf5f9ceabc8f9ea1dabccffcc';
my $rpmname = 'rpm';

BEGIN { use_ok 'Catalyst::Test', 'Sophie' }
BEGIN { use_ok 'Sophie::Controller::Distrib' }

ok( request('/distrib')->is_success, 'Request should succeed' );
ok( request('/distrib', { ajax => 1 })->is_success, 'Request ajax should succeed' );
ok( request('/distrib', { json => 1 })->is_success, 'Request json should succeed' );
ok( request("/distrib/$distribution")->is_success, 'Request distribution should succeed' );
ok( request("/distrib/$distribution", { ajax => 1 })->is_success,
    'Request distribution as ajax should succeed' );
ok( request("/distrib/$distribution", { json => 1 })->is_success,
    'Request distribution as ajax should succeed' );
ok( xmlrequest_ok( 'distrib.list'), "XMLRPC");
ok( xmlrequest_ok( 'distrib.list', $distribution), "XMLRPC");
ok( request("/distrib/$distribution/$release")->is_success, 'Request should succeed' );
ok( request("/distrib/$distribution/$release/$arch")->is_success, 'Request should succeed' );
ok( request("/distrib/$distribution/$release/$arch/media")->is_success, 'Request should succeed' );

ok( request("/distrib/$distribution/$release/$arch/rpms")->is_success,
    '/distrib/dist/release/arch/rpms' );
ok( request("/distrib/$distribution/$release/$arch/rpms?ajax")->is_success,
    '/distrib/dist/release/arch/rpms ajax' );
ok( request("/distrib/$distribution/$release/$arch/srpms")->is_success,
    '/distrib/dist/release/arch/srpms' );
ok( request("/distrib/$distribution/$release/$arch/srpms?ajax")->is_success,
    '/distrib/dist/release/arch/srpms ajax' );

ok( request("/distrib/$distribution/$release/$arch/srpms/$rpmname")->is_success,
    '/distrib/dist/release/arch/srpms/RPM' );
ok( request("/distrib/$distribution/$release/$arch/srpms/$rpmname?ajax")->is_success,
    '/distrib/dist/release/arch/srpms/RPM ajax' );

ok( request("/distrib/$distribution/$release/$arch/rpms/$rpmname")->is_success,
    '/distrib/dist/release/arch/rpms/RPM' );
ok( request("/distrib/$distribution/$release/$arch/rpms/$rpmname?ajax")->is_success,
    '/distrib/dist/release/arch/rpms/RPM ajax' );

ok( request("/distrib/$distribution/$release/$arch/by-pkgid/$pkgid")->is_success,
    '/distrib/dist/release/arch/by-pkgid/PKGID' );
ok( request("/distrib/$distribution/$release/$arch/by-pkgid/$pkgid?ajax")->is_success,
    '/distrib/dist/release/arch/by-pkgid/PKGID ajax' );

ok(
    request("/distrib/$distribution/$release/$arch/media/$media/by-pkgid/$pkgid")
    ->is_success, "request media/pkgid");
ok(
    request("/distrib/$distribution/$release/$arch/media/$media/by-pkgid/$pkgid/deps")
    ->is_success, "request media/pkgid/deps");
ok(
    request("/distrib/$distribution/$release/$arch/media/$media/by-pkgid/$pkgid/files")
    ->is_success, "request media/pkgid/files");
ok(
    request("/distrib/$distribution/$release/$arch/media/$media/by-pkgid/$pkgid/changelog")
    ->is_success, "request media/pkgid/changelog");

ok(
    request("/distrib/$distribution/$release/$arch/rpms/$rpmname")
    ->is_success, "request rpms/$rpmname");
ok(
    request("/distrib/$distribution/$release/$arch/srpms/$rpmname")
    ->is_success, "request srpms/$rpmname");

ok(
    request("/distrib/$distribution/$release/$arch/by-pkgid/$pkgid")
    ->is_success, "request distrib bypkgid");

done_testing();