#include <stdio.h>
#include <stdlib.h>
#include <string.h>
#include <assert.h>

#include "main.h"
#include "list.h"
#include "myTimer.h"
#include "checkFront.h"
#include "idManager.h"
#include "server.h"

typedef struct struct_checkfront_t {
	char *msg;
	my_time_t time;
	int id;
	int count;
	int type;
} checkfront_t;

static checkfront_t *newCheck(char *s, int type, int id)
{
	checkfront_t *new;

	assert(s != NULL);

	new = malloc(sizeof(checkfront_t));
	memset(new, 0, sizeof(checkfront_t));
	new->msg = strdup(s);
	new->time = getMyTime();
	new->id = id;
	new->type = type;
	new->count = 0;

	return new;
}

static void destroyCheck(checkfront_t * p)
{
	assert(p != NULL);
	free(p->msg);
	free(p);
}

list_t *newCheckFront()
{
	return newList();
}

void addMsgInCheckFront(list_t * list, char *msg, int type, int id)
{
	if (type == CHECK_FRONT_TYPE_CHECK)
		incID(id);

	addList(list, newCheck(msg, type, id));
}

void eventMsgInCheckFront(client_t * client)
{
	my_time_t currentTime;
	int i;

	currentTime = getMyTime();

	for (i = 0; i < client->listSendMsg->count; i++) {
		checkfront_t *this;

		this = (checkfront_t *) client->listSendMsg->list[i];

		switch (this->type) {
			case CHECK_FRONT_TYPE_SIMPLE:
				sendClient(client, this->msg);
				delListItem(client->listSendMsg, i, destroyCheck);
				i--;
				break;
			case CHECK_FRONT_TYPE_CHECK:
				if (this->count == 0 || currentTime - this->time > CHECK_FRONT_SEND_TIME_INTERVAL) {
					sendClient(client, this->msg);
					this->time = currentTime;
					this->count++;
				}
				if (this->count > CHECK_FRONT_MAX_COUNT_SEND) {
					delID(this->id);
					delListItem(client->listSendMsg, i, destroyCheck);
					i--;
				}
				break;
			default:
				assert(!_("Bad type of front!"));
				break;
		}
	}
}

void delMsgInCheckFront(list_t * listCheckFront, int id)
{
	int i;

	for (i = 0; i < listCheckFront->count; i++) {
		checkfront_t *this;

		this = (checkfront_t *) listCheckFront->list[i];

		if (this->id == id) {
			delID(this->id);
			delListItem(listCheckFront, i, destroyCheck);
			return;
		}
	}
}

void destroyCheckFront(list_t * p)
{
	assert(p != NULL);
	destroyListItem(p, destroyCheck);
}