[php] Skracanie tekstu z uwzględnieniem bbcode

//funkcja pomocnicza
//zwraca:
//nazwa tagu - jeśli jest to rozpoczęcie tagu podwojnego
//1 - jeśli to pojedynczy tag
//0 - jeśli to zwykły tekst
//-1 - jeśli to zakończenie tagu
function check_tag($s) {
        if (preg_match('!^\[(img|quote|url|b|i|u|color|center)(\s*=\s*.*?)?\]$!i', $s, $match)) { //tag rozpoczynający
                return $match[1];
        } else if (preg_match('!^\[/(img|quote|url|b|i|u|color|center)\]$!i', $s)) { //tag kończący
                return -1;
        } else if (preg_match('!^\[(br|hr)\]$!i', $s)) { //tag pojedynczy
                return 1;
        } else { // zwykly string
                return 0;
        }
}

//$str    - string
//$len    - długość
//$type   - string lub array
//$concat - string służący do łączenia poszczególnych kawałków
function strTagsCut($str, $len, $type='string', $concat='') {
        static $tags = array(
                'single' => array('br', 'hr'),
                'double' => array('img','quote','url','b', 'i', 'u', 'color', 'center'),
        );
        $pat = sprintf('!(\[/?(?:%s|%s)(?:\s*=\s*.*?]*)?\])!i',
                implode('|', $tags['single']),
                implode('|', $tags['double'])
        );

        $splitted = preg_split($pat, $str, -1, PREG_SPLIT_DELIM_CAPTURE | PREG_SPLIT_NO_EMPTY);
        $count    = 0;
        $stack    = array();
        $new      = array();
        foreach ($splitted as $part) {

                $tag = check_tag($part);
                if (is_string($tag)) {
                        array_push($stack, $tag);

                } else if ($tag === 0) {
                        $l = strlen($part);
                        if (($count+$l) >= $len) {
                                $new[] = substr($part, 0, -($count+$l-$len));
                                foreach (array_reverse($stack) as $el) {
                                        $new[] = sprintf('[/%s]', $el);
                                }
                                break;
                        }
                        $count += $l;

                } else if ($tag === -1) {
                        array_pop($stack);
                }

                $new[] = $part;

        }

        return $type=='array' ? $new : join($concat, $new);
}

echo strTagsCut($jakis_tekst, 600);