main.c

P115 IC卡手持POS是天石科技32位IC卡POS系列产品之一

		delay(500);
	}
	clrscr();
	while (!(dev = open(AT1604, 0))) {
		ShowMessage("AT1604", "请插入正确卡片", MB_OK | MB_CANCEL, false);
		if (inkey() == vk_ESC) return;
		delay(500);
	}

	if (!ic_verify(dev, AT1604_PWD_SC, pwd)) {
		DisplayLine(0, "验密SC错误", ALIGN_CENTER, false);
		DisplayMidLine(3, "默认密码F0F0", ALIGN_CENTER, false);
		DisplayOkCancel(MB_CANCEL);
		get_key();
		close(dev);
		return;
	}

	clrscr();
	DisplayLine(0, "验密SC通过", ALIGN_CENTER, false);
	delay(500);

	if (!ic_verify(dev, AT1604_PWD_SC1, pwd1)) {
		DisplayLine(0, "验密SC1错误", ALIGN_CENTER, false);
		DisplayMidLine(3, "默认密码F6F6", ALIGN_CENTER, false);
		DisplayOkCancel(MB_CANCEL);
		get_key();
		close(dev);
		return;
	}
	clrscr();
	DisplayLine(0, "验密SC1通过", ALIGN_CENTER, false);
	delay(500);

	setopt(SELECT_AT1604_ZONE, AT1604_ZONE_1);
	clrscr();
	DisplayLine(0, "读取结果", ALIGN_CENTER, false);
	DisplayOkCancel(MB_OK);

	memset(buff, 0, sizeof(buff));
	read(dev, addr, buff, 6);
	DisplayLine(1, buff, ALIGN_RIGHT, false);

	if (get_key() == vk_ESC) {
		close(dev);
		return;
	}

	if (!ic_verify(dev, AT1604_PWD_EZ1, pwd1)) {
		DisplayLine(0, "验密EZ1错误", ALIGN_CENTER, false);
		DisplayMidLine(3, "默认密码F6F6", ALIGN_CENTER, false);
		DisplayOkCancel(MB_CANCEL);
		get_key();
		close(dev);
		return;
	}
	clrscr();
	DisplayLine(0, "验密EZ1通过", ALIGN_CENTER, false);
	delay(500);

	clrscr();
	gotoxy(0, 1);
	DisplayLine(0, "输入新内容", ALIGN_CENTER, false);
	DisplayOkCancel(MB_OK | MB_CANCEL);
	if (getstr(buff, 6, &len)) {
		write(dev, addr, buff, 6);
	} else {
		close(dev);
		return;
	}

	clrscr();
	DisplayMidLine(1, "写入完毕", ALIGN_CENTER, false);
	DisplayMidLine(5, "按任意键继续", ALIGN_CENTER, false);
	get_key();
	close(dev);
}

void testAt1608()
{
	char buff[10], pwd1[] = {0x50, 0x21, 0x00}, pwd2[] = {0x50, 0x21, 0x08}, pwd3[] = {0x34, 0x34, 0x34};
	int len;
	int i, addr = 100;
	HDEV dev;

	clrscr();
	while (!ic_exist()) {
		ShowMessage("AT1608", "请插入IC卡...", MB_OK | MB_CANCEL, false);
		if (inkey() == vk_ESC) return;
		delay(500);
	}
	clrscr();
	while (!(dev = open(AT1608, 0))) {
		ShowMessage("AT1608", "请插入正确卡片", MB_OK | MB_CANCEL, false);
		if (inkey() == vk_ESC) return;
		delay(500);
	}

#if 1
	if (!ic_verify(dev, AT1608_PWD_W8, pwd3)) {
		DisplayLine(0, "验密写错误", ALIGN_CENTER, false);
		DisplayMidLine(3, "默认密码502100", ALIGN_CENTER, false);
		DisplayOkCancel(MB_CANCEL);
		if (get_key()) {
			close(dev);
			return;
		}
	}
	clrscr();
	DisplayLine(0, "验密通过", ALIGN_CENTER, false);
	get_key();
#else
	if (!ic_verify(dev, AT1608_PWD_R1, pwd2)) {
		DisplayLine(0, "验密读错误", ALIGN_CENTER, false);
		DisplayMidLine(3, "默认密码502108", ALIGN_CENTER, false);
		DisplayOkCancel(MB_CANCEL);
		if (get_key()) {
			close(dev);
			return;
		}
	}

	clrscr();
	DisplayLine(0, "验密通过", ALIGN_CENTER, false);
	get_key();
#endif

	clrscr();
	DisplayLine(0, "读取结果", ALIGN_CENTER, false);
	DisplayOkCancel(MB_OK);

	memset(buff, 0, sizeof(buff));
	setopt(SELECT_AT1608_ZONE, AT1608_ZONE_1);
	read(dev, addr, buff, 6);
	DisplayLine(1, buff, ALIGN_RIGHT, false);

	if (get_key() == vk_ESC) {
		close(dev);
		return;
	}

#if 0
	clrscr();
	if (!ic_verify(dev, AT1608_PWD_W1, pwd1)) {
		DisplayLine(0, "验密写错误", ALIGN_CENTER, false);
		DisplayMidLine(3, "默认密码502100", ALIGN_CENTER, false);
		DisplayOkCancel(MB_CANCEL);
		if (get_key()) {
			close(dev);
			return;
		}
	}
#endif

	clrscr();
	gotoxy(0, 1);
	DisplayLine(0, "输入新内容", ALIGN_CENTER, false);
	DisplayOkCancel(MB_OK | MB_CANCEL);
	if (getstr(buff, 6, &len)) {
		write(dev, addr, buff, 6);
	} else {
		close(dev);
		return;
	}

	clrscr();
	DisplayMidLine(1, "写入完毕", ALIGN_CENTER, false);
	DisplayMidLine(5, "按任意键继续", ALIGN_CENTER, false);
	get_key();
	close(dev);
}

void testCpuSamCard(HDEV hDev)
{
	BYTE len, buf[100], str[100], cmd[100], cmdlen;
	int ret;

	switch (hDev) {
	case CPU1:
		DisplayMidLine(3, "复位CPU卡", ALIGN_CENTER, false);
		break;
	case SAM1:
		DisplayMidLine(3, "复位SAM卡", ALIGN_CENTER, false);
		break;
	}

	delay(500);	
	ret = icc_open(hDev, buf, &len);
	binstr(buf, str, len, true);
	clrscr();
	//printf("返回:%04x,%02x\n数据:%s", ret, (int)len, str);
	printf("返回:%04x,%02x\n", ret, (int)len);
	get_key();
	if (len) {
		clrscr();
		if (ShowInputBox("发送指令", buf, 14, MB_OK | MB_CANCEL) == MR_CANCEL) return;
		if (strlen(buf) == 0) strcpy(buf, "0084000008");
		cmdlen = strbin(buf, cmd, 14, false);
		ret = icc_command(hDev, cmd, cmdlen, buf, &len);
		binstr(buf, str, len, true);
		clrscr();
		printf("返回:%04x,%02x\n数据:%s", ret, (int)len, str);
		get_key();
	}
	icc_close(hDev);
}


// ------------------------------------------------------------------------
// File System Test
void testFormatFlash()
{
	if (ShowMessage("格式化", "所有数据将丢失!", MB_OK | MB_CANCEL, true) == MR_CANCEL)
		return;
		
	DisplayLine(0, "格式化", ALIGN_CENTER, false);
	DisplayMidLine(3, "正在进行...", ALIGN_CENTER, false);
	file_system_format();
	clrscr();
	DisplayMidLine(3, "格式化完成", ALIGN_CENTER, false);
	DisplayOkCancel(MB_OK);
	get_key();
}

int indexFile = 1;

void testCreateFile()
{
	char buffer[300];
	int handle, len;

	if (ShowInputBox("输入文件名", buffer, &len, MB_OK | MB_CANCEL) == MR_CANCEL)
		return;

	if (len == 0)
		sprintf(buffer, "DEMO%d.TXT", indexFile++);
	
	handle = file_create(buffer);
	if (handle < 0) {
		clrscr();
		DisplayLine(0, "创建失败", ALIGN_CENTER, false);
		DisplayLine(1, buffer, ALIGN_LEFT, false);
		DisplayOkCancel(MB_CANCEL);
		get_key();
		return;
	}
	
	clrscr();
	file_close(handle);
	ShowMessage("创建文件", "成功完成", MB_OK, true);
}

void testDeleteFile()
{
	char buffer[300];
	int ret, len;

	if (ShowInputBox("输入文件名", buffer, &len, MB_OK | MB_CANCEL) == MR_CANCEL)
		return;

	if (len == 0)
		sprintf(buffer, "DEMO%d.TXT", indexFile++);
	
	ret = file_delete(buffer);
	if (ret != 0) {
		clrscr();
		ShowMessage("删除文件", "文件不存在或者正在使用中", MB_OK, true);
		return;
	}
	ShowMessage("删除文件", "成功完成", MB_OK, true);
}

void testWriteFile()
{
	int handle, len;
	char name[32], buffer[200];
	
	clrscr();
	if (ShowInputBox("输入文件名", name, &len, MB_OK | MB_CANCEL) == MR_CANCEL)
		return;

	if (len == 0)
		sprintf(name, "DEMO%d.TXT", indexFile);
	
	handle = file_open(name, WRITE_ONLY);
	if (handle < 0) {
		ShowMessage("打开失败", name, MB_OK, true);
		return;
	}

	clrscr();	
	DisplayLine(0, "输入内容", ALIGN_CENTER, false);
	gotoxy(0, 1);
	if (!getabc(buffer, 100, &len)) {
		file_close(handle);
		return;
	}
	
	if (len == 0)
		strcpy(buffer, "Hello World!");

	file_seek(handle, 0, SEEK_FILE_END);
	file_write(handle, buffer, strlen(buffer), &len);
	
	clrscr();
	if (len == 0) {
		ShowMessage("写入错误", buffer, MB_OK, true);
	} else if (len != strlen(buffer)) {
		ShowMessage("写入文件", "长度错误", MB_OK, true);
	} else {
		ShowMessage("写入文件", "成功完成", MB_OK, true);
	}
	file_close(handle);
}

void testReadFile()
{
	int handle, len;
	char name[32], buffer[200];
	
	clrscr();
	if (ShowInputBox("输入文件名", name, &len, MB_OK | MB_CANCEL) == MR_CANCEL)
		return;
	

	if (len == 0)
		sprintf(name, "DEMO%d.TXT", indexFile);
	
	handle = file_open(name, READ_ONLY);
	if (handle < 0) {
		ShowMessage("打开失败", name, MB_OK, true);
		return;
	}

	memset(buffer, 0, sizeof(buffer));	
	file_seek(handle, 0, SEEK_FILE_SET);
	len = file_read(handle, buffer, 32);
	file_close(handle);

	ShowMessage("读取内容", buffer, MB_OK, true);
}
// End of test File System

// ------------------------------------------------------------------------
// Begin Battery test
typedef struct tagBatteryRecord {
	unsigned short index;
	unsigned short value;
} TBatteryRecord;

TBatteryRecord EofRecord = { 0x55, 0xAA };

#define BATTERY_TIME_INTERVAL	600000L
//#define BATTERY_TIME_INTERVAL	10000


void CollectBatteryValues()
{
	long current = 0, origin = -BATTERY_TIME_INTERVAL;
	TBatteryRecord rec = { 0, 0 };
	long addr = 0;
	char buf[100];

	// erase a sector, use zero
	if (ShowMessage("删除扇区", "文件系统将被破坏", MB_OK | MB_CANCEL, true) == MR_CANCEL)
		return;

	clrscr();
	DisplayLine(1, "删除零扇区", ALIGN_CENTER, false);
	FlashSectorErase(0);
	delay(500);

	// begin record
	clrscr();
	DisplayLine(0, "正在记录", ALIGN_CENTER, true);
	//bl_on(0x7fffffff);
	while (true) {
		current = GetTickCount();		
		if (current >= origin + BATTERY_TIME_INTERVAL) {
			// 10 minutes one time
			rec.index++;
			rec.value = battery_ind();
			sprintf(buf, "已写入%d条", (int)rec.index);
			DisplayLine(2, buf, ALIGN_CENTER, false);
			FlashWrite(addr, (BYTE *)&rec, sizeof(rec));
			addr += sizeof(rec);
			origin = current;
		}
		/*
		else {
			sys_sleep();
		}
		*/
		if (inkey() == vk_ESC) {
			if (ShowMessage("确认退出", "操作还未完成!", MB_OK | MB_CANCEL, true) == MR_OK) {
				//bl_off();
				return;
			}
			else {
				clrscr();
				DisplayLine(0, "正在记录", ALIGN_CENTER, true);
				sprintf(buf, "已写入%d条", (int)rec.index);
				DisplayLine(2, buf, ALIGN_CENTER, false);
			}
		}
	}
}

// ------------------------------------------------------------------------
void UploadBatteryValues()
{
	long addr = 0;
	TBatteryRecord rec = { 0, 0 };
	unsigned short origin_index;
	char buf[100];

	open(COM1, BAUD_9600);
	DisplayLine(0, "正在传输", ALIGN_CENTER, false);
	while (true) {
		origin_index = rec.index;
		FlashRead(addr, (BYTE *)&rec, sizeof(rec));
		addr += sizeof(rec);
		if (rec.index != (origin_index + 1)) {
			clrscr();
			DisplayLine(0, "传输完成", ALIGN_CENTER, true);
			sprintf(buf, "总共%d条", (int)origin_index);
			DisplayLine(2, buf, ALIGN_CENTER, false);
			get_key();
			goto out;
		}
		sprintf(buf, "第%d条", (int)rec.index);
		DisplayLine(2, buf, ALIGN_CENTER, false);
		sprintf(buf, "%d\t%d\r\n", (int)rec.index, (int)rec.value);
		write(COM1, 0, buf, strlen(buf));
	}
	out:
	close(COM1);
}

// ------------------------------------------------------------------------

void tmain(void)
{
	unsigned char b;
	unsigned char ch,line,row;
	unsigned short tmp;
	char dest[100];

	ShowComsysLogo("北京天石");
	LcdSetIcon(LCD_ICON_BATTERY, 5);
	LcdSetIcon(LCD_ICON_TIME, "1256");
	clrscr();
	InitializeMenu(&sys_menu, title_SysMenu, sysMenuItems, sizeof(sysMenuItems) / sizeof(char *));
	sys_menu.OnOk = onSysMenu_Ok;
	sys_menu.OnOtherKey = onSysMenu_OtherKey;
	sys_menu.OnCancel = onSysMenu_Cancel;

	InitializeMenu(&input_menu, title_InputMenu, inputMenuItems, sizeof(inputMenuItems) / sizeof(char *));
	input_menu.OnOk = onInputMenu_Ok;
	input_menu.OnOtherKey = onInputMenu_OtherKey;
	input_menu.OnCancel = onInputMenu_Cancel;
	
	InitializeMenu(&card_menu, title_CardMenu, cardMenuItems, sizeof(cardMenuItems) / sizeof(char *));
	card_menu.OnOk = onCardMenu_Ok;
	card_menu.OnOtherKey = onCardMenu_OtherKey;
	card_menu.OnCancel = onCardMenu_Cancel;

	InitializeMenu(&fs_menu, title_FsMenu, fsMenuItems, sizeof(fsMenuItems) / sizeof(char *));
	fs_menu.OnOk = onFsMenu_Ok;
	fs_menu.OnOtherKey = onFsMenu_OtherKey;
	fs_menu.OnCancel = onFsMenu_Cancel;

	InitializeMenu(&battery_menu, title_BatteryMenu, batteryMenuItems, sizeof(batteryMenuItems) / sizeof(char *));
	battery_menu.OnOk = onBatteryMenu_Ok;
	battery_menu.OnOtherKey = onBatteryMenu_OtherKey;
	battery_menu.OnCancel = onBatteryMenu_Cancel;

	InitializeGraphicsMenu(&gmenu, ImageList, sizeof(ImageList) / sizeof(GraphicsMenuItem));
	gmenu.OnOk = onMainMenu_Ok;
	gmenu.OnOtherKey = onMainMenu_OtherKey;
	gmenu.OnCancel = onMainMenu_Cancel;
	
    ShowGraphicsMenu(&gmenu);
}

// ------------------------------------------------------------------------
// End of P115 DEMO
// Ken, 2003-6-16