Tagster i ny version

Ja, efter at være blevet sammenlignet med slamcoders og andet godtfolk kunne jeg ikke lade \"min\" version af tagsteren køre som nu...

Hermed ny og forhåbentlig sidste release af koden til håndtering af konvertere indlæg til tags samt formatere output :)


------------------------------------------------------
<?php
    # Eksperten Tagster
    # Lars B. Jensen, LJWeb GmbH
    # ljweb@ljweb.com

    function string_tagster($str) {
        # Add a single space before and after the string
        $str = \" \".$str.\" \";

        # Fix Links
        $str = eregi_replace(\"([[:space:]{()\\\"\'\\[~#=;\\&?\\_-])((ftp|http|https|telnet|news|nttp|nntp|file):\\/\\/[a-z0-9~#%@æøå\\&\\(\\):;=\\?\\/\\.,_-]+(\\\\[|\\\\]|[a-z0-9~#%@æøå\\&:;,=\\?\\/_\\+-])+)\", \"\\\\1<A HREF=\\\"\\\\2\\\" TARGET=\\\"_blank\\\">\\\\2</A>\", $str);
        $str = eregi_replace(\"([[:space:]{()\\\"\'\\[~#=;\\&?\\_-])(www\\.[a-z0-9~#%@æøå\\&\\(\\):;=\\?\\/\\.,_-]+(\\\\[|\\\\]|[a-z0-9~#%@æøå\\&:;,=\\?\\/_\\+-])+)\", \"\\\\1<A HREF=\\\"http://\\\\2\\\" TARGET=\\\"_blank\\\">\\\\2</A>\", $str);

        # Fix Emails
        $str = eregi_replace(\"([[:space:]{()\\\"\'\\[~#=;\\&?\\_-])([_\\.0-9a-z-]+@([_\\.0-9a-z-]+)+\\.[a-z]{2,4})\",\"\\\\1<A HREF=\\\"mailto:\\\\2\\\">\\\\2</A>\", $str);

        # Return the result
        return substr($str, 1);
    }

    function format_post2 ($str) {
        # Fix the layout in output function
        $str = htmlentities($str);
        $str = str_replace(\"&quot;\", \"\\\"\", $str);
        $str = string_tagster($str);
        $str = ereg_replace(\"  \", \"&nbsp; \", $str);
        $str = str_replace(\"\\\\t\", \"&nbsp;&nbsp;&nbsp; \", $str);
        $str = str_replace(\"\\\\r\", \"\", $str);
        $str = str_replace(\"\\\\n\", \"<BR>\", $str);

        # Return the result
        return $str;
    }
?>