#include <VBoxVMInformationDlg.h>

#include <VBoxGlobal.h>

#include <VBoxConsoleView.h>

#include <QTimer>

VBoxVMInformationDlg::InfoDlgMap VBoxVMInformationDlg::mSelfArray = InfoDlgMap();

void VBoxVMInformationDlg::createInformationDlg (const CSession &aSession,

VBoxConsoleView *aConsole)

{

CMachine machine = aSession.GetMachine();

if (mSelfArray.find (machine.GetName()) == mSelfArray.end())

{

/* Creating new information dialog if there is no one existing */

VBoxVMInformationDlg *id = new VBoxVMInformationDlg (aConsole,

aSession, Qt::Window);

id->centerAccording (aConsole);

connect (vboxGlobal().mainWindow(), SIGNAL (closing()), id, SLOT (close()));

id->setAttribute (Qt::WA_DeleteOnClose);

mSelfArray [machine.GetName()] = id;

}

VBoxVMInformationDlg *info = mSelfArray [machine.GetName()];

info->show();

info->raise();

info->setWindowState (info->windowState() & ~Qt::WindowMinimized);

info->activateWindow();

}

VBoxVMInformationDlg::VBoxVMInformationDlg (VBoxConsoleView *aConsole,

const CSession &aSession,

Qt::WindowFlags aFlags)

#ifdef Q_WS_MAC

: QIWithRetranslateUI2<QIMainDialog> (aConsole, aFlags)

#else /* Q_WS_MAC */

: QIWithRetranslateUI2<QIMainDialog> (NULL, aFlags)

#endif /* Q_WS_MAC */

, mIsPolished (false)

, mConsole (aConsole)

, mSession (aSession)

, mStatTimer (new QTimer (this))

{

/* Apply UI decorations */

Ui::VBoxVMInformationDlg::setupUi (this);

#ifdef Q_WS_MAC

/* No icon for this window on the mac, cause this would act as proxy icon

setWindowIcon (QIcon());

#else

/* Apply window icons */

setWindowIcon (vboxGlobal().iconSetFull (QSize (32, 32), QSize (16, 16),

":/session_info_32px.png", ":/session_info_16px.png"));

#endif

/* Enable size grip without using a status bar. */

setSizeGripEnabled (true);

/* Setup focus-proxy for pages */

mPage1->setFocusProxy (mDetailsText);

mPage2->setFocusProxy (mStatisticText);

/* Setup browsers */

mDetailsText->viewport()->setAutoFillBackground (false);

mStatisticText->viewport()->setAutoFillBackground (false);

/* For further tuning can be used setViewportMargins method of

#if 0

mDetailsText->setViewportMargins (5, 5, 5, 5);

#endif

mStatisticText->setViewportMargins (0, 0, 5, 0);

/* Setup handlers */

connect (mInfoStack, SIGNAL (currentChanged (int)),

this, SLOT (onPageChanged (int)));

connect (&vboxGlobal(), SIGNAL (mediumEnumFinished (const VBoxMediaList &)),

this, SLOT (updateDetails()));

connect (mConsole, SIGNAL (mediaDriveChanged (VBoxDefs::MediaType)),

this, SLOT (updateDetails()));

connect (mConsole, SIGNAL (sharedFoldersChanged()),

this, SLOT (updateDetails()));

connect (mStatTimer, SIGNAL (timeout()),

this, SLOT (processStatistics()));

connect (mConsole, SIGNAL (resizeHintDone()),

this, SLOT (processStatistics()));

/* Loading language constants */

retranslateUi();

/* Details page update */

updateDetails();

/* Statistics page update */

processStatistics();

mStatTimer->start (5000);

/* Preload dialog attributes for this vm */

QString dlgsize =

mSession.GetMachine().GetExtraData (VBoxDefs::GUI_InfoDlgState);

if (dlgsize.isNull())

{

mWidth = 400;

mHeight = 450;

mMax = false;

}

else

{

QStringList list = dlgsize.split(',');

mWidth = list [0].toInt(), mHeight = list [1].toInt();

mMax = list [2] == "max";

}

/* Make statistics page the default one */

mInfoStack->setCurrentIndex (1);

}

VBoxVMInformationDlg::~VBoxVMInformationDlg()

{

/* Save dialog attributes for this vm */

QString dlgsize ("%1,%2,%3");

mSession.GetMachine().SetExtraData (VBoxDefs::GUI_InfoDlgState,

dlgsize.arg (mWidth).arg (mHeight).arg (isMaximized() ? "max" : "normal"));

if (!mSession.isNull() && !mSession.GetMachine().isNull())

mSelfArray.remove (mSession.GetMachine().GetName());

}

void VBoxVMInformationDlg::retranslateUi()

{

/* Translate uic generated strings */

Ui::VBoxVMInformationDlg::retranslateUi (this);

updateDetails();

AssertReturnVoid (!mSession.isNull());

CMachine machine = mSession.GetMachine();

AssertReturnVoid (!machine.isNull());

/* Setup a dialog caption */

setWindowTitle (tr ("%1 - Session Information").arg (machine.GetName()));

/* Setup a tabwidget page names */

mInfoStack->setTabText (0, tr ("&Details"));

mInfoStack->setTabText (1, tr ("&Runtime"));

/* Clear counter names initially */

mNamesMap.clear();

mUnitsMap.clear();

mLinksMap.clear();

/* IDE HD statistics: */

for (int i = 0; i < 2; ++ i)

for (int j = 0; j < 2; ++ j)

{

/* Names */

mNamesMap [QString ("/Devices/ATA%1/Unit%2/*DMA")

.arg (i).arg (j)] = tr ("DMA Transfers");

mNamesMap [QString ("/Devices/ATA%1/Unit%2/*PIO")

.arg (i).arg (j)] = tr ("PIO Transfers");

mNamesMap [QString ("/Devices/ATA%1/Unit%2/ReadBytes")

.arg (i).arg (j)] = tr ("Data Read");

mNamesMap [QString ("/Devices/ATA%1/Unit%2/WrittenBytes")

.arg (i).arg (j)] = tr ("Data Written");

/* Units */

mUnitsMap [QString ("/Devices/ATA%1/Unit%2/*DMA")

.arg (i).arg (j)] = "[B]";

mUnitsMap [QString ("/Devices/ATA%1/Unit%2/*PIO")

.arg (i).arg (j)] = "[B]";

mUnitsMap [QString ("/Devices/ATA%1/Unit%2/ReadBytes")

.arg (i).arg (j)] = "B";

mUnitsMap [QString ("/Devices/ATA%1/Unit%2/WrittenBytes")

.arg (i).arg (j)] = "B";

/* Belongs to */

mLinksMap [QString ("IDE%1%2").arg (i).arg (j)] = QStringList()

<< QString ("/Devices/ATA%1/Unit%2/*DMA").arg (i).arg (j)

<< QString ("/Devices/ATA%1/Unit%2/*PIO").arg (i).arg (j)

<< QString ("/Devices/ATA%1/Unit%2/ReadBytes").arg (i).arg (j)

<< QString ("/Devices/ATA%1/Unit%2/WrittenBytes").arg (i).arg (j);

}

/* SATA HD statistics: */

for (int i = 0; i < 30; ++ i)

{

/* Names */

mNamesMap [QString ("/Devices/SATA/Port%1/DMA").arg (i)]

= tr ("DMA Transfers");

mNamesMap [QString ("/Devices/SATA/Port%1/ReadBytes").arg (i)]

= tr ("Data Read");

mNamesMap [QString ("/Devices/SATA/Port%1/WrittenBytes").arg (i)]

= tr ("Data Written");

/* Units */

mUnitsMap [QString ("/Devices/SATA/Port%1/DMA").arg (i)] = "[B]";

mUnitsMap [QString ("/Devices/SATA/Port%1/ReadBytes").arg (i)] = "B";

mUnitsMap [QString ("/Devices/SATA/Port%1/WrittenBytes").arg (i)] = "B";

/* Belongs to */

mLinksMap [QString ("SATA%1").arg (i)] = QStringList()

<< QString ("/Devices/SATA/Port%1/DMA").arg (i)

<< QString ("/Devices/SATA/Port%1/ReadBytes").arg (i)

<< QString ("/Devices/SATA/Port%1/WrittenBytes").arg (i);

}

/* SCSI HD statistics: */

for (int i = 0; i < 16; ++ i)

{

/* Names */

mNamesMap [QString ("/Devices/SCSI/%1/ReadBytes").arg (i)]

= tr ("Data Read");

mNamesMap [QString ("/Devices/SCSI/%1/WrittenBytes").arg (i)]

= tr ("Data Written");

/* Units */

mUnitsMap [QString ("/Devices/SCSI/%1/ReadBytes").arg (i)] = "B";

mUnitsMap [QString ("/Devices/SCSI/%1/WrittenBytes").arg (i)] = "B";

/* Belongs to */

mLinksMap [QString ("SCSI%1").arg (i)] = QStringList()

<< QString ("/Devices/SCSI/%1/ReadBytes").arg (i)

<< QString ("/Devices/SCSI/%1/WrittenBytes").arg (i);

}

/* Network Adapters statistics: */

ulong count = vboxGlobal().virtualBox()

.GetSystemProperties().GetNetworkAdapterCount();

for (ulong i = 0; i < count; ++ i)

{

CNetworkAdapter na = machine.GetNetworkAdapter (i);

KNetworkAdapterType ty = na.GetAdapterType();

const char *name;

switch (ty)

{

case KNetworkAdapterType_I82540EM:

case KNetworkAdapterType_I82543GC:

case KNetworkAdapterType_I82545EM:

name = "E1k";

break;

default:

name = "PCNet";

break;

}

/* Names */

mNamesMap [QString ("/Devices/%1%2/TransmitBytes")

.arg (name).arg (i)] = tr ("Data Transmitted");

mNamesMap [QString ("/Devices/%1%2/ReceiveBytes")

.arg (name).arg (i)] = tr ("Data Received");

/* Units */

mUnitsMap [QString ("/Devices/%1%2/TransmitBytes")

.arg (name).arg (i)] = "B";

mUnitsMap [QString ("/Devices/%1%2/ReceiveBytes")

.arg (name).arg (i)] = "B";

/* Belongs to */

mLinksMap [QString ("NA%1").arg (i)] = QStringList()

<< QString ("/Devices/%1%2/TransmitBytes").arg (name).arg (i)

<< QString ("/Devices/%1%2/ReceiveBytes").arg (name).arg (i);

}

/* Statistics page update. */

refreshStatistics();

}

bool VBoxVMInformationDlg::event (QEvent *aEvent)

{

bool result = QIMainDialog::event (aEvent);

switch (aEvent->type())

{

case QEvent::WindowStateChange:

{

if (mIsPolished)

mMax = isMaximized();

else if (mMax == isMaximized())

mIsPolished = true;

break;

}

default:

break;

}

return result;

}

void VBoxVMInformationDlg::resizeEvent (QResizeEvent *aEvent)

{

QIMainDialog::resizeEvent (aEvent);

/* Store dialog size for this vm */

if (mIsPolished && !isMaximized())

{

mWidth = width();

mHeight = height();

}

}

void VBoxVMInformationDlg::showEvent (QShowEvent *aEvent)

{

/* One may think that QWidget::polish() is the right place to do things

if (!mIsPolished)

{

/* Load window size and state */

resize (mWidth, mHeight);

if (mMax)

QTimer::singleShot (0, this, SLOT (showMaximized()));

else

mIsPolished = true;

}

QIMainDialog::showEvent (aEvent);

}

void VBoxVMInformationDlg::updateDetails()

{

/* Details page update */

mDetailsText->setText (

vboxGlobal().detailsReport (mSession.GetMachine(), false /* aWithLinks */));

}

void VBoxVMInformationDlg::processStatistics()

{

CMachineDebugger dbg = mSession.GetConsole().GetDebugger();

QString info;

/* Process selected statistics: */

for (DataMapType::const_iterator it = mNamesMap.begin();

it != mNamesMap.end(); ++ it)

{

dbg.GetStats (it.key(), true, info);

mValuesMap [it.key()] = parseStatistics (info);

}

/* Statistics page update */

refreshStatistics();

}

void VBoxVMInformationDlg::onPageChanged (int aIndex)

{

/* Focusing the browser on shown page */

mInfoStack->widget (aIndex)->setFocus();

}

void VBoxVMInformationDlg::suicide()

{

delete this;

}

QString VBoxVMInformationDlg::parseStatistics (const QString &aText)

{

/* Filters the statistic counters body */

QRegExp query ("^.+<Statistics>\n(.+)\n</Statistics>.*$");

if (query.indexIn (aText) == -1)

return QString::null;

QStringList wholeList = query.cap (1).split ("\n");

ULONG64 summa = 0;

for (QStringList::Iterator lineIt = wholeList.begin();

lineIt != wholeList.end(); ++ lineIt)

{

QString text = *lineIt;

text.remove (1, 1);

text.remove (text.length() - 2, 2);

/* Parse incoming counter and fill the counter-element values. */

CounterElementType counter;

counter.type = text.section (" ", 0, 0);

text = text.section (" ", 1);

QStringList list = text.split ("\" ");

for (QStringList::Iterator it = list.begin(); it != list.end(); ++ it)

{

QString pair = *it;

QRegExp regExp ("^(.+)=\"([^\"]*)\"?$");

regExp.indexIn (pair);

counter.list.insert (regExp.cap (1), regExp.cap (2));

}

/* Fill the output with the necessary counter's value.

QString result = counter.list.contains ("c") ? counter.list ["c"] : "0";

summa += result.toULongLong();

}

return QString::number (summa);

}

void VBoxVMInformationDlg::refreshStatistics()

{

if (mSession.isNull())

return;

QString table = "<table width=100% cellspacing=1 cellpadding=0>%1</table>";

QString hdrRow = "<tr><td width=22><img src='%1'></td>"

"<td colspan=2><nobr><b>%2</b></nobr></td></tr>";

QString paragraph = "<tr><td colspan=3></td></tr>";

QString result;

CMachine m = mSession.GetMachine();

/* Screen & VT-X Runtime Parameters */

{

CConsole console = mSession.GetConsole();

ULONG bpp = console.GetDisplay().GetBitsPerPixel();

QString resolution = QString ("%1x%2")

.arg (console.GetDisplay().GetWidth())

.arg (console.GetDisplay().GetHeight());

if (bpp)

resolution += QString ("x%1").arg (bpp);

QString virtualization = console.GetDebugger().GetHWVirtExEnabled() ?

VBoxGlobal::tr ("Enabled", "details report (VT-x/AMD-V)") :

VBoxGlobal::tr ("Disabled", "details report (VT-x/AMD-V)");

QString nested = console.GetDebugger().GetHWVirtExNestedPagingEnabled() ?

VBoxGlobal::tr ("Enabled", "details report (Nested Paging)") :

VBoxGlobal::tr ("Disabled", "details report (Nested Paging)");

QString addInfo = console.GetGuest().GetAdditionsVersion();

uint addVersion = addInfo.toUInt();

QString addVerisonStr = !addInfo.isNull() ?

tr ("Version %1.%2", "guest additions")

.arg (RT_HIWORD (addVersion)).arg (RT_LOWORD (addVersion)) :

tr ("Not Detected", "guest additions");

QString osType = console.GetGuest().GetOSTypeId();

if (osType.isNull())

osType = tr ("Not Detected", "guest os type");

else

osType = vboxGlobal().vmGuestOSTypeDescription (osType);

/* Searching for longest string */

QStringList valuesList;

valuesList << resolution << virtualization << nested << addVerisonStr << osType;

int maxLength = 0;

foreach (QString value, valuesList)

maxLength = maxLength < fontMetrics().width (value) ?

fontMetrics().width (value) : maxLength;

result += hdrRow.arg (":/state_running_16px.png").arg (tr ("Runtime Attributes"));

result += formatValue (tr ("Screen Resolution"), resolution, maxLength);

result += formatValue (VBoxGlobal::tr ("VT-x/AMD-V", "details report"), virtualization, maxLength);

result += formatValue (VBoxGlobal::tr ("Nested Paging", "details report"), nested, maxLength);

result += formatValue (tr ("Guest Additions"), addVerisonStr, maxLength);

result += formatValue (tr ("Guest OS Type"), osType, maxLength);

result += paragraph;

}

/* Hard Disk Statistics */

{

QString hdStat;

const QString ideCtl = QString("IDE");

const QString sataCtl = QString("SATA");

result += hdrRow.arg (":/hd_16px.png").arg (tr ("Hard Disk Statistics"));

/* IDE Hard Disk (Primary Master) */

if (!m.GetHardDisk(ideCtl, 0, 0).isNull())

{

hdStat += formatHardDisk (ideCtl, 0, 0, "IDE00");

hdStat += paragraph;

}

/* IDE Hard Disk (Primary Slave) */

if (!m.GetHardDisk(ideCtl, 0, 1).isNull())

{

hdStat += formatHardDisk (ideCtl, 0, 1, "IDE01");

hdStat += paragraph;

}

/* IDE Hard Disk (Secondary Slave) */

if (!m.GetHardDisk(ideCtl, 1, 1).isNull())

{

hdStat += formatHardDisk (ideCtl, 1, 1, "IDE11");

hdStat += paragraph;

}

/* SATA Hard Disks */

for (int i = 0; i < 30; ++ i)

{

if (!m.GetHardDisk(sataCtl, i, 0).isNull())

{

hdStat += formatHardDisk (sataCtl, i, 0,

QString ("SATA%1").arg (i));

hdStat += paragraph;

}

}

/* @todo Rework if more than one additional

const QString scsiCtl = QString("SCSI");

if (!m.GetStorageControllerByName(scsiCtl).isNull())

{

/* SCSI Hard Disks */

for (int i = 0; i < 16; ++ i)

{

if (!m.GetHardDisk(scsiCtl, i, 0).isNull())

{

hdStat += formatHardDisk (scsiCtl, i, 0,

QString ("SCSI%1").arg (i));

hdStat += paragraph;

}

}

}

/* If there are no Hard Disks */

if (hdStat.isNull())

{

hdStat = composeArticle (tr ("No Hard Disks"));

hdStat += paragraph;

}

result += hdStat;

/* CD/DVD-ROM (Secondary Master) */

result += hdrRow.arg (":/cd_16px.png").arg (tr ("CD/DVD-ROM Statistics"));

result += formatHardDisk (ideCtl, 1, 0, "IDE10");

result += paragraph;

}

/* Network Adapters Statistics */

{

QString naStat;

result += hdrRow.arg (":/nw_16px.png")

.arg (tr ("Network Adapter Statistics"));

/* Network Adapters list */

ulong count = vboxGlobal().virtualBox()

.GetSystemProperties().GetNetworkAdapterCount();

for (ulong slot = 0; slot < count; ++ slot)

{

if (m.GetNetworkAdapter (slot).GetEnabled())

{

naStat += formatAdapter (slot, QString ("NA%1").arg (slot));

naStat += paragraph;

}

}

/* If there are no Network Adapters */

if (naStat.isNull())

{

naStat = composeArticle (tr ("No Network Adapters"));

naStat += paragraph;

}

result += naStat;

}

/* Show full composed page & save/restore scroll-bar position */

int vv = mStatisticText->verticalScrollBar()->value();

mStatisticText->setText (table.arg (result));

mStatisticText->verticalScrollBar()->setValue (vv);

}

QString VBoxVMInformationDlg::formatValue (const QString &aValueName,

const QString &aValue, int aMaxSize)

{

QString bdyRow = "<tr><td></td><td width=50%><nobr>%1</nobr></td>"

"<td align=right><nobr>%2"

"<img src=:/tpixel.png width=%3 height=1></nobr></td></tr>";

int size = aMaxSize - fontMetrics().width (aValue);

return bdyRow.arg (aValueName).arg (aValue).arg (size);

}

QString VBoxVMInformationDlg::formatHardDisk (const QString &ctlName,

LONG aChannel,

LONG aDevice,

const QString &aBelongsTo)

{

if (mSession.isNull())

return QString::null;

CStorageController ctl = mSession.GetMachine().GetStorageControllerByName(ctlName);

CHardDisk hd = mSession.GetMachine().GetHardDisk(ctlName, aChannel, aDevice);

QString header = "<tr><td></td><td colspan=2><nobr><u>%1</u></nobr></td></tr>";

QString name = vboxGlobal().toFullString (ctl.GetBus(), aChannel, aDevice);

QString result = hd.isNull() ? QString::null : header.arg (name);

result += composeArticle (aBelongsTo);

return result;

}

QString VBoxVMInformationDlg::formatAdapter (ULONG aSlot,

const QString &aBelongsTo)

{

if (mSession.isNull())

return QString::null;

QString header = "<tr><td></td><td colspan=2><nobr><u>%1</u></nobr></td></tr>";

QString name = VBoxGlobal::tr ("Adapter %1", "details report (network)").arg (aSlot + 1);

QString result = header.arg (name);

result += composeArticle (aBelongsTo);

return result;

}

QString VBoxVMInformationDlg::composeArticle (const QString &aBelongsTo)

{

QString body = "<tr><td></td><td width=50%><nobr>%1</nobr></td>"

"<td align=right><nobr>%2%3</nobr></td></tr>";

QString result;

if (mLinksMap.contains (aBelongsTo))

{

QStringList keyList = mLinksMap [aBelongsTo];

for (QStringList::Iterator it = keyList.begin(); it != keyList.end(); ++ it)

{

QString line (body);

QString key = *it;

if (mNamesMap.contains (key) &&

mValuesMap.contains (key) &&

mUnitsMap.contains (key))

{

line = line.arg (mNamesMap [key])

.arg (QString ("%L1")

.arg (mValuesMap [key].toULongLong()));

line = mUnitsMap [key].contains (QRegExp ("\\[\\S+\\]")) ?

line.arg (QString ("<img src=:/tpixel.png width=%1 height=1>")

.arg (QApplication::fontMetrics().width (

QString (" %1").arg (mUnitsMap [key]

.mid (1, mUnitsMap [key].length() - 2))))) :

line.arg (QString (" %1").arg (mUnitsMap [key]));

result += line;

}

}

}

else

result = body.arg (aBelongsTo).arg (QString::null).arg (QString::null);

return result;

}