SoundSoftware Code Site

module ActivitiesHelper

  def busy_projects(events, count)

    # Transform events list into hash from project id to number of

    # occurrences of project in list (there is surely a tidier way

    # to do this, e.g. chunk() in Ruby 1.9 but not in 1.8)

    phash = events.map { |e| e.project unless !e.respond_to?(:project) }.sort.group_by { |p| p.id }

    phash = phash.merge(phash) { |k,v| v.length }

    threshold = phash.values.sort.last(count).first

    busy = phash.keys.select { |k| phash[k] >= threshold }.sample(count)

    busy.map { |pid| Project.find(pid) }

  end

  def busy_institutions(events, count)

    authors = events.map do |e|

      e.event_author unless !e.respond_to?(:event_author) 

    end.compact

    institutions = authors.map do |a|

      if a.respond_to?(:ssamr_user_detail) and !a.ssamr_user_detail.nil?

        a.ssamr_user_detail.institution_name

      end

    end

    insthash = institutions.compact.sort.group_by { |i| i }

    insthash = insthash.merge(insthash) { |k,v| v.length }

    threshold = insthash.values.sort.last(count).first

    insthash.keys.select { |k| insthash[k] >= threshold }.sample(count)

  end

end

      if principal.type == "User":      

        s << "<label>#{ check_box_tag name, principal.id, false } #{link_to_user principal}</label>\n"

      else

        s << "<label>#{ check_box_tag name, principal.id, false } #{h principal} (Group)</label>\n"

      end

  # Returns true if user agent appears (approximately) to be a search

  # bot or crawler

  def user_is_search_bot?

    agent = request.env['HTTP_USER_AGENT']

    agent and agent =~ /(bot|slurp|crawler|spider)\b/i

  end

  # Renders a tree of projects.  The given collection may be a subset

  # of the whole project tree (eg. some intermediate nodes are private

  # and can not be seen).  We are potentially interested in various

  # things: the project name, description, manager(s), creation date,

  # last activity date, general activity level, whether there is

  # anything actually hosted here for the project, etc.