date_book 0.0.1

data/db/migrate/20170807133845_create_calendars.rb

@@ -0,0 +1,11 @@
+class CreateCalendars < ActiveRecord::Migration[5.1]
+  def change
+    create_table :calendars do |t|
+      t.string :name
+      t.string :slug
+      t.text :description
+      t.string :css_class
+    end
+    add_index :calendars, :slug, unique: true
+  end
+end

data/db/migrate/20170807133846_create_events.rb

@@ -0,0 +1,20 @@
+class CreateEvents < ActiveRecord::Migration[5.1]
+  def change
+    create_table :events do |t|
+      t.references :calendar
+
+      t.string :name
+      t.string :slug, unique: true
+      t.text :description
+      t.string :css_class
+
+      t.date :start_date
+      t.time :start_time
+
+      t.integer :duration
+      t.boolean :all_day
+
+      t.timestamps
+    end
+  end
+end

data/db/migrate/20170807133847_create_schedules.rb

@@ -0,0 +1,25 @@
+class CreateSchedules < ActiveRecord::Migration[5.1]
+  def self.up
+    create_table :schedules do |t|
+      t.references :schedulable, polymorphic: true
+      
+      t.date :date
+      t.time :time
+      
+      t.string :rule
+      t.string :interval
+      
+      t.text :day
+      t.text :day_of_week
+      
+      t.datetime :until
+      t.integer :count
+      
+      t.timestamps
+    end
+  end
+
+  def self.down
+    drop_table :schedules
+  end
+end

data/db/migrate/20170807133848_add_fields_to_schedule.rb

@@ -0,0 +1,6 @@
+class AddFieldsToSchedule < ActiveRecord::Migration[5.1]
+  def change
+    add_column :schedules, :duration, :integer, default: 3600
+    add_column :schedules, :all_day, :boolean, default: false
+  end
+end

data/db/migrate/20170807133849_create_event_occurrences.rb

@@ -0,0 +1,16 @@
+class CreateEventOccurrences < ActiveRecord::Migration[5.1]
+  def self.up
+    create_table :event_occurrences do |t|
+
+      t.references :schedulable, polymorphic: true
+      t.datetime :date
+
+      t.timestamps
+      
+    end
+  end
+
+  def self.down
+    drop_table :event_occurrences
+  end
+end

data/db/migrate/20170807133850_add_fields_to_event_occurrences.rb

@@ -0,0 +1,5 @@
+class AddFieldsToEventOccurrences < ActiveRecord::Migration[5.1]
+  def change
+    add_column :event_occurrences, :end_date, :datetime
+  end
+end

data/lib/date_book.rb

@@ -0,0 +1,40 @@
+# frozen_string_literal: true
+
+require 'date_book/engine'
+
+module DateBook
+  require 'rails-i18n'
+
+  require 'devise' # Needs to be required before paid_up/mixins
+  require 'cancan'
+  require 'rolify'
+
+  require 'sass'
+  require 'haml-rails'
+  require 'bootstrap_leather'
+  require 'bootstrap_form'
+  require 'bootstrap-wysihtml5-rails'
+
+  require 'schedulable'
+  require 'fullcalendar-rails'
+
+  require 'date_book/configuration'
+  require 'date_book/engine'
+  require 'date_book/localization'
+  require 'date_book/version'
+
+  require 'date_book/concerns/ability'
+  require 'date_book/concerns/acts_as_calendar'
+  require 'date_book/concerns/acts_as_event'
+  require 'date_book/concerns/acts_as_event_occurrence'
+  require 'date_book/concerns/acts_as_ownable'
+  require 'date_book/concerns/acts_as_owner'
+  require 'date_book/concerns/acts_as_schedule'
+end
+
+ActiveRecord::Base.send(:extend, DateBook::ActsAsOwnable)
+ActiveRecord::Base.send(:extend, DateBook::ActsAsOwner)
+ActiveRecord::Base.send(:extend, DateBook::ActsAsCalendar)
+ActiveRecord::Base.send(:extend, DateBook::ActsAsEvent)
+ActiveRecord::Base.send(:extend, DateBook::ActsAsEventOccurrence)
+ActiveRecord::Base.send(:extend, DateBook::ActsAsSchedule)

data/lib/date_book/concerns/ability.rb

@@ -0,0 +1,27 @@
+# frozen_string_literal: true
+
+module DateBook
+  # DateBook Ability model
+  module Ability
+    include CanCan::Ability
+
+    def initialize_date_book(user)
+      alias_action :index, :show, :popover, to: :read
+      if user.has_role? :admin
+        can :manage, :all
+      elsif user.new_record?
+        can :read, Calendar
+        can :read, Event
+      else
+        can :read, Calendar
+        can :create, Calendar
+        can :manage, Calendar, id: Calendar.with_role(:owner, user).ids
+
+        can :read, Event
+        cannot :create, Event
+        can :manage, Event, calendar_id: Calendar.with_role(:owner, user).ids
+        can :manage, Event, id: Event.with_role(:owner, user).ids
+      end
+    end
+  end
+end

data/lib/date_book/concerns/acts_as_calendar.rb

@@ -0,0 +1,29 @@
+module DateBook
+  module ActsAsCalendar
+    def acts_as_calendar(options = {})
+      acts_as_ownable
+
+      validates_presence_of :name, :slug
+
+      # FriendlyId Gem
+      extend FriendlyId
+      friendly_id :name, use: :slugged
+
+      # Relationships
+      has_many :events, dependent: :destroy
+
+      include InstanceMethods
+      extend ClassMethods
+    end
+
+    module InstanceMethods
+      def event_occurrences
+        events.as_occurrences.ascending
+      end
+    end
+
+    module ClassMethods
+    end
+
+  end
+end

data/lib/date_book/concerns/acts_as_event.rb

@@ -0,0 +1,66 @@
+module DateBook
+  module ActsAsEvent
+    def acts_as_event(options = {})
+      acts_as_ownable
+
+      delegate :all_day, :duration, to: :schedule
+
+      validates_presence_of :name, :slug, :calendar
+
+      # FriendlyId Gem
+      extend FriendlyId
+      friendly_id :name, use: :slugged
+
+      # Schedulable Gem
+      acts_as_schedulable :schedule, occurrences: :event_occurrences
+
+      # Relationships
+      belongs_to :calendar
+
+      # Nested Forms gem
+      accepts_nested_attributes_for :schedule
+
+      # Scopes
+      scope :ending_after, -> (start_date) {
+        where id: ::EventOccurrence.ending_after(start_date).event_ids
+      }
+      scope :starting_before, -> (end_date) {
+        where id: ::EventOccurrence.starting_before(end_date).event_ids
+      }
+
+      include InstanceMethods
+      extend ClassMethods
+    end
+
+    module InstanceMethods
+      def schedule
+        super || build_schedule(date: Time.now.to_date, time: Time.now.to_s(:time))
+      end
+
+      def previous_occurrence(occurrence = nil)
+        before = occurrence.present? ? occurrence.start_date : Time.now
+        event_occurrences.starting_before(before).descending.first
+      end
+
+      def next_occurrence(occurrence = nil)
+        after = occurrence.present? ? occurrence.end_date + 1.second : Time.now
+        event_occurrences.ending_after(after).ascending.first
+      end
+
+      def url(occurrence = nil)
+        DateBook::Engine.routes.url_helpers.calendar_event_path(calendar, slug, occurrence_id: occurrence.id)
+      end
+
+      def popover_url(occurrence = nil)
+        DateBook::Engine.routes.url_helpers.popover_calendar_event_path(calendar, slug, occurrence_id: occurrence.id)
+      end
+    end
+
+    module ClassMethods
+      def as_occurrences
+        ::EventOccurrence.for_schedulables('Event', ids)
+      end
+    end
+
+  end
+end

data/lib/date_book/concerns/acts_as_event_occurrence.rb

@@ -0,0 +1,67 @@
+module DateBook
+  module ActsAsEventOccurrence
+    def acts_as_event_occurrence(options = {})
+      before_save :set_end_date
+
+      alias_attribute :start_date, :date
+
+      belongs_to :schedulable, polymorphic: true
+      alias_attribute :event, :schedulable
+      delegate :schedule, to: :schedulable
+
+      # Scopes
+      scope :remaining, -> { where('date >= ?',Time.now) }
+      scope :previous, -> { where('date < ?',Time.now) }
+      scope :ending_after, -> (start_date) { (where 'end_date >= ?', start_date) }
+      scope :starting_before, -> (end_date) { where 'date < ?', end_date }
+      scope :for_events, -> { where(schedulable_type: 'Event') }
+      scope :for_schedulables, -> (model_name, ids) { where(schedulable_type: model_name).where('schedulable_id IN (?)',  ids) }
+      scope :ascending, -> { order date: :asc }
+      scope :descending, -> { order date: :desc }
+
+      include InstanceMethods
+      extend ClassMethods
+    end
+
+    module InstanceMethods
+      def url
+        event.url(self)
+      end
+
+      def popover_url
+        event.popover_url(self)
+      end
+
+      def start_moment
+        if schedule.all_day
+          I18n.localize date, format: :moment_date
+        else
+          I18n.localize date, format: :moment_datetime
+        end
+      end
+      alias_method :start, :start_moment
+
+      def end_moment
+        if schedule.all_day
+          I18n.localize end_date, format: :moment_date
+        else
+          I18n.localize end_date, format: :moment_datetime
+        end
+      end
+      alias_method :end, :end_moment
+
+      private
+
+      def set_end_date
+        self.end_date = date + schedulable.schedule.duration
+      end
+    end
+
+    module ClassMethods
+      def event_ids
+        for_events.pluck(:schedulable_id).uniq
+      end
+    end
+
+  end
+end

data/lib/date_book/concerns/acts_as_ownable.rb

@@ -0,0 +1,29 @@
+module DateBook
+  module ActsAsOwnable
+    def acts_as_ownable(options = {})
+      # Rolify Gem
+      resourcify
+
+      scope :readable_by, ->(user) { accessible_by(::Ability.new(user)) }
+
+      include InstanceMethods
+    end
+
+    module InstanceMethods
+      def owners
+        User.with_role(:owner, self)
+      end
+
+      def owners=(revised_owners)
+        # Remove owners not listed in new value
+        owners.each do |owner|
+          owner.remove_role(:owner, self) unless revised_owners.include? owner
+        end
+        # Add owners not previously held
+        revised_owners.each do |revised_owner|
+          revised_owner.add_role(:owner, self) unless owners.include? revised_owner
+        end
+      end
+    end
+  end
+end

data/lib/date_book/concerns/acts_as_owner.rb

@@ -0,0 +1,18 @@
+module DateBook
+  module ActsAsOwner
+    def acts_as_owner(options = {})
+      include InstanceMethods
+      extend ClassMethods
+    end
+
+    module InstanceMethods
+      def calendars
+        Calendar.with_role(:owner, self)
+      end
+    end
+
+    module ClassMethods
+    end
+
+  end
+end

data/lib/date_book/concerns/acts_as_schedule.rb

@@ -0,0 +1,44 @@
+module DateBook
+  module ActsAsSchedule
+    def acts_as_schedule(options = {})
+      include InstanceMethods
+    end
+
+    module InstanceMethods
+      def duration_attributes
+        OpenStruct.new count: duration_count, unit: duration_unit
+      end
+
+      def duration_attributes=(value)
+        if value.is_a? Hash
+          self.duration = value['count'].to_i.send(value['unit'].to_sym).to_i
+        end
+        super value
+      end
+
+      def duration_count
+        duration / 1.send(duration_unit.singularize.to_sym).to_i
+      end
+
+      def duration_unit
+        return 'seconds' if duration == 0
+        DateBook.configuration.duration_units.select { |x| is_unit? x }.first || 'seconds'
+      end
+
+      def human_date
+        I18n.localize date, format: :human_date
+      end
+
+      def human_time
+        I18n.localize time, format: :human_time
+      end
+
+      private
+
+      def is_unit?(unit)
+        duration % 1.send(unit.singularize.to_sym).to_i == 0
+      end
+    end
+
+  end
+end

data/lib/date_book/configuration.rb

@@ -0,0 +1,43 @@
+# frozen_string_literal: true
+
+# DateBook Module
+module DateBook
+  def self.configure(configuration = DateBook::Configuration.new)
+    block_given? && yield(configuration)
+    @configuration = configuration
+  end
+
+  def self.configuration
+    @configuration ||= DateBook::Configuration.new
+  end
+
+  def self.weekdays
+    @weekdays ||= Date::DAYNAMES
+                     .map
+                     .with_index do |x, i|
+                       OpenStruct.new(id: i, name: x, slug: x.downcase)
+                     end
+                     .sort_by do |value|
+                       (value.id - week_start_index) % 7
+                     end
+  end
+
+  def self.week_start_index
+    @week_start_index ||= Date::DAYNAMES.find_index(configuration.week_starts_on)
+  end
+
+  # DateBook Configuration
+  class Configuration
+    attr_accessor(
+      :week_starts_on,
+      :rules,
+      :duration_units
+    )
+
+    def initialize
+      self.week_starts_on = 'Sunday'
+      self.rules = %w(singular daily weekly monthly)
+      self.duration_units = %w(years months weeks days hours minutes seconds)
+    end
+  end
+end