/*
* Query amule status. Return hash containing stats values
*/
void php_get_amule_stats(PHP_VALUE_NODE *result)
{
CECPacket stat_req(EC_OP_STAT_REQ, EC_DETAIL_FULL);
const CECPacket *stats = CPhPLibContext::g_curr_context->WebServer()->webInterface->SendRecvMsg_v2(&stat_req);
if (!stats) {
return ;
}
CEC_ConnState_Tag *tag = (CEC_ConnState_Tag *)stats->GetTagByName(EC_TAG_CONNSTATE);
if (!tag) {
return ;
}
cast_value_array(result);
PHP_VAR_NODE *id = array_get_by_str_key(result, "id");
cast_value_dnum(&id->value);
id->value.int_val = tag->GetEd2kId();
const CECTag *server = tag->GetTagByName(EC_TAG_SERVER);
if ( server ) {
PHP_VAR_NODE *srv_ip = array_get_by_str_key(result, "serv_addr");
value_value_free(&srv_ip->value);
srv_ip->value.type = PHP_VAL_STRING;
srv_ip->value.str_val =strdup(unicode2UTF8(server->GetIPv4Data().StringIP()));
const CECTag *sname = server->GetTagByName(EC_TAG_SERVER_NAME);
if ( sname ) {
PHP_VAR_NODE *srv_name = array_get_by_str_key(result, "serv_name");
value_value_free(&srv_name->value);
srv_name->value.type = PHP_VAL_STRING;
srv_name->value.str_val = strdup(unicode2UTF8(sname->GetStringData()));
}
const CECTag *susers = server->GetTagByName(EC_TAG_SERVER_USERS);
if ( susers ) {
PHP_VAR_NODE *srv_users = array_get_by_str_key(result, "serv_users");
value_value_free(&srv_users->value);
srv_users->value.type = PHP_VAL_INT;
srv_users->value.int_val = susers->GetInt();
}
}
// kademlia
PHP_VAR_NODE *kad = array_get_by_str_key(result, "kad_connected");
value_value_free(&kad->value);
kad->value.type = PHP_VAL_BOOL;
if ( tag->IsConnectedKademlia() ) {
kad->value.int_val = 1;
PHP_VAR_NODE *kad_fwl = array_get_by_str_key(result, "kad_firewalled");
kad_fwl->value.type = PHP_VAL_BOOL;
kad_fwl->value.int_val = tag->IsKadFirewalled();
} else {
kad->value.int_val = 0;
}
// traffic stats
PHP_VAR_NODE *speed;
speed = array_get_by_str_key(result, "speed_up");
value_value_free(&speed->value);
speed->value.type = PHP_VAL_INT;
speed->value.int_val = stats->GetTagByName(EC_TAG_STATS_UL_SPEED)->GetInt();
speed = array_get_by_str_key(result, "speed_down");
value_value_free(&speed->value);
speed->value.type = PHP_VAL_INT;
speed->value.int_val = stats->GetTagByName(EC_TAG_STATS_DL_SPEED)->GetInt();
speed = array_get_by_str_key(result, "speed_limit_up");
value_value_free(&speed->value);
speed->value.type = PHP_VAL_INT;
speed->value.int_val = stats->GetTagByName(EC_TAG_STATS_UL_SPEED_LIMIT)->GetInt();
speed = array_get_by_str_key(result, "speed_limit_down");
value_value_free(&speed->value);
speed->value.type = PHP_VAL_INT;
speed->value.int_val = stats->GetTagByName(EC_TAG_STATS_DL_SPEED_LIMIT)->GetInt();
delete stats;
}
/*
* Format EC packet into text form for output to console
*/
void CamulecmdApp::Process_Answer_v2(const CECPacket *response)
{
wxString s;
wxString msgFailedUnknown(_("Request failed with an unknown error."));
wxASSERT(response);
switch (response->GetOpCode()) {
case EC_OP_NOOP:
s << _("Operation was successful.");
break;
case EC_OP_FAILED:
{
const CECTag *tag = response->GetFirstTagSafe();
if (tag->IsString()) {
s << CFormat(_("Request failed with the following error: %s")) % wxGetTranslation(tag->GetStringData());
} else {
s << msgFailedUnknown;
}
}
break;
case EC_OP_SET_PREFERENCES:
{
const CECTag *tab = response->GetTagByNameSafe(EC_TAG_PREFS_SECURITY);
const CECTag *ipfilterLevel = tab->GetTagByName(EC_TAG_IPFILTER_LEVEL);
if (ipfilterLevel) {
if (m_last_cmd_id == CMD_ID_GET_IPFILTER ||
m_last_cmd_id == CMD_ID_GET_IPFILTER_STATE ||
m_last_cmd_id == CMD_ID_GET_IPFILTER_STATE_CLIENTS) {
s += CFormat(_("IP filtering for clients is %s.\n"))
% ((tab->GetTagByName(EC_TAG_IPFILTER_CLIENTS) == NULL) ? _("OFF") : _("ON"));
}
if (m_last_cmd_id == CMD_ID_GET_IPFILTER ||
m_last_cmd_id == CMD_ID_GET_IPFILTER_STATE ||
m_last_cmd_id == CMD_ID_GET_IPFILTER_STATE_SERVERS) {
s += CFormat(_("IP filtering for servers is %s.\n"))
% ((tab->GetTagByName(EC_TAG_IPFILTER_SERVERS) == NULL) ? _("OFF") : _("ON"));
}
if (m_last_cmd_id == CMD_ID_GET_IPFILTER ||
m_last_cmd_id == CMD_ID_GET_IPFILTER_LEVEL) {
s << CFormat(_("Current IPFilter Level is %d.\n")) % ipfilterLevel->GetInt();
}
}
tab = response->GetTagByNameSafe(EC_TAG_PREFS_CONNECTIONS);
const CECTag *connMaxUL = tab->GetTagByName(EC_TAG_CONN_MAX_UL);
const CECTag *connMaxDL = tab->GetTagByName(EC_TAG_CONN_MAX_DL);
if (connMaxUL && connMaxDL) {
s << CFormat(_("Bandwidth limits: Up: %u kB/s, Down: %u kB/s.\n"))
% connMaxUL->GetInt() % connMaxDL->GetInt();
}
}
break;
case EC_OP_STRINGS:
for (CECPacket::const_iterator it = response->begin(); it != response->end(); it++) {
const CECTag &tag = *it;
s << tag.GetStringData() << wxT("\n");
}
break;
case EC_OP_STATS: {
CEC_ConnState_Tag *connState = (CEC_ConnState_Tag*)response->GetTagByName(EC_TAG_CONNSTATE);
if (connState) {
s << _("eD2k") << wxT(": ");
if (connState->IsConnectedED2K()) {
CECTag *server = connState->GetTagByName(EC_TAG_SERVER);
CECTag *serverName = server ? server->GetTagByName(EC_TAG_SERVER_NAME) : NULL;
if (server && serverName) {
s << CFormat(_("Connected to %s %s %s")) %
serverName->GetStringData() %
server->GetIPv4Data().StringIP() %
(connState->HasLowID() ? _("with LowID") : _("with HighID"));
}
} else if (connState->IsConnectingED2K()) {
s << _("Now connecting");
} else {
s << _("Not connected");
}
s << wxT('\n') << _("Kad") << wxT(": ");
if (connState->IsKadRunning()) {
if (connState->IsConnectedKademlia()) {
s << _("Connected") << wxT(" (");
if (connState->IsKadFirewalled()) {
s << _("firewalled");
} else {
s << _("ok");
}
s << wxT(')');
} else {
s << _("Not connected");
}
} else {
s << _("Not running");
}
s << wxT('\n');
}
const CECTag *tmpTag;
if ((tmpTag = response->GetTagByName(EC_TAG_STATS_DL_SPEED)) != 0) {
s << CFormat(_("\nDownload:\t%s")) % CastItoSpeed(tmpTag->GetInt());
}
if ((tmpTag = response->GetTagByName(EC_TAG_STATS_UL_SPEED)) != 0) {
s << CFormat(_("\nUpload:\t%s")) % CastItoSpeed(tmpTag->GetInt());
}
if ((tmpTag = response->GetTagByName(EC_TAG_STATS_UL_QUEUE_LEN)) != 0) {
s << CFormat(_("\nClients in queue:\t%d\n")) % tmpTag->GetInt();
}
if ((tmpTag = response->GetTagByName(EC_TAG_STATS_TOTAL_SRC_COUNT)) != 0) {
s << CFormat(_("\nTotal sources:\t%d\n")) % tmpTag->GetInt();
}
break;
}
case EC_OP_DLOAD_QUEUE:
for (CECPacket::const_iterator it = response->begin(); it != response->end(); it++) {
CEC_PartFile_Tag *tag = (CEC_PartFile_Tag *) & *it;
uint64 filesize, donesize;
filesize = tag->SizeFull();
donesize = tag->SizeDone();
s << tag->FileHashString() << wxT(" ") <<
tag->FileName() <<
(CFormat(wxT("\n\t [%.1f%%] %4i/%4i "))
% ((float)donesize / ((float)filesize)*100.0)
% ((int)tag->SourceCount() - (int)tag->SourceNotCurrCount())
% (int)tag->SourceCount()) <<
((int)tag->SourceCountA4AF() ? wxString(CFormat(wxT("+%2.2i ")) % (int)tag->SourceCountA4AF()) : wxString(wxT(" "))) <<
((int)tag->SourceXferCount() ? wxString(CFormat(wxT("(%2.2i) - ")) % (int)tag->SourceXferCount()) : wxString(wxT(" - "))) <<
tag->GetFileStatusString();
s << wxT(" - ") << tag->PartMetName();
if (tag->DownPrio() < 10) {
s << wxT(" - ") << PriorityToStr((int)tag->DownPrio(), 0);
} else {
s << wxT(" - ") << PriorityToStr((tag->DownPrio() - 10), 1);
}
if ( tag->SourceXferCount() > 0) {
s << wxT(" - ") + CastItoSpeed(tag->Speed());
}
s << wxT("\n");
}
break;
case EC_OP_ULOAD_QUEUE:
for (CECPacket::const_iterator it = response->begin(); it != response->end(); it++) {
const CECTag *tag = & *it;
const CECTag *clientName = tag->GetTagByName(EC_TAG_CLIENT_NAME);
const CECTag *partfileName = tag->GetTagByName(EC_TAG_PARTFILE_NAME);
const CECTag *partfileSizeXfer = tag->GetTagByName(EC_TAG_PARTFILE_SIZE_XFER);
const CECTag *partfileSpeed = tag->GetTagByName(EC_TAG_CLIENT_UP_SPEED);
if (clientName && partfileName && partfileSizeXfer && partfileSpeed) {
s << wxT("\n") <<
CFormat(wxT("%10u ")) % tag->GetInt() <<
clientName->GetStringData() << wxT(" ") <<
partfileName->GetStringData() << wxT(" ") <<
CastItoXBytes(partfileSizeXfer->GetInt()) << wxT(" ") <<
CastItoSpeed(partfileSpeed->GetInt());
}
}
break;
case EC_OP_LOG:
for (CECPacket::const_iterator it = response->begin(); it != response->end(); it++) {
const CECTag &tag = *it;
s << tag.GetStringData() << wxT("\n");
}
break;
case EC_OP_SERVER_LIST:
for (CECPacket::const_iterator it = response->begin(); it != response->end(); it++) {
const CECTag &tag = *it;
const CECTag *serverName = tag.GetTagByName(EC_TAG_SERVER_NAME);
if (serverName) {
wxString ip = tag.GetIPv4Data().StringIP();
ip.Append(' ', 24 - ip.Length());
s << ip << serverName->GetStringData() << wxT("\n");
}
}
break;
case EC_OP_STATSTREE:
s << StatTree2Text((CEC_StatTree_Node_Tag*)response->GetTagByName(EC_TAG_STATTREE_NODE), 0);
break;
case EC_OP_SEARCH_RESULTS:
{
int i = 0;
m_Results_map.clear();
s += CFormat(_("Number of search results: %i\n")) % response->GetTagCount();
for (CECPacket::const_iterator it = response->begin(); it != response->end(); it++) {
CEC_SearchFile_Tag *tag = (CEC_SearchFile_Tag *) & *it;
//printf("Tag FileName: %s \n",(const char*)unicode2char(tag->FileName()));
m_Results_map[i++] = new SearchFile(tag);
}
ShowResults(m_Results_map);
break;
}
case EC_OP_SEARCH_PROGRESS:
{
const CECTag *tab = response->GetTagByNameSafe(EC_TAG_SEARCH_STATUS);
uint32 progress = tab->GetInt();
if (progress <= 100) {
s += CFormat(_("Search progress: %u %% \n")) % progress;
} else {
s += _("Search progress not available");
}
break;
}
default:
s += CFormat(_("Received an unknown reply from the server, OpCode = %#x.")) % response->GetOpCode();
}
Process_Answer(s);
}
