//OpenSCADA module DAQ.System file: da_mem.cpp
/***************************************************************************
 *   Copyright (C) 2005-2014 by Roman Savochenko, <roman@oscada.org>       *
 *                                                                         *
 *   This program is free software; you can redistribute it and/or modify  *
 *   it under the terms of the GNU General Public License as published by  *
 *   the Free Software Foundation; version 2 of the License.               *
 *                                                                         *
 *   This program is distributed in the hope that it will be useful,       *
 *   but WITHOUT ANY WARRANTY; without even the implied warranty of        *
 *   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the         *
 *   GNU General Public License for more details.                          *
 *                                                                         *
 *   You should have received a copy of the GNU General Public License     *
 *   along with this program; if not, write to the                         *
 *   Free Software Foundation, Inc.,                                       *
 *   59 Temple Place - Suite 330, Boston, MA  02111-1307, USA.             *
 ***************************************************************************/

#include <sys/times.h>

#include <tsys.h>

#include "os_contr.h"
#include "da_mem.h"

using namespace SystemCntr;

//*************************************************
//* Mem: Memory                                   *
//*************************************************
Mem::Mem( )
{
    //> Memory value structure
    fldAdd(new TFld("free",_("Free (KiB)"),TFld::Integer,TFld::NoWrite));
    fldAdd(new TFld("total",_("Total (KiB)"),TFld::Integer,TFld::NoWrite));
    fldAdd(new TFld("use",_("Used (KiB)"),TFld::Integer,TFld::NoWrite));
    fldAdd(new TFld("buff",_("Buffers (KiB)"),TFld::Integer,TFld::NoWrite));
    fldAdd(new TFld("cache",_("Cached (KiB)"),TFld::Integer,TFld::NoWrite));
    fldAdd(new TFld("sw_free",_("Swap free (KiB)"),TFld::Integer,TFld::NoWrite));
    fldAdd(new TFld("sw_total",_("Swap total (KiB)"),TFld::Integer,TFld::NoWrite));
    fldAdd(new TFld("sw_use",_("Swap used (KiB)"),TFld::Integer,TFld::NoWrite));
}

Mem::~Mem( )
{

}

void Mem::init( TMdPrm *prm )
{
    prm->cfg("SUBT").setView(false);
}

void Mem::deInit( TMdPrm *prm )
{
    prm->cfg("SUBT").setView(true);
}

void Mem::getVal( TMdPrm *prm )
{
    int m_total, m_free, m_buff, m_cach, sw_total, sw_free;
    char buf[256];

    FILE *f = fopen("/proc/meminfo","r");
    m_total = m_free = m_buff = m_cach = sw_total = sw_free = 0;
    while(f && fgets(buf,sizeof(buf),f) != NULL)
    {
	sscanf(buf,"MemTotal: %d kB\n",&m_total);
	sscanf(buf,"MemFree: %d kB\n",&m_free);
	sscanf(buf,"Buffers: %d kB\n",&m_buff);
	sscanf(buf,"Cached: %d kB\n",&m_cach);
	sscanf(buf,"SwapTotal: %d kB\n",&sw_total);
	sscanf(buf,"SwapFree: %d kB\n",&sw_free);
    }
    fclose(f);

    if(m_total || m_free || m_buff || m_cach || sw_total || sw_free)
    {
	prm->daErr = "";
	prm->vlAt("free").at().setI(m_free+m_buff+m_cach,0,true);
	prm->vlAt("total").at().setI(m_total,0,true);
	prm->vlAt("use").at().setI(m_total-m_free-m_buff-m_cach,0,true);
	prm->vlAt("buff").at().setI(m_buff,0,true);
	prm->vlAt("cache").at().setI(m_cach,0,true);
	prm->vlAt("sw_free").at().setI(sw_free,0,true);
	prm->vlAt("sw_total").at().setI(sw_total,0,true);
	prm->vlAt("sw_use").at().setI(sw_total-sw_free,0,true);
    }
    else if(!prm->daErr.getVal().size())
    {
        prm->setEval();
        prm->daErr = _("10:Device is not available.");
    }
}

void Mem::makeActiveDA( TMdContr *aCntr )
{
    FILE *f = fopen("/proc/meminfo", "r");
    if(f && !aCntr->present("MemInfo"))
    {
	vector<string> pLs;
	// Find propper parameter's object
	aCntr->list(pLs);
	unsigned i_p;
	for(i_p = 0; i_p < pLs.size(); i_p++)
	    if(aCntr->at(pLs[i_p]).at().cfg("TYPE").getS() == id()) break;
	if(i_p >= pLs.size())
	{
	    string pId = "MemInfo";
	    while(aCntr->present(pId)) pId = TSYS::strLabEnum(pId);
	    aCntr->add(pId, 0);
	    AutoHD<TMdPrm> dprm = aCntr->at(pId);
	    dprm.at().setName(_("Memory info"));
	    dprm.at().autoC(true);
	    dprm.at().cfg("TYPE").setS(id());
	    dprm.at().cfg("EN").setB(true);
	    if(aCntr->enableStat()) dprm.at().enable();
	}
    }
    if(f) fclose(f);
}