openwferu 0.9.16 → 0.9.17

data/lib/openwfe/util/lru.rb

@@ -1,171 +0,0 @@
-#
-#--
-# Copyright (c) 2007, John Mettraux, OpenWFE.org
-# All rights reserved.
-# 
-# Redistribution and use in source and binary forms, with or without 
-# modification, are permitted provided that the following conditions are met:
-# 
-# . Redistributions of source code must retain the above copyright notice, this
-#   list of conditions and the following disclaimer.  
-# 
-# . Redistributions in binary form must reproduce the above copyright notice, 
-#   this list of conditions and the following disclaimer in the documentation 
-#   and/or other materials provided with the distribution.
-# 
-# . Neither the name of the "OpenWFE" nor the names of its contributors may be
-#   used to endorse or promote products derived from this software without
-#   specific prior written permission.
-# 
-# THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS" 
-# AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE 
-# IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE 
-# ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT OWNER OR CONTRIBUTORS BE 
-# LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR 
-# CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF 
-# SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS 
-# INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN 
-# CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) 
-# ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE 
-# POSSIBILITY OF SUCH DAMAGE.
-#++
-#
-
-#
-# "made in Japan"
-#
-# John Mettraux at openwfe.org
-#
-
-#require 'monitor'
-
-
-module OpenWFE
-
-    #
-    # A Hash that has a max size. After the maxsize has been reached, the
-    # least recently used entries (LRU hence), will be discared to make
-    # room for the new entries.
-    #
-    class LruHash
-        #include MonitorMixin
-            #
-            # seems not necessary for now, and it collides with expool's
-            # @monitors own sync
-
-        def initialize (maxsize)
-
-            super()
-
-            @maxsize = maxsize
-
-            @hash = {}
-            @lru_keys = []
-        end
-
-        def maxsize= (newsize)
-
-            remove_lru() while @hash.size > newsize
-            @maxsize = newsize
-        end
-
-        def maxsize
-
-            @maxsize
-        end
-
-        def size
-            @lru_keys.size
-        end
-        alias :length :size
-
-        def keys
-
-            @hash.keys
-        end
-
-        def values
-
-            @hash.values
-        end
-
-        def clear
-
-            @hash.clear
-            @lru_keys.clear
-        end
-
-        def each (&block)
-
-            return unless block
-
-            @hash.each do |k, v|
-                block.call(k, v)
-            end
-        end
-
-        #
-        # Returns the keys with the lru in front.
-        #
-        def ordered_keys
-
-            @lru_keys
-        end
-
-        def [] (key)
-
-            value = @hash[key]
-            return nil unless value
-            touch(key)
-
-            value
-        end
-
-        def []= (key, value)
-
-            remove_lru() while @hash.size >= @maxsize
-            @hash[key] = value
-            touch(key)
-
-            value
-        end
-
-        def delete (key)
-
-            value = @hash.delete(key)
-            @lru_keys.delete(key)
-
-            value
-        end
-
-        def include? (key)
-
-            @hash.include?(key)
-        end
-
-        protected
-
-            #
-            # Puts the key on top of the lru 'stack'.
-            # The bottom being the lru place.
-            #
-            def touch (key)
-
-                @lru_keys.delete(key)
-                @lru_keys << key
-            end
-
-            #
-            # Removes the lru value and returns it.
-            # Returns nil if the cache is currently empty.
-            #
-            def remove_lru ()
-
-                return nil if @lru_keys.size < 1
-                key = @lru_keys.delete_at(0)
-
-                @hash.delete(key)
-            end
-    end
-end
-

data/lib/openwfe/util/otime.rb

@@ -1,246 +0,0 @@
-#
-#--
-# Copyright (c) 2005-2007, John Mettraux, OpenWFE.org
-# All rights reserved.
-# 
-# Redistribution and use in source and binary forms, with or without 
-# modification, are permitted provided that the following conditions are met:
-# 
-# . Redistributions of source code must retain the above copyright notice, this
-#   list of conditions and the following disclaimer.  
-# 
-# . Redistributions in binary form must reproduce the above copyright notice, 
-#   this list of conditions and the following disclaimer in the documentation 
-#   and/or other materials provided with the distribution.
-# 
-# . Neither the name of the "OpenWFE" nor the names of its contributors may be
-#   used to endorse or promote products derived from this software without
-#   specific prior written permission.
-# 
-# THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS" 
-# AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE 
-# IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE 
-# ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT OWNER OR CONTRIBUTORS BE 
-# LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR 
-# CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF 
-# SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS 
-# INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN 
-# CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) 
-# ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE 
-# POSSIBILITY OF SUCH DAMAGE.
-#++
-#
-
-#
-# "hecho en Costa Rica"
-#
-# john.mettraux@openwfe.org
-#
-
-require 'date'
-#require 'parsedate'
-
-
-module OpenWFE
-
-    #TIME_FORMAT = "%Y-%m-%d %H:%M:%S"
-
-    #
-    # Returns the current time as an ISO date string
-    #
-    def OpenWFE.now ()
-
-        to_iso8601_date(Time.new())
-    end
-
-    #
-    # As the name implies.
-    #
-    def OpenWFE.to_iso8601_date (date)
-
-        if date.kind_of? Float 
-            date = to_datetime(Time.at(date))
-        elsif date.kind_of? Time
-            date = to_datetime(date)
-        elsif not date.kind_of? Date
-            date = DateTime.parse(date)
-        end
-
-        s = date.to_s # this is costly
-        s[10] = " "
-
-        s
-    end
-
-    #
-    # the old method we used to generate our ISO datetime strings
-    #
-    def OpenWFE.time_to_iso8601_date (time)
-
-        s = time.getutc().strftime(TIME_FORMAT)
-        o = time.utc_offset / 3600
-        o = o.to_s + "00"
-        o = "0" + o if o.length < 4
-        o = "+" + o unless o[0..1] == '-'
-
-        s + " " + o.to_s
-    end
-
-    #
-    # Returns a Ruby time
-    #
-    def OpenWFE.to_ruby_time (iso_date)
-
-        DateTime.parse(iso_date)
-    end
-
-    #def OpenWFE.parse_date (date)
-    #end
-
-    #
-    # equivalent to java.lang.System.currentTimeMillis()
-    #
-    def OpenWFE.current_time_millis ()
-
-        t = Time.new()
-        t = t.to_f * 1000
-        t.to_i
-    end
-
-    #
-    # turns a string like '1m10s' into a float like '70.0'
-    #
-    # w -> week
-    # d -> day
-    # h -> hour
-    # m -> minute
-    # s -> second
-    # M -> month
-    # y -> year
-    # 'nada' -> millisecond
-    #
-    def OpenWFE.parse_time_string (string)
-
-        string = string.strip
-
-        index = -1
-        result = 0.0
-
-        number = ""
-
-        while true
-            index = index + 1
-
-            if index >= string.length
-                if number.length > 0
-                    result = result + (Float(number) / 1000.0)
-                end
-                break
-            end
-
-            c = string[index, 1]
-
-            if is_digit?(c)
-                number = number + c
-                next
-            end
-
-            value = Integer(number)
-            number = ""
-
-            multiplier = DURATIONS[c]
-
-            raise "unknown time char '#{c}'" \
-                if not multiplier
-
-            result = result + (value * multiplier)
-        end
-
-        result
-    end
-
-    #
-    # returns true if the character c is a digit
-    #
-    def OpenWFE.is_digit? (c)
-        return false if not c.kind_of?(String)
-        return false if c.length > 1
-        (c >= "0" and c <= "9")
-    end
-
-    #
-    # conversion methods between Date[Time] and Time
-
-    #
-    # Ruby Cookbook 1st edition p.111
-    # http://www.oreilly.com/catalog/rubyckbk/
-    # a must
-    #
-
-    #
-    # converts a Time instance to a DateTime one
-    #
-    def OpenWFE.to_datetime (time)
-
-        s = time.sec + Rational(time.usec, 10**6)
-        o = Rational(time.utc_offset, 3600 * 24)
-
-        begin
-
-            DateTime.new(
-                time.year, 
-                time.month, 
-                time.day, 
-                time.hour, 
-                time.min, 
-                s, 
-                o)
-
-        rescue Exception => e
-
-            #puts
-            #puts OpenWFE::exception_to_s(e)
-            #puts
-            #puts \
-            #    "\n Date.new() problem. Params :"+
-            #    "\n....y:#{time.year} M:#{time.month} d:#{time.day} "+
-            #    "h:#{time.hour} m:#{time.min} s:#{s} o:#{o}"
-
-            DateTime.new(
-                time.year, 
-                time.month, 
-                time.day, 
-                time.hour, 
-                time.min, 
-                time.sec, 
-                time.utc_offset)
-        end
-    end
-
-    def OpenWFE.to_gm_time (dtime)
-        to_ttime(dtime.new_offset, :gm)
-    end
-
-    def OpenWFE.to_local_time (dtime)
-        to_ttime(dtime.new_offset(DateTime.now.offset-offset), :local)
-    end
-
-    def OpenWFE.to_ttime (d, method)
-        usec = (d.sec_fraction * 3600 * 24 * (10**6)).to_i
-        Time.send(method, d.year, d.month, d.day, d.hour, d.min, d.sec, usec)
-    end
-
-    protected
-
-        DURATIONS = {
-            "y" => 365 * 24 * 3600,
-            "M" => 30 * 24 * 3600,
-            "w" => 7 * 24 * 3600,
-            "d" => 24 * 3600,
-            "h" => 3600,
-            "m" => 60,
-            "s" => 1
-        }
-
-end
-

data/lib/openwfe/util/safe.rb

@@ -1,160 +0,0 @@
-#
-#--
-# Copyright (c) 2007, John Mettraux, OpenWFE.org
-# All rights reserved.
-# 
-# Redistribution and use in source and binary forms, with or without 
-# modification, are permitted provided that the following conditions are met:
-# 
-# . Redistributions of source code must retain the above copyright notice, this
-#   list of conditions and the following disclaimer.  
-# 
-# . Redistributions in binary form must reproduce the above copyright notice, 
-#   this list of conditions and the following disclaimer in the documentation 
-#   and/or other materials provided with the distribution.
-# 
-# . Neither the name of the "OpenWFE" nor the names of its contributors may be
-#   used to endorse or promote products derived from this software without
-#   specific prior written permission.
-# 
-# THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS" 
-# AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE 
-# IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE 
-# ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT OWNER OR CONTRIBUTORS BE 
-# LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR 
-# CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF 
-# SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS 
-# INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN 
-# CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) 
-# ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE 
-# POSSIBILITY OF SUCH DAMAGE.
-#++
-#
-
-#
-# "made in Japan"
-#
-# john.mettraux@openwfe.org
-#
-
-require 'open-uri'
-
-
-module OpenWFE
-
-    #--
-    # Runs some remote code (uri) at a different $SAFE level.
-    #
-    #def OpenWFE.load_safely (uri, safe_level)
-    #    source = ""
-    #    source << "#\n"
-    #    source << "# loaded from #{uri}\n"
-    #    source << "#\n"
-    #    source << open(uri).read
-    #    load_eval_safely(source, safe_level)
-    #end
-    #
-    #
-    # Makes sure that a piece of Ruby code is run at certain safe level.
-    # Saves in a temp file that is reloaded in its own anonymous namespace.
-    #
-    # (no binding passing allowed like in the basic Kernel.eval() method).
-    #
-    #def OpenWFE.load_eval_safely (code, safe_level)
-    #    tmpfname = 
-    #        "#{Dir.tmpdir}/"+
-    #        "owfe_#{code.object_id}_#{Time.new.to_f}.tmp.rb"
-    #    File.open tmpfname, "w" do |file|
-    #        file.print code
-    #    end
-    #    Thread.new do
-    #        $SAFE = safe_level
-    #        load(tmpfname, true)
-    #    end.join
-    #    begin
-    #        File.delete tmpfname
-    #    rescue Excpetion => e
-    #        # ignore
-    #    end
-    #end
-    #++
-
-    #
-    # Runs some code within an instance's realm at a certain safety level.
-    #
-    def OpenWFE.instance_eval_safely (instance, code, safe_level)
-
-        return instance.instance_eval(code) if on_jruby?
-
-        code.untaint
-
-        r = nil
-
-        Thread.new do
-            $SAFE = safe_level
-            r = instance.instance_eval(code)
-        end.join
-
-        raise "cannot TAMPER with JRUBY_VERSION" if on_jruby?
-
-        r
-    end
-
-    #
-    # Runs an eval() call at a certain safety level.
-    #
-    def OpenWFE.eval_safely (code, safe_level, binding=nil)
-
-        return eval(code, binding) if on_jruby?
-
-        code.untaint
-
-        r = nil
-
-        Thread.new do
-            $SAFE = safe_level
-            r = eval(code, binding)
-        end.join
-
-        raise "cannot TAMPER with JRUBY_VERSION" if on_jruby?
-
-        r
-    end
-
-    #
-    # - not used currently -
-    #
-    # evals "requires" at the current safe level and the rest of the code
-    # at the requested safety level.
-    #
-    def OpenWFE.eval_r_safely (code, safe_level, binding=nil)
-
-        code.untaint
-
-        c = ""
-
-        code.split("\n").each do |line|
-            if line.match "^ *require " and not line.index(";")
-                eval(line, binding)
-            else
-                c << line
-                c << "\n"
-            end
-        end
-
-        eval_safely(c, safe_level, binding)
-    end
-
-    protected
-
-    #
-    # Returns true if the JRUBY_VERSION is defined.
-    # (beware : something else than JRuby may have defined it).
-    #
-    def OpenWFE.on_jruby?
-
-        defined?(JRUBY_VERSION) != nil
-    end
-    
-end
-