$Error = L_ERR_USR_16;
} elseif (mb_convert_case($U, MB_CASE_LOWER, $Charset) == mb_convert_case(trim($Cmd[2]), MB_CASE_LOWER, $Charset)) {
$Error = L_ERR_USR_27;
} elseif (mb_convert_case(trim($Cmd[2]), MB_CASE_LOWER, $Charset) == mb_convert_case(C_QUOTE_NAME, MB_CASE_LOWER, $Charset)) {
$Error = L_ERR_USR_1;
} elseif (trim($Cmd[2]) != "" && trim($Cmd[3]) != "") {
$Cmd[3] = "L_PRIV_WISP " . $Cmd[3];
if (C_PRIV_POPUP && !isset($allowpopupu)) {
$DbLink = new DB();
$DbLink->query("SELECT allowpopup FROM " . C_REG_TBL . " WHERE username = '******'2']}'");
if ($DbLink->num_rows() != 0) {
list($allowpopupu) = $DbLink->next_record();
} else {
$allowpopupu = 0;
}
$DbLink->clean_results();
}
if (C_PRIV_POPUP) {
if ($allowpopupu || stristr(mb_convert_case(trim($Cmd[2]), MB_CASE_LOWER, $Charset), mb_convert_case(C_BOT_NAME, MB_CASE_LOWER, $Charset))) {
$Read = "Neww";
} else {
$Read = "Oldw";
}
} else {
$Read = "Oldw";
}
$DbLink->query("SELECT room FROM " . C_USR_TBL . " WHERE username='******'2']}'");
list($UR) = $DbLink->next_record();
if ($UR != "") {
// Check for swear words in the message if necessary
if (C_NO_SWEAR && $UR != C_NO_SWEAR_ROOM1 && $UR != C_NO_SWEAR_ROOM2 && $UR != C_NO_SWEAR_ROOM3 && $UR != C_NO_SWEAR_ROOM4) {
list($PWD_Hash, $perms) = $DbLink4Login->next_record();
if ($PWD_Hash == md5(stripslashes($pmc_password)) || $PWD_Hash == $pmc_password) {
// Ensure the one who lauch the admin.php script is really admin
if (isset($MUST_BE_ADMIN) && $perms != "admin") {
$Error = L_ERR_USR_11;
} else {
$do_not_login = true;
$_SESSION["adminlogged"] = true;
}
}
} else {
if (isset($perms)) {
unset($perms);
}
}
$DbLink4Login->clean_results();
$DbLink4Login->close();
}
// If no login yet entered
if (!isset($do_not_login) || !$do_not_login) {
// Special cache instructions for IE5+
$CachePlus = "";
#if (ereg("MSIE [56789]", (isset($HTTP_USER_AGENT)) ? $HTTP_USER_AGENT : getenv("HTTP_USER_AGENT"))) $CachePlus = ", pre-check=0, post-check=0, max-age=0";
if (stripos(isset($HTTP_USER_AGENT) ? $HTTP_USER_AGENT : getenv("HTTP_USER_AGENT"), "MSIE") !== false) {
$CachePlus = ", pre-check=0, post-check=0, max-age=0";
}
$now = gmdate('D, d M Y H:i:s') . ' GMT';
header("Expires: {$now}");
header("Last-Modified: {$now}");
header("Cache-Control: no-cache, must-revalidate" . $CachePlus);
header("Pragma: no-cache");
$COUNTRY_NAME = "Other/LAN";
}
if ($COUNTRY_CODE != "LAN") {
$COUNTRY_NAME = $gi->GEOIP_COUNTRY_NAMES[$gi->GEOIP_COUNTRY_CODE_TO_NUMBER[$COUNTRY_CODE]];
}
if ($PROXY || substr($IP, 0, 1) == "p") {
$COUNTRY_NAME .= " (Proxy Server)";
}
$DbLinkban->query("UPDATE " . C_BAN_TBL . " SET country_code='{$COUNTRY_CODE}', country_name='{$COUNTRY_NAME}' WHERE username='******'");
$DbLinkban->query("UPDATE " . C_REG_TBL . " SET country_code='{$COUNTRY_CODE}', country_name='{$COUNTRY_NAME}' WHERE username='******'");
}
$c_flag = " <img src=\"./plugins/countryflags/flags/" . strtolower($COUNTRY_CODE) . ".gif\" alt=\"" . $COUNTRY_NAME . "\" title=\"" . $COUNTRY_NAME . "\" border=\"0\"> (" . $COUNTRY_CODE . ")";
}
$DbLinkban->query("SELECT username,reason FROM " . C_BAN_TBL . " WHERE username='******' LIMIT 1");
list($Nb, $reason) = $DbLinkban->next_record();
$DbLinkban->clean_results();
if ($reason != "") {
$reason = " (" . L_HELP_REASON . ": " . $reason . ")";
}
if ($Nb) {
$bannished_user = "******" . A_MENU_21 . $reason . "' title='" . A_MENU_21 . $reason . "'>";
}
$DbLinkban->query("SELECT ip,reason FROM " . C_BAN_TBL . " WHERE ip='{$IP}' LIMIT 1");
list($NbIP, $reasonIP) = $DbLinkban->next_record();
$DbLinkban->clean_results();
if ($reasonIP != "") {
$reasonIP = " (" . L_HELP_REASON . ": " . $reasonIP . ")";
}
if ($NbIP) {
$bannished_ip = " <img src=images/bannished.gif alt='" . A_MENU_21 . $reasonIP . "' title='" . A_MENU_21 . $reasonIP . "'>";
}
if (C_POPUP_LINKS || stripos($Message, 'target="_blank"></a>') !== false) {
$Message = str_replace('target="_blank"></a>', 'title="' . sprintf(L_CLICKS, L_LINKS_15, L_LINKS_1) . '" onMouseOver="window.status=\'' . sprintf(L_CLICKS, L_LINKS_15, L_LINKS_1) . '.\'; return true" target="_blank">' . sprintf(L_CLICKS, L_LINKS_15, L_LINKS_1) . '</a>', $Message);
} else {
$Message = str_replace('target="_blank">', 'title="' . sprintf(L_CLICK, L_LINKS_3) . '" onMouseOver="window.status=\'' . sprintf(L_CLICK, L_LINKS_3) . '.\'; return true" target="_blank">', $Message);
}
$Message = str_replace('alt="Send email">', 'title="' . sprintf(L_CLICK, L_EMAIL_1) . '" onMouseOver="window.status=\'' . sprintf(L_CLICK, L_EMAIL_1) . '.\'; return true">', $Message);
if (COLOR_NAMES) {
$colorname_tag = "";
$colorname_endtag = "";
$colornamedest_tag = "";
$colornamedest_endtag = "";
$DbColor = new DB();
if (isset($User)) {
$DbColor->query("SELECT perms,colorname FROM " . C_REG_TBL . " WHERE username = '******'");
list($perms_user, $colorname) = $DbColor->next_record();
$DbColor->clean_results();
}
if (isset($Dest)) {
$DbColor->query("SELECT perms,colorname FROM " . C_REG_TBL . " WHERE username = '******'");
list($perms_dest, $colornamedest) = $DbColor->next_record();
$DbColor->clean_results();
}
if (isset($colorname) && $colorname != "") {
$colorname_tag = "<FONT color=" . $colorname . ">";
unset($colorname);
} elseif (C_ITALICIZE_POWERS) {
if ($perms_user == "admin" && $User != C_BOT_NAME || $perms_user == "topmod") {
$colorname_tag = "<FONT color=" . COLOR_CA . ">";
} elseif ($perms_user == "moderator") {
$colorname_tag = "<FONT color=" . COLOR_CM . ">";
} else {
echo "<a onClick=\"window.parent.userClick2('" . special_char2($OtherUsera, $Latin1) . "',true);\" " . userClass($status, $OtherUsera) . " title='" . L_WHSP . "' onMouseOver=\"window.status='" . L_SEND_WHSP . "'; return true\"><span style=color:" . userColor($status, $colorname) . ";>" . special_char($OtherUser, $Latin1, $status) . "</span></a><br />\n";
} else {
echo "<a onClick=\"window.parent.userClick2('" . special_char2($OtherUsera, $Latin1) . "',true);\" " . userClass($status, $OtherUsera) . " title='" . L_WHSP . "' onMouseOver=\"window.status='" . L_SEND_WHSP . "'; return true\">" . special_char($OtherUser, $Latin1, $status) . "</a><br />\n";
}
} else {
if (COLOR_NAMES) {
echo "<a onClick=\"window.parent.userClick2('" . special_char2($OtherUsera, $Latin1) . "',false);\" " . userClass($status, $OtherUsera) . " title='" . L_USE_NAME . " ({$OtherUser})' onMouseOver=\"window.status='" . L_USE_NAME . " ({$OtherUser})'; return true\"><span style=color:" . userColor($status, $colorname) . ";>" . special_char($OtherUser, $Latin1, $status) . "</span></a><br />\n";
} else {
echo "<a onClick=\"window.parent.userClick2('" . special_char2($OtherUsera, $Latin1) . "',false);\" " . userClass($status, $OtherUsera) . " title='" . L_USE_NAME . " ({$OtherUser})' onMouseOver=\"window.status='" . L_USE_NAME . " ({$OtherUser})'; return true\">" . special_char($OtherUser, $Latin1, $status) . "</a><br />\n";
}
}
}
echo "</DIV>\n";
}
}
$OthersUsers->clean_results();
}
$OthersUsers->close();
}
$DbLink->clean_results();
// Display all rest default rooms
for ($k = 0; $k < count($DefaultChatRooms); $k++) {
$tmpRoom = stripslashes($DefaultChatRooms[$k]);
$tmpDispRoom = $tmpRoom;
$tmpDispRes = "";
// Restricted rooms mod by Ciprian
if (is_array($DefaultDispChatRooms) && in_array($tmpRoom . " [R]", $DefaultDispChatRooms)) {
$tmpDispRoom .= " [" . $res_init . "]";
$tmpDispRes = " (" . L_RESTRICTED . ")";
}
// Display this room name when it hadn't been displayed yet
$room_time = strftime(L_SHORT_DATETIME, $room_time + C_TMZ_OFFSET * 60 * 60);
if (stristr(PHP_OS, 'win') && (strstr($L, "chinese") || strstr($L, "korean") || strstr($L, "japanese"))) {
$room_time = str_replace(" ", "", $room_time);
}
echo "- <a " . userClass($status, $Username) . ";>" . special_char($Username, $Latin1, $status) . "</a><BDO dir=\"{$textDirection}\"></BDO><font size=1> (" . $room_time . ")" . (isset($c_flag) ? $c_flag : "") . "</font><br />";
// GeoIP Country flags initialization
unset($IP);
unset($COUNTRY_CODE);
unset($COUNTRY_NAME);
unset($c_flag);
}
echo "</DIV>";
$ChildNb[$id] = $j;
}
}
$Users->clean_results();
}
// GeoIP mode for country flags
if (isset($gi) && $gi != "") {
geoip_close($gi);
}
if (isset($gi6) && $gi6 != "") {
geoip_close($gi6);
}
$Users->close();
}
}
if ($disp_note) {
echo "<P><table WIDTH=100%><tr valign=top><td colspan=4 align=left CLASS=small>[" . $res_init . "] = " . L_RESTRICTED . ".</td></tr></table>";
}
$DbLink->clean_results();
</td>
<td style="vertical-align:middle; text-align:center;" class=tabtitle nowrap="nowrap"><?php
echo $arrowa . " <a href=\"{$pstr}&mord=A&sortOrder=" . ($sortOrder == "DESC" ? "ASC" . ($cYr ? "&cYr=" . $cYr : "") . ($use_limT ? "&limT=" . $limT : "") . "\" title=\"" . sprintf(L_CLICK, L_LINKS_17) . "\" onMouseOver=\"sort_status('DESC'); return true;\"" : "DESC" . ($cYr ? "&cYr=" . $cYr : "") . ($use_limT ? "&limT=" . $limT : "") . "\" title=\"" . sprintf(L_CLICK, L_LINKS_18) . "\" onMouseOver=\"sort_status('ASC'); return true;\"") . "\">" . L_PRO_10 . "</a>";
?>
</td>
</tr>
<?php
$ava_height = 14;
$i = 1;
$users = array();
$DbLinkU = new DB();
$DbLinkU->query("SELECT username FROM " . C_REG_TBL . " WHERE email NOT LIKE '%@bot.com%' AND email NOT LIKE '%@quote.com%' AND username != '" . $pmc_username . "' ORDER BY username ASC");
while (list($usernames) = $DbLinkU->next_record()) {
$users[] = $usernames;
}
$DbLinkU->clean_results();
$DbLinkU->close();
// GeoIP mode for country flags
if (C_USE_FLAGS) {
if (!class_exists("GeoIP")) {
include "plugins/countryflags/geoip.inc";
}
if (!isset($gi)) {
$gi = geoip_open("plugins/countryflags/GeoIP.dat", GEOIP_STANDARD);
}
}
while (list($User, $dob_firstname, $dob_lastname, $gender, $avatar, $use_gravatar, $email, $dob_showemail, $dob_birthday, $dob_showbday, $dob_showage, $IP, $COUNTRY_CODE, $COUNTRY_NAME, $dob_age) = $DbLink->next_record()) {
if (!empty($dob_birthday) && $dob_birthday != "0000-00-00") {
if (C_USE_AVATARS) {
if (empty($avatar)) {
$avatar = C_AVA_RELPATH . C_DEF_AVATAR;
if (stristr(PHP_OS, 'win')) {
$s_birthday = utf_conv(WIN_DEFAULT, $Charset, $s_birthday);
if (strstr($L, "chinese") || strstr($L, "korean") || strstr($L, "japanese")) {
$s_birthday = str_replace(" ", "", $s_birthday);
}
}
}
$checkbox = $s_username == $pmc_username ? " " : "<INPUT type=checkbox name=\"selected_{$usrHash}\" value=\"1\">";
echo "<tr align=\"center\">\n\r\n\t\t<INPUT TYPE=\"hidden\" NAME=\"user_{$usrHash}\" VALUE=\"1\">\n\r\n\t\t<TD VALIGN=CENTER ALIGN=CENTER>\n{$checkbox}\n</td>\n\r\n\t\t<td width=100>{$s_username}{$bannished_user}</td>\n\r\n\t\t<td>" . (!(strstr($L, "chinese") || strstr($L, "korean") || strstr($L, "japanese")) ? "{$s_firstname}</td>\n<td>{$s_lastname}" : "{$s_lastname}</td>\n<td>{$s_firstname}") . "</td>\n\r\n\t\t<td>{$s_country}</td>\n\r\n\t\t<td nowrap=\"nowrap\"><a href=\"mailto:{$s_email}\" target=_blank>{$s_email}</a>" . ($s_showemail ? "" : "<font color=\"red\"> *</font>") . "</td>\n\r\n\t\t<td>{$s_perms}</td>\n\r\n\t\t<td align=left nowrap=\"nowrap\">{$s_ip}" . (isset($s_flag) ? $s_flag : "") . "{$bannished_ip}</td>\n\r\n\t\t<td align=center>{$s_gender}</td>\n\r\n\t\t<td align=left nowrap=\"nowrap\">" . $s_birthday . (!$s_show_age || !$s_show_bday ? $s_birthday == " " ? "" : "<font color=\"red\"> *</font>" : "") . "</td>\n\r\n\t\t</tr>";
if ((!$s_show_age || $s_show_bday) && $s_birthday != " ") {
$note = 1;
}
unset($s_username, $s_firstname, $s_lastname, $s_country, $s_email, $s_perms, $s_ip, $s_gender, $s_birthday, $s_show_bday, $s_show_age, $s_ip, $s_country_code, $s_country_name, $s_flag, $gender, $alt_gender);
$bannished_user = "";
$bannished_ip = "";
$DbLinkNew->clean_results();
}
// GeoIP Country flags initialization
if (isset($gi) && $gi != "") {
geoip_close($gi);
}
if (isset($gi6) && $gi6 != "") {
geoip_close($gi6);
}
$DbLinkNew->close();
$DbLink->close();
if ($note) {
?>
<tr>
<td colspan=10 class=error>
<b>* </b><i><font size="1"><?php
