///////////應用SMBUS操作IIC ROM////////////////
////////IIC_ROM.c/////////////////////////////////
#include "smbus.h"
#include "absacc.h"
#define FLOATADR 0x0000
#define SLAVE_FLOATADR 0x0000
#define IIC_R 0x01
#define RETRY_MAX 50
/* IIC_R為SMBUS讀控制*/
#define IIC_W 0xfe
#define READ 0x01
#define ROMID 0x50
#define DATALEN 5
/* IIC_W為SMBUS寫控制*/
union int16{//采用聯合體實現16位與8位混合操作
	uint word;
	struct {uchar hi;uchar low;}split;
};
struct smbus_mes{
	uchar id;
	union int16 target_adr;
	uint self_adr;
	uchar len;
	uchar isread;
	uchar adr_end;
	uchar isbuserror;
};
xdata struct smbus_mes mes_M,mes_S;//將結構體定義到外部內存上
xdata float floattest _at_ FLOATADR;
xdata uchar *p;
void master_mes_creat(uchar id,uint target_adr,uint self_adr,uchar len,uchar dir){
	mes_M.id=id<<1;//id數據在7-1位，須右移1位
	mes_M.id&=IIC_W;//主機要發送從機的內存地址，故起始必然是寫操作
	mes_M.target_adr.word=target_adr;
	mes_M.self_adr=self_adr;
	mes_M.len=len;
	mes_M.isread=dir;
	mes_M.isbuserror=0;
}
void config(){//crossbar 使能，但并沒有進行外圍設備配置
	WDTCN = 0x07;	//看門狗禁止
  	WDTCN = 0xDE;    
   	WDTCN = 0xAD;
	SFRPAGE = 0x0F;
	XBR2&=~0x40;//關閉Crossbar;
	XBR0|=0x01;//將SMBUS配置到P口上
	XBR2|=0x40;//Crossbar 交叉開關使能，開啟Crossbar
 	P0MDOUT = 0x00; 
  	P1MDIN = 0xFF;  // P1數字輸入口
	SFRPAGE = 0x0F;
 	CLKSEL = 0x00;  // 選擇內部晶振8分頻
	OSCXCN = 0x00;	
	OSCICN = 0x84;	
}
void main(){
	xdata float pai=3.14159;
	xdata float float_get=0.0;
	bit needreceive;
	config();
	smbus_cfg(0x40,0xf1,0x70);
	/*
	smbus使能，AA=0,SCL高電平和低電平超時禁止
	smbus時鐘頻率為100khz
	自身從機地址為0x70/2,即為56（十進制），且廣播尋址禁止
	*/
	master_mes_creat(ROMID,0x7000,&pai,sizeof(float),0);
	/*
	讀從機浮點數的值(始地址為SLAVE_FLOATADR)
	將讀取值存放于始地址為FLOATADR的外部內存上
	*/
	EA=1;//打開全局中斷
	SFRPAGE=0x00;
	while(BUSY);//等待總線釋放
	smbusMasterStart();//主機發送起始位
	needreceive=1;
	while(1){
		SFRPAGE=0x00;
		if(!BUSY){//總線空閑時查詢總線傳輸狀況
			if(mes_M.isbuserror!=0)
				if(mes_M.len>0)
					smbusMasterStart();//再次發送。
			if(mes_M.len==0){
				if(needreceive){
					master_mes_creat(ROMID,0x7000,&float_get,sizeof(float),READ);
					smbusMasterStart();
					needreceive=0;
				}
			}
		}
		if(mes_M.len==0){
			if(!needreceive)
				needreceive=0;
		}
	}
}
void int0() interrupt 0{
}
void int1() interrupt 1{
}
void int2() interrupt 2{
}
void int3() interrupt 3{
}
void int4() interrupt 4{
}
void int5() interrupt 5{
}
void int6() interrupt 6{
}
void smbusInt() interrupt 7{//smbus中斷
//比較完善的SMBUS中斷處理程序，但是由于對各種狀態均作出處理，降低處理速度
//讀者可根據需要刪減一些狀態處理
	static uchar retry_time=0;
	SFRPAGE=0x00;
	if(SMB0STA==0x08){//起始位發送成功,主機模式下才會出現這種狀態
		SMB0DAT=mes_M.id;//將地址和讀寫控制裝入發送緩沖區
		STA=0;//將STA清零，注意，若不清零則將一直為重復起始狀態
		mes_M.adr_end=0;//內存地址沒有發送完畢
		goto bus_end;
	}
	if(SMB0STA==0x10){//重復起始條件處理
		SMB0DAT=mes_M.id;
		STA=0;
		mes_M.adr_end=0;//內存地址沒有發送完畢
		goto bus_end;
	}
	if(SMB0STA==0x18){//從地址+W發出，收到從機ACK應答
		SMB0DAT=mes_M.target_adr.split.hi;//發送內存高地址
		mes_M.adr_end=0;//內存地址沒有發送完畢
		retry_time=0;//將重試計數器清零
		goto bus_end;
	}
	if(SMB0STA==0x20){//從地址+W發出，收到從機NACK應答
		STO=1;
		retry_time++;
		if(retry_time<RETRY_MAX){
			STA=1;//若重試次數小于最大限值，則產生重復起始條件
		}
		else{
			mes_M.isbuserror=1;//isbuserror在初始化時須清零
			retry_time=0;//若大于重試次數，由于沒有將STA置1，不會產生重復起始條件
		//且須將retry_time即時清零，以便下一次SMBUS中斷時，重試次數從零開始計數
		}
		goto bus_end;
	}
	if(SMB0STA==0x28){//SMBUS數據成功發送，且收到從機ACK應答
		if(mes_M.len>0){
			if(mes_M.adr_end==0){//若內存地址沒有發送完畢，繼續發送內存地址
				SMB0DAT=mes_M.target_adr.split.low;//發送內存低地址	
				mes_M.adr_end=2;
			}
			else{
				if(mes_M.isread==READ){
				//更換角色，對從機寫完內存地址后，讀取從機發送過來的數據
					mes_M.id|=IIC_R;//將id中寫控制位改成讀控制位
					STA=1;//此時不需要將STO置1
				}
				else{
					SMB0DAT=XBYTE[mes_M.self_adr];
					//取自身外部內存相應地址上的數據發送到SMBUS總線上
					mes_M.target_adr.word++;//對從機操作的內存地址自增1
					mes_M.self_adr++;//自身內存地址自增1
					mes_M.len--;//數據長度減1
				/*
				主從機內存地址自增能保證當產生重復起始條件時，對于成功發送的數據不再重發
				*/
					}
				
			}
		}
		else{//若數據長度等于0，則停止發送
			STO=1;
			retry_time=0;
		}
		goto bus_end;
	}
	if(SMB0STA==0x30){//SMBUS數據成功發送，但接收到從機NACK應答
		STO=1;
		STA=1;//產生重復起始條件
		goto bus_end;
	}
	if(SMB0STA==0x38){//總線競爭失敗。
		STO=1;//發送停止幀，并把總線錯誤標志位置1。
		mes_M.isbuserror=1;
		goto bus_end;
	}
	if(SMB0STA==0x40){//從機地址+R發送成功，接收到從機ACK應答信號
		if(mes_M.len>1)
			AA=1;//下一接收數據不是最后數據，故AA置1，以應答從機
		else{
			if(mes_M.len==1)//下一數據為最后數據
				AA=0;
		}
		retry_time=0;//將重試計數器清零
		goto bus_end;
	}
	if(SMB0STA==0x48){//從機地址+R發送成功，但接收到從機NACK應答信號
		retry_time++;
		STO=1;
		if(retry_time<RETRY_MAX){//若小于重試最大限值，則繼續重試
			STA=1;
		}
		else{
			mes_M.isbuserror=1;//若大于重試最大限值，則停止總線，且將總線錯誤標志位置1
			retry_time=0;
			}
		goto bus_end;
	}
	if(SMB0STA==0x50){//接收到從機所發送的數據，并發送ACK應答信號
		if(mes_M.len>1)
			AA=1;//下一接收數據不是最后數據，故AA置1，以應答從機
		else{
			if(mes_M.len==1)//下一數據為最后數據
				AA=0;
		}
		XBYTE[mes_M.self_adr]=SMB0DAT;
		mes_M.self_adr++;
		mes_M.target_adr.word++;
		mes_M.len--;
		goto bus_end;
	}
	if(SMB0STA==0x58){//接收到從機所發送的最后一個數據，并發送NACK應答信號
		XBYTE[mes_M.self_adr]=SMB0DAT;
		mes_M.len=0;
		STO=1;//結束總線傳輸
		goto bus_end;
	}
	if(SMB0STA==0x00){//出現總線錯誤
		mes_M.isbuserror=1;
		mes_S.isbuserror=1;
		STO=1;
	}
bus_end:
		SI=0;
}