source: branches/rsr.v5.1/web/punbb/include/cache_smilies.php @ 1

<?php

//
// Generate smiley cache PHP array
//
function generate_smiley_cache()
{
        global $db;
        
        $smiley_text = array();
        $smiley_img = array();
        
        $result = $db->query('SELECT image, text FROM '.$db->prefix.'smilies ORDER BY disp_position') or error('Impossible de retrouver les smilies', __FILE__, __LINE__, $db->error());
        while ($db_smilies = $db->fetch_assoc($result))
        {
                $smiley_text[] = $db_smilies['text'];
                $smiley_img[] = $db_smilies['image'];
        }
        
        $smiley_text = array_map('addslashes', $smiley_text);
        $smiley_text = array_map('pun_htmlspecialchars', $smiley_text);

        $str = '';
        
        $str .= '<?php'."\n\n";
        $str .= '$smiley_text = array('."\n";
        
        foreach ($smiley_text as $t)
                $str .= "'".$t."',"."\n";
                
        $str .= ');'."\n\n";
        $str .= '$smiley_img = array('."\n";
        
        foreach ($smiley_img as $i)
                $str .= "'".$i."',"."\n";
                
        $str .= ');'."\n\n";
        $str .= 'define(\'PUN_CACHE_SMILEY\', 1);'."\n\n";
        $str .= '?>';
        
        $fh = @fopen(PUN_ROOT.'cache/cache_smilies.php', 'wb');
        if (!$fh)
                error('Impossible d\'écrire le fichier cache de smileys dans le répertoire cache. Veuillez vous assurer que PHP a l\'accÚs en écrire au répertoire \'cache\'', __FILE__, __LINE__);                
        
        fwrite($fh, $str);
        
        fclose($fh);
}