# Copyright (c) 2007 bivio Software, Inc.  All Rights Reserved.
# $Id: otp-dav.btest,v 1.2 2007/09/02 04:20:15 nagler Exp $
test_setup('PetShop');
home_page();
basic_authorization('otp');
test_deviance('401 Authorization Required');
send_request(PROPFIND => '/dav');
test_conformance();
Bivio::IO::Alert->info(get_response()->header('WWW-Authenticate'));
test_ok(get_response()->header('WWW-Authenticate') =~ m{otp_md5\s+(\d+)\s+(\w+)});
basic_authorization(
    'otp',
    test_use('Bivio::Util::OTP')->six_word_key($1, $2, 'password'),
);
send_request(PROPFIND => '/dav');
send_request(PROPFIND => '/otp/dav');