deac/syslog2logan
1
0
Fork 0
Code Issues Pull requests Releases Wiki Activity

Uses new SBDB-API

Browse source
This commit is contained in:
Denis Knauf 2010-02-26 14:08:03 +01:00
parent 36aecb7197
commit 1989ade585
1 changed files with 5 additions and 4 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

9
bin/s2l.rb
View file

@ -74,14 +74,15 @@ class Rotate
@rdb[ h] = n.raw @rdb[ h] = n.raw
info :create => n.to_s info :create => n.to_s
end end
n
end end
def db n def db n
@env[ n.to_s, nil, SBDB::Btree, SBDB::CREATE | SBDB::AUTO_COMMIT] @env[ n.to_s, :type => SBDB::Btree, :flags => SBDB::CREATE | SBDB::AUTO_COMMIT]
end end
def queue n def queue n
@env[ "#{n}.newids", nil, SBDB::Queue, SBDB::CREATE | SBDB::AUTO_COMMIT] @env[ "newids.queue", :type => SBDB::Queue, :flags => SBDB::CREATE | SBDB::AUTO_COMMIT, :re_len => 16]
end end
def sync def sync
@ -129,7 +130,7 @@ end
$conf = { $conf = {
:home => 'logs', :home => 'logs',
:server => [ '', 1514], :server => [ '', 1514],
:retries => [10, 10] :retries => [1,1] # [10, 10]
} }
info :create => {:home => $conf[:home]} info :create => {:home => $conf[:home]}
@ -138,7 +139,7 @@ Dir.mkdir $conf[:home] rescue Errno::EEXIST
info :open => SBDB::Env info :open => SBDB::Env
SBDB::Env.new( $conf[:home], SBDB::CREATE | SBDB::Env::INIT_TRANSACTION | Bdb::DB_AUTO_COMMIT) do |dbenv| SBDB::Env.new( $conf[:home], SBDB::CREATE | SBDB::Env::INIT_TRANSACTION | Bdb::DB_AUTO_COMMIT) do |dbenv|
info :open => Rotate info :open => Rotate
dbs = Rotate.new dbenv[ 'rotates.db', nil, SBDB::Btree, SBDB::CREATE | Bdb::DB_AUTO_COMMIT] dbs = Rotate.new dbenv[ 'rotates.db', :type => SBDB::Btree, :flags => SBDB::CREATE | Bdb::DB_AUTO_COMMIT]
info :open => S2L info :open => S2L
serv = S2L.new :sock => TCPServer.new( *$conf[:server]), :dbs => dbs serv = S2L.new :sock => TCPServer.new( *$conf[:server]), :dbs => dbs
retries = Retries.new *$conf[:retries] retries = Retries.new *$conf[:retries]