introspective_grape 0.0.3

data/spec/dummy/app/models/location.rb

@@ -0,0 +1,26 @@
+class Location < AbstractAdapter
+  has_many :locatables, dependent: :destroy
+  has_many :companies, through: :locatables, source: :locatable, source_type: 'Company'
+
+  has_many :beacons, class_name: 'LocationBeacon', dependent: :destroy
+  has_one  :gps,     class_name: 'LocationGps',    dependent: :destroy
+  delegate :lat,:lng,:alt, to: :gps
+
+  belongs_to :parent_location, foreign_key: :parent_location_id, class_name: 'Location', inverse_of: :child_locations
+  has_many   :child_locations, foreign_key: :parent_location_id, class_name: 'Location', dependent: :destroy, inverse_of: :parent_location
+
+  has_many :user_locations, dependent: :destroy
+
+  # isn't this list going to be kinda long? are there any reasonable constraints to put
+  # on this random bit of metadata?
+  validates_inclusion_of :kind, in: %w(airport terminal gate plane)
+
+  accepts_nested_attributes_for :child_locations, allow_destroy: true
+  accepts_nested_attributes_for :gps,             allow_destroy: true
+  accepts_nested_attributes_for :beacons,         allow_destroy: true
+
+  def coords
+    [gps.lat, gps.lng, gps.alt]
+  end
+
+end

data/spec/dummy/app/models/location_beacon.rb

@@ -0,0 +1,16 @@
+class LocationBeacon < AbstractAdapter
+  belongs_to :location
+  has_many :gps, through: :location
+  belongs_to :company
+
+  # B9407F30-F5F8-466E-AFF9-25556B57FE6D
+  validates_format_of :uuid, with: /[0-9a-fA-F]{32}/ # 32 digit hexadecimal UUID
+  validates_format_of :mac_address, with: /[0-9a-fA-F]{12}/ # 16 digit hexadecimal bluetooth MAC address
+
+  before_validation :massage_ids
+  def massage_ids
+    self.uuid        = (uuid||'').gsub(/[^0-9a-fA-F]+/,'').upcase
+    self.mac_address = (mac_address||'').gsub(/[^0-9a-fA-F]+/,'').upcase
+  end
+
+end

data/spec/dummy/app/models/location_gps.rb

@@ -0,0 +1,14 @@
+class LocationGps < AbstractAdapter
+  belongs_to :location
+  has_many :beacons, through: :location
+
+  # lat and lng in degrees altitude in meters
+  validates_numericality_of :lat, greater_than_or_equal_to: -90.0, less_than_or_equal_to: 90.0
+  validates_numericality_of :lng, greater_than_or_equal_to: -180.0, less_than_or_equal_to: 180.0
+  validates_numericality_of :alt
+
+  def distance_from(lat,lng) # calc distance between this location and the passed coords
+    Haversine.distance(self.lat,self.lng, lat,lng).to_meters
+  end
+
+end

data/spec/dummy/app/models/project.rb

@@ -0,0 +1,20 @@
+class Project < AbstractAdapter
+  belongs_to :owner, foreign_key: :owner_id, class_name: 'Company'
+
+  has_many :roles, as: :ownable
+  has_many :admins, through: :roles, source: :user
+  accepts_nested_attributes_for :roles, allow_destroy: true
+
+  has_many :project_jobs,  dependent: :destroy, inverse_of: :project
+  has_many :jobs,     through: :project_jobs
+  accepts_nested_attributes_for :project_jobs, allow_destroy: true
+  
+  has_many :user_project_jobs, dependent: :destroy, inverse_of: :project
+  has_many :users,    through: :user_project_jobs, inverse_of: :projects
+  accepts_nested_attributes_for :user_project_jobs, allow_destroy: true
+
+  has_many :teams, dependent: :destroy, inverse_of: :project
+  accepts_nested_attributes_for :teams, allow_destroy: true
+
+
+end

data/spec/dummy/app/models/project_job.rb

@@ -0,0 +1,7 @@
+class ProjectJob < AbstractAdapter
+  belongs_to :project
+  belongs_to :job
+
+  delegate :title, to: :job
+
+end

data/spec/dummy/app/models/role.rb

@@ -0,0 +1,30 @@
+class Role < AbstractAdapter
+  belongs_to :user
+  belongs_to :ownable, polymorphic: true
+
+  validates_uniqueness_of :user_id, scope: [:ownable_type,:ownable_id], unless: "user_id.nil?", message: "user has already been assigned that role"
+  validates_inclusion_of :ownable_type, in: ['SuperUser', 'Company', 'Project']
+
+  delegate :email, to: :user,              allow_nil: true
+  def attributes
+    super.merge(email: email)
+  end
+
+  def ownable
+    # return the SuperUser null object
+    ownable_type == 'SuperUser' ? SuperUser.new : super
+  end
+
+  def self.ownable_assign_options(model=nil)
+    ([SuperUser.new] + Company.all + Project.all).map { |i| [ "#{i.class}: #{i.name}", "#{i.class}-#{i.id}"] }
+  end
+
+  def ownable_assign
+    ownable.present? ? "#{ownable_type}-#{ownable_id}" : nil
+  end
+
+  def ownable_assign=(value)
+    self.ownable_type,self.ownable_id = value.split('-')
+  end
+
+end

data/spec/dummy/app/models/super_user.rb

@@ -0,0 +1,11 @@
+#require 'activerecord-tableless'
+class SuperUser < AbstractAdapter
+  # An empty ActiveRecord association for the polymorphic identity on Role.
+  # We could also just create a SuperUser table with one record to do this...
+  has_no_table :database => :pretend_success
+
+  def name
+    'Admin'
+  end
+
+end

data/spec/dummy/app/models/team.rb

@@ -0,0 +1,9 @@
+class Team < AbstractAdapter
+  belongs_to :project
+  belongs_to :creator, class_name: 'User'
+
+  has_many :team_users, inverse_of: :team
+  has_many :users, through: :team_users
+  accepts_nested_attributes_for :team_users, allow_destroy: true
+
+end

data/spec/dummy/app/models/team_user.rb

@@ -0,0 +1,13 @@
+class TeamUser < AbstractAdapter
+  belongs_to :user
+  belongs_to :team
+
+  validate :user_on_project
+
+  def user_on_project
+    unless user && team && user.projects.include?(team.project)
+      errors.add(:user, "#{user.try(:name)} is not on the #{team.try(:project).try(:name)} project")
+    end
+  end
+
+end

data/spec/dummy/app/models/user/chatter.rb

@@ -0,0 +1,79 @@
+module User::Chatter
+
+  def message_query(chat_id, new = true)
+    messages.joins(:chat_message_users) 
+    .where('chat_message_users.user_id'=> id)
+    .where(new ? {'chat_message_users.read_at'=>nil} : '')
+    .where(chat_id ? {'chat_messages.chat_id'=> chat_id} : '')
+    .order('') # or it will add an order by id clause that breaks the count query.
+  end
+
+  def new_messages?(chat=nil) # returns a hash of chat_ids with new message counts 
+    chat_id = chat.kind_of?(Chat) ? chat.id : chat
+    new = message_query(chat_id, new = true)
+          .select("chat_messages.chat_id, count(chat_messages.id) as count")
+          .group('chat_id')
+
+    chat ? { chat_id => new.first.try(:count)||0 } : Hash[new.map {|c| [c.chat_id, c.count]} ]
+  end
+
+  def read_messages(chat= nil, mark_as_read= false, new= true)
+    chat_id = chat.kind_of?(Chat) ? chat.id : chat
+    new = message_query(chat_id, new).order('chat_messages.created_at').includes(:author) # :chat?
+    new.map(&:chat).uniq.each {|chat| mark_as_read(chat) } if mark_as_read
+    new
+  end
+
+  def chat(users, message)
+    users = [users].flatten
+    users = users.first.kind_of?(User) ? users : User.where(id: users)
+    chat  = Chat.create(creator: self)
+    chat.users.push users
+    chat.messages.build(message: message, author: self)
+    chat.save! 
+    chat
+  end
+
+  def reply(chat, message)
+    chat = chat.kind_of?(Chat) ? chat : Chat.find(chat)
+    mark_as_read(chat) # a reply implies that the thread has been read
+    chat.messages.build(message: message, author: self)
+    chat.save!
+    chat
+  end
+
+  def add_chatters(chat, users)
+    users = [users].flatten
+    users = users.first.kind_of?(User) ? users : User.where(id: users)
+    chat  = chat.kind_of?(Chat) ? chat : Chat.find(chat)
+
+    if chat.active_users.include?(self) # only current participants can add new users
+      chat.users.push users
+      chat.messages.build(chat: chat, author: self, message: "#{self.name} [[ADDED_USER_MESSAGE]] #{users.map(&:name).join(',')}")
+      chat.save!
+    else 
+      chat.errors[:base] << "Only current chat participants can add users."
+      raise ActiveRecord::RecordInvalid.new(chat)
+    end
+  end
+
+  def leave_chat(chat)
+    chat = chat.kind_of?(Chat) ? chat : Chat.find(chat)
+
+    if chat.active_users.include?(self)
+      reply(chat, "#{name} [[DEPARTS_MESSAGE]]")
+      chat.chat_users.detect {|cu| cu.user_id == self.id}.update_attributes(departed_at: Time.now)
+    else
+      true
+    end
+  end
+
+  def mark_as_read(chat)
+    ChatMessageUser.joins(:chat_message).where('read_at IS NULL AND chat_messages.chat_id = ? AND user_id = ?', chat.id, id).update_all(read_at: Time.now)
+  end
+
+  def mark_messages_as_read(messages)
+    chat_message_users.where("chat_message_id in (?) and read_at IS NULL", messages.map(&:id)).update_all(read_at: Time.now)
+  end
+
+end

data/spec/dummy/app/models/user.rb

@@ -0,0 +1,84 @@
+#require 'devise/async'
+class User < AbstractAdapter
+  # Include default devise modules. Others available are:
+  # :confirmable, :lockable, :timeoutable and :omniauthable
+  devise :database_authenticatable, :registerable, :async, :confirmable,
+         :recoverable, :rememberable, :trackable, :validatable, :lockable
+
+  scope :active,   -> { where(:locked_at => nil) }
+  scope :inactive, -> { where('locked_at is not null') }
+
+  has_many :user_locations, dependent: :destroy
+
+  has_many :user_project_jobs, dependent: :destroy, inverse_of: :user
+  has_many :jobs,     through: :user_project_jobs, inverse_of: :users
+  has_many :projects, through: :user_project_jobs, inverse_of: :users
+  accepts_nested_attributes_for :user_project_jobs
+
+  before_validation :set_default_password_from_project, on: :create
+
+  has_many :team_users
+  has_many :teams, through: :team_users
+
+  has_one :avatar, class_name: 'Image', as: :imageable
+  accepts_nested_attributes_for :avatar, allow_destroy: true
+
+
+  has_many :own_chats, foreign_key: :creator_id, class_name: 'Chat'
+  has_many :chat_users
+  has_many :chats, through: :chat_users
+  has_many :chat_message_users
+  has_many :messages, ->{ where('chat_messages.created_at >= chat_users.created_at and (chat_users.departed_at IS NULL OR chat_messages.created_at <= chat_users.departed_at)') }, through: :chats 
+  include User::Chatter
+
+  has_many :roles, dependent: :destroy, inverse_of: :user
+  accepts_nested_attributes_for :roles, allow_destroy: true
+  has_many :admin_companies, through: :roles, source: :ownable, source_type: Company
+  has_many :admin_projects,  through: :roles, source: :ownable, source_type: Project
+
+  def all_admin_projects # aggregate companies' projects with project admin roles
+    (admin_companies.map(&:projects)+admin_projects).flatten
+  end
+
+  def superuser?
+    roles && roles.detect{|r| r.ownable_type == 'SuperUser' }.present?
+  end
+
+  def admin?(record)
+    superuser? || roles.detect{|r| r.ownable == record }.present?
+  end
+
+  def company_admin? # an admin of any company
+    superuser? || roles.detect{|r| r.ownable_type == 'Company' }.present?
+  end
+
+  def project_admin? # an admin of any project
+    superuser? || company_admin? || roles.detect{|r| r.ownable_type == 'Project' }.present?
+  end
+
+
+  def set_default_password_from_project
+    self.password = user_project_jobs.first.try(:project).try(:default_password) if password.blank?
+  end
+
+  def name
+    [first_name,last_name].delete_if(&:blank?).join(' ')
+  end
+
+  def avatar_url(size='medium')
+    avatar.try(:file).try(:url,size)
+  end
+
+  def self.attribute_param_types
+    { "skip_confirmation_email" => Virtus::Attribute::Boolean }
+  end
+
+  def skip_confirmation_email=(s)
+    return unless s.to_s == "true"
+    # skip_confirmation! does not work with update_attributes, a work-around:
+    self.update_column(:email, email) && self.reload if self.valid? && self.id
+    # devise: confirm the user without requiring a confirmation email
+    self.skip_confirmation!
+  end
+
+end

data/spec/dummy/app/models/user_location.rb

@@ -0,0 +1,28 @@
+class UserLocation < AbstractAdapter
+  belongs_to :user
+  belongs_to :location
+  belongs_to :detectable, polymorphic: true
+
+  validates_inclusion_of :detectable_type, in: %w(LocationBeacon LocationGps)
+
+  default_scope { includes(:detectable).order("created_at desc") } 
+
+  def coords=(c) # convenience method to set coordinates by an array of [lat,lng,alt]
+    self.lat = c[0]
+    self.lng = c[1]
+    self.alt = c[2]
+  end
+
+  def beacon 
+    detectable.is_a?(LocationBeacon) ? detectable : {}
+  end
+
+  def distance 
+    if location.gps && lat && lng
+      location.gps.distance_from(lat,lng)
+    else 
+      nil
+    end
+  end
+
+end

data/spec/dummy/app/models/user_project_job.rb

@@ -0,0 +1,16 @@
+class UserProjectJob < AbstractAdapter
+  belongs_to :user,    inverse_of: :user_project_jobs
+  belongs_to :project, inverse_of: :user_project_jobs
+  belongs_to :job,     inverse_of: :user_project_jobs
+
+  validates_inclusion_of :job, in: proc {|r| r.project.try(:jobs) || [] }
+
+  delegate :email, :avatar_url, to: :user
+  delegate :title, to: :job
+  delegate :name,  to: :project
+
+  def self.options_for_job(project=nil)
+    project.jobs
+  end
+
+end

data/spec/dummy/app/policies/application_policy.rb

@@ -0,0 +1,47 @@
+class ApplicationPolicy
+  attr_reader :user, :record
+
+  def initialize(user, record)
+    @user   = user
+    @record = record
+  end
+
+  def index?
+    @user.superuser?
+  end
+
+  def show?
+    @user.superuser? || scope.where(:id => record.id).exists?
+  end
+
+  def create?
+    @user.superuser?
+  end
+
+  def update?
+    @user.superuser?
+  end
+
+  def destroy?
+    @user.superuser?
+  end
+
+  def scope
+    Pundit.policy_scope!(user, record.class)
+  end
+
+  class Scope
+    attr_reader :user, :scope
+
+    def initialize(user, scope)
+      @user  = user
+      @scope = scope
+    end
+
+    def resolve
+      scope.all
+    end
+  end
+
+end
+

data/spec/dummy/app/policies/chat_policy.rb

@@ -0,0 +1,22 @@
+class ChatPolicy
+  attr_reader :user, :record
+
+  def initialize(user, record)
+    @user   = user
+    @record = record
+  end
+
+  def index?
+    @user
+  end
+
+  def show?
+    @user
+  end
+
+  def create?
+    @user
+  end
+
+end
+

data/spec/dummy/app/policies/company_policy.rb

@@ -0,0 +1,32 @@
+class CompanyPolicy < ApplicationPolicy
+  def index?
+    @user
+  end
+
+  def show?
+    @user && @user.admin?(record)
+  end
+
+  def update?
+    @user && @user.admin?(record)
+  end
+
+  def create?
+    @user && @user.admin?(record)
+  end
+
+  def destroy?
+    false
+  end
+
+  class Scope < ApplicationPolicy::Scope
+    def resolve
+      if user.superuser?
+        scope.all
+      else
+        scope.find( user.companies.map{|c| c.id} )
+      end
+    end
+  end
+end
+

data/spec/dummy/app/policies/location_policy.rb

@@ -0,0 +1,29 @@
+class LocationPolicy < ApplicationPolicy
+  def index?
+    @user
+  end
+
+  def show?
+    @user 
+  end
+
+  def update?
+    @user && @user.superuser?
+  end
+
+  def create?
+    @user && @user.superuser?
+  end
+
+  def destroy?
+    @user && @user.superuser?
+  end
+
+  class Scope < ApplicationPolicy::Scope
+    def resolve
+      scope.where(parent_location_id: nil)
+    end
+  end
+
+end
+

data/spec/dummy/app/policies/project_policy.rb

@@ -0,0 +1,42 @@
+class ProjectPolicy < ApplicationPolicy
+  def index?
+    @user
+  end
+
+  def project_user?
+    project_manager? || record.users.include?(@user)
+  end
+
+  def project_manager?
+    @user.superuser? || @user.all_admin_projects.include?(record) 
+  end
+
+  def show?
+    @user && project_user? 
+  end
+
+  def update?
+    @user && project_manager? 
+  end
+
+  def create?
+    @user && project_manager? 
+  end
+
+  def destroy?
+    @user && project_manager? 
+  end
+
+  class Scope < ApplicationPolicy::Scope
+    def resolve
+      if user.superuser?
+        scope.all
+      elsif user.project_admin?
+        scope.find( (user.all_admin_projects+user.projects).map(&:id) )
+      else
+        scope.find( user.projects )
+      end
+    end
+  end
+end
+

data/spec/dummy/app/policies/role_policy.rb

@@ -0,0 +1,33 @@
+class RolePolicy < ApplicationPolicy
+
+  def index?
+    @user
+  end
+
+  def show?
+    @user.admin?(record.ownable) 
+  end
+
+  def update?
+    @user.admin?(record.ownable) 
+  end
+
+  def create?
+    @user.admin?(record.ownable)
+  end
+
+  def destroy?
+    @user.admin?(record.ownable)
+  end
+
+  class Scope < ApplicationPolicy::Scope
+    def resolve
+      if user.superuser?
+        scope.all
+      else
+        scope.where(ownable: user.admin_companies )
+      end
+    end
+  end
+end
+

data/spec/dummy/app/policies/user_location_policy.rb

@@ -0,0 +1,12 @@
+class UserLocationPolicy < ApplicationPolicy
+  def index?
+    # This will need further specifications once the user-location relationship via
+    # their companies is defined via project etc.
+    @user && @user.company_admin?
+  end
+
+  def create?
+    @user
+  end
+end
+

data/spec/dummy/app/policies/user_policy.rb

@@ -0,0 +1,8 @@
+class UserPolicy < ApplicationPolicy
+
+  def sessions? 
+    true
+  end
+
+end
+

data/spec/dummy/app/views/layouts/application.html.erb

@@ -0,0 +1,13 @@
+<!DOCTYPE html>
+<html>
+<head>
+  <title>Dummy</title>
+  <%= stylesheet_link_tag    'application', media: 'all' %>
+  <%= csrf_meta_tags %>
+</head>
+<body>
+
+<%= yield %>
+
+</body>
+</html>

data/spec/dummy/bin/bundle

@@ -0,0 +1,3 @@
+#!/usr/bin/env ruby
+ENV['BUNDLE_GEMFILE'] ||= File.expand_path('../../Gemfile', __FILE__)
+load Gem.bin_path('bundler', 'bundle')

data/spec/dummy/bin/rails

@@ -0,0 +1,4 @@
+#!/usr/bin/env ruby
+APP_PATH = File.expand_path('../../config/application', __FILE__)
+require_relative '../config/boot'
+require 'rails/commands'

data/spec/dummy/bin/rake

@@ -0,0 +1,4 @@
+#!/usr/bin/env ruby
+require_relative '../config/boot'
+require 'rake'
+Rake.application.run

data/spec/dummy/bin/setup

@@ -0,0 +1,29 @@
+#!/usr/bin/env ruby
+require 'pathname'
+
+# path to your application root.
+APP_ROOT = Pathname.new File.expand_path('../../',  __FILE__)
+
+Dir.chdir APP_ROOT do
+  # This script is a starting point to setup your application.
+  # Add necessary setup steps to this file:
+
+  puts "== Installing dependencies =="
+  system "gem install bundler --conservative"
+  system "bundle check || bundle install"
+
+  # puts "\n== Copying sample files =="
+  # unless File.exist?("config/database.yml")
+  #   system "cp config/database.yml.sample config/database.yml"
+  # end
+
+  puts "\n== Preparing database =="
+  system "bin/rake db:setup"
+
+  puts "\n== Removing old logs and tempfiles =="
+  system "rm -f log/*"
+  system "rm -rf tmp/cache"
+
+  puts "\n== Restarting application server =="
+  system "touch tmp/restart.txt"
+end