开通博客赚积分
发布资源赚积分
分类

源码开发语言/平台
当前位置：首页 > 源码/资料 > 加密解密 > CA认证 > 查看源码
MiniCA.cpp
资源名称：MiniCA2.rar　[点击查看]
上传用户：dengkfang
上传日期：2008-12-30
资源大小：5233k
文件大小：32k
源码类别：

CA认证

开发平台：

Visual C++

MiniCA.cpp：源码内容
  1. // MiniCA.cpp : Defines the class behaviors for the application.
  2. //
  4. #include "stdafx.h"
  5. #include "MiniCA.h"
  6. #include "..htmlincludehtmlhelp.h"
  7. #include "Evp.h"
  8. #include "MiniMainDlg.h"
  9. #define _WIN32_WINNT  0x0400
  10. #include "wincrypt.h"
  11. #include "MiniMainDlg.h"
  12. #include ".GenericClassGetHardSoftInfo.h"
  13. #include ".GenericClasscgfiltyp.h" // CGCFileTypeAccess
  14. #include <locale.h>
  15. #include ".ControlSplashSplashWnd.h"
  16. #include ".GenericClassLanguage.h"
  17. #include "MiniCt.h"
  19. #ifdef _DEBUG
  20. #define new DEBUG_NEW
  21. #undef THIS_FILE
  22. static char THIS_FILE[] = __FILE__;
  23. #endif
  26. BOOL CMiniCaApp::m_bIsBig = FALSE;
  27. /////////////////////////////////////////////////////////////////////////////
  28. // CMiniCaApp
  30. BEGIN_MESSAGE_MAP(CMiniCaApp, CWinApp)
  31. //{{AFX_MSG_MAP(CMiniCaApp)
  32. // NOTE - the ClassWizard will add and remove mapping macros here.
  33. //    DO NOT EDIT what you see in these blocks of generated code!
  34. //}}AFX_MSG
  35. ON_COMMAND(ID_HELP, CWinApp::OnHelp)//屏蔽此句可以去掉帮助按钮
  36. END_MESSAGE_MAP()
  38. /////////////////////////////////////////////////////////////////////////////
  39. // CMiniCaApp construction
  41. CMiniCaApp::CMiniCaApp()
  42. {
  43. // TODO: add construction code here,
  44. // Place all significant initialization in InitInstance
  45. // m_bServer = FALSE;
  46. m_bHpxs = FALSE;
  47. m_HelpArray.Add("ca_ext.htm");
  48. m_HelpArray.Add("ca_center.htm");
  49. m_HelpArray.Add("ca_sslclient.htm");
  50. m_HelpArray.Add("ca_sslserver.htm");
  51. m_HelpArray.Add("ca_evp.htm");
  52. m_HelpArray.Add("ca_raserver.htm");
  53. m_HelpArray.Add("ca_asn1.htm");
  54. m_HelpArray.Add("ca_ocspserver.htm");
  55. m_HelpArray.Add("ca_ocspclient.htm");
  56. m_HelpArray.Add("cacert_info.htm");
  57. m_HelpArray.Add("ca_reg.htm");
  58. }
  60. /////////////////////////////////////////////////////////////////////////////
  61. // The one and only CMiniCaApp object
  63. CMiniCaApp theApp;
  64. HINSTANCE g_hInst = NULL;
  66. /////////////////////////////////////////////////////////////////////////////
  67. // CMiniCaApp initialization
  69. int CMiniCaApp::HexToTen(const char * pHex)//16--->10
  70. {
  71.     DWORD dwHexNum=0;
  72.     for (; *pHex!=0 ; pHex++)
  73.     {
  74.         dwHexNum *= 16;
  75.         if ((*pHex>='0') && (*pHex<='9'))
  76.             dwHexNum += *pHex-'0';
  77.         else if ((*pHex>='a') && (*pHex<='f'))
  78.             dwHexNum += *pHex-'a'+10;
  79.         else if ((*pHex>='A') && (*pHex<='F'))
  80.             dwHexNum += *pHex-'A'+10;
  81.         else
  82.             -1;
  83.     }
  84. return dwHexNum;
  85. }
  87. BOOL CMiniCaApp::CheckSolfCode(CString pathExt/*被验证文件路径*/,
  88.    CString dllName/*dll名称*/,UINT dllId/*资源ID*/)//检验验证码
  89. {
  90. static HINSTANCE hLibrary;
  91. if ((hLibrary = LoadLibrary(dllName)) == NULL)
  92. {
  93. return FALSE;
  94. }
  95. else
  96. {
  97. //得到摘要结果
  98. CString mdname("sha1");
  99. char outMsg[100]="";
  100. unsigned char md_value[MAX_MD_SIZE]="";
  101. char bufsing[MAX_MD_SIZE*2]="";
  102. unsigned int md_len;
  103. if(!CEvp::Digest(mdname.GetBuffer(0),pathExt.GetBuffer(0),0,md_value,&md_len, outMsg))
  104. {
  105. return FALSE;
  106. }
  108. /*得到公钥*/
  109. HRSRC hRsrc=FindResource(NULL,MAKEINTRESOURCE(IDR_VERIFY_CERT),"CERT");
  110. DWORD lenCert = SizeofResource(NULL, hRsrc); 
  111. HGLOBAL hgCert=LoadResource(NULL,hRsrc);
  112. LPSTR lpCert=(LPSTR)LockResource(hgCert);
  114. //取得DLL中的验证码
  115. char buf[513]={0};//长度512
  116. int nBufferMax=513;
  117. if(LoadString(hLibrary,dllId,buf,nBufferMax)==0)//取得错误IDS_STR_MINICA
  118. {
  119. LPVOID lpMsgBuf;
  120. FormatMessage( 
  121. FORMAT_MESSAGE_ALLOCATE_BUFFER | 
  122. FORMAT_MESSAGE_FROM_SYSTEM | 
  123. FORMAT_MESSAGE_IGNORE_INSERTS,
  124. NULL,
  125. GetLastError(),
  126. MAKELANGID(LANG_NEUTRAL, SUBLANG_DEFAULT), // Default language
  127. (LPTSTR) &lpMsgBuf,
  128. 0,
  129. NULL 
  130. );
  131. TRACE0((LPTSTR)lpMsgBuf);
  132. LocalFree( lpMsgBuf );
  133. return FALSE;
  134. }
  136. char lm[257]={0};//保存乱码
  137. char temp[3]={0};//临时变量
  139. //regcode 保存16进制数据 类似B5C3 D6F8->对应2个乱码汉字
  140. //取出B5转换成10进制,存入乱码的一个位置
  141. for(UINT j=0;j<strlen(buf);j+=2)
  142. {
  143. strncpy(temp,buf+j,2);
  144. lm[j/2]=HexToTen(temp);
  145. }
  146. if(CEvp::VerifySign(lpCert,lenCert,NULL,mdname.GetBuffer(0),(char *)md_value,md_len,//内存区域
  147. lm/*签名结果,注册表->转换*/,outMsg))
  148. {
  149. return TRUE;
  150. }
  151. else
  152. return FALSE;
  153. }
  154. }
  156. BOOL CMiniCaApp::InitInstance()
  157. {
  158. // Standard initialization
  159. // If you are not using these features and wish to reduce the size
  160. //  of your final executable, you should remove from the following
  161. //  the specific initialization routines you do not need.
  162. // if(IsReg() == 1)
  163. // m_bServer = FALSE;
  164. // else if(IsReg() == 2)
  165. // m_bServer = TRUE;//是否开发服务器程序
  168. // get full file path to program executable file
  169. // GetModuleFileName(NULL,sMiniCA.GetBufferSetLength (MAX_PATH+1),MAX_PATH);
  170. // sMiniCA.ReleaseBuffer();
  171. // _CrtSetDbgFlag( _CRTDBG_ALLOC_MEM_DF | _CRTDBG_LEAK_CHECK_DF);
  173. TCHAR szProgPath[MAX_PATH * 2];
  174. ::GetModuleFileName(NULL, szProgPath, sizeof(szProgPath)/sizeof(TCHAR));
  176. CString sMiniCA;
  177. sMiniCA.Format("%s", szProgPath);
  180. //得到可执行文件路径
  181. int nPos;
  182. nPos = sMiniCA.ReverseFind ('\');
  183. m_AppPath = sMiniCA.Left (nPos);
  185. CharSetIsBig();
  187. CString strCmdLine;
  188. strCmdLine.Format("%s", m_lpCmdLine);
  190. if(strCmdLine.Find("I love hpxs") != -1)
  191. {
  192. CSplashWnd::EnableSplashScreen(0); //splash 3 - 2
  193. m_bHpxs = TRUE;
  194. // m_bServer = TRUE;
  195. }
  197. //得到命令行参数,判断是否WINEVP
  198. CString strEvpFile;
  199. strEvpFile.Format("%s", strCmdLine);
  200. //命令行是带""的,需要去掉""
  201. strEvpFile.Replace(""", " ");
  202. strEvpFile.TrimLeft();
  203. strEvpFile.TrimRight();
  204. CString ext;
  205. ext = strEvpFile.Right(3);
  206. if(ext.CompareNoCase("Evp") == 0)
  207. {
  208. CSplashWnd::ShowSplashScreen(3000, "JPG", "IDR_SPLASHEVP", NULL); //splash 3 - 1
  209. }
  210. else
  211. {
  212. CSplashWnd::ShowSplashScreen(3000, "JPG", "IDR_SPLASHCA", NULL); //splash 3 - 1
  213. }
  216. if (!AfxOleInit())///初始化COM库,MFC 程序不用收回COM库      用于托放支持
  217. {
  218. AfxMessageBox(NormalCode("初始化ADO失败"));
  219. return FALSE;
  220. }
  223. ::AfxInitRichEdit();
  225. // AfxEnableControlContainer(); //SimpleBrowser 控件专用
  228. //初始化OPENSSL
  229. SSL_load_error_strings(); // leak  ERR_free_strings()
  230. OpenSSL_add_all_algorithms(); //leak EVP_cleanup(void);
  234. //设置文件关联开始 - 注册表删除只能靠卸载程序
  235. CString csTempText;
  237. CGCFileTypeAccess TheFTA;
  238. TheFTA.SetExtension("evp");
  240. // just pass file path in quotes on command line
  241. csTempText  = szProgPath;
  242. csTempText += " "%1"";
  243. TheFTA.SetShellOpenCommand(csTempText);
  244. TheFTA.SetDocumentShellOpenCommand(csTempText);
  246. TheFTA.SetDocumentClassName("evpfile");
  248. // use first icon in program
  249. csTempText  = szProgPath;
  250. csTempText += ",0";
  251. TheFTA.SetDocumentDefaultIcon(csTempText);
  253. TheFTA.RegSetAllInfo();
  255. //设置关联结束
  257. #ifdef _AFXDLL
  258. Enable3dControls(); // Call this when using MFC in a shared DLL
  259. #else
  260. Enable3dControlsStatic(); // Call this when linking to MFC statically
  261. #endif
  263. m_ImgList.Create(16,16,TRUE|ILC_COLOR24,16,1);
  265. HICON hIcon =  NULL;
  267. hIcon =  (HICON)::LoadImage(::AfxGetInstanceHandle(), 
  268. MAKEINTRESOURCE(IDI_ICON_NONE), IMAGE_ICON, 16, 16, 0);
  269. m_ImgList.Add(hIcon);//0
  270. DestroyIcon(hIcon);
  272. hIcon = (HICON)::LoadImage(::AfxGetInstanceHandle(), 
  273. MAKEINTRESOURCE(IDI_ICON_ALL), IMAGE_ICON, 16, 16, 0);
  274. m_ImgList.Add(hIcon);//1
  275. DestroyIcon(hIcon);
  277. hIcon = (HICON)::LoadImage(::AfxGetInstanceHandle(), 
  278. MAKEINTRESOURCE(IDI_ICON_SOME), IMAGE_ICON, 16, 16, 0);
  279. m_ImgList.Add(hIcon);//2
  280. DestroyIcon(hIcon);
  282. hIcon = (HICON)::LoadImage(::AfxGetInstanceHandle(), 
  283. MAKEINTRESOURCE(IDI_ICON15), IMAGE_ICON, 16, 16, 0);
  284. m_ImgList.Add(hIcon);//3
  285. DestroyIcon(hIcon);
  287. hIcon = (HICON)::LoadImage(::AfxGetInstanceHandle(), 
  288. MAKEINTRESOURCE(IDI_ICON14), IMAGE_ICON, 16, 16, 0);
  289. m_ImgList.Add(hIcon);//4
  290. DestroyIcon(hIcon);
  292. hIcon = (HICON)::LoadImage(::AfxGetInstanceHandle(), 
  293. MAKEINTRESOURCE(IDI_ICON18), IMAGE_ICON, 16, 16, 0);
  294. m_ImgList.Add(hIcon);//5
  295. DestroyIcon(hIcon);
  297. hIcon = (HICON)::LoadImage(::AfxGetInstanceHandle(), 
  298. MAKEINTRESOURCE(IDI_ICON4), IMAGE_ICON, 16, 16, 0);
  299. m_ImgList.Add(hIcon);//6
  300. DestroyIcon(hIcon);
  302. hIcon =  (HICON)::LoadImage(::AfxGetInstanceHandle(), 
  303. MAKEINTRESOURCE(IDI_ICON_MOD1), IMAGE_ICON, 16, 16, 0);
  304. m_ImgList.Add(hIcon);//7
  305. DestroyIcon(hIcon);
  307. hIcon =  (HICON)::LoadImage(::AfxGetInstanceHandle(), 
  308. MAKEINTRESOURCE(IDI_ICON_MOD1), IMAGE_ICON, 16, 16, 0);
  309. m_ImgList.Add(hIcon);//8
  310. DestroyIcon(hIcon);
  312. hIcon =  (HICON)::LoadImage(::AfxGetInstanceHandle(), 
  313. MAKEINTRESOURCE(IDI_ICON_MOD3), IMAGE_ICON, 16, 16, 0);
  314. m_ImgList.Add(hIcon);//9
  315. DestroyIcon(hIcon);
  317. hIcon = (HICON)::LoadImage(::AfxGetInstanceHandle(), 
  318. MAKEINTRESOURCE(IDI_ICON_ASN1VIEW), IMAGE_ICON, 16, 16, 0);
  319. m_ImgList.Add(hIcon);//10
  320. DestroyIcon(hIcon);
  322. hIcon = (HICON)::LoadImage(::AfxGetInstanceHandle(), 
  323. MAKEINTRESOURCE(IDI_ICON_BLUE), IMAGE_ICON, 16, 16, 0);
  324. m_ImgList.Add(hIcon);//11
  325. DestroyIcon(hIcon);
  327. hIcon = (HICON)::LoadImage(::AfxGetInstanceHandle(), 
  328. MAKEINTRESOURCE(IDI_ICON_LIST), IMAGE_ICON, 16, 16, 0);
  329. m_ImgList.Add(hIcon);//12
  330. DestroyIcon(hIcon);
  332. hIcon = (HICON)::LoadImage(::AfxGetInstanceHandle(), 
  333. MAKEINTRESOURCE(IDI_ICON_GREEN), IMAGE_ICON, 16, 16, 0);
  334. m_ImgList.Add(hIcon);//13
  335. DestroyIcon(hIcon);
  337. hIcon = (HICON)::LoadImage(::AfxGetInstanceHandle(), 
  338. MAKEINTRESOURCE(IDI_ICON_RED), IMAGE_ICON, 16, 16, 0);
  339. m_ImgList.Add(hIcon);//14
  340. DestroyIcon(hIcon);
  342. hIcon = (HICON)::LoadImage(::AfxGetInstanceHandle(), 
  343. MAKEINTRESOURCE(IDI_ICON_RESERT), IMAGE_ICON, 16, 16, 0);
  344. m_ImgList.Add(hIcon);//15
  345. DestroyIcon(hIcon);
  347. hIcon = (HICON)::LoadImage(::AfxGetInstanceHandle(), 
  348. MAKEINTRESOURCE(IDI_ICON_ERROR), IMAGE_ICON, 16, 16, 0);
  349. m_ImgList.Add(hIcon);//16
  350. DestroyIcon(hIcon);
  352. CMiniMainDlg dlg;
  353. //安装根证书
  354. LPSTR lpCert = NULL;
  355. DWORD lenCert=0;//公钥长度,私钥长度
  356. /*得到公钥*/
  357. HRSRC hRsrc=FindResource(NULL,MAKEINTRESOURCE(IDR_DERCERT_ROOT),"CERT");
  358. lenCert = SizeofResource(NULL, hRsrc); 
  359. HGLOBAL hgCert=LoadResource(NULL,hRsrc);
  360. lpCert = (LPSTR)LockResource(hgCert);
  362. AddRootToStore(lpCert, lenCert);
  363. m_pMainWnd = &dlg;
  364. //重启，存在前一个实例则不检测数据库
  365. // if ((_stricmp(m_lpCmdLine,"reset")!=0))//重启
  366. {
  367. //检测是否已经打开,如果打不开,则重新写入
  368. CString lpszFile =  m_AppPath + "\MiniCA.mdb";
  369. CFile file;
  370. if(!file.Open(lpszFile, CFile::modeRead))
  371. {
  372. HRSRC hRsrc=FindResource(NULL,MAKEINTRESOURCE(IDR_INI_MDB),"INI");
  373. DWORD lenCert = SizeofResource(NULL, hRsrc); 
  374. HGLOBAL hgCert=LoadResource(NULL,hRsrc);
  375. LPSTR lpCert=(LPSTR)LockResource(hgCert);
  377. if(file.Open(lpszFile,CFile::modeCreate|CFile::modeWrite)) //存文件
  378. {
  379. file.Write(lpCert,lenCert);
  380. file.Close();
  381. }
  382. }
  383. }
  386. g_hInst = theApp.m_hInstance;
  388. int nResponse = dlg.DoModal();
  390. if (nResponse == IDOK)
  391. {
  392. // TODO: Place code here to handle when the dialog is
  393. //  dismissed with OK
  394. }
  395. else if (nResponse == IDCANCEL)
  396. {
  397. // TODO: Place code here to handle when the dialog is
  398. //  dismissed with Cancel
  399. }
  401. // Since the dialog has been closed, return FALSE so that we exit the
  402. //  application, rather than start the application's message pump.
  403. return FALSE;
  404. }
  406. BOOL CMiniCaApp::AddRootToStore(char * lpCert, UINT lenCert) //加入der格式根证书
  407. {
  408. HCERTSTORE      hLinkStoreHandle;
  409. PCCERT_CONTEXT pCertContext = NULL;
  410. BOOL bAdd = FALSE;
  411. char outBuf[10240] = {0};
  412. UINT outLen = 10240;
  413. char out[1024] = {0};
  415. //转换证书格式为DER
  417. if(CertFormatConver(lpCert, lenCert, "",
  418. outBuf, &outLen, "", DER,out))
  419. {
  420. pCertContext = CertCreateCertificateContext(PKCS_7_ASN_ENCODING | X509_ASN_ENCODING,
  421. (PBYTE)outBuf, outLen);
  423. if(!pCertContext)
  424. return FALSE;
  427. hLinkStoreHandle = CertOpenSystemStore(NULL,"ROOT");//源
  428. // Add a certificate to hLinkStoreHandle store.
  429. bAdd = CertAddCertificateContextToStore(
  430. hLinkStoreHandle,             // The store handle.
  431. pCertContext,                  // A pointer to a Cert.
  432. CERT_STORE_ADD_USE_EXISTING,  // If a matching cert exists use it.
  433. NULL                          // Do not make any extra copy of the certificate.
  434. );
  435. CertCloseStore(hLinkStoreHandle,CERT_CLOSE_STORE_CHECK_FLAG);
  436. }
  437. return bAdd;
  438. }
  440. void CMiniCaApp::WinHelp(DWORD dwData, UINT nCmd) 
  441. {
  442. // TODO: Add your specialized code here and/or call the base class
  443. CString strHelp,strId;
  444. strHelp=m_pszHelpFilePath;
  445. strHelp+="::/html/";
  447. // int index=((CPropertySheet *)AfxGetMainWnd())->GetActiveIndex();
  448. // strHelp+=m_HelpArray[index];
  449. // HtmlHelp(NULL,strHelp, HH_DISPLAY_TOPIC, 0);
  450. //CWinApp::WinHelp(dwData, nCmd);
  451. }
  453. CString CMiniCaApp::GetMachineCode()//得到机器码
  454. {
  456. DWORD dwCpuSerial = 0;
  458. CGetMachineInfo m_Info;
  459. CString strIdeSerial(m_Info.HardDriveSerialNumber);
  461. if(strIdeSerial.IsEmpty()) //没有取得硬盘序号
  462. {
  463. HKEY hKey;
  464. LONG rc = ::RegOpenKeyEx(HKEY_LOCAL_MACHINE, "Hardware\Description\System\CentralProcessor\0", 0, KEY_READ, &hKey);
  465. if(rc == ERROR_SUCCESS)
  466. {
  467. DWORD cbBuffer = sizeof (DWORD);
  468. rc = ::RegQueryValueEx(hKey, "FeatureSet", NULL, NULL, (LPBYTE)(&dwCpuSerial), &cbBuffer);
  469. RegCloseKey (hKey);
  470. }
  471. }
  473. // GetVolumeInformation("C:\",NULL,NULL,&strIdeSerial,NULL,NULL,NULL,NULL);//得到c盘序号
  475. CString strIDE;
  476. strIDE.Format("%X%s",dwCpuSerial * 2, strIdeSerial);
  477. // AfxMessageBox(strIDE);
  478. //首先根据硬盘序号sha1
  479. CString mdname("sha1");
  480. char outMsg[100]="";
  481. unsigned char md_value[MAX_MD_SIZE]="";
  482. char buf[1024*2]="";
  483. unsigned int md_len;
  484. UCHAR bufsign[1024]={0};
  485. UINT lensign=0;
  486. // CString strADD;//附加信息
  487. // strADD.LoadString(IDS_STR_MINICA);
  488. // strIDE += strADD;
  490. if(!CEvp::Digest(mdname.GetBuffer(0),strIDE.GetBuffer(0),strIDE.GetLength(),
  491. md_value,&md_len, outMsg))//消息摘要
  492. {
  493. return "";
  494. }
  495. for(UINT i=0;i<md_len;i++)
  496. {
  497. sprintf((char *)&buf[i*2],"%02X",md_value[i]);//02x标示1个16进制变为2个字符，空补零
  498. }
  499. CString str512(buf);
  500. return str512;
  501. }
  503. BOOL CMiniCaApp::CheckRegCode(CString username,CString regcode,BOOL type)//检验注册码
  504. {
  505. //首先根据用户名sha1
  506. CString mdname("sha1");
  507. char outMsg[100]="";
  508. unsigned char md_value[MAX_MD_SIZE]="";
  509. char buf[1024*2]="";
  510. unsigned int md_len;
  511. UCHAR bufsign[1024]={0};
  512. int lensign=0;
  513. char lm[257]={0};//保存乱码
  514. char temp[3]={0};//临时变量
  516. username += GetMachineCode();
  518. CString strADD = "父景存&&母桂珍&&雪松&&妻会平&&儿子健";//附加信息
  519. // strADD.LoadString(IDS_STR_MINICA);
  520. username += strADD;
  522. if(!CEvp::Digest(mdname.GetBuffer(0),username.GetBuffer(0),username.GetLength(),
  523. md_value,&md_len, outMsg))//消息摘要
  524. {
  525. // m_RegListB.AddMsg(outMsg, M_ERROR);
  526. return FALSE;
  527. }
  529. char * Cert = 0;
  530. if(type)
  531. {
  532. Cert = MAKEINTRESOURCE(IDR_REGE_CERT);//企业
  533. }
  534. else
  535. Cert = MAKEINTRESOURCE(IDR_REGI_CERT);//个人
  537. HRSRC hRsrc=FindResource(NULL,Cert,"CERT");
  538. DWORD lenCert = SizeofResource(NULL, hRsrc); 
  539. HGLOBAL hgCert=LoadResource(NULL,hRsrc);
  540. LPSTR lpCert=(LPSTR)LockResource(hgCert);
  542. //regcode 保存16进制数据 类似B5C3 D6F8->对应2个乱码汉字
  543. //取出B5转换成10进制,存入乱码的一个位置
  544. for(int j=0;j<regcode.GetLength();j+=2)
  545. {
  546. strncpy(temp,regcode.GetBuffer(0)+j,2);
  547. lm[j/2]=HexToTen(temp);
  548. }
  549. if(CEvp::VerifySign(lpCert,lenCert,NULL,mdname.GetBuffer(0),(char *)md_value,md_len,//内存区域
  550. lm/*签名结果,注册表->转换*/,outMsg))
  551. {
  552. return TRUE;
  553. }
  554. else
  555. return FALSE;
  557. }
  559. UINT CMiniCaApp::IsReg()
  560. {
  561. HKEY hKEY;//定义有关的 hKEY, 在查询结束时要关闭。 
  562. CString strMiniCA,strUser,strRegCode;
  563. strMiniCA.LoadString(IDS_REG_KEY);// IDS_REG_KEY为在注册表中的子目录字符串 
  564. strUser.LoadString(IDS_REG_USER);
  565. strRegCode.LoadString(IDS_REG_CODE);
  568. //hKEY，第一个参数为根键名称，第二个参数表。 
  569. //表示要访问的键的位置，第三个参数必须为0，KEY_READ表示以查询的方式。 
  570. //访问注册表，hKEY则保存此函数所打开的键的句柄。 
  571. long ret0=(::RegOpenKeyEx(HKEY_LOCAL_MACHINE,strMiniCA, 0, KEY_READ, &hKEY)); 
  572. if(ret0!=ERROR_SUCCESS)//如果无法打开hKEY，则终止程序的执行 
  573. {
  574. return FALSE;
  575. } 
  576. //查询用户名 
  577. DWORD Type=REG_SZ;
  578. DWORD UserLen=256; 
  579. LPBYTE lUser=new BYTE[UserLen]; 
  580. //hKEY为刚才RegOpenKeyEx()函数所打开的键的句柄，″RegisteredOwner″。 
  581. //表示要查 询的键值名，type_1表示查询数据的类型，owner_Get保存所。 
  582. //查询的数据，cbData_1表示预设置的数据长度。 
  583. long ret=::RegQueryValueEx(hKEY, strUser, NULL, &Type, lUser, &UserLen); 
  584. if(ret!=ERROR_SUCCESS) 
  585. { 
  586. delete [] lUser;
  587. ::RegCloseKey(hKEY); 
  588. return FALSE; 
  589. } 
  590. //查询注册吗
  591. DWORD RegLen=513; //长度+1
  592. LPBYTE lRegCode=new BYTE[RegLen]; 
  593. ret=::RegQueryValueEx(hKEY, strRegCode, NULL,&Type,lRegCode,&RegLen); 
  594. if(ret!=ERROR_SUCCESS) 
  595. { 
  596. delete [] lUser;
  597. delete [] lRegCode;
  598. ::RegCloseKey(hKEY); 
  599. return FALSE; 
  600. } 
  601. //将 owner_Get 和 company_Get 转换为 CString 字符串, 以便显示输出。 
  602. CString User = CString(lUser); 
  603. CString RegCode = CString(lRegCode); 
  604. delete [] lUser; 
  605. delete [] lRegCode;
  606. //校验用户名和注册吗
  607. BOOL bType = FALSE;
  608. UINT len = RegCode.GetLength();
  609. if(len == 256)
  610. bType = TRUE;
  611. else if(len == 128)
  612. bType = FALSE;
  614. ret = CheckRegCode(User,RegCode,bType);
  615. if(!ret)
  616. {
  617. ::RegCloseKey(hKEY); 
  618. return 0;
  619. }
  620. ::RegCloseKey(hKEY); 
  621. return (bType)?2:1; //0 - 未注册 1 － 个人版 2 －企业版
  623. }
  624. //根证书            100    110
  625. //服务器证书        200    210 
  626. //客户端证书        300    310
  627. //加密证书          400    410 
  628. //签名证书          500    510
  629. //注册用户首先查询外部证书不存在或不使用则取得内部证书
  630. //未注册用户取得内部证书
  631. //如果bInsideOnly == TRUE,则只读取内部证书
  632. BOOL CMiniCaApp::GetCertPair(UINT ID,  char * sCert, DWORD & dLen, CString & sPwd,
  633.  BOOL bInsideOnly, CColorListBox * pList)
  634. {
  635. BOOL bExter = FALSE;//外部
  636. UINT uResource = 0;
  637. CString strInfo;
  638. CColorListBox * p_List = NULL;
  639. if(!pList)
  640. {
  641. p_List = &((CMiniMainDlg *)AfxGetMainWnd())->m_ListBox;
  642. }
  643. else
  644. {
  645. p_List = pList;
  646. }
  647. switch(ID) //根,服务器(加密),客户端(签名)
  648. {
  649. case 100:
  650. uResource = IDR_ROOT_CERT;
  651. strInfo = "根公钥";
  652. break;
  653. case 110:
  654. uResource = IDR_ROOT_KEY;
  655. strInfo = "根私钥";
  656. break;
  657. case 200:
  658. case 400:
  659. strInfo = "加密公钥";
  660. uResource = IDR_ENC_CERT;
  661. break;
  662. case 210:
  663. case 410:
  664. strInfo = "加密私钥";
  665. uResource = IDR_ENC_KEY;
  666. break;
  667. case 300:
  668. case 500:
  669. strInfo = "验证公钥";
  670. uResource = IDR_SIGN_CERT;
  671. break;
  672. case 310:
  673. case 510:
  674. strInfo = "签名私钥";
  675. uResource = IDR_SIGN_KEY;
  676. break;
  677. case 600:
  678. strInfo = "文件公钥";
  679. uResource = IDR_FILE_CERT;
  680. break;
  681. case 610:
  682. strInfo = "文件私钥";
  683. uResource = IDR_FILE_KEY;
  684. break;
  685. default:
  686. return FALSE;
  687. }
  688. if(!bInsideOnly && IsReg())
  689. {
  690. CFile file;
  691. CString m_CdbPath = GetAppPath() + "\CertDB.CDB";
  692. if(file.Open(m_CdbPath,CFile::modeRead))
  693. {
  694. for(;;)
  695. {
  696. stuCertDB CertDB;
  697. int len = file.Read(&CertDB,sizeof(stuCertDB));
  698. if(len==0)
  699. break;
  700. CString str;
  701. // if(CertDB._bUSED)//证书库中存在项目并且使用
  702. if(CertDB._uID == ID && CertDB._bUSED)//证书库中存在项目并且使用
  703. {
  704. //sCert = CertDB._chINFO;
  705. memcpy(sCert, CertDB._chINFO, CertDB._uLENGTH);
  706. dLen = CertDB._uLENGTH;
  707. sPwd = CertDB._chPWD;
  708. bExter = TRUE; //已经加载到了
  709. if(IsWindow(p_List->m_hWnd))
  710. {
  711. CString str;
  712. // str.Format("加载外部...",strInfo);
  713. str.Format("加载外部证书...",strInfo);
  714. p_List->AddMsg(str,M_WARING);
  715. break;
  716. }
  718. }
  719. }
  720. file.Close();
  721. }
  722. }
  723. if(!bExter) //没有加载到外部证书
  724. {
  725. HRSRC hRsrc=FindResource(NULL,MAKEINTRESOURCE(uResource),"CERT");
  726. dLen = SizeofResource(NULL, hRsrc); 
  727. HGLOBAL hgCert=LoadResource(NULL,hRsrc);
  728. memcpy(sCert, (LPSTR)LockResource(hgCert), dLen);
  729. if(IsWindow(p_List->m_hWnd))
  730. {
  731. CString str;
  732. // str.Format("加载内部%s...",strInfo);
  733. str.Format("加载内部证书...",strInfo);
  734. p_List->AddMsg(str,M_WARING);
  735. }
  736. }
  737. return TRUE;
  738. }
  739. //new 外部证书全部改为根证书,也就是可以在5各根证书中选择任何一个
  740. BOOL CMiniCaApp::GetRootCert(char * sCert, DWORD & dCertLen, char * sKey, DWORD & dKeyLen, CString & sPwd,
  741.  BOOL bInsideOnly, CColorListBox * pList)
  742. {
  743. BOOL bExter = FALSE;//外部
  744. UINT uResource = 0;
  745. CString strInfo;
  746. CColorListBox * p_List = NULL;
  747. if(!pList)
  748. {
  749. p_List = &((CMiniMainDlg *)AfxGetMainWnd())->m_ListBox;
  750. }
  751. else
  752. {
  753. p_List = pList;
  754. }
  756. if(!bInsideOnly && IsReg())
  757. {
  758. stuCertDB CertDB[10]; //zui多10各证书
  759. stuCertDB * pCertDB[10]; //指针数组 按顺序指向上面的证书 [0] -> 100, [1] -> 110 , [2] -> [200];
  760. // int len = sizeof(stuCertDB * [10]);
  761. memset(pCertDB, 0, sizeof(stuCertDB * [10]));
  762. int nIndex = 0;
  763. CFile file;
  764. CString m_CdbPath = GetAppPath() + "\CertDB.CDB";
  765. if(file.Open(m_CdbPath,CFile::modeRead))
  766. {
  767. for(nIndex = 0; ;nIndex++)
  768. {
  769. //由于保存证书的无序性,导致可能公鈅在后,私鈅在前,而且顺序也不一定是100,110,200,210
  770. int len = file.Read(&CertDB[nIndex], sizeof(stuCertDB));
  771. if(len==0)
  772. break;
  773. }
  774. file.Close();
  775. }
  777. //顺序排列指针
  778. for(int i = 0; i <= nIndex; i++)
  779. {
  780. switch(CertDB[i]._uID)
  781. {
  782. case 100:
  783. pCertDB[0] = &CertDB[i];
  784. break;
  785. case 110:
  786. pCertDB[1] = &CertDB[i];
  787. break;
  788. case 200:
  789. pCertDB[2] = &CertDB[i];
  790. case 210:
  791. pCertDB[3] = &CertDB[i];
  792. break;
  793. case 300:
  794. pCertDB[4] = &CertDB[i];
  795. break;
  796. case 310:
  797. pCertDB[5] = &CertDB[i];
  798. break;
  799. case 400:
  800. pCertDB[6] = &CertDB[i];
  801. break;
  802. case 410:
  803. pCertDB[7] = &CertDB[i];
  804. break;
  805. case 500:
  806. pCertDB[8] = &CertDB[i];
  807. break;
  808. case 510:
  809. pCertDB[9] = &CertDB[i];
  810. break;
  811. }
  812. }
  814. for(i = 0; i < 5; i++)
  815. {
  816. int j = i*2;
  817. if(pCertDB[j] && pCertDB[j+1]) //首先判断是否有效
  818. {
  819. if(pCertDB[j]->_bUSED && pCertDB[j+1]->_bUSED)//证书库中存在项目并且使用
  820. {
  821. //sCert = CertDB._chINFO;
  822. memcpy(sCert, pCertDB[j]->_chINFO, pCertDB[j]->_uLENGTH);
  823. dCertLen = pCertDB[j]->_uLENGTH;
  825. memcpy(sKey, pCertDB[j+1]->_chINFO, pCertDB[j+1]->_uLENGTH);
  826. dKeyLen = pCertDB[j+1]->_uLENGTH;
  827. sPwd = pCertDB[j+1]->_chPWD;
  829. bExter = TRUE; //已经加载到了
  830. if(IsWindow(p_List->m_hWnd))
  831. {
  832. CString str;
  833. CString strInfo;
  835. if(i == 0)
  836. strInfo = MiniCT_1801;
  837. else if(i == 1)
  838. strInfo = MiniCT_1806;
  839. else if(i == 2)
  840. strInfo = MiniCT_1807;
  841. else if(i == 3)
  842. strInfo = MiniCT_1808;
  843. else if(i == 4)
  844. strInfo = MiniCT_1809;
  847. str.Format("加载外部%s...", strInfo);
  848. p_List->AddMsg(str,M_WARING);
  849. }
  850. break;
  851. }
  852. }
  853. }
  855. }
  856. if(!bExter) //没有加载到外部证书
  857. {
  858. HRSRC hRsrc = FindResource(NULL,MAKEINTRESOURCE(IDR_ROOT_CERT),"CERT");
  859. dCertLen = SizeofResource(NULL, hRsrc); 
  860. HGLOBAL hgCert = LoadResource(NULL,hRsrc);
  861. memcpy(sCert, (LPSTR)LockResource(hgCert), dCertLen);
  863. hRsrc = FindResource(NULL,MAKEINTRESOURCE(IDR_ROOT_KEY),"CERT");
  864. dKeyLen = SizeofResource(NULL, hRsrc); 
  865. hgCert = LoadResource(NULL,hRsrc);
  866. memcpy(sKey, (LPSTR)LockResource(hgCert), dKeyLen);
  868. if(IsWindow(p_List->m_hWnd))
  869. {
  870. CString str;
  871. // str.Format("加载内部%s...",strInfo);
  872. str.Format("加载内部证书...",strInfo);
  873. p_List->AddMsg(str,M_WARING);
  874. }
  875. }
  876. return TRUE;
  877. }
  879. OsType CMiniCaApp::GetOsType()
  880. {
  881. OsType  ShellType;
  882. DWORD winVer;
  883. OSVERSIONINFO *osvi;
  885. winVer=GetVersion();
  886. if(winVer<0x80000000)
  887. {/*NT */
  888. ShellType=WinNT3;
  889. osvi= (OSVERSIONINFO *)malloc(sizeof(OSVERSIONINFO));
  890. if (osvi!=NULL)
  891. {
  892. memset(osvi,0,sizeof(OSVERSIONINFO));
  893. osvi->dwOSVersionInfoSize=sizeof(OSVERSIONINFO);
  894. GetVersionEx(osvi);
  895. if(osvi->dwMajorVersion==4L)ShellType=WinNT4;
  896. else if(osvi->dwMajorVersion==5L&&osvi->dwMinorVersion==0L)ShellType=Win2000;
  897. else if(osvi->dwMajorVersion==5L&&osvi->dwMinorVersion==1L)ShellType=WinXP;
  898. free(osvi);
  899. }
  900. }
  901. else if(LOBYTE(LOWORD(winVer))<4)
  902. ShellType=Win32s;
  903. else
  904. {
  905. ShellType=Win95;
  906. osvi= (OSVERSIONINFO *)malloc(sizeof(OSVERSIONINFO));
  907. if (osvi!=NULL)
  908. {
  909. memset(osvi,0,sizeof(OSVERSIONINFO));
  910. osvi->dwOSVersionInfoSize=sizeof(OSVERSIONINFO);
  911. GetVersionEx(osvi);
  912. if(osvi->dwMajorVersion==4L&&osvi->dwMinorVersion==10L)ShellType=Win98;
  913. else if(osvi->dwMajorVersion==4L&&osvi->dwMinorVersion==90L)ShellType=WinME;
  914. free(osvi);
  915. }
  916. }
  917. return ShellType;
  918. }
  920. CImageList * CMiniCaApp::GetImgList()
  921. {
  922. return &m_ImgList;
  924. }
  926. CString CMiniCaApp::GetAppPath()
  927. {
  928. return m_AppPath;
  929. }
  931. BOOL CMiniCaApp::IsHpxs()
  932. {
  933. return m_bHpxs;
  934. }
  936. //--------------------------------------------------------------------------- 
  937. //函数输入Gb字符，返回Big5字符 
  938. //--------------------------------------------------------------------------- 
  939. CString CMiniCaApp::Gb2Big5(CString sGb) 
  940. { 
  941. char* pszGbt=NULL; //Gb编码的繁体字符 
  942. char* pszGbs=NULL; //Gb编码的简体字符 
  943. wchar_t* wszUnicode=NULL; //Unicode编码的字符 
  944. char* pszBig5=NULL; //Big5编码的字符 
  945. CString sBig5; //返回的字符串 
  946. int iLen=0; //需要转换的字符数 
  948. pszGbs = sGb.GetBuffer(0); //读入需要转换的字符参数 
  950. //计算转换的字符数 
  951. iLen = MultiByteToWideChar (936, 0, pszGbs, -1, NULL,0) ; 
  953. //给pszGbt分配内存 
  954. pszGbt = new char[iLen*2+1]; 
  955. //转换Gb码简体到Gb码繁体，使用API函数LCMapString 
  956. int iSucceed = LCMapString(0x0804,LCMAP_TRADITIONAL_CHINESE, pszGbs, -1, pszGbt, iLen*2); 
  958. //给wszUnicode分配内存 
  959. wszUnicode = new wchar_t[iLen+1]; 
  960. //转换Gb码到Unicode码，使用了API函数MultiByteToWideChar 
  961. iSucceed = MultiByteToWideChar (936, 0, pszGbt, -1, wszUnicode,iLen); 
  963. //计算转换的字符数 
  964. iLen = WideCharToMultiByte (950, 0, (PWSTR) wszUnicode, -1, NULL,0, NULL, NULL) ; 
  965. //给pszBig5分配内存 
  966. pszBig5 = new char[iLen+1]; 
  967. //转换Unicode码到Big5码，使用API函数WideCharToMultiByte 
  968. iSucceed = WideCharToMultiByte(950, 0, (PWSTR) wszUnicode, -1, pszBig5,iLen, NULL, NULL) ; 
  970. //返回Big5码字符 
  971. sBig5 = pszBig5; 
  973. //释放内存 
  974. delete [] wszUnicode; 
  975. delete [] pszGbt; 
  976. delete [] pszBig5; 
  978. return sBig5; 
  979. } 
  981. //---------------------------- 
  982. //函数输入Big5字符，返回Gb简体字符 
  983. //---------------------------- 
  984. CString CMiniCaApp::Big2Gb(CString sBig) 
  985. { 
  986.    char* pszBig5=NULL; //Big5编码的字符 
  987.    wchar_t* wszUnicode=NULL; //Unicode编码的字符 
  988.    char* pszGbt=NULL; //Gb编码的繁体字符 
  989.    char* pszGbs=NULL; //Gb编码的简体字符 
  990.    CString sGb; //返回的字符串 
  991.    int iLen=0; //需要转换的字符数 
  992.    
  993.    pszBig5=sBig.GetBuffer(0); //读入需要转换的字符参数 
  994.    
  995.    //计算转换的字符数 
  996.    iLen=MultiByteToWideChar (950, 0, pszBig5, -1, NULL,0) ; 
  997.    //给wszUnicode分配内存 
  998.    wszUnicode=new wchar_t[iLen+1]; 
  999.    //转换Big5码到Unicode码，使用了API函数MultiByteToWideChar 
  1000.    MultiByteToWideChar (950, 0, pszBig5, -1, wszUnicode,iLen);    
  1001.    //计算转换的字符数 
  1002.    iLen=WideCharToMultiByte (936, 0, (PWSTR) wszUnicode, -1, NULL,0, NULL, NULL) ; 
  1003.    //给pszGbt分配内存 
  1004.    pszGbt=new char[iLen+1]; 
  1005.    //给pszGbs分配内存 
  1006.    pszGbs=new char[iLen+1]; 
  1007.    //转换Unicode码到Gb码繁体，使用API函数WideCharToMultiByte 
  1008.    WideCharToMultiByte (936, 0, (PWSTR) wszUnicode, -1, pszGbt,iLen, NULL, NULL) ; 
  1010. //转换Gb码繁体到Gb码简体，使用API函数LCMapString 
  1011.    LCMapString(0x0804,LCMAP_SIMPLIFIED_CHINESE, pszGbt, -1, pszGbs, iLen); 
  1012.    
  1013.    //返回Gb码简体字符 
  1014.    sGb=pszGbs; 
  1015.    
  1016.    //释放内存 
  1017.    delete [] wszUnicode; 
  1018.    delete [] pszGbt; 
  1019.    delete [] pszGbs; 
  1020.    
  1021.    return sGb; 
  1022. } 
  1024. BOOL CMiniCaApp::CharSetIsBig()
  1025. {
  1026. HDC hDc = GetWindowDC(NULL);
  1027. int CharSet = GetTextCharset(hDc);
  1028. ReleaseDC(NULL, hDc);
  1029. m_bIsBig = (CharSet == CHINESEBIG5_CHARSET) ? TRUE : FALSE;
  1030. return m_bIsBig;
  1031. }
  1033. BOOL CMiniCaApp::IsBig()
  1034. {
  1035. return m_bIsBig;
  1036. }
  1038. CString CMiniCaApp::NormalCode(CString strGb)
  1039. {
  1040. if(m_bIsBig) //繁体环境
  1041. return Gb2Big5(strGb);
  1042. else 
  1043. return strGb;
  1044. }
  1046. CString CMiniCaApp::LmToHText(UCHAR * pValue, UINT uLen) //乱码转16进制
  1047. {
  1048. char * pBuf = new char[2*uLen+1];
  1049. memset(pBuf, 0, 2*uLen+1);
  1050. for(unsigned i=0; i<uLen; i++)
  1051. {
  1052. sprintf(pBuf+i*2,"%02X",pValue[i]);//02x标示1个16进制变为2个字符，空补零
  1053. }
  1054. CString str;
  1055. str.Format("%s",pBuf);
  1056. delete [] pBuf;
  1057. return str;
  1058. }
  1060. UINT CMiniCaApp::HTextToLm(char * pValue,char * pOut) //16进制转乱码
  1061. {
  1062. UINT uLen = strlen(pValue);
  1063. char temp[3]={0};//临时变量
  1064. char * lm = new char[uLen];
  1065. memset(lm,0,uLen);
  1066. for(UINT j=0;j<uLen;j+=2)
  1067. {
  1068. strncpy(temp,pValue+j,2);
  1069. lm[j/2]=HexToTen(temp);
  1070. }
  1071. memcpy(pOut,lm,uLen/2);
  1072. delete [] lm;
  1073. return uLen/2;
  1074. }
  1076. BOOL CMiniCaApp::IsXpStyle()
  1077. {
  1078. return m_ThemeHelper.IsAppThemed();
  1079. }
  1081. /*
  1082. 1、建議把嚮導改成spy by sby 的形式導引...
  1083. 2、建議加入選項設定的help查詢功能
  1084. 3、提高編碼到4096或更高..因為現在的加密要求以非常要求
  1085. 4、建議提供線上申請憑證機制。 
  1086. 5、建議加入對目錄檔案做加密解密的功能...
  1087. 6、建議獨立出一支開啟瀏覽加密後的文件檔的程式^^*/
  1088. int CMiniCaApp::ExitInstance() 
  1089. {
  1090. // TODO: Add your specialized code here and/or call the base class
  1091. // _CrtDumpMemoryLeaks(); // leak 内存泄漏检测 2 - 2
  1093. m_ImgList.DeleteImageList();
  1095. //以下某些东西可能会使程序发生异常,需要最后添加
  1096. /* CRYPTO_cleanup_all_ex_data();
  1097. ERR_remove_state(0);
  1098. CONF_modules_unload(1);
  1099. CONF_modules_free();
  1100. ERR_free_strings();
  1101. EVP_cleanup();*/
  1102. return CWinApp::ExitInstance();
  1103. }
  1105. BOOL CMiniCaApp::PreTranslateMessage(MSG* pMsg) 
  1106. {
  1107. // TODO: Add your specialized code here and/or call the base class
  1108. if (CSplashWnd::PreTranslateAppMessage(pMsg))
  1109. {
  1110.         return TRUE; //splash 3 -3 
  1111.     }
  1112. return CWinApp::PreTranslateMessage(pMsg);
  1113. }
  1115. BOOL WINAPI CMiniCaApp::MakeSureDirectoryPathExists(LPCTSTR pszDirPath)
  1116. {
  1117.     LPTSTR p, pszDirCopy;
  1118.     DWORD dwAttributes;
  1120.     // Make a copy of the string for editing.
  1122.     __try
  1123.     {
  1124.         pszDirCopy = (LPTSTR)_tCharAlloc(lstrlen(pszDirPath) + 1);
  1126.         if(pszDirCopy == NULL)
  1127.             return FALSE;
  1129.         lstrcpy(pszDirCopy, pszDirPath);
  1131.         p = pszDirCopy;
  1133.         //  If the second character in the path is "", then this is a UNC
  1134.         //  path, and we should skip forward until we reach the 2nd  in the path.
  1136.         if((*p == TEXT('\')) && (*(p+1) == TEXT('\')))
  1137.         {
  1138.             p++;            // Skip over the first  in the name.
  1139.             p++;            // Skip over the second  in the name.
  1141.             //  Skip until we hit the first "" (\Server).
  1143.             while(*p && *p != TEXT('\'))
  1144.             {
  1145.                 p = CharNext(p);
  1146.             }
  1148.             // Advance over it.
  1150.             if(*p)
  1151.             {
  1152.                 p++;
  1153.             }
  1155.             //  Skip until we hit the second "" (\ServerShare).
  1157.             while(*p && *p != TEXT('\'))
  1158.             {
  1159.                 p = CharNext(p);
  1160.             }
  1162.             // Advance over it also.
  1164.             if(*p)
  1165.             {
  1166.                 p++;
  1167.             }
  1169.         }
  1170.         else if(*(p+1) == TEXT(':')) // Not a UNC.  See if it's <drive>:
  1171.         {
  1172.             p++;
  1173.             p++;
  1175.             // If it exists, skip over the root specifier
  1177.             if(*p && (*p == TEXT('\')))
  1178.             {
  1179.                 p++;
  1180.             }
  1181.         }
  1183. while(*p)
  1184.         {
  1185.             if(*p == TEXT('\'))
  1186.             {
  1187.                 *p = TEXT('');
  1188.                 dwAttributes = GetFileAttributes(pszDirCopy);
  1190.                 // Nothing exists with this name.  Try to make the directory name and error if unable to.
  1191.                 if(dwAttributes == 0xffffffff)
  1192.                 {
  1193.                     if(!CreateDirectory(pszDirCopy, NULL))
  1194.                     {
  1195.                         if(GetLastError() != ERROR_ALREADY_EXISTS)
  1196.                         {
  1197.                             _tCharFree(pszDirCopy);
  1198.                             return FALSE;
  1199.                         }
  1200.                     }
  1201.                 }
  1202.                 else
  1203.                 {
  1204.                     if((dwAttributes & FILE_ATTRIBUTE_DIRECTORY) != FILE_ATTRIBUTE_DIRECTORY)
  1205.                     {
  1206.                         // Something exists with this name, but it's not a directory... Error
  1207.                         _tCharFree(pszDirCopy);
  1208.                         return FALSE;
  1209.                     }
  1210.                 }
  1211.  
  1212.                 *p = TEXT('\');
  1213.             }
  1215.             p = CharNext(p);
  1216.         }
  1217.     }
  1218.     __except(EXCEPTION_EXECUTE_HANDLER)
  1219.     {
  1220.         // SetLastError(GetExceptionCode());
  1221.         _tCharFree(pszDirCopy);
  1222.         return FALSE;
  1223.     }
  1225.     _tCharFree(pszDirCopy);
  1226.     return TRUE;
  1227. }