package Apache::Checksum1;
# file: Apache/Checksum1.pm
use strict;
use Apache::Constants qw(:common);
use constant DEFAULT_CHECKSUM_DIR => '/usr/tmp/checksums';

sub handler {
    my $r = shift;
    my $uri = $r->uri;
    my $cksumdir = $r->dir_config('ChecksumDir') || DEFAULT_CHECKSUM_DIR;
    $cksumdir = $r->server_root_relative($cksumdir);
    return DECLINED unless $uri =~ s!^(.+)\.cksm$!$cksumdir$1!;
    $r->filename($uri);
    return OK;
}

1;
__END__