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
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
|
#! /usr/bin/env ruby
$LOAD_PATH.unshift("..")
require 'test/unit'
require 'gonzui'
require 'test-util'
include Gonzui
class DBMTest < Test::Unit::TestCase
include TestUtil
def test_dbm_create
config = Config.new
remove_db(config)
dbm = DBM.open(config)
assert(dbm.is_a?(AbstractDBM))
dbm.close
end
def test_dbm_create_with_block
config = Config.new
remove_db(config)
DBM.open(config) {|dbm|
assert(dbm.is_a?(AbstractDBM))
}
end
def _test_consistent_p(dbm)
assert(dbm.consistent?)
end
def _test_content_info(dbm)
dbm.each_package_name {|package_name|
package_id = dbm.get_package_id(package_name)
assert(package_id)
path_ids = dbm.get_path_ids(package_id)
path_ids.each {|path_id|
stat = dbm.get_content_info(path_id)
assert(stat.is_a?(ContentInfo))
content = dbm.get_content(path_id)
assert_equal(stat.size, content.length)
assert(stat.itime >= stat.mtime)
assert((Time.now.to_i - stat.itime) < 600) # within 10 minutes
}
}
end
def _test_each_foo(dbm)
dbm.each_package_name {|package_name|
assert_equal(FOO_PACKAGE, package_name)
}
dbm.each_db_name {|db_name|
assert(db_name.is_a?(String))
assert(dbm.respond_to?(db_name))
}
end
def _test_get_foo(dbm)
make_dist_tree
package_id = dbm.get_package_id(FOO_PACKAGE)
dbm.get_path_ids(package_id).each {|path_id|
path = dbm.get_path(path_id)
assert(FOO_FILES.include?(File.basename(path)))
assert_equal(path_id, dbm.get_path_id(path))
content = dbm.get_content(path_id)
content = File.read(File.join("foo", path))
assert_equal(content, content)
dbm.get_word_ids(path_id).each {|word_id|
FOO_SYMBOLS.include?(dbm.get_word(word_id))
}
assert_equal(0, package_id)
assert_equal(FOO_PACKAGE, dbm.get_package_name(package_id))
}
end
def _test_foo_find(dbm)
found_types = []
[:find_all, :find_all_by_regexp, :find_all_by_prefix].each {|search_method|
FOO_SYMBOLS.each {|word|
tuples = dbm.send(search_method, word)
assert(tuples.is_a?(Array))
assert_equal(false, tuples.empty?)
tuples.each {|info|
type = dbm.get_type(info.type_id)
assert(type.is_a?(Symbol))
found_types.push(type)
assert(info.is_a?(WordInfo))
if search_method == :find_all
assert_equal(word, dbm.get_word(info.word_id))
else
assert(dbm.get_word(info.word_id).index(word))
end
assert(info.byteno.is_a?(Fixnum))
assert(info.lineno.is_a?(Fixnum))
assert(info.type_id.is_a?(Fixnum))
assert(info.path_id.is_a?(Fixnum))
path = dbm.get_path(info.path_id)
assert(FOO_FILES.include?(File.basename(path)))
}
}
[:fundef, :funcall, :fundecl].each {|type|
assert(found_types.include?(type))
}
assert(dbm.send(search_method, "__not_existing_word__").empty?)
}
end
def _test_digest(dbm)
path_id = dbm.get_path_id(File.join(FOO_PACKAGE, "foo.c"))
content = dbm.get_content(path_id)
digest = dbm.get_digest(path_id)
digest.each {|info|
assert(info.is_a?(DigestInfo))
word = content[info.byteno, info.length]
if word
assert_equal(word.length, info.length)
assert_equal(word, content[info.byteno, info.length])
end
}
end
def _test_close(dbm)
begin
dbm.close
dbm.close
assert(false)
rescue DBMError => e
assert(true)
end
begin
dbm.get_npackages
assert(false)
rescue BDB::Fatal => e # closed DB
assert(true)
end
end
def test_bdb
tmp = "test.#{$$}.db"
db = BDB::Btree.open(tmp, nil, BDB::CREATE, 0644,
"set_flags" => BDB::DUPSORT)
db["foo"] = "1"
db["foo"] = "2"
assert_equal(2, db.duplicates("foo").length)
# The assert failed with Ruby BDB 0.5.1 or older due to
# BDB::Btree#duplicates's bug. The bug was fixed in BDB
# 0.5.2.
assert_equal(0, db.duplicates("f").length)
assert_equal(0, db.duplicates("").length)
db.close
File.unlink(tmp)
end
def test_dbm_operations
config = Config.new
remove_db(config)
make_archives
add_package(config)
dbm = DBM.open(config)
_test_content_info(dbm)
_test_each_foo(dbm)
_test_get_foo(dbm)
_test_foo_find(dbm)
_test_digest(dbm)
_test_close(dbm)
remove_db(config)
end
end
|
