#include "mywin_inc.h"


#define WIN_SCROLLBAR_TYPE "WIN_ScrollbarStruct"


void SCROLLBAR_Delete(WIN_ScrollbarStruct *bar);

WIN_ScrollbarStruct *WIN_CreatScrollbar (WIN_WindowStruct *base,
			void (*msgLoop)(struct _WIN_WindowStruct *win,WIN_MsgStruct *msg),
			int x,int y,int x_size,int y_size)
{ 
	//重设消息循环
	if (msgLoop==0)
	{
		msgLoop=(void (*)(struct _WIN_WindowStruct *win,WIN_MsgStruct *msg))SCROLLBAR_DefaultMsgLoop;  
	} 
	
	WIN_ScrollbarStruct *ret=mymalloc (sizeof ( WIN_ScrollbarStruct));
	//调用父类的构造函数
	if (ret)
	{
		mymemset (ret,0,sizeof ( WIN_ScrollbarStruct));
		if (0==WIN_CreatWindowExt((WIN_WindowStruct *)ret,base,msgLoop,x,y,x_size,y_size))
		{
			//创建失败
			myfree (ret);
			ret=0;
		}
		else
		{
			//构造一个
			((WIN_WindowStruct *)ret)->deleteWindow=(void (*)(struct _WIN_WindowStruct *win))SCROLLBAR_Delete;
			((WIN_WindowStruct *)ret)->winType=WIN_SCROLLBAR_TYPE;
			((WIN_WindowStruct *)ret)->bkcolor=0x342f2a;
			((WIN_WindowStruct *)ret)->color=0xc2ae9b;
			((WIN_WindowStruct *)ret)->keyChid=1;		//作为子窗口被创建
			ret->color_light=0xffffff;
			ret->color_dark=0x808080;
			ret->y_step=45;
		}
	}
	
	
	return ret;
}



void SCROLLBAR_Delete(WIN_ScrollbarStruct *bar)
{
	if(bar->items) myfree(bar->items);
	
	//调用父类的销毁函数
	WIN_DeleteWindow ( (WIN_WindowStruct *)bar);
}





void SCROLLBAR_AddItem (WIN_ScrollbarStruct *bar,char *item,char *pic_path)
{
	if (bar->itemNum<bar->itemMaxNum)
	{
		int len=strlen(item);
		if(len+1>SCROLLBAR_ITEM_MAXLEN)
			printf("%s:item txt to long\r\n",__func__);
		mymemcpy ( bar->items[bar->itemNum].txt,item,len+1);
		bar->items[bar->itemNum].pic_path=pic_path;
		bar->itemNum++;
	}
}





Scrollbar_ItemStruct *SCROLLBAR_GetItemByOffset (WIN_ScrollbarStruct *bar,int offset)
{
	if(bar->itemNum==0) return 0;
	while(bar->index+offset<0) offset+=bar->itemNum;
	while(bar->index+offset>=bar->itemNum) offset-=bar->itemNum;
	
	if((bar->index+offset>=0)&&(bar->index+offset<bar->itemNum))
		return &bar->items[bar->index+offset];
	else
		return 0;
}



//绘制一个条目，y是条目中心坐标
void SCROLLBAR_DrawItem (WIN_ScrollbarStruct *bar,int offset,int y)
{
	Scrollbar_ItemStruct *item=SCROLLBAR_GetItemByOffset(bar,offset);
	int x=((WIN_WindowStruct *)bar)->x_size/2;
	if (item)
	{
		if (offset==0)
			WIN_SetLcdColor(bar->color_light);
		else
			WIN_SetLcdColor(bar->color_dark);
		WIN_PicStruct *pic=WIN_GetPic(item->pic_path);
		int pic_xsize=0;
		if(pic) pic_xsize=pic->xsize+WIN_GetFontWidth()/2;
		int xsize=strlen(item->txt)*WIN_GetFontWidth()/2+pic_xsize;
		x=x-xsize/2;
		WIN_DrawPic(pic,x,y-pic->ysize/2,pic->xsize,pic->ysize);
		x+=pic_xsize;
		WIN_DrawTxtAt(item->txt,x,y-WIN_GetFontHight()/2);
	}
}



//默认绘制函数
void SCROLLBAR_DefaultPaint (WIN_ScrollbarStruct *bar)
{
	int x=0;
	int y=0;
	int x_size=((WIN_WindowStruct *)bar)->x_size;
	int y_size=((WIN_WindowStruct *)bar)->y_size;
	
	WIN_PaintBackGround ((WIN_WindowStruct *)bar);

	int draw_item_num=3;
	for (;draw_item_num*bar->y_step<y_size;draw_item_num+=2){}
	
	for (int i=-draw_item_num/2;i<draw_item_num/2+1;i++)
	{
		SCROLLBAR_DrawItem(bar,i,bar->y_step*i+y_size/2+bar->y_offset);
	}
}




//惯性定时器消息
int SCROLLBAR_TimerInertia(WIN_ScrollbarStruct *bar)
{
    if(bar->x_inertia>0) bar->x_inertia--;
    else if(bar->x_inertia<0) bar->x_inertia++;
    if(bar->y_inertia>0) bar->y_inertia--;
    else if(bar->y_inertia<0) bar->y_inertia++;
	
	//惯性滑动
	WIN_SendTouchMove((WIN_WindowStruct *)bar,bar->x_inertia,bar->y_inertia);
	
	if(bar->y_inertia==0&&bar->x_inertia==0)
	{
		WIN_DeleteTimer(bar->timer_inertia);
		bar->timer_inertia=0;
        bar->num_inertia=0;
	}
	return 0;
}








#define SCROLLBAR_INDEX_ADD() {if (bar->index<bar->itemNum-1) bar->index++;\
																	else bar->index=0;}
#define SCROLLBAR_INDEX_SUB() {if (bar->index>0) bar->index--;\
																	else bar->index=bar->itemNum-1;}



void SCROLLBAR_DefaultMsgLoop (WIN_ScrollbarStruct *bar,WIN_MsgStruct *msg)
{
	WIN_MoveStruct *m=0;
	WIN_KeyStruct *k=0;
	switch (msg->msg)
	{	
		case WIN_MSG_PAINT:
			SCROLLBAR_DefaultPaint(bar);
		break;
		case WIN_MSG_INIT:
			WIN_SetBackPic((WIN_WindowStruct *)bar);
		break;
		case WIN_MSG_KEY:
			k=msg->data.p;
			if (k->shortPress& KEY_VALUE_DOWN)
			{
				SCROLLBAR_INDEX_ADD();
				bar->y_offset=0;
				WIN_SetInvalid((WIN_WindowStruct *)bar);
			}
			else if (k->shortPress&KEY_VALUE_UP)
			{
				SCROLLBAR_INDEX_SUB();
				bar->y_offset=0;
				WIN_SetInvalid((WIN_WindowStruct *)bar);
			}
		break;
		case WIN_MSG_MOVE:
			m=msg->data.p;
			switch (m->moveType)
			{
				case MOVE_DATA_MOVED:
					bar->y_offset+=m->y_move;
					if (bar->y_offset>bar->y_step/2)
					{
						bar->y_offset-=bar->y_step;
						SCROLLBAR_INDEX_SUB();
					}
					else if (bar->y_offset<=-bar->y_step/2)
					{
						bar->y_offset+=bar->y_step;
						SCROLLBAR_INDEX_ADD();
					}
					if(bar->timer_inertia==0)
					{
						//存储惯性值
//						bar->x_inertia=bar->x_inertia*bar->num_inertia+ m->x_move;
//						bar->y_inertia=bar->y_inertia*bar->num_inertia+ m->y_move;
//						bar->num_inertia++;
//						bar->x_inertia/=bar->num_inertia;
//						bar->y_inertia/=bar->num_inertia;
                        bar->x_inertia=m->x_move;
                        bar->y_inertia=m->y_move;
					}
					if(bar->x_inertia==0&&bar->y_inertia==0)
						bar->y_offset=0;
					WIN_SetInvalidWhenTop ((WIN_WindowStruct *)bar);
					break;
				case MOVE_DATA_SHORT:
					if(bar->timer_inertia==0)
					{
						WIN_SendMsgToPrent((WIN_WindowStruct *)bar,CHID_USER,SCROLLBAR_PRESSED);
					}
					else
					{
						WIN_DeleteTimer(bar->timer_inertia);
						bar->timer_inertia=0;
						bar->x_inertia=0;
						bar->y_inertia=0;
					}
					break;
				case MOVE_DATA_TOUCHOUT:
				case MOVE_DATA_MOVEOUT:
						//添加惯性定时器
						if((bar->timer_inertia==0)&&(bar->x_inertia||bar->y_inertia))
						{
							bar->timer_inertia=WIN_CreatTimer((WIN_WindowStruct *)bar,20);
						}
						else if(bar->timer_inertia==0)
						{
							// 滑动停止
//							WIN_SendTouchMove((WIN_WindowStruct *)bar,0,0);
						}
				default:
					break;
			}
			break;
		case WIN_MSG_TIMER:
			if(msg->data.v==bar->timer_inertia)
			{
				SCROLLBAR_TimerInertia(bar);
			}
		break;
		default:
			WIN_DefaultMsgLoop((WIN_WindowStruct *)bar,msg);
		break;
	}
}



void SCROLLBAR_SetItemNum(WIN_ScrollbarStruct *bar,int itemNum)
{
	if(bar->items)
	{
		bar->items=myrealloc(bar->items,sizeof(Scrollbar_ItemStruct)*itemNum);
		if(itemNum>bar->itemMaxNum)
			mymemset(bar->items+bar->itemMaxNum*sizeof(Scrollbar_ItemStruct),0,
				sizeof(Scrollbar_ItemStruct)*(itemNum-bar->itemMaxNum));
	}
	else
	{
		bar->items=mymalloc(sizeof(Scrollbar_ItemStruct)*itemNum);
		mymemset(bar->items,0,sizeof(Scrollbar_ItemStruct)*itemNum);
	}
	bar->itemMaxNum=itemNum;
}




WIN_ScrollbarStruct *SCROLLBAR_SelectItem (WIN_WindowStruct *base,char **item,int itemNum,int x,int y,int x_size,int y_size)
{
	WIN_ScrollbarStruct *bar=WIN_CreatScrollbar(base,0,x,y,x_size,y_size);
	SCROLLBAR_SetItemNum(bar,itemNum);
	for (int i=0;i<itemNum;i++)
	{ int len=strlen(item[i]);
		SCROLLBAR_AddItem(bar,item[i],0);
		if (x_size<len) x_size=len; }
	
	//设置弹出框的背景	
	WIN_SetBackPic ((WIN_WindowStruct *)bar);
		
	WIN_ShowWindow((WIN_WindowStruct *)bar);
	return bar;
}



WIN_ScrollbarStruct *SCROLLBAR_SelectNum (WIN_WindowStruct *base,int min,int max,int x,int y,int x_size,int y_size)
{
//	if (max-min+1>bar->itemMaxNum) return 0;
	if (max<min) return 0;
	char **item=mymalloc((max-min+1)*sizeof(char **));
	for (int i=0;i<max-min+1;i++)
	{
		item[i]=mymalloc(SCROLLBAR_ITEM_MAXLEN*sizeof(char));
		sprintf(item[i],"%d",min+i);
	}
	WIN_ScrollbarStruct *ret=SCROLLBAR_SelectItem(base,item,max-min+1,x,y,x_size,y_size);
	for (int i=0;i<max-min+1;i++)
	{
		myfree(item[i]);
	}
	myfree(item);
	return ret;
}