diff options
Diffstat (limited to 'src/couch/test/couchdb_file_compression_tests.erl')
-rw-r--r-- | src/couch/test/couchdb_file_compression_tests.erl | 14 |
1 files changed, 13 insertions, 1 deletions
diff --git a/src/couch/test/couchdb_file_compression_tests.erl b/src/couch/test/couchdb_file_compression_tests.erl index 41d055624..935638614 100644 --- a/src/couch/test/couchdb_file_compression_tests.erl +++ b/src/couch/test/couchdb_file_compression_tests.erl @@ -125,6 +125,7 @@ compare_compression_methods(DbName) -> DbSizeNone = db_disk_size(DbName), ViewSizeNone = view_disk_size(DbName), ExternalSizeNone = db_external_size(DbName), + ViewExternalSizeNone = view_external_size(DbName), config:set("couchdb", "file_compression", "snappy", false), compact_db(DbName), @@ -132,6 +133,7 @@ compare_compression_methods(DbName) -> DbSizeSnappy = db_disk_size(DbName), ViewSizeSnappy = view_disk_size(DbName), ExternalSizeSnappy = db_external_size(DbName), + ViewExternalSizeSnappy = view_external_size(DbName), ?assert(DbSizeNone > DbSizeSnappy), ?assert(ViewSizeNone > ViewSizeSnappy), @@ -151,12 +153,15 @@ compare_compression_methods(DbName) -> DbSizeDeflate9 = db_disk_size(DbName), ViewSizeDeflate9 = view_disk_size(DbName), ExternalSizeDeflate9 = db_external_size(DbName), + ViewExternalSizeDeflate9 = view_external_size(DbName), ?assert(DbSizeDeflate1 > DbSizeDeflate9), ?assert(ViewSizeDeflate1 > ViewSizeDeflate9), ?assert(ExternalSizePreCompact =:= ExternalSizeNone), ?assert(ExternalSizeNone =:= ExternalSizeSnappy), - ?assert(ExternalSizeNone =:= ExternalSizeDeflate9). + ?assert(ExternalSizeNone =:= ExternalSizeDeflate9), + ?assert(ViewExternalSizeNone =:= ViewExternalSizeSnappy), + ?assert(ViewExternalSizeNone =:= ViewExternalSizeDeflate9). populate_db(_Db, NumDocs) when NumDocs =< 0 -> @@ -214,6 +219,13 @@ view_disk_size(DbName) -> ok = couch_db:close(Db), active_size(Info). +view_external_size(DbName) -> + {ok, Db} = couch_db:open_int(DbName, []), + {ok, DDoc} = couch_db:open_doc(Db, ?DDOC_ID, [ejson_body]), + {ok, Info} = couch_mrview:get_info(Db, DDoc), + ok = couch_db:close(Db), + external_size(Info). + active_size(Info) -> couch_util:get_nested_json_value({Info}, [sizes, active]). |