SYNOPSIS

    use Arch::Registry;
    my $registry = Arch::Registry->new;

    my %archive_locations = $registry->registered_archives;
    $registry->register_archive('http://john.com/archives/main');
    $registry->unregister_archive('[email protected]');

    %archive_locations = $registry->supermirror_archives;
    die $registry->web_error if $registry->web_error;

    my @john_versions = @{
        $registry->supermirror_archive_versions->{'[email protected]')
    };

    my $archives = $registry->search_supermirror('.*', '--cset-gui--');
    die $registry->web_error unless defined $archives;

    my $versions = $registry->search_supermirror('john@', '^tla\b', 1);
    print map { "$_\n" } @$versions;  # print [email protected]/tla...

DESCRIPTION

This class provides the way to register and unregister \s-1GNU\s0 Arch archives for the caller user and list all registered archives. It also provides the way to search the supermirror (currently mirrors.sourcecontrol.net) by archive name or archive/category/branch/version regexp.

METHODS

The following class methods are available:

new, register_archive, unregister_archive, registered_archives, set_web_cache, flag_web_cache, supermirror_archives, supermirror_archive_versions, search_supermirror, web_error.

new

Construct Arch::Registry object.

register_archive location [archive]

Register archive at the given location and optional archive (if missing then the location is actually accessed to find the archive name). Returns true on success.

unregister_archive archive

Unregister archive. Returns true on success.

registered_archives

Returns a hash (or hashref in scalar context) of registered archives, that is pairs archive => location.

set_web_cache [ named-values ]

Define the web cache to use with operations on the supermirror. The keys of named-values are dir (the web cache directory) and ttl (time to live in minutes). If named-values is empty or misses dir, or dir does not exist, the cache is unset. This method has a side effect of forgetting memoized real-web-or-cache content fetches. So you may call it with or without parameters to reset the memoized values, although this should rarely be needed.

flag_web_cache [value]

Turn on or off the web cache depending on the parameter. value may be \*(L"enabled\*(R", \*(L"disabled\*(R", \*(L"nowrite\*(R" and \*(L"noread\*(R". Additionally, the false value will be taken as \*(L"disabled\*(R", the true value as \*(L"enabled\*(R".

supermirror_archives

Returns a hash (or hashref in scalar context) of archives mirrored on the supermirror, that is pairs archive => location.

supermirror_archive_versions

Returns a hashref of archives mirrored on the supermirror and all their versions, that is pairs archive => [ version, .. ].

search_supermirror
search_supermirror archive_regexp
search_supermirror archive_regexp version_regexp
search_supermirror archive_regexp version_regexp return_versions

Search the archives (and possibly their branches/versions) by archive and version regular expressions given. If return_versions is unset, returns arrayref that is all matching [ archive, .. ]. If return_versions is set to 'joined', returns arrayref that is all matching [ archive/version, .. ]. If return_versions is set to 'hashref', returns hashref similar to supermirror_archive_versions that is all matching { archive => [ version, .. ], ... }. If web_error occurred, returns undef. archive_regexp defaults to \*(L"any\*(R", version_regexp defaults to \*(L"any\*(R", return_versions defaults to false.

web_error

Returns the string containing the error while fetching one or another supermirror url (the last one). Returns undef if no error occured.

BUGS

Waiting for your reports.

AUTHORS

Mikhael Goikhman ([email protected]\*(--Perl-GPL/arch-perl\*(--devel).

RELATED TO Arch::Registry…

For more information, see tla, Arch::Util, Arch::LiteWeb.