facets 2.6.0 → 2.7.0

data/lib/more/facets/nackclass.rb

@@ -1,41 +0,0 @@
-# = NackClass
-#
-# Not Acknowledge. An alternatice to NilClass is cases where
-# nil is a valid option, but an non-option still needs to
-# be recorgnized.
-#
-# == Authors
-#
-# * Thomas Sawyer
-#
-# == Copying
-#
-# Copyright (c) 2004 Thomas Sawyer
-#
-# Ruby License
-#
-# This module is free software. You may use, modify, and/or redistribute this
-# software under the same terms as Ruby.
-#
-# This program 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.
-
-
-# = NackClass
-#
-# Not Acknowledge. An alternatice to NilClass is cases where
-# nil is a valid option, but an non-option still needs to
-# be recorgnized.
-#
-class NackClass < Exception
-end
-
-module Kernel
-  # This is a light version of NackClass intended
-  # for minor usecases. See mega/nack for a complete version.
-  #
-  def nack
-    NackClass.new
-  end
-end

data/lib/more/facets/net/smtp_tls.rb

@@ -1,131 +0,0 @@
-# TITLE:
-#
-#   SMTP/TLS
-#
-# SUMMARY:
-#
-#   SMTP with TLS support.
-#
-# COPYRIGHT:
-#
-#   Copyright (c) 2006 Kyle Maxwell
-#
-# LICENSE:
-#
-#   Ruby License
-#
-#   This module is free software. You may use, modify, and/or redistribute this
-#   software under the same terms as Ruby.
-#
-#   This program 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.
-#
-# HISTORY:
-#
-#   Original code seems to be public domain. Modifications made by Kyle Maxwell were
-#   picked up from ar_mailer's version. Until someone else step foward, we'll give
-#   copyrights to Kyle.
-#
-# AUTHORS:
-#
-#   - Kyle Maxwell
-
-require "openssl"
-require "net/smtp"
-
-
-class Net::SMTP
-
-  class << self
-    send :remove_method, :start
-  end
-
-  def self.start(address, port=nil, helo='localhost.localdomain', user=nil, secret=nil, authtype=nil, use_tls=false, &block) # :yield: smtp
-    new(address, port).start(helo, user, secret, authtype, use_tls, &block)
-  end
-
-  alias tls_old_start start
-
-  def start(helo='localhost.localdomain', user=nil, secret=nil, authtype=nil, use_tls=false) # :yield: smtp
-    start_method = use_tls ? :do_tls_start : :do_start
-    if block_given?
-      begin
-        send start_method, helo, user, secret, authtype
-        return yield(self)
-      ensure
-        do_finish
-      end
-    else
-      send start_method, helo, user, secret, authtype
-      return self
-    end
-  end
-
-  private
-
-  def do_tls_start(helodomain, user, secret, authtype)
-    raise IOError, 'SMTP session already started' if @started
-    check_auth_args user, secret, authtype if user or secret
-
-    sock = timeout(@open_timeout) { TCPSocket.open(@address, @port) }
-    @socket = Net::InternetMessageIO.new(sock)
-    @socket.read_timeout = 60 #@read_timeout
-    @socket.debug_output = STDERR if $DEBUG #@debug_output
-
-    check_response(critical { recv_response() })
-    do_helo(helodomain)
-
-    raise 'openssl library not installed' unless defined?(OpenSSL)
-    starttls
-    ssl = OpenSSL::SSL::SSLSocket.new(sock)
-    ssl.sync_close = true
-    ssl.connect
-    @socket = Net::InternetMessageIO.new(ssl)
-    @socket.read_timeout = 60 #@read_timeout
-    @socket.debug_output = STDERR if $DEBUG #@debug_output
-    do_helo(helodomain)
-
-    authenticate user, secret, authtype if user
-    @started = true
-  ensure
-    unless @started
-      # authentication failed, cancel connection.
-        @socket.close if not @started and @socket and not @socket.closed?
-      @socket = nil
-    end
-  end
-
-  def do_helo(helodomain)
-     begin
-      if @esmtp
-        ehlo helodomain
-      else
-        helo helodomain
-      end
-    rescue Net::ProtocolError
-      if @esmtp
-        @esmtp = false
-        @error_occured = false
-        retry
-      end
-      raise
-    end
-  end
-
-  def starttls
-    getok('STARTTLS')
-  end
-
-  alias tls_old_quit quit
-
-  def quit
-    begin
-      getok('QUIT')
-    rescue EOFError
-    end
-  end
-
-end unless Net::SMTP.private_method_defined? :do_tls_start or
-           Net::SMTP.method_defined? :tls?
-

data/lib/more/facets/nilstatus.rb

@@ -1,48 +0,0 @@
-class NilClass
-
-  # Nil#status makes it possible to pass messages
-  # through a "failure" chain.
-  #
-  #   def foo
-  #     return nil.status("failed foo!")
-  #   end
-  #
-  #   result = foo
-  #   if result.nil?
-  #     result.status?  #=> true
-  #     result.status   #=> "failed foo!"
-  #   end
-  #
-  # CREDIT: Trans
-
-  def status(status=nil)
-    if status
-      @status = status
-      self
-    else
-      @status
-    end
-  end
-
-  # Check status.
-  #
-  #   def foo
-  #     return nil.status("failed foo!")
-  #   end
-  #
-  #   result = foo
-  #   if result.nil?
-  #     result.status?  #=> true
-  #     result.status   #=> "failed foo!"
-  #   end
-  #
-  # CREDIT: Trans
-
-  def status?
-    return unless @status
-    return false if @status.empty?
-    return true
-  end
-
-end
-

data/lib/more/facets/overload.rb

@@ -1,94 +0,0 @@
-# = Overload
-#
-# Write methods with signitures.
-#
-# == Copying
-#
-# Copyright (c) 2005 Thomas Sawyer
-#
-# Ruby License
-#
-# This module is free software. You may use, modify, and/or redistribute this
-# software under the same terms as Ruby.
-#
-# This program 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.
-#
-# == Authors
-#
-# * Thomas Sawyer
-
-#
-class Module
-
-  def method_overloads
-    @method_overloads ||= {}
-  end
-
-  # Overload methods.
-  #
-  #   class X
-  #     def x
-  #       "hello"
-  #     end
-  #
-  #     overload :x, Integer do |i|
-  #       i
-  #     end
-  #
-  #     overload :x, String, String do |s1, s2|
-  #       [s1, s2]
-  #     end
-  #   end
-  #
-  def overload( name, *signiture, &block )
-    raise ArgumentError unless signiture.all?{|s| s.instance_of?(Class)} 
-
-    name = name.to_sym
-
-    if method_overloads.key?( name )
-      method_overloads[name][signiture] = block
-
-    else
-      method_overloads[name] = {}
-      method_overloads[name][signiture] = block
-
-      if method_defined?( name )
-        #method_overloads[name][nil] = instance_method( name ) #true
-        alias_method( "#{name}Generic", name )
-        has_generic = true
-      else
-        has_generic = false
-      end
-
-      define_method( name ) do |*args|
-        ovr = self.class.method_overloads["#{name}".to_sym]
-        sig = args.collect{ |a| a.class }
-        hit = nil
-        faces = ovr.keys #.sort { |a,b| b.size <=> a.size }
-        faces.each do |cmp|
-          next unless cmp.size == sig.size
-          if (0...cmp.size).all?{ |i| cmp[i] >= sig[i] }
-            break hit = cmp
-          end
-        end 
-        if hit
-          ovr[hit].call(*args)
-        else
-          if has_generic #ovr[nil]
-            send( "#{name}Generic", *args )
-            #ovr[nil].bind(self).call(*args)
-          else
-            raise NoMethodError
-          end
-        end
-
-      end
-
-    end
-
-  end
-
-end
-

data/lib/more/facets/paramix.rb

@@ -1,202 +0,0 @@
-# TITLE:
-#
-#   Parametric Mixins
-#
-# SUMMARY:
-#
-#   Parametric Mixins provides parameters for mixin modules.
-#
-# COPYRIGHT:
-#
-#   Copyright (c) 2008 T. Sawyer
-#
-# LICENSE:
-#
-#   Ruby License
-#
-#   This module is free software. You may use, modify, and/or redistribute this
-#   software under the same terms as Ruby.
-#
-#   This program 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.
-#
-# AUTHORS:
-#
-#   - Thomas Sawyer
-
-require 'facets/module/basename'
-require 'facets/module/modspace'
-
-# = Parametric Mixin
-#
-# Parametric Mixins provides parameters for mixin modules.
-# Module parameters can be set at the time of inclusion 
-# or extension using Module#[] method, then parameters
-# can be accessed via the #mixin_parameters method.
-#
-#   module MyMixin
-#     include Paramix
-#
-#     def hello
-#       puts "Hello from #{mixin_parameters[MyMixin][:name]}!"
-#     end
-#   end
-#
-#   class MyClass
-#     include MyMixin[:name => 'Ruby']
-#   end
-#
-#   m = MyClass.new
-#   m.hello   #=> 'Hello from Ruby!'
-#
-# You can view the full set of parameters via the #mixin_parameters
-# class method, which returns a hash keyed on the included modules.
-#
-#   MyClass.mixin_parameters           #=> {MyMixin=>{:name=>'Ruby'}}
-#   MyClass.mixin_parameters[MyMixin]  #=> {:name=>'ruby'}
-#
-# The include Paramix is equivalent to:
-#
-#   def [](parameters)
-#     Paramix.new(self, parameters)
-#   end
-#
-# Paramix.new can also take a block that injects code into the class
-# or module including the parametric mixin. This is useful as an
-# alternative to using the #included callback for creating dynamic
-# mixins. For example:
-#
-#   def self.[](parameters)
-#     Paramix.new(self, parameters) do
-#       attr_accessor mixin_params[MyMixin][:name]
-#     end
-#   end
-#
-# As opposed to:
-#
-#   module Mixin
-#     def self.included(base)
-#       base.class_eval do
-#         attr_accessor mixin_params[MyMixin][:name]
-#       end
-#     end
-#   end
-#
-#--
-# More conveniently a new callback has been added, #included_with_parameters,
-# which passes in the parameters in addition to the base class/module.
-#
-#   module Mixin
-#     def self.included_with_parameters( base, parms )
-#       base.class_eval {
-#         def hello
-#           puts "Hello from #{mixin_parameters[Mixin][:name]}"
-#         end
-#       }
-#     end
-#   end
-#
-# We would prefer to have passed the parameters through the #included callback
-# method itself, but implementation of such a feature is much more complicated.
-# If a reasonable solution presents itself in the future however, we will fix.
-#++
-
-module Paramix  # or PatrametricMixin ?
-
-  def self.append_features(base)
-    (class << base; self; end).class_eval do
-      define_method(:[]) do |parameters|  # TODO until 1.9 no &block
-        Delegator.new(base, parameters)
-      end
-    end
-  end
-
-  # It you want to define the module's ::[] method by hand. You
-  # can use Paramix.new instead of Paramix::Delegator.new.
-
-  def self.new(delegate_module, parameters={}, &base_block)
-    Delegator.new(delegate_module, parameters, &base_block)
-  end
-
-  #
-
-  class Delegator < Module
-
-    attr :module_delegate
-    attr :parameters
-    attr :base_block
-
-    #
-
-    def initialize(module_delegate, parameters={}, &base_block)
-      @module_delegate = module_delegate
-      @parameters      = parameters
-      @base_block      = base_block
-    end
-
-    #
-
-    def append_features(base)
-      base.mixin_parameters[module_delegate] = parameters
-
-      base.module_eval do 
-        define_method(:mixin_parameters) do
-          base.mixin_parameters
-        end
-        alias_method :mixin_params, :mixin_parameters
-      end
-
-      base.module_eval(&@base_block) if base_block
-
-      base.__send__(:include, module_delegate)
-    end
-
-    #
-
-    def extend_object(base)
-      baseclass = (class << base; self; end)
-
-      baseclass.mixin_parameters[module_delegate] = parameters
-
-      baseclass.module_eval do 
-        define_method(:mixin_parameters) do
-          baseclass.mixin_parameters
-        end
-        alias_method :mixin_params, :mixin_parameters
-      end
-
-      baseclass.module_eval(&@base_block) if base_block
-
-      base.__send__(:extend, module_delegate)
-    end
-
-    def [](name)
-      @parameters[name]
-    end
-
-  end
-
-end
-
-
-class Module
-
-  # Store for parametric mixin parameters.
-  #
-  # Returns a hash, the keys of which are the parametric mixin module
-  # and the values are the parameters associacted with this module/class.
-  #
-  #   class C
-  #     include P(:x=>1)
-  #   end
-  #
-  #   C.mixin_parameters[P]   #=> {:x=>1}
-  #
-  def mixin_parameters
-    @mixin_parameters ||= {}
-  end
-  alias_method :mixin_params, :mixin_parameters
-
-end
-