Noosfero/noosfero

require "builder"

class Event < Article
  has_many :invitations, class_name: "EventInvitation"

  attr_accessible :start_date, :end_date, :link, :address

  after_create :confirm_owner_presence

  def self.type_name
    _("Event")
  end

  settings_items :address, type: :string

  def link=(value)
    self.setting[:link] = maybe_add_http(URI.escape value.to_s)
  end

  def link
    maybe_add_http(self.setting[:link])
  end

  xss_terminate only: [:name, :body, :address], with: :white_list, on: :validation

  def initialize(*args)
    super(*args)
    self.start_date ||= DateTime.now
  end

  validates_presence_of :title, :start_date

  validates_each :start_date do |event, field, value|
    if event.end_date && event.start_date && event.start_date > event.end_date
      event.errors.add(:start_date, _("{fn} cannot come before end date.").fix_i18n)
    end
  end

  scope :by_day, ->date {
    where("start_date >= :start_date AND start_date <= :end_date AND end_date IS NULL OR (start_date <= :end_date  AND end_date >= :start_date)",
          start_date: date.beginning_of_day, end_date: date.end_of_day)
      .order("start_date ASC")
  }

  scope :next_events_from_month, ->date {
    date_temp = date.strftime("%Y-%m-%d")
    final_day = date.at_end_of_month
    order("start_date ASC")
      .where("start_date >= ? AND start_date <= ?", "#{date_temp}", "#{final_day}")
  }

  scope :by_month, ->date {
    order("start_date ASC")
      .where("EXTRACT(YEAR FROM start_date) = ? AND EXTRACT(MONTH FROM start_date) = ?", date.year, date.month)
  }

  include WhiteListFilter
  filter_iframes :body, :link, :address
  def iframe_whitelist
    profile && profile.environment && profile.environment.trusted_sites_for_iframe
  end

  def self.description
    _("A calendar event.")
  end

  def self.short_description
    _("Event")
  end

  def self.icon_name(article = nil)
    "event"
  end

  scope :by_range, ->range {
    where("start_date BETWEEN :start_day AND :end_day OR end_date BETWEEN :start_day AND :end_day",
          start_day: range.first, end_day: range.last)
  }

  def self.date_range(year, month)
    if year.nil? || month.nil?
      today = DateTime.now
      year = today.year
      month = today.month
    else
      year = year.to_i
      month = month.to_i
    end

    first_day = DateTime.new(year, month, 1)
    last_day = first_day + 1.month - 1.day

    first_day.to_date..last_day.to_date
  end

  def date_range
    start_date.to_date..(end_date || start_date).to_date
  end

  def first_paragraph
    paragraphs = Nokogiri::HTML.fragment(self.body).css("p")
    paragraphs.empty? ? "" : paragraphs.first.to_html
  end

  def to_html(options = {})
    event = self
    format = options[:format]

    proc do
      render file: "content_viewer/event_page", locals: { event: event,
                                                          format: format }
    end
  end

  def duration
    (((self.end_date || self.start_date) - self.start_date).to_i / 60 / 60 / 24) + 1
  end

  alias_method :article_lead, :lead
  def lead(length = nil)
    self.class.action_view.render "content_viewer/event_lead", event: self
  end

  def event?
    true
  end

  def notifiable?
    true
  end

  def can_display_media_panel?
    true
  end

  def self.can_display_blocks?
    false
  end

  def icon
    "calendar"
  end

  def custom_title
    true
  end

  def confirm_owner_presence
    if profile.kind_of?(Person)
      EventInvitation.create(event: self, guest: profile,
                             decision: EventInvitation::DECISIONS["yes"])
    end
  end

  include TranslatableContent
  include MaybeAddHttp
end