📄 ic_card_read_and_write.c
字号:
// SLE4442卡的底层操作程序
#include <stdio.h>
#include <intrins.h>
#include <reg52.h>
typedef unsigned char uchar;
typedef unsigned int uint;
#define RMM_COMM 0x30 // 读主存命令字
#define UMM_COMM 0x38 // 写主存命令字
#define CVD_COMM 0x33 // 校验密码
#define RSM_COMM 0x31 // 读密码存储区
#define USM_COMM 0x39 // 写密码存储区
#define RPM_COMM 0x34 // 读保护存储区
#define WPM_COMM 0x3c // 写保护存储区
#define Pow_On 0 // 低电平供电
#define Pow_Off 1 // 高电平断电
//******************************************
//定义IC卡接口
sbit CLK=P1^1; // 时钟
sbit OUTDATA=P1^2; // 输出(CPU侧)
sbit INDATA=P1^2; // 输入(CPU侧)
sbit POWER=P1^4; // 电源
sbit RST=P1^0; // 复位
//******************************************
//************************************************************************
// 4442卡底层程序的外部函数声明
extern void Rmm(uchar CardAdd,uchar idata *pt,uchar i);
// 读IC卡主存
extern void Umm(uchar CardAdd,uchar idata *pt);
// 写IC卡主存,每次写一字节
extern void Rpm(uchar idata *pt);
// 读保护存储器
extern void P_Byte(uchar CardAdd,uchar idata *pt); //
// 保护一字节,注意待保护的字节是已经写入过的,地址只能在保护存储区内
extern void Power_On(uchar idata *pt);
// 卡上电,延时约80us,卡复位,同时读入4个标示字节
extern void Power_Off(void);
// 卡下电,延时约80us
extern bit Verify(uchar idata *pt);
// 校验密码,成功返回1
//******************************************************************
//************************************************************
//功能演示,在实际用的时候把这段注释掉
void main(void)
{
uchar idata *pt;
uchar cc;
bit temp_flag;
uchar test[12]={1,2,3,4,5,6,7,8,9};
uchar test1[12];
pt=&test1[0];
Power_Off();
Power_On(pt); //上电同时读入标示字节
*pt=0xff; //第一个密码
pt++;
*pt=0xff; //第二个密码
pt++;
*pt=0xff; //第三个密码
pt=&test1[0];
temp_flag=Verify(pt); //校验密码
pt=&test1[0];
Rpm(pt); //读入保密区字节
pt=&test[0];
for (cc=0;cc<10;cc++,pt++)
Umm(0x40+cc,pt);
pt=&test1[0];
Umm(0x40+cc,pt);
Rmm(0x40,pt,12);
*pt=0xaa;
Umm(0x04,pt);
P_Byte(0x05,pt);
while (1);
}
//**********************************************
//******************************************
//延时10微秒（包括调用和返回的时间）,base=12M
//入口：没有入口
//出口：无
static void Delay10us(void)
{
_nop_();
_nop_();
_nop_();
_nop_();
_nop_();
_nop_();
}
//******************************************
//******************************************
//输出一个字节
//入口：一个uchar形变量
//出口：无
static void OutByte(uchar ch)
{
uchar i;
for (i=8;i>0;i--)
{
OUTDATA = (bit)(ch&0x01); // 强制取为位
//变量，输出
_nop_();_nop_();_nop_();_nop_();_nop_();
CLK=1;
Delay10us();
CLK=0;
ch=ch>>1;
// 右移一位
}
}
//******************************************
//******************************************
//输入一个字节
//入口：没有入口
//出口：一个uchar形变量
static uchar InByte(void)
{
uchar i,a;
a=0;
INDATA=1; //置为输出状态
for (i=8;i>0;i--)
{
a=a>>1;
if((uchar)INDATA)
a|=0x80;
CLK=1;
Delay10us();
CLK=0;
Delay10us();
}
return(a);
}
//*****************************************
//*****************************************
//结束命令模式
//入口：没有入口
//出口：无
static void Stop_Comm(void)
{
OUTDATA=0;
Delay10us();
CLK=1;
Delay10us();
OUTDATA=1;
Delay10us();
}
//*****************************************
//*****************************************
//开始命令模式
//入口：没有入口
//出口：无
static void Start_Comm(void)
{
OUTDATA=1;
_nop_();_nop_();_nop_();_nop_();_nop_();_nop_(); //延时6us
CLK=1;
_nop_();_nop_();_nop_();_nop_();_nop_();_nop_();
OUTDATA=0;
_nop_();_nop_();_nop_();_nop_();_nop_();_nop_();
CLK=0;
_nop_();_nop_();_nop_();
}
//******************************************
//******************************************
//处理模式,开始处理模式后，卡片将输入口拉低，然后等待输入口变成高电平，
//如果等待超过10ms(BASE=12M)，程序退出
//入口：没有入口
//出口：无
static void Proce_Mod(void)
{
uint i;
CLK=0;
Delay10us();
OUTDATA=1;
INDATA=0;
for (i=620;i>0;i--)
{
CLK=1;
Delay10us();
CLK=0;
Delay10us();
if(INDATA) //输入为高就跳出
{
break;
}
}
}
//******************************************
//******************************************
//发送命令
//入口：a＝命令字,b＝地址,c数据
//出口：无
static void SendComm(uchar a,uchar b,uchar c)
{
Start_Comm(); //开始发送命令
OutByte(a); //发命令字
OutByte(b); //发地址
OutByte(c); //发数据
Stop_Comm(); //结束发送命令
}
//******************************************
//******************************************
//卡复位,用于结束读模式
//入口:无
//出口:无
static void RstCard(void)
{
uchar temp;
RST=1;
Delay10us();
CLK=1;
Delay10us();
Delay10us();
CLK=0;
Delay10us();
RST=0;
Delay10us(); //发出复位时序
temp=InByte();
temp=InByte();
temp=InByte();
temp=InByte(); //空读4次
}
//******************************************
//******************************************
//连续输入i(=<255)个字节,存放到以pt开头的内部单元中,
//必须在某一读数据命令模式之后使用
//入口：pt＝起始地址,i＝数据个数
//出口:无
static void Read_Mod(uchar idata *pt,uchar i)
{
CLK=0;
Delay10us();
do
{
*pt=InByte(); //读入一个字节
pt++; //指针加一
}
while(--i); //计数器减一,判断
}
//******************************************
//******************************************
//写IC卡主存,每次写一字节
//入口:IC卡地址,指向数据区的指针
//出口:无
extern void Umm(uchar CardAdd,uchar idata *pt)
{
SendComm(UMM_COMM,CardAdd,*pt); //写主存的命令字,地址,数据
Proce_Mod();
}
//******************************************
//******************************************
//读ic卡主存
//入口:卡地址,指向内部RAM的指针,数量
//出口:无
extern void Rmm(uchar cardAdd,uchar idata *pt,uchar i)
{
SendComm(RMM_COMM,cardAdd,0);
Read_Mod(pt,i);
RstCard();
}
//******************************************
//******************************************
//读保护存储器
//入口:指向直接寻址数据区的指针
//出口:无
extern void Rpm(uchar idata *pt)
{
SendComm(RPM_COMM,1,1); //读保护存储器的命令字,
后两个参数忽略
Read_Mod(pt,4); //
读出
}
//******************************************
//******************************************
//保护一字节,注意待保护的字节是已经写入过的,地址只能在保护存储区内
//入口:IC卡地址,指向直接寻址数据区的指针
//出口:无
extern void P_Byte(uchar CardAdd,uchar idata *pt)
{
SendComm(WPM_COMM,CardAdd,*pt); //写主存的命令字,地址,数据
Proce_Mod();
}
//******************************************
//******************************************
//卡上电,延时约80us,卡复位,同时读入4个标示字节
//入口:入口:指向存放标示的内部直接寻址RAM地址
//出口:无
extern void Power_On(uchar idata *pt)
{
uchar i=40;
POWER=Pow_On;
INDATA=1;
OUTDATA=1;
while(--i)
; //延时80us
RST=1;
Delay10us();
CLK=1;
Delay10us();
Delay10us();
CLK=0;
Delay10us();
RST=0;
Delay10us(); //复位
i=4;
do
{
*pt=InByte();
pt++;
}
while(--i); //读入4个标记字节
}
//******************************************
//******************************************
//卡下电,延时约80us
//入口:无
//出口:无
extern void Power_Off(void)
{
POWER=Pow_Off;
CLK=0;
OUTDATA=0;
INDATA=1;
RST=0;
}
//******************************************
//******************************************
//校验密码
//入口:指向存放密码的内部直接寻址RAM地址
//出口:成功返回1,失败返回0,卡片已锁也返回0
extern bit Verify(uchar idata *pt)
{
uchar idata temp[4]; //暂
存4字节的保密区内容
uchar *tpt;
uchar i;
tpt=&temp[0];
SendComm(RSM_COMM,1,1); //读
保密存储区的命令字,第2,3个参数在此命令中被忽略
Read_Mod(tpt,4);
//读出
if((temp[0]&0x07)!=0)
//第一字节是重试计数器,如果重试计数器为0,直接退出
{
if((temp[0]&0x07)==0x07)
i=0x06;
else if((temp[0]&0x07)==0x06)
i=0x04;
else if((temp[0]&0x07)==0x04)
i=0x00;
//将其中一位为1的改为0
SendComm(USM_COMM,0,i);
//重写计数器
Proce_Mod();
//处理
for (i=1;i<4;i++,pt++)
//校对3字节的密码
{
SendComm(CVD_COMM,i,*pt); //发
出校对命令
Proce_Mod();
//处理
}
SendComm(USM_COMM,0,0xff);
//擦除计数器
Proce_Mod();
//处理
SendComm(RSM_COMM,1,1);
//读保密存储区的命令字,第2,3个参数在此命令中被忽略
tpt=&temp;
//写到数组
Read_Mod(tpt,4);
//读出计数器的内容
if((temp[0]&0x07)==0x07)
//如果没有被成功擦除,表明校对失败
return(1);
}
return(0);
}
//******************************************⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -