monetra-ruby 0.0.6

data/lib/monetra/active_support/core_ext/string/iterators.rb

@@ -0,0 +1,17 @@
+require 'strscan'
+
+module ActiveSupport #:nodoc:
+  module CoreExtensions #:nodoc:
+    module String #:nodoc:
+      # Custom string iterators
+      module Iterators
+        # Yields a single-character string for each character in the string.
+        # When $KCODE = 'UTF8', multi-byte characters are yielded appropriately.
+        def each_char
+          scanner, char = StringScanner.new(self), /./mu
+          loop { yield(scanner.scan(char) || break) }
+        end
+      end
+    end
+  end
+end

data/lib/monetra/active_support/core_ext/string/starts_ends_with.rb

@@ -0,0 +1,20 @@
+module ActiveSupport #:nodoc:
+  module CoreExtensions #:nodoc:
+    module String #:nodoc:
+      # Additional string tests.
+      module StartsEndsWith
+        # Does the string start with the specified +prefix+?
+        def starts_with?(prefix)
+          prefix = prefix.to_s
+          self[0, prefix.length] == prefix
+        end
+
+        # Does the string end with the specified +suffix+?
+        def ends_with?(suffix)
+          suffix = suffix.to_s
+          self[-suffix.length, suffix.length] == suffix      
+        end
+      end
+    end
+  end
+end

data/lib/monetra/active_support/core_ext/symbol.rb

@@ -0,0 +1,12 @@
+class Symbol
+  # Turns the symbol into a simple proc, which is especially useful for enumerations. Examples:
+  #
+  #   # The same as people.collect { |p| p.name }
+  #   people.collect(&:name)
+  #
+  #   # The same as people.select { |p| p.manager? }.collect { |p| p.salary }
+  #   people.select(&:manager?).collect(&:salary)
+  def to_proc
+    Proc.new { |*args| args.shift.__send__(self, *args) }
+  end
+end

data/lib/monetra/active_support/core_ext/time.rb

@@ -0,0 +1,7 @@
+require File.dirname(__FILE__) + '/time/calculations'
+require File.dirname(__FILE__) + '/time/conversions'
+
+class Time#:nodoc:
+  include ActiveSupport::CoreExtensions::Time::Calculations
+  include ActiveSupport::CoreExtensions::Time::Conversions
+end

data/lib/monetra/active_support/core_ext/time/calculations.rb

@@ -0,0 +1,188 @@
+module ActiveSupport #:nodoc:
+  module CoreExtensions #:nodoc:
+    module Time #:nodoc:
+      # Enables the use of time calculations within Time itself
+      module Calculations
+        def self.included(base) #:nodoc:
+          base.extend(ClassMethods)
+        end
+
+        module ClassMethods
+          # Return the number of days in the given month. If a year is given,
+          # February will return the correct number of days for leap years.
+          # Otherwise, this method will always report February as having 28
+          # days.
+          def days_in_month(month, year=nil)
+            if month == 2
+              !year.nil? && (year % 4 == 0) && ((year % 100 != 0) || (year % 400 == 0)) ?  29 : 28
+            elsif month <= 7
+              month % 2 == 0 ? 30 : 31
+            else
+              month % 2 == 0 ? 31 : 30
+            end
+          end
+        end
+
+        # Seconds since midnight: Time.now.seconds_since_midnight
+        def seconds_since_midnight
+          self.hour.hours + self.min.minutes + self.sec + (self.usec/1.0e+6)
+        end
+            
+        # Returns a new Time where one or more of the elements have been changed according to the +options+ parameter. The time options
+        # (hour, minute, sec, usec) reset cascadingly, so if only the hour is passed, then minute, sec, and usec is set to 0. If the hour and 
+        # minute is passed, then sec and usec is set to 0.
+        def change(options)
+          ::Time.send(
+            self.utc? ? :utc : :local, 
+            options[:year]  || self.year, 
+            options[:month] || self.month, 
+            options[:mday]  || self.mday, 
+            options[:hour]  || self.hour, 
+            options[:min]   || (options[:hour] ? 0 : self.min),
+            options[:sec]   || ((options[:hour] || options[:min]) ? 0 : self.sec),
+            options[:usec]  || ((options[:hour] || options[:min] || options[:sec]) ? 0 : self.usec)
+          )
+        end
+        
+        # Uses Date to provide precise Time calculations for years, months, and days.  The +options+ parameter takes a hash with 
+        # any of these keys: :months, :days, :years.
+        def advance(options)
+          d = ::Date.new(year + (options.delete(:years) || 0), month, day)
+          d = d >> options.delete(:months) if options[:months]
+          d = d +  options.delete(:days)   if options[:days]
+          change(options.merge(:year => d.year, :month => d.month, :mday => d.day))
+        end
+
+        # Returns a new Time representing the time a number of seconds ago, this is basically a wrapper around the Numeric extension
+        # Do not use this method in combination with x.months, use months_ago instead!
+        def ago(seconds)
+          seconds.until(self)
+        end
+
+        # Returns a new Time representing the time a number of seconds since the instance time, this is basically a wrapper around 
+        #the Numeric extension. Do not use this method in combination with x.months, use months_since instead!
+        def since(seconds)
+          seconds.since(self)
+        end
+        alias :in :since
+
+        # Returns a new Time representing the time a number of specified months ago
+        def months_ago(months)
+          months_since(-months)
+        end
+
+        def months_since(months)
+          year, month, mday = self.year, self.month, self.mday
+
+          month += months
+
+          # in case months is negative
+          while month < 1
+            month += 12
+            year -= 1
+          end
+
+          # in case months is positive
+          while month > 12
+            month -= 12
+            year += 1
+          end
+
+          max = ::Time.days_in_month(month, year)
+          mday = max if mday > max
+
+          change(:year => year, :month => month, :mday => mday)
+        end
+
+        # Returns a new Time representing the time a number of specified years ago
+        def years_ago(years)
+          change(:year => self.year - years)
+        end
+        
+        def years_since(years)
+          change(:year => self.year + years)
+        end
+
+        # Short-hand for years_ago(1)
+        def last_year
+          years_ago(1)
+        end
+        
+        # Short-hand for years_since(1)
+        def next_year
+          years_since(1)
+        end
+
+
+        # Short-hand for months_ago(1)
+        def last_month
+          months_ago(1)
+        end
+
+        # Short-hand for months_since(1)
+        def next_month
+          months_since(1)
+        end
+        
+        # Returns a new Time representing the "start" of this week (Monday, 0:00)
+        def beginning_of_week
+          days_to_monday = self.wday!=0 ? self.wday-1 : 6
+          (self - days_to_monday.days).midnight
+        end
+        alias :monday :beginning_of_week
+        alias :at_beginning_of_week :beginning_of_week
+        
+        # Returns a new Time representing the start of the given day in next week (default is Monday).
+        def next_week(day = :monday)
+          days_into_week = { :monday => 0, :tuesday => 1, :wednesday => 2, :thursday => 3, :friday => 4, :saturday => 5, :sunday => 6}
+          since(1.week).beginning_of_week.since(days_into_week[day].day).change(:hour => 0)
+        end
+        
+        # Returns a new Time representing the start of the day (0:00)
+        def beginning_of_day
+          (self - self.seconds_since_midnight).change(:usec => 0)
+        end
+        alias :midnight :beginning_of_day
+        alias :at_midnight :beginning_of_day
+        alias :at_beginning_of_day :beginning_of_day
+        
+        # Returns a new Time representing the start of the month (1st of the month, 0:00)
+        def beginning_of_month
+          #self - ((self.mday-1).days + self.seconds_since_midnight)
+          change(:mday => 1,:hour => 0, :min => 0, :sec => 0, :usec => 0)
+        end
+        alias :at_beginning_of_month :beginning_of_month
+        
+        # Returns a new Time representing the end of the month (last day of the month, 0:00)
+        def end_of_month
+          #self - ((self.mday-1).days + self.seconds_since_midnight)
+          last_day = ::Time.days_in_month( self.month, self.year )
+          change(:mday => last_day,:hour => 0, :min => 0, :sec => 0, :usec => 0)
+        end
+        alias :at_end_of_month :end_of_month
+		  
+        # Returns  a new Time representing the start of the quarter (1st of january, april, july, october, 0:00)
+        def beginning_of_quarter
+          beginning_of_month.change(:month => [10, 7, 4, 1].detect { |m| m <= self.month })
+        end
+        alias :at_beginning_of_quarter :beginning_of_quarter
+        
+        # Returns  a new Time representing the start of the year (1st of january, 0:00)
+        def beginning_of_year
+          change(:month => 1,:mday => 1,:hour => 0, :min => 0, :sec => 0, :usec => 0)
+        end
+        alias :at_beginning_of_year :beginning_of_year
+        
+        # Convenience method which returns a new Time representing the time 1 day ago
+        def yesterday
+          self.ago(1.day)
+        end
+        
+        # Convenience method which returns a new Time representing the time 1 day since the instance time
+        def tomorrow
+          self.since(1.day)
+        end
+      end
+    end
+  end
+end

data/lib/monetra/active_support/core_ext/time/conversions.rb

@@ -0,0 +1,36 @@
+require 'date'
+require 'time'
+
+module ActiveSupport #:nodoc:
+  module CoreExtensions #:nodoc:
+    module Time #:nodoc:
+      # Getting times in different convenient string representations and other objects
+      module Conversions
+        DATE_FORMATS = {
+          :db     => "%Y-%m-%d %H:%M:%S",
+          :short  => "%d %b %H:%M",
+          :long   => "%B %d, %Y %H:%M",
+          :rfc822 => "%a, %d %b %Y %H:%M:%S %z"
+        }
+
+        def self.included(klass)
+          klass.send(:alias_method, :to_default_s, :to_s)
+          klass.send(:alias_method, :to_s, :to_formatted_s)
+        end
+        
+        def to_formatted_s(format = :default)
+          DATE_FORMATS[format] ? strftime(DATE_FORMATS[format]).strip : to_default_s          
+        end
+
+        def to_date
+          ::Date.new(year, month, day)
+        end
+
+        # To be able to keep Dates and Times interchangeable on conversions
+        def to_time
+          self
+        end
+      end
+    end
+  end
+end

data/lib/monetra/active_support/dependencies.rb

@@ -0,0 +1,187 @@
+require 'set'
+require File.dirname(__FILE__) + '/core_ext/module/attribute_accessors'
+require File.dirname(__FILE__) + '/core_ext/load_error'
+require File.dirname(__FILE__) + '/core_ext/kernel'
+
+module Dependencies #:nodoc:
+  extend self
+
+  # Should we turn on Ruby warnings on the first load of dependent files?
+  mattr_accessor :warnings_on_first_load
+  self.warnings_on_first_load = false
+
+  # All files ever loaded.
+  mattr_accessor :history
+  self.history = Set.new
+
+  # All files currently loaded.
+  mattr_accessor :loaded
+  self.loaded = Set.new
+
+  # Should we load files or require them?
+  mattr_accessor :mechanism
+  self.mechanism = :load
+
+  def load?
+    mechanism == :load
+  end
+
+  def depend_on(file_name, swallow_load_errors = false)
+    require_or_load(file_name)
+  rescue LoadError
+    raise unless swallow_load_errors
+  end
+
+  def associate_with(file_name)
+    depend_on(file_name, true)
+  end
+
+  def clear
+    loaded.clear
+  end
+
+  def require_or_load(file_name)
+    file_name = $1 if file_name =~ /^(.*)\.rb$/
+    return if loaded.include?(file_name)
+
+    # Record that we've seen this file *before* loading it to avoid an
+    # infinite loop with mutual dependencies.
+    loaded << file_name
+
+    if load?
+      begin
+        # Enable warnings iff this file has not been loaded before and
+        # warnings_on_first_load is set.
+        if !warnings_on_first_load or history.include?(file_name)
+          load "#{file_name}.rb"
+        else
+          enable_warnings { load "#{file_name}.rb" }
+        end
+      rescue
+        loaded.delete file_name
+        raise
+      end
+    else
+      require file_name
+    end
+
+    # Record history *after* loading so first load gets warnings.
+    history << file_name
+  end
+  
+  # Return the a constant path for the provided parent and constant name
+  def constant_path_for(mod, name)
+    ([Object, Kernel].include? mod) ? name.to_s : "#{mod}::#{name}"
+  end
+  
+  class LoadingModule
+    # Old style environment.rb referenced this method directly.  Please note, it doesn't
+    # actualy *do* anything any more.
+    def self.root(*args)
+      if defined?(RAILS_DEFAULT_LOGGER)
+        RAILS_DEFAULT_LOGGER.warn "Your environment.rb uses the old syntax, it may not continue to work in future releases."
+        RAILS_DEFAULT_LOGGER.warn "For upgrade instructions please see: http://manuals.rubyonrails.com/read/book/19"
+      end
+    end
+  end
+end
+
+Object.send(:define_method, :require_or_load)     { |file_name| Dependencies.require_or_load(file_name) } unless Object.respond_to?(:require_or_load)
+Object.send(:define_method, :require_dependency)  { |file_name| Dependencies.depend_on(file_name) }       unless Object.respond_to?(:require_dependency)
+Object.send(:define_method, :require_association) { |file_name| Dependencies.associate_with(file_name) }  unless Object.respond_to?(:require_association)
+
+class Module #:nodoc:
+  # Rename the original handler so we can chain it to the new one
+  alias :rails_original_const_missing :const_missing
+  
+  # Use const_missing to autoload associations so we don't have to
+  # require_association when using single-table inheritance.
+  def const_missing(class_id)
+    file_name = class_id.to_s.demodulize.underscore
+    file_path = as_load_path.empty? ? file_name : "#{as_load_path}/#{file_name}"
+    begin
+      require_dependency(file_path)
+      brief_name = self == Object ? '' : "#{name}::"
+      raise NameError.new("uninitialized constant #{brief_name}#{class_id}") unless const_defined?(class_id)
+      return const_get(class_id)
+    rescue MissingSourceFile => e
+      # Re-raise the error if it does not concern the file we were trying to load.
+      raise unless e.is_missing? file_path
+      
+      # Look for a directory in the load path that we ought to load.
+      if $LOAD_PATH.any? { |base| File.directory? "#{base}/#{file_path}" }
+        mod = Module.new
+        const_set class_id, mod # Create the new module
+        return mod
+      end
+      
+      # Attempt to access the name from the parent, unless we don't have a valid
+      # parent, or the constant is already defined in the parent. If the latter
+      # is the case, then we are being queried via self::class_id, and we should
+      # avoid returning the constant from the parent if possible.
+      if parent && parent != self && ! parents.any? { |p| p.const_defined?(class_id) }
+        suppress(NameError) do
+          return parent.send(:const_missing, class_id)
+        end
+      end
+      
+      qualified_name = Dependencies.constant_path_for self, class_id
+      raise NameError.new("uninitialized constant #{qualified_name}").copy_blame!(e)
+    end
+  end
+end
+
+class Class
+  def const_missing(class_id)
+    if [Object, Kernel].include?(self) || parent == self
+      super
+    else
+      begin
+        parent.send :const_missing, class_id
+      rescue NameError => e
+        # Make sure that the name we are missing is the one that caused the error
+        parent_qualified_name = Dependencies.constant_path_for parent, class_id
+        raise unless e.missing_name? parent_qualified_name
+        qualified_name = Dependencies.constant_path_for self, class_id
+        raise NameError.new("uninitialized constant #{qualified_name}").copy_blame!(e)
+      end
+    end
+  end
+end
+
+class Object #:nodoc:
+  def load(file, *extras)
+    super(file, *extras)
+  rescue Object => exception
+    exception.blame_file! file
+    raise
+  end
+
+  def require(file, *extras)
+    super(file, *extras)
+  rescue Object => exception
+    exception.blame_file! file
+    raise
+  end
+end
+
+# Add file-blaming to exceptions
+class Exception #:nodoc:
+  def blame_file!(file)
+    (@blamed_files ||= []).unshift file
+  end
+
+  def blamed_files
+    @blamed_files ||= []
+  end
+
+  def describe_blame
+    return nil if blamed_files.empty?
+    "This error occurred while loading the following files:\n   #{blamed_files.join "\n   "}"
+  end
+
+  def copy_blame!(exc)
+    @blamed_files = exc.blamed_files.clone
+    self
+  end
+end