added regexpmatch() YCP built-in

src/ruby/ycp/builtins.rb

@@ -1,4 +1,5 @@
 require "ycp/path"
+require "ycp/helper"
 
 module YCP
   module Builtins
@@ -43,6 +44,14 @@ def self.splitstring string, sep
       string.split /[#{Regexp.escape sep}]/, -1 * 2**20
     end
 
+    # regexpmatch() YCP built-in
+    def self.regexpmatch string, regexp
+      return nil if string.nil? || regexp.nil?
+
+      ruby_regexp = YCP::Helper.ruby_regexp regexp
+      !string.match(ruby_regexp).nil?
+    end
+
     # tolower() YCP built-in
     def self.tolower string
       return nil if string.nil?

src/ruby/ycp/helper.rb

@@ -0,0 +1,15 @@
+
+module YCP
+  module Helper
+
+    # helper for transforming YCP regexps to Ruby regexps
+    # replace YCP regexp metacharacters by Ruby ones
+    # ^ -> \A, $ -> \z
+    def self.ruby_regexp reg_str
+      return nil if reg_str.nil?
+
+      reg_str.gsub(/\A\^/, '\\A').gsub(/\$\z/, '\\z')
+    end
+
+  end
+end

tests/ruby/builtins_test.rb

@@ -82,6 +82,16 @@ def test_splitstring
     assert_equal ["text", "with", "different", "separators"], YCP::Builtins.splitstring("text/with:different/separators", "/:")
   end
 
+  def test_regexpmatch
+    assert_equal nil, YCP::Builtins.regexpmatch(nil, nil)
+    assert_equal nil, YCP::Builtins.regexpmatch("", nil)
+    assert_equal true, YCP::Builtins.regexpmatch("", "")
+    assert_equal true, YCP::Builtins.regexpmatch("abc", "")
+
+    assert_equal true, YCP::Builtins.regexpmatch("abc", "^a")
+    assert_equal true, YCP::Builtins.regexpmatch("abc", "c$")
+  end
+
   def test_tolower
     assert_equal nil, YCP::Builtins.tolower(nil)
     assert_equal "", YCP::Builtins.tolower("")

tests/ruby/helper_test.rb

@@ -0,0 +1,16 @@
+$LOAD_PATH << File.dirname(__FILE__)
+require "test_helper"
+
+require "ycp/helper"
+
+class HelperTest < YCP::TestCase
+
+  def test_ruby_regexp
+    assert_equal "", YCP::Helper.ruby_regexp("")
+    assert_equal "\\A", YCP::Helper.ruby_regexp("^")
+    assert_equal "\\z", YCP::Helper.ruby_regexp("$")
+    assert_equal "\\A\\z", YCP::Helper.ruby_regexp("^$")
+    assert_equal "\\Aabcd\\z", YCP::Helper.ruby_regexp("^abcd$")
+  end
+
+end