file.rb in specinfra-2.0.0.beta16

- old
+ new
@@ -1,40 +1,42 @@
 class Specinfra::Command::Solaris::V10::File < Specinfra::Command::Solaris::Base::File
-  # reference: http://perldoc.perl.org/functions/stat.html
-  def check_has_mode(file, mode)
-    regexp = "^#{mode}$"
-    "perl -e 'printf \"%o\", (stat shift)[2]&07777' #{escape(file)}  | grep -- #{escape(regexp)}"
-  end
+  class << self
+    # reference: http://perldoc.perl.org/functions/stat.html
+    def check_has_mode(file, mode)
+      regexp = "^#{mode}$"
+      "perl -e 'printf \"%o\", (stat shift)[2]&07777' #{escape(file)}  | grep -- #{escape(regexp)}"
+    end
 
-  # reference: http://perldoc.perl.org/functions/stat.html
-  #            http://www.tutorialspoint.com/perl/perl_getpwuid.htm
-  def check_is_owned_by(file, owner)
-    regexp = "^#{owner}$"
-    "perl -e 'printf \"%s\", getpwuid((stat(\"#{escape(file)}\"))[4])' | grep -- #{escape(regexp)}"
-  end
+    # reference: http://perldoc.perl.org/functions/stat.html
+    #            http://www.tutorialspoint.com/perl/perl_getpwuid.htm
+    def check_is_owned_by(file, owner)
+      regexp = "^#{owner}$"
+      "perl -e 'printf \"%s\", getpwuid((stat(\"#{escape(file)}\"))[4])' | grep -- #{escape(regexp)}"
+    end
 
-  # reference: http://perldoc.perl.org/functions/stat.html
-  #            http://www.tutorialspoint.com/perl/perl_getgrgid.htm
-  def check_is_grouped(file, group)
-    regexp = "^#{group}$"
-    "perl -e 'printf \"%s\", getgrgid((stat(\"#{escape(file)}\"))[5])'  | grep -- #{escape(regexp)}"
-  end
+    # reference: http://perldoc.perl.org/functions/stat.html
+    #            http://www.tutorialspoint.com/perl/perl_getgrgid.htm
+    def check_is_grouped(file, group)
+      regexp = "^#{group}$"
+      "perl -e 'printf \"%s\", getgrgid((stat(\"#{escape(file)}\"))[5])'  | grep -- #{escape(regexp)}"
+    end
 
-  # reference: http://www.tutorialspoint.com/perl/perl_readlink.htm
-  def check_is_linked_to(link, target)
-    regexp = "^#{target}$"
-    "perl -e 'printf \"%s\", readlink(\"#{escape(link)}\")' | grep -- #{escape(regexp)}"
-  end
+    # reference: http://www.tutorialspoint.com/perl/perl_readlink.htm
+    def check_is_linked_to(link, target)
+      regexp = "^#{target}$"
+      "perl -e 'printf \"%s\", readlink(\"#{escape(link)}\")' | grep -- #{escape(regexp)}"
+    end
 
-  def check_contain(file, expected_pattern)
-    "grep -- #{escape(expected_pattern)} #{escape(file)}"
-  end
+    def check_contain(file, expected_pattern)
+      "grep -- #{escape(expected_pattern)} #{escape(file)}"
+    end
 
-  def check_has_md5checksum(file, expected)
-    "digest -a md5 -v #{escape(file)} | grep -iw -- #{escape(expected)}"
-  end
+    def check_has_md5checksum(file, expected)
+      "digest -a md5 -v #{escape(file)} | grep -iw -- #{escape(expected)}"
+    end
 
-  # reference: http://perldoc.perl.org/functions/stat.html
-  def get_mode(file)
-    "perl -e 'printf \"%o\", (stat shift)[2]&07777' #{escape(file)}"
+    # reference: http://perldoc.perl.org/functions/stat.html
+    def get_mode(file)
+      "perl -e 'printf \"%o\", (stat shift)[2]&07777' #{escape(file)}"
+    end
   end
 end