Test output for amazon-s3 [fail]
Testing time: 6s
/home/mario/local/chicken-4.8.0.3/bin/csi -script run.scm < /dev/null
-- testing Amazon S3 ---------------------------------------------------------
Bucket Exists 1 ...................................................... [ERROR]
Error: (call-with-input-request) Client error: 403 Forbidden: #<URI-common: scheme=http port=#f host="chicken-scheme-test-bucket.s3.amazonaws....
(bucket-exists? *b*)
Create Bucket ........................................................ [ERROR]
Error: (call-with-input-request) Client error: 403 Forbidden: #<URI-common: scheme=http port=#f host="chicken-scheme-test-bucket.s3.amazonaws....
(create-bucket! *b*)
Bucket Exists 2 ...................................................... [ERROR]
Error: (call-with-input-request) Client error: 403 Forbidden: #<URI-common: scheme=http port=#f host="chicken-scheme-test-bucket.s3.amazonaws....
(bucket-exists? *b*)
List Buckets ......................................................... [ERROR]
Error: (call-with-input-request) Client error: 403 Forbidden: #<URI-common: scheme=http port=#f host="s3.amazonaws.com" path=() query=() fragm...#f>
(list-buckets)
List Bucket Objects 1 ................................................ [ERROR]
Error: (call-with-input-request) Client error: 403 Forbidden: #<URI-common: scheme=http port=#f host="chicken-scheme-test-bucket.s3.amazonaws....
(list-objects *b*)
Put Object ........................................................... [ERROR]
Error: (call-with-input-request) Client error: 403 Forbidden: #<URI-common: scheme=http port=#f host="chicken-scheme-test-bucket.s3.amazonaws....
(put-object!
*b*
"key"
(lambda () "value")
(string-length "value")
"text/plain")
List Bucket Objects 2 ................................................ [ERROR]
Error: (call-with-input-request) Client error: 403 Forbidden: #<URI-common: scheme=http port=#f host="chicken-scheme-test-bucket.s3.amazonaws....
(list-objects *b*)
Delete Object ........................................................ [ERROR]
Error: (call-with-input-request) Client error: 403 Forbidden: #<URI-common: scheme=http port=#f host="chicken-scheme-test-bucket.s3.amazonaws....
(delete-object! *b* "key")
Put String ........................................................... [ERROR]
Error: (call-with-input-request) Client error: 403 Forbidden: #<URI-common: scheme=http port=#f host="chicken-scheme-test-bucket.s3.amazonaws....
(put-string! *b* "string" "res-string")
Get String ........................................................... [ERROR]
Error: (call-with-input-request) Client error: 403 Forbidden: #<URI-common: scheme=http port=#f host="chicken-scheme-test-bucket.s3.amazonaws....
(get-string *b* "string")
Delete Object 2 ...................................................... [ERROR]
Error: (call-with-input-request) Client error: 403 Forbidden: #<URI-common: scheme=http port=#f host="chicken-scheme-test-bucket.s3.amazonaws....
(delete-object! *b* "string")
Put Sexp ............................................................. [ERROR]
Error: (call-with-input-request) Client error: 403 Forbidden: #<URI-common: scheme=http port=#f host="chicken-scheme-test-bucket.s3.amazonaws....
(put-sexp! *b* "sexp" '(+ 1 2 3))
Get Sexp ............................................................. [ERROR]
Error: (call-with-input-request) Client error: 403 Forbidden: #<URI-common: scheme=http port=#f host="chicken-scheme-test-bucket.s3.amazonaws....
(eval (get-sexp *b* "sexp"))
Put File ............................................................. [ERROR]
Error: (file-size) cannot access file - No such file or directory: "test-in-file"
(put-file! *b* "file" "test-in-file")
Get File ............................................................. [ERROR]
Error: (call-with-input-request) Client error: 403 Forbidden: #<URI-common: scheme=http port=#f host="chicken-scheme-test-bucket.s3.amazonaws....
(get-file *b* "file" "test-out-file")
Get/Put File 1 ....................................................... [ERROR]
Error: (open-input-file) cannot open file - No such file or directory: "test-in-file"
(string=?
(with-input-from-file "test-in-file" (lambda () (read-string)))
(with-input-from-file "test-out-file" (lambda () (read-string))))
Delete Object 3 ...................................................... [ERROR]
Error: (call-with-input-request) Client error: 403 Forbidden: #<URI-common: scheme=http port=#f host="chicken-scheme-test-bucket.s3.amazonaws....
(delete-object! *b* "sexp")
Delete Bucket ........................................................ [ERROR]
Error: (call-with-input-request) Client error: 403 Forbidden: #<URI-common: scheme=http port=#f host="chicken-scheme-test-bucket.s3.amazonaws....
(delete-bucket! *b*)
18 tests completed in 5.141 seconds.
18 errors (100%).
0 out of 18 (0%) tests passed.
-- done testing Amazon S3 ----------------------------------------------------