/*
 * Copyright 2009, Intel Corporation
 * Copyright 2009, Sun Microsystems, Inc
 *
 * This file is part of PowerTOP
 *
 * This program file 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 in a file named COPYING; if not, write to the
 * Free Software Foundation, Inc.,
 * 51 Franklin Street, Fifth Floor,
 * Boston, MA 02110-1301 USA
 *
 * Authors:
 *      Arjan van de Ven <arjan@linux.intel.com>
 *      Eric C Saxe <eric.saxe@sun.com>
 *      Aubrey Li <aubrey.li@intel.com>
 */

/*
 * GPL Disclaimer
 *
 * For the avoidance of doubt, except that if any license choice other
 * than GPL or LGPL is available it will apply instead, Sun elects to
 * use only the General Public License version 2 (GPLv2) at this time
 * for any software where a choice of GPL license versions is made
 * available with the language indicating that GPLv2 or any later
 * version may be used, or where a choice of which version of the GPL
 * is applied is otherwise unspecified.
 */

#include <unistd.h>
#include <stdio.h>
#include <stdlib.h>
#include <string.h>
#include "powertop.h"

struct suggestion;

struct suggestion {
	struct suggestion *next;

	char 	*string;
	int	weight;
	char 	key;
	char 	*keystring;

	suggestion_func *func;
};

static struct suggestion 	*suggestions;
static int 			total_weight;

static char 	previous[1024];

void
reset_suggestions(void)
{
	struct suggestion *ptr;

	ptr = suggestions;

	while (ptr) {
		struct suggestion *next;

		next = ptr->next;
		free(ptr->string);
		free(ptr->keystring);
		free(ptr);
		ptr = next;
	}

	suggestions = NULL;
	(void) strcpy(g_status_bar_slots[8], "");

	g_suggestion_key 	= -1;
	g_suggestion_activate 	= NULL;
	total_weight 		= 0;
}

void
add_suggestion(char *text, int weight, char key, char *keystring,
    suggestion_func *func)
{
	struct suggestion *new;

	if (!text)
		return;

	new = malloc(sizeof (struct suggestion));

	if (!new)
		return;

	(void) memset(new, 0, sizeof (struct suggestion));

	new->string = strdup(text);
	new->weight = weight;
	new->key = key;

	if (keystring)
		new->keystring = strdup(keystring);

	new->next 	= suggestions;
	new->func 	= func;
	suggestions 	= new;
	total_weight 	+= weight;
}

void
pick_suggestion(void)
{
	int			weight, value, running = 0;
	struct suggestion 	*ptr;

	(void) strcpy(g_status_bar_slots[8], "");
	g_suggestion_key 	= -1;
	g_suggestion_activate 	= NULL;

	if (total_weight == 0 || suggestions == NULL) {
		show_suggestion("");
		return;
	}

	weight = total_weight;

	if (strlen(previous) && g_displaytime > 0.0)
		weight += 50;

	value 	= rand() % weight;
	ptr 	= suggestions;

	while (ptr) {
		running += ptr->weight;

		if (strcmp(ptr->string, previous) == 0 && g_displaytime > 0.0)
			running += 50;

		if (running > value) {
			if (ptr->keystring)
				(void) strncpy(g_status_bar_slots[8],
				    ptr->keystring, PT_BAR_LENGTH);

			g_suggestion_key 	= ptr->key;
			g_suggestion_activate 	= ptr->func;

			show_suggestion(ptr->string);

			if (strcmp(ptr->string, previous)) {
				g_displaytime = 30.0;
				(void) strcpy(previous, ptr->string);
			}
			return;
		}
		ptr = ptr->next;
	}

	show_suggestion("");
	(void) memset(previous, 0, sizeof (previous));
	g_displaytime = -1.0;
}

void
print_all_suggestions(void)
{
	struct suggestion *ptr;

	for (ptr = suggestions; ptr; ptr = ptr->next)
		(void) printf("\n%s\n", ptr->string);
}