#ifndef LST_TIMER
#define LST_TIMER
#include<time.h>
#define BUFFER_SIZE 64
class Timer;/*向前声明*/*/

/*用户数据结构，包含ip,端口，文件描述符，读缓存，以及定时器*/
struct client_data
{
  char ip[BUFFER_SIZE];
  int port;
  int sockfd;
  char buf[BUFFER_SIZE];
  Timer *timer;

};

/*定时器类*/
class Timer
{
 public:
	Timer():prev(NULL),next(NULL){}
 public:
    time_t expire;/*任务的超时时间，此处使用绝对时间*/
	client_data* user_data;
	void (*cb_func)(client_data*);/*任务回调函数*/
	Timer* prev;/*指向前一个定时器*/
	Timer* next;/*指向后一个定时器*/
	void* arg;  /*可根据需要进行扩展使用*/


};

/*定时器链表，它是一个升序，双向链表，且带有头节点和尾节点*/
class sort_timer_lst
{
public:
	sort_timer_lst():head(NULL),tail(NULL){}
	~sort_timer_lst()/*链表被销毁的时候，删除所有的定时器*/
	{
		Timer* tmp =head;
		while(tmp)
		{
			head=tmp->next;
			delete tmp;
			tmp =head;
		
		}
	}
	void add_timer(Timer* timer);/*将目标定时器添加到链表中*/
	bool find_timer(Timer* timer);/*查找目标定时器*/
	void del_timer(Timer* timer);/*删除目标定时器*/
	void adjust_timer(Timer* timer);/*当某个定时任务发生变化时，调整对应的定时器在链表的位置，此函数之考的向后调整*/
	void tick();
private:	
    void add_timer(Timer* timer,Timer* head);
	private:	
	Timer* head;
	Timer* tail;
	
};


#endif

#include"lst_timer.h"



void sort_timer_lst::add_timer(Timer* timer)
{
	if(!timer) return;
		if(!head)
		{
			head= tail =timer;
			return ;
		}
		
		if(timer->expire < head->expire)
		{
		  timer->next = head;
		  head ->prev = timer;
		  head = timer;
		  return ;
		
		}
		
		add_timer(timer,head);



}


bool sort_timer_lst:: find_timer(Timer* timer)
{

	Timer* tmp = head;
	while(tmp)
	{
		if(strcmp(tmp->user_data->stb_id , timer->user_data->stb_id)==0)
		{
				
				return true;
			
		}
			
		       tmp = tmp->next;
		
	}
		if(!tmp)
		return false;

}


void sort_timer_lst::adjust_timer(Timer*timer)
{
	if(!timer)
		return;
	
	Timer*tmp = timer->next;
	if(!tmp||timer->expire<tmp->expire)
		return;
	
	if(timer==head)
	{
		head = head->next;
		head->prev =NULL;
		timer->next = NULL;
		add_timer(timer,head);
	
	
	}
	else
	{
		timer ->prev->next = timer ->next;
		timer ->next->prev = timer->prev;
		add_timer(timer,timer->next);
	
	}
	



}



void sort_timer_lst::del_timer(Timer* timer)
{

	if(!timer)
		return;
	/*下面条件成立，表示只有一个定时器，即目标定时器*/	
	if((timer ==head)&&(timer ==tail))
	{
		delete timer;
		head = NULL;
		tail = NULL;
		return ;
			
		
	}
	/*如果链表至少有两个定时器，且目标定时器恰好是头结点*/
	if(timer == head)
	{
		head =head->next;
		head->prev=NULL;
		delete timer;
		return;
		
		
	}
	/*如果链表至少有两个定时器，目标定时器恰好是尾节点*/
	if(timer ==tail)
	{
		tail = tail ->prev;
		tail ->next =NULL;
		delete timer;
		return;
		
	}
	/*目标定时器如果位于链表头尾之间，则把它前后的定时器串联起来，然后删除目标定时器*/	
	timer->prev ->next =timer ->next;	
	timer->next->prev = timer ->prev ;
	delete timer;



}

/*主要通过此函数不断检测时候有定时器超时*/
void sort_timer_lst::tick()
{


	if(!head ) return;
		
	time_t cur = time(NULL);
		
	Timer* tmp = head;
		
	while(tmp)
	{
		if(cur<tmp->expire)
		break;
			
		tmp->cb_func(tmp->user_data);/*执行定时器回调函数*/
			
		head=tmp->next;
		if(head)
		head->prev = NULL;
			
		delete tmp;
		tmp = head;
		
	}


}

void sort_timer_lst:: add_timer(Timer* timer,Timer* head)
{

	Timer* prev = head;
	Timer* tmp = prev->next;
		
	while(tmp)
	{
		if(timer->expire<tmp->expire)
		{
			prev->next =timer ;
			timer->next = tmp;
			tmp ->prev = timer;
			timer ->prev = prev;
			break;
			
			
		}
			
		prev = tmp;
		tmp =tmp->next;
		
		
	}
		
	if(!tmp)
	{
		prev->next = timer;
		timer->prev = prev;
		timer->next =NULL;
		tail = timer;
					
	}


}