//////////////////////////////////////////////////////////////////////
// ParallelPro.cpp: implementation of the CParallelPro class.
//這個(gè)類負(fù)責(zé)對(duì)并口下載線進(jìn)行控制，利用"Isp編程方法對(duì)象"對(duì)器件編程
//////////////////////////////////////////////////////////////////////

#include "stdafx.h"
#include "EPro.h"
#include "Pro.h"
#include "ParallelPro.h"
#include "IsPro.h"
#include "At89s51Isp.h"//AT89S51的Isp編程方法


#ifdef _DEBUG
#undef THIS_FILE
static char THIS_FILE[]=__FILE__;
#define new DEBUG_NEW
#endif

//////////////////////////////////////////////////////////////////////
// Construction/Destruction
//////////////////////////////////////////////////////////////////////

CParallelPro::CParallelPro()
{
	//把所有的Isp編程方法對(duì)象加入到隊(duì)列
	m_arIsp.Add(new CAt89s51Isp);

}

CParallelPro::~CParallelPro()
{

}

extern CString m_strAppPath;//應(yīng)用程序所在的路徑

BOOL CParallelPro::InitPort(CPro* pPro,int nPort,int nProType,int nIspSpd)
{	//初始化并口和下載線
	TRACE("CParallelPro::InitPort,ProType:%d,nIspSpd:%d\n",nProType,nIspSpd);
	TRACE("Current Isp:%d\n",m_arIsp.GetSize());
	m_pPro=pPro;
	m_nProType=nProType;
	m_nIspSpd=nIspSpd;
	if(m_bPort=CParallelPort::InitPort())//初始化并口
		pPro->Notify(PRO_INIT_PARALLEL_SEC);
	else
		pPro->Notify(PRO_INIT_PARALLEL_ER);
	m_bThread=FALSE;
	if(nProType==1)//Easy Isp
	{
		CString strEasyIspIni;
		strEasyIspIni=m_strAppPath+"EasyIsp.ini";
		//從EasyIsp.ini文件獲得引腳配置信息
		//如果不存在"EasyIsp.ini"文件，則使用默認(rèn)的下載線配置(老版本的)
		m_nPinMosi=GetPrivateProfileInt("引腳控制","MOSI",14,strEasyIspIni);
		m_nPinMiso=GetPrivateProfileInt("引腳控制","MISO",15,strEasyIspIni);
		m_nPinSck=GetPrivateProfileInt("引腳控制","SCK",1,strEasyIspIni);
		m_nPinRst=GetPrivateProfileInt("引腳控制","RST",16,strEasyIspIni);
		m_nPinLe=GetPrivateProfileInt("引腳控制","LE",17,strEasyIspIni);
		m_nPinOe=GetPrivateProfileInt("引腳控制","OE",2,strEasyIspIni);
		m_nPinR1=GetPrivateProfileInt("引腳控制","R1",3,strEasyIspIni);
		m_nPinR2=GetPrivateProfileInt("引腳控制","R2",4,strEasyIspIni);
		m_bLe=GetPrivateProfileInt("鎖存控制(LE)","Enable",1,strEasyIspIni);
		m_b2Le=GetPrivateProfileInt("鎖存控制(LE)","Disable",0,strEasyIspIni);
		m_bOe=GetPrivateProfileInt("輸出控制(OE)","Enable",0,strEasyIspIni);
		m_b2Oe=GetPrivateProfileInt("輸出控制(OE)","Disable",1,strEasyIspIni);
		
	}
	else if(nProType==2)//Atmel ByteBlaster下載線
	{
		m_nPinRst=PIN_SELIN;//PIN_SELIN在ParallelPort做了定義
		m_nPinMosi=PIN_D0;
		m_nPinMiso=PIN_ACK;
		m_nPinSck=PIN_STROBE;
		m_nPinLe=PIN_D2;//不用le,為了延時(shí)假定一個(gè)不起作用的引腳
		m_bLe=0;
		m_b2Le=0;
		m_nPinOe=0;//不用oe
		m_nPinR1=m_nPinAf=PIN_AUTO;//保留
		m_nPinR2=m_nPinIni=PIN_INIT;//保留

	}
	else if(nProType==3)//Altera ByteBlaster下載線
	{
		m_nPinRst=3;
		m_nPinMosi=8;
		m_nPinMiso=11;
		m_nPinSck=2;
		m_nPinLe=14;//控制74244的le
		m_bLe=0;
		m_b2Le=0;//le常置低電平
		m_nPinOe=0;//沒(méi)有Oe
		m_nPinR1=0;//
		m_nPinR2=0;//無(wú)保留引腳
	}
	SetPinLogic(m_nPinLe,m_bLe);

	for(int n=0;n<m_arIsp.GetSize();n++)//初始化每個(gè)"Isp編程方法對(duì)象"
		m_arIsp.GetAt(n)->InitIsPro(this);
	return m_bPort;
}

CIsPro* CParallelPro::GetIsPro(BYTE FID)
{	//查找支持該FID的"Isp編程方法對(duì)象"
	for(int n=0;n<m_arIsp.GetSize();n++)
		if(m_arIsp.GetAt(n)->FID==FID)
			return m_pIsPro=m_arIsp.GetAt(n);
			//設(shè)置當(dāng)前"Isp編程方法對(duì)象"指針
	return NULL;
}

void CParallelPro::DetectPro(int FID)
{
	if(m_bPort)
		if(GetIsPro(FID)!=NULL)//查詢是否支持該FID
		{
			m_pPro->Notify(PRO_AVAILABLE);//查詢成功，通知"編程器就緒"
			return;
		}
	m_pPro->Notify(PRO_INVALID);//查詢失敗
}

void CParallelPro::ReadSign(BYTE FID)//讀特征字
{
	if(m_bThread)//如果上一次操作線程還沒(méi)結(jié)束
	{
		m_pPro->Notify(PRO_INVALID);
		return;
	}
	if(GetIsPro(FID)==NULL)//查詢是否支持該FID
	{
		m_pPro->Notify(PRO_WORK_INVALID);
		return;
	}
	m_nCurWork=1;//當(dāng)前操作標(biāo)識(shí)
	AfxBeginThread(ProWorkThread,this);
}

void CParallelPro::Erase(BYTE FID)
{
	if(m_bThread)//如果上一次操作線程還沒(méi)結(jié)束
	{
		m_pPro->Notify(PRO_INVALID);
		return;
	}
	if(GetIsPro(FID)==NULL)//查詢是否支持該FID
	{
		m_pPro->Notify(PRO_WORK_INVALID);
		return;
	}
	m_nCurWork=2;//當(dāng)前操作標(biāo)識(shí)
	AfxBeginThread(ProWorkThread,this);
}

void CParallelPro::BeginWrite(BYTE FID)
{
	if(m_bThread)//如果上一次操作線程還沒(méi)結(jié)束
	{
		m_pPro->Notify(PRO_INVALID);
		return;
	}
	if(GetIsPro(FID)==NULL)//查詢是否支持該FID
	{
		m_pPro->Notify(PRO_WORK_INVALID);
		return;
	}
	m_nCurWork=3;//當(dāng)前操作標(biāo)識(shí)
	AfxBeginThread(ProWorkThread,this);
}

void CParallelPro::BeginRead(BYTE FID)
{
	if(m_bThread)//如果上一次操作線程還沒(méi)結(jié)束
	{
		m_pPro->Notify(PRO_INVALID);
		return;
	}
	if(GetIsPro(FID)==NULL)//查詢是否支持該FID
	{
		m_pPro->Notify(PRO_WORK_INVALID);
		return;
	}
	m_nCurWork=4;//當(dāng)前操作標(biāo)識(shí)
	AfxBeginThread(ProWorkThread,this);
}

void CParallelPro::LockBit(BYTE FID,int nBit)
{
	if(m_bThread)//如果上一次操作線程還沒(méi)結(jié)束
	{
		m_pPro->Notify(PRO_INVALID);
		return;
	}
	if(GetIsPro(FID)==NULL)//查詢是否支持該FID
	{
		m_pPro->Notify(PRO_WORK_INVALID);
		return;
	}
	m_nLockBits=nBit;
	m_nCurWork=5;//當(dāng)前操作標(biāo)識(shí)
	AfxBeginThread(ProWorkThread,this);
}

UINT CParallelPro::ProWorkThread(LPVOID pParam)
{	//編程器(下載線)操作線程
	CParallelPro* pParlPro=(CParallelPro*)pParam;
	CPro* pPro=pParlPro->m_pPro;
	CIsPro* pIsPro=pParlPro->m_pIsPro;
	pParlPro->m_bThread=TRUE;
	TRACE("m_nCurWork:%d\n",pParlPro->m_nCurWork);
	pParlPro->SetPinLogic(pParlPro->m_nPinOe,pParlPro->m_bOe);
	//解除高阻狀態(tài)
	pIsPro->PreparePro();//編程前的準(zhǔn)備工作
	switch(pParlPro->m_nCurWork)//根據(jù)當(dāng)前操作標(biāo)識(shí)調(diào)用函數(shù)
	{
	case 1://讀特征字
		pIsPro->ReadSign(pPro->SignByte);
		//調(diào)用"Isp編程方法對(duì)象"中的編程方法
		pIsPro->ProOver();//編程結(jié)束后的工作
		pParlPro->m_bThread=FALSE;
		pPro->CheckChip();
		break;
	case 2://擦除器件
		pIsPro->Erase();
		//調(diào)用"Isp編程方法對(duì)象"中的編程方法
		pIsPro->ProOver();//編程結(jié)束后的工作
		pParlPro->m_bThread=FALSE;
		pPro->Notify(PRO_ERASE);
		break;
	case 3://寫(xiě)器件
		pPro->m_nDataLength=pPro->GetMinLength(pPro->m_pWriteBuf,0x10000);
		pIsPro->PreparePro();
		for(pPro->m_nAddr=0;pPro->m_nAddr<pPro->m_nDataLength;pPro->m_nAddr++)
		{
			if(!pIsPro->Write(pPro->m_pWriteBuf[pPro->m_nAddr],pPro->m_nAddr))
			{//調(diào)用"Isp編程方法對(duì)象"中的編程方法
				pIsPro->ProOver();//編程結(jié)束后的工作
				pPro->Notify(PRO_WRITE_ER);
				pParlPro->m_bThread=FALSE;
				return -1;
			}
			if(pPro->m_nAddr%0x0f==0)
				pPro->Notify(PRO_WRITE_BLOCK);
		}
		pIsPro->ProOver();
		pParlPro->m_bThread=FALSE;
		pPro->Notify(PRO_WRITE_OVER);
		break;
	case 4://讀器件
		if(!pPro->m_bCheck)
			pPro->m_nDataLength=pPro->GetCurChip()->RomSize*1024;
		if(pPro->m_nDataLength==0)
		{
			pPro->Notify(PRO_READ_OVER);
			TRACE("ReadRomThread(...) Over\n");
			break;
		}
		for(pPro->m_nAddr=0;pPro->m_nAddr<pPro->m_nDataLength;pPro->m_nAddr++)
		{
			pPro->m_pReadBuf[pPro->m_nAddr]=pIsPro->Read(pPro->m_nAddr);
			//調(diào)用"Isp編程方法對(duì)象"中的編程方法
			if(pPro->m_nAddr%0x0f==0)
				pPro->Notify(PRO_READ_BLOCK);
		}
		pIsPro->ProOver();//編程結(jié)束后的工作
		pParlPro->m_bThread=FALSE;
		pPro->Notify(PRO_READ_OVER);
		break;
	case 5://寫(xiě)鎖定位
		pIsPro->LockBit(pParlPro->m_nLockBits);
		//調(diào)用"Isp編程方法對(duì)象"中的編程方法
		pIsPro->ProOver();//編程結(jié)束后的工作
		pParlPro->m_bThread=FALSE;
		pPro->Notify(PRO_LOCK_BIT);
		break;
	default:
		pParlPro->m_bThread=FALSE;
		break;
	}
	//編程結(jié)束
	pParlPro->SetPinLogic(pParlPro->m_nPinOe,pParlPro->m_b2Oe);
	//高阻狀態(tài)
	return 0;
}


BOOL CParallelPro::GetMiso()//得到MISO引腳的電平
{
	if(m_nIspSpd==2)
	{
		return GetPinLogic(m_nPinMiso);
	}
	else if(m_nIspSpd==1)
	{
		SetPinLogic(m_nPinLe,m_bLe);//開(kāi)啟鎖存
		return GetPinLogic(m_nPinMiso);
	}
	else
	{
		SetPinLogic(m_nPinLe,m_bLe);//開(kāi)啟鎖存
		for(int n=0;n<=1000;n++)//延時(shí)
		{
		}
		SetPinLogic(m_nPinLe,m_b2Le);//關(guān)閉鎖存
		return GetPinLogic(m_nPinMiso);
	}
}

void CParallelPro::SetMosi(BOOL bLogic)
{
		
	if(bLogic)
		SetPinH(m_nPinMosi);
	else
		SetPinL(m_nPinMosi);
	if(m_nIspSpd==2)
	{
		return;
	}
	else if(m_nIspSpd==1)
	{
		SetPinLogic(m_nPinLe,m_bLe);//開(kāi)啟鎖存
		return;
	}
	else
	{
		SetPinLogic(m_nPinLe,m_bLe);//開(kāi)啟鎖存
		for(int n=0;n<=1000;n++)//延時(shí)
		{
		}
		SetPinLogic(m_nPinLe,m_b2Le);//關(guān)閉鎖存
	}
}

void CParallelPro::SetRst(BOOL bLogic)
{
	
	if(bLogic)
		SetPinH(m_nPinRst);
	else
		SetPinL(m_nPinRst);
	if(m_nIspSpd==2)
	{
		return;
	}
	else if(m_nIspSpd==1)
	{
		SetPinLogic(m_nPinLe,m_bLe);//開(kāi)啟鎖存
		return;
	}
	else
	{
		SetPinLogic(m_nPinLe,m_bLe);//開(kāi)啟鎖存
		for(int n=0;n<=1000;n++)//延時(shí)
		{
		}
		SetPinLogic(m_nPinLe,m_b2Le);//關(guān)閉鎖存
	}
}

void CParallelPro::SetSck(BOOL bLogic)
{
	if(bLogic)
		SetPinH(m_nPinSck);
	else
		SetPinL(m_nPinSck);
	if(m_nIspSpd==2)
	{
		return;
	}
	else if(m_nIspSpd==1)
	{
		SetPinLogic(m_nPinLe,m_bLe);//開(kāi)啟鎖存
		return;
	}
	else
	{
		SetPinLogic(m_nPinLe,m_bLe);//開(kāi)啟鎖存
		for(int n=0;n<=1000;n++)//延時(shí)
		{
		}
		SetPinLogic(m_nPinLe,m_b2Le);//關(guān)閉鎖存
	}
}


void CParallelPro::SckBytes(int nBytes)//通過(guò)下載線與器件通信
{
	for(int n=0;n<nBytes;n++)
	{	
		SetSck(0);
		SetMosi((OutBuf[n] & 0x80));//SCK為低電平時(shí)，發(fā)送一位
		SetSck(1);
		if(GetMiso())//SCK為搞電平時(shí)，接收一位
		{
		
			InBuf[n]=InBuf[n] | 0x80;
		}
		else
		{	
			InBuf[n]=InBuf[n] & 0x7f;
		}
		SetSck(0);
		SetMosi((OutBuf[n] & 0x40));
		SetSck(1);
		if(GetMiso())
		{
		
			InBuf[n]=InBuf[n] | 0x40;
		}
		else
		{	
			InBuf[n]=InBuf[n] & 0xbf;
		}
		SetSck(0);

		SetMosi((OutBuf[n] & 0x20));
		SetSck(1);
		if(GetMiso())
		{
		
			InBuf[n]=InBuf[n] | 0x20;
		}
		else
		{	
			InBuf[n]=InBuf[n] & 0xdf;
		}
		SetSck(0);

		SetMosi((OutBuf[n] & 0x10));
		SetSck(1);
		if(GetMiso())
		{
		
			InBuf[n]=InBuf[n] | 0x10;
		}
		else
		{	
			InBuf[n]=InBuf[n] & 0xef;
		}
		SetSck(0);

		SetMosi((OutBuf[n] & 0x08));
		SetSck(1);
		if(GetMiso())
		{
		
			InBuf[n]=InBuf[n] | 0x08;
		}
		else
		{	
			InBuf[n]=InBuf[n] & 0xf7;
		}
		SetSck(0);

		SetMosi((OutBuf[n] & 0x04));
		SetSck(1);
		if(GetMiso())
		{
		
			InBuf[n]=InBuf[n] | 0x04;
		}
		else
		{	
			InBuf[n]=InBuf[n] & 0xfb;
		}
		SetSck(0);

		SetMosi((OutBuf[n] & 0x02));
		SetSck(1);
		if(GetMiso())
		{
		
			InBuf[n]=InBuf[n] | 0x02;
		}
		else
		{	
			InBuf[n]=InBuf[n] & 0xfd;
		}
		SetSck(0);

		SetMosi((OutBuf[n] & 0x01));
		SetSck(1);
		if(GetMiso())
		{
		
			InBuf[n]=InBuf[n] | 0x01;
		}
		else
		{	
			InBuf[n]=InBuf[n] & 0xfe;
		}
		SetSck(0);
	}
}