?? sle4442_b.c
字號:
/********************************************************************************
* 描述: *
* IC卡程序模塊 *
* *
* 30H-----------讀主存儲區(qū) *
* 34H-----------讀保護(hù)存儲區(qū) *
* 38H-----------寫主存儲區(qū) *
* 3CH-----------寫保護(hù)存儲區(qū) *
* 31H-----------讀保密存儲區(qū) *
* 33H-----------比較驗(yàn)證數(shù)據(jù) *
* 39H-----------更新保密存儲區(qū) *
* *
*******************************************************************************/
#include<reg51.h> /*=== 頭文件包含 ===*/
#include<intrins.h>
#include<absacc.h>
#include <IC_CARD_B.h>
#define uchar unsigned char
#define uint unsigned int
bdata uchar wbyte;
sbit wbyte_0=wbyte^0;
uchar RSTANSER[4]; /*4字節(jié)復(fù)位應(yīng)答*/
uchar ICCOMMAND[3]; /*3字節(jié)命令*/
uchar ICADDRESS; /*1字節(jié)地址*/
uchar ICDATAIN; /*1字節(jié)數(shù)據(jù)*/
uchar ICLENTH; /*1字節(jié)讀寫長度*/
uchar ICCODE[3]={0xff,0xff,0xff}; /*3字節(jié)密碼*/
uchar ICDATA[32]; /*32字節(jié)讀寫數(shù)據(jù)*/
void icdelay();
void cardpulse();
uchar cardrbyte();
void cardwbyte(uchar ss);
void rst_ans();
void sendcommand(uchar comm,uchar address,uchar odata);
void rdmm();
void rdpm();
void wrmm();
void wrpm();
void rdsm();
uchar rdsm_ec();
void sendpsc();
void wrsm(uchar ec);
void updatepsc();
uchar verifi();
/*main()
{
uchar i;
uchar EOC;
_nop_();
P1_4=1;
P1_4=0;
for(i=0;i<0x20;i++)
ICDATA[i]=0xf0; //要寫的數(shù)據(jù)
EOC=rdsm_ec(); //讀錯誤計(jì)數(shù)器
EOC=verifi(); //校驗(yàn)密碼
EOC=rdsm_ec();
wrmm(); //寫主存儲區(qū)
rdmm(); //再讀主存儲區(qū)
while(1);
}*/
/********************************************************************
函 數(shù) 名：icdelay()
功 能：延時10us
說 明：
入口參數(shù)：
返 回 值：
***********************************************************************/
void icdelay()
{
_nop_();
_nop_();
_nop_();
_nop_();
}
/********************************************************************
函 數(shù) 名：cardpulse()
功 能：產(chǎn)生時鐘脈沖
說 明：
入口參數(shù)：
返 回 值：
***********************************************************************/
void cardpulse()
{
SCL=1;
icdelay();
SCL=0;
icdelay();
}
/********************************************************************
函 數(shù) 名：cardbyte()
功 能：從SLE4442讀取一字節(jié)數(shù)據(jù)
說 明：
入口參數(shù)：
返 回 值：ACC
***********************************************************************/
uchar cardrbyte()
{
uchar i;
ACC=0;
SDA=1;
for(i=0;i<8;i++)
{
ACC=ACC>>1;
A_7=SDA;
cardpulse();
}
return ACC;
}
/********************************************************************
函 數(shù) 名：cardwbyte()
功 能：向SLE4442寫一字節(jié)命令或數(shù)據(jù)
說 明：
入口參數(shù)：uchar ss
返 回 值：
***********************************************************************/
void cardwbyte(uchar ss)
{
uchar i;
wbyte=ss;
for(i=0;i<8;i++)
{
SDA=wbyte_0;
wbyte=wbyte>>1;
cardpulse();
}
}
/********************************************************************
函 數(shù) 名：rst_ans()
功 能：復(fù)位與應(yīng)答(4個字節(jié)的復(fù)位應(yīng)答)
說 明：
入口參數(shù)：
返 回 值：
***********************************************************************/
void rst_ans()
{
uchar i;
RST=0;
SCL=0;
icdelay();
RST=1;
icdelay();
SCL=1;
icdelay();
SCL=0;
icdelay();
RST=0;
icdelay();
for(i=0;i<4;i++)
RSTANSER[i]=cardrbyte();
}
/********************************************************************
函 數(shù) 名：sendcommand()
功 能：發(fā)送命令
說 明：3字節(jié) 命令字＋地址＋數(shù)據(jù)
入口參數(shù)：uchar comm uchar address uchar odata
返 回 值：
***********************************************************************/
void sendcommand(uchar comm,uchar address,uchar odata)
{
SCL=1; /*start condition*/
icdelay();
SDA=0;
icdelay();
SCL=0;
cardwbyte(comm);
cardwbyte(address);
cardwbyte(odata);
SCL=0; /*stop condition*/
SDA=0;
icdelay();
SCL=1;
icdelay();
SDA=1;
icdelay();
SCL=0;
icdelay();
}
/********************************************************************
函 數(shù) 名：rdmm()
功 能：讀主存儲區(qū)
說 明：將數(shù)據(jù)讀取到數(shù)組ICDATA[]
入口參數(shù)：
返 回 值：
***********************************************************************/
void rdmm()
{
uchar i;
rst_ans();
sendcommand(0x30,0x20,0);
for(i=0;i<0x20;i++)
ICDATA[i]=cardrbyte();
}
/********************************************************************
函 數(shù) 名：rdpm()
功 能：讀保護(hù)存儲區(qū)
說 明：
入口參數(shù)：
返 回 值：
***********************************************************************/
void rdpm()
{
uchar i;
rst_ans();
sendcommand(0x34,0,0);
for(i=0;i<0x4;i++)
ICDATA[i]=cardrbyte();
}
/********************************************************************
函 數(shù) 名：wrmm()
功 能：寫主存儲區(qū)
說 明：
入口參數(shù)：
返 回 值：
***********************************************************************/
void wrmm()
{
uchar i,j;
uchar addr=0;
rst_ans();
for(i=0;i<0x20;i++)
{
addr=0x20+i;
sendcommand(0x38,addr,ICDATA[i]);
for(j=0xff;j>0;j--) /*256個時鐘脈沖擦除數(shù)據(jù)*/
cardpulse();
}
}
/********************************************************************
函 數(shù) 名：wrpm()
功 能：寫保護(hù)存儲區(qū)
說 明：
入口參數(shù)：
返 回 值：
***********************************************************************/
void wrpm()
{
uchar i;
rst_ans();
for(i=0;i<0x20;i++)
{
sendcommand(0x3c,i,ICDATA[i]);
for(i=0;i<0xff;i++) /*256個時鐘脈沖擦除數(shù)據(jù)*/
cardpulse();
}
}
/********************************************************************
函 數(shù) 名：rdsm()
功 能：讀保密存儲區(qū)
說 明：
入口參數(shù)：
返 回 值：
***********************************************************************/
void rdsm()
{
uchar i;
rst_ans();
for(i=0;i<0x20;i++)
sendcommand(0x31,0,0);
for(i=0;i<0x4;i++)
ICDATA[i]=cardrbyte();
}
/********************************************************************
函 數(shù) 名：rdsm_ec()
功 能：讀錯誤計(jì)數(shù)器
說 明：
入口參數(shù)：
返 回 值：erro
***********************************************************************/
uchar rdsm_ec()
{
uchar erro;
rst_ans(); /*RSTANSER[]={0xa2,0x13,0x10,0x91}*/
sendcommand(0x31,0,0);
erro=cardrbyte();
return erro;
}
/********************************************************************
函 數(shù) 名：wrsm()
功 能：更新保密存儲區(qū)
說 明：
入口參數(shù)：uchar ec
返 回 值：
***********************************************************************/
void wrsm(uchar ec)
{
uchar i;
rst_ans();
sendcommand(0x39,0,ec);
for(i=0xff;i>0;i--) /*256個時鐘脈沖擦除數(shù)據(jù)*/
cardpulse();
}
/********************************************************************
函 數(shù) 名：updatepsc()
功 能：更新密碼
說 明：
入口參數(shù)：
返 回 值：
***********************************************************************/
void updatepsc()
{
uchar i;
uchar j;
rst_ans();
for(i=0;i<0x03;i++)
{
sendcommand(0x39,(i+1),ICCODE[i]);
for(j=0xff;j>0;j--) /*256個時鐘脈沖擦除數(shù)據(jù)*/
cardpulse();
}
}
/********************************************************************
函 數(shù) 名：sendpsc()
功 能：比較校驗(yàn)數(shù)據(jù)
說 明：
入口參數(shù)：
返 回 值：
***********************************************************************/
void sendpsc()
{
uchar i;
uchar j;
uchar adrs=0;
rst_ans();
for(i=0;i<0x03;i++)
{
adrs=i+1;
sendcommand(0x33,adrs,ICCODE[i]);
for(j=123;j>0;j--)
cardpulse();
}
}
/********************************************************************
函 數(shù) 名：verifi()
功 能：校驗(yàn)密碼
說 明：
入口參數(shù)：
返 回 值：uchar EC
***********************************************************************/
uchar verifi()
{
uchar EC=0;
uchar temp;
EC=rdsm_ec(); /*讀錯誤計(jì)數(shù)器*/
EC=EC&0x07;
switch(EC)
{
case 0x00:
break;
case 0x07:
temp=0x03;
break;
case 0x06:
temp=0x02;
break;
case 0x05:
temp=0x01;
break;
case 0x04:
temp=0x00;
break;
case 0x03:
temp=0x01;
break;
temp=0;
}
if(!EC==0)
{
wrsm(temp); /*更新保密存儲區(qū)*/
sendpsc(); /*比較驗(yàn)證數(shù)據(jù)*/
wrsm(0x07); /*更新保密存儲區(qū)*/
EC=rdsm_ec(); /*讀錯誤計(jì)數(shù)器*/
EC=EC&0x07;
}
return EC;
}
?? 快捷鍵說明
復(fù)制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號
Ctrl + =
減小字號
Ctrl + -