12         $string = trim($string);
 
   13         if (!$string) 
return false;
 
   15         $subtags = explode(
'-', $string);
 
   16         $num_subtags = count($subtags);
 
   18         if ($num_subtags == 0) 
return false; 
 
   21         $length = strlen($subtags[0]);
 
   26                 if (! ($subtags[0] == 
'x' || $subtags[0] == 
'i') ) {
 
   32                 if (! ctype_alpha($subtags[0]) ) {
 
   34                 } elseif (! ctype_lower($subtags[0]) ) {
 
   35                     $subtags[0] = strtolower($subtags[0]);
 
   42         $new_string = $subtags[0];
 
   43         if ($num_subtags == 1) 
return $new_string;
 
   46         $length = strlen($subtags[1]);
 
   47         if ($length == 0 || ($length == 1 && $subtags[1] != 
'x') || $length > 8 || !ctype_alnum($subtags[1])) {
 
   50         if (!ctype_lower($subtags[1])) $subtags[1] = strtolower($subtags[1]);
 
   52         $new_string .= 
'-' . $subtags[1];
 
   53         if ($num_subtags == 2) 
return $new_string;
 
   56         for ($i = 2; $i < $num_subtags; $i++) {
 
   57             $length = strlen($subtags[$i]);
 
   58             if ($length == 0 || $length > 8 || !ctype_alnum($subtags[$i])) {
 
   61             if (!ctype_lower($subtags[$i])) {
 
   62                 $subtags[$i] = strtolower($subtags[$i]);
 
   64             $new_string .= 
'-' . $subtags[$i];