Re: mod_dav question

かしこまりました
Thank you Jan and Jack
I will try to implement that.

Regards
Yamada


On Tue, Jan 11, 2022 at 4:10 PM Jacques Deguest <[email protected]> wrote:

> Yamada-san,
>
> You would need to set up a perl response handler like:
> <Location /webdav>
>     SetHandler modperl
>     PerlSetupEnv On
>     PerlResponseHandler +Your::WebDav::Module
> </Location>
>
> and in your module Your::WebDav::Module you would write something like:
>
> BEGIN
> {
>     use strict;
>     use warnings;
>     use Apache2::RequestRec ();
>     use Apache2::Log ();
>     use Apache2::Const -compile => qw( DECLINED OK :http );
>     use Apache2::RequestUtil ();
>     use Apache2::SubRequest ();
>     use APR::Request ();
> };
>
> sub handler : method
> {
>     my $self = shift( @_ );
>     # Do stuff to handle the request, accepting it, declining it, etc.
> }
>
> Kind regards,
> Jacques Deguest
> (incidentally Tokyo, Japan)
>
> On 2022/01/11 13:49, Yamadaえりな wrote:
>
> Hello list,
>
> We are using mod_dav with apache2.4 to manage files via webdav protocol.
> We want to limit file uploading based on the user's total storage.
> For instance, if a user has his storage size reached to the max limit, he
> can't upload files anymore.
> Do you have any suggestions on how I can implement this by modperl?
>
> Thanks in advance.
> Yamada
>
>
>