docker-tmserver/docker-xaseco/xaseco/plugins/chat.stats.php

358 lines
14 KiB
PHP

<?php
/* vim: set noexpandtab tabstop=2 softtabstop=2 shiftwidth=2: */
/**
* Chat plugin.
* Displays player statistics & personal settings.
* Updated by Xymph
*
* Dependencies: requires chat.records2.php
*/
require_once('includes/tmndatafetcher.inc.php'); // provides access to TMN world stats
Aseco::addChatCommand('stats', 'Displays statistics of current player');
Aseco::addChatCommand('statsall', 'Displays world statistics of a player');
Aseco::addChatCommand('settings', 'Displays your personal settings');
// calls function get_recs() from chat.records2.php
function chat_stats($aseco, $command) {
global $rasp, $feature_ranks, $maxrecs;
$player = $command['author'];
$target = $player;
// check for optional player parameter
if ($command['params'] != '')
if (!$target = $aseco->getPlayerParam($player, $command['params'], true))
return;
// showing stats for TMN
if ($aseco->server->getGame() == 'TMN') {
// get current player info
$aseco->client->resetError();
$aseco->client->query('GetPlayerInfo', $target->login);
$info = $aseco->client->getResponse();
if ($aseco->client->isError()) {
$rank = 0;
$score = 0;
} else {
$rank = $info['LadderStats']['Ranking'];
$score = $info['LadderStats']['Score'];
}
// format ladder rank with narrow spaces between the thousands
$rank = str_replace(' ', '$n $m', number_format($rank, 0, ' ', ' '));
// obtain last online timestamp
$query = 'SELECT UpdatedAt FROM players
WHERE login=' . quotedString($target->login);
$result = mysql_query($query);
$laston = mysql_fetch_row($result);
mysql_free_result($result);
$records = 0;
if ($list = get_recs($target->id)) { // from chat.records2.php
// sort for best records
asort($list);
// count total ranked records
foreach ($list as $name => $rec) {
// stop upon unranked record
if ($rec > $maxrecs) break;
// count ranked record
$records++;
}
}
$stats = 'Stats for: ' . $target->nickname . '$z / {#login}' . $target->login . LF . LF;
$stats .= '$gServer Date : {#black}' . date('M d, Y') . LF;
$stats .= '$gServer Time : {#black}' . date('H:i:s T') . LF;
$stats .= '$gTime Played : {#black}' . formatTimeH($target->getTimePlayed() * 1000, false) . LF;
$stats .= '$gLast Online : {#black}' . preg_replace('/^\d\d\d\d/', '\$n$0\$m', preg_replace('/:\d\d$/', '', $laston[0])) . LF;
if ($feature_ranks) {
$stats .= '$gServer Rank : {#black}' . $rasp->getRank($target->login) . LF;
}
$stats .= '$gRecords : {#black}' . $records . LF;
$stats .= '$gRaces Won : {#black}' . ($target->getWins() > $target->wins ? $target->getWins() : $target->wins) . LF;
$stats .= '$gLadder Rank : {#black}' . $rank . LF;
$stats .= '$gLadder Score: {#black}' . round($score, 1) . LF;
$stats .= '$gNation : {#black}' . $target->nation . LF;
$stats .= '$gClan : {#black}' . ($target->teamname ? $target->teamname . '$z' : '<none>') . LF;
if ($aseco->allowAbility($player, 'chat_statsip')) {
$stats .= '$gIP : {#black}' . $target->ipport;
}
// display popup message
$aseco->client->query('SendDisplayServerMessageToLogin', $player->login, $aseco->formatColors($stats), 'OK', '', 0);
// showing stats for TMF
} elseif ($aseco->server->getGame() == 'TMF') {
// get current player info
$aseco->client->resetError();
$aseco->client->query('GetDetailedPlayerInfo', $target->login);
$info = $aseco->client->getResponse();
if ($aseco->client->isError()) {
$rank = 0;
$score = 0;
$lastm = 0;
$wins = 0;
$draws = 0;
$losses = 0;
$zone = '';
$inscrdays = 0;
$inscrhours = 0;
} else {
$rank = $info['LadderStats']['PlayerRankings'][0]['Ranking'];
$score = $info['LadderStats']['PlayerRankings'][0]['Score'];
$lastm = $info['LadderStats']['LastMatchScore'];
$wins = $info['LadderStats']['NbrMatchWins'];
$draws = $info['LadderStats']['NbrMatchDraws'];
$losses = $info['LadderStats']['NbrMatchLosses'];
// get zone info
$zone = substr($info['Path'], 6); // strip 'World|'
$inscr = $info['HoursSinceZoneInscription'];
$inscrdays = floor($inscr / 24);
$inscrhours = $inscr - ($inscrdays * 24);
}
// format numbers with narrow spaces between the thousands
$frank = str_replace(' ', '$n $m', number_format($rank, 0, ' ', ' '));
$fwins = str_replace(' ', '$n $m', number_format($wins, 0, ' ', ' '));
$fdraws = str_replace(' ', '$n $m', number_format($draws, 0, ' ', ' '));
$flosses = str_replace(' ', '$n $m', number_format($losses, 0, ' ', ' '));
// obtain last online timestamp
$query = 'SELECT UpdatedAt FROM players
WHERE login=' . quotedString($target->login);
$result = mysql_query($query);
$laston = mysql_fetch_row($result);
mysql_free_result($result);
$records = 0;
if ($list = get_recs($target->id)) { // from chat.records2.php
// sort for best records
asort($list);
// count total ranked records
foreach ($list as $name => $rec) {
// stop upon unranked record
if ($rec > $maxrecs) break;
// count ranked record
$records++;
}
}
$header = 'Stats for: ' . $target->nickname . '$z / {#login}' . $target->login;
$stats = array();
$stats[] = array('Server Date', '{#black}' . date('M d, Y'));
$stats[] = array('Server Time', '{#black}' . date('H:i:s T'));
$value = '{#black}' . formatTimeH($target->getTimePlayed() * 1000, false);
// add clickable button
if ($aseco->settings['clickable_lists'])
$value = array($value, -5); // action id
$stats[] = array('Time Played', $value);
$stats[] = array('Last Online', '{#black}' . preg_replace('/:\d\d$/', '', $laston[0]));
if ($feature_ranks) {
$value = '{#black}' . $rasp->getRank($target->login);
// add clickable button
if ($aseco->settings['clickable_lists'])
$value = array($value, -6); // action id
$stats[] = array('Server Rank', $value);
}
$value = '{#black}' . $records;
// add clickable button
if ($aseco->settings['clickable_lists'])
$value = array($value, 5); // action id
$stats[] = array('Records', $value);
$value = '{#black}' . ($target->getWins() > $target->wins ? $target->getWins() : $target->wins);
// add clickable button
if ($aseco->settings['clickable_lists'])
$value = array($value, 6); // action id
$stats[] = array('Races Won', $value);
$stats[] = array('Ladder Rank', '{#black}' . $frank);
$stats[] = array('Ladder Score', '{#black}' . round($score, 1));
$stats[] = array('Last Match', '{#black}' . round($lastm, 1));
$stats[] = array('Wins', '{#black}' . $fwins);
$stats[] = array('Draws', '{#black}' . $fdraws . ($losses != 0 ?
' $gW/L: {#black}' . round($wins / $losses, 3) : ''));
$stats[] = array('Losses', '{#black}' . $flosses);
$stats[] = array('Zone', '{#black}' . $zone);
$stats[] = array('Inscribed', '{#black}' . $inscrdays . ' day' . ($inscrdays == 1 ? ' ' : 's ') . $inscrhours . ' hours');
$stats[] = array('Rights', '{#black}' . ($target->rights ? 'United' : 'Nations'));
if ($aseco->server->rights) {
$stats[] = array('Donations', '{#black}' . ($target->rights ? ldb_getDonations($aseco, $target->login) : 'N/A'));
}
$stats[] = array('Clan', '{#black}' . ($target->teamname ? $target->teamname . '$z' : '<none>'));
$stats[] = array('Client', '{#black}' . $target->client);
if ($aseco->allowAbility($player, 'chat_statsip')) {
$stats[] = array('IP', '{#black}' . $target->ipport);
}
// display ManiaLink message
display_manialink($player->login, $header, array('Icons128x128_1', 'Statistics', 0.03), $stats, array(1.0, 0.3, 0.7), 'OK');
} else { // TMS/TMO
$stats = '{#server}> XASECO Stats' . LF;
$stats .= 'Showing stats of ' . $target->nickname . LF;
$stats .= 'Time Played: ' . formatTimeH($target->getTimePlayed() * 1000, false) . LF;
$stats .= 'Races Won: ' . $target->getWins();
// show chat message
$aseco->client->query('ChatSendServerMessageToLogin', $aseco->formatColors($stats), $player->login);
}
} // chat_stats
function chat_statsall($aseco, $command) {
$player = $command['author'];
$target = $player;
// showing stats for TMN only
if ($aseco->server->getGame() == 'TMN') {
// check for optional player parameter
if ($command['params'] != '') {
$login = $command['params'];
if (is_numeric($login)) {
if (!$target = $aseco->getPlayerParam($player, $login, true)) {
return;
} else {
$login = $target->login;
}
}
} else {
$login = $player->login;
}
// obtain external stats
$data = new TMNDataFetcher($login, true);
if (!$data->nickname) {
$message = '{#server}> {#highlite}' . $login . '{#error} is not a valid player!';
$aseco->client->query('ChatSendServerMessageToLogin', $aseco->formatColors($message), $player->login);
return;
}
// format ranks & stats with narrow spaces between the thousands
$wrank = str_replace(' ', '$n $m', number_format($data->worldrank, 0, ' ', ' '));
$nrank = str_replace(' ', '$n $m', number_format($data->nationrank, 0, ' ', ' '));
$ntotal = str_replace(' ', '$n $m', number_format($data->nationplayers, 0, ' ', ' '));
$ptotal = str_replace(' ', '$n $m', number_format($data->totalplayers, 0, ' ', ' '));
$wins = str_replace(' ', '$n $m', number_format($data->wins, 0, ' ', ' '));
$draws = str_replace(' ', '$n $m', number_format($data->draws, 0, ' ', ' '));
$losses = str_replace(' ', '$n $m', number_format($data->losses, 0, ' ', ' '));
$trank = str_replace(' ', '$n $m', number_format($data->teamrank, 0, ' ', ' '));
$ttotal = str_replace(' ', '$n $m', number_format($data->totalteams, 0, ' ', ' '));
$stats = 'Stats for: {#black}' . $data->nickname . '$z / {#login}' . $data->login . LF . LF;
$stats .= '$gLadder Rank : {#black}' . $wrank . '$g / {#black}' . $ptotal . LF;
$stats .= '$gLadder Score : {#black}' . round($data->points, 1) . LF;
$stats .= '$gLast Match : {#black}' . round($data->lastmatch, 1) . LF;
$stats .= '$gNation : {#black}' . $data->nation . LF;
$stats .= '$gNation Rank : {#black}' . $nrank . '$g / {#black}' . $ntotal . LF;
$stats .= '$gWins : {#black}' . $wins . LF;
$stats .= '$gDraws : {#black}' . $draws;
if ($data->losses != 0) {
$stats .= ' $gW/L: {#black}' . round($data->wins / $data->losses, 3);
}
$stats .= LF;
$stats .= '$gLosses : {#black}' . $losses . LF;
$stats .= '$gStars / Days : {#black}' . $data->stars . '$g / {#black}' . $data->stardays . LF;
$stats .= '$gTeam : {#black}' . ($data->teamname ? $data->teamname . '$z' : '<none>') . LF;
if ($data->teamname) {
$stats .= '$gTeam Rank : {#black}' . $trank . '$g / {#black}' . $ttotal . LF;
}
$stats .= '$gOnline : {#black}' . ($data->online ? $data->serverlogin . '$g / {#black}' . $data->servernation : '<no>') . LF;
$stats .= '$gNations Score: {#black}' . $data->nationpoints . LF;
$stats .= '$gNations Rank : {#black}' . $data->nationpos . '$g / {#black}' . $data->totalnations;
// display popup message
$aseco->client->query('SendDisplayServerMessageToLogin', $player->login, $aseco->formatColors($stats), 'OK', '', 0);
} else {
$message = '{#server}> {#error}Command unavailable, use {#highlite}$i /stats {#error}instead.';
$aseco->client->query('ChatSendServerMessageToLogin', $aseco->formatColors($message), $player->login);
}
} // chat_statsall
function chat_settings($aseco, $command) {
$player = $command['author'];
$target = $player;
// check for optional login parameter if any admin
if ($command['params'] != '' && $aseco->allowAbility($player, 'chat_settings'))
if (!$target = $aseco->getPlayerParam($player, $command['params'], true))
return;
// get CPs settings
if (function_exists('chat_cps'))
$cps = ldb_getCPs($aseco, $target->login);
else
$cps = false;
// showing settings for TMN
if ($aseco->server->getGame() == 'TMN') {
if ($cps) {
$settings = 'Settings for: ' . $target->nickname . '$z / {#login}' . $target->login . LF . LF;
$settings .= '$gLocal CPS : {#black}' . $cps['cps'] . LF;
$settings .= '$gDedimania CPS: {#black}' . $cps['dedicps'] . LF;
// display popup message
$aseco->client->query('SendDisplayServerMessageToLogin', $player->login, $aseco->formatColors($settings), 'OK', '', 0);
} else {
$message = '{#server}> {#error}No personal settings available';
$aseco->client->query('ChatSendServerMessageToLogin', $aseco->formatColors($message), $player->login);
}
// showing settings for TMF
} elseif ($aseco->server->getGame() == 'TMF') {
// get style setting
if (function_exists('style_default'))
$style = ldb_getStyle($aseco, $target->login);
else
$style = false;
// get panel settings
if (function_exists('panels_default'))
$panels = ldb_getPanels($aseco, $target->login);
else
$panels = false;
if ($cps || $style || $panels) {
$header = 'Settings for: ' . $target->nickname . '$z / {#login}' . $target->login;
$settings = array();
// collect available settings
if ($cps) {
$settings[] = array('Local CPS', '{#black}' . $cps['cps']);
$settings[] = array('Dedimania CPS', '{#black}' . $cps['dedicps']);
if ($style || $panels)
$settings[] = array();
}
if ($style) {
$settings[] = array('Window Style', '{#black}' . $style);
if ($panels)
$settings[] = array();
}
if ($panels) {
if ($aseco->isAnyAdmin($target))
$settings[] = array('Admin Panel', '{#black}' . substr($panels['admin'], 5));
$settings[] = array('Donate Panel', '{#black}' . substr($panels['donate'], 6));
$settings[] = array('Records Panel', '{#black}' . substr($panels['records'], 7));
$settings[] = array('Vote Panel', '{#black}' . substr($panels['vote'], 4));
}
// display ManiaLink message
display_manialink($player->login, $header, array('Icons128x128_1', 'Inputs', 0.03), $settings, array(1.0, 0.3, 0.7), 'OK');
} else {
$message = '{#server}> {#error}No personal settings available';
$aseco->client->query('ChatSendServerMessageToLogin', $aseco->formatColors($message), $player->login);
}
} else { // TMO/TMS
$message = '{#server}> {#error}No personal settings available';
$aseco->client->query('ChatSendServerMessageToLogin', $aseco->formatColors($message), $player->login);
}
} // chat_settings
?>