Make a plugin to display statistics from Environment and Profiles

- Removed EnvironmentStatisticsBlock from core. Environment's admins should enable the statistics block for its environment Signed-off-by: Leandro Nunes dos Santos <leandro.santos@serpro.gov.br> Signed-off-by: Francisco Marcelo de Araújo Lima Júnior <francisco.lima-junior@serpro.gov.br> Signed-off-by: Victor Costa <vfcosta@gmail.com> (ActionItem2851)

Make a plugin to display statistics from Environment and Profiles
- Removed EnvironmentStatisticsBlock from core. Environment's admins should enable the statistics block for its environment Signed-off-by: Leandro Nunes dos Santos <leandro.santos@serpro.gov.br> Signed-off-by: Francisco Marcelo de Araújo Lima Júnior <francisco.lima-junior@serpro.gov.br> Signed-off-by: Victor Costa <vfcosta@gmail.com> (ActionItem2851)
Eduardo Tourinho Edington · Joenio Costa
1 parent 031e5bd1
Showing 22 changed files with 1039 additions and 149 deletions Show diff stats
app/controllers/admin/environment_design_controller.rb
app/models/box.rb
app/models/environment.rb
app/models/environment_statistics_block.rb
app/sweepers/profile_sweeper.rb
db/migrate/20140316171151_remove_environment_statistics_block.rb
plugins/statistics/README
plugins/statistics/lib/statistics_block.rb
plugins/statistics/lib/statistics_plugin.rb
plugins/statistics/test/functional/statistics_plugin_environment_design_controller_test.rb
plugins/statistics/test/functional/statistics_plugin_home_controller_test.rb
plugins/statistics/test/functional/statistics_plugin_profile_design_controller_test.rb
plugins/statistics/test/test_helper.rb
plugins/statistics/test/unit/statistics_block_test.rb
plugins/statistics/test/unit/statistics_plugin_test.rb
plugins/statistics/views/box_organizer/_statistics_block.rhtml
plugins/statistics/views/environment_design
plugins/statistics/views/profile_design
plugins/statistics/views/statistics_block.rhtml
test/functional/environment_design_controller_test.rb
@@ -3,7 +3,7 @@ class EnvironmentDesignController &lt; BoxOrganizerController
   protect 'edit_environment_design', :environment
   def available_blocks
-    @available_blocks ||= [ ArticleBlock, LoginBlock, EnvironmentStatisticsBlock, RecentDocumentsBlock, EnterprisesBlock, CommunitiesBlock, PeopleBlock, SellersSearchBlock, LinkListBlock, FeedReaderBlock, SlideshowBlock, HighlightsBlock, FeaturedProductsBlock, CategoriesBlock, RawHTMLBlock, TagsBlock ]
+    @available_blocks ||= [ ArticleBlock, LoginBlock, RecentDocumentsBlock, EnterprisesBlock, CommunitiesBlock, PeopleBlock, SellersSearchBlock, LinkListBlock, FeedReaderBlock, SlideshowBlock, HighlightsBlock, FeaturedProductsBlock, CategoriesBlock, RawHTMLBlock, TagsBlock ]
     @available_blocks += plugins.dispatch(:extra_blocks, :type => Environment)
   end
@@ -26,7 +26,6 @@ class Box &lt; ActiveRecord::Base
       CategoriesBlock,
       CommunitiesBlock,
       EnterprisesBlock,
-      EnvironmentStatisticsBlock,
       FansBlock,
       FavoriteEnterprisesBlock,
       FeedReaderBlock,
@@ -52,7 +51,6 @@ class Box &lt; ActiveRecord::Base
       CommunitiesBlock,
       DisabledEnterpriseMessageBlock,
       EnterprisesBlock,
-      EnvironmentStatisticsBlock,
       FansBlock,
       FavoriteEnterprisesBlock,
       FeaturedProductsBlock,
@@ -161,7 +161,6 @@ class Environment &lt; ActiveRecord::Base
     # "left" area
     env.boxes[1].blocks << LoginBlock.new
-    env.boxes[1].blocks << EnvironmentStatisticsBlock.new
     env.boxes[1].blocks << RecentDocumentsBlock.new
     # "right" area
@@ -1,30 +0,0 @@
-class EnvironmentStatisticsBlock < Block
-
-  def self.description
-    _('Environment stastistics')
-  end
-
-  def default_title
-    _('Statistics for %s') % owner.name
-  end
-
-  def help
-    _('This block presents some statistics about your environment.')
-  end
-
-  def content(args={})
-    users = owner.people.visible.count
-    enterprises = owner.enterprises.visible.count
-    communities = owner.communities.visible.count
-
-    info = []
-    info << (n_('One user', '%{num} users', users) % { :num => users })
-    unless owner.enabled?('disable_asset_enterprises')
-      info << (n__('One enterprise', '%{num} enterprises', enterprises) % { :num => enterprises })
-    end
-    info << (n__('One community', '%{num} communities', communities) % { :num => communities })
-
-    block_title(title) + content_tag('ul', info.map {|item| content_tag('li', item) }.join("\n"))
-  end
-
-end
@@ -8,7 +8,6 @@ class ProfileSweeper # &lt; ActiveRecord::Observer
   end
   def after_create(profile)
-    expire_statistics_block_cache(profile)
   end
 protected
@@ -29,11 +28,6 @@ protected
     expire_blogs(profile) if profile.organization?
   end
-  def expire_statistics_block_cache(profile)
-    blocks = profile.environment.blocks.select { |b| b.kind_of?(EnvironmentStatisticsBlock) }
-    BlockSweeper.expire_blocks(blocks)
-  end
-
   def expire_blogs(profile)
     profile.blogs.select{|b| !b.empty?}.each do |blog|
       pages = blog.posts.count / blog.posts_per_page + 1
@@ -0,0 +1,9 @@
+class RemoveEnvironmentStatisticsBlock < ActiveRecord::Migration
+  def self.up
+    update("DELETE FROM blocks WHERE type = 'EnvironmentStatisticsBlock'")
+  end
+
+  def self.down
+    say("Nothing to undo (cannot recover the data)")
+  end
+end
@@ -0,0 +1,54 @@
+README - Statistics (Statistics Plugin)
+================================
+
+Statistics is a plugin to allow the user adds a block where you could see statistics of it's context.
+
+The Statistics block will be available for all layout columns of communities, peole, enterprises and environments.
+
+INSTALL
+=======
+
+Enable Plugin
+-------------
+
+Also, you need to enable Statistics Plugin at you Noosfero:
+
+cd <your_noosfero_dir>
+./script/noosfero-plugins enable statistics
+
+Active Plugin
+-------------
+
+As a Noosfero administrator user, go to administrator panel:
+
+- Click on "Enable/disable plugins" option
+- Click on "Statistics Plugin" check-box
+
+Running Statistics tests
+--------------------
+
+$ rake test:noosfero_plugins:statistics
+
+
+Get Involved
+============
+
+If you found any bug and/or want to collaborate, please send an e-mail to eduardo.edington@gmail.com
+
+LICENSE
+=======
+
+Copyright (c) The Author developers.
+
+See Noosfero license.
+
+
+AUTHORS
+=======
+
+ Eduardo Tourinho Edington (eduardo.edington at gmail.com)
+
+ACKNOWLEDGMENTS
+===============
+
+The author has been supported by Serpro
@@ -0,0 +1,146 @@
+class StatisticsBlock < Block
+
+  settings_items :community_counter, :default => false
+  settings_items :user_counter, :default => true
+  settings_items :enterprise_counter, :default => false
+  settings_items :category_counter, :default => false
+  settings_items :tag_counter, :default => true
+  settings_items :comment_counter, :default => true
+  settings_items :hit_counter, :default => false
+  settings_items :templates_ids_counter, Hash, :default => {}
+
+  USER_COUNTERS = [:community_counter, :user_counter, :enterprise_counter, :tag_counter, :comment_counter, :hit_counter]
+  COMMUNITY_COUNTERS = [:user_counter, :tag_counter, :comment_counter, :hit_counter]
+  ENTERPRISE_COUNTERS = [:user_counter, :tag_counter, :comment_counter, :hit_counter]
+
+  def self.description
+    _('Statistics')
+  end
+
+  def default_title
+    _('Statistics for %s') % owner.name
+  end
+
+  def is_visible? counter
+    value = self.send(counter)
+    value == '1' || value == true
+  end
+
+  def is_counter_available? counter
+    if owner.kind_of?(Environment)
+      true
+    elsif owner.kind_of?(Person)
+      USER_COUNTERS.include?(counter)
+    elsif owner.kind_of?(Community)
+      COMMUNITY_COUNTERS.include?(counter)
+    elsif owner.kind_of?(Enterprise)
+      ENTERPRISE_COUNTERS.include?(counter)
+    end
+
+  end
+
+  def help
+    _('This block presents some statistics about your context.')
+  end
+
+  def timeout
+    60.minutes
+  end
+
+  def environment
+    if owner.kind_of?(Environment)
+      owner
+    elsif owner.kind_of?(Profile)
+      owner.environment
+    else
+      nil
+    end
+  end
+
+  def templates
+    Community.templates(environment)
+  end
+
+  def is_template_counter_active? template_id
+    self.templates_ids_counter[template_id.to_s].to_s == 'true'
+  end
+
+  def template_counter_count(template_id)
+    owner.communities.visible.count(:conditions => {:template_id => template_id})
+  end
+
+  def users
+    if owner.kind_of?(Environment)
+      owner.people.visible.count
+    elsif owner.kind_of?(Organization)
+      owner.members.visible.count
+    elsif owner.kind_of?(Person)
+      owner.friends.visible.count
+    else
+      0
+    end
+  end
+
+  def enterprises
+    if owner.kind_of?(Environment) || owner.kind_of?(Person)
+      owner.enterprises.visible.count
+    else
+      0
+    end
+  end
+
+  def communities
+    if owner.kind_of?(Environment) || owner.kind_of?(Person)
+      owner.communities.visible.count
+    else
+      0
+    end
+  end
+
+  def categories
+    if owner.kind_of?(Environment) then
+      owner.categories.count
+    else
+      0
+    end
+  end
+
+  def tags
+    if owner.kind_of?(Environment) then
+      owner.tag_counts.count
+    elsif owner.kind_of?(Profile) then
+      owner.article_tags.count
+    else
+      0
+    end
+  end
+
+  def comments
+    if owner.kind_of?(Environment) then
+      owner.profiles.joins(:articles).sum(:comments_count).to_i
+    elsif owner.kind_of?(Profile) then
+      owner.articles.sum(:comments_count)
+    else
+      0
+    end
+  end
+
+  def hits
+    if owner.kind_of?(Environment) then
+      owner.profiles.joins(:articles).sum(:hits).to_i
+    elsif owner.kind_of?(Profile) then
+      owner.articles.sum(:hits)
+    else
+      0
+    end
+  end
+
+  def content(args={})
+    block = self
+
+    lambda do
+      render :file => 'statistics_block', :locals => { :block => block }
+    end
+  end
+
+end
@@ -0,0 +1,19 @@
+require_dependency File.dirname(__FILE__) + '/statistics_block'
+
+class StatisticsPlugin < Noosfero::Plugin
+
+  def self.plugin_name
+    "Statistics Plugin"
+  end
+
+  def self.plugin_description
+    _("A plugin that adds a block where you can see statistics of it's context.")
+  end
+
+  def self.extra_blocks
+    {
+      StatisticsBlock => {}
+    }
+  end
+
+end
@@ -0,0 +1,161 @@
+require File.dirname(__FILE__) + '/../test_helper'
+
+# Re-raise errors caught by the controller.
+class EnvironmentDesignController; def rescue_action(e) raise e end; end
+
+class EnvironmentDesignControllerTest < ActionController::TestCase
+
+  def setup
+    @controller = EnvironmentDesignController.new
+    @request    = ActionController::TestRequest.new
+    @response   = ActionController::TestResponse.new
+
+    Environment.delete_all
+
+    @environment = Environment.create(:name => 'testenv', :is_default => true)
+    @environment.enabled_plugins = ['StatisticsPlugin']
+    @environment.save!
+
+    user = create_user('testinguser')
+    @environment.add_admin(user.person)
+
+    StatisticsBlock.delete_all
+    @box1 = Box.create!(:owner => @environment)
+    @environment.boxes = [@box1]
+
+    @block = StatisticsBlock.new
+    @block.box = @box1
+    @block.save!
+
+    login_as(user.login)
+  end
+
+  attr_accessor :block
+
+  should 'be able to edit StatisticsBlock' do
+    get :edit, :id => @block.id
+    assert_tag :tag => 'input', :attributes => { :id => 'block_title' }
+  end
+
+  should 'be able to save StatisticsBlock' do
+    get :edit, :id => @block.id
+    post :save, :id => @block.id, :block => {:title => 'Statistics' }
+    @block.reload
+    assert_equal 'Statistics', @block.title
+  end
+
+  should 'be able to uncheck core counters' do
+    @block.user_counter = true
+    @block.community_counter = true
+    @block.enterprise_counter = true
+    @block.category_counter = true
+    @block.tag_counter = true
+    @block.comment_counter = true
+    @block.hit_counter = true
+    @block.save!
+    get :edit, :id => @block.id
+    post :save, :id => @block.id, :block => {:user_counter => '0', :community_counter => '0', :enterprise_counter => '0',
+      :category_counter => '0', :tag_counter => '0', :comment_counter => '0', :hit_counter => '0' }
+    @block.reload
+    any_checked = @block.is_visible?('user_counter') ||
+                  @block.is_visible?('community_counter') ||
+                  @block.is_visible?('enterprise_counter') ||
+                  @block.is_visible?('category_counter') ||
+                  @block.is_visible?('tag_counter') ||
+                  @block.is_visible?('comment_counter') ||
+                  @block.is_visible?('hit_counter')
+    assert_equal false, any_checked
+
+  end
+
+  should 'be able to check core counters' do
+    @block.user_counter = false
+    @block.community_counter = false
+    @block.enterprise_counter = false
+    @block.category_counter = false
+    @block.tag_counter = false
+    @block.comment_counter = false
+    @block.hit_counter = false
+    @block.save!
+    get :edit, :id => @block.id
+    post :save, :id => @block.id, :block => {:user_counter => '1', :community_counter => '1', :enterprise_counter => '1',
+      :category_counter => '1', :tag_counter => '1', :comment_counter => '1', :hit_counter => '1' }
+    @block.reload
+    all_checked = @block.is_visible?('user_counter') &&
+                  @block.is_visible?('community_counter') &&
+                  @block.is_visible?('enterprise_counter') &&
+                  @block.is_visible?('category_counter') &&
+                  @block.is_visible?('tag_counter') &&
+                  @block.is_visible?('comment_counter') &&
+                  @block.is_visible?('hit_counter')
+    assert all_checked
+
+  end
+
+  should 'be able to check template counters' do
+    template = fast_create(Community, :name => 'Councils', :is_template => true, :environment_id => @environment.id)
+    @block.templates_ids_counter = {template.id.to_s => 'false'}
+    @block.save!
+    get :edit, :id => @block.id
+    post :save, :id => @block.id, :block => {:templates_ids_counter => {template.id.to_s => 'true'}}
+    @block.reload
+
+    assert @block.is_template_counter_active?(template.id)
+  end
+
+  should 'be able to uncheck template counters' do
+    template = fast_create(Community, :name => 'Councils', :is_template => true, :environment_id => @environment.id)
+    @block.templates_ids_counter = {template.id.to_s => 'true'}
+    @block.save!
+    get :edit, :id => @block.id
+    post :save, :id => @block.id, :block => {:templates_ids_counter => {template.id.to_s => 'false'}}
+    @block.reload
+
+    assert_equal false, @block.is_template_counter_active?(template.id)
+  end
+
+  should 'input user counter be checked by default' do
+    get :edit, :id => @block.id
+
+    assert_tag :input, :attributes => {:id => 'block_user_counter', :checked => 'checked'}
+  end
+
+  should 'not input community counter be checked by default' do
+    get :edit, :id => @block.id
+
+    assert_tag :input, :attributes => {:id => 'block_community_counter'}
+    assert_no_tag :input, :attributes => {:id => 'block_community_counter', :checked => 'checked'}
+  end
+
+  should 'not input enterprise counter be checked by default' do
+    get :edit, :id => @block.id
+
+    assert_tag :input, :attributes => {:id => 'block_enterprise_counter'}
+    assert_no_tag :input, :attributes => {:id => 'block_enterprise_counter', :checked => 'checked'}
+  end
+
+    should 'not input category counter be checked by default' do
+    get :edit, :id => @block.id
+
+    assert_tag :input, :attributes => {:id => 'block_category_counter'}
+    assert_no_tag :input, :attributes => {:id => 'block_category_counter', :checked => 'checked'}
+  end
+
+    should 'input tag counter be checked by default' do
+    get :edit, :id => @block.id
+
+    assert_tag :input, :attributes => {:id => 'block_tag_counter', :checked => 'checked'}
+  end
+
+  should 'input comment counter be checked by default' do
+    get :edit, :id => @block.id
+
+    assert_tag :input, :attributes => {:id => 'block_comment_counter', :checked => 'checked'}
+  end
+
+  should 'input hit counter not be checked by default' do
+    get :edit, :id => @block.id
+
+    assert_no_tag :input, :attributes => {:id => 'block_hit_counter', :checked => 'checked'}
+  end
+end
@@ -0,0 +1,147 @@
+require File.dirname(__FILE__) + '/../test_helper'
+
+# Re-raise errors caught by the controller.
+class HomeController; def rescue_action(e) raise e end; end
+
+class HomeControllerTest < ActionController::TestCase
+
+  def setup
+    @controller = HomeController.new
+    @request    = ActionController::TestRequest.new
+    @response   = ActionController::TestResponse.new
+
+    Environment.delete_all
+
+    @environment = Environment.create(:name => 'testenv', :is_default => true)
+    @environment.enabled_plugins = ['StatisticsPlugin']
+    @environment.save!
+
+    user = create_user('testinguser')
+    @environment.add_admin(user.person)
+
+    StatisticsBlock.delete_all
+    @box1 = Box.create!(:owner => @environment)
+    @environment.boxes = [@box1]
+
+    @block = StatisticsBlock.new
+    @block.box = @box1
+    @block.save!
+
+    login_as(user.login)
+  end
+
+  attr_accessor :block
+
+  should 'display statistics-block-data class in environment block edition' do
+    get :index
+
+    assert_tag :div, :attributes => {:class => 'statistics-block-data'}
+  end
+
+  should 'display users class in statistics-block-data block' do
+    get :index
+
+    assert_tag :tag => 'div', :attributes => {:class => 'statistics-block-data'}, :descendant => { :tag => 'li', :attributes => {:class => 'users'} }
+  end
+
+  should 'not display users class in statistics-block-data block' do
+    @block.user_counter = false
+    @block.save!
+    get :index
+
+    assert_no_tag :tag => 'div', :attributes => {:class => 'statistics-block-data'}, :descendant => { :tag => 'li', :attributes => {:class => 'users'} }
+  end
+
+  should 'display communities class in statistics-block-data block' do
+    @block.community_counter = true
+    @block.save!
+    get :index
+
+    assert_tag :tag => 'div', :attributes => {:class => 'statistics-block-data'}, :descendant => { :tag => 'li', :attributes => {:class => 'communities'} }
+  end
+
+  should 'not display communities class in statistics-block-data block' do
+    get :index
+
+    assert_no_tag :tag => 'div', :attributes => {:class => 'statistics-block-data'}, :descendant => { :tag => 'li', :attributes => {:class => 'communities'} }
+  end
+
+  should 'display enterprises class in statistics-block-data block' do
+    @block.enterprise_counter = true
+    @block.save!
+    get :index
+
+    assert_tag :tag => 'div', :attributes => {:class => 'statistics-block-data'}, :descendant => { :tag => 'li', :attributes => {:class => 'enterprises'} }
+  end
+
+  should 'not display enterprises class in statistics-block-data block' do
+    get :index
+
+    assert_no_tag :tag => 'div', :attributes => {:class => 'statistics-block-data'}, :descendant => { :tag => 'li', :attributes => {:class => 'enterprises'} }
+  end
+
+  should 'display categories class in statistics-block-data block' do
+    @block.category_counter = true
+    @block.save!
+    get :index
+
+    assert_tag :tag => 'div', :attributes => {:class => 'statistics-block-data'}, :descendant => { :tag => 'li', :attributes => {:class => 'categories'} }
+  end
+
+  should 'not display categories class in statistics-block-data block' do
+    get :index
+
+    assert_no_tag :tag => 'div', :attributes => {:class => 'statistics-block-data'}, :descendant => { :tag => 'li', :attributes => {:class => 'categories'} }
+  end
+
+  should 'display tags class in statistics-block-data block' do
+    get :index
+
+    assert_tag :tag => 'div', :attributes => {:class => 'statistics-block-data'}, :descendant => { :tag => 'li', :attributes => {:class => 'tags'} }
+  end
+
+  should 'not display tags class in statistics-block-data block' do
+    @block.tag_counter = false
+    @block.save!
+    get :index
+
+    assert_no_tag :tag => 'div', :attributes => {:class => 'statistics-block-data'}, :descendant => { :tag => 'li', :attributes => {:class => 'tags'} }
+  end
+
+  should 'display comments class in statistics-block-data block' do
+    get :index
+
+    assert_tag :tag => 'div', :attributes => {:class => 'statistics-block-data'}, :descendant => { :tag => 'li', :attributes => {:class => 'comments'} }
+  end
+
+  should 'not display comments class in statistics-block-data block' do
+    @block.comment_counter = false
+    @block.save!
+    get :index
+
+    assert_no_tag :tag => 'div', :attributes => {:class => 'statistics-block-data'}, :descendant => { :tag => 'li', :attributes => {:class => 'comments'} }
+  end
+
+  should 'display hits class in statistics-block-data block' do
+    @block.hit_counter = true
+    @block.save!
+    get :index
+
+    assert_tag :tag => 'div', :attributes => {:class => 'statistics-block-data'}, :descendant => { :tag => 'li', :attributes => {:class => 'hits'} }
+  end
+
+  should 'not display hits class in statistics-block-data block' do
+    get :index
+
+    assert_no_tag :tag => 'div', :attributes => {:class => 'statistics-block-data'}, :descendant => { :tag => 'li', :attributes => {:class => 'hits'} }
+  end
+
+  should 'display template name in class in statistics-block-data block' do
+    template = fast_create(Community, :name => 'Councils', :is_template => true, :environment_id => @environment.id)
+    @block.templates_ids_counter = {template.id.to_s => 'true'}
+    @block.save!
+    get :index
+
+    assert_tag :tag => 'div', :attributes => {:class => 'statistics-block-data'}, :descendant => { :tag => 'li', :attributes => {:class => 'councils'} }
+  end
+end
@@ -0,0 +1,85 @@
+require File.dirname(__FILE__) + '/../test_helper'
+
+# Re-raise errors caught by the controller.
+class ProfileDesignController; def rescue_action(e) raise e end; end
+
+class ProfileDesignControllerTest < ActionController::TestCase
+
+  def setup
+    @controller = ProfileDesignController.new
+    @request    = ActionController::TestRequest.new
+    @response   = ActionController::TestResponse.new
+
+    Environment.delete_all
+
+    @environment = Environment.create(:name => 'testenv', :is_default => true)
+    @environment.enabled_plugins = ['StatisticsPlugin']
+    @environment.save!
+
+    user = create_user('testinguser')
+    @person = user.person
+    @environment.add_admin(@person)
+
+    StatisticsBlock.delete_all
+    @box1 = Box.create!(:owner => @person)
+    @environment.boxes = [@box1]
+
+    @block = StatisticsBlock.new
+    @block.box = @box1
+    @block.save!
+
+    login_as(user.login)
+  end
+
+  attr_accessor :block
+
+  should 'be able to edit StatisticsBlock' do
+    get :edit, :id => @block.id, :profile => @person.identifier
+    assert_tag :tag => 'input', :attributes => { :id => 'block_title' }
+  end
+
+  should 'be able to save StatisticsBlock' do
+    get :edit, :id => @block.id, :profile => @person.identifier
+    post :save, :id => @block.id, :block => {:title => 'Statistics' }, :profile => @person.identifier
+    @block.reload
+    assert_equal 'Statistics', @block.title
+  end
+
+  should 'be able to uncheck core counters' do
+    @block.user_counter = true
+    @block.tag_counter = true
+    @block.comment_counter = true
+    @block.hit_counter = true
+    @block.save!
+    get :edit, :id => @block.id, :profile => @person.identifier
+    post :save, :id => @block.id, :block => {:user_counter => '0', :tag_counter => '0', :comment_counter => '0', :hit_counter => '0' }, :profile => @person.identifier
+    @block.reload
+    any_checked = @block.is_visible?('user_counter') ||
+                  @block.is_visible?('tag_counter') ||
+                  @block.is_visible?('comment_counter') ||
+                  @block.is_visible?('hit_counter')
+    assert_equal false, any_checked
+  end
+
+  should 'be able to check core counters' do
+    @block.user_counter = false
+    @block.community_counter = false
+    @block.enterprise_counter = false
+    @block.category_counter = false
+    @block.tag_counter = false
+    @block.comment_counter = false
+    @block.hit_counter = false
+    @block.save!
+    get :edit, :id => @block.id, :profile => @person.identifier
+    post :save, :id => @block.id, :block => {:user_counter => '1',
+      :tag_counter => '1', :comment_counter => '1', :hit_counter => '1' }, :profile => @person.identifier
+    @block.reload
+    all_checked = @block.is_visible?('user_counter') &&
+                  @block.is_visible?('tag_counter') &&
+                  @block.is_visible?('comment_counter') &&
+                  @block.is_visible?('hit_counter')
+    assert all_checked
+
+  end
+
+end
@@ -0,0 +1 @@
+require File.dirname(__FILE__) + '/../../../test/test_helper'
@@ -0,0 +1,336 @@
+require File.dirname(__FILE__) + '/../test_helper'
+class StatisticsBlockTest < ActiveSupport::TestCase
+
+  ['user_counter', 'tag_counter', 'comment_counter'].map do |counter|
+    should "#{counter} be true by default" do
+      b = StatisticsBlock.new
+      assert b.is_visible?(counter)
+    end
+  end
+
+  ['community_counter', 'enterprise_counter', 'category_counter', 'hit_counter'].map do |counter|
+    should "#{counter} be false by default" do
+      b = StatisticsBlock.new
+      assert !b.is_visible?(counter)
+    end
+  end
+
+  should 'inherit from Block' do
+    assert_kind_of Block, StatisticsBlock.new
+  end
+
+  should 'provide a default title' do
+    block = StatisticsBlock.new
+
+    owner = mock
+    owner.expects(:name).returns('my environment')
+    block.expects(:owner).returns(owner)
+    assert_equal 'Statistics for my environment', block.title
+  end
+
+  should 'describe itself' do
+    assert_not_equal StatisticsBlock.description, Block.description
+  end
+
+  should 'is_visible? return true if setting is true' do
+    b = StatisticsBlock.new
+    b.community_counter = true
+    assert b.is_visible?('community_counter')
+  end
+
+  should 'is_visible? return false if setting is false' do
+    b = StatisticsBlock.new
+    b.community_counter = false
+    assert !b.is_visible?('community_counter')
+  end
+
+  should 'templates return the Community templates of the Environment' do
+    b = StatisticsBlock.new
+    e = fast_create(Environment)
+
+    t1 = fast_create(Community, :is_template => true, :environment_id => e.id)
+    t2 = fast_create(Community, :is_template => true, :environment_id => e.id)
+    fast_create(Community, :is_template => false)
+
+    b.expects(:owner).at_least_once.returns(e)
+
+    t = b.templates
+    assert_equal [], [t1,t2] - t
+    assert_equal [], t - [t1,t2]
+  end
+
+  should 'users return the amount of users of the Environment' do
+    b = StatisticsBlock.new
+    e = fast_create(Environment)
+
+    fast_create(Person, :environment_id => e.id)
+    fast_create(Person, :environment_id => e.id)
+    fast_create(Person, :visible => false, :environment_id => e.id)
+
+    b.expects(:owner).at_least_once.returns(e)
+
+    assert_equal 2, b.users
+  end
+
+  should 'users return the amount of members of the community' do
+    b = StatisticsBlock.new
+
+    c1 = fast_create(Community)
+    c1.add_member(fast_create(Person))
+    c1.add_member(fast_create(Person))
+    c1.add_member(fast_create(Person))
+    c1.add_member(fast_create(Person, :visible => false))
+    c1.add_member(fast_create(Person, :visible => false))
+
+    b.expects(:owner).at_least_once.returns(c1)
+    assert_equal 3, b.users
+  end
+
+  should 'users return the amount of friends of the person' do
+    b = StatisticsBlock.new
+
+    p1 = fast_create(Person)
+    p1.add_friend(fast_create(Person))
+    p1.add_friend(fast_create(Person))
+    p1.add_friend(fast_create(Person))
+    p1.add_friend(fast_create(Person, :visible => false))
+    p1.add_friend(fast_create(Person, :visible => false))
+
+    b.expects(:owner).at_least_once.returns(p1)
+    assert_equal 3, b.users
+  end
+
+  should 'communities return the amount of communities of the Environment' do
+    b = StatisticsBlock.new
+    e = fast_create(Environment)
+
+    fast_create(Community, :environment_id => e.id)
+    fast_create(Community, :environment_id => e.id)
+    fast_create(Community, :visible => false, :environment_id => e.id)
+
+    b.expects(:owner).at_least_once.returns(e)
+
+    assert_equal 2, b.communities
+  end
+
+  should 'enterprises return the amount of enterprises of the Environment' do
+    b = StatisticsBlock.new
+    e = fast_create(Environment)
+
+    fast_create(Enterprise, :environment_id => e.id)
+    fast_create(Enterprise, :environment_id => e.id)
+    fast_create(Enterprise, :visible => false, :environment_id => e.id)
+
+    b.expects(:owner).at_least_once.returns(e)
+
+    assert_equal 2, b.enterprises
+  end
+
+  should 'categories return the amount of categories of the Environment' do
+    b = StatisticsBlock.new
+    e = fast_create(Environment)
+
+    fast_create(Category, :environment_id => e.id)
+    fast_create(Category, :environment_id => e.id)
+
+    b.expects(:owner).at_least_once.returns(e)
+
+    assert_equal 2, b.categories
+  end
+
+  should 'tags return the amount of tags of the Environment' do
+    b = StatisticsBlock.new
+    e = fast_create(Environment)
+
+    p1 = fast_create(Person, :environment_id => e.id)
+    a1 = fast_create(Article, :profile_id => p1.id)
+    t1 = fast_create(Tag, :name => 'T1')
+    t2 = fast_create(Tag, :name => 'T2')
+    a1.tags << t1
+    a1.tags << t2
+    a2 = fast_create(Article, :profile_id => p1.id)
+    t3 = fast_create(Tag, :name => 'T3')
+    t4 = fast_create(Tag, :name => 'T4')
+    a2.tags << t3
+    a2.tags << t4
+
+    b.expects(:owner).at_least_once.returns(e)
+
+    assert_equal 4, b.tags
+  end
+
+  should 'tags return the amount of tags of the community' do
+    b = StatisticsBlock.new
+    e = fast_create(Environment)
+
+    c1 = fast_create(Community, :environment_id => e.id)
+    a1 = fast_create(Article, :profile_id => c1.id)
+    t1 = fast_create(Tag, :name => 'T1')
+    t2 = fast_create(Tag, :name => 'T2')
+    a1.tags << t1
+    a1.tags << t2
+    a2 = fast_create(Article, :profile_id => c1.id)
+    t3 = fast_create(Tag, :name => 'T3')
+    t4 = fast_create(Tag, :name => 'T4')
+    a2.tags << t3
+    a2.tags << t4
+
+    b.expects(:owner).at_least_once.returns(c1)
+
+    assert_equal 4, b.tags
+  end
+
+  should 'tags return the amount of tags of the profile (person)' do
+    b = StatisticsBlock.new
+    e = fast_create(Environment)
+
+    p1 = fast_create(Person, :environment_id => e.id)
+    a1 = fast_create(Article, :profile_id => p1.id)
+    t1 = fast_create(Tag, :name => 'T1')
+    t2 = fast_create(Tag, :name => 'T2')
+    a1.tags << t1
+    a1.tags << t2
+    a2 = fast_create(Article, :profile_id => p1.id)
+    t3 = fast_create(Tag, :name => 'T3')
+    t4 = fast_create(Tag, :name => 'T4')
+    a2.tags << t3
+    a2.tags << t4
+
+    b.expects(:owner).at_least_once.returns(p1)
+
+    assert_equal 4, b.tags
+  end
+
+  should 'comments return the amount of comments of the Environment' do
+    b = StatisticsBlock.new
+    e = fast_create(Environment)
+
+    p1 = fast_create(Person, :environment_id => e.id)
+    a1 = fast_create(Article, :profile_id => p1.id)
+
+    Comment.create!(:source => a1, :body => 'C1', :author_id => 1)
+    Comment.create!(:source => a1, :body => 'C2', :author_id => 1)
+
+    a2 = fast_create(Article, :profile_id => p1.id)
+    Comment.create!(:source => a2, :body => 'C3', :author_id => 1)
+    Comment.create!(:source => a2, :body => 'C4', :author_id => 1)
+
+    b.expects(:owner).at_least_once.returns(e)
+
+    assert_equal 4, b.comments
+  end
+
+  should 'comments return the amount of comments of the community' do
+    b = StatisticsBlock.new
+    e = Environment.default
+
+    c1 = fast_create(Community, :environment_id => e.id)
+    a1 = fast_create(Article, :profile_id => c1.id)
+    Comment.create!(:source => a1, :body => 'C1', :author_id => 1)
+    Comment.create!(:source => a1, :body => 'C2', :author_id => 1)
+
+    a2 = fast_create(Article, :profile_id => c1.id)
+    Comment.create!(:source => a2, :body => 'C3', :author_id => 1)
+    Comment.create!(:source => a2, :body => 'C4', :author_id => 1)
+
+    b.expects(:owner).at_least_once.returns(c1)
+
+    assert_equal 4, b.comments
+  end
+
+  should 'comments return the amount of comments of the profile (person)' do
+    b = StatisticsBlock.new
+    e = fast_create(Environment)
+
+    p1 = fast_create(Person, :environment_id => e.id)
+    a1 = fast_create(Article, :profile_id => p1.id)
+    Comment.create!(:source => a1, :body => 'C1', :author_id => 1)
+    Comment.create!(:source => a1, :body => 'C2', :author_id => 1)
+
+    a2 = fast_create(Article, :profile_id => p1.id)
+    Comment.create!(:source => a1, :body => 'C3', :author_id => 1)
+    Comment.create!(:source => a1, :body => 'C4', :author_id => 1)
+
+    b.expects(:owner).at_least_once.returns(p1)
+
+    assert_equal 4, b.comments
+  end
+
+  should 'hits return the amount of hits of the Environment' do
+    b = StatisticsBlock.new
+    e = fast_create(Environment)
+
+    p1 = fast_create(Person, :environment_id => e.id)
+    a1 = fast_create(Article, :profile_id => p1.id, :hits => 2)
+    a2 = fast_create(Article, :profile_id => p1.id, :hits => 5)
+
+    b.expects(:owner).at_least_once.returns(e)
+
+    assert_equal 7, b.hits
+  end
+
+  should 'hits return the amount of hits of the community' do
+    b = StatisticsBlock.new
+    e = fast_create(Environment)
+
+    c1 = fast_create(Community, :environment_id => e.id)
+    a1 = fast_create(Article, :profile_id => c1.id, :hits => 2)
+    a2 = fast_create(Article, :profile_id => c1.id, :hits => 5)
+
+    b.expects(:owner).at_least_once.returns(c1)
+
+    assert_equal 7, b.hits
+  end
+
+  should 'hits return the amount of hits of the profile (person)' do
+    b = StatisticsBlock.new
+    e = fast_create(Environment)
+
+    p1 = fast_create(Person, :environment_id => e.id)
+    a1 = fast_create(Article, :profile_id => p1.id, :hits => 2)
+    a2 = fast_create(Article, :profile_id => p1.id, :hits => 5)
+
+    b.expects(:owner).at_least_once.returns(p1)
+
+    assert_equal 7, b.hits
+  end
+
+  should 'is_counter_available? return true for all counters if owner is environment' do
+    b = StatisticsBlock.new
+    e = fast_create(Environment)
+
+    b.expects(:owner).at_least_once.returns(e)
+
+    assert b.is_counter_available?(:user_counter)
+  end
+
+  should 'is_template_counter_active? return true if setting is true' do
+    b = StatisticsBlock.new
+    b.templates_ids_counter = {'1' => 'true'}
+    assert b.is_template_counter_active?(1)
+  end
+
+  should 'is_template_counter_active? return false if setting is false' do
+    b = StatisticsBlock.new
+    b.templates_ids_counter = {'1' => 'false'}
+    assert !b.is_template_counter_active?(1)
+  end
+
+  should 'template_counter_count return the amount of communities of the Environment using a template' do
+    b = StatisticsBlock.new
+    e = fast_create(Environment)
+
+    t1 = fast_create(Community, :is_template => true, :environment_id => e.id)
+    t2 = fast_create(Community, :is_template => true, :environment_id => e.id)
+    fast_create(Community, :is_template => false, :environment_id => e.id, :template_id => t1.id, :visible => true)
+    fast_create(Community, :is_template => false, :environment_id => e.id, :template_id => t1.id, :visible => true)
+    fast_create(Community, :is_template => false, :environment_id => e.id, :template_id => t1.id, :visible => false)
+
+    fast_create(Community, :is_template => false, :environment_id => e.id, :template_id => t2.id, :visible => true)
+    fast_create(Community, :is_template => false, :environment_id => e.id, :template_id => t2.id, :visible => false)
+
+    b.expects(:owner).at_least_once.returns(e)
+
+    assert_equal 2, b.template_counter_count(t1.id)
+  end
+end
@@ -0,0 +1,9 @@
+require File.dirname(__FILE__) + '/../test_helper'
+
+class StatisticsPluginTest < ActiveSupport::TestCase
+
+  should "return StatisticsBlock in extra_mlocks class method" do
+    assert  StatisticsPlugin.extra_blocks.keys.include?(StatisticsBlock)
+  end
+
+end
@@ -0,0 +1,32 @@
+<%= labelled_form_field check_box(:block, :user_counter) + _('Show user counter'), '' %>
+
+<% if @block.is_counter_available?(:community_counter) %>
+<%= labelled_form_field check_box(:block, :community_counter) + _('Show community counter'), '' %>
+<% end %>
+
+<% if @block.is_counter_available?(:enterprise_counter) %>
+<%= labelled_form_field check_box(:block, :enterprise_counter) + _('Show enterprise counter'), '' %>
+<% end %>
+
+<% if @block.is_counter_available?(:category_counter) %>
+<%= labelled_form_field check_box(:block, :category_counter) + _('Show category counter'), '' %>
+<% end %>
+
+<% if @block.is_counter_available?(:tag_counter) %>
+<%= labelled_form_field check_box(:block, :tag_counter) + _('Show tag counter'), '' %>
+<% end %>
+
+<% if @block.is_counter_available?(:comment_counter) %>
+<%= labelled_form_field check_box(:block, :comment_counter) + _('Show comment counter'), '' %>
+<% end %>
+
+<% if @block.is_counter_available?(:hit_counter) %>
+<%= labelled_form_field check_box(:block, :hit_counter) + _('Show hit counter'), '' %>
+<% end %>
+
+<% if @block.is_counter_available?(:templates_ids_counter) %>
+<%   @block.templates.map do |item|%>
+   <%= hidden_field_tag("block[templates_ids_counter][#{item.id}]", false)%>
+   <%= labelled_form_field check_box_tag("block[templates_ids_counter][#{item.id}]", true, @block.is_template_counter_active?(item.id)) + _("Show counter for communities with template %s" % item.name), '' %>
+<%   end %>
+<% end %>
@@ -0,0 +1 @@
+box_organizer
 \ No newline at end of file
@@ -0,0 +1 @@
+box_organizer
 \ No newline at end of file
@@ -0,0 +1,36 @@
+<h3 class="block-title">
+  <span><%=block.title%></span>
+</h3>
+<div class="statistics-block-data">
+  <ul>
+    <% if block.is_visible?('user_counter') %>
+      <li class="users"><span class="amount"><%= block.users%> </span><span class="label"><%= _('users')%></span></li>
+    <% end %>
+    <% if block.is_visible?('enterprise_counter') && !block.environment.enabled?('disable_asset_enterprises') %>
+      <li class="enterprises"><span class="amount"><%= block.enterprises%> </span><span class="label"><%= _('enterprises')%></span></li>
+    <% end %>
+    <% if block.is_visible?('community_counter') %>
+      <li class="communities"><span class="amount"><%= block.communities%> </span><span class="label"><%= _('communities')%></span></li>
+    <% end %>
+    <% if block.is_visible?('category_counter') %>
+      <li class="categories"><span class="amount"><%= block.categories%> </span><span class="label"><%= _('categories')%></span></li>
+    <% end %>
+    <% if block.is_visible?('tag_counter') %>
+      <li class="tags"><span class="amount"><%= block.tags%> </span><span class="label"><%= _('tags')%></span></li>
+    <% end %>
+    <% if block.is_visible?('comment_counter') %>
+      <li class="comments"><span class="amount"><%= block.comments%> </span><span class="label"><%= _('comments')%></span></li>
+    <% end %>
+    <% if block.is_visible?('hit_counter') %>
+      <li class="hits"><span class="amount"><%= block.hits%> </span><span class="label"><%= _('hits')%></span></li>
+    <% end %>
+
+    <% if block.owner.kind_of?(Environment) then %>
+      <% block.templates.each do |item|  %>
+        <% if block.is_template_counter_active? item.id %>
+          <li class="<%= item.name.to_slug%>"><span class="amount"><%= block.template_counter_count(item.id)%> </span><span class="label"><%= item.name%></span></li>
+        <% end %>
+      <% end %>
+    <% end %>
+  </ul>
+</div>
@@ -6,7 +6,7 @@ class EnvironmentDesignController; def rescue_action(e) raise e end; end
 class EnvironmentDesignControllerTest < ActionController::TestCase
-  ALL_BLOCKS = [ArticleBlock, LoginBlock, EnvironmentStatisticsBlock, RecentDocumentsBlock, EnterprisesBlock, CommunitiesBlock, PeopleBlock, SellersSearchBlock, LinkListBlock, FeedReaderBlock, SlideshowBlock, HighlightsBlock, FeaturedProductsBlock, CategoriesBlock, RawHTMLBlock, TagsBlock ]
+  ALL_BLOCKS = [ArticleBlock, LoginBlock, RecentDocumentsBlock, EnterprisesBlock, CommunitiesBlock, PeopleBlock, SellersSearchBlock, LinkListBlock, FeedReaderBlock, SlideshowBlock, HighlightsBlock, FeaturedProductsBlock, CategoriesBlock, RawHTMLBlock, TagsBlock ]
   def setup
     @controller = EnvironmentDesignController.new
@@ -83,16 +83,6 @@ class EnvironmentDesignControllerTest &lt; ActionController::TestCase
     assert_tag :tag => 'p', :attributes => { :id => 'no_portal_community' }
   end
-  should 'be able to edit EnvironmentStatisticsBlock' do
-    login_as(create_admin_user(Environment.default))
-    b = EnvironmentStatisticsBlock.create!
-    e = Environment.default
-    e.boxes.create!
-    e.boxes.first.blocks << b
-    get :edit, :id => b.id
-    assert_tag :tag => 'input', :attributes => { :id => 'block_title' }
-  end
-
   should 'be able to edit EnterprisesBlock' do
     login_as(create_admin_user(Environment.default))
     b = EnterprisesBlock.create!
@@ -33,7 +33,6 @@ class BoxTest &lt; ActiveSupport::TestCase
     assert blocks.include?('categories-block')
     assert blocks.include?('communities-block')
     assert blocks.include?('enterprises-block')
-    assert blocks.include?('environment-statistics-block')
     assert blocks.include?('fans-block')
     assert blocks.include?('favorite-enterprises-block')
     assert blocks.include?('feed-reader-block')
@@ -65,7 +64,6 @@ class BoxTest &lt; ActiveSupport::TestCase
     assert blocks.include?('communities-block')
     assert blocks.include?('disabled-enterprise-message-block')
     assert blocks.include?('enterprises-block')
-    assert blocks.include?('environment-statistics-block')
     assert blocks.include?('fans-block')
     assert blocks.include?('favorite-enterprises-block')
     assert blocks.include?('featured-products-block')
@@ -1,96 +0,0 @@
-require File.dirname(__FILE__) + '/../test_helper'
-
-class EnvironmentStatisticsBlockTest < ActiveSupport::TestCase
-
-  should 'inherit from Block' do
-    assert_kind_of Block, EnvironmentStatisticsBlock.new
-  end
-
-  should 'describe itself' do
-    assert_not_equal Block.description, EnvironmentStatisticsBlock.description
-  end
-
-  should 'provide a default title' do
-    owner = mock
-    owner.expects(:name).returns('my environment')
-
-    block = EnvironmentStatisticsBlock.new
-    block.expects(:owner).returns(owner)
-    assert_equal 'Statistics for my environment', block.title
-  end
-
-  should 'generate statistics' do
-    env = create(Environment)
-    user1 = create_user('testuser1', :environment_id => env.id)
-    user2 = create_user('testuser2', :environment_id => env.id)
-
-    fast_create(Enterprise, :environment_id => env.id)
-    fast_create(Community, :environment_id => env.id)
-
-    block = EnvironmentStatisticsBlock.new
-    env.boxes.first.blocks << block
-
-    content = block.content
-
-    assert_match(/One enterprise/, content)
-    assert_match(/2 users/, content)
-    assert_match(/One community/, content)
-  end
-  
-  should 'generate statistics including private profiles' do
-    env = create(Environment)
-    user1 = create_user('testuser1', :environment_id => env.id)
-    user2 = create_user('testuser2', :environment_id => env.id)
-    user3 = create_user('testuser3', :environment_id => env.id)
-    p = user3.person; p.public_profile = false; p.save!
-
-    fast_create(Enterprise, :environment_id => env.id)
-    fast_create(Enterprise, :environment_id => env.id, :public_profile => false)
-
-    fast_create(Community, :environment_id => env.id)
-    fast_create(Community, :environment_id => env.id, :public_profile => false)
-
-    block = EnvironmentStatisticsBlock.new
-    env.boxes.first.blocks << block
-
-    content = block.content
-
-    assert_match /2 enterprises/, content
-    assert_match /3 users/, content
-    assert_match /2 communities/, content
-  end
-
-  should 'generate statistics but not for not visible profiles' do
-    env = create(Environment)
-    user1 = create_user('testuser1', :environment_id => env.id)
-    user2 = create_user('testuser2', :environment_id => env.id)
-    user3 = create_user('testuser3', :environment_id => env.id)
-    p = user3.person; p.visible = false; p.save!
-
-    fast_create(Enterprise, :environment_id => env.id)
-    fast_create(Enterprise, :environment_id => env.id, :visible => false)
-
-    fast_create(Community, :environment_id => env.id)
-    fast_create(Community, :environment_id => env.id, :visible => false)
-
-    block = EnvironmentStatisticsBlock.new
-    env.boxes.first.blocks << block
-
-    content = block.content
-
-    assert_match /One enterprise/, content
-    assert_match /2 users/, content
-    assert_match /One community/, content
-  end
-
-  should 'not display enterprises if disabled' do
-    env = fast_create(Environment)
-    env.enable('disable_asset_enterprises', false)
-
-    block = EnvironmentStatisticsBlock.new
-    block.stubs(:owner).returns(env)
-
-    assert_no_match /enterprises/i, block.content
-  end
-
-end
	@@ -3,7 +3,7 @@ class EnvironmentDesignController < BoxOrganizerController		@@ -3,7 +3,7 @@ class EnvironmentDesignController < BoxOrganizerController
3	protect 'edit_environment_design', :environment	3	protect 'edit_environment_design', :environment
4		4
5	def available_blocks	5	def available_blocks
6	- @available_blocks \|\|= [ ArticleBlock, LoginBlock, EnvironmentStatisticsBlock, RecentDocumentsBlock, EnterprisesBlock, CommunitiesBlock, PeopleBlock, SellersSearchBlock, LinkListBlock, FeedReaderBlock, SlideshowBlock, HighlightsBlock, FeaturedProductsBlock, CategoriesBlock, RawHTMLBlock, TagsBlock ]	6	+ @available_blocks \|\|= [ ArticleBlock, LoginBlock, RecentDocumentsBlock, EnterprisesBlock, CommunitiesBlock, PeopleBlock, SellersSearchBlock, LinkListBlock, FeedReaderBlock, SlideshowBlock, HighlightsBlock, FeaturedProductsBlock, CategoriesBlock, RawHTMLBlock, TagsBlock ]
7	@available_blocks += plugins.dispatch(:extra_blocks, :type => Environment)	7	@available_blocks += plugins.dispatch(:extra_blocks, :type => Environment)
8	end	8	end
9		9
	@@ -161,7 +161,6 @@ class Environment < ActiveRecord::Base		@@ -161,7 +161,6 @@ class Environment < ActiveRecord::Base
161		161
162	# "left" area	162	# "left" area
163	env.boxes[1].blocks << LoginBlock.new	163	env.boxes[1].blocks << LoginBlock.new
164	- env.boxes[1].blocks << EnvironmentStatisticsBlock.new
165	env.boxes[1].blocks << RecentDocumentsBlock.new	164	env.boxes[1].blocks << RecentDocumentsBlock.new
166		165
167	# "right" area	166	# "right" area
	@@ -1,30 +0,0 @@	@@ -1,30 +0,0 @@
1	-class EnvironmentStatisticsBlock < Block
2	-
3	- def self.description
4	- _('Environment stastistics')
5	- end
6	-
7	- def default_title
8	- _('Statistics for %s') % owner.name
9	- end
10	-
11	- def help
12	- _('This block presents some statistics about your environment.')
13	- end
14	-
15	- def content(args={})
16	- users = owner.people.visible.count
17	- enterprises = owner.enterprises.visible.count
18	- communities = owner.communities.visible.count
19	-
20	- info = []
21	- info << (n_('One user', '%{num} users', users) % { :num => users })
22	- unless owner.enabled?('disable_asset_enterprises')
23	- info << (n__('One enterprise', '%{num} enterprises', enterprises) % { :num => enterprises })
24	- end
25	- info << (n__('One community', '%{num} communities', communities) % { :num => communities })
26	-
27	- block_title(title) + content_tag('ul', info.map {\|item\| content_tag('li', item) }.join("\n"))
28	- end
29	-
30	-end
@@ -0,0 +1,9 @@		@@ -0,0 +1,9 @@
	1	+class RemoveEnvironmentStatisticsBlock < ActiveRecord::Migration
	2	+ def self.up
	3	+ update("DELETE FROM blocks WHERE type = 'EnvironmentStatisticsBlock'")
	4	+ end
	5	+
	6	+ def self.down
	7	+ say("Nothing to undo (cannot recover the data)")
	8	+ end
	9	+end
@@ -0,0 +1,54 @@		@@ -0,0 +1,54 @@
	1	+README - Statistics (Statistics Plugin)
	2	+================================
	3	+
	4	+Statistics is a plugin to allow the user adds a block where you could see statistics of it's context.
	5	+
	6	+The Statistics block will be available for all layout columns of communities, peole, enterprises and environments.
	7	+
	8	+INSTALL
	9	+=======
	10	+
	11	+Enable Plugin
	12	+-------------
	13	+
	14	+Also, you need to enable Statistics Plugin at you Noosfero:
	15	+
	16	+cd <your_noosfero_dir>
	17	+./script/noosfero-plugins enable statistics
	18	+
	19	+Active Plugin
	20	+-------------
	21	+
	22	+As a Noosfero administrator user, go to administrator panel:
	23	+
	24	+- Click on "Enable/disable plugins" option
	25	+- Click on "Statistics Plugin" check-box
	26	+
	27	+Running Statistics tests
	28	+--------------------
	29	+
	30	+$ rake test:noosfero_plugins:statistics
	31	+
	32	+
	33	+Get Involved
	34	+============
	35	+
	36	+If you found any bug and/or want to collaborate, please send an e-mail to eduardo.edington@gmail.com
	37	+
	38	+LICENSE
	39	+=======
	40	+
	41	+Copyright (c) The Author developers.
	42	+
	43	+See Noosfero license.
	44	+
	45	+
	46	+AUTHORS
	47	+=======
	48	+
	49	+ Eduardo Tourinho Edington (eduardo.edington at gmail.com)
	50	+
	51	+ACKNOWLEDGMENTS
	52	+===============
	53	+
	54	+The author has been supported by Serpro
@@ -0,0 +1,146 @@		@@ -0,0 +1,146 @@
	1	+class StatisticsBlock < Block
	2	+
	3	+ settings_items :community_counter, :default => false
	4	+ settings_items :user_counter, :default => true
	5	+ settings_items :enterprise_counter, :default => false
	6	+ settings_items :category_counter, :default => false
	7	+ settings_items :tag_counter, :default => true
	8	+ settings_items :comment_counter, :default => true
	9	+ settings_items :hit_counter, :default => false
	10	+ settings_items :templates_ids_counter, Hash, :default => {}
	11	+
	12	+ USER_COUNTERS = [:community_counter, :user_counter, :enterprise_counter, :tag_counter, :comment_counter, :hit_counter]
	13	+ COMMUNITY_COUNTERS = [:user_counter, :tag_counter, :comment_counter, :hit_counter]
	14	+ ENTERPRISE_COUNTERS = [:user_counter, :tag_counter, :comment_counter, :hit_counter]
	15	+
	16	+ def self.description
	17	+ _('Statistics')
	18	+ end
	19	+
	20	+ def default_title
	21	+ _('Statistics for %s') % owner.name
	22	+ end
	23	+
	24	+ def is_visible? counter
	25	+ value = self.send(counter)
	26	+ value == '1' \|\| value == true
	27	+ end
	28	+
	29	+ def is_counter_available? counter
	30	+ if owner.kind_of?(Environment)
	31	+ true
	32	+ elsif owner.kind_of?(Person)
	33	+ USER_COUNTERS.include?(counter)
	34	+ elsif owner.kind_of?(Community)
	35	+ COMMUNITY_COUNTERS.include?(counter)
	36	+ elsif owner.kind_of?(Enterprise)
	37	+ ENTERPRISE_COUNTERS.include?(counter)
	38	+ end
	39	+
	40	+ end
	41	+
	42	+ def help
	43	+ _('This block presents some statistics about your context.')
	44	+ end
	45	+
	46	+ def timeout
	47	+ 60.minutes
	48	+ end
	49	+
	50	+ def environment
	51	+ if owner.kind_of?(Environment)
	52	+ owner
	53	+ elsif owner.kind_of?(Profile)
	54	+ owner.environment
	55	+ else
	56	+ nil
	57	+ end
	58	+ end
	59	+
	60	+ def templates
	61	+ Community.templates(environment)
	62	+ end
	63	+
	64	+ def is_template_counter_active? template_id
	65	+ self.templates_ids_counter[template_id.to_s].to_s == 'true'
	66	+ end
	67	+
	68	+ def template_counter_count(template_id)
	69	+ owner.communities.visible.count(:conditions => {:template_id => template_id})
	70	+ end
	71	+
	72	+ def users
	73	+ if owner.kind_of?(Environment)
	74	+ owner.people.visible.count
	75	+ elsif owner.kind_of?(Organization)
	76	+ owner.members.visible.count
	77	+ elsif owner.kind_of?(Person)
	78	+ owner.friends.visible.count
	79	+ else
	80	+ 0
	81	+ end
	82	+ end
	83	+
	84	+ def enterprises
	85	+ if owner.kind_of?(Environment) \|\| owner.kind_of?(Person)
	86	+ owner.enterprises.visible.count
	87	+ else
	88	+ 0
	89	+ end
	90	+ end
	91	+
	92	+ def communities
	93	+ if owner.kind_of?(Environment) \|\| owner.kind_of?(Person)
	94	+ owner.communities.visible.count
	95	+ else
	96	+ 0
	97	+ end
	98	+ end
	99	+
	100	+ def categories
	101	+ if owner.kind_of?(Environment) then
	102	+ owner.categories.count
	103	+ else
	104	+ 0
	105	+ end
	106	+ end
	107	+
	108	+ def tags
	109	+ if owner.kind_of?(Environment) then
	110	+ owner.tag_counts.count
	111	+ elsif owner.kind_of?(Profile) then
	112	+ owner.article_tags.count
	113	+ else
	114	+ 0
	115	+ end
	116	+ end
	117	+
	118	+ def comments
	119	+ if owner.kind_of?(Environment) then
	120	+ owner.profiles.joins(:articles).sum(:comments_count).to_i
	121	+ elsif owner.kind_of?(Profile) then
	122	+ owner.articles.sum(:comments_count)
	123	+ else
	124	+ 0
	125	+ end
	126	+ end
	127	+
	128	+ def hits
	129	+ if owner.kind_of?(Environment) then
	130	+ owner.profiles.joins(:articles).sum(:hits).to_i
	131	+ elsif owner.kind_of?(Profile) then
	132	+ owner.articles.sum(:hits)
	133	+ else
	134	+ 0
	135	+ end
	136	+ end
	137	+
	138	+ def content(args={})
	139	+ block = self
	140	+
	141	+ lambda do
	142	+ render :file => 'statistics_block', :locals => { :block => block }
	143	+ end
	144	+ end
	145	+
	146	+end
@@ -0,0 +1,19 @@		@@ -0,0 +1,19 @@
	1	+require_dependency File.dirname(__FILE__) + '/statistics_block'
	2	+
	3	+class StatisticsPlugin < Noosfero::Plugin
	4	+
	5	+ def self.plugin_name
	6	+ "Statistics Plugin"
	7	+ end
	8	+
	9	+ def self.plugin_description
	10	+ _("A plugin that adds a block where you can see statistics of it's context.")
	11	+ end
	12	+
	13	+ def self.extra_blocks
	14	+ {
	15	+ StatisticsBlock => {}
	16	+ }
	17	+ end
	18	+
	19	+end
@@ -0,0 +1,161 @@		@@ -0,0 +1,161 @@
	1	+require File.dirname(__FILE__) + '/../test_helper'
	2	+
	3	+# Re-raise errors caught by the controller.
	4	+class EnvironmentDesignController; def rescue_action(e) raise e end; end
	5	+
	6	+class EnvironmentDesignControllerTest < ActionController::TestCase
	7	+
	8	+ def setup
	9	+ @controller = EnvironmentDesignController.new
	10	+ @request = ActionController::TestRequest.new
	11	+ @response = ActionController::TestResponse.new
	12	+
	13	+ Environment.delete_all
	14	+
	15	+ @environment = Environment.create(:name => 'testenv', :is_default => true)
	16	+ @environment.enabled_plugins = ['StatisticsPlugin']
	17	+ @environment.save!
	18	+
	19	+ user = create_user('testinguser')
	20	+ @environment.add_admin(user.person)
	21	+
	22	+ StatisticsBlock.delete_all
	23	+ @box1 = Box.create!(:owner => @environment)
	24	+ @environment.boxes = [@box1]
	25	+
	26	+ @block = StatisticsBlock.new
	27	+ @block.box = @box1
	28	+ @block.save!
	29	+
	30	+ login_as(user.login)
	31	+ end
	32	+
	33	+ attr_accessor :block
	34	+
	35	+ should 'be able to edit StatisticsBlock' do
	36	+ get :edit, :id => @block.id
	37	+ assert_tag :tag => 'input', :attributes => { :id => 'block_title' }
	38	+ end
	39	+
	40	+ should 'be able to save StatisticsBlock' do
	41	+ get :edit, :id => @block.id
	42	+ post :save, :id => @block.id, :block => {:title => 'Statistics' }
	43	+ @block.reload
	44	+ assert_equal 'Statistics', @block.title
	45	+ end
	46	+
	47	+ should 'be able to uncheck core counters' do
	48	+ @block.user_counter = true
	49	+ @block.community_counter = true
	50	+ @block.enterprise_counter = true
	51	+ @block.category_counter = true
	52	+ @block.tag_counter = true
	53	+ @block.comment_counter = true
	54	+ @block.hit_counter = true
	55	+ @block.save!
	56	+ get :edit, :id => @block.id
	57	+ post :save, :id => @block.id, :block => {:user_counter => '0', :community_counter => '0', :enterprise_counter => '0',
	58	+ :category_counter => '0', :tag_counter => '0', :comment_counter => '0', :hit_counter => '0' }
	59	+ @block.reload
	60	+ any_checked = @block.is_visible?('user_counter') \|\|
	61	+ @block.is_visible?('community_counter') \|\|
	62	+ @block.is_visible?('enterprise_counter') \|\|
	63	+ @block.is_visible?('category_counter') \|\|
	64	+ @block.is_visible?('tag_counter') \|\|
	65	+ @block.is_visible?('comment_counter') \|\|
	66	+ @block.is_visible?('hit_counter')
	67	+ assert_equal false, any_checked
	68	+
	69	+ end
	70	+
	71	+ should 'be able to check core counters' do
	72	+ @block.user_counter = false
	73	+ @block.community_counter = false
	74	+ @block.enterprise_counter = false
	75	+ @block.category_counter = false
	76	+ @block.tag_counter = false
	77	+ @block.comment_counter = false
	78	+ @block.hit_counter = false
	79	+ @block.save!
	80	+ get :edit, :id => @block.id
	81	+ post :save, :id => @block.id, :block => {:user_counter => '1', :community_counter => '1', :enterprise_counter => '1',
	82	+ :category_counter => '1', :tag_counter => '1', :comment_counter => '1', :hit_counter => '1' }
	83	+ @block.reload
	84	+ all_checked = @block.is_visible?('user_counter') &&
	85	+ @block.is_visible?('community_counter') &&
	86	+ @block.is_visible?('enterprise_counter') &&
	87	+ @block.is_visible?('category_counter') &&
	88	+ @block.is_visible?('tag_counter') &&
	89	+ @block.is_visible?('comment_counter') &&
	90	+ @block.is_visible?('hit_counter')
	91	+ assert all_checked
	92	+
	93	+ end
	94	+
	95	+ should 'be able to check template counters' do
	96	+ template = fast_create(Community, :name => 'Councils', :is_template => true, :environment_id => @environment.id)
	97	+ @block.templates_ids_counter = {template.id.to_s => 'false'}
	98	+ @block.save!
	99	+ get :edit, :id => @block.id
	100	+ post :save, :id => @block.id, :block => {:templates_ids_counter => {template.id.to_s => 'true'}}
	101	+ @block.reload
	102	+
	103	+ assert @block.is_template_counter_active?(template.id)
	104	+ end
	105	+
	106	+ should 'be able to uncheck template counters' do
	107	+ template = fast_create(Community, :name => 'Councils', :is_template => true, :environment_id => @environment.id)
	108	+ @block.templates_ids_counter = {template.id.to_s => 'true'}
	109	+ @block.save!
	110	+ get :edit, :id => @block.id
	111	+ post :save, :id => @block.id, :block => {:templates_ids_counter => {template.id.to_s => 'false'}}
	112	+ @block.reload
	113	+
	114	+ assert_equal false, @block.is_template_counter_active?(template.id)
	115	+ end
	116	+
	117	+ should 'input user counter be checked by default' do
	118	+ get :edit, :id => @block.id
	119	+
	120	+ assert_tag :input, :attributes => {:id => 'block_user_counter', :checked => 'checked'}
	121	+ end
	122	+
	123	+ should 'not input community counter be checked by default' do
	124	+ get :edit, :id => @block.id
	125	+
	126	+ assert_tag :input, :attributes => {:id => 'block_community_counter'}
	127	+ assert_no_tag :input, :attributes => {:id => 'block_community_counter', :checked => 'checked'}
	128	+ end
	129	+
	130	+ should 'not input enterprise counter be checked by default' do
	131	+ get :edit, :id => @block.id
	132	+
	133	+ assert_tag :input, :attributes => {:id => 'block_enterprise_counter'}
	134	+ assert_no_tag :input, :attributes => {:id => 'block_enterprise_counter', :checked => 'checked'}
	135	+ end
	136	+
	137	+ should 'not input category counter be checked by default' do
	138	+ get :edit, :id => @block.id
	139	+
	140	+ assert_tag :input, :attributes => {:id => 'block_category_counter'}
	141	+ assert_no_tag :input, :attributes => {:id => 'block_category_counter', :checked => 'checked'}
	142	+ end
	143	+
	144	+ should 'input tag counter be checked by default' do
	145	+ get :edit, :id => @block.id
	146	+
	147	+ assert_tag :input, :attributes => {:id => 'block_tag_counter', :checked => 'checked'}
	148	+ end
	149	+
	150	+ should 'input comment counter be checked by default' do
	151	+ get :edit, :id => @block.id
	152	+
	153	+ assert_tag :input, :attributes => {:id => 'block_comment_counter', :checked => 'checked'}
	154	+ end
	155	+
	156	+ should 'input hit counter not be checked by default' do
	157	+ get :edit, :id => @block.id
	158	+
	159	+ assert_no_tag :input, :attributes => {:id => 'block_hit_counter', :checked => 'checked'}
	160	+ end
	161	+end
@@ -0,0 +1,147 @@		@@ -0,0 +1,147 @@
	1	+require File.dirname(__FILE__) + '/../test_helper'
	2	+
	3	+# Re-raise errors caught by the controller.
	4	+class HomeController; def rescue_action(e) raise e end; end
	5	+
	6	+class HomeControllerTest < ActionController::TestCase
	7	+
	8	+ def setup
	9	+ @controller = HomeController.new
	10	+ @request = ActionController::TestRequest.new
	11	+ @response = ActionController::TestResponse.new
	12	+
	13	+ Environment.delete_all
	14	+
	15	+ @environment = Environment.create(:name => 'testenv', :is_default => true)
	16	+ @environment.enabled_plugins = ['StatisticsPlugin']
	17	+ @environment.save!
	18	+
	19	+ user = create_user('testinguser')
	20	+ @environment.add_admin(user.person)
	21	+
	22	+ StatisticsBlock.delete_all
	23	+ @box1 = Box.create!(:owner => @environment)
	24	+ @environment.boxes = [@box1]
	25	+
	26	+ @block = StatisticsBlock.new
	27	+ @block.box = @box1
	28	+ @block.save!
	29	+
	30	+ login_as(user.login)
	31	+ end
	32	+
	33	+ attr_accessor :block
	34	+
	35	+ should 'display statistics-block-data class in environment block edition' do
	36	+ get :index
	37	+
	38	+ assert_tag :div, :attributes => {:class => 'statistics-block-data'}
	39	+ end
	40	+
	41	+ should 'display users class in statistics-block-data block' do
	42	+ get :index
	43	+
	44	+ assert_tag :tag => 'div', :attributes => {:class => 'statistics-block-data'}, :descendant => { :tag => 'li', :attributes => {:class => 'users'} }
	45	+ end
	46	+
	47	+ should 'not display users class in statistics-block-data block' do
	48	+ @block.user_counter = false
	49	+ @block.save!
	50	+ get :index
	51	+
	52	+ assert_no_tag :tag => 'div', :attributes => {:class => 'statistics-block-data'}, :descendant => { :tag => 'li', :attributes => {:class => 'users'} }
	53	+ end
	54	+
	55	+ should 'display communities class in statistics-block-data block' do
	56	+ @block.community_counter = true
	57	+ @block.save!
	58	+ get :index
	59	+
	60	+ assert_tag :tag => 'div', :attributes => {:class => 'statistics-block-data'}, :descendant => { :tag => 'li', :attributes => {:class => 'communities'} }
	61	+ end
	62	+
	63	+ should 'not display communities class in statistics-block-data block' do
	64	+ get :index
	65	+
	66	+ assert_no_tag :tag => 'div', :attributes => {:class => 'statistics-block-data'}, :descendant => { :tag => 'li', :attributes => {:class => 'communities'} }
	67	+ end
	68	+
	69	+ should 'display enterprises class in statistics-block-data block' do
	70	+ @block.enterprise_counter = true
	71	+ @block.save!
	72	+ get :index
	73	+
	74	+ assert_tag :tag => 'div', :attributes => {:class => 'statistics-block-data'}, :descendant => { :tag => 'li', :attributes => {:class => 'enterprises'} }
	75	+ end
	76	+
	77	+ should 'not display enterprises class in statistics-block-data block' do
	78	+ get :index
	79	+
	80	+ assert_no_tag :tag => 'div', :attributes => {:class => 'statistics-block-data'}, :descendant => { :tag => 'li', :attributes => {:class => 'enterprises'} }
	81	+ end
	82	+
	83	+ should 'display categories class in statistics-block-data block' do
	84	+ @block.category_counter = true
	85	+ @block.save!
	86	+ get :index
	87	+
	88	+ assert_tag :tag => 'div', :attributes => {:class => 'statistics-block-data'}, :descendant => { :tag => 'li', :attributes => {:class => 'categories'} }
	89	+ end
	90	+
	91	+ should 'not display categories class in statistics-block-data block' do
	92	+ get :index
	93	+
	94	+ assert_no_tag :tag => 'div', :attributes => {:class => 'statistics-block-data'}, :descendant => { :tag => 'li', :attributes => {:class => 'categories'} }
	95	+ end
	96	+
	97	+ should 'display tags class in statistics-block-data block' do
	98	+ get :index
	99	+
	100	+ assert_tag :tag => 'div', :attributes => {:class => 'statistics-block-data'}, :descendant => { :tag => 'li', :attributes => {:class => 'tags'} }
	101	+ end
	102	+
	103	+ should 'not display tags class in statistics-block-data block' do
	104	+ @block.tag_counter = false
	105	+ @block.save!
	106	+ get :index
	107	+
	108	+ assert_no_tag :tag => 'div', :attributes => {:class => 'statistics-block-data'}, :descendant => { :tag => 'li', :attributes => {:class => 'tags'} }
	109	+ end
	110	+
	111	+ should 'display comments class in statistics-block-data block' do
	112	+ get :index
	113	+
	114	+ assert_tag :tag => 'div', :attributes => {:class => 'statistics-block-data'}, :descendant => { :tag => 'li', :attributes => {:class => 'comments'} }
	115	+ end
	116	+
	117	+ should 'not display comments class in statistics-block-data block' do
	118	+ @block.comment_counter = false
	119	+ @block.save!
	120	+ get :index
	121	+
	122	+ assert_no_tag :tag => 'div', :attributes => {:class => 'statistics-block-data'}, :descendant => { :tag => 'li', :attributes => {:class => 'comments'} }
	123	+ end
	124	+
	125	+ should 'display hits class in statistics-block-data block' do
	126	+ @block.hit_counter = true
	127	+ @block.save!
	128	+ get :index
	129	+
	130	+ assert_tag :tag => 'div', :attributes => {:class => 'statistics-block-data'}, :descendant => { :tag => 'li', :attributes => {:class => 'hits'} }
	131	+ end
	132	+
	133	+ should 'not display hits class in statistics-block-data block' do
	134	+ get :index
	135	+
	136	+ assert_no_tag :tag => 'div', :attributes => {:class => 'statistics-block-data'}, :descendant => { :tag => 'li', :attributes => {:class => 'hits'} }
	137	+ end
	138	+
	139	+ should 'display template name in class in statistics-block-data block' do
	140	+ template = fast_create(Community, :name => 'Councils', :is_template => true, :environment_id => @environment.id)
	141	+ @block.templates_ids_counter = {template.id.to_s => 'true'}
	142	+ @block.save!
	143	+ get :index
	144	+
	145	+ assert_tag :tag => 'div', :attributes => {:class => 'statistics-block-data'}, :descendant => { :tag => 'li', :attributes => {:class => 'councils'} }
	146	+ end
	147	+end
@@ -0,0 +1,85 @@		@@ -0,0 +1,85 @@
	1	+require File.dirname(__FILE__) + '/../test_helper'
	2	+
	3	+# Re-raise errors caught by the controller.
	4	+class ProfileDesignController; def rescue_action(e) raise e end; end
	5	+
	6	+class ProfileDesignControllerTest < ActionController::TestCase
	7	+
	8	+ def setup
	9	+ @controller = ProfileDesignController.new
	10	+ @request = ActionController::TestRequest.new
	11	+ @response = ActionController::TestResponse.new
	12	+
	13	+ Environment.delete_all
	14	+
	15	+ @environment = Environment.create(:name => 'testenv', :is_default => true)
	16	+ @environment.enabled_plugins = ['StatisticsPlugin']
	17	+ @environment.save!
	18	+
	19	+ user = create_user('testinguser')
	20	+ @person = user.person
	21	+ @environment.add_admin(@person)
	22	+
	23	+ StatisticsBlock.delete_all
	24	+ @box1 = Box.create!(:owner => @person)
	25	+ @environment.boxes = [@box1]
	26	+
	27	+ @block = StatisticsBlock.new
	28	+ @block.box = @box1
	29	+ @block.save!
	30	+
	31	+ login_as(user.login)
	32	+ end
	33	+
	34	+ attr_accessor :block
	35	+
	36	+ should 'be able to edit StatisticsBlock' do
	37	+ get :edit, :id => @block.id, :profile => @person.identifier
	38	+ assert_tag :tag => 'input', :attributes => { :id => 'block_title' }
	39	+ end
	40	+
	41	+ should 'be able to save StatisticsBlock' do
	42	+ get :edit, :id => @block.id, :profile => @person.identifier
	43	+ post :save, :id => @block.id, :block => {:title => 'Statistics' }, :profile => @person.identifier
	44	+ @block.reload
	45	+ assert_equal 'Statistics', @block.title
	46	+ end
	47	+
	48	+ should 'be able to uncheck core counters' do
	49	+ @block.user_counter = true
	50	+ @block.tag_counter = true
	51	+ @block.comment_counter = true
	52	+ @block.hit_counter = true
	53	+ @block.save!
	54	+ get :edit, :id => @block.id, :profile => @person.identifier
	55	+ post :save, :id => @block.id, :block => {:user_counter => '0', :tag_counter => '0', :comment_counter => '0', :hit_counter => '0' }, :profile => @person.identifier
	56	+ @block.reload
	57	+ any_checked = @block.is_visible?('user_counter') \|\|
	58	+ @block.is_visible?('tag_counter') \|\|
	59	+ @block.is_visible?('comment_counter') \|\|
	60	+ @block.is_visible?('hit_counter')
	61	+ assert_equal false, any_checked
	62	+ end
	63	+
	64	+ should 'be able to check core counters' do
	65	+ @block.user_counter = false
	66	+ @block.community_counter = false
	67	+ @block.enterprise_counter = false
	68	+ @block.category_counter = false
	69	+ @block.tag_counter = false
	70	+ @block.comment_counter = false
	71	+ @block.hit_counter = false
	72	+ @block.save!
	73	+ get :edit, :id => @block.id, :profile => @person.identifier
	74	+ post :save, :id => @block.id, :block => {:user_counter => '1',
	75	+ :tag_counter => '1', :comment_counter => '1', :hit_counter => '1' }, :profile => @person.identifier
	76	+ @block.reload
	77	+ all_checked = @block.is_visible?('user_counter') &&
	78	+ @block.is_visible?('tag_counter') &&
	79	+ @block.is_visible?('comment_counter') &&
	80	+ @block.is_visible?('hit_counter')
	81	+ assert all_checked
	82	+
	83	+ end
	84	+
	85	+end