⭐ 欢迎来到虫虫下载站! | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站

📄 mifare.c

📁 是上一个SMS消费机的充值机程序
💻 C
📖 第 1 页 / 共 5 页
字号:
					gcMoneyMarsterBlock = 0;
				}
			}
			else
			{
				if(gstWorkCardInfomation.lMoney>gstWorkCardInfomation.lMoneyBak)
				{
					gstWorkCardInfomation.lMoney = gstWorkCardInfomation.lMoneyBak;
					gcMoneyMarsterBlock = 1;
				}
				else
				{
					gstWorkCardInfomation.lMoneyBak = gstWorkCardInfomation.lMoney;
					gcMoneyMarsterBlock = 0;
				}
			}						
		}
		gstWorkCardInfomation.cGetInfoFinished |= SECTOR_MONEY;
	}	

	if(((cSectorFlag&SECTOR_TIMES)==SECTOR_TIMES)&&((gstWorkCardInfomation.cGetInfoFinished & SECTOR_TIMES)!=SECTOR_TIMES))
	{
		gstWorkCardInfomation.cGetInfoFinished |= SECTOR_TIMES;
	}	
	set_console_chinese();
	return 1;
}
//返回卡片信息
unsigned char ReturnCardInfomation(unsigned char *cReturnBuffer, unsigned short *iReturnLength)
{
	unsigned char i, j, k;
	unsigned long llSerialNo;
		
	SPT_set(64);
	for(i = 10;i;)
	{
		if (!SPT_read())
		{
			SPT_set(64);
			i --;
		}
		if(CardTypeARequest(PICC_REQIDL,gcATQ) == MI_OK)
			break;
	}	
	if(i!=0)
	{
		CardTypeAAnticollLevel1((unsigned char*)&llSerialNo);
//		Dispbcd(0,4, &llSerialNo, 4);
		CardTypeASelectLevel1((unsigned char*)&llSerialNo, gcATS);
		if ((llSerialNo != gstWorkCardKey.lSerialNo)||(gcGetKeyFinished != 4))
		{
			if(!GetCardKey(llSerialNo))		
				return ERR_POS_GETCARDKEY;
		}
		
		// for debug
		//		if((gstWorkCardInfomation.cKeyVerision==0xff)||(gstWorkCardInfomation.cKeyVerision==0xA0))
		//		{
		//			i = 0;
		//		}
		//		else 
		// for debug
		if(GetCardInformation(llSerialNo, SECTOR_ALL))
		{
			memcpy(cReturnBuffer, &gstWorkCardInfomation.lSerialNo, 4);
			memcpy(cReturnBuffer+4, gstWorkCardInfomation.cCityCode, 2);
			memcpy(cReturnBuffer+6, gstWorkCardInfomation.cTradeCode, 2);
			memcpy(cReturnBuffer+8, &gstWorkCardInfomation.lCardNo, 4);
			cReturnBuffer[12] = gstWorkCardInfomation.cCardType;
			k = 13;
			if(gstWorkCardInfomation.cCardType>0x20)
			{
				switch(gstWorkCardInfomation.cCardType)
				{
				case CARD_DATA_GATHER:		
				case CARD_DEV_SET:			
				case CARD_NUMBER_SET:		
				case CARD_TOLL_START:		
				case CARD_TIME_SET:			
				case CARD_LEV_BUS:			
				case CARD_ARV_BUS:			
				case CARD_AUTHEN_DEV:		
				case CARD_MONTH_STA:		
				case CARD_NEW_CARD:					
					break;
				case CARD_DRIVER_BUS:		
				case CARD_CLERK_BUS:		
					gcSector = gstWorkCardInfomation.stCardStruct.cHistorySector[0];
					gcBlock = gcSector * 4;
					if (!AuthenCard(&llSerialNo, gcSector, MIF_WRITE)) return ERR_MIF_AUTEN;
					if (CardMFCRead16Bytes(gcBlock, gcMifBuffer)!=MI_OK) return ERR_MIF_READ;
					memcpy(cReturnBuffer+k, gcMifBuffer, 8);						
					k += 8;
					break;
				}
			}
			else	
			{
				memcpy(cReturnBuffer+k, gstWorkCardInfomation.cLimitDate, 4);
				k+=4;
				OverTurnString(cReturnBuffer+k, &gstWorkCardInfomation.lMoney, 4);
				k+=4;
			}
			*iReturnLength = k;
			cReturnBuffer[*iReturnLength] = gstWorkCardInfomation.cBlackListFlag;
			*iReturnLength = *iReturnLength + 1;
			return ST_OK;
		}
	}
	return ERR_POS_ERRORCHKCARD;
}
//设置黑名单标志
unsigned char SetBlackListFlag(unsigned long lSerialNo, unsigned char cNewCardFlag)
{
	unsigned char  i, k;
	unsigned long llSerialNo;	

	if (gcAuthenMode ==2)
	{
		SPT_set(64);
		for(i = 10;i;)
		{
			if (!SPT_read())
			{
				SPT_set(64);
				i --;
			}
			if(CardTypeARequest(PICC_REQIDL,gcATQ) == MI_OK)
				break;
		}
		if(i!=0)
		{
			CardTypeAAnticollLevel1((unsigned char*)&llSerialNo);
			CardTypeASelectLevel1((unsigned char*)&llSerialNo, gcATS);
			if ((llSerialNo != glSerialNo)||(gcGetKeyFinished != 4))
			{
				GetCardKey(llSerialNo);			
			}
			if (gstWorkCardInfomation.cGetInfoFinished != SECTOR_ALL)
				if (GetCardInformation(llSerialNo, SECTOR_ALL)!=1)
					return ERR_POS_GETCARDINFO;
//			gstWorkCardInfomation.cGetInfoFinished = 0;			
			if (lSerialNo != llSerialNo)
				return ERR_POS_NOTSAMECARD;

			if(cNewCardFlag == 0x04)	
			{
				if(gstWorkCardInfomation.cBlackListFlag == 04)	
				{
					return ERR_POS_ALREADYBLCARD;
				}
			}
			else if(cNewCardFlag == 0x00)	
			{
				if(gstWorkCardInfomation.cBlackListFlag == 0x00)	
				{
					return ERR_POS_NOTBLCARD;
				}
			}
			else
				return ERR_POS_ERRORPARM;
//			guDate.l_word = RTC_read_date();
//			guTime.l_word = RTC_read_time();
//			sprintf(gcASCDateTime, "%04d%02d%02d%02d%02d%02d", guDate.fields.year, guDate.fields.month, guDate.fields.day, guTime.fields.hour, guTime.fields.minute, guTime.fields.second);
			getBCDDateTime(gcASCDateTime);
			memcpy(gcNowTime, ASC2BCD(gcASCDateTime,14), 7);
			for(i=0;i<3;i++)
				gcHexNowTime[i] = (gcNowTime[i] >> 4) * 10 + (gcNowTime[i] & 0x0f);
			i = CompareDate(gcNowTime, (unsigned char*)gstWorkCardInfomation.cLimitDate);

			if (i == 2)
				return ERR_POS_OUTOFLIMIT;

			gcSector = gstWorkCardInfomation.stCardStruct.cPublicSector;
			gcBlock = gcSector*4;
			if(!AuthenCard(&lSerialNo, gcSector, MIF_WRITE)) return ERR_MIF_AUTEN;
			for(k=0;k<3;k++)
				if(CardMFCRead16Bytes(gcBlock, gcMifBuffer)==MI_OK) break;
			if(k==3) return ERR_MIF_READ;
			gcMifBuffer[6] = cNewCardFlag;
			gcMifBuffer[15] = 0;
			for(i=0;i<15;i++)
				gcMifBuffer[15]^=gcMifBuffer[i];
			for(k=0;k<3;k++)
				if(CardMFCWrite16Bytes(gcBlock, gcMifBuffer)==MI_OK) break;
			if(k==3) return ERR_MIF_WRITE;
			for(i=0;i<16;i++)
				gcMifBuffer[i]= 0xff - gcMifBuffer[i];
			for(k=0;k<3;k++)
				if(CardMFCWrite16Bytes(gcBlock+1, gcMifBuffer)==MI_OK) break;
			if(k==3) return ERR_MIF_WRITE;
			gstWorkCardInfomation.cBlackListFlag = cNewCardFlag;
			gstWorkCardInfomation.cGetInfoFinished &= MASK_SECTOR_PUBLIC;
			GetCardInformation(lSerialNo, SECTOR_PUBLIC);
		}
		else
			return ERR_POS_NOCARD;
	}
	return ST_OK;
}

//充值交易
//
//
unsigned char ChargeMoneyOrTimes(unsigned char Cmd, unsigned long lSerialNo, unsigned long lChargeMoney, unsigned char *cDate)
{
	unsigned char i, j, k, tmpbuff[200];
	unsigned long llSerialNo;	
	
//	clr_scr();
//	Dispbcd(0,0, &lSerialNo, 4);
//	DispLong(0,2, lChargeMoney);
	if(gcAuthenMode !=2) return ERR_POS_DEVICENOTAUTH;
	glChargeMoney = lChargeMoney;
	switch(Cmd)
	{
	case CMD_CHARGE_MONEY:		
		gcChargeMode = MODE_CHARGE_MONEY;
		gcChargeMode2 = PICC_INCREMENT;
		gcChargeType = CHARGETYPE_INCMONEY;
		break;
	case CMD_CHARGE_SMONEY:
		gcChargeMode = MODE_CHARGE_TIMES;
		gcChargeMode2 = PICC_INCREMENT;
		gcChargeType = CHARGETYPE_INCTIMES;
		memcpy(gcChargeTimesDate, cDate, 3);
		break;
	case CMD_CHARGE_MONEYN:
		gcChargeMode = MODE_CHARGE_MONEY;
		gcChargeMode2 = PICC_DECREMENT;
		gcChargeType = CHARGETYPE_DECMONEY;
		break;
	case CMD_CHARGE_SMONEYN:	
		gcChargeMode = MODE_CHARGE_TIMES;
		gcChargeMode2 = PICC_DECREMENT;
		gcChargeType = CHARGETYPE_DECTIMES;
		memcpy(gcChargeTimesDate, cDate, 3);
		break;
	case CMD_PURCHASE_MONEY:
		gcChargeMode = MODE_CHARGE_MONEY;
		gcChargeMode2 = PICC_DECREMENT;
		gcChargeType = CHARGETYPE_PURMONEY;
		break;
	case CMD_PURCHASE_TIMES:
		gcChargeMode = MODE_CHARGE_TIMES;
		gcChargeMode2 = PICC_DECREMENT;
		gcChargeType = CHARGETYPE_PURTIMES;
		memcpy(gcChargeTimesDate, cDate, 3);
		break;
	}
	SPT_set(64);
	for(i = 10;i;)
	{
		if (!SPT_read())
		{
			SPT_set(64);
			i --;
		}
		if(CardTypeARequest(PICC_REQIDL,gcATQ) == MI_OK)
			break;
	}	
	if(i!=0)
	{
		CardTypeAAnticollLevel1((unsigned char*)&llSerialNo);
//		Dispbcd(0,4, &llSerialNo, 4);
		CardTypeASelectLevel1((unsigned char*)&llSerialNo, gcATS);
		if ((llSerialNo != gstWorkCardKey.lSerialNo)||(gcGetKeyFinished != 4))
		{
			GetCardKey(llSerialNo);
		}
		if (gstWorkCardInfomation.cGetInfoFinished != SECTOR_ALL)
			if (GetCardInformation(llSerialNo, SECTOR_ALL)!=1)
				return ERR_POS_GETCARDINFO;
//		gstWorkCardInfomation.cGetInfoFinished = 0;			
		if (lSerialNo != llSerialNo)
			return ERR_POS_NOTSAMECARD;
		if(gstWorkCardInfomation.cCardType > 0x1f)
			return ERR_POS_NOTCUMSCARD;
		if(gstWorkCardInfomation.cBlackListFlag == 0x04)
			return ERR_POS_BLCARD;		
		if(gstWorkCardInfomation.cUsageFlag != 2)
			return ERR_POS_CARDNOTSTART; 

//for debug
//		memcpy(tmpbuff, gstWorkCardInfomation.cCityCode, 2);
//		memcpy(tmpbuff+2, gstWorkCardInfomation.cTradeCode, 2);
//		memcpy(tmpbuff+4, &gstWorkCardInfomation.lCardNo, 4);
//		if(findBlackList(tmpbuff)==ST_OK)
//		{
//			i = SetBlackListFlag(lSerialNo, 0x04);
//			if(i==ST_OK)
//				return ERR_POS_BLCARD;
//			else
//				return i;
//		}
//for debug
		guDate.l_word = RTC_read_date();
		guTime.l_word = RTC_read_time();
		sprintf(gcASCDateTime, "%04d%02d%02d%02d%02d%02d", guDate.fields.year, guDate.fields.month, guDate.fields.day, guTime.fields.hour, guTime.fields.minute, guTime.fields.second);
//		getBCDDateTime(gcASCDateTime);
		memcpy(gcNowTime, ASC2BCD(gcASCDateTime,14), 7);
		for(i=0;i<3;i++)
			gcHexNowTime[i] = (gcNowTime[i] >> 4) * 10 + (gcNowTime[i] & 0x0f);
/*		clr_scr();
		Dispbcd(0,0, gcASCDateTime, 14);
		Dispbcd(0,4, gcNowTime, 7);
		Dispbcd(0,6, gstWorkCardInfomation.cLimitDate, 4);
*/		i = CompareDate(gcNowTime, (unsigned char*)gstWorkCardInfomation.cLimitDate);

		if (i == 2)
			return ERR_POS_OUTOFLIMIT;
		if(gcChargeMode2 == PICC_DECREMENT)
		{
			if((gcChargeType != CHARGETYPE_PURMONEY)&&(gcChargeType != CHARGETYPE_PURTIMES))
			{
				if(((gcChargeType == CHARGETYPE_DECMONEY)&&(gstWorkCardInfomation.cHistoryChargeType == CHARGETYPE_INCMONEY))||((gcChargeType == CHARGETYPE_DECTIMES)&&(gstWorkCardInfomation.cHistoryChargeType == CHARGETYPE_INCTIMES)))
				{
	
					if ((gstWorkCardInfomation.lHistoryChargeMoney != glChargeMoney)||(memcmp(gstWorkCardInfomation.cHistoryPSAMNo, gcPSAMNo, 4) != 0))
						return ERR_CHG_CANNOTCHARGEN;
				}
				else 
					return ERR_CHG_CANNOTCHARGEN;
			}
			else
			{
				if(gcChargeMode == MODE_CHARGE_MONEY)
				{
					if(gstWorkCardInfomation.lMoney<glChargeMoney)
						return ERR_POS_NOTENOUGHMONEY;
				}
			}			
		}
		
		if (!WriteChargeStep(1)) return ERR_POS_WRITECHRSTEP;
		
		if(gcChargeMode == MODE_CHARGE_MONEY)	
		{
			gcSector = gstWorkCardInfomation.stCardStruct.cMoneySector;
			gcBlock = gcSector * 4;
			if(!ModifyMoney(gcChargeMode2, gcBlock + gcMoneyMarsterBlock + 1, glChargeMoney)) return ERR_POS_MODIFYMONEY;
			if(!IsValidMoney(gcSector, gcBlock + gcMoneyMarsterBlock + 1)) return ERR_POS_MODIFYMONEY;

			if(CardMFCRead16Bytes(gcBlock, gcMifBuffer)!=MI_OK) return ERR_MIF_READ;
			if (gcChargeMode2 == PICC_INCREMENT)
			{
				gstWorkCardInfomation.lMoneySum += glChargeMoney;
				gstWorkCardInfomation.lCurMoney = gstWorkCardInfomation.lMoney + glChargeMoney;
			}
			else
			{
				gstWorkCardInfomation.lMoneySum -= glChargeMoney;
				gstWorkCardInfomation.lCurMoney = gstWorkCardInfomation.lMoney - glChargeMoney;
			}
//			memcpy(gcMifBuffer, &gstWorkCardInfomation.lMoneySum, 4);
			OverTurnString(gcMifBuffer, &gstWorkCardInfomation.lMoneySum, 4);
//			memcpy(gcMifBuffer+4, &gstWorkCardInfomation.lCurMoney, 4);
			OverTurnString(gcMifBuffer+4, &gstWorkCardInfomation.lCurMoney, 4);
			memcpy(gcMifBuffer+8, gcPSAMNo, 4);
			memset(gcMifBuffer+12, 0, 4);
			for(i=0;i<15;i++)
				gcMifBuffer[15] ^= gcMifBuffer[i];
			for(k=0;k<3;k++)
				if(CardMFCWrite16Bytes(gcBlock, gcMifBuffer)==MI_OK) break;
			if(k==3) return ERR_MIF_WRITE;

			if(!ModifyPoint()) return ERR_POS_WRITECHRPOINT;

			if(!WriteChargeStep(0x02)) return ERR_POS_WRITECHRSTEP;

			CopyBlock(gcSector, gcBlock, gcBlock+1, 1);

			gcSector = gstWorkCardInfomation.stCardStruct.cMoneySector;
			gcBlock = gcSector * 4;
			AuthenCard(&lSerialNo, gcSector, MIF_WRITE);
			CopyBlock(gcSector, gcBlock + gcMoneyMarsterBlock + 1, gcBlock + 2 - gcMoneyMarsterBlock, 0);
		}
		
//		clr_scr();
//		move_cursor(0,0);
//		set_console_english();
//		puts("BuildRecord");
//		getch();
//		set_console_chinese();
		if(BuildRecord()!=ST_OK) return ERR_POS_BUILDRECORD;
		if(gcChargeMode == MODE_CHARGE_MONEY)
		{
			gstWorkCardInfomation.cGetInfoFinished &= (MASK_SECTOR_MONEY&MASK_SECTOR_HISTORY&MASK_SECTOR_PUBLIC);
//			GetCardInformation(lSerialNo, SECTOR_MONEY|SECTOR_HISTORY|SECTOR_PUBLIC);
		}		
	}
	else
		return ERR_POS_NOCARD;
	return ST_OK;
}
//卡片恢复
unsigned char CardRestore(unsigned char cMode)
{
	unsigned char cFlag1, cFlag2, i, k, cMarsterBlock, cOperMode;
	unsigned long lMoney1, lMoney2;	


	for (k=0;k<2;k++)
	{
		if (k==0)	
		{
			gcSector = gstWorkCardInfomation.stCardStruct.cMoneySector;
			cMarsterBlock = gcMoneyMarsterBlock;
			if ((gstWorkCardInfomation.cHistoryChargeType == CHARGETYPE_PURMONEY)||(gstWorkCardInfomation.cHistoryChargeType == CHARGETYPE_DECMONEY)||(gstWorkCardInfomation.cHistoryChargeType == CHARGETYPE_INCMONEY))	
				cOperMode = cMode;
			else
				cOperMode = 'B';
		}
		else
		{
			if(gstWorkCardInfomation.stCardStruct.cEveTimesSector!=0xff)
			{

⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -