configure default QUOTA env

diff --git a/rsync-piper.pl b/rsync-piper.pl
index dc7333e..d5511d3 100755 (executable)
--- a/rsync-piper.pl
+++ b/rsync-piper.pl
@@ -17,6 +17,7 @@ use CloudStore::Couchbase;
 my $dir   = $ENV{RSYNC_DIR}  || '/srv/cloudstore';
 my $port  = $ENV{RSYNC_PORT} || 6501;
 my $users = "users";
+my $default_quota = $ENV{QUOTA} || 200 * 1024; # 200 Kb for test.sh
 
 my $log_fifo = "$dir/var/$port.log";
 my $pid_file = "$dir/var/$port.pid";
@@ -109,9 +110,8 @@ __RSYNC_MODULE__
 
                print "INFO: added $login = $auth_users\n";
 
-               my $quota = read_file "$path/quota" if -e "$path/quota";
-               chomp $quota && $quota * 1;
-               $quota ||= 100 * 1024; # Kb - XXX default quota
+               my $quota = $default_quota;
+               $quota = read_file("$path/quota") * 1 if -e "$path/quota";
 
                $store->user_set({
                        login => $login,