// Copyright (c) 2009, Grigori Goronzy <greg@geekmind.org>
//
// Permission to use, copy, modify, and distribute this software for any
// purpose with or without fee is hereby granted, provided that the above
// copyright notice and this permission notice appear in all copies.
//
// THE SOFTWARE IS PROVIDED "AS IS" AND THE AUTHOR DISCLAIMS ALL WARRANTIES
// WITH REGARD TO THIS SOFTWARE INCLUDING ALL IMPLIED WARRANTIES OF
// MERCHANTABILITY AND FITNESS. IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR
// ANY SPECIAL, DIRECT, INDIRECT, OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES
// WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS, WHETHER IN AN
// ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING OUT OF
// OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE.
//
// $Id$

/// @file platform_unix_linux.cpp
/// @brief Linux Platform extensions.
/// @ingroup unix

#ifndef R_PRECOMP
#include <wx/string.h>
#include <wx/textfile.h>
#include <wx/log.h>
#endif

#include "include/platform.h"
#include "platform_unix.h"
#include "platform_unix_linux.h"


std::string PlatformUnixLinux::CPUId() {
    return getProcValue("/proc/cpuinfo", "model name\t");
};

std::string PlatformUnixLinux::CPUSpeed() {
    return getProcValue("/proc/cpuinfo", "cpu MHz\t\t");
};

// Linux doesn't report the number of real CPUs or physical CPU cores,
// but instead the number of "logical" CPUs; this also includes logical cores
// due to SMT/HyperThreading.
// For now report the logical CPU count and no number of cores; this seems
// to make the most sense.
int PlatformUnixLinux::CPUCores() {
    return -1;
};

int PlatformUnixLinux::CPUCount() {
    // This returns the index of the last processor.
    // Increment and return as string.
    wxString procIndex = getProcValue("/proc/cpuinfo", "processor\t");
    if (procIndex.IsNumber()) {
        long val = 0;
        procIndex.ToLong(&val);
		return val + 1;
    }

    // Fallback
    return 1;
};

std::string PlatformUnixLinux::CPUFeatures() {
    return getProcValue("/proc/cpuinfo", "flags\t\t");
};

std::string PlatformUnixLinux::CPUFeatures2() {
    return "";
};

uint64_t PlatformUnixLinux::Memory() {
    wxString memKb = getProcValue("/proc/meminfo", "MemTotal");
    memKb = memKb.BeforeFirst(' ');
    if (memKb.IsNumber()) {
        long val = 0;
        memKb.ToLong(&val);
		return val * 1024;
    }

    return -1;
};

std::string PlatformUnixLinux::UnixLibraries() {
    return "";
};

/**
 * @brief Parse a /proc "key: value" style text file and extract a value.
 * @return The last valid value
 */
std::string PlatformUnixLinux::getProcValue(const wxString path, const wxString key) {
    const wxString prefix = wxString(key) + ":";
    wxTextFile *file = new wxTextFile(path);
    wxString val = std::string();

    file->Open();
    for (wxString str = file->GetFirstLine(); !file->Eof(); str = file->GetNextLine()) {
        str.Trim(false);
        if (str.StartsWith(prefix)) {
            val = wxString(str.Mid(key.Len() + 1));
            val.Trim(false);
        }
    }

    file->Close();
    delete file;
    return std::string(val);
};