initial support for large objects

This has gone through a lot of iterations on my branch, and I'm quite
happy with the parts of the API that exist now. Test coverage can still
be better, and will get better in the following commits.

The API is not yet finished: I want to add Options arguments to
Object.Upload(), Object.Copy(), Object.Move() and Object.Delete() that
specify how each of these operations affect existing segments (and,
later, also existing symlinks). For Upload(), uploading in segments
shall become as easy as flipping a single switch.

1 files changed, 64 insertions, 0 deletions

diff --git a/largeobject_test.go b/largeobject_test.go
new file mode 100644
index 0000000..fe781ab
--- /dev/null
+++ b/largeobject_test.go
@@ -0,0 +1,64 @@
+/******************************************************************************
+*
+*  Copyright 2018 Stefan Majewsky <majewsky@gmx.net>
+*
+*  Licensed under the Apache License, Version 2.0 (the "License");
+*  you may not use this file except in compliance with the License.
+*  You may obtain a copy of the License at
+*
+*      http://www.apache.org/licenses/LICENSE-2.0
+*
+*  Unless required by applicable law or agreed to in writing, software
+*  distributed under the License is distributed on an "AS IS" BASIS,
+*  WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
+*  See the License for the specific language governing permissions and
+*  limitations under the License.
+*
+******************************************************************************/
+
+package schwift
+
+import "testing"
+
+func TestParseHTTPRange(t *testing.T) {
+	testCases := []struct {
+		input  string
+		ok     bool
+		offset int64
+		length uint64
+	}{
+		//all the testcases from RFC 7233, section 3.1
+		{"0-499", true, 0, 500},
+		{"500-999", true, 500, 500},
+		{"-500", true, -1, 500},
+		{"9500-", true, 9500, 0},
+		{"0-0", true, 0, 1},
+		{"-1", true, -1, 1},
+		//and then some more
+		{"0-", true, 0, 0},
+		{"-", true, 0, 0},
+		//some error cases for 100% coverage
+		{"no dash", false, 0, 0},
+		{"what-the-heck", false, 0, 0},
+		{"-X", false, 0, 0},
+		{"X-X", false, 0, 0},
+		{"X-", false, 0, 0},
+		{"999-500", false, 0, 0},
+	}
+
+	for _, tc := range testCases {
+		o, l, ok := parseHTTPRange(tc.input)
+
+		if tc.ok && !ok {
+			t.Errorf("expected %q to parse, but did not", tc.input)
+		}
+		if !tc.ok && ok {
+			t.Errorf("expected %q to fail, but parsed into (%d, %d)",
+				tc.input, o, l)
+		}
+		if o != tc.offset || l != tc.length {
+			t.Errorf("expected %q to parse as (%d, %d), but (%d, %d)",
+				tc.input, tc.offset, tc.length, o, l)
+		}
+	}
+}