slicence.cpp

一个基于3des加密、解密程序

// SLicence.cpp: implementation of the CSLicence class.
//
//////////////////////////////////////////////////////////////////////

#include "stdafx.h"

#include < wincon.h >
#include < stdlib.h >
#include < stdio.h >
#include < time.h >
#include < nb30.h >

#include "SLicence.h"

#pragma comment(lib,"netapi32.lib")

//////////////////////////////////////////////////////////////////////
// Construction/Destruction
//////////////////////////////////////////////////////////////////////
#define  MACKEY "88888888"
#define  SUBLICENCEKEY "software\\xxx\\userlicence"

// 因为是通过NetAPI来获取网卡信息， 所以需要包含其题头文件nb30.h #include < nb30.h > 
typedef struct _ASTAT_
{
    ADAPTER_STATUS adapt;
    NAME_BUFFER    NameBuff [30];
}ASTAT, * PASTAT;

ASTAT Adapter;	
// 定义一个存放返回网卡信息的变量 
// 输入参数：lana_num为网卡编号，一般地，从0开始，但在Windows 2000中并不一定是连续分配的 

CSLicence::CSLicence()
{

}

CSLicence::~CSLicence()
{

}

UCHAR * CSLicence::GenRootData(UCHAR * pRootData,int size)
{
	char szTmp[255] = {0};
	
	if(size < 16)
		return NULL;
	NCB ncb;
    UCHAR uRetCode;
	LANA_ENUM lana_enum;
	
    memset( &ncb, 0, sizeof(ncb) );
    ncb.ncb_command = NCBENUM;
	
    ncb.ncb_buffer = (unsigned char *) &lana_enum;
    ncb.ncb_length = sizeof(lana_enum);
	// 向网卡发送NCBENUM命令，以获取当前机器的网卡信息，如有多少个网卡、每张网卡的编号等 
	uRetCode = Netbios( &ncb );
	printf( "The NCBENUM return	code is: 0x%x \n", uRetCode );
	if ( uRetCode == 0 )
	{
		printf( "Ethernet Count is : %d\n\n", lana_enum.length);
		// 对每一张网卡，以其网卡编号为输入编号，获取其MAC地址 
		for ( int i=0; i< lana_enum.length; ++i)
			if(getmac_one( lana_enum.lana[i],szTmp,sizeof(szTmp)))
				break;
	}
	
	UCHAR szResult[255] = {0};
	m_Des.MAC((UCHAR * )szTmp,sizeof(szTmp),(UCHAR *)MACKEY,szResult);
	AscToHexStr(szResult,8,szTmp,sizeof(szTmp));
	memcpy((char *)pRootData,(char *)szTmp,16);
	return pRootData;
}

int CSLicence::AscToHexStr(UCHAR * szIn,int nInSize,char * szOut,int nOutSize)
{
	char szTmp[255] = {0};
	for(int i = 0; i < nInSize; i++)
	{
		sprintf(szTmp,"%02x",szIn[i]);
		memcpy(szOut + i*2,szTmp,2);
	}
	return 0;
}

int CSLicence::HexStrToAsc(UCHAR * szIn,int nInSize,char * szOut,int nOutSize)
{
	UCHAR szTmp[255] = {0};
	for(int i = 0; i < nInSize; i+=2)
	{
		m_DataTrans.AscToHex(szIn + i,szTmp,2);
		memcpy(szOut + i/2,szTmp,2);
	}
	return 0;
}

UCHAR * CSLicence::GenDesData(UCHAR * pRootData,UCHAR * pDesData,int size)
{
	if(size < 16)
		return NULL;
	char szTmp[255] = {0};
	HexStrToAsc(pRootData,16,szTmp,sizeof(szTmp));
	m_Des._Des3(ENCRYPT,(UCHAR *)szTmp,TransKeyLeft,TransKeyRight,pDesData);
	AscToHexStr(pDesData,8,szTmp,sizeof(szTmp));
	memcpy(pDesData,szTmp,16);
	return pDesData;
}

BOOL CSLicence::CheckLicence(const UCHAR * pDesData)
{
	UCHAR szTmp[255] = {0};
	GenRootData(szTmp,sizeof(szTmp));
	UCHAR szDesData[16] = {0};
	GenDesData(szTmp,szDesData,sizeof(szDesData));
	if(strncmp((char *)pDesData,(char *)szDesData,16) == 0)
		return TRUE;
	else
		return FALSE;
}

BOOL CSLicence::CheckActive()
{
	long lRet = 0;
	HKEY hLicence = NULL,hKeyRoot = NULL;
	lRet = RegOpenKey(HKEY_LOCAL_MACHINE,NULL,&hKeyRoot);
	if(lRet != ERROR_SUCCESS)
		return FALSE;
	
	lRet = RegOpenKey(hKeyRoot,SUBLICENCEKEY,&hLicence);
	if(lRet != ERROR_SUCCESS)
		return FALSE;
	
	UCHAR szDesData[255] = {0};
	DWORD lDataLen = sizeof(szDesData);
	
	char szTmp[255] = {0};
	time_t tm_t = 0;
	time_t tm_told = 0;
	struct tm * tmDiff;
	lRet = RegQueryValueEx(hLicence,"FirstData",NULL,NULL,szDesData,&lDataLen);
	if(lRet !=ERROR_SUCCESS)
	{
		time(&tm_t);
		sprintf(szTmp,"%d",tm_t);
		lRet = RegSetValueEx(hLicence,"FirstData",0,REG_SZ,(UCHAR *)szTmp,strlen(szTmp));
		if(lRet !=ERROR_SUCCESS)
			return FALSE;
		return TRUE;	
	}
	else
	{
		tm_told = atol((char *)szDesData);
		time(&tm_t);
		tm_t = tm_t - tm_told;
		tmDiff = gmtime(&tm_t);
		if(tmDiff->tm_year > 70 || tmDiff->tm_yday > 90)
		{
			return FALSE;
		}
		return TRUE;
	}
}
//检测是否已注册，检测是否是试用期
BOOL CSLicence::CheckRegister()
{
	long lRet = 0;
	HKEY hLicence = NULL,hKeyRoot = NULL;
	lRet = RegOpenKey(HKEY_LOCAL_MACHINE,NULL,&hKeyRoot);
	if(lRet != ERROR_SUCCESS)
		return FALSE;

	lRet = RegOpenKey(hKeyRoot,SUBLICENCEKEY,&hLicence);
	if(lRet != ERROR_SUCCESS)
		return FALSE;

	UCHAR szDesData[255] = {0};
	DWORD lDataLen = sizeof(szDesData);

	lRet = RegQueryValueEx(hLicence,"Licence",NULL,NULL,szDesData,&lDataLen);
	if(lRet !=ERROR_SUCCESS)
	{
		RegCloseKey(hKeyRoot);
		if(CheckActive())
			return TRUE;
		return FALSE;	
	}
	
	if(!CheckLicence(szDesData))
	{
		RegCloseKey(hKeyRoot);
		RegCloseKey(hLicence);
		if(CheckActive())
			return TRUE;
		return FALSE;
	}

	RegCloseKey(hKeyRoot);
	RegCloseKey(hLicence);
	return TRUE;
}

BOOL CSLicence::RegisterLicence(const UCHAR * pDesData)
{
	if(!CheckLicence(pDesData))
		return FALSE;
	long lRet = 0;
	HKEY hLicence = NULL,hKeyRoot = NULL;
	lRet = RegOpenKey(HKEY_LOCAL_MACHINE,NULL,&hKeyRoot);
	if(lRet != ERROR_SUCCESS)
		return FALSE;
	lRet = RegCreateKey(hKeyRoot,SUBLICENCEKEY,&hLicence);
	if(lRet != ERROR_SUCCESS)
		return FALSE;
	lRet = RegSetValueEx(hLicence,"Licence",0,REG_SZ,pDesData,16);
	if(lRet !=ERROR_SUCCESS)
		return FALSE;
	RegCloseKey(hKeyRoot);
	RegCloseKey(hLicence);
	return TRUE;
}

BOOL CSLicence::getmac_one (int lana_num,char * szMacAddr,int size)
{
    NCB ncb;
    UCHAR uRetCode;
	
    memset( &ncb, 0, sizeof(ncb) );
    ncb.ncb_command = NCBRESET;
    ncb.ncb_lana_num = lana_num;   
	// 指定网卡号
	// 首先对选定的网卡发送一个NCBRESET命令，以便进行初始化 
	uRetCode = Netbios( &ncb );
    printf( "The NCBRESET return code is:0x%x \n", uRetCode );
	
	memset( &ncb, 0, sizeof(ncb) );
    ncb.ncb_command = NCBASTAT;
    ncb.ncb_lana_num = lana_num; 	// 指定网卡号
	
    strcpy( (char *)ncb.ncb_callname, "*               " );
    ncb.ncb_buffer = (unsigned char *) &Adapter;
	// 指定返回的信息存放的变量 
	ncb.ncb_length = sizeof(Adapter);
	// 接着，可以发送NCBASTAT命令以获取网卡的信息 
	uRetCode = Netbios( &ncb );
    printf( "The NCBASTAT return code is: 0x%x \n", uRetCode );
	if ( uRetCode == 0 )
	{
		// 把网卡MAC地址格式化成常用的16进制形式，如0010-A4E4-5802 
		sprintf(szMacAddr, "%02X%02X-%02X%02X-%02X%02X",
			Adapter.adapt.adapter_address[0],
			Adapter.adapt.adapter_address[1],
			Adapter.adapt.adapter_address[2],
			Adapter.adapt.adapter_address[3],
			Adapter.adapt.adapter_address[4],
			Adapter.adapt.adapter_address[5] );
		return TRUE;
	}
	return FALSE;
}