diff options
| author | Adam Kocoloski <kocolosk@apache.org> | 2011-10-26 14:41:34 -0400 |
|---|---|---|
| committer | Adam Kocoloski <kocolosk@apache.org> | 2011-10-26 14:43:37 -0400 |
| commit | ce3d813049d7e58a7ea966f1499b3d33b33c0342 (patch) | |
| tree | 80225ba14a9a83e4799967b9141c50cfa79249e3 | |
| parent | c923e87577f2fbe928c965b758167b865a2b1d3e (diff) | |
| download | couchdb-1319-large-headers-are-corrupted.tar.gz | |
Add a test for COUCHDB-13191319-large-headers-are-corrupted
| -rwxr-xr-x | test/etap/011-file-headers.t | 9 |
1 files changed, 8 insertions, 1 deletions
diff --git a/test/etap/011-file-headers.t b/test/etap/011-file-headers.t index 81ffdb2dc..a26b03207 100755 --- a/test/etap/011-file-headers.t +++ b/test/etap/011-file-headers.t @@ -22,7 +22,7 @@ main(_) -> {S1, S2, S3} = now(), random:seed(S1, S2, S3), - etap:plan(17), + etap:plan(18), case (catch test()) of ok -> etap:end_tests(); @@ -68,6 +68,13 @@ test() -> etap:is({ok, Size2}, couch_file:bytes(Fd), "Rewriting the same second header returns the same second size."), + couch_file:write_header(Fd, erlang:make_tuple(5000, <<"CouchDB">>)), + etap:is( + couch_file:read_header(Fd), + {ok, erlang:make_tuple(5000, <<"CouchDB">>)}, + "Headers larger than the block size can be saved (COUCHDB-1319)" + ), + ok = couch_file:close(Fd), % Now for the fun stuff. Try corrupting the second header and see |