#include "..\inc\swilib.h"
#include "filelist.h"
#include "main.h"

extern int scroll_pos; // 长歌曲名滚动显示的起始位置
extern int scroll_wait;
extern const char g_path[128];
extern char procfile[128];
extern int playhandle;
extern char *list_text;
extern LIST_SONG_NAME *name_list;
//extern char **pp_list; //该指向指针的指针存储每首歌的位置
char list_path[128];
int list_size=0;
char *p_list; //该指针指向当前正在播放的歌曲
//int some_num_in_list;
int SONG_NUM_NOW=0;
int SONG_ALL=0; //列表歌曲总数


void get_song_point(void)
{
  char *pp;
  pp=list_text;
  int i=0;
	while(*(pp+2))
  {
    if((*(pp+1)==':')&&(*(pp+2)=='\\'))//以":\"为标记
    {
      (name_list+i)->id=i;
    	(name_list+i)->p_name=pp;
    	i++;
    }
    pp++;
  }
  SONG_ALL=i-1;
}
  

void check_song_now(void)
{
	int i=0;
	for(;i<SONG_ALL;i++)
	{
		if((name_list+i)->p_name==p_list)
			break;
	}
	SONG_NUM_NOW=i;
}

void get_currect_song_name(void)
{
  char *p;
  p=p_list;
  int c;
  int i=0;
  char ss[128];
  int is_1st_utf8=0;
  while(*p)
  {
    if((*(p+1)==':')&&(*(p+2)=='\\'))//以":\"为标记
      break;
    p++;
  }
  p_list=p;
  check_song_now();
  while((*p!=0)&&(*p!='\n'))
  {
    c=*p;
    if(c>=' ')
    {
      if((is_1st_utf8==0)&&(c>0x80))//第一个UTF8中文识别（暂时），0x80为ASCII单字节字符最大值
      {
        ss[i]=0x1F;
        i++;
        is_1st_utf8=1;
      }
      if (i<(sizeof(ss)-1)) ss[i]=c;
      i++;
    }
    p++;
  }
  ss[i]='\0';
  strcpy(procfile,ss);
  scroll_pos = 0;
}

void top2end(void)
{
  char *p;
  p=strrchr(list_text,':'); //搜索到最后一个':'字符
  p_list=p-1;
  get_currect_song_name();
}

void end2top(void)
{
  p_list=list_text;
  get_currect_song_name();
}

void get_next_song(void)
{
  char *p;
  p=p_list;
  while(*p!='\n')
  {
    p++;
  }
  while((*p=='\n')||(*p==' '))//排除中间多个换行符，空格，以及到达末尾
  {
    p++;
    if(*p=='\0')
    {
      end2top();
      return;
    }
  }
  p_list=p;
  get_currect_song_name();
}

void get_prev_song(void)
{
  char *p;
  p=p_list;
  while(*p)
  {
    p--;
    if((*(p+1)==':')&&(*(p+2)=='\\')) //以":\"为标记搜索上一首
      break;
  }
  if(*p==0)
  {
    top2end();
    return;
  }
  p_list=p;
  get_currect_song_name();
}

void load_list(int type) //0: load his fail, 1:load his succ... 2:reload
{
  unsigned int err;
  if(type==0)
  {
    strncpy(list_path,g_path,strlen(g_path));
    strcat(list_path,"PlayList\\mylist.lst\0");
  }
  int f=fopen(list_path,A_ReadOnly+A_BIN,P_READ,&err);
  if(f!=-1)
  {
    list_size=fread(f,list_text,32767,&err);
    fclose(f,&err);
  }
  if (list_size>=0)
    list_text[list_size]=0;

  get_song_point();

  if(type==0||type==2) //load his fail or reload
  {
    p_list=list_text; //初始化一次
    get_currect_song_name();
  }
  else
  {
    char *p=strstr(list_text,procfile); //转到列表中的位置
    if(*p)
      p_list=p;
    check_song_now();
  }
  

}


void select_list_gui(void)
{
  open_select_file_gui(1,1);
}


/*============================play mode============================*/

void play_next(void) //顺序循环
{
	get_next_song();
	control(0);
}

void play_prev(void) //倒序循环
{
	get_prev_song();
	control(0);
}

/***************************************************************
以下为随机算法，by binghelingxi(bingk)
原理：先获取正在播放歌曲的handle，这本身就是一个随机正整数
然后将它除以3，按得到的余数0，1，2，分别定位到列表的上中下三段
再将原来得到的handle乘以0x18(大约为一首歌路径的长度)
循环减去handle/3，直到它出现在它被定位在列表的范围内的为止
然后把歌曲在列表中的位置指针定位到这个数
经过get_currect_song_name函数处理就可以得到准确的歌曲名
****************************************************************/

void play_shuff(void)
{
  if(playhandle)
  {
    int y;
    int x=playhandle;
    int c=x%3;
    switch(c)
    {
      case 0:
        y=x*0x18;
        while(y>=list_size/3)
        {
          y-=list_size/3;
        }
        break;
      case 1:
        y=list_size/3+x*0x18;
        while(y>=list_size/3*2)
        {
          y-=list_size/3;
        }
        break;
      case 2:
        y=list_size/3*2+x*0x18;
        while(y>=list_size)
        {
          y-=list_size/3;
        }
        break;
    }
    p_list=list_text;
    p_list+=y;
    get_currect_song_name();
    control(0);
  }
}

/****************************************************

****************************************************/