//**********************************************************************************
//杨屹    2002/08/20    第一版
//串行flash操作函数(X5045/93LC66B)
//联系方法：gdtyy@ri.gdt.com.cn（2003/07/31以前有效）
//**********************************************************************************
//使用方法：
//    接口函数屏蔽了底层硬件操作，用户只需给出操作命令、起始地址、数据长度、数据指针
//即可操作硬件。
//**********************************************************************************
#include <general.h>
//#include <myconfig51.h>
//#include <SerEEROM.h>

bit Isbit7(unsigned char x)//内部使用，对用户透明
{
 x=x&0x80;
 if(x==0) return 0;
 else return 1;
}

bit Isbit15(unsigned int x)//内部使用，对用户透明
{
 x=x&0x8000;
 if(x==0) return 0;
 else return 1;
}

//X5045
bit opx5045(unsigned char cmd,unsigned int addr,unsigned int len,unsigned char *dat)//X5045操作函数
{
 unsigned char i;
 unsigned int j;
 unsigned char x;
 unsigned char adr,a8;

 adr=addr;
 a8=(addr>>5)&0x8;

 switch(cmd){
  case WREN:
  case WRDI:{
   while(sck==0);
   while(sck==1);
   xcs=0;
   for(i=0;i<8;i++){
    si=Isbit7(cmd);
    cmd=cmd<<1;
    while(sck==0);
    while(sck==1);
   }
   xcs=1;
   break;}
//  case WRDI:{
//   break;}
  case RDSR:{
   while(sck==0);
   while(sck==1);
   xcs=0;
   for(i=0;i<8;i++){
    si=Isbit7(cmd);
    cmd=cmd<<1;
    while(sck==0);
    while(sck==1);
   }
   for(i=0;i<8;i++){
    while(sck==0);
    x=x<<1;
    x=x|so;
    while(sck==1);
   }   
   xcs=1;
   *dat=x;
   break;}
  case WRSR:{
   x=*dat;
   while(sck==0);
   while(sck==1);
   xcs=0;
   for(i=0;i<8;i++){
    si=Isbit7(cmd);
    cmd=cmd<<1;
    while(sck==0);
    while(sck==1);
   }
   for(i=0;i<8;i++){    
    si=Isbit7(x);
    x=x<<1;
    while(sck==0);
    while(sck==1);
   }   
   xcs=1;   
   break;}
  case READ:{   
   cmd=cmd&0xF7;
   cmd=cmd|a8;
   xcs=1;
   while(sck==0);
   while(sck==1);
   xcs=0;
   for(i=0;i<8;i++){
    si=Isbit7(cmd);
    cmd=cmd<<1;
    while(sck==0);
    while(sck==1);
   }    
   for(i=0;i<8;i++){
    si=Isbit7(adr);  
    adr=adr<<1;
    while(sck==0);
    while(sck==1);
   }
   for(j=0;j<len;j++){
    for(i=0;i<8;i++){
     while(sck==0);
     x=x<<1;
     x=x|so;
     while(sck==1);
    }
    *(dat+j)=x;
   }
   xcs=1;   
   break;}
  case WRITE:{
   if(len>4) return 0; 
   
   cmd=cmd&0xF7;
   cmd=cmd|a8;

   while(sck==0);
   while(sck==1);
   xcs=0;
   for(i=0;i<8;i++){
    si=Isbit7(cmd);
    cmd=cmd<<1;
    while(sck==0);
    while(sck==1);
   }
   for(i=0;i<8;i++){
    si=Isbit7(adr);
    adr=adr<<1;
    while(sck==0);
    while(sck==1);
   }
   for(j=0;j<len;j++){
    x=*(dat+j);
    for(i=0;i<8;i++){    
     si=Isbit7(x);
     x=x<<1;
     while(sck==0);
     while(sck==1);
    }
   }   
   xcs=1;
   break;}
  default:{
   return 0;
   break;}
 }
 return 1;
}

//93LC66B
bit op93LC66B(unsigned char cmd,unsigned int addr,unsigned int len,unsigned int *dat)//93LC66B操作函数
{
 unsigned char i;
 unsigned int j;
 unsigned int x;
 unsigned char adr,a8;

 adr=addr;
 a8=(addr>>1)&0x80;

 xcs=0;
 switch(cmd){
  case ERASE:{
   while(sck==0);
   while(sck==1);
   xcs=1;
   for(i=0;i<3;i++){
    si=Isbit7(cmd);
    cmd=cmd<<1;
    while(sck==0);
    while(sck==1);
   }
   //si=Isbit7(a8);//9366A
   //while(sck==0);//9366A
   //while(sck==1);//9366A
   for(i=0;i<8;i++){
    si=Isbit7(adr);
    adr=adr<<1;
    while(sck==0);
    while(sck==1);
   }
   xcs=0;
   while(sck==0);
   while(sck==1);
   xcs=1;
   while(sck==0);
   while(sck==1);
   while(so==0);////////
   while(sck==0);
   while(sck==1);
   xcs=0;
   break;}
  case ERAL:{
   while(sck==0);
   while(sck==1);
   xcs=1;
   for(i=0;i<11;i++){//i<12 for 9366A
    si=Isbit7(cmd);
    cmd=cmd<<1;
    while(sck==0);
    while(sck==1);
   }
   xcs=0;
   while(sck==0);
   while(sck==1);
   xcs=1;
   while(sck==0);
   while(sck==1);
   while(so==0);////////
   while(sck==0);
   while(sck==1);
   xcs=0;
   break;} 
  case EWDS:
  case EWEN:{
   while(sck==0);
   while(sck==1);
   xcs=1;
   for(i=0;i<11;i++){//i<12 for 9366A
    si=Isbit7(cmd);
    cmd=cmd<<1;
    while(sck==0);
    while(sck==1);
   }   
   xcs=0;
   break;}  
  case READB:{
   while(sck==0);
   while(sck==1);
   xcs=1;
   for(i=0;i<3;i++){
    si=Isbit7(cmd);
    cmd=cmd<<1;
    while(sck==0);
    while(sck==1);
   }  
   //si=Isbit7(a8);//9366A
   //while(sck==0);//9366A
   //while(sck==1);//9366A
   for(i=0;i<8;i++){
    si=Isbit7(adr);
    adr=adr<<1;
    while(sck==0);
    while(sck==1);
   }
   for(j=0;j<len;j++){
    for(i=0;i<16;i++){//i<8 for 9366A
     while(sck==0);
     x=x<<1;
     x=x|so;
     while(sck==1);
    }
    *(dat+j)=x;
   }
   xcs=0;
   break;}
  case WRITEB:{
   x=*dat;
   while(sck==0);
   while(sck==1);
   xcs=1;
   for(i=0;i<3;i++){
    si=Isbit7(cmd);
    cmd=cmd<<1;
    while(sck==0);
    while(sck==1);
   }  
   //si=Isbit7(a8);//9366A
   //while(sck==0);//9366A
   //while(sck==1);//9366A
   for(i=0;i<8;i++){
    si=Isbit7(adr);
    adr=adr<<1;
    while(sck==0);
    while(sck==1);
   }
   for(i=0;i<16;i++){//i<8 for 9366A
    si=Isbit15(x);//Isbit7 for 9366A
    x=x<<1;
    while(sck==0);
    while(sck==1);
   }
   xcs=0;
   while(sck==0);
   while(sck==1);   
   xcs=1;
   while(sck==0);
   while(sck==1);
   while(so==0);////////
   while(sck==0);
   while(sck==1);
   xcs=0;
   break;}
  case WRAL:{
   x=*dat;
   while(sck==0);
   while(sck==1);
   xcs=1;
   for(i=0;i<11;i++){//i<12 for 9366A
    si=Isbit7(cmd);
    cmd=cmd<<1;
    while(sck==0);
    while(sck==1);
   }   
   for(i=0;i<16;i++){//i<8 for 9366A
    si=Isbit15(x);//Isbit7 for 9366A
    x=x<<1;
    while(sck==0);
    while(sck==1);
   }
   xcs=0;
   while(sck==0);
   while(sck==1);   
   xcs=1;
   while(sck==0);
   while(sck==1);
   while(so==0);////////
   while(sck==0);
   while(sck==1);
   xcs=0;
   break;}
  default:{
   return 0;
   break;}
 }
 return 1;
}

//extra:init IO port and convert 1bit to 4bit.
void initport(void)//初始化IO端口
{
 isin=1;linkok=1;txspeed=1;pow0=1;pow1=1;
}

void opBoardSel(unsigned char num)//板选输出
{
 unsigned char i;

 bcs=0;
 num=num<<4;
 while(sck==0); 
 while(sck==1);
 bcs=1;
 for(i=0;i<4;i++){
  bas=Isbit7(num);
  num=num<<1;
  while(sck==0);
  while(sck==1);
 }
 bcs=0;
}