fat_free_crm 0.11.0

data/lib/fat_free_crm/engine.rb

@@ -0,0 +1,9 @@
+module FatFreeCRM
+  class Engine < ::Rails::Engine
+    config.autoload_paths += Dir[root.join("app/models/**")]
+
+    config.to_prepare do
+      ActiveRecord::Base.observers = :activity_observer
+    end
+  end
+end

data/lib/fat_free_crm/errors.rb

@@ -0,0 +1,51 @@
+# Fat Free CRM
+# Copyright (C) 2008-2011 by Michael Dvorkin
+#
+# This program is free software: you can redistribute it and/or modify
+# it under the terms of the GNU Affero General Public License as published by
+# the Free Software Foundation, either version 3 of the License, or
+# (at your option) any later version.
+#
+# 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.  See the
+# GNU Affero General Public License for more details.
+#
+# You should have received a copy of the GNU Affero General Public License
+# along with this program.  If not, see <http://www.gnu.org/licenses/>.
+#------------------------------------------------------------------------------
+
+module FatFreeCRM
+  module ActiveModel
+    module Errors
+
+      # Override ActiveModel::Errors#each so we could display validation
+      # errors as is without rendering the attribute name. Simply place
+      # a caret as the first character of the error message.
+      #
+      # This feature was handled by 'advanced_errors' plugin in Rails 2.x
+      # version of Fat Free CRM.
+      #----------------------------------------------------------------------------
+      def self.included(base)
+        base.class_eval do
+          alias_method :each, :each_with_explicit_error
+        end
+      end
+
+      def each_with_explicit_error
+        keys.each do |attribute|
+          self[attribute].each do |error|
+            if error.start_with?('^')
+              yield :base, error[1..-1]   # Drop the attribute.
+            else
+              yield attribute, error      # This is default Rails3 behavior.
+            end
+          end
+        end
+      end
+
+    end
+  end
+end
+
+ActiveModel::Errors.send(:include, FatFreeCRM::ActiveModel::Errors)

data/lib/fat_free_crm/exceptions.rb

@@ -0,0 +1,34 @@
+# Fat Free CRM
+# Copyright (C) 2008-2011 by Michael Dvorkin
+#
+# This program is free software: you can redistribute it and/or modify
+# it under the terms of the GNU Affero General Public License as published by
+# the Free Software Foundation, either version 3 of the License, or
+# (at your option) any later version.
+#
+# 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.  See the
+# GNU Affero General Public License for more details.
+#
+# You should have received a copy of the GNU Affero General Public License
+# along with this program.  If not, see <http://www.gnu.org/licenses/>.
+#------------------------------------------------------------------------------
+
+module FatFreeCRM
+  class MissingSettings < StandardError; end
+  class ObsoleteSettings < StandardError; end
+end
+
+class ActionController::Base
+  rescue_from FatFreeCRM::MissingSettings,  :with => :render_fat_free_crm_exception
+  rescue_from FatFreeCRM::ObsoleteSettings, :with => :render_fat_free_crm_exception
+
+  private
+
+  def render_fat_free_crm_exception(exception)
+    logger.error exception.inspect
+    render :layout => false, :template => "/layouts/500.html.haml", :status => 500, :locals => { :exception => exception.to_s.html_safe }
+  end
+end
+

data/lib/fat_free_crm/exportable.rb

@@ -0,0 +1,63 @@
+# Fat Free CRM
+# Copyright (C) 2008-2011 by Michael Dvorkin
+#
+# This program is free software: you can redistribute it and/or modify
+# it under the terms of the GNU Affero General Public License as published by
+# the Free Software Foundation, either version 3 of the License, or
+# (at your option) any later version.
+#
+# 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.  See the
+# GNU Affero General Public License for more details.
+#
+# You should have received a copy of the GNU Affero General Public License
+# along with this program.  If not, see <http://www.gnu.org/licenses/>.
+#------------------------------------------------------------------------------
+
+module FatFreeCRM
+  module Exportable
+
+    def self.included(base)
+      base.extend(ClassMethods)
+    end
+
+    module ClassMethods
+      def exportable(options = {})
+        unless included_modules.include?(InstanceMethods)
+          include InstanceMethods
+          extend SingletonMethods
+        end
+      end
+    end
+
+    module InstanceMethods
+      def user_id_full_name
+        user = self.user
+        user ? user.full_name : ''
+      end
+
+      def self.included(base)
+        if base.instance_methods.include?(:assignee) or base.instance_methods.include?('assignee')
+          define_method :assigned_to_full_name do
+            user = self.assignee
+            user ? user.full_name : ''
+          end
+        end
+
+        if base.instance_methods.include?(:completor) or base.instance_methods.include?('completor')
+          define_method :completed_by_full_name do
+            user = self.completor
+            user ? user.full_name : ''
+          end
+        end
+      end
+    end
+
+    module SingletonMethods
+    end
+
+  end # Exportable
+end # FatFreeCRM
+
+ActiveRecord::Base.send(:include, FatFreeCRM::Exportable)

data/lib/fat_free_crm/fields.rb

@@ -0,0 +1,76 @@
+# Fat Free CRM
+# Copyright (C) 2008-2011 by Michael Dvorkin
+#
+# This program is free software: you can redistribute it and/or modify
+# it under the terms of the GNU Affero General Public License as published by
+# the Free Software Foundation, either version 3 of the License, or
+# (at your option) any later version.
+#
+# 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.  See the
+# GNU Affero General Public License for more details.
+#
+# You should have received a copy of the GNU Affero General Public License
+# along with this program.  If not, see <http://www.gnu.org/licenses/>.
+#------------------------------------------------------------------------------
+
+module FatFreeCRM
+  module Fields
+
+    def self.included(base)
+      base.extend(ClassMethods)
+    end
+
+    module ClassMethods
+      def has_fields
+        unless included_modules.include?(InstanceMethods)
+          extend SingletonMethods
+          include InstanceMethods
+        end
+      end
+    end
+
+    module SingletonMethods
+      def field_groups
+        FieldGroup.where(:klass_name => self.name).order(:position)
+      end
+
+      def fields
+        field_groups.map(&:fields).flatten
+      end
+    end
+
+    module InstanceMethods
+      def field_groups
+        field_groups = self.class.field_groups
+        respond_to?(:tag_ids) ? field_groups.with_tags(tag_ids) : field_groups
+      end
+
+      def assign_attributes(new_attributes, options = {})
+        super
+      # If attribute is unknown, a new custom field may have been added.
+      # Refresh columns and try again.
+      rescue ActiveRecord::UnknownAttributeError
+        self.class.reset_column_information
+        super
+      end
+
+      def method_missing(method_id, *args, &block)
+        if method_id.to_s =~ /^cf_/
+          # Refresh columns and try again.
+          self.class.reset_column_information
+          # If new record, create new object from class, else reload class
+          object = self.new_record? ? self.class.new : (self.reload && self)
+          # Try again if object now responds to method, else return nil
+          object.respond_to?(method_id) ? object.send(method_id, *args) : nil
+        else
+          super
+        end
+      end
+    end
+  end
+end
+
+ActiveRecord::Base.send(:include, FatFreeCRM::Fields)
+

data/lib/fat_free_crm/gem_dependencies.rb

@@ -0,0 +1,16 @@
+require 'rails/all'
+require 'jquery-rails'
+require 'prototype-rails'
+require 'haml'
+require 'sass'
+require 'acts_as_commentable'
+require 'acts_as_list'
+require 'acts-as-taggable-on'
+require 'paperclip'
+require 'simple_form'
+require 'will_paginate'
+require 'authlogic'
+require 'chosen-rails'
+require 'ajax-chosen-rails'
+require 'ransack'
+require 'paper_trail'

data/lib/fat_free_crm/gem_ext.rb

@@ -0,0 +1,8 @@
+require "fat_free_crm/gem_ext/rails/text_helper"
+require "fat_free_crm/gem_ext/active_record/schema_dumper"
+require "fat_free_crm/gem_ext/active_support/buffered_logger"
+require "fat_free_crm/gem_ext/active_model/serializers/xml/serializer/attribute"
+require "fat_free_crm/gem_ext/action_controller/base"
+require "fat_free_crm/gem_ext/authlogic/session/cookies"
+require "fat_free_crm/gem_ext/simple_form/action_view_extensions/form_helper"
+require "fat_free_crm/gem_ext/rake/task" if defined?(Rake)

data/lib/fat_free_crm/gem_ext/action_controller/base.rb

@@ -0,0 +1,28 @@
+# Fat Free CRM
+# Copyright (C) 2008-2011 by Michael Dvorkin
+#
+# This program is free software: you can redistribute it and/or modify
+# it under the terms of the GNU Affero General Public License as published by
+# the Free Software Foundation, either version 3 of the License, or
+# (at your option) any later version.
+#
+# 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.  See the
+# GNU Affero General Public License for more details.
+#
+# You should have received a copy of the GNU Affero General Public License
+# along with this program.  If not, see <http://www.gnu.org/licenses/>.
+#------------------------------------------------------------------------------
+
+unless Rails.env.test?
+  class ActionController::Base
+    # Remove helpers residing in subdirectories from the list of application
+    # helpers.  Basically we don't want helpers in app/helpers/admin/* to
+    # override the ones in app/helpers/*.
+    #----------------------------------------------------------------------------
+    def self.all_application_helpers
+      super.delete_if { |helper| helper.include?(File::SEPARATOR) }
+    end
+  end
+end

data/lib/fat_free_crm/gem_ext/active_model/serializers/xml/serializer/attribute.rb

@@ -0,0 +1,29 @@
+# Fat Free CRM
+# Copyright (C) 2008-2011 by Michael Dvorkin
+#
+# This program is free software: you can redistribute it and/or modify
+# it under the terms of the GNU Affero General Public License as published by
+# the Free Software Foundation, either version 3 of the License, or
+# (at your option) any later version.
+#
+# 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.  See the
+# GNU Affero General Public License for more details.
+#
+# You should have received a copy of the GNU Affero General Public License
+# along with this program.  If not, see <http://www.gnu.org/licenses/>.
+#------------------------------------------------------------------------------
+
+# Take into account current time zone when serializing datetime values
+# See: https://rails.lighthouseapp.com/projects/8994/tickets/6096-to_xml-datetime-format-regression
+
+ActiveModel::Serializers::Xml::Serializer::Attribute.class_eval do
+  def initialize(name, serializable, raw_value=nil)
+    @name, @serializable = name, serializable
+    raw_value = raw_value.in_time_zone if raw_value.respond_to?(:in_time_zone)
+    @value = raw_value || @serializable.send(name)
+    @type  = compute_type
+  end
+end
+

data/lib/fat_free_crm/gem_ext/active_record/schema_dumper.rb

@@ -0,0 +1,22 @@
+#
+# Override SchemaDumper so that it ignores custom fields when generating db/schema.rb
+#
+require 'active_record'
+
+unless ENV['INCLUDE_CUSTOM_FIELDS']
+  module ActiveRecord
+    SchemaDumper.class_eval do
+      def initialize_with_ignored_custom_fields(connection)
+        # Override :columns method on this connection, to ignore any custom field columns
+        connection.class_eval do
+          def columns(*args)
+            super.reject { |c| c.name.start_with? "cf_" }
+          end
+        end
+        initialize_without_ignored_custom_fields(connection)
+      end
+
+      alias_method_chain :initialize, :ignored_custom_fields
+    end
+  end
+end

data/lib/fat_free_crm/gem_ext/active_support/buffered_logger.rb

@@ -0,0 +1,32 @@
+# Fat Free CRM
+# Copyright (C) 2008-2011 by Michael Dvorkin
+#
+# This program is free software: you can redistribute it and/or modify
+# it under the terms of the GNU Affero General Public License as published by
+# the Free Software Foundation, either version 3 of the License, or
+# (at your option) any later version.
+#
+# 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.  See the
+# GNU Affero General Public License for more details.
+#
+# You should have received a copy of the GNU Affero General Public License
+# along with this program.  If not, see <http://www.gnu.org/licenses/>.
+#------------------------------------------------------------------------------
+
+class ActiveSupport::BufferedLogger
+
+  BRIGHT = "\033[1;37;40m"
+  NORMAL = "\033[0m"
+
+  def p(*args)
+    info "#{BRIGHT}\n\n" << args.join(" ") << "#{NORMAL}\n\n\n"
+  end
+
+  def i(*args)
+    info "#{BRIGHT}\n\n" << args.map(&:inspect).join(" ") << "#{NORMAL}\n\n\n"
+  end
+
+end
+

data/lib/fat_free_crm/gem_ext/authlogic/session/cookies.rb

@@ -0,0 +1,11 @@
+require 'action_controller'
+require 'authlogic'
+
+# Fix bug for default cookie name (use klass_name, instead of guessed_klass_name)
+# Pull request pending: https://github.com/binarylogic/authlogic/pull/281
+Authlogic::Session::Base.instance_eval do
+  def cookie_key(value = nil)
+    rw_config(:cookie_key, value, "#{klass_name.underscore}_credentials")
+  end
+end
+

data/lib/fat_free_crm/gem_ext/rails/engine.rb

@@ -0,0 +1,17 @@
+# Override engine views so that plugin views have higher priority.
+Rails::Engine.initializers.detect{|i| i.name == :add_view_paths }.
+  instance_variable_set("@block", Proc.new {
+    views = paths["app/views"].to_a
+    unless views.empty?
+      ActiveSupport.on_load(:action_controller){ append_view_path(views) }
+      ActiveSupport.on_load(:action_mailer){ append_view_path(views) }
+    end
+  }
+)
+
+# Override I18n load paths so that plugin locales have higher priority.
+Rails::Engine.initializers.detect{|i| i.name == :add_locales }.
+  instance_variable_set("@block", Proc.new {
+    config.i18n.railties_load_path.concat( paths["config/locales"].to_a ).reverse!
+  }
+)

data/lib/fat_free_crm/gem_ext/rails/text_helper.rb

@@ -0,0 +1,125 @@
+module ActionView
+  module Helpers #:nodoc:
+    module TextHelper
+      # Turns all URLs and e-mail addresses into clickable links. The <tt>:link</tt> option
+      # will limit what should be linked. You can add HTML attributes to the links using
+      # <tt>:html</tt>. Possible values for <tt>:link</tt> are <tt>:all</tt> (default),
+      # <tt>:email_addresses</tt>, and <tt>:urls</tt>. If a block is given, each URL and
+      # e-mail address is yielded and the result is used as the link text.
+      #
+      # ==== Examples
+      #   auto_link("Go to http://www.rubyonrails.org and say hello to david@loudthinking.com")
+      #   # => "Go to <a href=\"http://www.rubyonrails.org\">http://www.rubyonrails.org</a> and
+      #   #     say hello to <a href=\"mailto:david@loudthinking.com\">david@loudthinking.com</a>"
+      #
+      #   auto_link("Visit http://www.loudthinking.com/ or e-mail david@loudthinking.com", :link => :urls)
+      #   # => "Visit <a href=\"http://www.loudthinking.com/\">http://www.loudthinking.com/</a>
+      #   #     or e-mail david@loudthinking.com"
+      #
+      #   auto_link("Visit http://www.loudthinking.com/ or e-mail david@loudthinking.com", :link => :email_addresses)
+      #   # => "Visit http://www.loudthinking.com/ or e-mail <a href=\"mailto:david@loudthinking.com\">david@loudthinking.com</a>"
+      #
+      #   post_body = "Welcome to my new blog at http://www.myblog.com/.  Please e-mail me at me@email.com."
+      #   auto_link(post_body, :html => { :target => '_blank' }) do |text|
+      #     truncate(text, 15)
+      #   end
+      #   # => "Welcome to my new blog at <a href=\"http://www.myblog.com/\" target=\"_blank\">http://www.m...</a>.
+      #         Please e-mail me at <a href=\"mailto:me@email.com\">me@email.com</a>."
+      #
+      #
+      # You can still use <tt>auto_link</tt> with the old API that accepts the
+      # +link+ as its optional second parameter and the +html_options+ hash
+      # as its optional third parameter:
+      #   post_body = "Welcome to my new blog at http://www.myblog.com/. Please e-mail me at me@email.com."
+      #   auto_link(post_body, :urls)     # => Once upon\na time
+      #   # => "Welcome to my new blog at <a href=\"http://www.myblog.com/\">http://www.myblog.com</a>.
+      #         Please e-mail me at me@email.com."
+      #
+      #   auto_link(post_body, :all, :target => "_blank")     # => Once upon\na time
+      #   # => "Welcome to my new blog at <a href=\"http://www.myblog.com/\" target=\"_blank\">http://www.myblog.com</a>.
+      #         Please e-mail me at <a href=\"mailto:me@email.com\">me@email.com</a>."
+      def auto_link(text, *args, &block)#link = :all, html = {}, &block)
+        return '' if text.blank?
+
+        options = args.size == 2 ? {} : args.extract_options! # this is necessary because the old auto_link API has a Hash as its last parameter
+        unless args.empty?
+          options[:link] = args[0] || :all
+          options[:html] = args[1] || {}
+        end
+        options.reverse_merge!(:link => :all, :html => {})
+
+        case options[:link].to_sym
+          when :all                         then auto_link_email_addresses(auto_link_urls(text, options[:html], options, &block), options[:html], &block)
+          when :email_addresses             then auto_link_email_addresses(text, options[:html], &block)
+          when :urls                        then auto_link_urls(text, options[:html], options, &block)
+        end
+      end
+
+      private
+        AUTO_LINK_RE = %r{
+            (?: ([\w+.:-]+:)// | www\. )
+            [^\s<]+
+          }x
+
+        # regexps for determining context, used high-volume
+        AUTO_LINK_CRE = [/<[^>]+$/, /^[^>]*>/, /<a\b.*?>/i, /<\/a>/i]
+
+        AUTO_EMAIL_RE = /[\w.!#\$%+-]+@[\w-]+(?:\.[\w-]+)+/
+
+        BRACKETS = { ']' => '[', ')' => '(', '}' => '{' }
+
+        # Turns all urls into clickable links.  If a block is given, each url
+        # is yielded and the result is used as the link text.
+        def auto_link_urls(text, html_options = {}, options = {})
+          link_attributes = html_options.stringify_keys
+          text.to_str.gsub(AUTO_LINK_RE) do
+            scheme, href = $1, $&
+            punctuation = []
+
+            if auto_linked?($`, $')
+              # do not change string; URL is already linked
+              href
+            else
+              # don't include trailing punctuation character as part of the URL
+              while href.sub!(/[^\w\/-]$/, '')
+                punctuation.push $&
+                if opening = BRACKETS[punctuation.last] and href.scan(opening).size > href.scan(punctuation.last).size
+                  href << punctuation.pop
+                  break
+                end
+              end
+
+              link_text = block_given? ? yield(href) : href
+              href = 'http://' + href unless scheme
+
+              sanitize = options[:sanitize] != false
+              content_tag(:a, link_text, link_attributes.merge('href' => href), sanitize) + punctuation.reverse.join('')
+            end
+          end.html_safe
+        end
+
+        # Turns all email addresses into clickable links.  If a block is given,
+        # each email is yielded and the result is used as the link text.
+        def auto_link_email_addresses(text, html_options = {}, options = {})
+          text.to_str.gsub(AUTO_EMAIL_RE) do
+            text = $&
+
+            if auto_linked?($`, $')
+              text.html_safe
+            else
+              display_text = block_given? ? yield(text) : text
+              display_text = sanitize(display_text) unless options[:sanitize] == false
+              mail_to text, display_text, html_options
+            end
+          end.html_safe
+        end
+
+        # Detects already linked context or position in the middle of a tag
+        def auto_linked?(left, right)
+          (left =~ AUTO_LINK_CRE[0] and right =~ AUTO_LINK_CRE[1]) or
+            (left.rindex(AUTO_LINK_CRE[2]) and $' !~ AUTO_LINK_CRE[3])
+        end
+    end
+  end
+end
+