bp-fnordmetric 1.2.7

data/spec/gauge_spec.rb

@@ -0,0 +1,230 @@
+require ::File.expand_path('../spec_helper.rb', __FILE__)
+
+describe FnordMetric::Gauge do
+
+  before(:all) do    
+    @now = Time.utc(1992,01,13,5,23,23).to_i    
+    @redis = Redis.new
+    @redis_wrap = RedisWrap.new(@redis, false)
+    @gauge_klass = FnordMetric::Gauge
+  end
+
+  before(:each) do
+    @redis.keys("fnordmetric-myns*").each { |k| @redis.del(k) }  
+  end
+
+  it_should_behave_like FnordMetric::GaugeLike
+
+  describe "ticks" do
+
+    it "should return the correct tick if configured" do
+      gauge = FnordMetric::Gauge.new({:tick => 23, :key_prefix => "fnordmetrics-myns", :key => "mygauge"})
+      gauge.tick.should == 23
+    end
+
+    it "should return the correct tick if configured with flush_interval" do
+      gauge = FnordMetric::Gauge.new({:flush_interval => 42, :key_prefix => "fnordmetrics-myns", :key => "mygauge"})
+      gauge.tick.should == 42
+    end
+
+    it "should return the default tick if none configured" do
+      gauge = FnordMetric::Gauge.new({:key_prefix => "fnordmetrics-myns", :key => "mygauge"})
+      gauge.tick.should == FnordMetric.options[:default_flush_interval]
+    end
+
+    it "should return the correct tick_at" do
+      gauge = FnordMetric::Gauge.new({:tick => 10, :key_prefix => "fnordmetrics-myns", :key => "mygauge"})
+      gauge.tick_at(@now).should == 695280200
+      gauge.tick_at(@now+6).should == 695280200
+      gauge.tick_at(@now+8).should == 695280210
+    end
+
+  end
+
+  describe "value retrival" do
+
+    before(:each) do
+      @gauge_key = "fnordmetric-myns-gauge-mygauge_966-10"    
+      @redis.hset(@gauge_key, "695280200", "54")
+      @redis.hset(@gauge_key, "695280210", "123")
+      @gauge = FnordMetric::Gauge.new({
+        :tick => 10, 
+        :key_prefix => "fnordmetric-myns", 
+        :key => "mygauge_966",
+        :redis => @redis
+      })
+    end
+
+    it "should retrieve a gauge value at a given time" do
+      @gauge.value_at(@now).should == "54"
+      @gauge.value_at(@now+6).should == "54"
+      @gauge.value_at(@now+8).should == "123"
+    end
+
+    it "should retrieve a gauge value at the current tick"
+
+    it "should call the value calculation block and return the result" do
+      @gauge.value_at(@now){ |v, t| v.to_i + 123 }.should == 177
+    end
+
+    it "should return the correct value_at per session" do
+      @redis.hset(@gauge_key, "695280200", "76")
+      @redis.set(@gauge_key+"-695280200-sessions-count", "23")
+      _gauge = FnordMetric::Gauge.new({
+        :tick => 10, 
+        :key_prefix => "fnordmetric-myns", 
+        :key => "mygauge_966",
+        :unique => true,
+        :redis => @redis
+      })
+      _gauge.value_at(@now).should == "76"
+    end
+
+    it "should return the correct value_at per session with avg" do
+      @redis.hset(@gauge_key, "695280200", "76")
+      @redis.set(@gauge_key+"-695280200-sessions-count", "23")
+      _gauge = FnordMetric::Gauge.new({
+        :tick => 10, 
+        :key_prefix => "fnordmetric-myns", 
+        :key => "mygauge_966",
+        :unique => true,
+        :average => true,
+        :redis => @redis
+      })
+      _gauge.value_at(@now).should == (76.0/23.0)
+    end
+
+    it "should receive gauge values for multiple ticks" do
+      @gauge.values_at([@now, @now+8]).should == {
+        695280200 => "54",
+        695280210 => "123"
+      }
+    end
+
+    it "should receive gauge values per session for multiple ticks" do  
+      @redis.set(@gauge_key+"-695280200-sessions-count", "23")
+      @redis.set(@gauge_key+"-695280210-sessions-count", "8")
+      @redis.hset(@gauge_key, "695280200", "76")
+      @redis.hset(@gauge_key, "695280210", "56")
+      _gauge = FnordMetric::Gauge.new({
+        :tick => 10, 
+        :key_prefix => "fnordmetric-myns", 
+        :key => "mygauge_966",
+        :unique => true,
+        :redis => @redis
+      })
+      _gauge.values_at([@now, @now+8]).should == {
+        695280200 => "76",
+        695280210 => "56"
+      }
+    end
+
+    it "should receive gauge values per session for multiple ticks with avg" do  
+      @redis.set(@gauge_key+"-695280200-sessions-count", "23")
+      @redis.set(@gauge_key+"-695280210-sessions-count", "8")
+      _gauge = FnordMetric::Gauge.new({
+        :tick => 10, 
+        :key_prefix => "fnordmetric-myns", 
+        :key => "mygauge_966",
+        :unique => true,
+        :average => true,
+        :redis => @redis
+      })
+      _gauge.values_at([@now, @now+8]).should == {
+        695280200 => (54.0/23.0),
+        695280210 => (123.0/8.0)
+      }
+    end
+
+    it "should receive gauge values with custom calculation for multiple ticks" do  
+      @gauge.values_at([@now, @now+8]){ |val, time|
+        val.to_i + 30
+      }.should == {
+        695280200 => 84,
+        695280210 => 153
+      }
+    end
+
+    it "should receive gauge values for all ticks in a given range" do
+      @gauge.values_in(@now+10..@now+18).should == {
+        695280200 => "54",
+        695280210 => "123"
+      }
+    end
+
+  end
+  
+  describe "three-dim value retrival" do
+
+    before(:each) do
+      @gauge = FnordMetric::Gauge.new({
+        :tick => 10, 
+        :key_prefix => "fnordmetric-myns", 
+        :three_dimensional => true,
+        :key => "mygauge_966",
+        :redis => @redis
+      })
+      @redis.keys("fnordmetric-myns*").each { |k| @redis.del(k) }  
+      @gauge_key = "fnordmetric-myns-gauge-mygauge_966-10-1323691200"
+      @redis.zadd(@gauge_key, 18, "fnordyblubb")  
+      @redis.zadd(@gauge_key, 23, "uberfoo")  
+      @redis.set(@gauge_key+"-count", 41)
+    end
+
+    it "should retrieve field_values at a given time" do
+      @gauge.field_values_at(1323691200).should be_a(Array)
+      @gauge.field_values_at(1323691200).length.should == 2
+      @gauge.field_values_at(1323691200)[0].should == ["uberfoo", "23"]
+      @gauge.field_values_at(1323691200)[1].should == ["fnordyblubb", "18"]
+    end
+
+    it "should retrieve the correct total count" do
+      @gauge.field_values_total(1323691200).should == 41
+    end
+
+    it "should retrieve max 50 fields per default" do
+      70.times{ |n| @redis.zadd(@gauge_key, 23, "field#{n}") }
+      @gauge.field_values_at(1323691200).should be_a(Array)
+      @gauge.field_values_at(1323691200).length.should == 50
+    end
+
+    it "should retrieve more than 50 fields if requested" do
+      70.times{ |n| @redis.zadd(@gauge_key, 23, "field#{n}") }
+      @gauge.field_values_at(1323691200, :max_fields => 60).should be_a(Array)
+      @gauge.field_values_at(1323691200, :max_fields => 60).length.should == 60
+    end
+
+    it "should retrieve all fields if requested" do
+      70.times{ |n| @redis.zadd(@gauge_key, 23, "field#{n}") }
+      @gauge.field_values_at(1323691200, :max_fields => 0).should be_a(Array)
+      @gauge.field_values_at(1323691200, :max_fields => 0).length.should == 72
+    end
+
+    it "should call the value calculation block and return the result" do
+      vals = @gauge.field_values_at(1323691200){ |v, t| v.to_i + 123 }
+      vals.should be_a(Array)
+      vals.length.should == 2
+      vals[0].should == ["uberfoo", 146]
+      vals[1].should == ["fnordyblubb", 141]
+    end
+
+    it "should return the correct field_values per session with avg" do
+      @redis.set(@gauge_key+"-sessions-count", "3")
+      @gauge = FnordMetric::Gauge.new({
+        :tick => 10, 
+        :key_prefix => "fnordmetric-myns", 
+        :three_dimensional => true,
+        :unique => true,
+        :average => true,
+        :key => "mygauge_966",
+        :redis => @redis
+      })
+      vals = @gauge.field_values_at(1323691200)
+      vals.should be_a(Array)
+      vals.length.should == 2
+      vals[0].should == ["uberfoo", 23/3.0]
+      vals[1].should == ["fnordyblubb", 18/3.0]
+    end
+
+  end
+end

data/spec/namespace_spec.rb

@@ -0,0 +1,114 @@
+require ::File.expand_path('../spec_helper.rb', __FILE__)
+
+describe FnordMetric::Namespace do
+
+  before(:all) do
+    @redis = Redis.new
+    @redis_wrap = RedisWrap.new(@redis)
+  end
+
+  before(:each) do
+    @redis.keys("fnordmetric-myns*").each { |k| @redis.del(k) }  
+    @namespace = FnordMetric::Namespace.new(:myns_213, :redis_prefix => "fnordmetric")
+  end
+
+  it "should generate the correct redis prefix"
+
+  describe "instance methods" do
+
+    it "should create a new dashboard if a widget is added" do
+      @namespace.widget("MyFooDash", nil)
+      @namespace.dashboards.keys.should == ["MyFooDash"]
+    end
+
+    it "should create a new dashboard if the dashboard-title contains whitespaces" do
+      @namespace.widget("My Dash", nil)
+      @namespace.dashboards.keys.should == ["MyDash"]
+    end
+
+    it "should create a new dashboard if a widget is added and add the widget"
+    it "should add widget to an existing dashboard"
+
+  end
+
+  describe "registering gauges" do
+
+    it "should register a simple gauge" do
+      @namespace.gauge(:fugauge, {:fnord => 23})
+      @namespace.gauges[:fugauge].should be_a(FnordMetric::Gauge) 
+    end
+
+    it "should register a simple gauge and pass options" do
+      @namespace.gauge(:fugauge2, {:fnord => 23})
+      @namespace.gauges[:fugauge2].instance_variable_get(:@opts).should include({:fnord => 23})
+      @namespace.gauges[:fugauge2].instance_variable_get(:@opts).should include({:key => :fugauge2})
+    end
+
+    it "should register a multi gauge" do
+      pending "fixme"
+      @namespace.numeric_gauge(:multigauge, {:fnord => 23, :ticks => [1.hour], :series => ["fnord"]})
+      @namespace.gauges[:multigauge].should be_a(FnordMetric::NumericGauge) 
+    end
+
+    it "should register a multi gauge and pass options" do
+      pending "fixme"
+      @namespace.numeric_gauge(:multigauge2, {:fnord => 42, :ticks => [1.hour], :series => ["fnord"]})
+      @namespace.gauges[:multigauge2].instance_variable_get(:@opts).should include({:fnord => 42})
+      @namespace.gauges[:multigauge2].instance_variable_get(:@opts).should include({:key => :multigauge2})
+    end
+
+  end
+
+  describe "registering event handlers" do
+
+    it "should register an event handler" do
+      @namespace.handlers.length.should == 0
+      @namespace.event(:foobar){}
+      @namespace.event(:fnordbar){}
+      @namespace.handlers["foobar"].length.should == 1
+      @namespace.handlers["fnordbar"].length.should == 1
+      @namespace.handlers.length.should == 2
+    end
+
+    it "should register an event handler and create a context"
+    it "should register an event handler and pass options"
+    it "should register an event handler and pass gauges"
+    it "should announce an event to the correct handler"
+    it "should announce an event to multiple handlers"
+    it "should announce an event to the wildcard handler"
+  end
+
+  it "should create a new session on announce if _session is set" do
+    FnordMetric::Session.should_receive(:create).and_return(SessionMock.new)
+    FnordMetric::Namespace.new(
+      :myns_213, 
+      :redis_prefix => "fnordmetric"
+    ).ready!(@redis_wrap, @redis).announce(
+      :_time => Time.now.to_i,
+      :_type => "foobar", 
+      :_session => "sess213"
+    )
+  end
+
+  it "should add the event to the namespace-event-type-list" do
+    FnordMetric::Namespace.new(
+      :myns_215, 
+      :redis_prefix => "fnordmetric"
+    ).ready!(@redis_wrap, @redis).announce(
+      :_eid => "35r2423",
+      :_time => Time.now.to_i,
+      :_type => "fnordbar",
+      :_session => "sess213"
+    )
+    event_ids = @redis.lrange("fnordmetric-myns_215-type-fnordbar", 0, -1)
+    event_ids.length.should == 1
+    event_ids.first.should == "35r2423"
+  end
+
+  class SessionMock
+    def session_key
+      "asdasd"
+    end
+  end
+
+end

data/spec/session_spec.rb

@@ -0,0 +1,231 @@
+require ::File.expand_path('../spec_helper.rb', __FILE__)
+
+describe FnordMetric::Session do
+
+  include FnordMetric
+
+  before(:all) do
+    @now = Time.utc(1992,01,13,5,23,23).to_i   
+    @redis = Redis.new
+    @redis_wrap = RedisWrap.new(@redis)
+
+    @namespace = "fnordmetric-ns123" 
+    @sessions = "#{@namespace}-session"
+  end
+
+  describe "creating sessions" do
+
+    before(:all) do
+      @event = { :_session => "sess123", :_time => @now, :_eid => "34089749" }
+      @md5_key = Digest::MD5.hexdigest("sess123")          
+
+      @redis.del("#{@namespace}-session")           
+      @redis.del("#{@namespace}-session-#{@md5_key}-events")
+      @redis.del("#{@namespace}-session-#{@md5_key}-data")
+    end
+
+    it "should add a new session on intialize" do        
+      FnordMetric::Session.create(
+        :namespace_prefix => @namespace,
+        :event => @event, 
+        :session_data_ttl => 10,
+        :redis => @redis_wrap        
+      )
+      @redis.zcard(@sessions).should == 1
+    end
+
+    it "should add a new session on intialize and hash the session token" do               
+      FnordMetric::Session.create(
+        :namespace_prefix => @namespace,
+        :event => @event, 
+        :session_data_ttl => 10,
+        :redis => @redis_wrap
+      )    
+      @redis.zrange(@sessions, 0, -1).should == [ @md5_key]
+    end
+
+    it "should add a new session on intialize and set the timestamp as score" do               
+      FnordMetric::Session.create(
+        :namespace_prefix => @namespace,
+        :event => @event, 
+        :session_data_ttl => 10,
+        :redis => @redis_wrap
+      )    
+      @redis.zscore(@sessions, @md5_key).to_i.should == @now
+    end
+
+    it "should update the timestamp on a existing session" do     
+      @redis.zadd(@sessions, @now-10, @md5_key)
+      @redis.zscore(@sessions, @md5_key).to_i.should == @now-10
+      FnordMetric::Session.create(
+        :namespace_prefix => @namespace,
+        :event => @event, 
+        :session_data_ttl => 10,
+        :redis => @redis_wrap
+      )    
+      @redis.zscore(@sessions, @md5_key).to_i.should == @now
+    end
+
+    it "should add the event_id to the session-event set on a new session" do               
+      FnordMetric::Session.create(
+        :namespace_prefix => @namespace,
+        :event => @event, 
+        :session_data_ttl => 10,
+        :redis => @redis_wrap
+      )    
+      events_key = "#{@namespace}-session-#{@md5_key}-events"
+      @redis.zrange(events_key, 0, -1).first.should == @event[:_eid]
+    end
+
+    it "should store a name in the session data" do   
+      event_data = @event.merge(
+        :_type => "_set_name", 
+        :name => "Horst Mayer"
+      )            
+      FnordMetric::Session.create(
+        :namespace_prefix => @namespace,
+        :event => event_data,
+        :session_data_ttl => 10,
+        :redis => @redis_wrap
+      )    
+      data_key = "#{@namespace}-session-#{@md5_key}-data"
+      @redis.hget(data_key, "_name").should == "Horst Mayer"
+    end
+
+    it "should store a picture in the session data" do               
+      event_data = @event.merge(
+        :_type => "_set_picture", 
+        :url => "http://myhost/mypic.jpg"
+      )
+      FnordMetric::Session.create(
+        :namespace_prefix => @namespace,
+        :event => event_data,
+        :session_data_ttl => 10,
+        :redis => @redis_wrap
+      )    
+      data_key = "#{@namespace}-session-#{@md5_key}-data"
+      @redis.hget(data_key, "_picture").should == "http://myhost/mypic.jpg"
+    end
+
+    it "should store arbitrary data in the session data" do               
+      event_data = @event.merge(
+        :_type => "_set_data", 
+        :fnord => "blubb", 
+        :foobar => "123"
+      )
+      FnordMetric::Session.create(
+        :namespace_prefix => @namespace,
+        :event => event_data,
+        :session_data_ttl => 10,
+        :redis => @redis_wrap
+      )    
+      data_key = "#{@namespace}-session-#{@md5_key}-data"
+      @redis.hget(data_key, "fnord").should == "blubb"
+      @redis.hget(data_key, "foobar").should == "123"
+    end
+
+    it "not store special attributes in the session" do               
+      event_data = @event.merge(
+        :_type => "_set_data", 
+        :fnord => "blubb", 
+        :foobar => "123"
+      )
+      FnordMetric::Session.create(
+        :namespace_prefix => @namespace,
+        :event => event_data,
+        :session_data_ttl => 10,
+        :redis => @redis_wrap
+      )    
+      data_key = "#{@namespace}-session-#{@md5_key}-data"
+      @redis.hget(data_key, "_time").should be_nil
+      @redis.hget(data_key, "_eid").should be_nil
+    end
+
+  end
+
+  describe "Finding Sessions" do
+
+    before(:each) do      
+      @redis.del("#{@namespace}-session")           
+      @redis.keys("#{@namespace}-session-*").each { |k| @redis.del(k) }     
+
+      @opts = {         
+        :redis_prefix => "#{@namespace}-session",
+        :namespace_prefix => "#{@namespace}",
+        :redis => @redis
+      }  
+    end
+
+    it "should find all sessions" do
+      create_session("sess533", @now, {})
+      create_session("sess343", @now, {})
+      FnordMetric::Session.all(@opts).length.should == 2
+    end
+
+    it "should find all sessions and return session objects" do
+      create_session("sess523", @now, {})
+      FnordMetric::Session.all(@opts).first.should be_a(FnordMetric::Session)
+    end
+
+    it "should find a session and return a session object" do
+      create_session("sess223", @now, {})
+      sess = FnordMetric::Session.find(Digest::MD5.hexdigest("sess223"), @opts)
+      sess.should be_a(FnordMetric::Session)
+      sess.session_key.should == Digest::MD5.hexdigest("sess223")
+    end
+
+    it "should find a sessions and return a session object with data" do
+      create_session("sess123", @now, { :fnord => "blubb" })
+      sess = FnordMetric::Session.find(Digest::MD5.hexdigest("sess123"), @opts)  
+      sess.fetch_data!    
+      sess.data(:fnord).should == "blubb"
+    end
+
+    it "should not include special attributes in data" do
+      event_data = { :_name => "Horst Mayer", :_picture => "http://myhost/mypic.jpg" }
+      create_session("sess173", @now, event_data)
+      sess = FnordMetric::Session.find(Digest::MD5.hexdigest("sess173"), @opts)      
+      sess.fetch_data!
+      sess.data(:_name).should == nil
+      sess.data(:_picture).should == nil
+    end
+
+    it "should find a session and return a session object with picture" do
+      event_data = { :_name => "Horst Mayer", :_picture => "http://myhost/mypic.jpg" }
+      create_session("sess163", @now, event_data)
+      sess = FnordMetric::Session.find(Digest::MD5.hexdigest("sess163"), @opts)      
+      sess.fetch_data!
+      sess.picture.should == "http://myhost/mypic.jpg"
+    end
+
+    it "should find a session and return a session object with name" do
+      event_data = { :_name => "Horst Mayer", :_picture => "http://myhost/mypic.jpg" }
+      create_session("sess143", @now, event_data)
+      sess = FnordMetric::Session.find(Digest::MD5.hexdigest("sess143"), @opts)      
+      sess.fetch_data!
+      sess.name.should == "Horst Mayer"
+    end
+
+    it "should find a session and return a session object with event_ids" do
+      sesshash = create_session("sess923", @now, {})
+      @redis_wrap.zadd("#{@namespace}-session-#{sesshash}-events", @now, "shmoo")       
+      @redis_wrap.zadd("#{@namespace}-session-#{sesshash}-events", @now, "fnord")
+      sess = FnordMetric::Session.find(sesshash, @opts)
+      sess.fetch_event_ids!
+      sess.event_ids.should include("shmoo")
+      sess.event_ids.should include("fnord")
+    end
+
+    def create_session(sesskey, sesstime, sessdata)        
+      Digest::MD5.hexdigest(sesskey).tap do |sesshash|
+        @redis_wrap.zadd("#{@namespace}-session", sesstime, sesshash)        
+        sessdata.each do |k,v|
+          @redis_wrap.hset("#{@namespace}-session-#{sesshash}-data", k, v)        
+        end
+      end
+    end
+
+  end
+
+
+end