[asl-commit] ActiveSambaLdap r25:

[kou at cozmixng.org]

retro	2007-08-04 11:32:13 +0900 (Sat, 04 Aug 2007)

  New Revision: 25

  Added files:
    trunk/bin/asl-purge
    trunk/test/test_asl_purge.rb

  Log:


  Added: trunk/test/test_asl_purge.rb (+21 -0)
===================================================================
--- trunk/test/test_asl_purge.rb	2006-11-14 12:55:28 +09:00 (rev 24)
+++ trunk/test/test_asl_purge.rb	2007-08-04 11:32:13 +09:00 (rev 25)
@@ -0,0 +1,21 @@
+require 'asl-test-utils'
+
+class AslPurgeTest < Test::Unit::TestCase
+  include AslTestUtils
+
+  def setup
+    super
+    @command = File.join(@bin_dir, "asl-purge")
+  end
+
+  def test_run_as_normal_user
+    assert_equal([false, "need root authority.\n"],
+                 run_command_as_normal_user)
+  end
+
+  def test_populate
+    assert_not_equal([], ActiveSambaLdap::Base.search)
+    assert_equal([true, ""], run_command)
+    assert_equal([], ActiveSambaLdap::Base.search)
+  end
+end

  Property changed: trunk/bin/asl-purge (+0 -0)
___________________________________________________________________
Name: svn:executable
   + *

  Added: trunk/bin/asl-purge (+24 -0)
===================================================================
--- trunk/bin/asl-purge	2006-11-14 12:55:28 +09:00 (rev 24)
+++ trunk/bin/asl-purge	2007-08-04 11:32:13 +09:00 (rev 25)
@@ -0,0 +1,24 @@
+#!/usr/bin/env ruby
+
+require 'fileutils'
+require 'etc'
+require 'time'
+
+require 'active_samba_ldap'
+require 'active_samba_ldap/command'
+
+argv, opts, options = ActiveSambaLdap::Command.parse_options do |opts, options|
+end
+
+unless Process.uid.zero?
+  puts "need root authority."
+  exit 1
+end
+
+ActiveSambaLdap::Base.establish_connection("update")
+
+ActiveSambaLdap::Base.purge
+
+ActiveSambaLdap::Base.restart_nscd
+
+ActiveSambaLdap::Base.clear_active_connections!