lportal 1.0.0 → 1.0.4

data/test/unit/blog_post_test.rb

@@ -0,0 +1,38 @@
+require 'test_helper'
+
+class AssetTest < ActiveSupport::TestCase
+  fixtures [
+    :tagsasset,
+    :resource_, :resourcecode,
+    :blogsentry
+  ]
+
+  def setup
+    @posts = BlogPost.all
+  end
+
+  def test_user
+    @posts.each do |p|
+      assert_not_nil p.user
+    end
+  end
+
+  def test_group
+    @posts.each do |p|
+      assert_not_nil p.group
+    end
+  end
+
+  def test_asset
+    @posts.each do |p|
+      assert_not_nil p.asset
+    end
+  end
+
+#   def test_resource
+#     @posts.each do |p|
+#       assert_not_nil p.resource
+#     end
+#   end
+
+end

data/test/unit/bookmark/entry_test.rb

@@ -0,0 +1,28 @@
+require 'test_helper'
+
+class Bookmark::EntryTest < ActiveSupport::TestCase
+  fixtures :bookmarksentry, :bookmarksfolder
+
+  def setup
+    @bookmarks = Bookmark::Entry.all
+  end
+
+  def test_company
+    @bookmarks.each do |x|
+      assert_not_nil x.company, "#{x.id} belongs to no company"
+    end
+  end
+
+  def test_user
+    @bookmarks.each do |x|
+      assert_not_nil x.user, "#{x.id} belongs to no user!"
+    end
+  end
+
+  def test_folder
+    @bookmarks.each do |x|
+      assert_not_nil x.folder
+    end
+  end
+
+end

data/test/unit/bookmark/folder_test.rb

@@ -0,0 +1,22 @@
+require 'test_helper'
+
+class Bookmark::FolderTest < ActiveSupport::TestCase
+  fixtures :bookmarksentry, :bookmarksfolder
+
+  def setup
+    @folders = Bookmark::Folder.all
+  end
+
+  def test_company
+    @folders.each do |x|
+      assert_not_nil x.company, "#{x.id} belongs to no company"
+    end
+  end
+
+  def test_user
+    @folders.each do |x|
+      assert_not_nil x.user, "#{x.id} belongs to no user!"
+    end
+  end
+
+end

data/test/unit/calevent_test.rb

@@ -0,0 +1,28 @@
+require 'test_helper'
+
+class CaleventTest < ActiveSupport::TestCase
+  fixtures  :calevent
+
+  def setup
+    @events = Calevent.all
+  end
+
+  def test_company
+    @events.each do |x|
+      assert_not_nil x.company, "#{x.id} belongs to no company"
+    end
+  end
+
+  def test_user
+    @events.each do |x|
+      assert_not_nil x.user, "#{x.id} belongs to no user!"
+    end
+  end
+
+  def test_group
+    @events.each do |x|
+      assert_not_nil x.group
+    end
+  end
+
+end

data/test/unit/company_test.rb

@@ -1,10 +1,12 @@
 require 'test_helper'
 
 class CompanyTest < ActiveSupport::TestCase
-  def setup
-    @companies = Company.find :all
-    assert !@companies.empty?, "No companies found"
-  end
+  fixtures [
+    :account_, :organization_, :contact_,
+    :layout, :layoutset,
+    :resource_, :resourcecode
+  ]
+
 
   # each company must have an account
   def test_account
@@ -21,40 +23,51 @@ class CompanyTest < ActiveSupport::TestCase
   end
 
   # hmm?
-  def test_defaultuser
-    @companies.each do |c|
-      assert c.account.user.is_default?, "No default user for #{c.id}"
-      assert c.account.user.is_active?, "Default user account for #{c.id} is not active"
-      assert c.account.user.company == c, "Default user for #{c.id} has wrong company"
-      assert !c.account.user.account.nil?, "Default user for #{c.id} has no account"
-    end
-  end
+#   def test_defaultuser
+#     @companies.each do |c|
+#       assert c.account.user.is_default?, "No default user for #{c.id}"
+#       assert c.account.user.is_active?, "Default user account for #{c.id} is not active"
+#       assert c.account.user.company == c, "Default user for #{c.id} has wrong company"
+#       assert !c.account.user.account.nil?, "Default user for #{c.id} has no account"
+#     end
+#   end
 
   # each company must have a webid
   def test_webid
     @companies.each do |c|
-      assert !c.webid.nil?, "#{c.id} has no webid"
+      assert_not_nil c.webid, "#{c.id} has no webid"
     end
   end
 
   # each company must have a virtualhost
   def test_virtualhost
+    layoutsets_virtualhosts=Web::LayoutSet.find(:all).map{|s| s.virtualhost }
     @companies.each do |c|
-      assert !c.virtualhost.nil?, "#{c.id} has no virtualhost"
+      assert_not_nil c.virtualhost, "#{c.id} has no virtualhost"
+
+      # check that the virtualhost isn't duplicated in any layoutsets
+      assert !layoutsets_virtualhosts.include?(c.virtualhost), "Duplicate virtualhost #{c.virtualhost} in layoutsets"
     end
   end
 
   # each company must have organization(s)
-  def test_virtualhost
+  def test_organizations
     @companies.each do |c|
       assert !c.organizations.empty?, "#{c.id} has no organizations"
     end
   end
 
-  def test_resource
-    @companies.each do |x|
-      assert !x.resource.nil?, "#{x.id} has no resource"
+  def test_administrators
+    @companies.each do |c|
+      assert !c.administrators.empty?, "#{c.id} has no administrators"
     end
   end
 
+# ?
+#   def test_resource
+#     @companies.each do |x|
+#       assert !x.resource.nil?, "#{x.id} has no resource"
+#     end
+#   end
+
 end

data/test/unit/contact_test.rb

@@ -1,22 +1,23 @@
 require 'test_helper'
 
 class ContactTest < ActiveSupport::TestCase
-  # Replace this with your real tests.
+  fixtures :contact_, :account_
+
   def setup
-    @contacts = Contact.find :all
+    @contacts = Contact.all
     assert !@contacts.empty?, "No contacts found"
   end
 
   # each company must have an account
   def test_account
     @contacts.each do |c|
-      assert !c.account.nil?, "#{c} has no account"
+      assert_not_nil c.account, "#{c} has no account"
     end
   end
 
   def test_user
-    @contacts.each do |x|
-      assert !x.user.nil?, "#{x} has no user"
+    @contacts.each do |c|
+      assert_not_nil c.user, "#{c} has no user"
     end
   end
 

data/test/unit/group_test.rb

@@ -1,6 +1,8 @@
 require 'test_helper'
 
 class GroupTest < ActiveSupport::TestCase
+  fixtures :organization_
+
   def setup
     @groups = Group.find :all
     assert !@groups.empty?, "No groups"
@@ -48,7 +50,7 @@ class GroupTest < ActiveSupport::TestCase
   # each group must belong to a creator
   def test_creator
     @groups.each do |x|
-      assert !x.creator.nil?, "#{x.id} has no creator"
+#       assert !x.creator.nil?, "#{x.id} has no creator"
     end
   end
 
@@ -69,7 +71,7 @@ class GroupTest < ActiveSupport::TestCase
 
   def test_resource
     @groups.each do |x|
-      assert !x.resource.nil?, "#{x.id} has no resource"
+#       assert !x.resource.nil?, "#{x.id} has no resource"
     end
   end
 

data/test/unit/ig/folder_test.rb

@@ -1,8 +1,28 @@
 require 'test_helper'
 
 class IG::FolderTest < ActiveSupport::TestCase
-  # Replace this with your real tests.
-  def test_truth
-    assert true
+  fixtures  :igimage, :igfolder
+
+  def setup
+    @folders = IG::Folder.all
+  end
+
+  def test_company
+    @folders.each do |x|
+      assert_not_nil x.company, "#{x.id} belongs to no company"
+    end
+  end
+
+  def test_user
+    @folders.each do |x|
+      assert_not_nil x.user, "#{x.id} belongs to no user!"
+    end
+  end
+
+  def test_group
+    @folders.each do |x|
+      assert_not_nil x.group
+    end
   end
+
 end

data/test/unit/ig/image_test.rb

@@ -1,19 +1,27 @@
 require 'test_helper'
 
 class IG::ImageTest < ActiveSupport::TestCase
+  fixtures  :igimage, :igfolder
+
   def setup
-    @igimages = IG::Image.find :all
+    @igimages = IG::Image.all
   end
 
   def test_company
     @igimages.each do |x|
-      assert !x.company.nil?, "#{x.id} belongs to no company"
+      assert_not_nil x.company, "#{x.id} belongs to no company"
     end
   end
 
   def test_user
     @igimages.each do |x|
-      assert !x.user.nil?, "#{x.id} belongs to no user!"
+      assert_not_nil x.user, "#{x.id} belongs to no user!"
+    end
+  end
+
+  def test_folder
+    @igimages.each do |x|
+      assert_not_nil x.folder
     end
   end
 

data/test/unit/journal/article_image_test.rb

@@ -1,8 +1,9 @@
 require 'test_helper'
 
 class Journal::ArticleImageTest < ActiveSupport::TestCase
-  # Replace this with your real tests.
-  def test_truth
-    assert true
-  end
-end
+  fixtures [
+    :journalarticle,
+    :journalarticleresource,
+    :tagsasset
+  ]
+end

data/test/unit/journal/article_resource_test.rb

@@ -1,20 +1,33 @@
 require 'test_helper'
 
 class Journal::ArticleResourceTest < ActiveSupport::TestCase
+  fixtures [
+    :journalarticle,
+    :journalarticleresource,
+    :tagsasset
+  ]
+
   def setup
-    @resources = Journal::ArticleResource.find :all
+    @resources = Journal::ArticleResource.all
   end
 
   def test_group
     @resources.each do |x|
-      assert !x.group.nil?, "#{x.id} belongs to no group!"
+      assert_not_nil x.group, "#{x.id} belongs to no group!"
     end
   end
 
   def test_article
     @resources.each do |x|
-      assert !x.article.nil?, "#{x.id} has no article!"
+      assert_not_nil x.article, "#{x.id} has no article!"
+    end
+  end
+
+  def test_asset
+    @resources.each do |x|
+      assert_not_nil x.asset, "#{x.id} has no asset!"
     end
   end
 
+
 end

data/test/unit/journal/article_test.rb

@@ -1,39 +1,52 @@
 require 'test_helper'
 
 class Journal::ArticleTest < ActiveSupport::TestCase
+  fixtures [
+    :journalarticle,
+    :journalarticleresource,
+    :tagsasset
+  ]
+
   def setup
-    @articles = Journal::Article.find :all
+    @articles = Journal::Article.all
   end
 
   # each article must belong to a company
   def test_company
     @articles.each do |x|
-      assert !x.company.nil?, "#{x.id} belongs to no company"
+      assert_not_nil x.company, "#{x.id} belongs to no company"
     end
   end
 
   def test_group
     @articles.each do |x|
-      assert !x.group.nil?, "#{x.id} belongs to no group!"
+      assert_not_nil x.group, "#{x.id} belongs to no group!"
     end
   end
 
   def test_owner
     @articles.each do |x|
-      assert !x.owner.nil?, "#{x.id} belongs to no user!"
+      assert_not_nil x.owner, "#{x.id} belongs to no user!"
     end
   end
 
   def test_articleid
     @articles.each do |x|
-      assert !x.articleid.nil?, "#{x.id} has no articleid!"
+      assert_not_nil x.articleid, "#{x.id} has no articleid!"
     end
   end
 
   def test_resource
     @articles.each do |x|
-      assert !x.resource.nil?, "#{x.id} belongs to no resource"
+      assert_not_nil x.resource, "#{x.id} belongs to no resource"
+    end
+  end
+
+  def test_asset
+    @articles.each do |x|
+      assert_not_nil x.asset, "#{x.id} has no asset!"
     end
   end
 
+
 end

data/test/unit/mb/category_test.rb

@@ -1,35 +1,51 @@
 require 'test_helper'
 
 class MB::CategoryTest < ActiveSupport::TestCase
+  fixtures [
+    :mbcategory,
+    :mbdiscussion,
+    :mbmessage,
+    :mbthread
+  ]
+
   def setup
-    @categories = MB::Category.find :all
+    @categories = MB::Category.all
+    @rootcategory = MB::Category.find 0
+    @categories.delete @rootcategory
   end
 
   # each article must belong to a company
   def test_company
     @categories.each do |x|
-      assert !x.company.nil?, "#{x.id} belongs to no company"
+      assert_not_nil x.company, "#{x.id} belongs to no company"
     end
   end
 
   def test_group
     @categories.each do |x|
-      assert !x.group.nil?, "#{x.id} belongs to no group!"
+      assert_not_nil x.group, "#{x.id} belongs to no group!"
     end
   end
 
   def test_user
     @categories.each do |x|
-      assert !x.user.nil?, "#{x.id} belongs to no user!"
+      assert_not_nil x.user, "#{x.id} belongs to no user!"
     end
   end
 
   def test_parent
     @categories.each do |x|
       unless x.parentcategoryid == 0 then
-        assert !x.parent.nil?, "#{x.id} refers to parent category #{x.parentcategoryid} which does not exist"
+        assert_not_nil x.parent, "#{x.id} refers to parent category #{x.parentcategoryid} which does not exist"
       end
     end
   end
 
+  def test_root
+    assert_equal 0, @rootcategory.companyid
+    assert_equal 0, @rootcategory.groupid
+    assert_equal 0, @rootcategory.userid
+    assert_equal 0, @rootcategory.parentcategoryid
+  end
+
 end

data/test/unit/mb/discussion_test.rb

@@ -1,13 +1,20 @@
 require 'test_helper'
 
 class MB::DiscussionTest < ActiveSupport::TestCase
+  fixtures [
+    :mbcategory,
+    :mbdiscussion,
+    :mbmessage,
+    :mbthread
+  ]
+
   def setup
-    @discussions = MB::Discussion.find :all
+    @discussions = MB::Discussion.all
   end
 
   def test_thread
     @discussions.each do |x|
-      assert !x.thread.nil?, "#{x.id} belongs to no thread"
+      assert_not_nil x.thread, "#{x.id} belongs to no thread"
     end
   end
 

data/test/unit/mb/message_test.rb

@@ -1,31 +1,38 @@
 require 'test_helper'
 
 class MB::MessageTest < ActiveSupport::TestCase
+  fixtures [
+    :mbcategory,
+    :mbdiscussion,
+    :mbmessage,
+    :mbthread
+  ]
+
   def setup
-    @messages = MB::Message.find :all
+    @messages = MB::Message.all
   end
 
   def test_company
     @messages.each do |x|
-      assert !x.company.nil?, "#{x.id} belongs to no company"
+      assert_not_nil x.company, "#{x.id} belongs to no company"
     end
   end
 
   def test_user
     @messages.each do |x|
-      assert !x.user.nil?, "#{x.id} belongs to no user!"
+      assert_not_nil x.user, "#{x.id} belongs to no user!"
     end
   end
 
   def test_category
     @messages.each do |x|
-      assert !x.category.nil?, "#{x.id} belongs to no category!"
+      assert_not_nil x.category, "#{x.id} belongs to no category!"
     end
   end
 
   def test_thread
     @messages.each do |x|
-      assert !x.thread.nil?, "#{x.id} belongs to no thread"
+      assert_not_nil x.thread, "#{x.id} belongs to no thread"
       if x.parentmessageid == 0 then
         assert x.thread.rootmessageid == x.id, "Discrepancy between thread #{x.thread.id} rootmessageid #{x.thread.rootmessageid} and message #{x.id}"
       end
@@ -35,10 +42,11 @@ class MB::MessageTest < ActiveSupport::TestCase
   def test_parent
     @messages.each do |x|
       unless x.parentmessageid == 0 then
-        assert !x.parent.nil?, "#{x.id} refers to parent message #{x.parentmessageid} which does not exist"
+        assert_not_nil x.parent, "#{x.id} refers to parent message #{x.parentmessageid} which does not exist"
       else
-        # there must be a thread with this message as root!
-        assert MB::Thread.find(:all).map{|t| t.rootmessageid }.include?(x.id), " Message #{x.id} appears not to belong to any thread"
+        # there must be a root thread with this message
+        assert MB::Thread.find(:all).map{
+          |t| t.rootmessageid }.include?(x.id), "Message #{x.id} appears not to belong to any thread"
       end
     end
   end

data/test/unit/mb/thread_test.rb

@@ -1,19 +1,26 @@
 require 'test_helper'
 
 class MB::ThreadTest < ActiveSupport::TestCase
+  fixtures [
+    :mbcategory,
+    :mbdiscussion,
+    :mbmessage,
+    :mbthread
+  ]
+
   def setup
-    @threads = MB::Thread.find :all
+    @threads = MB::Thread.all
   end
 
   def test_category
     @threads.each do |x|
-      assert !x.category.nil?, "#{x.id} belongs to no category"
+      assert_not_nil x.category, "#{x.id} belongs to no category"
     end
   end
 
   def test_root
     @threads.each do |x|
-      assert !x.root.nil?, "#{x.id} has no root message"
+      assert_not_nil x.root, "#{x.id} has no root message"
     end
   end
 

data/test/unit/organization_test.rb

@@ -1,34 +1,41 @@
 require 'test_helper'
 
 class OrganizationTest < ActiveSupport::TestCase
+  fixtures [
+    :organization_, :groups_orgs,
+    :classname_
+  ]
+
   def setup
-    @orgs = Organization.find :all
+    @orgs = Organization.all
     assert !@orgs.empty?
   end
 
   # each organization must belong to a company
   def test_company
     @orgs.each do |x|
-      assert !x.company.nil?
+      assert_not_nil x.company
     end
   end
 
-#   # each group must belong to a creator
-#   def test_creator
-#     @orgs.each do |c|
-#       assert !c.creator.nil?
-#     end
-#   end
+  def test_parent
+    @orgs.each do |x|
+      assert_not_nil x.parent unless x.parentorganizationid == 0
+    end
+  end
 
+  def test_root
+    assert_not_nil Organization.find_by_parentorganizationid(0), 'No root organization'
+  end
 
-  # organization's group (hive)
-  def test_hive
+  def test_group
     @orgs.each do |x|
       group = x.hive
-      assert !group.nil?, "#{x.id} does not have a personal group"
+      assert_not_nil group, "#{x.id} does not have a personal group"
 
-      # the group must have classnameid 10017 (com.liferay.portal.model.Organization)
-      assert group.classnameid == 10017, "#{x.id}'s personal group is not assigned to com.liferay.portal.model.Organization"
+      _class = Classname.find_by_value x.liferay_class
+      assert_not_nil _class
+      assert_equal _class.id, group.classnameid, "#{x.id}'s personal group is not assigned to #{x.liferay_class}"
 
       assert group.is_active?, "#{x.id}'s personal group is not active"
 
@@ -37,14 +44,6 @@ class OrganizationTest < ActiveSupport::TestCase
     end
   end
 
-
-  def test_group
-    @orgs.each do |x|
-
-      assert !Group.find(:all, :conditions => "classnameid=10017 AND classpk=#{x.id}").empty?, "No group found with classnameid 10017 and classpk #{x.id}"
-    end
-  end
-
   # each member have to belong to the same company than the organization
   def test_members_companies
     @orgs.each do |org|