#include "mywin_inc.h"
#include "flash_manager.h"
#include "system_file.h"
#include "ff.h"
//#include "nes_main.h"
#include "mywin_user_photo.h"
#include "mywin_user_sysfile.h"



#define WIN_SYSFILE_TYPE "WIN_SysFileStruct"



static const char *g_popup_itmes[]=
{
	"打开",
	"重命名",
	"设置为背景",
	"复制到SD卡",
	"删除此项及以后的文件",
	"文件信息",
	"存储空间使用情况",
	"格式化"
};



WIN_SysFileStruct *WIN_CreatSysFile (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))SYSFILE_defaultMsgLoop;  
	}
	
	WIN_SysFileStruct *ret=mymalloc (sizeof ( WIN_SysFileStruct));
	//调用父类的构造函数
	if (ret)
	{
		mymemset (ret,0,sizeof ( WIN_SysFileStruct));
		if (0==WIN_CreatWindowExt((WIN_WindowStruct *)ret,base,msgLoop,x,y,x_size,y_size))
		{
			//创建失败
			myfree (ret);
			ret=0;
		}
		else
		{
			//构造
			((WIN_WindowStruct *)ret)->winType=WIN_SYSFILE_TYPE;
			((WIN_WindowStruct *)ret)->bkcolor=0x808080;
			((WIN_WindowStruct *)ret)->color=0xffffff;
			ret->titleHight=30;
			ret->itemHight=30;
			ret->itemIndent=35;
			ret->itemNumOnePage=(((WIN_WindowStruct *)ret)->y_size-ret->titleHight)/ret->itemHight;
			ret->itemHight=(((WIN_WindowStruct *)ret)->y_size-ret->titleHight)/ret->itemNumOnePage;
		}
	}
	
	
	return ret;
}








//清空条目
void SYSFILE_ClearItem (WIN_SysFileStruct *filder)
{
	filder->fileNum=0;
	filder->firstItemOnPage=0;
	filder->index=0;
}





//添加一个文件条目
void SYSFILE_AddItem (WIN_SysFileStruct *filder,FLASH_FileStruct *file)
{
	if (filder->fileNum<SYSFILE_FILE_MAXNUM)
	{
		mymemcpy (&filder->file[filder->fileNum],file,sizeof (FLASH_FileStruct));
		filder->fileNum++;
			
	}
}



//扫描文件
void SYSFILE_ScanFile (WIN_SysFileStruct *sysfile)
{
	sysfile->fileNum=FLASH_GetFileNum();
	for (int i=0;i<sysfile->fileNum;i++)
	{
		FLASH_GetFileInfo (i,&sysfile->file[i]);
	}
}





void SYSFILE_OpenFile (WIN_SysFileStruct *sysfile)
{
	int str_len=strlen(sysfile->file[sysfile->index].FileName);
	char *p_str=&sysfile->file[sysfile->index].FileName[str_len-4];
	if (strcmp (p_str,".pic")==0)
	{
		WIN_PicStruct pic={0};
		u32 file_size=0;
		u8 *data=0;
		u8 ret=0;
		if (FLASH_FindFile (sysfile->file[sysfile->index].FileName,&file_size)!=0)
		{
			//在外置FLASH中读取图像数据
			data=mymalloc (file_size);
			FLASH_ReadFile (sysfile->file[sysfile->index].FileName,0,(u8*)data,file_size);
			ret=WIN_GetImageSize ((u8*)data,&pic.xsize,&pic.ysize);
			if (ret==0)
			{
				pic.data=(u16*)(data+8);
			}
			PHOTO_ShowPic ((WIN_WindowStruct *)sysfile,&pic);
			myfree(data);
		}
	}
	else if ((strcmp (p_str,".nes")==0)||(strcmp (p_str,".NES")==0))
	{
		u32 file_size=0;
		u8 *data=0;
		u8 ret=0;
		if (FLASH_FindFile (sysfile->file[sysfile->index].FileName,&file_size)!=0)
		{
			//在外置FLASH中读取数据
			data=mymalloc (file_size);
			FLASH_ReadFile (sysfile->file[sysfile->index].FileName,0,(u8*)data,file_size);
			WIN_KeyShieldOn();
			//nes_start (data,file_size,LCD_GetShowAddr(),LCD_GetLcdSizeX()/2-128,LCD_GetLcdSizeY()/2-120);
			WIN_KeyShieldOff();
			myfree(data);
		}
	}
	else if (strcmp (p_str,".app")==0)
	{
		//升级应用软件
		if (MSGBOX_Inquiry((WIN_WindowStruct *)sysfile,"警告","确定升级吗？非必要请勿操作","确定","取消")==0)
		{
			//重启到iap并且升级 指定 文件
			(*(u32 *)0x20000000)=0xff000002;
			(*(u32 *)0x20000004)=sysfile->index;
			NVIC_SystemReset ();
		}
	}
	else
	{
		MSGBOX_TipsTime ((WIN_WindowStruct *)sysfile,"提示","不支持的文件","确定",5000);
	}
}






//消息框的绘制函数
void SYSFILE_DefaultPaint (WIN_SysFileStruct *sysfile)
{
	//使用双缓冲，防止闪烁
//	LCD_LayerBufferOn();
	
	int x=0;
	int y=0;
	int x_size=((WIN_WindowStruct *)sysfile)->x_size;
	int y_size=((WIN_WindowStruct *)sysfile)->y_size;
	char txt_buff[20]={0};
	WIN_PaintBackGround ((WIN_WindowStruct *)sysfile);
	
	//绘制滚动条
	int scrollbar_x=x_size-10-1;
	int scrollbar_y=y+sysfile->titleHight;
	int scrollbar_xsize=10;
	int scrollbar_ysize=y_size-scrollbar_y;
	int scrollbar_tstart=sysfile->firstItemOnPage*scrollbar_ysize/sysfile->fileNum;
	int scrollbar_tsize=sysfile->itemNumOnePage*scrollbar_ysize/sysfile->fileNum;
	WIN_SetLcdColor (((WIN_WindowStruct *)sysfile)->color);
	WIN_DrawHLine (scrollbar_x,scrollbar_y,scrollbar_x+scrollbar_xsize-1);
	WIN_DrawHLine (scrollbar_x,scrollbar_y+scrollbar_ysize-1,scrollbar_x+scrollbar_xsize-1);
	WIN_DrawVLine (scrollbar_x,scrollbar_y,scrollbar_y+scrollbar_ysize-1);
	WIN_DrawVLine (scrollbar_x+scrollbar_xsize-1,scrollbar_y,scrollbar_y+scrollbar_ysize-1);
	WIN_FillRectByColor (scrollbar_x,scrollbar_y+scrollbar_tstart,scrollbar_xsize,scrollbar_tsize);
	
	//显示标题
	WIN_SetFontMode (WIN_DRAWMODE_ALONE);
	WIN_DrawTxtHCenterAt ("系统文件管理",x_size/2,sysfile->titleHight/2-WIN_GetFontHight()/2);
	
	//显示文件信息
	sprintf (txt_buff,"%d/%d",sysfile->index+1,sysfile->fileNum);
	WIN_DrawTxtAt (txt_buff,x_size-WIN_GetFontWidth()*strlen(txt_buff)/2-1,sysfile->titleHight/2-WIN_GetFontHight()/2);
	
	//显示选中框
	int selete_x=x;
	int selete_y=y+sysfile->titleHight;
	int selete_xsize=x_size-scrollbar_xsize-1;
	int selete_ysize=sysfile->itemHight;
	WIN_SetLcdColor (0x00ffff);
	selete_y+=sysfile->itemHight*(sysfile->index-sysfile->firstItemOnPage);
	//WIN_FillRectByColor (selete_x,selete_y,selete_xsize,selete_ysize);
	WIN_FillRectByColorAlpha (selete_x,selete_y,selete_xsize,selete_ysize,16);
	
	//显示文件
	RECT_Struct rs={0};//用于裁剪绘图区的矩形
	rs.x=x;rs.y=y+sysfile->titleHight;
	rs.x_size=x_size-scrollbar_xsize-1;
	rs.y_size=sysfile->itemHight;
	WIN_SetLcdColor (((WIN_WindowStruct *)sysfile)->color);
	for (int i=0;i<sysfile->itemNumOnePage;i++)
	{
		if (i+sysfile->firstItemOnPage<sysfile->fileNum)
		{
			WIN_SetWinInvalidRect (((WIN_WindowStruct *)sysfile),&rs);
			//显示图标
			int img_xsize=0;
			int img_ysize=0;
			u8 *img=0; 
			//if (sysfile->file[i+sysfile->firstItemOnPage].type==FILDER_DIR_TYPE)
				//{img=filder->imgDir;} else {img=filder->imgFile;}
			if (img) 
			{
				WIN_GetImageSize (img,&img_xsize,&img_ysize);
				if (img_xsize>sysfile->itemIndent) img_xsize=sysfile->itemIndent;
				if (img_ysize>rs.y_size) img_ysize=rs.y_size;
				WIN_DrawImag (x+sysfile->itemIndent/2-img_xsize/2,rs.y+rs.y_size/2-img_ysize/2,
						img_xsize,img_ysize,img);
			}
			//显示文件名
			WIN_DrawTxtAt (sysfile->file[i+sysfile->firstItemOnPage].FileName,rs.x+sysfile->itemIndent,rs.y+rs.y_size/2-WIN_GetFontHight()/2);
		}
		rs.y+=sysfile->itemHight;
	}
	WIN_SetWinInvalidRect (((WIN_WindowStruct *)sysfile),0);
	
	
	
//	LCD_LayerBuffShow();
}





typedef struct
{
	char *name;
}sysfile_copy_struct;



//文件复制到SD卡
static int sysfile_copy (void *ptr)
{
	sysfile_copy_struct *t=ptr;
	u32 file_size=0;
	int ret_int=0;
	if (FLASH_FindFile (t->name,&file_size)!=0)
	{
		u8 *data=mymalloc (file_size);
		FLASH_ReadFile (t->name,0,(u8*)data,file_size);
		FIL *file=mymalloc (sizeof (FIL));
		char *file_name=mymalloc (256);
		FRESULT ret=FR_OK;
		sprintf (file_name,"0:/SYS/%s",t->name);
		ret=f_open (file,file_name,FA_CREATE_NEW|FA_WRITE);
		if (ret==FR_OK)
		{
			UINT real=0;
			ret=f_write (file,data,file_size,&real);
			if (ret!=FR_OK)
				while (1);		
			else ret_int=1;//返回1成功
		}
		else ret_int=0;
		f_close (file);
		myfree(file);
		myfree(file_name);
		myfree(data);
	}
	return ret_int;
}



//删除文件
static int sysfile_del (void *ptr)
{
	int index=(int)ptr;
	return FLASH_DeleteFile (index);
}





static void SYSFILE_Down (WIN_SysFileStruct *sysfile)
{
	if ( sysfile->index<sysfile->fileNum-1) 
	{
		sysfile->index++;
		if (sysfile->index>=sysfile->firstItemOnPage+sysfile->itemNumOnePage)
		{
			sysfile->firstItemOnPage++;
		}
	}
	else
	{
		sysfile->index=0;
		sysfile->firstItemOnPage=0;
	}
		
}

static void SYSFILE_Up (WIN_SysFileStruct *sysfile)
{
	if ( sysfile->index>0) 
	{
		sysfile->index--;
		if (sysfile->index<sysfile->firstItemOnPage)
		{
			sysfile->firstItemOnPage--;
		}
	}
	else
	{
		sysfile->index=sysfile->fileNum-1;
		if (sysfile->fileNum>sysfile->itemNumOnePage)
			sysfile->firstItemOnPage=sysfile->fileNum-sysfile->itemNumOnePage;
		else sysfile->firstItemOnPage=0;
	}
}

static void SYSFILE_Enter (WIN_SysFileStruct *sysfile)
{
	int index=POPUP_SelectItem ((WIN_WindowStruct *)sysfile,(char **)g_popup_itmes,8,100,100);
	if (index==0)
	{
		//打开文件
		SYSFILE_OpenFile (sysfile);
	}
	else if (index==1)
	{
		//重命名
		char *txt_buff=mymalloc (256);
		mymemcpy (txt_buff,sysfile->file[sysfile->index].FileName,strlen(sysfile->file[sysfile->index].FileName)+1);
		INPUT_KeyBoard ((WIN_WindowStruct *)sysfile,txt_buff,256);
		myfree(txt_buff);
	}
	else if (index==2)
	{
		//设置为背景
		SysFile_SetBackPicPath (sysfile->file[sysfile->index].FileName);
		WIN_WindowStruct *home=WIN_GetWinByTitle(0,"home");
		if(home)
		{
			WIN_SetBackPicPath(home,SysFile_GetSysFile()->backPicPath);
			MSGBOX_TipsTime ((WIN_WindowStruct *)sysfile,"提示","已设置为背景","确定",5000);
		}
		else
		{
			MSGBOX_TipsTime ((WIN_WindowStruct *)sysfile,"提示","设置背景失败","确定",5000);
		}
	}
	else if (index==3)
	{
		//复制到SD卡
		sysfile_copy_struct cop={0};
		cop.name=sysfile->file[sysfile->index].FileName;
		if (WORKING_DoWork ((WIN_WindowStruct *)sysfile,"正在复制文件到SD卡。。。",sysfile_copy,&cop))
		{
			MSGBOX_TipsTime ((WIN_WindowStruct *)sysfile,"提示","文件复制成功","确定",5000);
		}
		else MSGBOX_TipsTime ((WIN_WindowStruct *)sysfile,"提示","文件复制失败","确定",5000);
	}
	else if (index==4)
	{
		//删除
		if (MSGBOX_Inquiry((WIN_WindowStruct *)sysfile,"警告","确定删除这些文件吗？","确定","取消")==0)
		{
			//if (FLASH_DeleteFile(sysfile->index)==0)
			if (WORKING_DoWork ((WIN_WindowStruct *)sysfile,"正在删除。。。",sysfile_del,(void *)sysfile->index)==0)
			{MSGBOX_TipsTime ((WIN_WindowStruct *)sysfile,"提示","文件已删除","确定",5000); }
			else
			{MSGBOX_TipsTime ((WIN_WindowStruct *)sysfile,"提示","文件删除失败","确定",5000); }
			SYSFILE_ClearItem (sysfile);
			SYSFILE_ScanFile(sysfile);
		}
	}
	else if (index==5)
	{
		//文件信息
		char *txt_buff=mymalloc (512);
		sprintf (txt_buff,"文件名：%s\n大小：%d Byte\n位置：%d",sysfile->file[sysfile->index].FileName,
				sysfile->file[sysfile->index].FileSize,sysfile->file[sysfile->index].Address);
		MSGBOX_Tips((WIN_WindowStruct *)sysfile,"文件信息",txt_buff,"确定");
		myfree(txt_buff);
	}
	else if (index==6)
	{
		//flash使用量
		char *txt_buff=mymalloc (512);
		sprintf (txt_buff,"总空间：%d Byte\n已使用：%d Byte",FLASH_GetFlashSize(),
				FLASH_GetUsed());
		MSGBOX_Tips((WIN_WindowStruct *)sysfile,"存储空间",txt_buff,"确定");
		myfree(txt_buff);
	}
	else if(index==7)
	{
		if (WORKING_DoWork ((WIN_WindowStruct *)sysfile,"正在格式化。。。",(int (*)(void *))FLASH_EraseAllSector,0)==0)
		{MSGBOX_TipsTime ((WIN_WindowStruct *)sysfile,"提示","格式化完成","确定",5000); }
		else
		{MSGBOX_TipsTime ((WIN_WindowStruct *)sysfile,"提示","格式化失败","确定",5000); }
	}
}





//消息框的消息处理函数
void SYSFILE_defaultMsgLoop (WIN_SysFileStruct *sysfile,WIN_MsgStruct *msg)
{
	WIN_MoveStruct *m=0;
	WIN_KeyStruct *k=0;
	switch (msg->msg)
	{	
		case WIN_MSG_PAINT:
			SYSFILE_DefaultPaint(sysfile);
		break;
		case WIN_MSG_KEY:
			k=msg->data.p;
			//收到确定或返回键
			if (k->shortPress& KEY_VALUE_DOWN)
			{
				SYSFILE_Down(sysfile);
			}//if (k->shortPress&KEY_VALUE_DOWN)
			else if (k->shortPress&KEY_VALUE_UP)
			{
				SYSFILE_Up(sysfile);
			}//else if (k->shortPress&KEY_VALUE_UP)
			else if (k->shortPress&KEY_VALUE_ENTER)
			{
				SYSFILE_Enter(sysfile);
			}
			else if (k->shortPress&KEY_VALUE_HOME)
			{
				((WIN_WindowStruct *)sysfile)->deleteWindow((WIN_WindowStruct *)sysfile);
				break;//这里直接返回，
			}
			if (k->shortPress)
			{
				WIN_SetInvalid((WIN_WindowStruct *)sysfile);
			}
		break;//case WIN_MSG_KEY:
		case WIN_MSG_MOVE:
			m=msg->data.p;
			switch (m->moveType)
			{
				case MOVE_DATA_SHORT:
					if (sysfile->touch_support==0)
					{
						sysfile->touch_support=1;
						int y_size=((WIN_WindowStruct *)sysfile)->y_size;
						int x_size=((WIN_WindowStruct *)sysfile)->x_size;
						sysfile->key_enter=WIN_CreatButton(((WIN_WindowStruct *)sysfile),0,x_size-100,y_size/2+25,90,45);
						BUTTON_SetKeyString(sysfile->key_enter,"确定");
						sysfile->key_back=WIN_CreatButton(((WIN_WindowStruct *)sysfile),0,x_size-100,y_size/2+25+50,90,45);
						BUTTON_SetKeyString(sysfile->key_back,"返回");
						sysfile->key_up=WIN_CreatButton(((WIN_WindowStruct *)sysfile),0,x_size-100,y_size/2-50-50,90,45);
						BUTTON_SetKeyString(sysfile->key_up,"向上");
						sysfile->key_down=WIN_CreatButton(((WIN_WindowStruct *)sysfile),0,x_size-100,y_size/2-50,90,45);
						BUTTON_SetKeyString(sysfile->key_down,"向下");
						WIN_SetInvalid((WIN_WindowStruct *)sysfile);
					}
				default:
					WIN_DefaultMsgLoop ((WIN_WindowStruct *)sysfile,msg);
					break;
			}
			break;
		case WIN_MSG_CHID:
			switch (msg->data.v)
			{
				case CHID_DELETE:
				break;
				case CHID_USER:
				{
					if (msg->data2.v==BUTTON_PRESSED)
					{
						if (msg->srcWin==sysfile->key_back)
						{
							//返回
							((WIN_WindowStruct *)sysfile)->deleteWindow((WIN_WindowStruct *)sysfile);
						}
						else if (msg->srcWin==sysfile->key_up)
						{
							SYSFILE_Up(sysfile);
						}
						else if (msg->srcWin==sysfile->key_down)
						{
							SYSFILE_Down(sysfile);
						}
						else if (msg->srcWin==sysfile->key_enter)
						{
							SYSFILE_Enter(sysfile);
						}
						WIN_SetInvalid((WIN_WindowStruct *)sysfile);
					}
				}
				break;
				default:
				break;
			}
			break;
		default:
			WIN_DefaultMsgLoop((WIN_WindowStruct *)sysfile,msg);
		break;
	}

}



//选则文件
int SYSFILE_ChooseFile (WIN_WindowStruct *win) 
{
	WIN_SysFileStruct *sysfile=0;
	if (win) 
	{
		int x,y,xsize,ysize;
		sysfile=WIN_CreatSysFile (win,0,0,0,win->x_size,win->y_size);
	}
	else sysfile=WIN_CreatSysFile (0,0,0,0,WIN_GetWinStruct()->lcd->getLcdSizeX(),WIN_GetWinStruct()->lcd->getLcdSizeY());
	WIN_SetBackPicPath ((WIN_WindowStruct *)sysfile,win->pic_path);
	SYSFILE_ScanFile (sysfile);
	WIN_ShowWindow((WIN_WindowStruct *)sysfile);
	//return WIN_RunBlock ((WIN_WindowStruct *)sysfile);
	return 0;
}