remove old md5sum tests

[cloudstore.git] / create-user.sh

diff --git a/create-user.sh b/create-user.sh
index ff0f2c7..54d81a1 100755 (executable)
--- a/create-user.sh
+++ b/create-user.sh
@@ -1,12 +1,18 @@
-#!/bin/sh -xe
+#!/bin/sh -e
 
-login=$1
+. ./env.sh
+
+email=$1
 password=$2
+quota=$3
 
-if [ -z "$login" -o -z "$password" ]; then
-       echo "Usage: $0 login password"
+if [ -z "$email" -o -z "$password" -o ]; then
+       echo "Usage: $0 email password [quota]"
        exit 1
 fi
 
-mkdir -p users/$login/blob
-echo "$login:$password" >> users/$login/secrets
+test -z "$quota" && quota=200000
+
+
+perl -Ilib -MCloudStore::API -e 'print "u" . CloudStore::API->new("s1")->create_user(@ARGV),$/' $email $password $quota
+