-# Copyright (C) 2002 Tom Gilbert.
-#
-# Permission is hereby granted, free of charge, to any person obtaining a copy
-# of this software and associated documentation files (the "Software"), to
-# deal in the Software without restriction, including without limitation the
-# rights to use, copy, modify, merge, publish, distribute, sublicense, and/or
-# sell copies of the Software, and to permit persons to whom the Software is
-# furnished to do so, subject to the following conditions:
-#
-# The above copyright notice and this permission notice shall be included in
-# all copies of the Software and its documentation and acknowledgment shall be
-# given in the documentation and software packages that this Software was
-# used.
-#
-# THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
-# IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
-# FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL
-# THE AUTHORS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER
-# IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN
-# CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE.
-
begin
require 'bdb'
rescue Exception => e
- puts "Got exception: "+e
- puts "rbot couldn't load the bdb module, perhaps you need to install it? try: http://www.ruby-lang.org/en/raa-list.rhtml?name=bdb"
+ error "Got exception: "+e
+ error "rbot couldn't load the bdb module, perhaps you need to install it? try: http://www.ruby-lang.org/en/raa-list.rhtml?name=bdb"
exit 2
end
module BDB
class CIBtree < Btree
def bdb_bt_compare(a, b)
- a.downcase <=> b.downcase
+ if a == nil || b == nil
+ warning "CIBTree: comparing #{a.inspect} (#{self[a].inspect}) with #{b.inspect} (#{self[b].inspect})"
+ end
+ (a||'').downcase <=> (b||'').downcase
end
end
end
# mydata.db, if it exists, it will load and reference that db.
# Otherwise it'll create and empty db called mydata.db
class DBHash
-
+
# absfilename:: use +key+ as an actual filename, don't prepend the bot's
# config path and don't append ".db"
def initialize(bot, key, absfilename=false)
def DBHash.create_db(name)
debug "DBHash: creating empty db #{name}"
return BDB::Hash.open(name, nil,
- BDB::CREATE | BDB::EXCL | BDB::TRUNCATE,
- 0600, "set_pagesize" => 1024,
- "set_cachesize" => [(0), (32 * 1024), (0)])
+ BDB::CREATE | BDB::EXCL, 0600)
end
def DBHash.open_db(name)
debug "DBHash: opening existing db #{name}"
- return BDB::Hash.open(name, nil,
- "r+", 0600, "set_pagesize" => 1024,
- "set_cachesize" => [(0), (32 * 1024), (0)])
+ return BDB::Hash.open(name, nil, "r+", 0600)
end
-
+
end
-
+
# DBTree is a BTree equivalent of DBHash, with case insensitive lookups.
class DBTree
-
+ @@env=nil
+ # TODO: make this customizable
+ # Note that it must be at least four times lg_bsize
+ @@lg_max = 8*1024*1024
# absfilename:: use +key+ as an actual filename, don't prepend the bot's
# config path and don't append ".db"
def initialize(bot, key, absfilename=false)
@bot = bot
@key = key
+ if @@env.nil?
+ begin
+ @@env = BDB::Env.open("#{@bot.botclass}", BDB::INIT_TRANSACTION | BDB::CREATE | BDB::RECOVER, "set_lg_max" => @@lg_max)
+ debug "DBTree: environment opened with max log size #{@@env.conf['lg_max']}"
+ rescue => e
+ debug "DBTree: failed to open environment: #{e}. Retrying ..."
+ @@env = BDB::Env.open("#{@bot.botclass}", BDB::INIT_TRANSACTION | BDB::CREATE | BDB::RECOVER)
+ end
+ #@@env = BDB::Env.open("#{@bot.botclass}", BDB::CREATE | BDB::INIT_MPOOL | BDB::RECOVER)
+ end
+
if absfilename && File.exist?(key)
# db already exists, use it
@db = DBTree.open_db(key)
def DBTree.create_db(name)
debug "DBTree: creating empty db #{name}"
- return BDB::CIBtree.open(name, nil,
- BDB::CREATE | BDB::EXCL | BDB::TRUNCATE,
- 0600, "set_pagesize" => 1024,
- "set_cachesize" => [(0), (32 * 1024), (0)])
+ return @@env.open_db(BDB::CIBtree, name, nil, BDB::CREATE | BDB::EXCL, 0600)
end
def DBTree.open_db(name)
debug "DBTree: opening existing db #{name}"
- return BDB::CIBtree.open(name, nil,
- "r+", 0600, "set_pagesize" => 1024,
- "set_cachesize" => [0, 32 * 1024, 0])
+ return @@env.open_db(BDB::CIBtree, name, nil, "r+", 0600)
end
-
+
+ def DBTree.cleanup_logs()
+ begin
+ debug "DBTree: checkpointing ..."
+ @@env.checkpoint
+ rescue => e
+ debug "Failed: #{e}"
+ end
+ begin
+ debug "DBTree: flushing log ..."
+ @@env.log_flush
+ logs = @@env.log_archive(BDB::ARCH_ABS)
+ debug "DBTree: deleting archivable logs: #{logs.join(', ')}."
+ logs.each { |log|
+ File.delete(log)
+ }
+ rescue => e
+ debug "Failed: #{e}"
+ end
+ end
+
+ def DBTree.stats()
+ begin
+ debug "General stats:"
+ debug @@env.stat
+ debug "Lock stats:"
+ debug @@env.lock_stat
+ debug "Log stats:"
+ debug @@env.log_stat
+ debug "Txn stats:"
+ debug @@env.txn_stat
+ rescue
+ debug "Couldn't dump stats"
+ end
+ end
+
+ def DBTree.cleanup_env()
+ begin
+ debug "DBTree: checking transactions ..."
+ has_active_txn = @@env.txn_stat["st_nactive"] > 0
+ if has_active_txn
+ warning "DBTree: not all transactions completed!"
+ end
+ DBTree.cleanup_logs
+ debug "DBTree: closing environment #{@@env}"
+ path = @@env.home
+ @@env.close
+ @@env = nil
+ if has_active_txn
+ debug "DBTree: keeping file because of incomplete transactions"
+ else
+ debug "DBTree: cleaning up environment in #{path}"
+ BDB::Env.remove("#{path}")
+ end
+ rescue => e
+ error "failed to clean up environment: #{e.inspect}"
+ end
+ end
+
end
end