lportal 1.0.8 → 1.0.9

data/lib/company.rb

@@ -32,12 +32,14 @@ class Company < ActiveRecord::Base
     'com.liferay.portal.model.Company'
   end
 
+  # A list of Users who have the Role 'Administrator'. Scope is not checked!
   def administrators
     adminrole = Role.find(:first, :conditions => "companyid=#{self.id} AND name='Administrator'")
     return self.users.select{|u| u.roles.include?(adminrole) }
   end
   alias :admins :administrators
 
+  # The default user for this Company.
   def guest
     User.find(:first, :conditions => "companyid=#{self.id} AND defaultuser = true" )
   end

data/lib/dl_file.rb

@@ -22,4 +22,10 @@ class DlFile < ActiveRecord::Base
     :class_name  => 'Tag::Asset',
     :foreign_key => 'classpk'
 
+
+  # URL path to download this Document Library File
+  def path
+    '/c/document_library/get_file?folderId=%i&name=%s' % [self.folderid, self.name]
+  end
+
 end

data/lib/group.rb

@@ -222,6 +222,41 @@ class Group < ActiveRecord::Base
     :foreign_key => 'groupid',
     :conditions  => 'privatelayout = true'
 
+
+  # --
+  # Class methods
+  # ++
+
+  class << self
+
+    # 0 = personal user groups
+    def find_personal(companyid)
+      self.find(:all, :conditions => "companyid=#{companyid} AND type_=0")
+    end
+
+    # 1 = public, guest can see
+    def find_public(companyid)
+      self.find(:all, :conditions => "companyid=#{companyid} AND type_=1")
+    end
+
+    # 2 = user-created open communities
+    def find_open(companyid)
+      self.find(:all, :conditions => "companyid=#{companyid} AND type_=2")
+    end
+
+    # 3 = private, also contains admins
+    def find_private(companyid)
+      self.find(:all, :conditions => "companyid=#{companyid} AND type_=3")
+    end
+  end
+
+
+  # --
+  # Instance methods
+  # ++
+
+  # Group's name. If classnameid==0 (Group is a basic group), use the name in the group_ column.
+  # Otherwise use the owner's name.
   def name
     self.classnameid != 0 ?
       self.owner.name : super
@@ -327,4 +362,9 @@ class Group < ActiveRecord::Base
     self.select_layouts_with(portlet,pl).any?
   end
 
+  # Helper to collect all tags that are related to this Group through Tag::Asset.
+  def assets_tags
+    self.assets.collect(&:tags).flatten.uniq
+  end
+
 end

data/lib/mb/category.rb

@@ -4,7 +4,8 @@ module MB
     set_table_name       :mbcategory
     set_primary_key      :categoryid
 
-    validates_uniqueness_of :uuid_
+    # this causes trouble when modifying instance attributes (!)
+    #validates_uniqueness_of :uuid_
 
     # com.liferay.portlet.messageboards.model.MBCategory
     def liferay_class

data/lib/mb/message.rb

@@ -3,11 +3,264 @@ module MB
     set_table_name       :mbmessage
     set_primary_key      :messageid
 
+#     validates_presence_of :user, :category, :subject, :body
+
+
     # com.liferay.portlet.messageboards.model.MBMessage
     def liferay_class
       'com.liferay.portlet.messageboards.model.MBMessage'
     end
 
+    # Actions for Permissions.
+    def self.actions
+      %w{
+        DELETE
+        PERMISSIONS
+        SUBSCRIBE
+        UPDATE
+        VIEW
+      }
+    end
+
+    #  - user
+    #  - category or parent message
+    #  - body
+    def initialize(params)
+      raise 'No user' unless params[:user] or params[:userid]
+      unless ((params[:category] or params[:categoryid]) || (params[:parent] or params[:parentmessageid]))
+        raise 'No category or parentmessage'
+      end
+      raise 'No body' unless params[:body]
+      super(params)
+
+      # COPY mbmessage (uuid_, messageid, companyid, userid, username, createdate, modifieddate, categoryid, threadid, parentmessageid, subject, body, attachments, anonymous) FROM stdin;
+      # +66089117-ddb5-4577-ba9b-76479a273727	10308	10109	10129	Test Test	2009-01-17 08:07:11.947	2009-01-17 08:07:11.947	10307	10309	0	New thread	This is a test, using rich editor.	f	f
+
+      unless self.uuid_
+        require 'rubygems'
+        require 'uuidtools'
+        self.uuid_ = UUID.random_create.to_s
+      end
+
+      self.category ||= self.parent.category
+      category = self.category
+
+      self.companyid ||= category.companyid
+
+      # always require User
+      #unless self.userid
+      #  self.userid = 0
+      #  self.anonymous = true
+      #else
+        self.anonymous = false
+      #end
+
+      self.subject         ||= ''
+      self.username        ||= ''
+      self.createdate      = Time.now
+      self.modifieddate    = Time.now
+      self.parentmessageid ||= 0
+      self.attachments     ||= false
+      self.save
+
+
+      # COPY mbcategory (uuid_, categoryid, groupid, companyid, userid, username, createdate, modifieddate, parentcategoryid, name, description, lastpostdate) FROM stdin;
+      # -fda18eef-3992-419e-a373-6e2f01a8b6a9	10307	10166	10109	10129	Test Test	2009-01-17 08:06:00.359	2009-01-17 08:06:00.359	0	Teppo Testaaja	message board for user Teppo	\N
+      # +fda18eef-3992-419e-a373-6e2f01a8b6a9	10307	10166	10109	10129	Test Test	2009-01-17 08:06:00.359	2009-01-17 08:06:00.359	0	Teppo Testaaja	message board for user Teppo	2009-01-17 08:07:11.947
+
+      category.lastpostdate = Time.now
+      category.save
+
+
+      # COPY mbthread (threadid, categoryid, rootmessageid, messagecount, viewcount, lastpostbyuserid, lastpostdate, priority) FROM stdin;
+      # +10309	10307	10308	1	1	10129	2009-01-17 08:07:11.947	0
+
+      thread = MB::Thread.find(:first,
+        :conditions => "categoryid=#{category.id} AND rootmessageid=#{self.find_thread_root.id}")
+      unless thread
+        thread = MB::Thread.create(
+          :category => category,
+          :rootmessage => self,
+          :messagecount => 0,
+          :viewcount => 0
+        )
+      end
+      thread.messagecount += 1
+      thread.lastpostbyuserid = self.user.id
+      thread.lastpostdate = Time.now
+      thread.save
+      self.thread = thread
+
+
+      # COPY mbmessageflag (messageflagid, userid, messageid, flag) FROM stdin;
+      # +10313	10129	10308	1
+
+      unless self.flag # wtf?
+        MB::MessageFlag.create(
+          :user    => self.user,
+          :message => self,
+          :flag    => 1
+        )
+      end
+
+
+      # COPY mbstatsuser (statsuserid, groupid, userid, messagecount, lastpostdate) FROM stdin;
+      # +10310	10166	10129	1	2009-01-17 08:07:12.014
+
+      stats = MB::StatsUser.find(:first, :conditions => "groupid=#{category.groupid} AND userid=#{self.user.id}")
+      unless stats
+        stats = MB::StatsUser.create(
+          :groupid => category.groupid,
+          :user => self.user,
+          :messagecount => 0
+        )
+      end
+      stats.messagecount += 1
+      stats.lastpostdate = Time.now
+      stats.save
+
+
+      # COPY ratingsstats (statsid, classnameid, classpk, totalentries, totalscore, averagescore) FROM stdin;
+      # +10312	10071	10308	0	0	0
+
+      classnameid = Classname.find_by_value(self.liferay_class).id
+
+      unless RatingsStats.find(:first,
+        :conditions => "classnameid=#{classnameid} AND classpk=#{self.id}")
+        RatingsStats.create(
+          :classnameid => classnameid,
+          :classpk => self.id
+        )
+      end
+
+
+      # COPY socialactivity (activityid, groupid, companyid, userid, createdate, mirroractivityid, classnameid, classpk, type_, extradata, receiveruserid) FROM stdin;
+      # +1	10166	10109	10129	2009-01-17 08:07:12.024	0	10071	10308	1		0
+
+      unless SocialActivity.find(:first,
+        :conditions => "userid=#{self.user.id} AND classnameid=#{classnameid} AND classpk=#{self.id}")
+        SocialActivity.create(
+          :group       => category.group,
+          :company     => self.company,
+          :user        => self.user,
+          :classnameid => classnameid,
+          :classpk     => self.id
+        )
+      end
+
+
+      # COPY tagsasset (assetid, groupid, companyid, userid, username, createdate, modifieddate, classnameid, classpk, startdate, enddate, publishdate, expirationdate, mimetype, title, description, summary, url, height, width, priority, viewcount) FROM stdin;
+      # +10311	10166	10109	10129	Test Test	2009-01-17 08:07:12.039	2009-01-17 08:07:12.039	10071	10308	\N	\N	\N	\N	text/html	New thread				0	0	0	0
+
+      unless Tag::Asset.find(:first,
+        :conditions => "userid=#{self.user.id} AND classnameid=#{classnameid} AND classpk=#{self.id}")
+        Tag::Asset.create(
+          :group       => category.group,
+          :company     => self.company,
+          :user        => self.user,
+          :classnameid => classnameid,
+          :classpk     => self.id,
+          :title       => 'New thread'
+        )
+      end
+
+
+      # ResourceCode with scope 1 => Resource for Company
+      # ResourceCode with scope 2 => Resource for this Group and Guest's Group
+      # ResourceCode with scope 4 => Resource for self
+
+      # COPY resourcecode (codeid, companyid, name, scope) FROM stdin;
+      # +107	10109	com.liferay.portlet.messageboards.model.MBMessage	1
+      # +108	10109	com.liferay.portlet.messageboards.model.MBMessage	2
+      # +109	10109	com.liferay.portlet.messageboards.model.MBMessage	4
+
+      # COPY resource_ (resourceid, codeid, primkey) FROM stdin;
+      # +214	107	10109
+      # +215	108	10124 << this is Guest's group
+      # +216	108	10166
+      # +217	109	10308
+
+      # only create resources with scope 1,2 for rootmessages
+      if self.is_root?
+        rc = self.resource_code(1)
+        unless rc
+          rc = ResourceCode.create(
+            :companyid => self.companyid,
+            :name => self.liferay_class,
+            :scope => 1
+          )
+        end
+        unless Resource.find(:first, :conditions => "codeid=#{rc.id} AND primkey='#{self.companyid}'")
+          Resource.create(
+            :codeid  => rc.id,
+            :primkey => self.companyid
+          )
+        end
+
+        rc = self.resource_code(2)
+        unless rc
+          rc = ResourceCode.create(
+            :companyid => self.companyid,
+            :name => self.liferay_class,
+            :scope => 2
+          )
+        end
+        unless Resource.find(:first, :conditions => "codeid=#{rc.id} AND primkey='#{category.groupid}'")
+          Resource.create(
+            :codeid  => rc.id,
+            :primkey => category.groupid
+          )
+        end
+      end
+
+      # Create a resource with scope=4
+      rc = self.resource_code(4)
+      unless rc
+        rc = ResourceCode.create(
+          :companyid => self.companyid,
+          :name => self.liferay_class,
+          :scope => 4
+        )
+      end
+      resource = Resource.find(:first, :conditions => "codeid=#{rc.id} AND primkey='#{self.id}'")
+      unless resource
+        resource = Resource.create(
+          :codeid  => rc.id,
+          :primkey => self.id
+        )
+      end
+
+
+      # COPY permission_ (permissionid, companyid, actionid, resourceid) FROM stdin;
+      # +323	10109	DELETE	217
+      # +324	10109	PERMISSIONS	217
+      # +325	10109	SUBSCRIBE	217
+      # +326	10109	UPDATE	217
+      # +327	10109	VIEW	217
+
+      # COPY users_permissions (userid, permissionid) FROM stdin;
+      # +10129	323
+      # +10129	324
+      # +10129	325
+      # +10129	326
+      # +10129	327
+
+      self.class.actions.each do |actionid|
+        permission = Permission.find(:first,
+          :conditions => "companyid=#{self.companyid} AND actionid='#{actionid}' AND resourceid=#{resource.id}")
+        unless permission
+          permission = Permission.create(
+            :companyid  => self.companyid,
+            :actionid   => actionid,
+            :resourceid => resource.id
+          )
+        end
+        self.user.user_permissions << permission
+      end
+
+      self.save
+    end
+
     belongs_to :company,
       :foreign_key => 'companyid'
 
@@ -24,14 +277,42 @@ module MB
       :class_name => 'MB::Thread',
       :foreign_key => 'threadid'
 
-#     has_one :asset,
-#       :class_name  => 'Tag::Asset',
-#       :foreign_key => 'classpk'
+    has_one :flag,
+      :class_name => 'MB::MessageFlag',
+      :foreign_key => 'messageid'
 
 
-    # parent message
+    has_one :asset,
+      :class_name  => 'Tag::Asset',
+      :foreign_key => 'classpk'
+
+
+    # Parent message
     def parent
-      self.parentmessageid != 0 ? MB::Message.find(self.parentmessageid) : nil
+      self.is_root? ? nil : MB::Message.find(self.parentmessageid)
+    end
+    def parent=(msg)
+      raise 'Parent must be MB::Message' unless msg.is_a?(MB::Message)
+      self.parentmessageid = msg.id
+    end
+
+    # First in thread?
+    def is_root?
+      self.parentmessageid == 0
+    end
+
+    # Finds the first in the thread recursively.
+    #
+    # Since initialize() uses this method to find the root message before the thread is known,
+    # MB::Thread methods cannot be used. Otherwise, self.thread.rootmessage would be faster.
+    # Using while (or until) loops may lead to never-ending loops if the database contains awkward data
+    # (actual root message pointing to another message etc)
+    def find_thread_root
+      msg = self
+      until (msg.is_root?) do
+        msg = msg.parent
+      end
+      return msg
     end
 
     def has_attachements?
@@ -42,5 +323,11 @@ module MB
       self.anonymous
     end
 
+    # ResourceCode associated to this instance (and scope)
+    def resource_code(scope=4)
+      ResourceCode.find(:first,
+        :conditions => "companyid=#{self.companyid} AND name='#{self.liferay_class}' AND scope=#{scope}")
+    end
+
   end
 end

data/lib/mb/message_flag.rb

@@ -0,0 +1,19 @@
+module MB
+  class MessageFlag < ActiveRecord::Base
+    set_table_name       :mbmessageflag
+    set_primary_key      :messageflagid
+
+    # com.liferay.portlet.messageboards.model.MBMessageFlag
+    def liferay_class
+      'com.liferay.portlet.messageboards.model.MBMessageFlag'
+    end
+
+    belongs_to :user,
+      :foreign_key => 'userid'
+
+    belongs_to :message,
+      :class_name => 'MB::Message',
+      :foreign_key => 'messageid'
+
+  end
+end

data/lib/mb/stats_user.rb

@@ -0,0 +1,18 @@
+module MB
+  class StatsUser < ActiveRecord::Base
+    set_table_name       :mbstatsuser
+    set_primary_key      :statsuserid
+
+    # com.liferay.portlet.messageboards.model.MBStatsUser
+    def liferay_class
+      'com.liferay.portlet.messageboards.model.MBStatsUser'
+    end
+
+    belongs_to :user,
+      :foreign_key => 'userid'
+
+    belongs_to :group,
+      :foreign_key => 'groupid'
+
+  end
+end

data/lib/mb/thread.rb

@@ -9,15 +9,21 @@ module MB
     end
 
     belongs_to :category,
-      :class_name => "MB::Category",
-      :foreign_key => "categoryid"
+      :class_name => 'MB::Category',
+      :foreign_key => 'categoryid'
+
+    belongs_to :rootmessage,
+      :class_name => 'MB::Message',
+      :foreign_key => 'rootmessageid'
+
+    has_many :messages,
+      :class_name => 'MB::Message',
+      :foreign_key => 'threadid',
+      :order => :createdate
 
-    belongs_to :root,
-      :class_name => "MB::Message",
-      :foreign_key => "rootmessageid"
 
     def first_entry
-      self.root
+      self.rootmessage
     end
 
   end

data/lib/ratings_stats.rb

@@ -0,0 +1,18 @@
+class RatingsStats < ActiveRecord::Base
+  set_table_name       :ratingsstats
+  set_primary_key      :statsid
+
+  # com.liferay.portlet.ratings.model.RatingsStats
+  def liferay_class
+    'com.liferay.portlet.ratings.model.RatingsStats'
+  end
+
+  def initialize(params)
+    super(params)
+    self.totalentries ||= 0
+    self.totalscore   ||= 0
+    self.averagescore ||= 0
+    self.save
+  end
+
+end

data/lib/social_activity.rb

@@ -0,0 +1,29 @@
+class SocialActivity < ActiveRecord::Base
+  set_table_name       :socialactivity
+  set_primary_key      :activityid
+
+  # com.liferay.portlet.social.model.SocialActivity
+  def liferay_class
+    'com.liferay.portlet.social.model.SocialActivity'
+  end
+
+  belongs_to :group,
+    :foreign_key => 'groupid'
+
+  belongs_to :company,
+    :foreign_key => 'companyid'
+
+  belongs_to :user,
+    :foreign_key => 'userid'
+
+  def initialize(params)
+    super(params)
+    self.createdate       ||= Time.now
+    self.mirroractivityid ||= 0
+    self.type_            ||= 1
+    self.extradata        ||= ''
+    self.receiveruserid   ||= 0
+    self.save
+  end
+
+end

data/lib/social_relation.rb

@@ -0,0 +1,19 @@
+class SocialRelation < ActiveRecord::Base
+  set_table_name       :socialrelation
+  set_primary_key      :relationid
+
+  # com.liferay.portlet.social.model.SocialRelation
+  def liferay_class
+    'com.liferay.portlet.social.model.SocialRelation'
+  end
+
+  belongs_to :company,
+    :foreign_key => 'companyid'
+
+  belongs_to :user1,
+    :foreign_key => 'userid1'
+
+  belongs_to :user2,
+    :foreign_key => 'userid2'
+
+end

data/lib/tag/asset.rb

@@ -9,6 +9,30 @@ module Tag
       'com.liferay.portlet.tags.model.TagsAsset'
     end
 
+# COPY tagsasset (assetid, groupid, companyid, userid, username, createdate, modifieddate, classnameid, classpk, startdate, enddate, publishdate, expirationdate, mimetype, title, description, summary, url, height, width, priority, viewcount) FROM stdin;
+# +10311	10166	10109	10129	Test Test	2009-01-17 08:07:12.039	2009-01-17 08:07:12.039	10071	10308	\N	\N	\N	\N	text/html	New thread				0	0	0	0
+
+
+    def initialize(params)
+      super(params)
+      self.createdate     ||= Time.now
+      self.modifieddate   ||= Time.now
+      self.startdate      ||= nil
+      self.enddate        ||= nil
+      self.publishdate    ||= nil
+      self.expirationdate ||= nil
+      self.mimetype       ||= 'text/html'
+      self.title          ||= ''
+      self.description    ||= ''
+      self.summary        ||= ''
+      self.url            ||= ''
+      self.height         ||= 0
+      self.width          ||= 0
+      self.priority       ||= 0
+      self.viewcount      ||= 0
+      self.save
+    end
+
     belongs_to :company,
       :foreign_key => 'companyid'
 
@@ -33,7 +57,7 @@ module Tag
       [
         BlogPost,
         Wiki::Page,
-#         MB::Message,
+        MB::Message,
         Journal::Article,
         DlFile,
         IG::Image,

data/lib/user.rb

@@ -274,7 +274,7 @@ class User < ActiveRecord::Base
   alias :articles :wikipages
 
   # association to MessageBoardMessages
-  has_many :messages,
+  has_many :mbmessages,
            :class_name  => 'MB::Message',
            :foreign_key => 'userid'
 
@@ -304,10 +304,12 @@ class User < ActiveRecord::Base
     org = self.company.organizations.select{|o| o.parent==nil}.first
     self.organizations << org
 
+    # give the user the 'Organization member' role, within the scope of this Organization.
     org_role = Role.find(:first, :conditions => "companyid=#{self.companyid} AND name='Organization Member'")
     group = org.group
 
     # can ActiveRecord handle 3-way associations?
+    # - perhaps with hacking, http://bjhess.com/blog/2007/09/19/my-foray-into-has_many_polymorphs/
     ActiveRecord::Base.connection.execute(
       "INSERT INTO usergrouprole (userid, groupid, roleid) VALUES (%i, %i, %i);" % [
         self.id, org.group.id, org_role.id])
@@ -369,7 +371,7 @@ class User < ActiveRecord::Base
 
   # Creates a new Contact unless it exists
   #
-  # 1=female, 2=male
+  # 1=female, 2=male (WHERE IS CONSISTENCY?!)
   def sex=(v)
     male = (v==2 ? true : false)
     if self.contact

data/test/unit/dl_file_test.rb

@@ -1,8 +1,36 @@
 require 'test_helper'
 
 class DlFileTest < ActiveSupport::TestCase
-  # Replace this with your real tests.
-  def test_truth
-    assert true
+
+  def setup
+    @files = DLFile.all
+  end
+
+  def test_company
+    @files.each do |dlf|
+      assert_not_nil dlf.company
+    end
+  end
+
+  def test_user
+    @files.each do |dlf|
+      assert_not_nil dlf.user
+    end
+  end
+
+  def test_asset
+    @files.each do |dlf|
+      assert_not_nil dlf.asset
+    end
   end
+
+  def test_path
+    @files.each do |dlf|
+      assert_not_nil dlf.path
+    end
+  end
+
+
+
+
 end

data/test/unit/mb/message_test.rb

@@ -5,13 +5,161 @@ class MB::MessageTest < ActiveSupport::TestCase
     :mbcategory,
     :mbdiscussion,
     :mbmessage,
-    :mbthread
+    :mbthread,
+    :mbstatsuser,
+    :mbmessageflag,
+    :classname_,
+    :group_,
+    :user_
   ]
 
   def setup
     @messages = MB::Message.all
   end
 
+  def test_new_rootmsg
+    user = User.first
+    category = MB::Category.first
+    subject = random_string
+    body = random_string
+
+    msg = MB::Message.create(:category => category, :user => user, :subject => subject, :body => body)
+
+    assert_equal subject, msg.subject
+    assert_equal body, msg.body
+
+    assert_not_nil msg.flag
+    assert_equal 1, msg.flag.flag
+
+    category.reload
+    assert_equal category, msg.category
+    assert_in_delta Time.now, category.lastpostdate.getlocal, 1.0
+
+
+    thread = MB::Thread.find(:first,
+      :conditions => "categoryid=#{category.id} AND rootmessageid=#{msg.id}")
+    assert_not_nil thread
+    assert_equal thread, msg.thread
+    assert_equal 1, thread.messagecount
+    assert_equal user.id, thread.lastpostbyuserid
+    assert_in_delta Time.now, thread.lastpostdate.getlocal, 1.0
+
+
+    stats = MB::StatsUser.find(:first, :conditions => "groupid=#{category.group.id} AND userid=#{user.id}")
+    assert_not_nil stats
+    assert_equal 1, stats.messagecount
+    assert_in_delta Time.now, stats.lastpostdate.getlocal, 1.0
+
+
+    classnameid = Classname.find_by_value(msg.liferay_class).id
+    assert_not_nil RatingsStats.find(:first, :conditions => "classnameid=#{classnameid} AND classpk=#{msg.id}")
+
+    assert_not_nil SocialActivity.find(:first,
+      :conditions => "userid=#{user.id} AND classnameid=#{classnameid} AND classpk=#{msg.id}")
+
+    assert_not_nil Tag::Asset.find(:first,
+      :conditions => "userid=#{user.id} AND classnameid=#{classnameid} AND classpk=#{msg.id}")
+
+    rc = msg.resource_code(1)
+    assert_not_nil rc
+    assert_not_nil Resource.find(:first,
+      :conditions => "codeid=#{rc.id} AND primkey='#{msg.companyid}'")
+
+    rc = msg.resource_code(2)
+    assert_not_nil rc
+    assert_not_nil Resource.find(:first,
+      :conditions => "codeid=#{rc.id} AND primkey='#{category.group.id}'")
+
+    rc = msg.resource_code(4)
+    assert_not_nil rc
+    resource = Resource.find(:first,
+      :conditions => "codeid=#{rc.id} AND primkey='#{msg.id}'")
+    assert_not_nil resource
+
+    msg.class.actions.each do |actionid|
+      p = Permission.find(:first,
+        :conditions => "companyid=#{msg.companyid} AND actionid='#{actionid}' AND resourceid=#{resource.id}")
+      assert_not_nil p
+      assert user.user_permissions.include?(p)
+    end
+  end
+
+  def test_new_reply
+    parent = MB::Message.first
+    category = parent.category
+    assert_not_nil category
+
+    user = User.first
+    subject = random_string
+    body = random_string
+
+    thread = parent.thread
+    assert_not_nil thread
+    thread_messagecount = thread.messagecount
+
+    stats = MB::StatsUser.find(:first, :conditions => "groupid=#{category.groupid} AND userid=#{user.id}")
+    stats_messagecount = (stats.nil? ? 0 : stats.messagecount)
+
+    msg = MB::Message.create(
+      :parent => parent,
+      :user => user,
+      :subject => subject,
+      :body => body
+    )
+
+    assert_equal subject, msg.subject
+    assert_equal body, msg.body
+    assert_equal parent, msg.parent
+
+    assert_not_nil msg.flag
+    assert_equal 1, msg.flag.flag
+
+
+    category.reload
+    assert_equal category, msg.category
+    assert_in_delta Time.now, category.lastpostdate.getlocal, 1.0
+
+
+    thread.reload
+    assert_equal thread, msg.thread
+    assert_equal thread_messagecount+1, thread.messagecount
+    assert_equal user.id, thread.lastpostbyuserid
+    assert_in_delta Time.now, thread.lastpostdate.getlocal, 1.0
+
+
+    stats = MB::StatsUser.find(:first, :conditions => "groupid=#{category.groupid} AND userid=#{user.id}")
+    assert_not_nil stats
+    assert_equal stats_messagecount+1, stats.messagecount
+    assert_in_delta Time.now, stats.lastpostdate.getlocal, 1.0
+
+
+    # COPY ratingsstats (statsid, classnameid, classpk, totalentries, totalscore, averagescore) FROM stdin;
+    # +10316	10071	10314	0	0	0
+
+    classnameid = Classname.find_by_value(msg.liferay_class).id
+    assert_not_nil RatingsStats.find(:first, :conditions => "classnameid=#{classnameid} AND classpk=#{msg.id}")
+
+    assert_not_nil SocialActivity.find(:first,
+      :conditions => "userid=#{user.id} AND classnameid=#{classnameid} AND classpk=#{msg.id}")
+
+    assert_not_nil Tag::Asset.find(:first,
+      :conditions => "userid=#{user.id} AND classnameid=#{classnameid} AND classpk=#{msg.id}")
+
+    rc = msg.resource_code(4)
+    assert_not_nil rc
+    resource = Resource.find(:first,
+      :conditions => "codeid=#{rc.id} AND primkey='#{msg.id}'")
+    assert_not_nil resource
+
+    msg.class.actions.each do |actionid|
+      p = Permission.find(:first,
+        :conditions => "companyid=#{msg.companyid} AND actionid='#{actionid}' AND resourceid=#{resource.id}")
+      assert_not_nil p
+      assert user.user_permissions.include?(p)
+    end
+
+  end
+
   def test_company
     @messages.each do |x|
       assert_not_nil x.company, "#{x.id} belongs to no company"
@@ -51,4 +199,10 @@ class MB::MessageTest < ActiveSupport::TestCase
     end
   end
 
+  def test_asset
+    @messages.each do |x|
+      assert_nothing_raised { x.asset }
+    end
+  end
+
 end

data/version.rb

@@ -1,4 +1,4 @@
 # bogus module that only defines the VERSION.
 module Lportal
-  VERSION='1.0.8'
+  VERSION='1.0.9'
 end

metadata

@@ -1,7 +1,7 @@
 --- !ruby/object:Gem::Specification 
 name: lportal
 version: !ruby/object:Gem::Version 
-  version: 1.0.8
+  version: 1.0.9
 platform: ruby
 authors: 
 - Mikael Lammentausta
@@ -9,7 +9,7 @@ autorequire: init
 bindir: bin
 cert_chain: []
 
-date: 2009-01-25 00:00:00 +02:00
+date: 2009-02-12 00:00:00 +02:00
 default_executable: 
 dependencies: 
 - !ruby/object:Gem::Dependency 
@@ -45,7 +45,9 @@ files:
 - version.rb
 - init.rb
 - lportal.rb
+- lib/social_activity.rb
 - lib/counter.rb
+- lib/social_relation.rb
 - lib/image.rb
 - lib/dl_folder.rb
 - lib/blog_post.rb
@@ -56,6 +58,7 @@ files:
 - lib/journal/article.rb
 - lib/journal/feed.rb
 - lib/journal/article_image.rb
+- lib/ratings_stats.rb
 - lib/user.rb
 - lib/organization.rb
 - lib/wiki
@@ -85,7 +88,9 @@ files:
 - lib/mb
 - lib/mb/thread.rb
 - lib/mb/message.rb
+- lib/mb/message_flag.rb
 - lib/mb/category.rb
+- lib/mb/stats_user.rb
 - lib/mb/discussion.rb
 - lib/web
 - lib/web/layout.rb