biosinfo.c

DOS下读取BIOS相关信息,BIOS版本,厂商等

#include <stdio.h>
#include <bios.h>
#include "global.h"
#include "Graph.h"


typedef unsigned char BYTE ;

BOOL GetStrValue(char *,char *,char* );
void GetBiosInfo(char *);
void puthz(char *,int ,int ,int );
BOOL GetYes(void);
#define ROW 1 //纵坐标放大倍数
#define COL 1 //横坐标放大倍数

BOOL GetFun(int , char* );
#define WRITE 6 
#define CMP   8 

int main(int argc, char* argv[])
{
	FILE	*stream;
	int		i=0,fun=0;
	char	val[60];
	char	tmp[60];
	
	fun = GetFun(argc, argv[1]);
	if(!fun)
		return FALSE;
	if(fun == WRITE)
	{
		if((stream = fopen(argv[2],"a")) == NULL)
			return FALSE;
		memset(val,0,sizeof(char)*60);
		GetBiosInfo(val);
		fprintf(stream,"[BIOS Information]\n");
		fprintf(stream,"BIOSVersion=%s\n",val);
		fclose(stream);
		return TRUE;
	}

	memset(val,0,sizeof(char)*60);
	if(GetStrValue(argv[2],"BIOSVersion\0",val))
	{
		memset(tmp,0,sizeof(char)*60);
		GetBiosInfo(tmp);
		for(i=0;i<strlen(val);i++)
		{
			if(*(tmp+i)!=val[i])
			{
				_setvideomode(_VRES16COLOR);
				puthz("ｂｉｏｓ版本检测失败！",200,30,12);
				puthz("实测版本：",5,110,14);
				_settextposition(8,20);
				printf("%s",tmp);
				puthz("标配版本：",5,170,14);
				_settextposition(12,20);
				printf("%s",val);
				puthz("按“Ｙ”键允许通过，否则按电源键关机。",60,360,14);
				GetYes();
				_setvideomode(_DEFAULTMODE);
				return 2;
			}
		}
		return TRUE;
								
	}
	return FALSE;
}

void GetBiosInfo(char *val)
{
	int i=0;
	char _far	*p;
	(long)p=0xf000e0c1;//MK_FP(0XF000,0XE0c1)
	for(;;)
		{
			if(*(p+i)!=0)
			{
				val[i] = *(p+i);
				i++;
			}else{
				return;
			}
		}
}

BOOL GetStrValue(char *filename,char *str,char* value)
{
	int			i,k,isok=0;
	FILE		*stream;
	char		*lpBuffer;
	LONG		len=0;

	stream = fopen(filename,"rb");
	if(stream == NULL)
	{
		printf("Can't open %s\n",filename);
		return FALSE;
	}
	len =  _filelength(stream->_file );
	lpBuffer = (BYTE *)malloc((size_t )len);
	fread(lpBuffer,sizeof(char), (size_t)len,stream);

	for(i=0;i<(len-strlen(str));i++)
	{
		if((memcmp((char *)lpBuffer+i,str,strlen(str))==0) &&
			(
			(*((char *)lpBuffer+i-1) == 20)||
			(*((char *)lpBuffer+i-1) == 0xa)||
			(i == 0)
			)&&
			(
			(*((char *)lpBuffer+i+strlen(str)) == 20)||
			(*((char *)lpBuffer+i+strlen(str)) == 0x3d)
			)
			)
		{
			int m=0;
			for(k=0;k<(len-strlen(str)-i);k++)
			{
				int j=i+strlen(str)+1+k;
				char x1=*(lpBuffer+j);
				char x2=*(lpBuffer+j+1);
				if(
					(*(lpBuffer+j) == 0x0d)&&
					(*(lpBuffer+j+1) == 0x0a)
					)
				{
					isok = 1;
					free(lpBuffer);
					fclose(stream);
					return	TRUE;
				}else{
					value[m]=*(lpBuffer+j);
					m++;
				}
			}
		}
	}
	if(isok)
	{
		free(lpBuffer);
		fclose(stream);
		return	TRUE;
	}else{
		free(lpBuffer);
		fclose(stream);
		return	FALSE;
	}
}


void puthz(char *s,int x,int y,int color)
{
	FILE	*hzk;
	char buffer[32]; //buffer用来存储一个汉字
	register m,n,i,j,k;
	unsigned char qh,wh;
	unsigned long offset;
	
	if ((hzk=fopen("hzk16","rb"))==NULL)
		return;

	while(*s)
	{ qh=*(s)-0xa0; //汉字区位码
	wh=*(s+1)-0xa0;
	offset=(94*(qh-1)+(wh-1))*32L;//计算该汉字在字库中偏移量
	fseek(hzk,offset,SEEK_SET);
	fread(buffer,32,1,hzk); //取出汉字32字节的点阵字模存入buffer中（一个汉字）
	_setcolor( color );
	for (i=0;i<16;i++)//将32位字节的点阵按位在屏幕上打印出来(1:打印,0:不打印),显示汉字
		for(n=0;n<ROW;n++)
			for(j=0;j<2;j++)
				for(k=0;k<8;k++)
					for(m=0;m<COL;m++)
						if (((buffer[i*2+j]>>(7-k))&0x1)!=NULL)
							_setpixel(x+8*j*COL+k*COL+m,y+i*ROW+n);
						s+=2; //因为一个汉字内码占用两个字节,所以s必须加2
						x+=30;
	}
	fclose(hzk);
	//getch();
	//closegraph();
}

/////////////////////////////////////////////////////////////////////////////////
// Function GetYesOrNo
// This function get user selection:Y/N
// GetYesOrNo returns TRUE if user press 'y'or'Y', or FALSE if user press 'n'or'N'
//////////////////////////////////////////////////////////////////////////////////
BOOL GetYes(void)
{
//	printf("%s",Message); 
	for(;;){
		fflush(stdin);
		switch(getch()){
		case 'y':
		case 'Y':
			return TRUE;
//		case 'n':
//		case 'N':
//			return FALSE;
		default:
//			printf("Invalid input,please input again.\n");
//			printf("%s",Message); 
			break;
		}
	}
}
	
BOOL GetFun(int argc, char* argv)
{
	if((argc!=3)||(strlen(argv)>2))
	{
verinfo:
	printf("赏屯屯屯屯屯屯屯屯屯屯屯屯屯屯屯屯籠n");
	printf("