sbsm 1.3.4 → 1.3.5

data/lib/sbsm/drb.rb

@@ -1,22 +0,0 @@
-#!/usr/bin/env ruby
-# encoding: utf-8
-#--
-# DRb::DRbObject -- fix bug respond_to argument -- 22.08.2011 -- mhatakeyama@ywesee.com
-# DRb::DRbObject -- fix bug in ruby -- 23.09.2005 -- hwyss@ywesee.com
-#++
-require 'drb'
-
-module DRb
-	class DRbObject
-		def respond_to?(msg_id, *args)
-			case msg_id
-			when :_dump
-				true
-			when :marshal_dump
-				false
-			else
-				method_missing(:respond_to?, msg_id)
-			end
-		end
-	end
-end

data/lib/sbsm/drbserver.rb

@@ -1,167 +0,0 @@
-#!/usr/bin/env ruby
-# encoding: utf-8
-#--
-#
-# State Based Session Management
-# Copyright (C) 2004 Hannes Wyss
-#
-# This library is free software; you can redistribute it and/or
-# modify it under the terms of the GNU Lesser General Public
-# License as published by the Free Software Foundation; either
-# version 2.1 of the License, or (at your option) any later version.
-#
-# This library is distributed in the hope that it will be useful,
-# but WITHOUT ANY WARRANTY; without even the implied warranty of
-# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
-# Lesser General Public License for more details.
-#
-# You should have received a copy of the GNU Lesser General Public
-# License along with this library; if not, write to the Free Software
-# Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
-#
-# ywesee - intellectual capital connected, Winterthurerstrasse 52, CH-8006 Zürich, Switzerland
-# hwyss@ywesee.com
-#
-# DrbServer -- sbsm -- hwyss@ywesee.com
-#++
-
-require 'delegate'
-require 'sbsm/drb'
-require 'sbsm/session'
-require 'sbsm/user'
-require 'thread'
-require 'digest/md5'
-require 'sbsm/logger'
-require 'sbsm/validator'
-
-module SBSM
-	class DRbServer < SimpleDelegator
-		include DRbUndumped
-		CLEANING_INTERVAL = 30
-		CAP_MAX_THRESHOLD = 120
-		ENABLE_ADMIN = false
-		MAX_SESSIONS = 100
-		RUN_CLEANER = true
-		SESSION = Session
-		UNKNOWN_USER = UnknownUser
-		VALIDATOR = nil
-		attr_reader :cleaner, :updater
-		def initialize(persistence_layer=nil)
-			@sessions = {}
-			@mutex = Mutex.new
-			@cleaner = run_cleaner if(self.class.const_get(:RUN_CLEANER))
-			@admin_threads = ThreadGroup.new
-			@async = ThreadGroup.new
-			@system = persistence_layer
-			super(persistence_layer)
-		end
-		def _admin(src, result, priority=0)
-			raise "admin interface disabled" unless(self::class::ENABLE_ADMIN)
-			t = Thread.new {
-				Thread.current.abort_on_exception = false
-				result << begin
-					response = begin
-						instance_eval(src)
-					rescue NameError => e
-						e
-					end
-					str = response.to_s
-					if(str.length > 200)
-						response.class
-					else
-						str
-					end
-				rescue StandardError => e
-					e.message
-				end.to_s
-			}
-			t[:source] = src
-			t.priority = priority
-			@admin_threads.add(t)
-			t
-		end
-		def async(&block)
-			@async.add(Thread.new(&block))
-		end
-		def cap_max_sessions(now = Time.now)
-			if(@sessions.size > self::class::CAP_MAX_THRESHOLD)
-				SBSM.info "too many sessions! Keeping only #{self::class::MAX_SESSIONS}"
-        sess = nil
-				sorted = @sessions.values.sort
-				sorted[0...(-self::class::MAX_SESSIONS)].each { |sess|
-					sess.__checkout
-					@sessions.delete(sess.key)
-				}
-        if(sess)
-          age = sess.age(now)
-          SBSM.info sprintf("deleted all sessions that had not been accessed for more than %im %is", age / 60, age % 60)
-        end
-			end
-		end
-		def clean
-      now = Time.now
-			@sessions.delete_if { |key, s| 
-        begin
-          if s.respond_to?(:expired?)
-            if s.expired?(now)
-              s.__checkout
-              true
-            else
-              s.cap_max_states
-              false
-            end
-          else
-            true
-          end
-        rescue
-          true
-        end
-			}
-			#cap_max_sessions(now)
-		end
-		def clear
-			@sessions.each_value { |sess| sess.__checkout }
-			@sessions.clear
-		end
-		def delete_session(key)
-			if(sess = @sessions.delete(key))
-				sess.__checkout
-			end
-		end
-		def reset
-			@mutex.synchronize {
-				@sessions.clear
-			}
-		end
-		def run_cleaner
-			# puts "running cleaner thread"
-			Thread.new {
-				Thread.current.abort_on_exception = true
-				#Thread.current.priority = 1
-				loop {
-					sleep self::class::CLEANING_INTERVAL
-					@mutex.synchronize {
-						clean()
-					}
-				}
-			}
-		end
-		def unknown_user
-			self::class::UNKNOWN_USER.new
-		end
-    def [](key)
-      @mutex.synchronize {
-        unless((s = @sessions[key]) && !s.expired?)
-          args = [key, self]
-          if(klass = self::class::VALIDATOR)
-            args.push(klass.new)
-          end
-          s = @sessions[key] = self::class::SESSION.new(*args.compact)
-        end
-        s.reset()
-        s.touch()
-        s
-      }
-    end
-	end
-end

data/test/test_drbserver.rb

@@ -1,84 +0,0 @@
-#!/usr/bin/env ruby
-# encoding: utf-8
-#
-# State Based Session Management
-# Copyright (C) 2004 Hannes Wyss
-#
-# This library is free software; you can redistribute it and/or
-# modify it under the terms of the GNU Lesser General Public
-# License as published by the Free Software Foundation; either
-# version 2.1 of the License, or (at your option) any later version.
-#
-# This library is distributed in the hope that it will be useful,
-# but WITHOUT ANY WARRANTY; without even the implied warranty of
-# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
-# Lesser General Public License for more details.
-#
-# You should have received a copy of the GNU Lesser General Public
-# License along with this library; if not, write to the Free Software
-# Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
-#
-# ywesee - intellectual capital connected, Winterthurerstrasse 52, CH-8006 Zürich, Switzerland
-# hwyss@ywesee.com
-#
-# TestDRbServer -- ODDB -- 27.11.2003 -- hwyss@ywesee.com
-
-
-$: << File.dirname(__FILE__)
-$: << File.expand_path('../lib', File.dirname(__FILE__))
-
-require 'minitest/autorun'
-require 'sbsm/drbserver'
-
-class TestDRbServer < Minitest::Test
-	class DRbServer < ::SBSM::DRbServer
-		attr_reader :sessions
-		CAP_MAX_THRESHOLD = 3
-		MAX_SESSIONS = 3
-	end
-	def setup
-		@server = DRbServer.new
-	end
-	def test_session
-		ses1 = @server['test1']
-		assert_instance_of(SBSM::Session, ses1)
-		assert_equal({'test1'=>ses1}, @server.sessions)
-		ses2 = @server['test2']
-		assert_instance_of(SBSM::Session, ses2)
-		refute_equal(ses1, ses2)
-		expected = {
-			'test1'	=>	ses1,
-			'test2'	=>	ses2,
-		}
-		assert_equal(expected, @server.sessions)
-		ses3 = @server['test3']
-		assert_instance_of(SBSM::Session, ses3)
-		refute_equal(ses1, ses3)
-		refute_equal(ses2, ses3)
-		expected = {
-			'test1'	=>	ses1,
-			'test2'	=>	ses2,
-			'test3'	=>	ses3,
-		}
-		assert_equal(expected, @server.sessions)
-		ses4 = @server['test4']
-		assert_instance_of(SBSM::Session, ses4)
-		refute_equal(ses1, ses4)
-		refute_equal(ses2, ses4)
-		expected = {
-			'test2'	=>	ses2,
-			'test3'	=>	ses3,
-			'test4'	=>	ses4,
-		}
-		@server.cap_max_sessions
-		assert_equal(expected, @server.sessions)
-		ses2.touch
-		ses5 = @server['test5']
-		assert_instance_of(SBSM::Session, ses5)
-		expected = {
-			'test2'	=>	ses2,
-			'test4'	=>	ses4,
-			'test5'	=>	ses5,
-		}
-	end
-end