functions.php

<?php

// Version / Copyright - nicht entfernen!
$mainchat_version = "Open mainChat 5.0.9 (c) by fidion GmbH 1999-2012";
$mainchat_email = "info@fidion.de";

// HTTPS ja oder nein?
// if ($HTTPS=="on") {
//	$httpprotocol="https://";
//} else {
//	$httpprotocol="http://";
//}

// Caching unterdrücken
Header("Last-Modified: " . gmDate("D, d M Y H:i:s", Time()) . " GMT");
Header("Expires: " . gmDate("D, d M Y H:i:s", Time() - 3601) . " GMT");
Header("Pragma: no-cache");
Header("Cache-Control: no-cache");

// Variable initialisieren, einbinden, Community-Funktionen laden
if (!(isset($functions_init_geladen)))
    require_once "functions-init.php";
if ($communityfeatures)
    require_once "functions-community.php";

// DB-Connect, ggf. 3 mal versuchen
for ($c = 0; $c++ < 3 AND (!(isset($conn)));) {
    if ($conn = @mysql_connect($mysqlhost, $mysqluser, $mysqlpass)) {
        mysql_set_charset("utf8mb4");
        mysql_select_db($dbase, $conn);
    }
}
if (!(isset($conn))) {
    echo "Beim Zugriff auf die Datenbank ist ein Fehler aufgetreten. Bitte versuchen Sie es später noch einmal!<BR>";
    exit;
}

// Deklaration der gültigen Tabellenfelder die in die Datenbank geschrieben werden dürfen 
$valid_fields = array(
    'aktion' => array('a_id', 'a_user', 'a_wann', 'a_was', 'a_wie', 'a_text', 'a_zeit'),
    'bild' => array('b_id', 'b_user', 'b_name', 'b_bild', 'b_mime', 'b_width', 'b_height'),
    'blacklist' => array('f_id', 'f_userid', 'f_blacklistid', 'f_zeit', 'f_text'),
    'chat' => array('c_id', 'c_von_user', 'c_an_user', 'c_typ', 'c_raum', 'c_text', 'c_zeit', 'c_farbe', 'c_von_user_id', 'c_br'),
    'forum' => array('fo_id', 'fo_name', 'fo_order', 'fo_admin'),
    'freunde' => array('f_id', 'f_userid', 'f_freundid', 'f_zeit', 'f_text', 'f_status'),
    'iignore' => array('i_id', 'i_user_aktiv', 'i_user_passiv'),
    'invite' => array('inv_id', 'inv_raum', 'inv_user'),
    'ip_sperre' => array('is_id', 'is_ip', 'is_domain', 'is_zeit', 'is_ip_byte', 'is_owner', 'is_infotext', 'is_warn'),
    'mail' => array('m_id', 'm_status', 'm_von_uid', 'm_an_uid', 'm_zeit', 'm_geloescht_ts', 'm_betreff', 'm_text'),
    'mail_check' => array('email', 'datum', 'u_id'),
    'moderation' => array('c_id', 'c_von_user', 'c_an_user', 'c_typ', 'c_raum', 'c_text', 'c_zeit', 'c_farbe', 'c_von_user_id', 'c_moderator'),
    'online' => array('o_id', 'o_user', 'o_raum', 'o_hash', 'o_timestamp', 'o_ip', 'o_who', 'o_aktiv', 'o_chat_id', 'o_browser', 'o_name', 'o_vhost', 'o_js', 'o_knebel', 
        'o_http_stuff', 'o_http_stuff2', 'o_userdata', 'o_userdata2', 'o_userdata3', 'o_userdata4', 'o_level', 'o_ignore', 'o_login', 'o_punkte', 'o_aktion', 
        'o_timeout_zeit', 'o_timeout_warnung', 'o_chat_historie', 'o_spam_zeilen', 'o_spam_byte', 'o_spam_zeit', 'u_sms_extra'),
	'posting' => array('po_id', 'po_th_id', 'po_u_id', 'po_vater_id', 'po_ts', 'po_tiefe', 'po_threadorder', 'po_threadts', 'po_gesperrt', 'po_threadgesperrt', 
        'po_topposting', 'po_titel', 'po_text'),
    'raum' => array('r_id', 'r_name', 'r_eintritt', 'r_austritt', 'r_status1', 'r_besitzer', 'r_topic', 'r_status2', 'r_smilie', 'r_werbung', 'r_min_punkte'), 
    'sequence' => array('se_name', 'se_nextid'),
    'sms' => array('s_id', 's_zeit', 's_von_user_id', 's_an_user_id', 's_status', 's_text'),
    'smsin' => array('s_id', 's_handynummer', 's_shortnumber', 's_keyword', 's_timestamp', 's_text'),
    'sperre' => array('s_id', 's_user', 's_raum', 's_zeit'),
    'thema' => array('th_id', 'th_fo_id', 'th_name', 'th_desc', 'th_anzthreads', 'th_anzreplys', 'th_postings', 'th_order'),
    'top10cache' => array('t_id', 't_zeit', 't_eintrag', 't_daten'),
    'umfrage' => array('um_id', 'um_bereich', 'um_frage', 'um_opt', 'um_opt_typ', 'um_opt_anzahl_min', 'um_opt_anzahl_max', 'um_start', 'um_start_umfrage', 
    'um_ende_umfrage', 'um_ende', 'um_minpunkte', 'um_minlogin', 'um_useranzahl', 'um_user', 'um_stimmen'),
    'user' => array('u_id', 'u_neu', 'u_login', 'u_auth', 'u_nick', 'u_name', 'u_passwort', 'u_adminemail', 'u_email', 'u_url', 'u_level', 'u_farbe', 'u_backup', 
        'u_farbe_alle', 'u_farbe_noise', 'u_farbe_priv', 'u_farbe_bg', 'u_farbe_sys', 'u_clearedit', 'u_away', 'u_ip_historie', 'u_smilie', 'u_agb', 
        'u_zeilen', 'u_punkte_gesamt', 'u_punkte_monat', 'u_punkte_jahr', 'u_punkte_datum_monat', 'u_punkte_datum_jahr', 'u_punkte_gruppe', 'u_gelesene_postings',
        'u_frames', 'u_chathomepage', 'u_eintritt', 'u_austritt', 'u_signatur', 'u_lastclean', 'u_loginfehler', 'u_sms_ok', 'u_sms_guthaben', 'u_sms_extra', 
        'u_nick_historie', 'u_profil_historie', 'u_kommentar', 'u_forum_postingproseite', 'u_systemmeldungen', 'u_punkte_anzeigen', 'u_knebel'),
    'userinfo' => array('ui_id', 'ui_userid', 'ui_strasse', 'ui_plz', 'ui_ort', 'ui_land', 'ui_geburt', 'ui_geschlecht', 'ui_beziehung', 'ui_typ', 'ui_beruf', 'ui_hobby', 
        'ui_tel', 'ui_fax', 'ui_handy', 'ui_icq', 'ui_text', 'ui_farbe', 'ui_einstellungen')
);

// Funktionen

function onlinezeit($onlinezeit)
{
    // Alternative zu gmdate("H:i:s", $onlinezeit), jedoch geht hier Std > 24
    $zeit = ":" . substr("00" . ($onlinezeit % 60), -2); // Sekunden
    $onlinezeit = floor($onlinezeit / 60);
    $zeit = ":" . substr("00" . ($onlinezeit % 60), -2) . $zeit;
    $onlinezeit = floor($onlinezeit / 60);
    $zeit = substr("00" . ($onlinezeit), -2) . $zeit;
    return ($zeit);
}

function raum_user($r_id, $u_id, $id)
{
    // Gibt die User im Raum r_id im Text an $u_id aus
    
    global $timeout, $dbase, $t, $leveltext, $conn, $beichtstuhl, $admin, $lobby, $unterdruecke_user_im_raum_anzeige;
    
    if ($unterdruecke_user_im_raum_anzeige != "1") {
        $query = "SELECT r_name,r_besitzer,o_user,o_name,o_userdata,o_userdata2,o_userdata3,o_userdata4 "
            . "FROM raum,online WHERE r_id=$r_id AND o_raum=r_id "
            . "AND (UNIX_TIMESTAMP(NOW())-UNIX_TIMESTAMP(o_aktiv)) <= $timeout "
            . "ORDER BY o_name";
        
        $result = mysql_query($query, $conn);
        $rows = @mysql_Num_Rows($result);
        
        if ($result AND $rows > 0) {
            $i = 0;
            while ($row = mysql_fetch_object($result)) {
                // Beim ersten Durchlauf Namen des Raums einfügen
                if ($i == 0) {
                    $text = str_replace("%r_name%", $row->r_name,
                        $t['raum_user1']);
                }
                
                // Userdaten lesen, Liste ausgeben
                $userdata = unserialize(
                    $row->o_userdata . $row->o_userdata2 . $row->o_userdata3
                        . $row->o_userdata4);
                
                // Variable aus o_userdata setzen, Level und away beachten
                $uu_id = $userdata['u_id'];
                $uu_level = $userdata['u_level'];
                
                // Im Beichtstuhl-Modus Usernamen anonymisieren
                if ($beichtstuhl && !$admin && $row->r_name != $lobby
                    && $uu_id != $u_id && $uu_level != "C" && $uu_level != "S") {
                    $uu_nick = $t['raum_user11'];
                } else {
                    $uu_nick = user($userdata['u_id'], $userdata, FALSE, FALSE);
                }
                
                if ($userdata['u_away'] != "") {
                    $text .= "(" . $uu_nick . ")";
                } else {
                    $text .= $uu_nick;
                }
                
                $i++;
                if ($i < $rows) {
                    $text = $text . ", ";
                }
            }
            
        } else {
            $text = "Da ist niemand.";
        }
        $back = system_msg("", 0, $u_id, "", $text);
        
        @mysql_free_result($result);
    } else {
        $back = 1;
    }
    
    return ($back);
    
}

function ist_online($user)
{
    // Prüft ob User noch online ist
    // liefert 1 oder 0 zurück
    
    global $dbase, $timeout, $ist_online_raum, $conn, $whotext;
    
    $ist_online_raum = "";
    
    $user = mysql_real_escape_string($user); // sec
    
    $query = "SELECT o_id,r_name FROM online left join raum on r_id=o_raum "
        . "WHERE o_user=$user "
        . "AND (UNIX_TIMESTAMP(NOW())-UNIX_TIMESTAMP(o_aktiv)) <= $timeout";
    
    $result = mysql_query($query, $conn);
    
    if ($result && mysql_NumRows($result) > 0) {
        $ist_online_raum = mysql_result($result, 0, "r_name");
        if (!$ist_online_raum || $ist_online_raum == "NULL")
            $ist_online_raum = "[" . $whotext[2] . "]";
        @mysql_free_result($result);
        return (1);
    } else {
        @mysql_free_result($result);
        return (0);
    }
}

function schreibe_moderiert($f)
{
    // Schreibt Chattext in DB
    
    global $dbase;
    global $conn;
    // Schreiben falls text>0
    if (strlen($f['c_text']) > 0) {
        $back = schreibe_db("moderation", $f, "", "c_id");
    } else {
        $back = 0;
    }
    return ($back);
}

function schreibe_moderation()
{
    global $u_id;
    global $dbase;
    global $conn;
    
    // alles aus der moderationstabelle schreiben, bei der u_id==c_moderator;
    $query = "SELECT * FROM moderation WHERE c_moderator=$u_id AND c_typ='N'";
    $result = mysql_query($query, $conn);
    if ($result > 0) {
        while ($f = mysql_fetch_array($result)) {
            unset($c);
            // vorbereiten für umspeichern... geht leider nicht 1:1, 
            // weil fetch_array mehr zurückliefert als in $f[] sein darf...
            $c['c_von_user'] = $f['c_von_user'];
            $c['c_an_user'] = $f['c_an_user'];
            $c['c_typ'] = $f['c_typ'];
            $c['c_raum'] = $f['c_raum'];
            $c['c_text'] = $f['c_text'];
            $c['c_farbe'] = $f['c_farbe'];
            $c['c_zeit'] = $f['c_zeit'];
            $c['c_von_user_id'] = $f['c_von_user_id'];
            // und in moderations-tabelle schreiben
            schreibe_chat($c);
            // und datensatz löschen...
            $query = "DELETE FROM moderation WHERE c_id=$f[c_id]";
            $result2 = mysql_query($query, $conn);
        }
    }
}

function schreibe_chat($f)
{
    // Schreibt Chattext in DB
    global $dbase, $conn;
    
    // Schreiben falls text>0
    if (isset($f['c_text']) && strlen($f['c_text']) > 0) {
        // Falls Länge c_text mehr als 256 Zeichen, auf mehrere Zeilen aufteilen
        if (strlen($f['c_text']) > 256) {
            $temp = $f['c_text'];
            $laenge = strlen($temp);
            $i = 0;
            // Tabelle LOCK
            $result = mysql_query("LOCK TABLES chat WRITE", $conn);
            while ($i < $laenge) {
                $f['c_text'] = substr($temp, $i, 255);
                if ($i == 0) {
                    // erste Zeile
                    $f['c_br'] = "erste";
                } elseif (($i + 255) >= $laenge) {
                    // letzte Zeile
                    $f['c_br'] = "letzte";
                } else {
                    // mittlere Zeile
                    $f['c_br'] = "mitte";
                }
                $i = $i + 255;
                $back = schreibe_db("chat", $f, "", "c_id");
            }
            $result = mysql_query("UNLOCK TABLES chat", $conn);
        } else {
            // Normale Zeile in Tabelle schreiben
            $f['c_br'] = "normal";
            $back = schreibe_db("chat", $f, "", "c_id");
        }
    } else {
        $back = 0;
    }
    return ($back);
}

function logout($o_id, $u_id, $info = "")
{
    // Logout aus dem Gesamtsystem
    
    global $dbase, $u_farbe, $conn, $communityfeatures, $logout_logging;
    
    if ($logout_logging)
        logout_debug($o_id, $info);
    
    // Tabellen online+user exklusiv locken
    $query = "LOCK TABLES online WRITE, user WRITE";
    $result = mysql_query($query, $conn);
    
    $o_id = mysql_real_escape_string($o_id); // sec
    
    // Aktuelle Punkte auf Punkte in Usertabelle addieren
    $result = @mysql_query(
        "select o_punkte,o_name,o_knebel, UNIX_TIMESTAMP(o_knebel)-UNIX_TIMESTAMP(NOW()) as knebelrest FROM online WHERE o_id=$o_id",
        $conn);
    if ($result && mysql_num_rows($result) == 1) {
        $row = mysql_fetch_object($result);
        $u_name = $row->o_name;
        if ($row->knebelrest > 0) {
            $knebelzeit = $row->o_knebel;
        } else {
            $knebelzeit = NULL;
        }
        
        $query = "update user set "
            . "u_punkte_monat=u_punkte_monat+$row->o_punkte, "
            . "u_punkte_jahr=u_punkte_jahr+$row->o_punkte, "
            . "u_punkte_gesamt=u_punkte_gesamt+$row->o_punkte, "
            . "u_knebel='$knebelzeit' " . "where u_id=$u_id";
        $result2 = mysql_query($query, $conn);
    }
    @mysql_free_result($result);
    
    // User löschen
    $result2 = mysql_query(
        "DELETE FROM online WHERE o_id=$o_id OR o_user=$u_id", $conn);
    
    // Lock freigeben
    $query = "UNLOCK TABLES";
    $result = mysql_query($query, $conn);
    
    // Punkterepair 
    $repair1 = "UPDATE user SET u_punkte_jahr = 0, u_punkte_monat = 0, u_punkte_datum_jahr = YEAR(NOW()), u_punkte_datum_monat = MONTH(NOW()), u_login=u_login WHERE u_punkte_datum_jahr != YEAR(NOW()) AND u_id=$u_id";
    mysql_query($repair1);
    $repair2 = "UPDATE user SET u_punkte_monat = 0, u_punkte_datum_monat = MONTH(NOW()), u_login=u_login WHERE u_punkte_datum_monat != MONTH(NOW()) AND u_id=$u_id";
    mysql_query($repair2);
    
    // Nachrichten an Freunde verschicken
    if ($communityfeatures) {
        $query = "SELECT f_id,f_text,f_userid,f_freundid,f_zeit FROM freunde WHERE f_userid=$u_id AND f_status = 'bestaetigt' "
            . "UNION "
            . "SELECT f_id,f_text,f_userid,f_freundid,f_zeit FROM freunde WHERE f_freundid=$u_id AND f_status = 'bestaetigt' "
            . "ORDER BY f_zeit desc ";
        
        $result = mysql_query($query, $conn);
        
        if ($result && mysql_num_rows($result) > 0) {
            
            while ($row = mysql_fetch_object($result)) {
                unset($f);
                $f['aktion'] = "Logout";
                $f['f_text'] = $row->f_text;
                if ($row->f_userid == $u_id) {
                    if (ist_online($row->f_freundid)) {
                        $wann = "Sofort/Online";
                        $an_u_id = $row->f_freundid;
                    } else {
                        $wann = "Sofort/Offline";
                        $an_u_id = $row->f_freundid;
                    }
                } else {
                    if (ist_online($row->f_userid)) {
                        $wann = "Sofort/Online";
                        $an_u_id = $row->f_userid;
                    } else {
                        $wann = "Sofort/Offline";
                        $an_u_id = $row->f_userid;
                    }
                }
                // Aktion ausführen
                aktion($wann, $an_u_id, $u_name, "", "Freunde", $f);
            }
        }
        @mysql_free_result($result);
    }
}

function global_msg($u_id, $r_id, $text)
{
    // Schreibt Text $text in Raum $r_id an alle User
    // Art:           N: Normal
    //	              S: Systemnachricht
    //                P: Privatnachticht
    //                H: Versteckte Nachricht
    
    global $conn;
    
    if (strlen($r_id) > 0) {
        $f['c_raum'] = $r_id;
    }
    $f['c_typ'] = "S";
    $f['c_von_user_id'] = $u_id;
    $f['c_text'] = $text;
    $f['c_an_user'] = "";
    
    $back = schreibe_chat($f);
    
    // In Session merken, dass Text im Chat geschrieben wurde
    if ($u_id) {
        $query = "UPDATE online SET o_timeout_zeit=DATE_FORMAT(NOW(),\"%Y%m%d%H%i%s\"), o_timeout_warnung='N' "
            . "WHERE o_user=$u_id";
        $result = mysql_query($query, $conn);
    }
    
    return ($back);
}

function hidden_msg($von_user, $von_user_id, $farbe, $r_id, $text)
{
    // Schreibt Text in Raum r_id
    // Art:           N: Normal
    //	              S: Systemnachricht
    //                P: Privatnachticht
    //                H: Versteckte Nachricht
    
    global $conn;
    
    $f['c_von_user'] = $von_user;
    $f['c_von_user_id'] = $von_user_id;
    $f['c_farbe'] = $farbe;
    $f['c_raum'] = $r_id;
    $f['c_typ'] = "H";
    $f['c_text'] = $text;
    
    $back = schreibe_chat($f);
    
    // In Session merken, dass Text im Chat geschrieben wurde
    if ($von_user_id) {
        $query = "UPDATE online SET o_timeout_zeit=DATE_FORMAT(NOW(),\"%Y%m%d%H%i%s\"), o_timeout_warnung='N' "
            . "WHERE o_user=$von_user_id";
        $result = mysql_query($query, $conn);
    }
    
    return ($back);
}

function priv_msg(
    $von_user,
    $von_user_id,
    $an_user,
    $farbe,
    $text,
    $userdata = "")
{
    // Schreibt privaten Text von $von_user an User $an_user
    // Art:           N: Normal
    //	              S: Systemnachricht
    //                P: Privatnachticht
    //                H: Versteckte Nachricht
    
    global $conn;
    
    // Optional Link auf User erzeugen
    
    if ($von_user_id && is_array($userdata)) {
        $f['c_von_user'] = user($von_user_id, $userdata, TRUE, FALSE, "&nbsp;",
            "", "", FALSE, TRUE);
    } else {
        $f['c_von_user'] = $von_user;
    }
    $f['c_von_user_id'] = $von_user_id;
    $f['c_an_user'] = $an_user;
    $f['c_farbe'] = $farbe;
    $f['c_typ'] = "P";
    $f['c_text'] = $text;
    
    $back = schreibe_chat($f);
    
    // In Session merken, dass Text im Chat geschrieben wurde
    if ($von_user_id) {
        $von_user_id = mysql_real_escape_string($von_user_id); // sec
        $query = "UPDATE online SET o_timeout_zeit=DATE_FORMAT(NOW(),\"%Y%m%d%H%i%s\"), o_timeout_warnung='N' "
            . "WHERE o_user=$von_user_id";
        $result = mysql_query($query, $conn);
    }
    
    return ($back);
}

function system_msg($von_user, $von_user_id, $an_user, $farbe, $text)
{
    // Schreibt privaten Text als Systemnachricht an User $an_user
    // $von_user wird nicht benutzt
    // $von_user_id ist Absender der Nachricht (normalerweise wie $an_user, notwendig für Spamschutz)
    // Art:           N: Normal
    //	              S: Systemnachricht
    //                P: Privatnachticht
    //                H: Versteckte Nachricht
    
    $f['c_an_user'] = $an_user;
    $f['c_von_user_id'] = $von_user_id;
    $f['c_farbe'] = $farbe;
    $f['c_typ'] = "S";
    $f['c_text'] = $text;
    
    $back = schreibe_chat($f);
    
    return ($back);
}

function aktualisiere_online($u_id, $o_raum)
{
    // Timestamp im Datensatz aktualisieren -> User gilt als online
    global $dbase, $conn;
    // sec ??
    $query = "UPDATE online SET o_aktiv=NULL WHERE o_user=$u_id";
    $result = mysql_query($query, $conn);
    @mysql_free_result($result);
}

function id_lese($id, $auth_id = "", $ipaddr = "", $agent = "", $referrer = "")
{
    // Vergleicht Hash-Wert mit IP und Browser des Users
    // Liefert User- und Online-Variable
    
    global $u_id, $u_name, $u_nick, $o_id, $o_raum, $o_js, $u_level, $u_farbe, $u_backup, $backup_chat, $u_smilie, $u_systemmeldungen, $u_punkte_anzeigen;
    global $admin, $dbase, $system_farbe, $chat_back, $ignore, $userdata, $o_punkte, $o_aktion;
    global $u_farbe_alle, $u_farbe_sys, $u_farbe_priv, $u_farbe_noise, $u_farbe_bg, $u_clearedit;
    global $u_away, $o_knebel, $u_punkte_gesamt, $u_punkte_gruppe, $moderationsmodul, $conn;
    global $HTTP_SERVER_VARS, $HTTP_COOKIE_VARS, $o_who, $o_timeout_zeit, $o_timeout_warnung;
    global $o_spam_zeilen, $o_spam_byte, $o_spam_zeit, $o_dicecheck;
    global $hackmail, $webmaster, $chat, $http_host, $t, $erweitertefeatures;
    
    // IP und Browser ermittlen
    $ip = $ipaddr ? $ipaddr : $_SERVER["REMOTE_ADDR"];
    $browser = $agent ? $agent : $_SERVER["HTTP_USER_AGENT"];
    
    $browser = str_replace("MSIE 8.0", "MSIE 7.0", $browser);
    
    $id = mysql_real_escape_string($id);
    
    // u_id und o_id aus Objekt ermitteln, o_hash, o_browser müssen übereinstimmen
    
    $query = "SELECT HIGH_PRIORITY *,UNIX_TIMESTAMP(o_timeout_zeit) as o_timeout_zeit,"
        . "UNIX_TIMESTAMP(o_knebel)-UNIX_TIMESTAMP(NOW()) as o_knebel FROM online "
        . "WHERE o_hash='$id' ";
    
    $result = mysql_query($query, $conn);
    if (!$result) {
        echo "Fehler: " . mysql_error() . "<br><b>$query</b><br>";
        exit;
    }
    
    if ($ar = @mysql_fetch_array($result, MYSQL_ASSOC)) {
        
        // userdaten und ignore Arrays setzen
        $userdata = unserialize(
            $ar['o_userdata'] . $ar['o_userdata2'] . $ar['o_userdata3']
                . $ar['o_userdata4']);
        $ignore = unserialize($ar['o_ignore']);
        
        unset($ar['o_ignore']);
        unset($ar['o_userdata']);
        unset($ar['o_userdata2']);
        unset($ar['o_userdata3']);
        unset($ar['o_userdata4']);
        
        // Schleife über alle Variable; Variable setzen
        while (list($k, $v) = each($ar)) {
            $$k = $v;
        }
        @mysql_free_result($result);
        
        // o_browser prüfen Userdaten in Array schreiben
        if (is_array($userdata) && $ar['o_browser'] == $browser) {
            // Schleife über Userdaten, Variable setzen
            while (list($k, $v) = each($userdata)) {
                @$$k = $v;
            }
            
            // Usereinstellungen überschreiben Default-Einstellungen
            if ($u_zeilen)
                $chat_back = $u_zeilen;
            
            // ChatAdmin oder Superuser oder moderator?
            if ($u_level == "S" || $u_level == "C"
                || ($moderationsmodul == 1 && $u_level == "M"
                    && isset($r_status1) && strtolower($r_status1) == "m")) {
                $admin = 1;
            } else {
                $admin = 0;
            }
            
        } else {
            
            // Aus Sicherheitsgründen die Variablen löschen
            $userdata = "";
            $u_id = "";
            $u_name = "";
            $u_nick = "";
            $o_id = "";
            $u_level = "";
            $admin = 0;
            
        }
    } else {
        
        // Aus Sicherheitsgründen die Variablen löschen
        $u_id = "";
        $u_name = "";
        $u_nick = "";
        $o_id = "";
        $u_level = "";
        $admin = 0;
    }
    
    $http_te = "";
    if (isset($_SERVER['HTTP_TE']))
        $http_te = $_SERVER['HTTP_TE'];
    
    // Bei bestimmten Browsern backup_chat setzen
    // HTTP_TE=chunked bei T-Online-Proxy
    // Falls Javascript aus ist (o_js), backup_chat setzen
    // Bei Änderungen auch betrete_chat in functions.php-index.php ändern!
    if (preg_match("/(.*)mozilla\/[234](.*)mac(.*)/i", $browser)
        || preg_match("/(.*)msie(.*)mac(.*)/i", $browser)
        || preg_match("/(.*)Opera 3(.*)/i", $browser)
        || preg_match("/(.*)Opera\/9(.*)/i", $browser)
        || preg_match("/(.*)Konqueror(.*)/i", $browser)
        || preg_match("/(.*)mozilla\/5(.*)Netscape6(.*)/i", $browser)
        || preg_match("/(.*)mozilla\/[23](.*)/i", $browser)
        || preg_match("/(.*)AOL [123](.*)/i", $browser)
        || $http_te == 'chunked' || !$o_js) {
        $backup_chat = 1;
    } else {
        $backup_chat = 0;
    }
    
    // Bei Admins via cookies die Session überprüfen
    if (false && $erweitertefeatures && $admin) {
        
        if ($HTTP_COOKIE_VARS["MAINCHAT" . $u_nick] != md5($o_id . $id . "42")) {
            
            // Erfolgreicher Hackversuch -> Mail verschicken
            
            $http_stuff = $_SERVER;
            unset($http_stuff['DOCUMENT_ROOT']);
            unset($http_stuff['HTTP_ACCEPT']);
            unset($http_stuff['HTTP_ACCEPT_ENCODING']);
            unset($http_stuff['HTTP_ACCEPT_CHARSET']);
            unset($http_stuff['HTTP_ACCEPT_LANGUAGE']);
            unset($http_stuff['HTTP_CACHE_CONTROL']);
            unset($http_stuff['HTTP_CONNECTION']);
            unset($http_stuff['HTTP_PRAGMA']);
            unset($http_stuff['PATH']);
            unset($http_stuff['SCRIPT_FILENAME']);
            unset($http_stuff['SERVER_ADMIN']);
            unset($http_stuff['SERVER_NAME']);
            unset($http_stuff['SERVER_PORT']);
            unset($http_stuff['SERVER_SIGNATURE']);
            unset($http_stuff['SERVER_SOFTWARE']);
            unset($http_stuff['GATEWAY_INTERFACE']);
            unset($http_stuff['SERVER_PROTOCOL']);
            unset($http_stuff['REQUEST_METHOD']);
            unset($http_stuff['REQUEST_URI']);
            unset($http_stuff['SCRIPT_NAME']);
            unset($http_stuff['PATH_TRANSLATED']);
            unset($http_stuff['PHP_SELF']);
            unset($http_stuff['SERVER_ADDR']);
            unset($http_stuff['argv']);
            unset($http_stuff['argc']);
            unset($http_stuff['CONTENT_TYPE']);
            unset($http_stuff['CONTENT_LENGTH']);
            unset($http_stuff['HTTP_KEEP_ALIVE']);
            unset($http_stuff['QUERY_STRING']);
            unset($http_stuff['REMOTE_PORT']);
            unset($http_stuff['PHP_AUTH_PW']);
            
            $header = "";
            foreach ($http_stuff as $key => $value)
                $header .= $key . ": " . $value . "\n";
            
            $user = $u_nick . " (" . $u_name . ", " . $u_adminemail . ")";
            $betreff = str_replace("%login%", $user, $t['hack1']);
            $text = str_replace("%login%", $user, $t['hack2']) . "\n";
            $text = str_replace("%ip%", $ip, $text);
            $text = str_replace("%datum%", date("d.m.Y H:i:s"), $text);
            $text = str_replace("%header%", $header, $text);
            $text .= "\n-- \n   $chat (" . $serverprotokoll . "://"
                . $_SERVER['HTTP_HOST'] . $_SERVER['PHP_SELF'] . " | "
                . $http_host . ")\n";
            mail($hackmail, $betreff, $text,
                "From: $hackmail\nReply-To: $hackmail\n");
            
            $u_id = "";
            $u_name = "";
            $u_nick = "";
            $o_id = "";
            $u_level = "";
            $userdata = "";
            $ignore = "";
        }
    }
}

function iCrypt($passwort, $salt)
{
    
    global $crypted_password_extern, $upgrade_password;
    
    $v_passwort = "";
    if ($upgrade_password == 1 && $crypted_password_extern == 0) {
        $salt = "";
        if (defined("CRYPT_SHA256")) {
            $salt = '$5$rounds=5000$' . gensalt(16) . '$';
        } elseif (CRYPT_MD5 == 1) {
            $salt = '$1$' . gensalt(8) . '$';
        } else {
            $salt = gensalt(2); // für den Notfall Std. DES
        }
        $upgrade_password = 0;
        $v_passwort = crypt($passwort, $salt);
    } elseif ($crypted_password_extern == 0) {
        $upgrade_password = 0;
        if ($salt == 'MD5') {
            $v_passwort = md5($passwort);
        } else {
            $v_passwort = crypt($passwort, $salt);
        }
    } else {
        $v_passwort = $passwort;
    }
    return ($v_passwort);
}

function schreibe_db($db, $f, $id, $id_name)
{
    // Assoziatives Array $f in DB $db schreiben 
    // Liefert als Ergebnis die ID des geschriebenen Datensatzes zurück
    // Sonderbehandlung für Passwörter
    // Akualiert ggf Kopie des Datensatzes in online-Tabelle
    global $dbase, $conn, $u_id, $valid_fields;
    
    $neu = array();
    foreach ($valid_fields[$db] as $field) {
        if (isset($f[$field])) {
            $neu[$field] = $f[$field];
        }
    }
    $f = $neu;
    
    $id == intval($id);
    
    if (strlen($id) == 0 || $id == 0) {
        
        // ID generieren
        if ($db == "online" || $db == "chat") {
            // ID aus sequence verwenden
            $query = "LOCK TABLES sequence WRITE";
            $result = mysql_query($query, $conn);
            $query = "SELECT se_nextid FROM sequence WHERE se_name='$db'";
            $result = mysql_query($query, $conn);
            if ($result) {
                $id = mysql_result($result, 0, 0);
                mysql_free_result($result);
                $query = "UPDATE sequence SET se_nextid='" . ($id + 1)
                    . "' WHERE se_name='$db'";
                $result = mysql_query($query, $conn);
            } else {
                echo "Schwerer Fehler in $query: " . mysql_errno() . " - "
                    . mysql_error();
                $query = "UNLOCK TABLES";
                $result = mysql_query($query, $conn);
                die();
            }
            $query = "UNLOCK TABLES";
            $result = mysql_query($query, $conn);
            
        } else {
            // ID mit auto_increment erzeugen
            $id = 0;
        }
        
        // Datensatz neu schreiben
        $q = "";
        for (reset($f); list($name, $inhalt) = each($f);) {
            if (($name != $id_name) && ($name != "u_salt")) {
                $q .= "," . mysql_real_escape_string($name);
                if ($name == "u_passwort") {
                    if (!isset($f['u_salt']))
                        $f['u_salt'] = substr($inhalt, 0, 2);
                    // Verschlüsseln
                    $q .= "='" . mysql_real_escape_string(iCrypt($inhalt, $f['u_salt'])) . "'";
                } else {
                    $q .= "='" . mysql_real_escape_string($inhalt) . "'";
                }
            }
        }
        
        $query = "INSERT INTO $db SET $id_name=$id " . $q;
        $result = mysql_query($query, $conn);
        if (!$result) {
            echo "Fataler Fehler in $query: " . mysql_errno() . " - "
                . mysql_error();
            die();
        }
        if ($id == 0)
            $id = mysql_insert_id();
        
    } else {
        
        // bestehenden Datensatz updaten
        $q = "";
        for (reset($f); list($name, $inhalt) = each($f);) {
            if ($name != "u_salt") {
                if ($q == "") {
                    $q = mysql_real_escape_string($name);
                } else {
                    $q .= "," . mysql_real_escape_string($name);
                }
                if ($name == "u_passwort") {
                    // Verschlüsseln
                    if (!isset($f['u_salt']))
                        $f['u_salt'] = substr($inhalt, 0, 2);
                    $q .= "='" . mysql_real_escape_string(iCrypt($inhalt, $f['u_salt'])) . "'";
                } else {
                    $q .= "='" . mysql_real_escape_string($inhalt) . "'";
                }
            }
        }
        $q = "UPDATE $db SET " . $q . " WHERE $id_name=$id";
        $result = mysql_query($q, $conn);
    }
    
    if ($db == "user" && $id_name == "u_id") {
        // Kopie in Onlinedatenbank aktualisieren
        // Query muss mit dem Code in login() übereinstimmen
        $query = "SELECT u_id,u_name,u_nick,u_level,u_farbe,u_zeilen,u_backup,u_farbe_bg,"
            . "u_farbe_alle,u_farbe_priv,u_farbe_noise,u_farbe_sys,u_clearedit, "
            . "u_away,u_email,u_adminemail,u_smilie,u_punkte_gesamt,u_punkte_gruppe, "
            . "u_chathomepage,u_systemmeldungen,u_punkte_anzeigen "
            . "FROM user WHERE u_id=$id";
        $result = mysql_query($query, $conn);
        if ($result && mysql_num_rows($result) == 1) {
            $userdata = mysql_fetch_array($result, MYSQL_ASSOC);
            
            // Slashes in jedem Eintrag des Array ergänzen
            reset($userdata);
            while (list($ukey, $udata) = each($userdata)) {
                $udata = mysql_real_escape_string($udata);
            }
            
            // Userdaten in 255-Byte Häppchen zerlegen
            $userdata_array = zerlege(serialize($userdata));
            
            if (!isset($userdata_array[0]))
                $userdata_array[0] = "";
            if (!isset($userdata_array[1]))
                $userdata_array[1] = "";
            if (!isset($userdata_array[2]))
                $userdata_array[2] = "";
            if (!isset($userdata_array[3]))
                $userdata_array[3] = "";
            
            $query = "UPDATE online SET " . "o_userdata='"
                . mysql_real_escape_string($userdata_array[0]) . "', " . "o_userdata2='"
                . mysql_real_escape_string($userdata_array[1]) . "', " . "o_userdata3='"
                . mysql_real_escape_string($userdata_array[2]) . "', " . "o_userdata4='"
                . mysql_real_escape_string($userdata_array[3]) . "', " . "o_level='"
                . mysql_real_escape_string($userdata['u_level']) . "', " . "o_name='"
                . mysql_real_escape_string($userdata['u_nick']) . "' " . "WHERE o_user=$id";
            mysql_query($query, $conn);
            mysql_free_result($result);
            
        }
    }
    
    return ($id);
}

function zerlege($daten)
{
    // Zerlegt $daten in 255byte-Häppchen und liefert diese in einem Array zurück
    
    $i = 0;
    $laenge = strlen($daten);
    $fertig = array();
    
    if ($laenge != 0) {
        $j = 0;
        $i = 0;
        while ($j < $laenge) {
            $fertig[] = substr($daten, $j, 255);
            // system_msg("",0,1225,0,"<B>DEBUG:</B> $i,$j,'$fertig[$i]'");
            $j = $j + 255;
            $i++;
        }
    }
    
    return ($fertig);
}

function show_box($box, $text, $url = "", $width = "")
{
    // Gibt Tabelle mit Kopf und Inhalt aus 
    
    global $farbe_text;
    global $farbe_link;
    global $farbe_vlink;
    global $farbe_background;
    global $farbe_tabelle_kopf;
    global $farbe_tabelle_kopf2;
    global $farbe_tabelle_koerper;
    global $f1;
    global $f2;
    
    if (strlen($width) > 0) {
        $width = "WIDTH=\"" . $width . "\"";
    }
    
    echo "<TABLE CELLPADDING=2 CELLSPACING=0 BORDER=0 $width BGCOLOR=\"$farbe_tabelle_kopf2\">\n";
    echo "<TR BGCOLOR=\"$farbe_tabelle_kopf\"><TD>";
    if (strlen($url) > 0) {
        echo "<A HREF=\"$url\">$box>"
            . "<IMG SRC=/pics/button-x.gif WIDTH=15 HEIGHT=13 ALIGN=RIGHT BORDER=0>"
            . "</A>\n";
    }
    echo "<FONT COLOR=$farbe_text><B>$box</B></FONT></TD></TR>\n" . "<TR><TD>"
        . $text . "</TD></TR></TABLE>\n";
}

function show_box2($box, $text, $width = "", $button = TRUE)
{
    // Gibt Tabelle mit Kopf, Optional Schließ-Button und Inhalt aus 
    
    global $farbe_text;
    global $farbe_link;
    global $farbe_vlink;
    global $farbe_background;
    global $farbe_tabelle_kopf;
    global $farbe_tabelle_koerper;
    global $f1;
    global $f2;
    
    if ($width) {
        $width = "WIDTH=\"" . $width . "\"";
    }
    $extra = "";
    if ($button) {
        $extra = "<A HREF=\"javascript:window.close();\">"
            . "<IMG SRC=\"pics/button-x.gif\" ALT=\"schließen\" "
            . "WIDTH=15 HEIGHT=13 ALIGN=\"RIGHT\" BORDER=0></A>\n";
    }
    
    echo "<TABLE CELLPADDING=2 CELLSPACING=0 BORDER=0 $width BGCOLOR=$farbe_tabelle_kopf>\n"
        . "<TR><TD>" . $extra
        . "<FONT SIZE=-1 COLOR=$farbe_text><B>$box</B></FONT>\n"
        . "<IMG SRC=\"pics/fuell.gif\" ALT=\"\" WIDTH=4 HEIGHT=4><BR>\n"
        . "<TABLE CELLPADDING=5 CELLSPACING=0 BORDER=0 $width BGCOLOR=\"$farbe_tabelle_koerper\">\n"
        . "<TR><TD>" . $f1 . $text . $f2
        . "</TD></TR></TABLE></TD></TR></TABLE>\n";
    
}

function coreCheckName($name, $check_name)
{
    global $upper_name;
    // Nicht-druckbare Zeichen, Leerzeichen, " und ' entfernen
    $name = preg_replace("/[ '" . chr(34) . chr(1) . "-" . chr(31) . "]/",
        "", $name);
    $name = str_replace("#", "", $name);
    $name = str_replace("+", "", $name);
    $name = trim($name);
    
    if ((strlen($check_name) > 0) && (strlen($name) > 0)) {
        $i = 0;
        while ($i < strlen($name)) {
            if (!strstr($check_name, substr($name, $i, 1))) {
                if ($i > 0 && $i < strlen($name) - 1) {
                    $name = substr($name, 0, $i) . substr($name, $i + 1);
                } elseif ($i > 0) {
                    $name = substr($name, 0, -1);
                } else {
                    $name = substr($name, $i + 1);
                }
            } else {
                $i++;
            }
        }
        
        if (!strstr($check_name, substr($name, 0, 1))) {
            return (substr($name, 1));
        }
    }
    
    if ($upper_name) {
        $name = UCFirst($name);
    }
    
    return $name;
}

// Werbung vom ReadMedia Adserver holen und ausliefern
// $rubrik ist der Werbeplatz im Adserver
// $links/$rechts sind die beiden Bereiche im Werbeplatz
// $before/$after ist Text, der vor/nach der Werbung ausgegeben wird
// $before/$after wird unterdrückt, falls keine Werbung ausgegeben wird.
function p_oas_werb($rubrik, $links, $rechts, $before, $after)
{
    global $ivw_adurl;
    
    // Werbung Ausgeben
    $bereich = "$links,$rechts";
    
    if (substr($rubrik, 0, 1) != "/") {
        $rubrik = "/$rubrik";
    }
    
    $ivw_adurl1 = "$ivw_adurl$rubrik/" . time() . "@$bereich!$links";
    $arr = file($ivw_adurl1);
    $out = join($arr, '');
    
    if (!strpos($out, "empty.gif") && !strpos($out, "_RM_EMPTY_") && $out) {
        $ivw_adurl2 = "$ivw_adurl$rubrik/" . time() . "@$bereich!$rechts";
        echo "$before$out";
        if ($rechts) {
            @readfile($ivw_adurl2);
        }
        echo "$after\n";
    }
}

function raum_ist_moderiert($raum)
{
    // Liefert Status des Raums zurück: Moderiert ja/nein
    // Liefert zusätzlich in $raum_einstellungen alle Einstellungen des Raums zurück
    // Liefert in ist_moderiert zurück: Moderiert ja/nein
    
    // Liefert in ist_eingang zurück: Stiller Eingangsraum ja/nein
    global $dbase, $conn, $u_id, $system_farbe, $moderationsmodul, $raum_einstellungen, $ist_moderiert, $ist_eingang;
    $moderiert = 0;
    $raum = intval($raum);
    
    $query = "SELECT * FROM raum WHERE r_id=$raum";
    $result = mysql_query($query, $conn);
    if ($result && mysql_num_rows($result) > 0) {
        $raum_einstellungen = mysql_fetch_array($result);
        $r_status1 = $raum_einstellungen['r_status1'];
    }
    @mysql_free_result($result);
    if (isset($r_status1) && ($r_status1 == "m" || $r_status1 == "M")) {
        $query = "SELECT o_user FROM online "
            . "WHERE o_raum=$raum AND o_level='M' ";
        $result = mysql_query($query, $conn);
        if (mysql_num_rows($result) > 0)
            $moderiert = 1;
        mysql_free_result($result);
    }
    $ist_moderiert = $moderiert;
    $ist_eingang = $r_status1 == "E";
    return $moderiert;
}

function debug($text = "", $rundung = 3)
{
    
    static $zeit;
    static $durchlauf;
    
    if (!$text || !$zeit) {
        list($usec, $sec) = explode(" ", microtime());
        $zeit = (float) $usec + (float) $sec;
        $durchlauf = 0;
        $erg = "";
    } else {
        list($usec, $sec) = explode(" ", microtime());
        $zeit_neu = (float) $usec + (float) $sec;
        $durchlauf++;
        $laufzeit = $zeit_neu - $zeit;
        $zeit = $zeit_neu;
        $erg = $text . "_" . $durchlauf . ": " . round($laufzeit, $rundung)
            . "s";
        if ($durchlauf > 1)
            $erg = ", " . $erg;
    }
    return ($erg);
}

function warnung($u_id, $u_nick, $art)
{
    // Gibt eine Warnung im Chat an den User $u_id/$u_nick aus
    global $t, $system_farbe, $warnmeldung_sicherermodus_deaktivieren;
    
    $user = "";
    if ($u_nick)
        $user = ", " . $u_nick;
    
    switch ($art) {
        case "sicherer_modus":
            if (!$warnmeldung_sicherermodus_deaktivieren == "1") {
                $text = str_replace("%user%", $user,
                    str_replace("%text%", $t['warnung2'], $t['warnung1']));
            }
            break;
        case "ohne_js":
            $text = str_replace("%user%", $user,
                str_replace("%text%", $t['warnung3'], $t['warnung1']));
            break;
        default:
            $text = str_replace("%user%", $user, $t['warnung1']);
    }
    
    if ($u_id)
        system_msg("", 0, $u_id, $system_farbe, $text);
}

function user(
    $zeige_user_id,
    $userdaten = 0,
    $link = TRUE,
    $online = FALSE,
    $trenner = "&nbsp;",
    $online_zeit = "",
    $letzter_login = "",
    $mit_id = TRUE,
    $extra_kompakt = FALSE,
    $felder = 31)
{
    // Liefert Usernamen + Level + Gruppe + E-Mail + Homepage zurück
    // Bei link=TRUE wird Link auf Userinfo ausgegeben
    // Bei online=TRUE wird der Status online/offline und opt die Onlinezeit oder der letzte Login ausgegeben
    // Falls trenner gesetzt, wird Mail/Home Symbol ausgegeben und trenner vor Mail/Home Symbol eingefügt
    // $online_zeit -> Zeit in Sekunden seit Login
    // $letzter_login -> Datum des letzten Logins
    // Falls mit_id=TRUE wird Session-ID ausgegeben, ansonsten Platzhalter
    // Falls extra_kompakt=TRUE wird nur Nick ausgegeben
    // $felder ist bitweise kodiert welche felder ausgegeben werden sollen
    // Aufschlüsselung wie folgt:
    // 1 = Usernamen zeigen
    // 2 = Level zeigen
    // 4 = Gruppe zeigen
    // 8 = EMail zeigen
    // 16 = Homepage zeigen
    
    global $id, $system_farbe, $dbase, $conn, $communityfeatures, $t, $http_host, $show_geschlecht;
    global $f1, $f2, $f3, $f4, $leveltext, $punkte_grafik, $chat_grafik, $o_js, $homep_ext_link;
    
    $text = "";
    if ($mit_id) {
        $idtag = $id;
        $http_hosttag = $http_host;
    } else {
        $idtag = "<ID>";
        $http_hosttag = "<HTTP_HOST>";
    }
    
    if (is_array($userdaten)) {
        
        // Array wurde übergeben
        
        if (!isset($userdaten['u_chathomepage']))
            $userdaten['u_chathomepage'] = 'N';
        if (!isset($userdaten['u_punkte_anzeigen']))
            $userdaten['u_punkte_anzeigen'] = 'N';
        
        $user_id = $userdaten['u_id'];
        $user_nick = $userdaten['u_nick'];
        $user_level = $userdaten['u_level'];
        $user_punkte_gesamt = $userdaten['u_punkte_gesamt'];
        $user_punkte_gruppe = hexdec($userdaten['u_punkte_gruppe']);
        $user_chathomepage = htmlspecialchars($userdaten['u_chathomepage']);
        
        if ($show_geschlecht == true)
            $user_geschlecht = hole_geschlecht($zeige_user_id);
        
        $user_punkte_anzeigen = $userdaten['u_punkte_anzeigen'];
        
    } elseif (is_object($userdaten)) {
        // Object wurde übergeben
        $user_id = $userdaten->u_id;
        $user_nick = $userdaten->u_nick;
        $user_level = $userdaten->u_level;
        $user_punkte_gesamt = $userdaten->u_punkte_gesamt;
        $user_punkte_gruppe = hexdec($userdaten->u_punkte_gruppe);
        if (isset($userdaten->u_chathomepage)) {
            $user_chathomepage = htmlspecialchars($userdaten->u_chathomepage);
        } else {
            $user_chathomepage = "";
        }
        
        if ($show_geschlecht == true)
            $user_geschlecht = hole_geschlecht($zeige_user_id);
        
        if (isset($userdaten->u_punkte_anzeigen)) {
            $user_punkte_anzeigen = $userdaten->u_punkte_anzeigen;
        } else {
            $user_punkte_anzeigen = "";
        }
        
    } elseif ($zeige_user_id) {
        
        // Userdaten aus DB lesen
        $query = "SELECT u_id,u_nick,u_level,u_punkte_gesamt,u_punkte_gruppe,u_chathomepage,u_punkte_anzeigen, "
            . "UNIX_TIMESTAMP(NOW())-UNIX_TIMESTAMP(o_login) AS online, "
            . "date_format(u_login,'%d.%m.%y %H:%i') as login "
            . "FROM user left join online on o_user=u_id "
            . "where u_id=" . intval($zeige_user_id);
        $result = mysql_query($query, $conn);
        if ($result && mysql_Num_Rows($result) == 1) {
            $userdaten = mysql_fetch_object($result);
            $user_id = $userdaten->u_id;
            $user_nick = $userdaten->u_nick;
            $user_level = $userdaten->u_level;
            $user_punkte_gesamt = $userdaten->u_punkte_gesamt;
            $user_punkte_gruppe = hexdec($userdaten->u_punkte_gruppe);
            $user_chathomepage = htmlspecialchars($userdaten->u_chathomepage);
            $user_punkte_anzeigen = $userdaten->u_punkte_anzeigen;
            
            $online_zeit = $userdaten->online;
            $letzter_login = $userdaten->login;
            
        }
        @mysql_free_result($result);
        
        if ($show_geschlecht == true)
            $user_geschlecht = hole_geschlecht($zeige_user_id);
        
    } else {
        echo "<P><B>Fehler:</B> Falscher Aufruf von user() für User ";
        if (isset($zeige_user_id))
            echo $zeige_user_id;
        if (isset($userdaten['u_id']))
            echo $userdaten['u_id'];
        if (isset($userdaten->u_id))
            echo $userdaten->u_id;
        echo "</P>";
        
        return "";
    }
    
    // Wenn die $user_punkte_anzeigen nicht im Array war, dann seperat abfragen
    if (!isset($user_punkte_anzeigen)
        || ($user_punkte_anzeigen != "Y" and $user_punkte_anzeigen != "N")) {
        $query = "SELECT u_punkte_anzeigen FROM user where u_id=" . intval($user_id);
        $result = mysql_query($query, $conn);
        if ($result && mysql_Num_Rows($result) == 1) {
            $userdaten = mysql_fetch_object($result);
            $user_punkte_anzeigen = $userdaten->u_punkte_anzeigen;
        }
        @mysql_free_result($result);
    }
    
    if ($user_id != $zeige_user_id) {
        echo "<P><B>Fehler: </B> $user_id!=$zeige_user_id</P>\n";
        return "";
    }
    
    // Fensternamen aus Nicknamen erzeugen
    $fenstername = str_replace("-", "", $user_nick);
    $fenstername = str_replace("+", "", $fenstername);
    $fenstername = str_replace("ä", "", $fenstername);
    $fenstername = str_replace("ö", "", $fenstername);
    $fenstername = str_replace("ü", "", $fenstername);
    $fenstername = str_replace("Ä", "", $fenstername);
    $fenstername = str_replace("Ö", "", $fenstername);
    $fenstername = str_replace("Ü", "", $fenstername);
    $fenstername = str_replace("ß", "", $fenstername);
    
    if (($felder & 1) != 1) {
        $user_nick_sik = $user_nick;
        $user_nick = "";
    }
    
    if ($link) {
        $url = "user.php?http_host=$http_hosttag&id=$idtag&aktion=zeig&user=$user_id";
        $text = "<A HREF=\"#\"  TARGET=\"$fenstername\" onclick=\"neuesFenster('$url','$fenstername'); return(false);\">"
            . $user_nick . "</A>";
    } else {
        $text = $user_nick;
    }
    
    if ($show_geschlecht AND $user_geschlecht)
        $text .= $chat_grafik[$user_geschlecht];
    
    if (($felder && 1) != 1) {
        $user_nick = $user_nick_sik;
    }
    
    // Levels, Gruppen, Home & Mail Grafiken
    $text2 = "";
    if (!isset($leveltext[$user_level]))
        $leveltext[$user_level] = "";
    if (!$extra_kompakt && $leveltext[$user_level] != ""
        && (($felder & 2) == 2))
        $text2 .= "&nbsp;(" . $leveltext[$user_level] . ")";
    
    if (!$extra_kompakt && $link) {
        $url = "hilfe.php?http_host=$http_hosttag&aktion=legende&id=$idtag";
        $grafikurl1 = "<A HREF=\"#\" TARGET=\"640_$fenstername\" onClick=\"neuesFenster2('$url'); return(false)\">";
        $grafikurl2 = "</A>";
    } else {
        $grafikurl1 = "";
        $grafikurl2 = "";
    }
    
    if (!$extra_kompakt && $user_punkte_gruppe != 0 && $communityfeatures
        && $user_punkte_anzeigen == "Y" && (($felder & 4) == 4)) {
        
        $url = "hilfe.php?http_host=$http_hosttag&aktion=legende&id=$idtag";
        if ($user_level == "C" || $user_level == "S") {
            $text2 .= "&nbsp;" . $grafikurl1 . $punkte_grafik[0]
                . $user_punkte_gruppe . $punkte_grafik[1] . $grafikurl2;
        } else {
            $text2 .= "&nbsp;" . $grafikurl1 . $punkte_grafik[2]
                . $user_punkte_gruppe . $punkte_grafik[3] . $grafikurl2;
        }
    }
    
    if (!$extra_kompakt && ($user_chathomepage == "J" OR $homep_ext_link != "")
        && $communityfeatures && $link && (($felder & 16) == 16)) {
        if ($homep_ext_link != "" AND $user_level != "G") {
            $url = $homep_ext_link . $user_nick;
            $text2 .= "&nbsp;"
                . "<A HREF=\"#\" TARGET=\"640_$fenstername\" onClick=\"neuesFenster2('$url'); return(false)\">$chat_grafik[home]</A>";
        } elseif ($user_chathomepage == "J") {
            $url = "home.php?http_host=$http_hosttag&ui_userid=$user_id&id=$idtag";
            $text2 .= "&nbsp;"
                . "<A HREF=\"#\" TARGET=\"640_$fenstername\" onClick=\"neuesFenster2('$url'); return(false)\">$chat_grafik[home]</A>";
        }
    }
    
    if (!$extra_kompakt && $link && $trenner != "" && $communityfeatures
        && (($felder & 8) == 8)) {
        $url = "mail.php?http_host=$http_hosttag&aktion=neu2&neue_email[an_nick]="
            . URLENCODE($user_nick) . "&id=" . $idtag;
        $text2 .= $trenner
            . "<A HREF=\"#\" TARGET=\"640_$fenstername\" onMouseOver=\"return(true)\" onClick=\"neuesFenster2('$url'); return(false)\">"
            . $chat_grafik['mail'] . "</A>";
    } elseif (!$extra_kompakt && $link && $trenner != "") {
        $text2 .= $trenner;
    }
    
    // Onlinezeit oder Datum des letzten Logins einfügen, falls Online Text fett ausgeben
    if ($online_zeit && $online_zeit != "NULL" && $online) {
        $text2 .= $trenner
            . str_replace("%online%", gmdate("H:i:s", $online_zeit),
                $t['chat_msg92']);
        $fett1 = "<B>";
        $fett2 = "</B>";
    } elseif ($letzter_login && $letzter_login != "NULL" && $online) {
        $text2 .= $trenner
            . str_replace("%login%", $letzter_login, $t['chat_msg94']);
        $fett1 = "";
        $fett2 = "";
    } elseif ($online) {
        $text2 .= $trenner . $t['chat_msg93'];
        $fett1 = "";
        $fett2 = "";
    } else {
        $fett1 = "";
        $fett2 = "";
    }
    
    if ($text2 != "")
        $text .= $f1 . $text2 . $f2;
    return ($fett1 . $text . $fett2);
}

function chat_parse($text)
{
    // Filtert Text und ersetzt folgende Zeichen:
    // http://###### oder www.###### in <A HREF="http://###" TARGET=_new>http://###</A>
    // E-Mail Adressen in A-Tag mit Mailto
    
    global $admin, $sprachconfig, $u_id, $u_level;
    global $t, $system_farbe, $erweitertefeatures;
    
    $trans = get_html_translation_table(HTML_ENTITIES);
    $trans = array_flip($trans);
    
    // doppelte/ungültige Zeichen merken und wegspeichern...
    $text = str_replace("__", "###substr###", $text);
    $text = str_replace("**", "###stern###", $text);
    $text = str_replace("@@", "###klaffe###", $text);
    $text = str_replace("[", "###auf###", $text);
    $text = str_replace("]", "###zu###", $text);
    $text = str_replace("|", "###strich###", $text);
    $text = str_replace("!", "###ausruf###", $text);
    $text = str_replace("+", "###plus###", $text);
    $text = str_replace("<br />", "<br>", $text);
    
    // jetzt nach nach italic und bold parsen...  * in <I>, $_ in <B>
    $text = preg_replace('|\*(.*?)\*|', '<i>\1</i>',
        preg_replace('|_(.*?)_|', '<b>\1</b>', $text));
    
    // erst mal testen ob www oder http oder email vorkommen
    if (preg_match("/(http:|www\.|@)/i", $text)) {
        // Zerlegen der Zeile in einzelne Bruchstücke. Trennzeichen siehe $split
        // leider müssen zunächst erstmal in $text die gefundenen urls durch dummies 
        // ersetzt werden, damit bei der Angabge von 2 gleichen urls nicht eine bereits 
        // ersetzte url nochmal ersetzt wird -> gibt sonst Müll bei der Ausgabe.
        
        // wird evtl. später nochmal gebraucht...
        $split = '/[ \r\n\t,\)\(]/';
        $txt = preg_split($split, $text);
        
        // wieviele Worte hat die Zeile?
        for ($i = 500; $i >= 0; $i--) {
            if (isset($txt[$i]) && $txt[$i] != "")
                break;
        }
        $text2 = $text;
        // Schleife über alle Worte...
        for ($j = 0; $j <= $i; $j++) {
            // test, ob am Ende der URL noch ein Sonderzeichen steht...
            $txt[$j] = preg_replace("!\?$!", "", $txt[$j]);
            $txt[$j] = preg_replace("!\.$!", "", $txt[$j]);
        }
        for ($j = 0; $j <= $i; $j++) {
            
            // E-Mail Adressen in A-Tag mit Mailto
            // E-Mail-Adresse -> Format = *@*.*
            if (preg_match("/^.+@.+\..+/i", $txt[$j])
                && !preg_match("/^href=\"mailto:.+@.+\..+/i", $txt[$j])) {
                // Wort=Mailadresse? -> im text durch dummie ersetzen, im wort durch href.
                $text = preg_replace("!$txt[$j]!", "####$j####", $text);
                $rep = "<a href=\"mailto:" . str_replace("<br>", "", $txt[$j])
                    . "\">" . $txt[$j] . "</a>";
                $txt[$j] = str_replace($txt[$j], $rep, $txt[$j]);
            }
            
            // www.###### in <A HREF="http://###" TARGET=_new>http://###</A>
            if (preg_match("/^www\..*\..*/i", $txt[$j])) {
                // sonderfall -> "?" in der URL -> dann "?" als Sonderzeichen behandeln...
                $txt2 = preg_replace("!\?!", "\\?", $txt[$j]);
                
                // Doppelcheck, kann ja auch mit http:// in gleicher Zeile nochmal vorkommen. also erst die 
                // http:// mitrausnehmen, damit dann in der Ausgabe nicht http://http:// steht...
                $text = preg_replace("!http://$txt2!", "-###$j####", $text);
                
                // Wort=URL mit www am Anfang? -> im text durch dummie ersetzen, im wort durch href.
                $text = preg_replace("!$txt2!", "####$j####", $text);
                
                // und den ersten Fall wieder Rückwärts, der wird ja später in der schleife nochmal behandelt.
                $text = preg_replace("!-###\d*####/!", "http://$txt2/", $text);
                
                // Ersetzte Zeichen für die URL wieder zurückwandeln
                $txt3 = str_replace("###plus###", "+", $txt2);
                $txt3 = str_replace("###strich###", "|", $txt3);
                $txt3 = str_replace("###auf###", "[", $txt3);
                $txt3 = str_replace("###zu###", "]", $txt3);
                $txt3 = str_replace("###substr###", "_", $txt3);
                $txt3 = str_replace("###stern###", "*", $txt3);
                $txt3 = str_replace("###klaffe###", "@", $txt3);
                
                // url aufbereiten
                $txt[$j] = str_replace($txt2,
                    "<a href=\"redirect.php?url="
                        . urlencode(
                            "http://"
                                . strtr(preg_replace("!\\\\\\?!", "?", $txt3),
                                    $trans)) . "\" target=\"_blank\">http://"
                        . preg_replace("!\\\\\\?!", "?", $txt2) . "</a>",
                    $txt[$j]);
                
                $txt[$j] = str_replace("###ausruf###", "!", $txt[$j]);
                $txt[$j] = str_replace("%23%23%23ausruf%23%23%23", "!",
                    $txt[$j]);
                
            }
            // http://###### in <A HREF="http://###" TARGET=_new>http://###</A>
            if (preg_match("!^https?://!", $txt[$j])) {
                // Wort=URL mit http:// am Anfang? -> im text durch dummie ersetzen, im wort durch href.
                // Zusatzproblematik.... könnte ein http-get-URL sein, mit "?" am Ende oder zwischendrin... urgs.
                
                // sonderfall -> "?" in der URL -> dann "?" als Sonderzeichen behandeln...
                $txt2 = preg_replace("!\?!", "\\?", $txt[$j]);
                $text = preg_replace("!$txt2!", "####$j####", $text);
                
                // und wieder Rückwärts, falls zuviel ersetzt wurde...
                $text = preg_replace("!####\d*####/!", "$txt[$j]/", $text);
                
                // Ersetzte Zeichen für die URL wieder zurückwandeln
                $txt3 = str_replace("###plus###", "+", $txt2);
                $txt3 = str_replace("###strich###", "|", $txt3);
                $txt3 = str_replace("###auf###", "[", $txt3);
                $txt3 = str_replace("###zu###", "]", $txt3);
                $txt3 = str_replace("###substr###", "_", $txt3);
                $txt3 = str_replace("###stern###", "*", $txt3);
                $txt3 = str_replace("###klaffe###", "@", $txt3);
                
                // url aufbereiten, \? in ? wandeln
                $txt[$j] = preg_replace("!$txt2!",
                    "<a href=\"redirect.php?url="
                        . urlencode(
                            strtr(preg_replace("!\\\\\\?!", "?", $txt3), $trans))
                        . "\" target=\"_blank\">"
                        . preg_replace("!\\\\\\?!", "?", $txt2) . "</a>",
                    $txt[$j]);
                // echo "\n<BR>####<BR>\n".$txt2."<BR>\n".urlencode(strtr($txt2,$trans))."<BR>\n".urldecode(urlencode(strtr($txt2,$trans)))."<BR>\n\n";
                
                $txt[$j] = str_replace("###ausruf###", "!", $txt[$j]);
                $txt[$j] = str_replace("%23%23%23ausruf%23%23%23", "!",
                    $txt[$j]);
                
            }
        }
        
        // nun noch die Dummy-Strings durch die urls ersetzen...
        for ($j = 0; $j <= $i; $j++) {
            // erst mal "_" in den dummy-strings vormerken...
            // es soll auch urls mit "_" geben ;-)
            $txt[$j] = str_replace("_", "###substr###", $txt[$j]);
            $text = preg_replace("![-#]###$j####!", $txt[$j], $text);
        }
    } // ende http, mailto, etc.
    
    // gemerkte Zeichen zurückwandeln.
    $text = str_replace("###plus###", "+", $text);
    $text = str_replace("###strich###", "|", $text);
    $text = str_replace("###auf###", "[", $text);
    $text = str_replace("###zu###", "]", $text);
    $text = str_replace("###substr###", "_", $text);
    $text = str_replace("###stern###", "*", $text);
    $text = str_replace("###klaffe###", "@", $text);
    $text = str_replace("###ausruf###", "!", $text);
    
    return $text;
}

function ist_netscape()
{
    // Browser auf Netscape 4.7x prüfen
    global $HTTP_SERVER_VARS;
    
    if (preg_match('#mozilla/4\.7#i', $_SERVER["HTTP_USER_AGENT"])) {
        return (true);
    } else {
        return (false);
    }
    
}

function gensalt($length)
{
    return genpassword($length);
}

function genpassword($length)
{
    // Generiert ein Passwort
    // wird auch für gensalt() genutzt
    $vowels = array("a", "e", "i", "o", "u");
    $cons = array("b", "c", "d", "g", "h", "j", "k", "l", "m", "n", "p", "r",
        "s", "t", "u", "v", "w", "tr", "cr", "br", "fr", "th", "dr", "ch",
        "ph", "wr", "st", "sp", "sw", "pr", "sl", "cl");
    $num_vowels = count($vowels);
    $num_cons = count($cons);
    
    $password = "";
    for ($i = 0; $i < $length; $i++) {
        $password .= $cons[mt_rand(0, $num_cons - 1)]
            . $vowels[mt_rand(0, $num_vowels - 1)];
    }
    
    return substr($password, 0, $length);
}

function logout_debug($o_id, $info)
{
    // optionales Debugging, um herauszufinden, warum User aus dem Chat fliegen
    global $chat, $dbase, $conn, $mysqlhost, $mysqluser, $mysqlpass;
    global $STAT_DB_HOST, $STAT_DB_USER, $STAT_DB_PASS, $STAT_DB_NAME;
    
    $logout = array(lo_chat => $chat, lo_aktion => "logout $info",);
    if ($info == "login")
        $logout[lo_aktion] = "login";
    
    $o_id = intval($o_id);
    $result = mysql_query("select * FROM online WHERE o_id=$o_id", $conn);
    if ($result && mysql_num_rows($result) == 1) {
        $row = mysql_fetch_array($result);
        $logout['lo_nick'] = $row['o_name'];
        $logout['lo_timeout_zeit'] = $row['o_timeout_zeit'];
        $logout['lo_timeout_warnung'] = $row['o_timeout_warnung'];
        $logout['lo_ip'] = $row['o_ip'];
        $logout['lo_browser'] = $row['o_browser'];
        $logout['lo_onlinedump'] = serialize($row);
        @mysql_free_result($result);
    }
    $result = mysql_query(
        "select u_login FROM user WHERE u_nick='$logout[lo_nick]'", $conn);
    if ($result && mysql_num_rows($result) == 1) {
        $row = mysql_fetch_array($result);
        $logout[lo_login] = $row[u_login];
        @mysql_free_result($result);
    }
    
    $query = "INSERT INTO logouts SET ";
    foreach ($logout as $key => $val)
        $query .= mysql_real_escape_string($key) . "='" . mysql_real_escape_string($val) . "', ";
    $query = substr($query, 0, -2);
    $conn2 = mysql_connect($STAT_DB_HOST, $STAT_DB_USER, $STAT_DB_PASS);
    mysql_set_charset("utf8mb4");
    mysql_select_db($STAT_DB_NAME, $conn2);
    if ($conn2)
        mysql_query($query, $conn2);
    
    $conn = mysql_connect($mysqlhost, $mysqluser, $mysqlpass);
    mysql_set_charset("utf8mb4");
    mysql_select_db($dbase, $conn);
}

function hole_geschlecht($userid)
{
    global $dbase, $conn;
    
    $query = "SELECT ui_geschlecht FROM userinfo WHERE ui_userid=" . intval($userid);
    $result = mysql_query($query, $conn);
    if ($result AND mysql_Num_Rows($result) == 1) {
        $userinfo = mysql_fetch_object($result);
        $user_geschlecht = $userinfo->ui_geschlecht;
    }
    @mysql_free_result($result);
    
    if ($user_geschlecht == "männlich")
        $user_geschlecht = "geschlecht_maennlich";
    elseif ($user_geschlecht == "weiblich")
        $user_geschlecht = "geschlecht_weiblich";
    else
        $user_geschlecht = "";
    
    return $user_geschlecht;
}

?>