/*
 * $Id: Panel.cpp 3512 2013-01-09 13:45:49Z karijes $
 *
 * Copyright (C) 2012-2013 Sanel Zukan
 * 
 * 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; either version 2
 * of the License, or (at your option) any later version.
 * 
 * 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., 51 Franklin Street, Fifth Floor, Boston, MA  02110-1301, USA.
 */

#include <FL/Fl_Box.H>
#include "Applet.h"
#include <edelib/Nls.h>

#if defined(linux)
#include <sys/sysinfo.h>
#include <stdio.h>
#include <stdlib.h>
#include <FL/Fl.H>
#include <FL/fl_draw.H>
#include <edelib/Color.h>
#include <edelib/Missing.h>

EDELIB_NS_USING(color_rgb_to_fltk)

#define UPDATE_INTERVAL 2.0f
#define STR_CMP(first, second, n) (strncmp(first, second, n) == 0)

class MemMonitor : public Fl_Box {
private:
	int mem_usedp, swap_usedp;
public:
	MemMonitor() : Fl_Box(0, 0, 45, 25), mem_usedp(0), swap_usedp(0) {
		box(FL_THIN_DOWN_BOX);
		update_status();
	}

	void update_status(void);
	void draw(void);
	int  handle(int e);
};

inline int height_from_perc(int perc, int h) {
	return (perc * h) / 100;
}

static void mem_timeout_cb(void *d) {
	((MemMonitor*)d)->update_status();
	Fl::repeat_timeout(UPDATE_INTERVAL, mem_timeout_cb, d);
}

void MemMonitor::update_status(void) {
	struct sysinfo sys;
	if(sysinfo(&sys) != 0) return;

	long mem_total, mem_free, swap_total, swap_free;
	mem_total = (float)sys.totalram * (float)sys.mem_unit / 1048576.0f;
	mem_free  = (float)sys.freeram * (float)sys.mem_unit / 1048576.0f;
	swap_total = (float)sys.totalswap * (float)sys.mem_unit / 1048576.0f;
	swap_free  = (float)sys.freeswap * (float)sys.mem_unit / 1048576.0f;

	mem_usedp  = 100 - (int)(((float)mem_free / (float)mem_total) * 100);
	swap_usedp = 100 - (int)(((float)swap_free / (float)swap_total) * 100);

	static char tip[100];
	snprintf(tip, sizeof(tip), _("Memory used: %i%%\nSwap used: %i%%"), mem_usedp, swap_usedp);
	tooltip(tip);

	redraw();
}

void MemMonitor::draw(void) {
	draw_box();
	int W, W2, H, X, Y, mh, sh;

	W = w() - Fl::box_dw(box());
	H = h() - Fl::box_dh(box());
	X = x() + Fl::box_dx(box());
	Y = y() + Fl::box_dy(box());
	W2 = W / 2;

	mh = height_from_perc(mem_usedp, H);
	sh = height_from_perc(swap_usedp, H);

	fl_rectf(X, Y + H - mh, W2, mh, (Fl_Color)color_rgb_to_fltk(166, 48, 48));
	fl_rectf(X + W2, Y + H - sh, W2, sh, (Fl_Color)color_rgb_to_fltk(54, 136, 79));
}

int MemMonitor::handle(int e) {
	switch(e) {
		case FL_SHOW: {
			int ret = Fl_Box::handle(e);
			Fl::add_timeout(UPDATE_INTERVAL, mem_timeout_cb, this);
			return ret;
		}

		case FL_HIDE:
			Fl::remove_timeout(mem_timeout_cb);
			/* fallthrough */
	}

	return Fl_Box::handle(e);
}

#else 

class MemMonitor : public Fl_Box {
public:
	MemMonitor() : Fl_Box(0, 0, 45, 25) {
		box(FL_THIN_DOWN_BOX);
		label("n/a");
		tooltip(_("Memory information not available for this platform"));
	}
};

#endif /* linux */

EDE_PANEL_APPLET_EXPORT (
 MemMonitor, 
 EDE_PANEL_APPLET_OPTION_ALIGN_RIGHT,
 "Memory monitor",
 "0.2",
 "empty",
 "Sanel Zukan"
)