1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
|
% 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.
-module(fabric2_dir_prefix_tests).
-include_lib("couch/include/couch_eunit.hrl").
-include_lib("eunit/include/eunit.hrl").
-define(TDEF(A), {atom_to_list(A), fun A/0}).
dir_prefix_test_() ->
{
"Test couchdb fdb directory prefix",
foreach,
fun() ->
% erlfdb, rexi and mem3 are all dependent apps for fabric. We make
% sure to start them so when fabric is started during the test it
% already has its dependencies
test_util:start_couch([erlfdb, rexi, mem3])
end,
fun(Ctx) ->
config:delete("fabric", "fdb_directory"),
ok = application:stop(fabric),
test_util:stop_couch(Ctx)
end,
[
?TDEF(default_prefix),
?TDEF(custom_prefix)
]
}.
default_prefix() ->
ok = application:start(fabric),
?assertEqual([<<"couchdb">>], fabric2_server:fdb_directory()),
% Try again to test pdict caching code
?assertEqual([<<"couchdb">>], fabric2_server:fdb_directory()),
% Check that we can create dbs
DbName = ?tempdb(),
?assertMatch({ok, _}, fabric2_db:create(DbName, [])).
custom_prefix() ->
ok = config:set("fabric", "fdb_directory", "couchdb_foo"),
ok = application:start(fabric),
?assertEqual([<<"couchdb_foo">>], fabric2_server:fdb_directory()),
% Try again to test pdict caching code
?assertEqual([<<"couchdb_foo">>], fabric2_server:fdb_directory()),
% Check that we can create dbs
DbName = ?tempdb(),
?assertMatch({ok, _}, fabric2_db:create(DbName, [])).
|