mifare.c.bak

用于小商品消费的SMS消费机程序

#include <api.h>
#include <console.h>
#include <mifare530.h>
#include <database.h>
#include "PPOS.h"

const unsigned char gcDefaultKeyA[6] = {0xa0, 0xa1, 0xa2, 0xa3, 0xa4, 0xa5};
const unsigned char gcDefaultKeyB[6] = {0xb0, 0xb1, 0xb2, 0xb3, 0xb4, 0xb5};
const unsigned char gcDefaultKeyAf[6] = {0xff, 0xff, 0xff, 0xff, 0xff, 0xff};
const unsigned char gcDefaultKeyBf[6] = {0xff, 0xff, 0xff, 0xff, 0xff, 0xff};

extern unsigned char *BCD2ASC(unsigned char *strBCD, unsigned char cLenBCD);
extern unsigned char *ASC2BCD(unsigned char *strASC, unsigned char cLenASC);
extern void OverTurnString(void *strSource, void *strTarge, unsigned char cLength);

//认证卡片
unsigned char AuthenCard(unsigned long *lSerialNo, unsigned char Sector, unsigned char ModeSel)
{
	unsigned char keysel1, keysel2;
//	unsigned char cKey[6];
	unsigned char *pKey;
	int i;

	if (Sector>15) return 0;
	if(ModeSel == MIF_READ)
	{
		keysel1 = PICC_AUTHENT1A;
		pKey = gstWorkCardKey.cKeyA[Sector];
	}
	else if(ModeSel == MIF_WRITE)
	{
//		if ((gstWorkCardInfomation.cKeyVerision == 0xa0)||(gstWorkCardInfomation.cKeyVerision == 0xff))
//		{
//			keysel1 = PICC_AUTHENT1A;
//			pKey = gstWorkCardKey.cKeyA[Sector];
//		}
//		else
//		{
			keysel1 = PICC_AUTHENT1B;
			pKey = gstWorkCardKey.cKeyB[Sector];
//		}
	}
	else 
		return 0;		
	for(i=0;i<3;i++)
	{
//		clr_scr();
//		move_cursor(i,0);
//		puts("CardTypeARequest");
		if (CardTypeARequest(PICC_REQIDL, gcATQ)==MI_OK)
		{
//			move_cursor(i,1);
//			puts("CardTypeASelect");
			if (CardTypeASelectLevel1((unsigned char*)lSerialNo, gcATS)==MI_OK)
			{
//				move_cursor(i,2);
//				puts("CardMFCAuthKey");
				if (CardMFCAuthKey(keysel1, (unsigned char*)lSerialNo, pKey, Sector*4+3)==MI_OK)
				{
					break;
				}
			}
		}
	}
	if(i==3)
	{
//		move_cursor(i,3);
//		puts("ERR");
		return 0;
	}
	
//	move_cursor(i,3);
//	puts("OK");
	return 1;
}
/*
//认证卡片
unsigned char AuthenCard(unsigned long *lSerialNo, unsigned char Sector, unsigned char ModeSel)
{
	unsigned char keysel1, keysel2;
//	unsigned char cKey[6];
	unsigned char *pKey;
	int i;

	if (Sector>15) return 0;
	if(ModeSel == MIF_READ)
	{
		keysel1 = PICC_AUTHENT1A;
		pKey = gstWorkCardKey.cKeyA[Sector];
	}
	else if(ModeSel == MIF_WRITE)
	{
//		if ((gstWorkCardInfomation.cKeyVerision == 0xa0)||(gstWorkCardInfomation.cKeyVerision == 0xff))
//		{
//			keysel1 = PICC_AUTHENT1A;
//			pKey = gstWorkCardKey.cKeyA[Sector];
//		}
//		else
//		{
			keysel1 = PICC_AUTHENT1B;
			pKey = gstWorkCardKey.cKeyB[Sector];
//		}
	}
	else 
		return 0;		
	for(i=0;i<3;i++)
	{
//		clr_scr();
//		move_cursor(i,0);
//		puts("CardTypeARequest");
		if (CardTypeARequest(PICC_REQIDL, gcATQ)==MI_OK)
		{
//			move_cursor(i,1);
//			puts("CardTypeASelect");
			if (CardTypeASelectLevel1((unsigned char*)lSerialNo, gcATS)==MI_OK)
			{
//				move_cursor(i,2);
//				puts("CardMFCAuthKey");
				if (CardMFCAuthKey(keysel1, (unsigned char*)lSerialNo, pKey, Sector*4+3)==MI_OK)
				{
					break;
				}
			}
		}
	}
	if(i==3)
	{
//		move_cursor(i,3);
//		puts("ERR");
		return 0;
	}
	
//	move_cursor(i,3);
//	puts("OK");
	return 1;
}
*/
//M1卡复制数据块
unsigned char CopyBlock(unsigned char cSector, unsigned char cSource, unsigned char cTarget, unsigned char cMode)
{
	unsigned char i, k;

	for(k=0;k<3;k++)
	{
		if (CardMFCRead16Bytes(cSource, gcMifBuffer)==MI_OK)
		{
			if (cMode==1)
			{
				for(i=0;i<16;i++)
					gcMifBuffer[i] = 0xff - gcMifBuffer[i];
			}
			if (CardMFCWrite16Bytes(cTarget, gcMifBuffer)==MI_OK)
				break;
		}
	}
	if(k==3) return 0;
	return 1;
}
//M1卡比较数据块
unsigned char CompareBlock(unsigned char cSector, unsigned char cBlock1, unsigned char cBlock2, unsigned char cMode)
{
	unsigned char cBuffer[16];
	unsigned char i;
	
	if (CardMFCRead16Bytes(cBlock2, gcMifBuffer)!=MI_OK) return 0;
	memcpy(cBuffer, gcMifBuffer, 16);
	if (CardMFCRead16Bytes(cBlock1, gcMifBuffer)!=MI_OK) return 0;
	if (cMode==1)
	{
		for(i=0;i<16;i++)
			gcMifBuffer[i] = 0xff - gcMifBuffer[i];
	}
	if (memcmp(cBuffer, gcMifBuffer, 16)!=0)
		return 1;
	else
		return 2;
}
//判断钱包结构的合法性
unsigned char IsValidMoney(unsigned char cSector, unsigned char cBlock)
{
	unsigned char   i;

	CardMFCRead16Bytes(cBlock, gcMifBuffer);
	for(i=0;i<4;i++)
	{
		if(gcMifBuffer[i] != 0xff - gcMifBuffer[i+4]) return 0;
		if(gcMifBuffer[i]  != gcMifBuffer[i+8]) return 0;
	}
	if(gcMifBuffer[12] != gcMifBuffer[14]) return 0;
	if(gcMifBuffer[13] != gcMifBuffer[15]) return 0;
	if(gcMifBuffer[12] !=  0xff - gcMifBuffer[13]) return 0;
	return 1;
}
/*
//判断是否在黑名单中
unsigned char IsInBlack(unsigned long lCardNo)
{
	unsigned int i, start, end;
	unsigned char buf[4], cFlag, j;
	
	start = 0;
	end = giBlackListNum - 1;
	if(lCardNo < gcBlackList[start])
		return 0;
	else if(lCardNo == gcBlackList[start])
		return 1;
	if(lCardNo > gcBlackList[end])
		return 0;
	else if(lCardNo == gcBlackList[end])
		return 1;
	while(start!=end-1)
	{
        	i = (start + end) / 2;
		if(lCardNo < gcBlackList[i])
		{
			cFlag = 1;	
			break;
		}
		else if(lCardNo > gcBlackList[i])
		{
			cFlag = 2;	
			break;
		}
		else
			return 1;
		if(cFlag == 1)
		{
			end = i;
		}
		else
		{
			start = i;
		}
	}
	return 0;
}
*/
//生成交易记录
unsigned char BuildRecord()
{
	unsigned char  i;
	unsigned char  tmpbuf[100], tmpbuf2[20];
	struct sttSysRunTime srt;
	
	move_cursor(0,0);
	puts("BuildRecord");
	
	if( getSysRunTime(&srt) != 0 )                                //得到运行时参数出错
	{
		return 1;
	}
	glTradeCounter = srt.lTradeCounter;

	memset(&gstWorkChargeRecord, 0, sizeof(gstWorkChargeRecord));
	OverTurnString(gstWorkChargeRecord.cTraderCounter, &glTradeCounter, 4);
	OverTurnString(gstWorkChargeRecord.cSerialNo, &glSerialNo, 4);
	memcpy(gstWorkChargeRecord.cCityCode, gstWorkCardInfomation.cCityCode, 2);
	memcpy(gstWorkChargeRecord.cTradeCode, gstWorkCardInfomation.cTradeCode, 2);
	memcpy(gstWorkChargeRecord.cCardNo, &gstWorkCardInfomation.lCardNo, 4);
	memcpy(gstWorkChargeRecord.cCardAuthenCode, gstWorkCardInfomation.cAuthenCode, 4);
	gstWorkChargeRecord.cCardType = ((gstWorkCardInfomation.cCardType / 10) << 4) + (gstWorkCardInfomation.cCardType % 10);
	gstWorkChargeRecord.cChargeType = gcChargeType;
	memcpy((unsigned char*)&gstWorkChargeRecord.cChargeDateTime, gcNowTime, 7);	
	switch(gcChargeType)
	{
	case CHARGETYPE_LOGON:
		//管理卡设置流水号
		OverTurnString(gstWorkChargeRecord.cTotleChargeTimes, &gstWorkCardInfomation.iMoneyTotleTimes, 2);
		//操作员编号
		memcpy(gstWorkChargeRecord.cMoneyOrTimes, &gstWorkCardInfomation.lMoney, 4);
		
		gstWorkChargeRecord.cDate[0] = 0xff;						
		gstWorkChargeRecord.cDate[1] = 0xff;						
//		gstWorkChargeRecord.cRecordType = 2;
		break;
	case CHARGETYPE_SALE:
		gstWorkChargeRecord.cCardType = gcNewCardType;							
	case CHARGETYPE_INCMONEY:
	case CHARGETYPE_DECMONEY:
	case CHARGETYPE_PURMONEY:
//		memcpy(gstWorkChargeRecord.cTotleChargeTimes, &gstWorkCardInfomation.iMoneyTotleTimes, 2);
		OverTurnString(gstWorkChargeRecord.cTotleChargeTimes, &gstWorkCardInfomation.iMoneyTotleTimes, 2);
//		memcpy(gstWorkChargeRecord.cMoneyOrTimes, &gstWorkCardInfomation.lMoney, 4);
		OverTurnString(gstWorkChargeRecord.cMoneyOrTimes, &gstWorkCardInfomation.lMoney, 4);
//		memcpy(gstWorkChargeRecord.cChargeMoneyOrTimes, &glChargeMoney, 3);
		OverTurnString(gstWorkChargeRecord.cChargeMoneyOrTimes, (unsigned char*)&glChargeMoney+1, 3);
		gstWorkChargeRecord.cDate[0] = 0xff;						
		gstWorkChargeRecord.cDate[1] = 0xff;						
//		gstWorkChargeRecord.cRecordType = 2;
		break;
	case CHARGETYPE_INCTIMES:
	case CHARGETYPE_DECTIMES:
	case CHARGETYPE_PURTIMES:
//		memcpy(gstWorkChargeRecord.cTotleChargeTimes, &gstWorkCardInfomation.iTimesTotleTimes, 2);
		OverTurnString(gstWorkChargeRecord.cTotleChargeTimes, &gstWorkCardInfomation.iTimesTotleTimes, 2);
//		memcpy(gstWorkChargeRecord.cMoneyOrTimes, &gstWorkCardInfomation.lTimes, 4);
		OverTurnString(gstWorkChargeRecord.cMoneyOrTimes, &gstWorkCardInfomation.lTimes, 4);
//		memcpy(gstWorkChargeRecord.cChargeMoneyOrTimes, &glChargeMoney, 3);
		OverTurnString(gstWorkChargeRecord.cChargeMoneyOrTimes, (unsigned char*)&glChargeMoney+1, 3);
		gstWorkChargeRecord.cDate[0] = ((gcChargeTimesDate[1]/10)<<4)+gcChargeTimesDate[1]%10;						
		gstWorkChargeRecord.cDate[1] = ((gcChargeTimesDate[1]/10)<<4)+gcChargeTimesDate[1]%10;
//		gstWorkChargeRecord.cRecordType = 2;
		break;
	}

	memcpy(tmpbuf, (unsigned char*)&gstWorkChargeRecord+4, 36);
	tmpbuf[36] = 0x80;
	tmpbuf[37] = 0x00;
	tmpbuf[38] = 0x00;
	tmpbuf[39] = 0x00;
	
	memset(tmpbuf2, 0x00, sizeof(tmpbuf2));
	memcpy(tmpbuf2+8, gcCityNo, 2);
	tmpbuf2[10] = 0xff;
	for(i=0;i<8;i++)
		tmpbuf2[i] = 0xff - tmpbuf2[i+8];
//		
//	set_console_english();
//	clr_scr();
//	Dispbcd(0,0,tmpbuf2, 16);
//	set_console_chinese();
	
	delay_n_ms(20);
	if(!SelectFile(0, 0x1001)) return ERR_PSAM_SPKEY;
	delay_n_ms(20);

	i = InitForDescrypt(0x10, tmpbuf2, 0x44, 0x01);

	if (i != 1) return ERR_PSAM_SPKEY;
	delay_n_ms(2);
	i = MAC(40, tmpbuf);

	if (i != 4) return ERR_PSAM_SPKEY;
	delay_n_ms(20);
	if(!GetResponse(tmpbuf, i)) return ERR_PSAM_FUNC;

	memcpy(gstWorkChargeRecord.cTAC, tmpbuf, 4);
//	set_console_english();
//	clr_scr();
//	Dispbcd(0,0,(unsigned char*)&gstWorkChargeRecord+4, 40);
//	set_console_chinese();

	i=appendTradeRecord(&gstWorkChargeRecord);
	i = 0;
	if(i!=ST_OK)
	{
		return ERR_CHG_WRITEEEPROM;
	}
	return ST_OK;
}
//写交易进程标志
unsigned char WriteChargeStep(unsigned char cFlag)
{
	unsigned char  i;
	
	gcSector = gstWorkCardInfomation.stCardStruct.cPublicSector;
	gcBlock = gcSector * 4;
	if (cFlag > 2) return 0;
	if(!AuthenCard(&glSerialNo,gcSector,MIF_READ)) return 0;
	for(i=0;i<3;i++)
	{
		if (CardMFCRead16Bytes(gcBlock, gcMifBuffer)==MI_OK)
			break;
	} 
	if(i==3)return 0;
	gcMifBuffer[3] = cFlag;
	gstWorkCardInfomation.cChargeStep = cFlag;
	gcMifBuffer[15] = 0;
	for(i=0;i<15;i++)
		gcMifBuffer[15] ^= gcMifBuffer[i];
	for(i=0;i<3;i++)
	{
		if (CardMFCWrite16Bytes(gcBlock, gcMifBuffer)==MI_OK)
			break;
	} 
	if(i==3)return 0;
	return 1;
}
//更改钱包
unsigned char ModifyMoney(unsigned char cMode,unsigned char blck, unsigned long lMoney)
{
	unsigned char  i;

	switch(blck)
	{
	case 9:
		for(i=0;i<3;i++)
		{
			gcSector = gstWorkCardInfomation.stCardStruct.cMoneySector;
			if(AuthenCard(&glSerialNo,gcSector,MIF_READ))
				if(CardMFCValueWithTransfer(cMode, 9, 10, lMoney)==MI_OK)
					break;
		}
		if (i==3) return 0;
		break;
	case 10:
		for(i=0;i<3;i++)
		{
			gcSector = gstWorkCardInfomation.stCardStruct.cMoneySector;
			if(AuthenCard(&glSerialNo,gcSector,MIF_READ))
				if(CardMFCValueWithTransfer(cMode, 10, 9, lMoney)==MI_OK)
					break;
		}
		if (i==3) return 0;
		break;
	case 33:
		for(i=0;i<3;i++)
		{
			gcSector = gstWorkCardInfomation.stCardStruct.cEveTimesSector;
			if(AuthenCard(&glSerialNo,gcSector,MIF_READ))
				if(CardMFCValueWithTransfer(cMode, 33, 34, lMoney)==MI_OK)
					break;
		}
		if (i==3) return 0;
		break;
	case 34:
		for(i=0;i<3;i++)
		{
			gcSector = gstWorkCardInfomation.stCardStruct.cEveTimesSector;
			if(AuthenCard(&glSerialNo,gcSector,MIF_READ))