/*****************************************/
/* Copyright (c) 2005, 通信工程學院      */
/* All rights reserved.                  */
/* 作    者：戴 佳						 */
/*****************************************/

#include "PPDataR.h"

/* 發送數據函數 */
uchar recvdata(uchar *buf)
{
	uchar i,tmp;
	uchar len;					// 保存數據長度
	uchar ecc;					// 保存校驗字節
	
	/* 接收數據長度字節 */
	RI = 0;
	while(!RI);
	len = SBUF;
	RI = 0;
	
	/* 使用len的值為校驗字節ecc賦初值 */
	ecc = len;					

	/* 接收數據 */
	for (i=0;i<len;i++)
	{
		while(!RI);
		*buf = SBUF;	
		ecc = ecc^(*buf);		// 進行字節校驗
		RI = 0;	
		buf++;		
	}
	*buf = 0;					// 表示數據結束
	
	/* 接收校驗字節 */
	while(!RI);
	tmp = SBUF;
	RI = 0;

	/* 進行數據校驗 */
	ecc = tmp^ecc;
	if (ecc!=0)					// 如果校驗錯誤
	{
		*(buf-len) = 0;			// 清空數據緩沖區
		
		/* 發送校驗錯誤信號ERR */
		TI = 0;	
		SBUF = ERR;
		while(!TI);
		TI = 0;

		return 0xff;			// 返回0xff表示校驗錯誤
	}

	/* 發送校驗成功信號SUCC */
	TI = 0;
	SBUF = SUCC;
	while(!TI);
	TI = 0;

	return 0;					// 校驗成功，返回0
}

void init_serial()
{
	TMOD = 0x20;				// 定時器T1使用工作方式2
	TH1 = 250;
	TL1 = 250;
	TR1 = 1;					// 開始計時
	PCON = 0x80;				// SMOD = 1
	SCON = 0x50;				// 工作方式1，波特率9600kbit/s，允許接收 
}

/* 主程序 */
void main()
{ 
	uchar tmp = 0;
	/* 串口初始化 */
	init_serial();

	EA = 0;					// 關閉所有中斷

	while(1)
	{
		/* 如果接收到的數據不是CALL，則繼續等待 */
		while (tmp!=CALL)
		{
			RI = 0;
			while(!RI)
			tmp = SBUF;
			RI = 0;
		}
	
		/* 檢測P0口判斷當前是否工作忙，若P0＝0xBB，則為忙狀態 */
		P0 = 0xff;
		tmp = P0;
		if(tmp==0xBB)		// 如果P0口為0xBB，發送BUSY信號
		{
			TI = 0;
			SBUF = BUSY;
			while(!TI);
			TI = 0;
			continue;
		}

		/* 否則發送OK信號，表示從機可以接收數據 */
		TI = 0;				
		SBUF = OK;
		while(!TI);
		TI = 0;

		/* 數據接收 */
		tmp = 0xff;
		while(tmp==0xff)
		{
			tmp = recvdata(buf);	// 校驗失敗返回0xff，接收成功返回0
		}
	}
}