www.pudn.com > [VC] 磁盘编辑程序源代码winbiosdisk.rar > Biosdisk.cpp
#include
#include
#define TESTMSG MessageBox(hwnd,"I know",NULL,MB_OK)
/******************************************************************
软盘扇区绝对读取函数 WinBiosDisk()
作者: 周化 编译平台: Virusal C++ 6.0
为了方便, 本函数的参数设计得同 Turbo C 2.0 的 biosdisk() 函数一样.
本函数还有以下两个缺点以待改进：
1.本函数还只能读能读 A: 和 B:,即只能对软盘操作
2.不能改变磁盘扇区大小，只能是标准的 512 个字节。
参数说明:
command 操作:
0 重置磁盘
2 读扇区
3 写扇区
4 校验磁道
5 格式化磁道
8 得到设备参数 (int 1EH)
drive 驱动器 A:=0 B:=1
head 磁头号,范围 0 - 1
track 磁道号,范围 0 - 84 ( 80 - 84 为特殊磁道，通常用来加密 )
sector 扇区号,范围 0 - 255 ( 19 - 255 为非标准扇区编号，通常用来加密)
nsectors 每次读或写的扇区数,不能超出每磁道的最大扇区数
buffer 数据写入或读出的缓冲区，大小为 512 个字节
返回值 ( 同 Int 13H ):
0x0 成功
0x1 无效的命令
0x3 磁盘被写保护
0x4 扇区没有找到
0xa 发现坏扇区
0x80 磁盘没有准备好
******************************************************************/
int WinBiosDisk(unsigned char command,unsigned char drive,unsigned char head,unsigned char track,unsigned char sector,unsigned char nsectors,void *buffer)
{
HANDLE hd;
DWORD dw;
//int13 寄存器参数块
typedef struct tagPackage
{
void *buffer; // ebx 寄存器
unsigned char drive; // edx 寄存器
unsigned char head; //
unsigned short edx_high; //
unsigned char sector; // ecx 寄存器
unsigned char track; //
unsigned short ecx_high; //
unsigned char number; // eax 寄存器
unsigned char option; //
unsigned short eax_high; //
unsigned int edi; // edi 寄存器
unsigned int esi;
unsigned int eflag;
} PK;
PK pk;
memset(&pk,0,sizeof PK);
pk.buffer=buffer;
pk.drive=drive;
pk.head=head;
pk.sector=sector;
pk.track=track;
pk.option=command;
pk.number=nsectors;
if(command==0x18)pk.edi=(int)buffer;
hd=CreateFile("\\\\.\\vWin32",GENERIC_READ,FILE_SHARE_READ,NULL,OPEN_EXISTING,NULL,NULL);
if(hd==NULL)return 1;
DeviceIoControl(hd,4,&pk,0x1c,&pk,0x1c,&dw,NULL);
if(command==0x8)memcpy(buffer,(unsigned char *)pk.edi,11);
CloseHandle(hd);
return pk.option;
}
int WinReadDisk(unsigned char drive,unsigned char sector,unsigned char nsectors,void *buffer)
{
HANDLE hd;
DWORD dw;
struct PARA
{
unsigned int start_sector;
unsigned short number;
void *buffer;
}para;
typedef struct tagPackage
{
DWORD ebx;
DWORD edx;
DWORD ecx;
DWORD eax;
DWORD edi;
DWORD esi;
DWORD eflag;
} REGPACK;
REGPACK pk;
para.start_sector=sector;
para.number=nsectors;
para.buffer=buffer;
memset(&pk,0,sizeof REGPACK);
memset(¶,0,sizeof (struct PARA));
pk.eax=0x7305;
pk.ecx=0xffff;
pk.edx=drive+1;
pk.esi=0;
pk.ebx=(DWORD)¶
hd=CreateFile("\\\\.\\vWin32",GENERIC_READ,FILE_SHARE_READ,NULL,OPEN_EXISTING,NULL,NULL);
if(hd==NULL)return 1;
DeviceIoControl(hd,6,&pk,0x1c,&pk,0x1c,&dw,NULL);
CloseHandle(hd);
return pk.eflag;
}
/***********************************
制作密纹函数 MakeSector()
参数同上
***********************************/
int MakeSector(unsigned char drive,unsigned char head,unsigned char track,unsigned char sector,unsigned char *buffer)
{
int i,ret,retry;
unsigned char ctemp[513],cmd[3]={5,3,2};
for(i=0;i<3;i++)
{
retry=5;
while(retry)
{
if(i==0)
{ctemp[0]=track;
ctemp[1]=head;
ctemp[2]=sector;
ctemp[3]=2;
}
else if(i==1)
memcpy(ctemp,buffer,512);
ret=WinBiosDisk(cmd[i],drive,head,track,sector,1,ctemp);
if(ret==0)break;
else if(ret==0x3)return ret;
WinBiosDisk(2,drive,head,track?track-1:track+1,sector,1,ctemp); //重置磁头
retry--;
}
if(!retry)return ret;
}
ret=memcmp(ctemp,buffer,512);
if(ret)return 0xffff;
else return 0;
}
/************************************
读取密纹函数 ReadSector()
参数同上
************************************/
int ReadSector(unsigned char drive,unsigned char head,unsigned char track,unsigned char sector,unsigned char *buffer)
{
int i,retry=5;
while(retry)
{
i=WinBiosDisk(2,drive,head,track,sector,1,buffer);
if(i==0)break;
WinBiosDisk(2,drive,head,track?track-1:track+1,sector,1,buffer); //重置磁头
retry--;
}
return i;
}
int WriteSector(unsigned char drive,unsigned char head,unsigned char track,unsigned char sector,unsigned char *buffer)
{
int i,retry=5;
char *buffer1;
buffer1=new char[8196];
while(retry)
{
i=WinBiosDisk(3,drive,head,track,sector,1,buffer);
if(i==0)break;
WinBiosDisk(2,drive,head,track?track-1:track+1,sector,1,buffer1); //重置磁头
retry--;
}
delete []buffer1;
return i;
}
/************************************************
演示程序
本程序用两种方法调用了上列函数:
1, 直接调用以上三个函数。
2, 用我自己编的动态链接库 BIOS.DLL
这个库中有以上的三个函数,方便用其它语
言调用。
*************************************************/
LRESULT CALLBACK WndProc (HWND, UINT, WPARAM, LPARAM) ;
HINSTANCE hInst;
unsigned char drive,is_use_dll;
unsigned char para[3],buffer[2][512];
static HWND hwndButton[9],hwndEdit[5],hwndSt,hwndSt1,hwndSt2,hwndtemp,hwndCh[4];
static int text_x=200,text_y=55,win_x=490,win_y=345,cxChar,cyChar,absX=11,ascX=49;
char szEditName[]="Hex Edit";
typedef struct tagHEXEDIT
{
int start,line,totle,is_show,is_readonly;
HWND hwnd;
unsigned char *buffer;
}HEXEDIT;
static HEXEDIT *pHexEdit[100],*pNow;
//使用读动态库中的 MakeSector()
int DllMakeSector(unsigned char drive,unsigned char head,unsigned char track,unsigned char sector,unsigned char *buffer)
{
typedef int (*FPBIOS)(unsigned char,unsigned char,unsigned char,unsigned char,void *);
HINSTANCE hd;
FPBIOS MkSector;
hd=LoadLibrary("BIOS.DLL");
if(hd==NULL)return 0xfffc;
MkSector=(FPBIOS )GetProcAddress(hd,"MakeSector");
if(MkSector==NULL)return 0xfffd;
return MkSector(drive,head,track,sector,buffer);
}
//使用动态库中的 ReadSector()
int DllReadSector(unsigned char drive,unsigned char head,unsigned char track,unsigned char sector,unsigned char *buffer)
{
typedef int (*FPBIOS)(unsigned char,unsigned char,unsigned char,unsigned char,void *);
int ret;
HINSTANCE hd;
FPBIOS RdSector;
hd=LoadLibrary("BIOS.DLL");
if(hd==NULL)return 0xfffc;
RdSector=(FPBIOS)GetProcAddress(hd,"ReadSector");
if(RdSector==NULL)return 0xfffd;
ret=RdSector(drive,head,track,sector,buffer);
FreeLibrary(hd);
return ret ;
}
int DllWriteSector(unsigned char drive,unsigned char head,unsigned char track,unsigned char sector,unsigned char *buffer)
{
typedef int (*FPBIOS)(unsigned char,unsigned char,unsigned char,unsigned char,unsigned char,unsigned char,void *);
int ret;
HINSTANCE hd;
FPBIOS WtSector;
hd=LoadLibrary("BIOS.DLL");
if(hd==NULL)return 0xfffc;
WtSector=(FPBIOS)GetProcAddress(hd,"WinBiosDisk");
if(WtSector==NULL)return 0xfffd;
ret=WtSector(drive,3,head,track,sector,1,buffer);
FreeLibrary(hd);
return ret;
}
WINAPI WinMain(HINSTANCE hInstance,HINSTANCE hPrev,LPSTR lpCmd,int iShow)
{
static char szAppName[] = "磁盘编辑";
HWND hwnd ;
MSG msg;
WNDCLASSEX wndclass ;
wndclass.cbSize = sizeof (wndclass) ;
wndclass.style = CS_HREDRAW | CS_VREDRAW ;
wndclass.lpfnWndProc = WndProc ;
wndclass.cbClsExtra = 0 ;
wndclass.cbWndExtra = 0 ;
wndclass.hInstance = hInstance ;
wndclass.hIcon =NULL ;
wndclass.hCursor = LoadCursor(NULL, IDC_ARROW) ;
wndclass.hbrBackground = (HBRUSH) GetStockObject (LTGRAY_BRUSH) ;
wndclass.lpszMenuName = NULL ;
wndclass.lpszClassName = szAppName ;
wndclass.hIconSm = LoadIcon (NULL,IDC_ARROW);
RegisterClassEx (&wndclass) ;
hInstance=hInst;
hwnd = CreateWindow(szAppName,szAppName,
WS_SYSMENU|WS_MINIMIZEBOX,
100,100,win_x,win_y,
NULL,NULL,hInstance,NULL) ;
ShowWindow (hwnd, SW_SHOW) ;
UpdateWindow (hwnd) ;
while (GetMessage (&msg, NULL, 0, 0))
{
TranslateMessage (&msg) ;
DispatchMessage (&msg) ;
}
return msg.wParam ;
}
void ErrorMsg(HWND hwnd,int i)
{
char buffer[100];
switch(i)
{
case 0:
wsprintf(buffer,"操作成功!");
break;
case 1:
wsprintf(buffer,"无效的操作!");
break;
case 2:
wsprintf(buffer,"地址标记没有找到!");
break;
case 3:
wsprintf(buffer,"磁盘被写保护!");
break;
case 4:
wsprintf(buffer,"扇区没有找到!");
break;
case 6:
wsprintf(buffer,"磁盘被更换!");
break;
case 0xa:
wsprintf(buffer,"发现坏扇区!");
break;
case 0x80:
wsprintf(buffer,"磁盘没有准备好");
break;
case 0xfffc:
wsprintf(buffer,"打开动态链接库 BIOS.DLL 失败!");
break;
case 0xfffd:
wsprintf(buffer,"BIOS.DLL 没有 export 函数 ");
break;
case 0xffff:
wsprintf(buffer,"数据错误!");
break;
default:
wsprintf(buffer,"错误代码: 0x%X",i);
break;
}
if(i)MessageBoxEx(hwnd,buffer,NULL,MB_OK|MB_ICONSTOP,0x804);
else MessageBoxEx(hwnd,buffer,"成功",MB_OK|MB_ICONINFORMATION,0x804);
}
void SubProc(HWND hwnd,int mode)
{
char ctemp[600];
int t[3];
int i;
drive=0;
is_use_dll=0;
if(SendMessage(hwndButton[5],BM_GETCHECK,0,0)==BST_CHECKED)drive=1;
if(SendMessage(hwndButton[7],BM_GETCHECK,0,0)==BST_CHECKED)is_use_dll=1;
for(i=0;i<3;i++)
{
GetWindowText(hwndEdit[i],ctemp,512);
t[i]=atoi(ctemp);
}
if(t[2]==0||t[2]>255)
MessageBoxEx(hwnd,"扇区号必须在1至255之间",NULL,MB_OK,0x804);
else if(t[0]>1)
MessageBoxEx(hwnd,"磁头号只能为0或1",NULL,MB_OK,0x804);
else if(t[1]>84)
MessageBoxEx(hwnd,"磁道号必须在0至84之间",NULL,MB_OK,0x804);
else
{
for(i=0;i<3;i++)para[i]=t[i];
switch(mode)
{
case 0:
if(is_use_dll)i=DllMakeSector(drive,para[0],para[1],para[2],buffer[0]);
else i=MakeSector(drive,para[0],para[1],para[2],buffer[0]);
break;
case 1:
if(is_use_dll)i=DllWriteSector(drive,para[0],para[1],para[2],buffer[0]);
else i=WriteSector(drive,para[0],para[1],para[2],buffer[0]);
break;
case 2:
if(is_use_dll)i=DllReadSector(drive,para[0],para[1],para[2],buffer[1]);
else i=ReadSector(drive,para[0],para[1],para[2],buffer[1]);
if(i)memset(buffer[1],0,512);
InvalidateRect(hwndEdit[4],NULL,TRUE);
}
ErrorMsg(hwnd,i);
}
}
void outxy(HWND hwnd,int x,int y,unsigned char c)
{
char p[10];
HDC hdc;
HideCaret(hwnd);
hdc=GetDC(hwnd);
SelectObject(hdc,GetStockObject(DEFAULT_GUI_FONT));
wsprintf(p,"%c",isprint(c)?c:'.');
TextOut(hdc,(ascX+absX+x)*cxChar,y*cyChar,p,1);
wsprintf(p,"%02X",c);
TextOut(hdc,(absX+x*3)*cxChar,y*cyChar,p,2);
ReleaseDC(hwnd,hdc);
ShowCaret(hwnd);
}
LRESULT CALLBACK EditProc(HWND hwnd, UINT iMsg, WPARAM wParam, LPARAM lParam)
{
HDC hdc;
TEXTMETRIC tm;
PAINTSTRUCT ps;
char ctemp[100];
unsigned char num[]="0123456789ABCDEF";
unsigned char c;
static int i,j,cKeyX,cKeyY,is_set=0,is_asc,cHexEdit=0;
CREATESTRUCT *ct;
switch(iMsg)
{
case WM_CREATE:
ct=(CREATESTRUCT *)lParam;
pHexEdit[cHexEdit]=(HEXEDIT *)GlobalAlloc(GPTR,sizeof HEXEDIT);
pNow=pHexEdit[cHexEdit];
pNow->buffer=buffer[cHexEdit];
cHexEdit++;
pNow->is_readonly=0;
pNow->start=0;
pNow->line=5;
pNow->totle=32;
pNow->hwnd=hwnd;
pNow->is_show=0;
return 0;
case WM_MOUSEMOVE:
SetCursor(LoadCursor(NULL,IDC_IBEAM));
break;
case WM_LBUTTONDOWN:
for(i=0;ihwnd==hwnd)
{pNow=pHexEdit[i];
break;
}
}
cKeyX=LOWORD(lParam)/cxChar;
cKeyY=HIWORD(lParam)/cyChar;
if(cKeyXpNow->line-1||cKeyX>=absX+15*3+2&&cKeyX=ascX)
is_asc=1;
else
{
if(cKeyX%3==2)
{if(cKeyX>0)cKeyX--;
else cKeyX++;
}
is_asc=0;
}
SetCaretPos((cKeyX+absX)*cxChar,cKeyY*cyChar);
pNow->is_show=1;
break;
case WM_SETFOCUS:
CreateCaret(hwnd,NULL,0,cyChar);
SetCaretPos((cKeyX+absX)*cxChar,cKeyY*cyChar);
ShowCaret(hwnd);
break;
case WM_KILLFOCUS:
HideCaret(hwnd);
break;
case WM_CHAR:
for(i=0;ihwnd==hwnd)
{pNow=pHexEdit[i];
break;
}
}
if(pNow->is_readonly)break;
if(is_asc)
{
c=(TCHAR)wParam;
if(c==9)break;
pNow->buffer[cKeyX-ascX+(cKeyY+pNow->start)*16]=c;
outxy(hwnd,cKeyX-ascX,cKeyY,c);
//SendMessage(hwnd,WM_KEYDOWN,VK_RIGHT,0);
if(cKeyXline-1&&pNow->start+pNow->line-1==pNow->totle)break;
if(cKeyY==pNow->line-1)
{pNow->start++;
//InvalidateRect(hwnd,NULL,TRUE);
ScrollWindow(hwnd,0,-cyChar,NULL,NULL);
}
else cKeyY++;
cKeyX=ascX;
}
SetCaretPos((cKeyX+absX)*cxChar,cKeyY*cyChar);
}
else
{
c=(TCHAR)wParam;
CharUpperBuff((char *)&c,1);
for(i=0;i<16;i++)
if(c==num[i])
{j=cKeyX/3;
if(cKeyX%3==0)
pNow->buffer[j+(cKeyY+pNow->start)*16]=(pNow->buffer[j+(cKeyY+pNow->start)*16]&0x0f)|(i*0x10);
else
pNow->buffer[j+(cKeyY+pNow->start)*16]=(pNow->buffer[j+(cKeyY+pNow->start)*16]&0xf0)|i;
//InvalidateRect(hwnd,NULL,TRUE);
outxy(hwnd,j,cKeyY,pNow->buffer[j+(cKeyY+pNow->start)*16]);
//SendMessage(hwnd,WM_KEYDOWN,VK_RIGHT,0);
if(cKeyX==16*3-2)
{
if(cKeyY==pNow->line-1&&pNow->start+pNow->line-1==pNow->totle)break;
if(cKeyY==pNow->line-1)
{pNow->start++;
//InvalidateRect(hwnd,NULL,TRUE);
ScrollWindow(hwnd,0,-cyChar,NULL,NULL);
}
else cKeyY++;
cKeyX=0;
}
else
{if(cKeyX%3==1)cKeyX+=2;
else cKeyX++;
}
SetCaretPos((cKeyX+absX)*cxChar,cKeyY*cyChar);
break;
}
}
break;
case WM_KEYDOWN:
switch(wParam)
{
case VK_TAB:
is_asc=!is_asc;
if(is_asc)cKeyX=cKeyX/3+ascX;
else cKeyX=(cKeyX-ascX)*3;
SetCaretPos((cKeyX+absX)*cxChar,cKeyY*cyChar);
break;
case VK_LEFT:
if(!is_asc)
{
if(cKeyX==0)
{if(cKeyY==0&&pNow->start==0)break;
if(cKeyY==0)
{pNow->start--;
//InvalidateRect(hwnd,NULL,TRUE);
ScrollWindow(hwnd,0,cyChar,NULL,NULL);
}
else cKeyY--;
cKeyX=15*3+1;
}
else if(cKeyX%3==0)cKeyX-=2;
else cKeyX--;
}
else
{
if(cKeyX>ascX)cKeyX--;
else
{if(cKeyY==0&&pNow->start==0)break;
if(cKeyY==0)
{pNow->start--;
//InvalidateRect(hwnd,NULL,TRUE);
ScrollWindow(hwnd,0,cyChar,NULL,NULL);
}
else cKeyY--;
cKeyX=ascX+15;
}
}
is_set=1;
break;
case VK_HOME:
pNow->start=0;
cKeyY=0;
cKeyX=is_asc*ascX;
InvalidateRect(hwnd,NULL,TRUE);
SetCaretPos((cKeyX+absX)*cxChar,cKeyY*cyChar);
break;
case VK_END:
pNow->start=pNow->totle-pNow->line;
cKeyY=pNow->line-1;
cKeyX=is_asc?ascX+15:15*3;
InvalidateRect(hwnd,NULL,TRUE);
SetCaretPos((cKeyX+absX)*cxChar,cKeyY*cyChar);
break;
case 33:
if(pNow->start==0)break;
if(pNow->startline)
{pNow->start=0;
cKeyY=0;
SetCaretPos((cKeyX+absX)*cxChar,cKeyY*cyChar);
}
else pNow->start-=pNow->line;
//InvalidateRect(hwnd,NULL,TRUE);
ScrollWindow(hwnd,0,cyChar*pNow->line,NULL,NULL);
break;
case 34: //PAGEDOWN
if(pNow->start==pNow->totle-pNow->line)break;
if(pNow->start+pNow->line*2>pNow->totle)
{pNow->start=pNow->totle-pNow->line;
cKeyY=pNow->line-1;
SetCaretPos((cKeyX+absX)*cxChar,cKeyY*cyChar);
}
else pNow->start+=pNow->line;
//InvalidateRect(hwnd,NULL,TRUE);
ScrollWindow(hwnd,0,-cyChar*pNow->line,NULL,NULL);
break;
case VK_RIGHT:
if(!is_asc)
{
if(cKeyX==16*3-2)
{
if(cKeyY==pNow->line-1&&pNow->start+pNow->line-1==pNow->totle)break;
if(cKeyY==pNow->line-1)
{pNow->start++;
//InvalidateRect(hwnd,NULL,TRUE);
ScrollWindow(hwnd,0,-cyChar,NULL,NULL);
}
else cKeyY++;
cKeyX=0;
}
else
{if(cKeyX%3==1)cKeyX+=2;
else cKeyX++;
}
}
else
{if(cKeyXline-1&&pNow->start+pNow->line-1==pNow->totle)break;
if(cKeyY==pNow->line-1)
{pNow->start++;
//InvalidateRect(hwnd,NULL,TRUE);
ScrollWindow(hwnd,0,-cyChar,NULL,NULL);
}
else cKeyY++;
cKeyX=ascX;
}
}
is_set=1;
break;
case VK_UP:
if(cKeyY==0)
{
if(pNow->start)
{pNow->start--;
//InvalidateRect(hwnd,NULL,TRUE);
ScrollWindow(hwnd,0,cyChar,NULL,NULL);
}
}
else
{
cKeyY--;
is_set=1;
}
break;
case VK_DOWN:
if(cKeyY==pNow->line-1)
{if(pNow->start+pNow->line==pNow->totle)break;
pNow->start++;
InvalidateRect(hwnd,NULL,TRUE);
ScrollWindow(hwnd,0,-cyChar,NULL,NULL);
break;
}
cKeyY++;
is_set=1;
break;
}
if(is_set)
{
SetCaretPos((cKeyX+absX)*cxChar,cKeyY*cyChar);
is_set=0;
}
return 0;
case WM_PAINT:
for(i=0;ihwnd==hwnd)
{pNow=pHexEdit[i];
break;
}
}
if(pNow->is_show)HideCaret(hwnd);
hdc=BeginPaint(hwnd,&ps);
SelectObject(hdc,GetStockObject(DEFAULT_GUI_FONT));
GetTextMetrics(hdc,&tm);
cxChar=tm.tmAveCharWidth;
cyChar=tm.tmHeight+tm.tmExternalLeading;
for(j=pNow->start;jtotle;j++)
{
wsprintf(ctemp,"%03d(%03X)",j*16,j*16);
TextOut(hdc,cxChar,cyChar*(j-pNow->start),ctemp,8);
for(i=0;i<16;i++)
{
wsprintf(ctemp,"%02X ",pNow->buffer[i+j*16]);
TextOut(hdc,cxChar*(i*3+11),cyChar*(j-pNow->start),ctemp,2);
if(isprint(pNow->buffer[i+j*16]))TextOut(hdc,cxChar*(i+ascX+absX),cyChar*(j-pNow->start),(char *)(pNow->buffer+i+j*16),1);
else TextOut(hdc,cxChar*(i+ascX+absX),cyChar*(j-pNow->start),".",1);
}
}
EndPaint(hwnd,&ps);
if(pNow->is_show)
{CreateCaret(hwnd,NULL,0,cyChar);
SetCaretPos((cKeyX+absX)*cxChar,cKeyY*cyChar);
ShowCaret(hwnd);
}
break;
}
return DefWindowProc (hwnd, iMsg, wParam, lParam);
}
void RegisterEdit(void)
{
WNDCLASSEX wndclass;
wndclass.cbSize = sizeof (wndclass) ;
wndclass.style = CS_HREDRAW | CS_VREDRAW ;
wndclass.lpfnWndProc = EditProc ;
wndclass.cbClsExtra = 0 ;
wndclass.cbWndExtra = 0 ;
wndclass.hInstance = hInst;
wndclass.hIcon = NULL ;
wndclass.hCursor = NULL;
wndclass.hbrBackground = (HBRUSH) GetStockObject (WHITE_BRUSH) ;
wndclass.lpszMenuName = NULL ;
wndclass.lpszClassName = szEditName ;
wndclass.hIconSm = NULL;
RegisterClassEx (&wndclass);
}
char tempbuffer[8196];
LRESULT CALLBACK WndProc (HWND hwnd, UINT iMsg, WPARAM wParam, LPARAM lParam)
{
LPSTR lpszButtonText[]={"格式扇区","写入扇区","读取扇区","退出程序","磁盘A","磁盘B","原函数","动态库"};
LPSTR lpszMsgText[5]={"磁头号","磁道号","扇区号","写入数据:","读出数据:"};
LPSTR lpszEditText[]={"0","81","100"},lpszCh[]={"↑","↓","↑↓","比较"};
PAINTSTRUCT ps;
HDC hdc;
int i,j,k;
switch(iMsg)
{
case WM_CREATE:
wsprintf((char *)buffer[0],"Encrypt DATA");
hwndSt=CreateWindowEx(WS_EX_TRANSPARENT,"STATIC",
NULL,WS_CHILD|WS_VISIBLE|SS_ETCHEDFRAME|WS_GROUP|WS_TABSTOP,
20,text_y-7,win_x-45,28,hwnd,(HMENU)50,hInst,NULL);
hwndSt2=CreateWindowEx(WS_EX_TRANSPARENT,"STATIC",
NULL,WS_CHILD|WS_VISIBLE|SS_ETCHEDFRAME|WS_GROUP|WS_TABSTOP,
win_x-220,text_y-40,195,26,hwnd,(HMENU)52,hInst,NULL);
for(i=0;i<3;i++)
{
hwndEdit[i]=CreateWindowEx(WS_EX_STATICEDGE,"Edit",lpszEditText[i],WS_CHILD|ES_NUMBER|ES_RIGHT|WS_TABSTOP|WS_VISIBLE,
text_x+20+i*85,5,(i>1?5:0)+25,18,hwndSt,(HMENU)(i+11),hInst,0);
hwndtemp=CreateWindow("STATIC",lpszMsgText[i],WS_CHILD|SS_LEFT|WS_VISIBLE,
text_x+85*i,text_y,40,22,hwnd,(HMENU)(200+i),hInst,0);
SendMessage(hwndtemp,WM_SETFONT,(WPARAM)GetStockObject(DEFAULT_GUI_FONT),MAKELPARAM(TRUE,0));
}
for(i=0;i<4;i++)
{hwndCh[i]=CreateWindow("Button",lpszCh[i],WS_CHILD|BS_PUSHBUTTON|WS_VISIBLE,
win_x-160+i*30+(i==3?10:0),text_y+125,25+(i>=2?10:0),20,hwnd,(HMENU)(i+400),hInst,0);
SendMessage(hwndCh[i],WM_SETFONT,(WPARAM)GetStockObject(DEFAULT_GUI_FONT),MAKELPARAM(TRUE,0));
hwndButton[i]=CreateWindow("Button",lpszButtonText[i],WS_CHILD|BS_PUSHBUTTON|WS_VISIBLE|WS_TABSTOP,
(win_x-85*4)/2+i*85,win_y-55,75,22,hwnd,(HMENU)(i+100),hInst,0);
SendMessage(hwndButton[i],WM_SETFONT,(WPARAM)GetStockObject(DEFAULT_GUI_FONT),MAKELPARAM(TRUE,0));
}
RegisterEdit();
hwndEdit[3]=CreateWindowEx(WS_EX_STATICEDGE,szEditName,NULL,WS_CHILD|WS_VISIBLE,
10,text_y+45,win_x-27,73,hwnd,(HMENU)(10),hInst,0);
hwndEdit[4]=CreateWindowEx(WS_EX_STATICEDGE,szEditName,NULL,WS_CHILD|WS_VISIBLE|ES_READONLY,
10,text_y+150,win_x-27,73,hwnd,(HMENU)(11),hInst,0);
for(i=0;i<2;i++)
{
hwndButton[i+4]=CreateWindow("Button",lpszButtonText[4+i],WS_CHILD|BS_AUTORADIOBUTTON|WS_VISIBLE|WS_GROUP*(1-i),
20+i*65,4,60,20,hwndSt,(HMENU)(i+104),hInst,0);
SendMessage(hwndButton[i+4],WM_SETFONT,(WPARAM)GetStockObject(DEFAULT_GUI_FONT),MAKELPARAM(TRUE,0));
//SendMessage(hwndEdit[3+i],WM_SETFONT,(WPARAM)GetStockObject(DEFAULT_GUI_FONT),MAKELPARAM(TRUE,0));
hwndtemp=CreateWindow("STATIC",lpszMsgText[i+3],WS_CHILD|SS_LEFT|WS_VISIBLE,
20,text_y+30+i*105,80,15,hwnd,(HMENU)(300+i),hInst,0);
SendMessage(hwndtemp,WM_SETFONT,(WPARAM)GetStockObject(DEFAULT_GUI_FONT),MAKELPARAM(TRUE,0));
}
for(i=0;i<2;i++)
{
hwndButton[6+i]=CreateWindow("Button",lpszButtonText[6+i],WS_CHILD|BS_AUTORADIOBUTTON|WS_VISIBLE|WS_GROUP*(1-i),
35+i*75,4,60,20,hwndSt2,(HMENU)i+105,hInst,0);
SendMessage(hwndButton[6+i],WM_SETFONT,(WPARAM)GetStockObject(DEFAULT_GUI_FONT),MAKELPARAM(TRUE,0));
}
SendMessage(hwndButton[4],BM_SETCHECK,BST_CHECKED,0);
SendMessage(hwndButton[6],BM_SETCHECK,BST_CHECKED,0);
//SetWindowText(hwndEdit[3],"Encrypt DATA");
break;
case WM_PAINT:
hdc=BeginPaint(hwnd,&ps);
SetBkMode(hdc,TRANSPARENT);
SetTextColor(hdc,0xfFFFFF);
TextOut(hdc,33,text_y-36,"磁盘编辑程序 Ver1.0 周化",27);
SetTextColor(hdc,0xff0000);
TextOut(hdc,32,text_y-37,"磁盘编辑程序 Ver1.0 周化",27);
EndPaint(hwnd,&ps);
break;
case WM_COMMAND:
switch(LOWORD(wParam))
{
case 100:
case 101:
case 102:
SubProc(hwnd,LOWORD(wParam)-100);
break;
case 103:
PostQuitMessage(0);
break;
case 400:
memcpy(buffer[0],buffer[1],512);
InvalidateRect(hwndEdit[3],NULL,TRUE);
break;
case 401:
memcpy(buffer[1],buffer[0],512);
InvalidateRect(hwndEdit[4],NULL,TRUE);
break;
case 402:
memcpy(tempbuffer,buffer[0],512);
memcpy(buffer[0],buffer[1],512);
memcpy(buffer[1],tempbuffer,512);
InvalidateRect(hwndEdit[3],NULL,TRUE);
InvalidateRect(hwndEdit[4],NULL,TRUE);
break;
case 403:
k=0;
j=0;
for(i=0;i<512;i++)
if(buffer[0][i]!=buffer[1][i])
{k++;
wsprintf(tempbuffer,"发现不同次数:%d\n\n%03d(%03X): %02d(%02X) <=> %02d(%02X)",k,i,i,buffer[0][i],buffer[0][i],buffer[1][i],buffer[1][i]);
j=MessageBoxEx(hwnd,tempbuffer,"比较数据",MB_OKCANCEL,0x804);
if(j==IDCANCEL)break;
}
if(j!=IDCANCEL)MessageBoxEx(hwnd,"比较结束!"," ",MB_OK|MB_ICONINFORMATION,0x804);
}
break;
case WM_DESTROY:
PostQuitMessage(0);
break;
}
return DefWindowProc (hwnd, iMsg, wParam, lParam);
}