social_url_stats 0.0.1 → 0.0.2

data/vendor/ruby/1.9.1/gems/tins-0.13.1/lib/tins/alias.rb

@@ -1 +0,0 @@
-Spruz = Tins

data/vendor/ruby/1.9.1/gems/tins-0.13.1/lib/tins/annotate.rb

@@ -1,30 +0,0 @@
-module Tins::Annotate
-  def annotate(name)
-    class << self; self; end.class_eval do
-      define_method(name) do |annotation|
-        instance_variable_set "@__annotation_#{name}__", annotation
-      end
-
-      define_method("#{name}_of") do |method_name|
-        __send__("#{name}_annotations")[method_name]
-      end
-
-      define_method("#{name}_annotations") do
-        if instance_variable_defined?("@__annotation_#{name}_annotations__")
-          instance_variable_get "@__annotation_#{name}_annotations__"
-        else
-          instance_variable_set "@__annotation_#{name}_annotations__", {}
-        end
-      end
-
-      old_method_added = instance_method(:method_added)
-      define_method(:method_added) do |method_name|
-        old_method_added.bind(self).call method_name
-        if annotation = instance_variable_get("@__annotation_#{name}__")
-          __send__("#{name}_annotations")[method_name] = annotation
-        end
-        instance_variable_set "@__annotation_#{name}__", nil
-      end
-    end
-  end
-end

data/vendor/ruby/1.9.1/gems/tins-0.13.1/lib/tins/ask_and_send.rb

@@ -1,15 +0,0 @@
-module Tins
-  module AskAndSend
-    def ask_and_send(method_name, *args, &block)
-      if respond_to?(method_name)
-        __send__(method_name, *args, &block)
-      end
-    end
-
-    def ask_and_send!(method_name, *args, &block)
-      if respond_to?(method_name, true)
-        __send__(method_name, *args, &block)
-      end
-    end
-  end
-end

data/vendor/ruby/1.9.1/gems/tins-0.13.1/lib/tins/attempt.rb

@@ -1,52 +0,0 @@
-module Tins
-  module Attempt
-    def attempt(opts = {}, &block)
-      sleep           = nil
-      exception_class = StandardError
-      if Numeric === opts
-        attempts = opts
-      else
-        attempts        = opts[:attempts] || 1
-        exception_class = opts[:exception_class] if opts.key?(:exception_class)
-        sleep           = opts[:sleep]
-        reraise         = opts[:reraise]
-      end
-      return if attempts <= 0
-      count = 0
-      if exception_class.nil?
-        begin
-          count += 1
-          if block.call(count)
-            return true
-          elsif count < attempts
-            sleep_duration(sleep, count)
-          end
-        end until count == attempts
-        false
-      else
-        begin
-          count += 1
-          block.call(count)
-          true
-        rescue exception_class
-          if count < attempts
-            sleep_duration(sleep, count)
-            retry
-          end
-          reraise ? raise : false
-        end
-      end
-    end
-
-    private
-
-    def sleep_duration(duration, count)
-      case duration
-      when Numeric
-        sleep duration
-      when Proc
-        sleep duration.call(count)
-      end
-    end
-  end
-end

data/vendor/ruby/1.9.1/gems/tins-0.13.1/lib/tins/bijection.rb

@@ -1,46 +0,0 @@
-module Tins
-  class Bijection < Hash
-    def self.[](*pairs)
-      pairs.size % 2 == 0 or
-        raise ArgumentError, "odd number of arguments for #{self}"
-      new.fill do |obj|
-        (pairs.size / 2).times do |i|
-          j = 2 * i
-          key = pairs[j]
-          value = pairs[j + 1]
-          obj.key?(key) and raise ArgumentError, "duplicate key #{key.inspect} for #{self}"
-          obj.inverted.key?(value) and raise ArgumentError, "duplicate value #{value.inspect} for #{self}"
-          obj[pairs[j]] = pairs[j + 1]
-        end
-      end
-    end
-
-    def initialize(inverted = Bijection.new(self))
-      @inverted = inverted
-    end
-
-    def fill
-      if empty?
-        yield self
-        freeze
-      end
-      self
-    end
-
-    def freeze
-      r = super
-      unless @inverted.frozen?
-        @inverted.freeze
-      end
-      r
-    end
-
-    def []=(key, value)
-      key?(key) and return
-      super
-      @inverted[value] = key
-    end
-
-    attr_reader :inverted
-  end
-end

data/vendor/ruby/1.9.1/gems/tins-0.13.1/lib/tins/concern.rb

@@ -1,30 +0,0 @@
-module Tins
-  module Concern
-    def self.extended(base)
-      base.instance_variable_set("@_dependencies", [])
-    end
-
-    def append_features(base)
-      if base.instance_variable_defined?("@_dependencies")
-        base.instance_variable_get("@_dependencies") << self
-        false
-      else
-        return false if base < self
-        @_dependencies.each { |dep| base.send(:include, dep) }
-        super
-        base.extend const_get("ClassMethods") if const_defined?("ClassMethods")
-        base.class_eval(&@_included_block) if instance_variable_defined?("@_included_block")
-        Thread.current[:tin_concern_args] = nil
-        true
-      end
-    end
-
-    def included(base = nil, &block)
-      if base.nil?
-        @_included_block = block
-      else
-        super
-      end
-    end
-  end
-end

data/vendor/ruby/1.9.1/gems/tins-0.13.1/lib/tins/count_by.rb

@@ -1,8 +0,0 @@
-module Tins
-  module CountBy
-    def count_by(&b)
-      b ||= lambda { |x| true }
-      inject(0) { |s, e| s += 1 if b[e]; s }
-    end
-  end
-end

data/vendor/ruby/1.9.1/gems/tins-0.13.1/lib/tins/date_dummy.rb

@@ -1,42 +0,0 @@
-require 'date'
-
-module Tins
-  module DateDummy
-    def self.included(modul)
-      class << modul
-        alias really_today today
-
-        remove_method :today rescue nil
-
-        attr_writer :dummy
-
-        def dummy(value = nil)
-          if value.nil?
-            @dummy
-          else
-            begin
-              old_dummy = @dummy
-              @dummy = value
-              yield
-            ensure
-              @dummy = old_dummy
-            end
-          end
-        end
-
-        def today
-          if dummy
-            dummy.dup
-          else
-            really_today
-          end
-        end
-
-        end
-      super
-    end
-  end
-end
-
-require 'tins/alias'
-

data/vendor/ruby/1.9.1/gems/tins-0.13.1/lib/tins/date_time_dummy.rb

@@ -1,40 +0,0 @@
-require 'date'
-
-module Tins
-  module DateTimeDummy
-    def self.included(modul)
-      class << modul
-        alias really_now now
-
-        remove_method :now rescue nil
-
-        attr_writer :dummy
-
-        def dummy(value = nil)
-          if value.nil?
-            @dummy
-          else
-            begin
-              old_dummy = @dummy
-              @dummy = value
-              yield
-            ensure
-              @dummy = old_dummy
-            end
-          end
-        end
-
-        def now
-          if dummy
-            dummy.dup
-          else
-            really_now
-          end
-        end
-      end
-      super
-    end
-  end
-end
-
-require 'tins/alias'

data/vendor/ruby/1.9.1/gems/tins-0.13.1/lib/tins/deep_const_get.rb

@@ -1,37 +0,0 @@
-module Tins
-  module DeepConstGet
-    if ::Object.method(:const_defined?).arity == 1
-      # :nocov:
-      # We do not create coverage on 1.8
-      def self.const_defined_in?(modul, constant)
-        modul.const_defined?(constant)
-      end
-      # :nocov:
-    else
-      def self.const_defined_in?(modul, constant)
-        modul.const_defined?(constant, false)
-      end
-    end
-
-    def deep_const_get(path, start_module = Object)
-      path.to_s.split('::').inject(start_module) do |p, c|
-        case
-        when c.empty?
-          if start_module == Object
-            Object
-          else
-            raise ArgumentError, "top level constants cannot be reached from"\
-              " start module #{start_module.inspect}"
-          end
-        when ::Tins::DeepConstGet.const_defined_in?(p, c) then p.const_get(c)
-        else
-          begin
-            p.const_missing(c)
-          rescue NameError => e
-            raise ArgumentError, "can't get const #{path}: #{e}"
-          end
-        end
-      end
-    end
-  end
-end

data/vendor/ruby/1.9.1/gems/tins-0.13.1/lib/tins/deep_dup.rb

@@ -1,11 +0,0 @@
-module Tins
-  module DeepDup
-    def deep_dup
-      Marshal.load(Marshal.dump(self))
-    rescue TypeError
-      return self
-    end
-  end
-end
-
-require 'tins/alias'

data/vendor/ruby/1.9.1/gems/tins-0.13.1/lib/tins/extract_last_argument_options.rb

@@ -1,14 +0,0 @@
-module Tins
-  module ExtractLastArgumentOptions
-    def extract_last_argument_options
-      last_argument = last
-      if last_argument.respond_to?(:to_hash) and
-        options = last_argument.to_hash.dup
-      then
-        return self[0..-2], options
-      else
-        return dup, {}
-      end
-    end
-  end
-end

data/vendor/ruby/1.9.1/gems/tins-0.13.1/lib/tins/file_binary.rb

@@ -1,85 +0,0 @@
-require 'tins/xt/hash_union'
-
-module Tins
-  module FileBinary
-    module Constants
-      SEEK_SET = ::File::SEEK_SET
-
-      ZERO   = "\x00"
-      BINARY = "\x01-\x1f\x7f-\xff"
-
-      if defined?(::Encoding)
-        ZERO.force_encoding(Encoding::ASCII_8BIT)
-        BINARY.force_encoding(Encoding::ASCII_8BIT)
-      end
-    end
-
-    class << self
-      # Default options can be queried/set via this hash.
-      attr_accessor :default_options
-    end
-    self.default_options = {
-      :offset            => 0,
-      :buffer_size       => 2 ** 13,
-      :percentage_binary => 30.0,
-      :percentage_zeros  => 0.0,
-    }
-
-    # Returns true if this file is considered to be binary, false if it is not
-    # considered to be binary, and nil if it was empty.
-    #
-    # A file is considered to be binary if the percentage of zeros exceeds
-    # <tt>options[:percentage_zeros]</tt> or the percentage of binary bytes
-    # (8-th bit is 1) exceeds <tt>options[:percentage_binary]</tt> in the
-    # buffer of size <tt>options[:buffer_size]</tt> that is checked (beginning
-    # from offset <tt>options[:offset]</tt>). If an option isn't given the one
-    # from FileBinary.default_options is used instead.
-    def binary?(options = {})
-      options |= FileBinary.default_options
-      old_pos = tell
-      seek options[:offset], Constants::SEEK_SET
-      data = read options[:buffer_size]
-      !data or data.empty? and return nil
-      data_size = data.size
-      data.count(Constants::ZERO).to_f / data_size >
-        options[:percentage_zeros] / 100.0 and return true
-      data.count(Constants::BINARY).to_f / data_size >
-        options[:percentage_binary] / 100.0
-    ensure
-      old_pos and seek old_pos, Constants::SEEK_SET
-    end
-
-    # Returns true if FileBinary#binary? returns false, false if
-    # FileBinary#binary? returns true, and nil otherwise. For an explanation of
-    # +options+, see FileBinary#binary?.
-    def ascii?(options = {})
-      case binary?(options)
-      when true   then false
-      when false  then true
-      end
-    end
-
-    def self.included(modul)
-      modul.instance_eval do
-        extend ClassMethods
-      end
-      super
-    end
-
-    module ClassMethods
-      # Returns true if the file with name +name+ is considered to be binary
-      # using the FileBinary#binary? method.
-      def binary?(name, options = {})
-        open(name, 'rb') { |f| f.binary?(options) }
-      end
-
-      # Returns true if the file with name +name+ is considered to be ascii
-      # using the FileBinary#ascii? method.
-      def ascii?(name, options = {})
-        open(name, 'rb') { |f| f.ascii?(options) }
-      end
-    end
-  end
-end
-
-require 'tins/alias'

data/vendor/ruby/1.9.1/gems/tins-0.13.1/lib/tins/find.rb

@@ -1,138 +0,0 @@
-require 'enumerator'
-require 'pathname'
-require 'tins/module_group'
-
-module Tins
-  module Find
-    EXPECTED_STANDARD_ERRORS = ModuleGroup[
-      Errno::ENOENT, Errno::EACCES, Errno::ENOTDIR, Errno::ELOOP,
-      Errno::ENAMETOOLONG
-    ]
-
-    class Finder
-      module PathExtension
-        attr_accessor :finder
-
-        def finder_stat
-          finder.protect_from_errors do
-            finder.follow_symlinks ? File.stat(self) : File.lstat(self)
-          end
-        end
-
-        def file
-          finder.protect_from_errors do
-            File.new(self) if file?
-          end
-        end
-
-        def file?
-          finder.protect_from_errors { s = finder_stat and s.file? }
-        end
-
-        def directory?
-          finder.protect_from_errors { s = finder_stat and s.directory? }
-        end
-
-        def exist?
-          finder.protect_from_errors { File.exist?(self) }
-        end
-
-        def stat
-          finder.protect_from_errors { File.stat(self) }
-        end
-
-        def lstat
-          finder.protect_from_errors { File.lstat(self) }
-        end
-
-        def pathname
-          Pathname.new(self)
-        end
-
-        def suffix
-          pathname.extname[1..-1] || ''
-        end
-      end
-
-      def initialize(opts = {})
-        @show_hidden     = opts.fetch(:show_hidden)     { true }
-        @raise_errors    = opts.fetch(:raise_errors)    { false }
-        @follow_symlinks = opts.fetch(:follow_symlinks) { true }
-        opts[:suffix].full? { |s| @suffix = [*s] }
-      end
-
-      attr_accessor :show_hidden
-
-      attr_accessor :raise_errors
-
-      attr_accessor :follow_symlinks
-
-      attr_accessor :suffix
-
-      def visit_path?(path)
-        @suffix.nil? || @suffix.include?(path.suffix)
-      end
-
-      def find(*paths)
-        block_given? or return enum_for(__method__, *paths)
-        paths.collect! { |d| d.dup }
-        while path = paths.shift
-          path = prepare_path(path)
-          catch(:prune) do
-            stat = path.finder_stat or next
-            visit_path?(path) and yield path
-            if stat.directory?
-              ps = protect_from_errors { Dir.entries(path) } or next
-              ps.sort!
-              ps.reverse_each do |p|
-                next if p == "." or p == ".."
-                next if !@show_hidden && p.start_with?('.')
-                p = File.join(path, p)
-                paths.unshift p.untaint
-              end
-            end
-          end
-        end
-      end
-
-      def prepare_path(path)
-        path = path.dup.taint
-        path.extend PathExtension
-        path.finder = self
-        path
-      end
-
-      def protect_from_errors(errors = Find::EXPECTED_STANDARD_ERRORS)
-        yield
-      rescue errors
-        raise_errors and raise
-        return
-      end
-    end
-
-    #
-    # Calls the associated block with the name of every path and directory
-    # listed as arguments, then recursively on their subdirectories, and so on.
-    #
-    # See the +Find+ module documentation for an example.
-    #
-    def find(*paths, &block) # :yield: path
-      opts = Hash === paths.last ? paths.pop : {}
-      Finder.new(opts).find(*paths, &block)
-    end
-
-    #
-    # Skips the current path or directory, restarting the loop with the next
-    # entry. If the current path is a directory, that directory will not be
-    # recursively entered. Meaningful only within the block associated with
-    # Find::find.
-    #
-    # See the +Find+ module documentation for an example.
-    #
-    def prune
-      throw :prune
-    end
-
-    module_function :find, :prune
-  end
-end