PHPのスクリプトを作っていただけないでしょうか。

ちょっと速くなった。

文字コードは UTF-8。

<pre>
<?php
mb_internal_encoding('utf-8') ;

function search_patterns($strings, $lengths, $ordered = array()) {
  if (count($strings) < count($lengths)) return false ;

  global $result ;
  if ($ordered == array()) $result = array() ;

  $clen = array_shift($lengths) ;
  for ($i = 0; $i < count($strings); ++$i, array_push($strings, array_shift($strings))) {
    if (mb_strlen($strings[0]) == $clen) {
      if ($ordered != array()) {
        $cc = preg_split('//u', $strings[0],   -1, PREG_SPLIT_NO_EMPTY) ;
        $rc = preg_split('//u', end($ordered), -1, PREG_SPLIT_NO_EMPTY) ;

        $npat = array_merge($cc, $rc) ;
        $nl = count($npat) ;
        $ul = count(array_unique($npat)) ;
        if (($nl - ($nl - $ul)*2) != 1) continue ;
      }

      $next_strngs = $strings ;
      $next_ordered = $ordered ;
      array_push($next_ordered, array_shift($next_strngs)) ;

      if (count($lengths) == 0) array_push($result, $next_ordered) ;
      else search_patterns($next_strngs, $lengths, $next_ordered) ;
    }
  }

  return count($result) ? $result : false ;
}


$s = array('a', 'b', 'c', 'ab', 'bc', 'ac', 'abc') ;
$l = array(1, 2, 1, 2, 1, 2, 3) ;
$r = search_patterns($s, $l) ;
if ($r) for ($i = 0; $i < count($r); ++$i) echo implode(" ", $r[$i])."\n" ;
else echo "エラー\n" ;
echo "\n" ;

// 1 の次に 3 がある不正なデータ
$s = array('a', 'b', 'c', 'ab', 'bc', 'ac', 'abc') ;
$l = array(1, 3, 1, 2, 1, 2, 3) ;
$r = search_patterns($s, $l) ;
if ($r) for ($i = 0; $i < count($r); ++$i) echo implode(" ", $r[$i])."\n" ;
else echo "エラー\n" ;
echo "\n" ;

$s = array('あ', 'い', 'う', 'え',
           'あい', 'あう', 'あえ', 'いう', 'いえ', 'うえ',
           'あいう', 'あいえ', 'いうえ', 'あいうえ') ;
$l = array(1, 2, 3, 2, 1, 2, 3, 2, 3, 4) ;
$r = search_patterns($s, $l) ;
if ($r) for ($i = 0; $i < count($r); ++$i) echo implode(" ", $r[$i])."\n" ;
else echo "エラー\n" ;
?>
</pre>