rad_kit 0.0.9 → 0.0.10

data/app/helpers/kit/pagination.rb

@@ -0,0 +1,62 @@
+module Pagination
+  def paginator_for page, entries_count, per_page, &to_link
+    page.must_be >= 1
+    return if page == 1 and entries_count < per_page
+
+    opt = {
+      current_page: page,
+      pages: [], #(go_prev + [current] + go_next),
+      to_link: to_link
+    }
+
+    opt[:prev] = to_link.call(t(:go_prev), page - 1) if page > 1
+    opt[:next] = to_link.call(t(:go_next), page + 1)
+
+    b.paginator opt
+  end
+
+  # PAGINATOR_HALF_SIZE = 3
+  #
+  # def paginator_for current, total_entries, per_page, &to_link
+  #   return "" if total_entries <= per_page
+  #   total = (total_entries / (1.0 * per_page)).ceil
+  #
+  #   from = current
+  #   if current > 1
+  #     from = current - PAGINATOR_HALF_SIZE
+  #     if (right_size = total - current) < PAGINATOR_HALF_SIZE
+  #       from -= (PAGINATOR_HALF_SIZE - right_size)
+  #     end
+  #     from = 1 if from < 0
+  #   end
+  #
+  #   to = current
+  #   if current < total_entries
+  #     to = current + PAGINATOR_HALF_SIZE
+  #     if (left_size = current - 1) < PAGINATOR_HALF_SIZE
+  #       to += (PAGINATOR_HALF_SIZE - left_size)
+  #     end
+  #     to = total if to > total
+  #   end
+  #
+  #   go_prev, go_next = [], []
+  #   (from..to).each do |n|
+  #     if n < current
+  #       go_prev << to_link.call(n.to_s, n)
+  #     elsif n > current
+  #       go_next << to_link.call(n.to_s, n)
+  #     end
+  #   end
+  #
+  #   opt = {
+  #     current_page: current,
+  #     pages: (go_prev + [current] + go_next),
+  #     to_link: to_link
+  #   }
+  #
+  #   opt[:prev] = to_link.call(t(:go_prev), current - 1) if current > 1
+  #   opt[:next] = to_link.call(t(:go_next), current + 1) if current < total
+  #
+  #   b.paginator opt
+  # end
+end

data/app/models/_item/attachments.rb

@@ -0,0 +1,15 @@
+class Models::Item
+  def attachments
+    @attachments ||= []
+  end
+  mount_attachments(:attachments, :file){Models::Attachment.new}
+
+  assign :attachments_as_attachments, true
+
+  def attachments_as_images
+    # TODO3 remove sorting, use order defined in database
+    _cache[:attachments_as_images] ||= attachments.
+      sort{|a, b| a.file.name <=> b.file.name}.
+      collect{|o| {name: o.file.name, url: o.file.url, thumb_url: o.file.thumb.url, icon_url: o.file.icon.url}.to_openobject}
+  end
+end

data/app/models/_item/container.rb

@@ -0,0 +1,30 @@
+class Models::Item
+  attr_accessor :dependent
+  def dependent?; !!dependent end
+  def independent?; !dependent? end
+  def independent!; remove_instance_variable :@dependent end
+  def dependent!; self.dependent = true end
+
+
+  # field :dependent, type: Boolean, default: false # Indicates wheter or not Item depends on Container
+  # has_many :containers, class_name: 'Models::Item', foreign_key: :item_ids
+  #
+  # CONTAINER_INHERITABLE_ATTRIBUTES = %w{owner_name viewers collaborators}
+  # def inherit_container_attributes container, attributes = CONTAINER_INHERITABLE_ATTRIBUTES
+  #   attributes.each{|attr| send "#{attr}=", container.send(attr)}
+  # end
+  #
+  # # serches independent container for this item (used in search)
+  # def independent_container
+  #   unless independent_container = cache[:independent_container]
+  #     if independent?
+  #       independent_container = self
+  #     else
+  #       independent_container = containers.first
+  #       raise "this dependent item dosn't have container!" unless independent_container
+  #     end
+  #     cache[:independent_container] = independent_container
+  #   end
+  #   independent_container
+  # end
+end

data/app/models/_item/slug.rb

@@ -0,0 +1,28 @@
+class Models::Item
+  attr_writer :slug
+  def slug
+    @slug ||= generate_slug
+  end
+  before_create :slug
+  assign :slug, String, true
+
+  rad.extension :item_slug, self do
+    validates_uniqueness_of :slug
+  end
+
+  validates_format_of :slug, with: /^[0-9a-z\-]+$/
+  validates_presence_of :slug
+
+  def self.by_param! param
+    by_param(param) || raise(Mongo::NotFound, "object with slug #{param} not found!")
+  end
+
+  def self.by_param param
+    self.by_slug(param) || (BSON::ObjectId.legal?(param) && self.by_id(param))
+  end
+
+  protected
+    def generate_slug
+      "#{name.blank? ? String.random(6) : name.to_url[0..50]}-#{String.random}" #UUIDTools::UUID.random_create.hexdigest[0,6]
+    end
+end

data/app/models/attachment.rb

@@ -0,0 +1,9 @@
+class Attachment
+  inherit Mongo::Model, Mongo::Model::FileModel
+
+  # embedded_in :item, class_name: 'Models::Item'
+  # attr_accessor :main_id
+  # validates_presence_of :main_id
+
+  mount_file :file, AttachmentFile
+end

data/app/models/comment.rb

@@ -0,0 +1,30 @@
+class Comment < Item
+
+  attr_accessor :item_id
+  validates_presence_of :item_id
+  def item= item
+    self.item_id = item._id
+    _cache[:item] = item
+  end
+  def item
+    _cache[:item] ||= Item.by_id item_id
+  end
+
+  after_create do |m|
+    Item.update({_id: m.item_id}, {_inc: {comments_count: 1}})
+  end
+  after_destroy do |m|
+    Item.update({_id: m.item_id}, {_inc: {comments_count: -1}})
+  end
+
+  available_as_markup :text
+  assign :original_text, String, true
+  validates_presence_of :text
+
+  before_save{|m| m.dependent!}
+
+  # TODO3 search
+  # searchable do
+  #   text :text, using: :text_as_text
+  # end
+end

data/app/models/item.rb

@@ -0,0 +1,136 @@
+class Item
+  inherit Mongo::Model
+  collection :items
+
+  rad.extension :item_model, self
+
+  # key :_id, String
+  # field :_type, String
+
+  #
+  # General Attributes
+  #
+  attr_accessor :name, :text
+  assign do
+    name String, true
+    text String, true
+  end
+
+  timestamps!
+
+
+  #
+  # Aspects
+  #
+  # TODO1 add support for security inheritance for comments
+  def comments
+    Comment.query({item_id: _id}, {sort: [[:created_at, -1]]})
+  end
+  after_destroy{|m| m.comments.each(&:destroy!)}
+
+  attr_writer :comments_count
+  def comments_count; @comments_count ||= 0 end
+
+
+  #
+  # Tags
+  #
+  inherit Models::TagsMixin
+
+  #
+  # Authorized Object
+  #
+  inherit Models::AuthorizedObject
+
+
+  #
+  # TextProcessor
+  #
+  inherit Mongo::Model::TextProcessor
+
+
+  #
+  # Identity
+  #
+  def to_param; slug end
+
+
+  #
+  # Teaser
+  #
+  TEASER_LENGTH = 350
+  def teaser
+    generate_teaser! unless @teaser
+    @teaser
+  end
+  attr_writer :teaser
+
+  def generate_teaser!
+    self.teaser = TextUtils.truncate text, TEASER_LENGTH if text # if new_record? or teaser_changed?
+  end
+  before_save :generate_teaser!
+
+
+  #
+  # Indexing
+  #
+  # TODO3 search
+  # include Sunspot::MongoMapper::Searchable
+  # searchable do
+  #   text :name, stored: true, boost: 2.0
+  #   text :teaser, stored: true
+  #
+  #   string :tags, multiple: true
+  #   string :dependent
+  #   # string :model_name
+  #   string :viewers, multiple: true
+  #   time :created_at
+  #   time :updated_at
+  #
+  #   string(:space_id){space_id.to_s}
+  #   string(:account_id){account_id.to_s}
+  # end
+
+
+  #
+  # Theme layout support
+  #
+  attr_accessor :layout
+  assign :layout, String, true
+
+
+  #
+  # Other
+  #
+  PER_PAGE = 14
+
+  # def inspect
+  #   %{#<#{self.class.name} name: "#{name}", #{"slug: #{slug}, " unless slug.blank?}_id: #{_id}>}
+  # end
+  #
+  # def to_s
+  #   inspect
+  # end
+
+  ALLOWED_KEYS = %w{
+    id _type slug
+    name text tags dependent
+    owner_name viewers
+    created_at updated_at
+  }
+  def to_json options = {}
+    options = options.symbolize_keys
+    options[:only] = ((options[:only] || []) + ALLOWED_KEYS).uniq
+
+    # TODO3 files
+    # options[:methods] = ((options[:methods] || []) + [:icon_url]).uniq
+
+    super options
+  end
+end
+
+
+#
+# Helpers
+#
+Dir.glob("#{__FILE__.dirname}/_item/*.rb").each{|path| load path}

data/app/models/secure_token.rb

@@ -0,0 +1,45 @@
+class SecureToken
+  inherit Mongo::Model
+  # TODO3 rename to :tokens
+  collection :secure_tokens
+
+  EXPIRES_IN = 30
+
+  rad.extension :secure_token, self
+
+  # attr_writer :values
+  # def values; @values ||= {} end
+  def [] k
+    instance_variable_get :"@#{k}"
+  end
+  def []= k, v
+    instance_variable_set :"@#{k}", v
+  end
+
+  attr_writer :token
+  def token; @token ||= String.secure_token end
+  validates_presence_of :token
+
+  attr_writer :expires_at
+  def expires_at; @expires_at ||= EXPIRES_IN.minutes.from_now end
+  validates_presence_of :expires_at
+
+  timestamps!
+
+  def expired?
+    expires_at >= Time.now.utc
+  end
+
+  class << self
+    def by_token token
+      return nil if token.blank?
+      first token: token, expires_at: {_gte: Time.now.utc}
+    end
+    alias_method :first_by_token, :by_token
+
+    def by_token! token
+      return by_token(token) || raise(Mongo::NotFound, "token #{token} not found!")
+    end
+    alias_method :first_by_token!, :by_token!
+  end
+end

data/app/models/tag.rb

@@ -0,0 +1,71 @@
+class Tag
+  inherit Mongo::Model
+  collection :tags
+
+  rad.extension :tag_model, self
+
+  FORBIDDEN_CHARACTERS = /<>,/
+  TAG_LIST_DELIMITER = ','
+
+  attr_accessor :name, :count
+  assign :name, String, true
+  validates_presence_of :name, :count
+  validate :validate_name
+
+  attr_reader :context
+  def context
+    if name.to_s =~ /:/
+      @context = name.split(/:/).first
+    else
+      remove_instance_variable :@context if instance_variable_defined? :@context
+      nil
+    end
+  end
+  before_save :context
+
+  def update_count!
+    new_count = Item.count tags: {_in: [name]}
+    unless count == new_count
+      self.count = new_count
+      self.save!
+    end
+  end
+
+  class << self
+    def valid_name? name
+      name.present? and name !~ FORBIDDEN_CHARACTERS
+    end
+
+    def create_tags! tags
+      tags.each do |name|
+        if tag = Tag.by_name(name)
+          # TODO3 preformance lost
+          tag.update_count!
+        else
+          tag = Tag.new name: name
+          tag.count = 1
+          tag.save!
+        end
+      end
+    end
+
+    def update_tags! before, after
+      create_tags! after - before
+      delete_tags! before - after
+    end
+
+    def delete_tags! tags
+      tags.each do |name|
+        if tag = Tag.by_name(name)
+          tag.update_count!
+          tag.destroy if tag.count == 0
+        end
+      end
+    end
+  end
+
+  protected
+    def validate_name
+      errors.add :name, t(:invalid_tag_name) unless Tag.valid_name?(name)
+    end
+end

data/app/static/kit/highlight.css

@@ -0,0 +1,48 @@
+.hl_highlight * {font-family: courier, monospace !important;}
+
+.hl_hll { background-color: #ffffcc }
+.hl_c { color: #008800; font-style: italic } /* Comment */
+.hl_err { color: #a61717; background-color: #e3d2d2 } /* Error */
+.hl_k { color: #000080; font-weight: bold } /* Keyword */
+.hl_cm { color: #008800; font-style: italic } /* Comment.hl_Multiline */
+.hl_cp { color: #008080 } /* Comment.hl_Preproc */
+.hl_c1 { color: #008800; font-style: italic } /* Comment.hl_Single */
+.hl_cs { color: #008800; font-weight: bold } /* Comment.hl_Special */
+.hl_gd { color: #000000; background-color: #ffdddd } /* Generic.hl_Deleted */
+.hl_ge { font-style: italic } /* Generic.hl_Emph */
+.hl_gr { color: #aa0000 } /* Generic.hl_Error */
+.hl_gh { color: #999999 } /* Generic.hl_Heading */
+.hl_gi { color: #000000; background-color: #ddffdd } /* Generic.hl_Inserted */
+.hl_go { color: #888888 } /* Generic.hl_Output */
+.hl_gp { color: #555555 } /* Generic.hl_Prompt */
+.hl_gs { font-weight: bold } /* Generic.hl_Strong */
+.hl_gu { color: #aaaaaa } /* Generic.hl_Subheading */
+.hl_gt { color: #aa0000 } /* Generic.hl_Traceback */
+.hl_kc { color: #000080; font-weight: bold } /* Keyword.hl_Constant */
+.hl_kd { color: #000080; font-weight: bold } /* Keyword.hl_Declaration */
+.hl_kn { color: #000080; font-weight: bold } /* Keyword.hl_Namespace */
+.hl_kp { color: #000080; font-weight: bold } /* Keyword.hl_Pseudo */
+.hl_kr { color: #000080; font-weight: bold } /* Keyword.hl_Reserved */
+.hl_kt { color: #000080; font-weight: bold } /* Keyword.hl_Type */
+.hl_m { color: #0000FF } /* Literal.hl_Number */
+.hl_s { color: #0000FF } /* Literal.hl_String */
+.hl_na { color: #FF0000 } /* Name.hl_Attribute */
+.hl_nt { color: #000080; font-weight: bold } /* Name.hl_Tag */
+.hl_ow { font-weight: bold } /* Operator.hl_Word */
+.hl_w { color: #bbbbbb } /* Text.hl_Whitespace */
+.hl_mf { color: #0000FF } /* Literal.hl_Number.hl_Float */
+.hl_mh { color: #0000FF } /* Literal.hl_Number.hl_Hex */
+.hl_mi { color: #0000FF } /* Literal.hl_Number.hl_Integer */
+.hl_mo { color: #0000FF } /* Literal.hl_Number.hl_Oct */
+.hl_sb { color: #0000FF } /* Literal.hl_String.hl_Backtick */
+.hl_sc { color: #800080 } /* Literal.hl_String.hl_Char */
+.hl_sd { color: #0000FF } /* Literal.hl_String.hl_Doc */
+.hl_s2 { color: #0000FF } /* Literal.hl_String.hl_Double */
+.hl_se { color: #0000FF } /* Literal.hl_String.hl_Escape */
+.hl_sh { color: #0000FF } /* Literal.hl_String.hl_Heredoc */
+.hl_si { color: #0000FF } /* Literal.hl_String.hl_Interpol */
+.hl_sx { color: #0000FF } /* Literal.hl_String.hl_Other */
+.hl_sr { color: #0000FF } /* Literal.hl_String.hl_Regex */
+.hl_s1 { color: #0000FF } /* Literal.hl_String.hl_Single */
+.hl_ss { color: #0000FF } /* Literal.hl_String.hl_Symbol */
+.hl_il { color: #0000FF } /* Literal.hl_Number.hl_Integer.hl_Long */

data/app/static/kit.css

@@ -0,0 +1,3 @@
+/*
+rad.assets.require '/kit/highlight.css'
+*/

data/app/static/themes/default/objects.less

@@ -0,0 +1,28 @@
+.the_list      {.t_list; .s_list; .s_box; .s_round;
+  .l_controls  {.s_controls; .s_small_text;}
+	.l_item      {
+    .l_content {}}
+  .l_list_item {}
+  .l_finished  {
+    div, a     {.s_small_text;}
+    .content   {text-decoration: line-through;}}}
+
+
+.the_file_t () {
+  > table.css_table   {
+    > tbody           {
+      > tr            {
+        > td.css_td1  {width: @icon_size1;}
+        > td.css_td2  {}}}}}
+.the_file  {.the_file_t; .s_box; .s_round;
+	.l_image {width: @icon_size1; margin-right: @normal;}
+  .l_title {.s_a_link; font-weight: bold;}}
+
+
+.the_page      {.s_box; .s_round;
+  > .l_text    {}
+  > .l_content {
+    > .m_title {.s_normal_text;}}}
+
+
+.the_folder {.s_box; .s_round;}

data/app/views/controllers/comments/_embedded.html.haml

@@ -0,0 +1,13 @@
+- b.comment id: object.dom_id do |o|
+  - o.user link_to(object.owner_name, user_path(object.owner_name))
+
+  - avatar_img = image_tag(Models::User.avatar_url(object.owner_name), onerror: "this.style.display = 'none'")
+  - o.avatar link_to(avatar_img, user_path(object.owner_name))
+
+  - o.owner link_to(object.owner_name, user_path(object.owner_name))
+  - o.details render_item_details(object, skip: [:comments, :owner])
+  - o.text object.text
+  - o.controls do |a|
+    - a.add link_to(t(:edit), edit_path(object, format: :js)) if can? :update, object
+    - a.add link_to(t(:delete), destroy_path(object, format: :js), method: :post, confirm: t(:are_you_shure)) if can? :destroy, object
+    / - a.add link_to(t(:go), path(object))

data/app/views/controllers/comments/_form.html.haml

@@ -0,0 +1,8 @@
+- b.form_for :model, object, action: form_action do |f|
+  = hidden_field_tag :item_id, params.item_id if params.item_id
+
+  = f.error_messages
+
+  = f.text_area :original_text, label: false
+
+  = f.line ok_button, cancel_button

data/app/views/controllers/comments/actions.js.haml

@@ -0,0 +1,22 @@
+- case action_name
+- when :destroy
+  rad.discussion().comment('##{@model.dom_id}').destroy();
+
+- when :edit
+  - form = js render('form', object: @model, locals: {form_action: update_path(@model, format: :js)})
+  rad.discussion().comment('##{@model.dom_id}').edit('#{form}');
+
+- when :new
+  - form = js render('form', object: @model, locals: {form_action: create_comment_path(format: :js)})
+  rad.discussion().anew('#{form}');
+
+- when :create
+  - html = js render('embedded', object: @model)
+  rad.discussion().create("#{html}");
+
+- when :update
+  - html = js render('embedded', object: @model)
+  rad.discussion().comment('##{@model.dom_id}').update('#{html}');
+
+- else
+  - must_be.never_called

data/app/views/controllers/comments/show.html.haml

@@ -0,0 +1,11 @@
+- b.comment id: @model.dom_id do |o|
+  - o.user link_to(@model.owner_name, user_path(@model.owner_name))
+
+  - avatar_img = image_tag(Models::User.avatar_url(@model.owner_name), onerror: "this.style.display = 'none'")
+  - o.avatar link_to(avatar_img, user_path(@model.owner_name))
+
+  - o.details render_item_details(@model, skip: :comments)
+  - o.text @model.text
+  - o.controls do |a|
+    - a.add link_to(t(:edit), edit_path(@model, format: :js)) if can? :update, @model
+    - a.add link_to(t(:delete), destroy_path(@model, format: :js), method: :post, confirm: t(:are_you_shure)) if can? :destroy, @model

data/app/views/controllers/items/_items.html.haml

@@ -0,0 +1,2 @@
+- @models.each do |m|
+  = render "/previews/line", object: m

data/app/views/controllers/items/actions.js.haml

@@ -0,0 +1,23 @@
+- case action_name
+- when :new
+  - form = js render('form', locals: {form_action: url_for(:create, format: :js)})
+  rad.dialog().show('#{form}');
+
+- when :edit
+  - form = js render('form', locals: {form_action: update_path(@model, format: :js)})
+  rad.inplace('##{@model.dom_id}').edit('#{form}');
+
+- when :update
+  - html = js render('show', object: @model)
+  rad.inplace('##{@model.dom_id}').update('#{html}');
+
+- when :access
+  - html = js render('/tools/access')
+  $("access_tool").replaceWith("#{html}");
+
+- else
+  - must_be.never_called
+
+/ - when :context_menu
+/   - html = js render('/bag/slots/context_menu')
+/   $("#_context_menu").replaceWith("#{html}");

data/app/views/controllers/items/all.html.haml

@@ -0,0 +1,4 @@
+= render 'items'
+
+- html = paginator_for(@page, @models.size, @per_page){|t, n| link_to t, url_for(action_name, page: n)}
+- content_for :aspects, html unless html.blank?

data/app/views/controllers/items/inherited_action.html.haml

@@ -0,0 +1 @@
+= b.title "Inherited Action"

data/app/views/kit/_bottom_panel.html.haml

@@ -0,0 +1,9 @@
+- bottom_text, powered_by = rad.config.bottom_text, rad.config.powered_by
+- if bottom_text or powered_by or rad.development? or @debug
+  - b.bottom_panel do |o|
+    - if bottom_text or rad.development? or @debug
+      - o.left do
+        = bottom_text if bottom_text
+        = render '/kit/debug' if rad.development?
+    - if powered_by
+      - o.right t(:powered_by, company: powered_by)

data/app/views/kit/_debug.html.haml

@@ -0,0 +1,13 @@
+Params: #{params.inspect}
+- permissions = Models::User.current.effective_permissions.select{|op, perm| perm}.collect{|op, perm| op}.join(', ')
+- if permissions.present?
+  %br
+  Permissions: #{permissions}
+- if @model and Models::User.current.owner?(@model)
+  - opermissions = Models::User.current.effective_permissions_as_owner.to_a.select{|op, perm| perm}.collect{|op, perm| op}.join(', ')
+  - if opermissions.present?
+    %br
+    Permissions as Owner: #{}
+
+- if @debug
+  %p= @debug

data/app/views/kit/_messages.html.haml

@@ -0,0 +1,4 @@
+- if flash.info?
+  = javascript_tag %{rad.info("#{j(h(flash.info))}")}
+- if flash.error?
+  = javascript_tag %{rad.error("#{j(h(flash.error))}")}

data/app/views/kit/_navigation.html.haml

@@ -0,0 +1,19 @@
+- menu, additional_menu = rad.config.menu, rad.config.additional_menu
+- if menu or additional_menu
+  - b.navigation do |o|
+    / - o.items do ||
+    - if menu
+      - o.left do |a|
+        - menu.each do |name, link|
+          - if request.path.include? link
+            - a.add content: h(name), active: true
+          - else
+            - a.add link_to(h(name), h(link))
+
+    - if additional_menu
+      - o.right do |a|
+        - additional_menu.each do |name, link|
+          - if request.path.include? link
+            - a.add content: h(name), active: true
+          - else
+            - a.add link_to(h(name), h(link))

data/app/views/kit/_not_found.html.haml

@@ -0,0 +1 @@
+= b.title t(:page_not_found)