gfdnavi 1.3.0.0

data/test/unit/sign_up_user_test.rb

@@ -0,0 +1,20 @@
+require File.dirname(__FILE__) + '/../test_helper'
+
+class SignUpUserTest < Test::Unit::TestCase
+  fixtures :sign_up_users
+
+  def setup
+    @user = SignUpUser.find(1)
+  end
+
+  def test_create
+    dave = sign_up_users(:dave)
+    assert_kind_of SignUpUser, @user
+    assert_equal dave.id, @user.id
+    assert_equal dave.login, @user.login
+    assert_equal dave.full_name, @user.full_name
+    assert_equal dave.email_address, @user.email_address
+    assert_equal dave.affiliation, @user.affiliation
+    assert_equal dave.password, @user.password
+  end
+end

data/test/unit/spatial_and_time_attribute_test.rb

@@ -0,0 +1,29 @@
+require File.dirname(__FILE__) + '/../test_helper'
+
+class SpatialAndTimeAttributeTest < Test::Unit::TestCase
+  fixtures :spatial_and_time_attributes, :nodes
+
+  def setup
+    @sa = SpatialAndTimeAttribute.find(1)
+  end
+
+  def test_create
+    global = spatial_and_time_attributes(:ncep_jan_u_global)
+    assert_kind_of SpatialAndTimeAttribute, @sa
+    assert_equal global.node_id, @sa.node_id
+    assert_equal global.longitude_lb, @sa.longitude_lb
+    assert_equal global.latitude_lb, @sa.latitude_lb
+    assert_equal global.longitude_rt, @sa.longitude_rt
+    assert_equal global.latitude_rt, @sa.latitude_rt
+    assert_equal global.starttime, @sa.starttime
+    assert_equal global.endtime, @sa.endtime
+  end
+
+  def test_variable
+    node = nodes(:ncep_uv_jan_u)
+    assert_kind_of Node, @sa.node
+    assert_kind_of Variable, @sa.node.entity
+    assert_equal node, @sa.node
+  end
+
+end

data/test/unit/user_mailer_test.rb

@@ -0,0 +1,101 @@
+require File.dirname(__FILE__) + '/../test_helper'
+require 'user_mailer'
+
+class UserMailerTest < Test::Unit::TestCase
+  FIXTURES_PATH = File.dirname(__FILE__) + '/../fixtures'
+  CHARSET = "utf-8"
+
+  include ActionMailer::Quoting
+
+  fixtures :users, :sign_up_users
+
+  def setup
+    ActionMailer::Base.delivery_method = :test
+    ActionMailer::Base.perform_deliveries = true
+    ActionMailer::Base.deliveries = []
+
+    @expected = TMail::Mail.new
+    @expected.set_content_type "text", "plain", { "charset" => CHARSET }
+    @expected.from = "#{GFDNAVI_ADMIN_NAME} <#{GFDNAVI_ADMIN_EMAIL}>"
+ 
+    @user = SignUpUser.find(1)
+    @suser = User.find(1)
+    @url = "http://example.com"
+  end
+
+  def test_signup_confirm
+    @expected.to = "#{@user.full_name} <#{@user.email_address}>"
+    @expected.subject = '[gfdnavi] sign up confirmation'
+    @expected.body    = read_fixture('signup_confirm')
+    @expected.date    = Time.now
+
+    email = UserMailer.create_signup_confirm(@user, @url)
+    assert_equal @expected.subject, email.subject
+    assert_equal @expected.to, email.to
+    assert_equal @expected.from, email.from
+    assert_match /Dave/, email.body
+  end
+
+  def test_signup_inform
+    @expected.to = User.find(:all, :conditions => ["super_user=?",true]).collect{|u| u.email_address}
+    @expected.subject = '[gfdnavi] sign up information'
+    @expected.body    = read_fixture('signup_inform')
+    @expected.date    = Time.now
+
+    email = UserMailer.create_signup_inform(@user, @url)
+    assert_equal @expected.subject, email.subject
+    assert_equal @expected.to, email.to
+    assert_equal @expected.from, email.from
+    assert_match /Dave/, email.body
+  end
+
+  def test_signup_accepted
+    @expected.to = "#{@user.full_name} <#{@user.email_address}>"
+    @expected.subject = '[gfdnavi] Your signup request was accepted'
+    @expected.body    = read_fixture('signup_accepted')
+    @expected.date    = Time.now
+
+    email = UserMailer.create_signup_accepted(@user, @url)
+    assert_equal @expected.subject, email.subject
+    assert_equal @expected.to, email.to
+    assert_equal @expected.from, email.from
+    assert_match /Dave/, email.body
+    assert_match /accepted/, email.body
+  end
+
+  def test_signup_rejected
+    @expected.to = "#{@user.full_name} <#{@user.email_address}>"
+    @expected.subject = '[gfdnavi] Your signup request was rejected'
+    @expected.body    = read_fixture('signup_rejected')
+    @expected.date    = Time.now
+
+    email = UserMailer.create_signup_rejected(@user, @url)
+    assert_equal @expected.subject, email.subject
+    assert_equal @expected.to, email.to
+    assert_equal @expected.from, email.from
+    assert_match /Dave/, email.body
+    assert_match /rejected/, email.body
+  end
+
+  def test_authorization_inform
+    @expected.to = User.find(:all, :conditions => ["super_user=?",true]).collect{|u| u.email_address}
+    @expected.subject = '[gfdnavi] authorization information'
+    @expected.body    = read_fixture('authorization_inform')
+    @expected.date    = Time.now
+
+    email = UserMailer.create_authorization_inform(@user, @url, @suser, "accept")
+    assert_equal @expected.subject, email.subject
+    assert_equal @expected.to, email.to
+    assert_match /Dave/, email.body
+    assert_match /accept/, email.body
+  end
+
+  private
+    def read_fixture(action)
+      IO.readlines("#{FIXTURES_PATH}/user_mailer/#{action}")
+    end
+
+    def encode(subject)
+      quoted_printable(subject, CHARSET)
+    end
+end

data/test/unit/user_test.rb

@@ -0,0 +1,134 @@
+require File.dirname(__FILE__) + '/../test_helper'
+
+class UserTest < Test::Unit::TestCase
+  self.use_instantiated_fixtures  = true
+
+  fixtures :users, :groups
+
+  def setup
+    @root = User.find(1)
+    @bob = User.find(2)
+    @longbob = User.find(3)
+  end
+
+  def test_auth
+    assert_equal  @bob, User.authenticate("bob", "bobbob")
+    assert_nil    User.authenticate("bob", "test")
+    assert_nil    User.authenticate("nonbob", "test")
+  end
+
+  def test_belonging_groups
+    assert_equal @root.belonging_groups.collect{|g| g.name}.sort, 
+                 ["all", "root"]
+  end
+
+  def test_passwordchange
+    new_password = "nonbobpasswd"
+    assert ! @longbob.change_password(new_password, new_password+"dummy")
+    assert @longbob.change_password(new_password, new_password)
+    assert_equal @longbob, User.authenticate("longbob", "nonbobpasswd")
+    assert_nil  User.authenticate("longbob", "longtest")
+  end
+
+  def test_disallowed_passwords
+    u = new_user("nonbob")
+    u.password = u.password_confirmation = "tiny"
+    assert !u.save
+    assert u.errors.invalid?('password')
+
+    u.password = u.password_confirmation = "hugehugehugehugehugehugehugehugehugehugehugehugehugehugehugehugehugehugehugehugehugehugehugehugehugehugehugehugehugehugehugehugehugehugehugehugehugehugehugehugehugehugehuge"
+    assert !u.save
+    assert u.errors.invalid?('password')
+
+    u.password = u.password_confirmation = ""
+    assert !u.save
+    assert u.errors.invalid?('password')
+
+    u.password = u.password_confirmation = "bobs_secure_password"
+    assert u.save
+    assert u.errors.empty?
+
+  end
+
+  def test_bad_logins
+    u = new_user("x")
+    assert !u.save
+    assert u.errors.invalid?('login')
+
+    u.login = "hugebobhugebobhugebobhugebobhugebobhugebobhugebobhugebobhugebobhugebobhugebobhugebobhugebobhugebobhugebobhugebobhugebobhugebobhugebobhugebobhugebobhugebobhugebobhugebobhugebobhugebobhug"
+    assert !u.save
+    assert u.errors.invalid?('login')
+
+    u.login = ""
+    assert !u.save
+    assert u.errors.invalid?('login')
+
+    u.login = "oklogin"
+    assert u.save
+    assert u.errors.empty?
+
+  end
+
+
+  def test_uniq
+    u = new_user("bob")
+    assert !u.save
+    assert u.errors.invalid?('login')
+  end
+
+
+  def test_full_name
+    u = new_user("bobfullname")
+    u.full_name = ""
+    assert !u.save
+    assert u.errors.invalid?('full_name')
+  end
+
+
+  def test_affiliation
+    u = new_user("bobaffiliation")
+    u.affiliation = ""
+    assert !u.save
+    assert u.errors.invalid?('affiliation')
+  end
+
+
+  def test_email_address
+    u = new_user("bobemail")
+    u.email_address = ""
+    assert !u.save
+    assert u.errors.invalid?('email_address')
+
+    u.email_address = "@example.com"
+    assert !u.save
+    assert u.errors.invalid?('email_address')
+
+    u.email_address = "bob@example"
+    assert !u.save
+    assert u.errors.invalid?('email_address')
+
+    u.email_address = "bobexample.com"
+    assert !u.save
+    assert u.errors.invalid?('email_address')
+  end
+
+
+  def test_sha1
+    u = new_user("bobsha")
+    u.password = u.password_confirmation = "okpassword"
+    assert u.save
+    assert_equal User.sha1("okpassword"), u.password
+  end
+
+  private
+  def new_user(login)
+    u = User.new
+    u.login = login
+    u.full_name = "Non BoB"
+    u.email_address = "nonbob@example.com"
+    u.affiliation = "BOB coorp"
+    u.password = u.password_confirmation = "nonbob"
+    u
+  end
+
+end

data/test/unit/value_type_test.rb

@@ -0,0 +1,10 @@
+require File.dirname(__FILE__) + '/../test_helper'
+
+class ValueTypeTest < Test::Unit::TestCase
+  fixtures :value_types
+
+  # Replace this with your real tests.
+  def test_truth
+    assert true
+  end
+end

data/test/unit/variable_test.rb

@@ -0,0 +1,35 @@
+require File.dirname(__FILE__) + '/../test_helper'
+require File.expand_path(File.dirname(__FILE__) + "/../../lib/narray_yaml")
+
+class VariableTest < Test::Unit::TestCase
+  fixtures :variables, :directories, :nodes, :users, :groups
+
+  def setup
+    @var = Variable.find(:first,:conditions=>["path=?","/samples/reanalysis/ncep/UV.jan.nc/U"])
+    @root = User.find_by_login("root")
+  end
+
+  def test_db
+    u = nodes(:ncep_uv_jan_u).entity
+    assert_kind_of Variable, @var
+    assert_equal u.id, @var.id
+    assert_equal u.node_id, @var.node_id
+    assert_kind_of Node, @var.node
+    assert_equal u.parent, @var.parent
+    assert_equal u.path, @var.path
+    assert_equal u.name, @var.name
+    assert_equal nodes(:ncep_uv_jan).entity, @var.parent.entity
+  end
+
+  def test_create
+    var = Variable.new
+    assert_equal Node::VARIABLE, var.node.node_type
+    assert_raise(ActiveRecord::RecordNotSaved){ var.save! }
+    var.name = "test"
+    var.path = "/test"
+    var.owner = @root
+    assert var.save
+  end
+
+
+end

data/vendor/plugins/acts_as_list/README

@@ -0,0 +1,23 @@
+ActsAsList
+==========
+
+This acts_as extension provides the capabilities for sorting and reordering a number of objects in a list. The class that has this specified needs to have a +position+ column defined as an integer on the mapped database table.
+
+
+Example
+=======
+
+  class TodoList < ActiveRecord::Base
+    has_many :todo_items, :order => "position"
+  end
+
+  class TodoItem < ActiveRecord::Base
+    belongs_to :todo_list
+    acts_as_list :scope => :todo_list
+  end
+
+  todo_list.first.move_to_bottom
+  todo_list.last.move_higher
+
+
+Copyright (c) 2007 David Heinemeier Hansson, released under the MIT license

data/vendor/plugins/acts_as_list/init.rb

@@ -0,0 +1,3 @@
+$:.unshift "#{File.dirname(__FILE__)}/lib"
+require 'active_record/acts/list'
+ActiveRecord::Base.class_eval { include ActiveRecord::Acts::List }

data/vendor/plugins/acts_as_list/lib/active_record/acts/list.rb

@@ -0,0 +1,256 @@
+module ActiveRecord
+  module Acts #:nodoc:
+    module List #:nodoc:
+      def self.included(base)
+        base.extend(ClassMethods)
+      end
+
+      # This +acts_as+ extension provides the capabilities for sorting and reordering a number of objects in a list.
+      # The class that has this specified needs to have a +position+ column defined as an integer on
+      # the mapped database table.
+      #
+      # Todo list example:
+      #
+      #   class TodoList < ActiveRecord::Base
+      #     has_many :todo_items, :order => "position"
+      #   end
+      #
+      #   class TodoItem < ActiveRecord::Base
+      #     belongs_to :todo_list
+      #     acts_as_list :scope => :todo_list
+      #   end
+      #
+      #   todo_list.first.move_to_bottom
+      #   todo_list.last.move_higher
+      module ClassMethods
+        # Configuration options are:
+        #
+        # * +column+ - specifies the column name to use for keeping the position integer (default: +position+)
+        # * +scope+ - restricts what is to be considered a list. Given a symbol, it'll attach <tt>_id</tt> 
+        #   (if it hasn't already been added) and use that as the foreign key restriction. It's also possible 
+        #   to give it an entire string that is interpolated if you need a tighter scope than just a foreign key.
+        #   Example: <tt>acts_as_list :scope => 'todo_list_id = #{todo_list_id} AND completed = 0'</tt>
+        def acts_as_list(options = {})
+          configuration = { :column => "position", :scope => "1 = 1" }
+          configuration.update(options) if options.is_a?(Hash)
+
+          configuration[:scope] = "#{configuration[:scope]}_id".intern if configuration[:scope].is_a?(Symbol) && configuration[:scope].to_s !~ /_id$/
+
+          if configuration[:scope].is_a?(Symbol)
+            scope_condition_method = %(
+              def scope_condition
+                if #{configuration[:scope].to_s}.nil?
+                  "#{configuration[:scope].to_s} IS NULL"
+                else
+                  "#{configuration[:scope].to_s} = \#{#{configuration[:scope].to_s}}"
+                end
+              end
+            )
+          else
+            scope_condition_method = "def scope_condition() \"#{configuration[:scope]}\" end"
+          end
+
+          class_eval <<-EOV
+            include ActiveRecord::Acts::List::InstanceMethods
+
+            def acts_as_list_class
+              ::#{self.name}
+            end
+
+            def position_column
+              '#{configuration[:column]}'
+            end
+
+            #{scope_condition_method}
+
+            before_destroy :remove_from_list
+            before_create  :add_to_list_bottom
+          EOV
+        end
+      end
+
+      # All the methods available to a record that has had <tt>acts_as_list</tt> specified. Each method works
+      # by assuming the object to be the item in the list, so <tt>chapter.move_lower</tt> would move that chapter
+      # lower in the list of all chapters. Likewise, <tt>chapter.first?</tt> would return +true+ if that chapter is
+      # the first in the list of all chapters.
+      module InstanceMethods
+        # Insert the item at the given position (defaults to the top position of 1).
+        def insert_at(position = 1)
+          insert_at_position(position)
+        end
+
+        # Swap positions with the next lower item, if one exists.
+        def move_lower
+          return unless lower_item
+
+          acts_as_list_class.transaction do
+            lower_item.decrement_position
+            increment_position
+          end
+        end
+
+        # Swap positions with the next higher item, if one exists.
+        def move_higher
+          return unless higher_item
+
+          acts_as_list_class.transaction do
+            higher_item.increment_position
+            decrement_position
+          end
+        end
+
+        # Move to the bottom of the list. If the item is already in the list, the items below it have their
+        # position adjusted accordingly.
+        def move_to_bottom
+          return unless in_list?
+          acts_as_list_class.transaction do
+            decrement_positions_on_lower_items
+            assume_bottom_position
+          end
+        end
+
+        # Move to the top of the list. If the item is already in the list, the items above it have their
+        # position adjusted accordingly.
+        def move_to_top
+          return unless in_list?
+          acts_as_list_class.transaction do
+            increment_positions_on_higher_items
+            assume_top_position
+          end
+        end
+
+        # Removes the item from the list.
+        def remove_from_list
+          if in_list?
+            decrement_positions_on_lower_items
+            update_attribute position_column, nil
+          end
+        end
+
+        # Increase the position of this item without adjusting the rest of the list.
+        def increment_position
+          return unless in_list?
+          update_attribute position_column, self.send(position_column).to_i + 1
+        end
+
+        # Decrease the position of this item without adjusting the rest of the list.
+        def decrement_position
+          return unless in_list?
+          update_attribute position_column, self.send(position_column).to_i - 1
+        end
+
+        # Return +true+ if this object is the first in the list.
+        def first?
+          return false unless in_list?
+          self.send(position_column) == 1
+        end
+
+        # Return +true+ if this object is the last in the list.
+        def last?
+          return false unless in_list?
+          self.send(position_column) == bottom_position_in_list
+        end
+
+        # Return the next higher item in the list.
+        def higher_item
+          return nil unless in_list?
+          acts_as_list_class.find(:first, :conditions =>
+            "#{scope_condition} AND #{position_column} = #{(send(position_column).to_i - 1).to_s}"
+          )
+        end
+
+        # Return the next lower item in the list.
+        def lower_item
+          return nil unless in_list?
+          acts_as_list_class.find(:first, :conditions =>
+            "#{scope_condition} AND #{position_column} = #{(send(position_column).to_i + 1).to_s}"
+          )
+        end
+
+        # Test if this record is in a list
+        def in_list?
+          !send(position_column).nil?
+        end
+
+        private
+          def add_to_list_top
+            increment_positions_on_all_items
+          end
+
+          def add_to_list_bottom
+            self[position_column] = bottom_position_in_list.to_i + 1
+          end
+
+          # Overwrite this method to define the scope of the list changes
+          def scope_condition() "1" end
+
+          # Returns the bottom position number in the list.
+          #   bottom_position_in_list    # => 2
+          def bottom_position_in_list(except = nil)
+            item = bottom_item(except)
+            item ? item.send(position_column) : 0
+          end
+
+          # Returns the bottom item
+          def bottom_item(except = nil)
+            conditions = scope_condition
+            conditions = "#{conditions} AND #{self.class.primary_key} != #{except.id}" if except
+            acts_as_list_class.find(:first, :conditions => conditions, :order => "#{position_column} DESC")
+          end
+
+          # Forces item to assume the bottom position in the list.
+          def assume_bottom_position
+            update_attribute(position_column, bottom_position_in_list(self).to_i + 1)
+          end
+
+          # Forces item to assume the top position in the list.
+          def assume_top_position
+            update_attribute(position_column, 1)
+          end
+
+          # This has the effect of moving all the higher items up one.
+          def decrement_positions_on_higher_items(position)
+            acts_as_list_class.update_all(
+              "#{position_column} = (#{position_column} - 1)", "#{scope_condition} AND #{position_column} <= #{position}"
+            )
+          end
+
+          # This has the effect of moving all the lower items up one.
+          def decrement_positions_on_lower_items
+            return unless in_list?
+            acts_as_list_class.update_all(
+              "#{position_column} = (#{position_column} - 1)", "#{scope_condition} AND #{position_column} > #{send(position_column).to_i}"
+            )
+          end
+
+          # This has the effect of moving all the higher items down one.
+          def increment_positions_on_higher_items
+            return unless in_list?
+            acts_as_list_class.update_all(
+              "#{position_column} = (#{position_column} + 1)", "#{scope_condition} AND #{position_column} < #{send(position_column).to_i}"
+            )
+          end
+
+          # This has the effect of moving all the lower items down one.
+          def increment_positions_on_lower_items(position)
+            acts_as_list_class.update_all(
+              "#{position_column} = (#{position_column} + 1)", "#{scope_condition} AND #{position_column} >= #{position}"
+           )
+          end
+
+          # Increments position (<tt>position_column</tt>) of all items in the list.
+          def increment_positions_on_all_items
+            acts_as_list_class.update_all(
+              "#{position_column} = (#{position_column} + 1)",  "#{scope_condition}"
+            )
+          end
+
+          def insert_at_position(position)
+            remove_from_list
+            increment_positions_on_lower_items(position)
+            self.update_attribute(position_column, position)
+          end
+      end 
+    end
+  end
+end