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

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

CA认证

开发平台：

Visual C++

Asn1ParsePage.cpp：源码内容
  1. // Asn1ParsePage.cpp : implementation file
  2. //
  4. #include "stdafx.h"
  5. #include "MiniCA.h"
  6. #include "Asn1ParsePage.h"
  7. #include "MiniMainDlg.h"
  8. #include <locale.h>
  9. #include ".GenericClassLanguage.h"
  10. #include "minict.h"
  11. #ifdef _DEBUG
  12. #define new DEBUG_NEW
  13. #undef THIS_FILE
  14. static char THIS_FILE[] = __FILE__;
  15. #endif
  17. /////////////////////////////////////////////////////////////////////////////
  18. // CAsn1ParsePage property page
  20. IMPLEMENT_DYNCREATE(CAsn1ParsePage, CPropertyPage)
  22. CAsn1ParsePage::CAsn1ParsePage() : CPropertyPage(CAsn1ParsePage::IDD)
  23. {
  24. //{{AFX_DATA_INIT(CAsn1ParsePage)
  25. // NOTE: the ClassWizard will add member initialization here
  26. //}}AFX_DATA_INIT
  27. m_TreeItem=NULL;
  28. }
  30. CAsn1ParsePage::~CAsn1ParsePage()
  31. {
  32. }
  34. void CAsn1ParsePage::DoDataExchange(CDataExchange* pDX)
  35. {
  36. CPropertyPage::DoDataExchange(pDX);
  37. //{{AFX_DATA_MAP(CAsn1ParsePage)
  38. // DDX_Control(pDX, IDC_EDIT_PATH, m_XpEdit);
  39. DDX_Control(pDX, IDC_B_READ, m_Bread);
  40. DDX_Control(pDX, IDC_ASN1_TREE, m_Tree);
  41. //}}AFX_DATA_MAP
  42. }
  45. BEGIN_MESSAGE_MAP(CAsn1ParsePage, CPropertyPage)
  46. //{{AFX_MSG_MAP(CAsn1ParsePage)
  47. ON_BN_CLICKED(IDC_B_READ, OnBRead)
  48. ON_NOTIFY(TVN_SELCHANGED, IDC_ASN1_TREE, OnSelchangedAsn1Tree)
  49. ON_WM_DESTROY()
  50. ON_NOTIFY(NM_RCLICK, IDC_ASN1_TREE, OnRclickAsn1Tree)
  51. ON_COMMAND(ID_MENUITEM_EXPANE, OnMenuitemExpane)
  52. ON_WM_CREATE()
  53. //}}AFX_MSG_MAP
  54. END_MESSAGE_MAP()
  56. /////////////////////////////////////////////////////////////////////////////
  57. // CAsn1ParsePage message handlers
  58. BOOL CAsn1ParsePage::OnInitDialog() 
  59. {
  60. CPropertyPage::OnInitDialog();
  61. // TODO: Add extra initialization here
  62. m_Bread.SetThemeHelper(((CMiniCaApp *)AfxGetApp())->GetThemeHelperST());
  63. // m_Bread.DrawAsToolbar(TRUE);
  64. m_Bread.SetIcon(IDI_ICON_SELECTDIR);
  65. m_Bread.OffsetColor(CButtonST::BTNST_COLOR_BK_IN, 30);
  67. //m_Bread.SetFlat(FALSE);
  68. CImageList * pImgList = ((CMiniCaApp *)AfxGetApp())->GetImgList();
  69. m_Tree.SetImageList(pImgList,TVSIL_NORMAL);
  70. //XP风格菜单,表现为选中时候图标偏移
  71. BCMenu::SetMenuDrawMode( BCMENU_DRAWMODE_XP );
  73. m_toolTip.Create(this);
  74. m_toolTip.AddTool(GetDlgItem(IDC_B_READ), CMiniCaApp::NormalCode("选择被解码的文件r文件长度小于10K字节"));
  77. if(!((CMiniCaApp *)AfxGetApp())->IsXpStyle())
  78. {
  79. ClassXP(GetDlgItem(IDC_EDIT_PATH)->m_hWnd,TRUE);
  80. // ClassXP(GetDlgItem(IDC_ASN1_TREE)->m_hWnd,TRUE);
  81. }
  83. return TRUE;  // return TRUE unless you set the focus to a control
  84.               // EXCEPTION: OCX Property Pages should return FALSE
  85. }
  87. void CAsn1ParsePage::OnBRead() 
  88. {
  89. // TODO: Add your control notification handler code here
  90. CFileDialog dlgOpen(true,NULL,NULL,OFN_HIDEREADONLY | OFN_OVERWRITEPROMPT /*| OFN_NOCHANGEDIR */,
  91. MiniCT_1600, NULL);
  93. dlgOpen.m_ofn.lStructSize = sizeof(OPENFILENAME);
  94. CString str = MiniCT_1601;
  95. dlgOpen.m_ofn.lpstrTitle = str;//标题条 LPCTSTR
  96. if(dlgOpen.DoModal()!=IDOK) return;
  97. CString fileName=dlgOpen.GetPathName();
  98. GetAsn1Info(fileName);
  99. }
  102. void CAsn1ParsePage::OnSelchangedAsn1Tree(NMHDR* pNMHDR, LRESULT* pResult) 
  103. {
  104. NM_TREEVIEW* pNMTreeView = (NM_TREEVIEW*)pNMHDR;
  105. // TODO: Add your control notification handler code here
  106. HTREEITEM handle=m_Tree.GetSelectedItem();
  107. POSITION pos;
  108. stuNODE * tNode;
  109. CString str;
  110. for( pos = m_NodeList.GetHeadPosition(); pos != NULL; )
  111. {
  112. tNode=(stuNODE *)m_NodeList.GetNext(pos);
  113. if(tNode->NODE==handle)
  114. {
  115. str.Format("%s:%drn%s:%drn%s:%s", 
  116. MiniCT_1602, tNode->EXCURSION, MiniCT_1603,
  117. tNode->LENGTH, MiniCT_1604, tNode->INFO);
  118. SetDlgItemText(IDC_EDIT_INFO,str);
  119. break;
  120. }
  122. }
  123. *pResult = 0;
  124. }
  126. void CAsn1ParsePage::OnDestroy() 
  127. {
  128. CPropertyPage::OnDestroy();
  129. // TODO: Add your message handler code here
  130. stuNODE * LIST=NULL;
  131. for(;!m_NodeList.IsEmpty();)
  132. {
  133. LIST=(stuNODE *)m_NodeList.RemoveHead();
  134. delete LIST;
  135. }
  136. }
  138. void CAsn1ParsePage::OnRclickAsn1Tree(NMHDR* pNMHDR, LRESULT* pResult) 
  139. {
  140. // TODO: Add your control notification handler code here
  142. CPoint point;
  143. GetCursorPos(&point); // 当前鼠标坐标
  144. CPoint PointInTree = point;
  145. m_Tree.ScreenToClient( &PointInTree);
  147. UINT nFlag;
  148. m_TreeItem = m_Tree.HitTest( PointInTree, &nFlag );
  150. if(m_TreeItem == NULL)
  151. return;
  153. m_Tree.SelectItem(m_TreeItem);//设置选中
  155. HTREEITEM item = m_Tree.GetChildItem(m_TreeItem);//是否有子项
  156. if(item==NULL)
  157. return;
  159. int nState= m_Tree.GetItemState(m_TreeItem,TVIF_STATE)& TVIS_EXPANDED ;//是否已经展开
  161. BCMenu m_PopMenu;
  162. m_PopMenu.LoadMenu(IDR_MENU_ASN1VIEW);
  163. m_PopMenu.LoadToolbar(IDR_MINICAMENU);
  165. CMenu * pPopup = m_PopMenu.GetSubMenu(0);
  166. SetForegroundWindow(); //点击可以关闭
  167. ASSERT(pPopup);
  169. //ModifyODMenuA
  170. if(nState!=0)//已经展开
  171. m_PopMenu.ModifyODMenu(MiniCT_1605, ID_MENUITEM_EXPANE);
  172. else
  173. m_PopMenu.ModifyODMenu(MiniCT_1606, ID_MENUITEM_EXPANE);//展开
  175. UINT nSelection = pPopup->TrackPopupMenu(TPM_LEFTBUTTON|TPM_RIGHTBUTTON|TPM_LEFTALIGN, point.x, 
  176. point.y,this, NULL);
  177. m_PopMenu.DestroyMenu();
  178. *pResult = 0;
  179. }
  181. void CAsn1ParsePage::OnMenuitemExpane() //展开
  182. {
  183. // TODO: Add your command handler code here
  184. ExpandAll(m_TreeItem,TVE_TOGGLE);
  185. }
  187. void CAsn1ParsePage::ExpandAll(HTREEITEM item,UINT nCode )////展开,收缩
  188. {
  189. m_Tree.SetRedraw(FALSE);
  190. if( m_Tree.ItemHasChildren( item ))
  191. {
  192. m_Tree.Expand( item, nCode );
  193. item = m_Tree.GetChildItem( item );
  194. do
  195. {
  196. ExpandAll(item,nCode);
  197. }while( (item = m_Tree.GetNextSiblingItem( item )) != NULL );
  198. }
  199. m_Tree.EnsureVisible( m_Tree.GetSelectedItem());
  200. m_Tree.SetRedraw();
  202. }
  204. void CAsn1ParsePage::GetAsn1Info(CString strpath)
  205. {
  207. //由于PEM格式解码经常崩溃,所以在开始时候限制文件大小为2K
  208. CFile file;
  209. if(file.Open(strpath,CFile::modeRead))
  210. {
  211. if(file.GetLength() >= 10*1024)
  212. {
  213. file.Close();
  214. AddMsg(MiniCT_1607, M_WARING); //文件长度超过10K字节
  215. return;
  216. }
  217. file.Close();
  218. }
  219. else
  220. return;
  222. m_Tree.DeleteAllItems();
  223. SetDlgItemText(IDC_EDIT_INFO,"");
  224. SetDlgItemText(IDC_EDIT_PATH,strpath);
  226. stuNODE * LIST=NULL;
  227. for(;!m_NodeList.IsEmpty();)
  228. {
  229. LIST=(stuNODE *)m_NodeList.RemoveHead();
  230. delete [] LIST;
  231. }
  233. char buf[255]={0};
  234. stuTREE * TREEPEM = NULL, * TREEDER = NULL, * temp = NULL;
  236. if(Asn1Parse(strpath.GetBuffer(0),TREEDER,DER,buf))//==1 ok
  237. {
  238. HTREEITEM depth[20]={0};//深度
  239. depth[0]=TVI_ROOT;
  240. CString str;
  241. for(temp=TREEDER;temp!=NULL;temp=temp->Link)
  242. {
  243. stuNODE * pNode=new stuNODE;
  244. depth[temp->DEPTH+1]=m_Tree.InsertItem(temp->TYPE,10,10,depth[temp->DEPTH]);
  245. pNode->NODE=depth[temp->DEPTH+1];
  246. pNode->EXCURSION=temp->EXCURSION;
  247. pNode->LENGTH=temp->LENGTH;
  248. if(strlen(temp->INFO))
  249. {
  250. strncpy(pNode->INFO,temp->INFO,sizeof(pNode->INFO));
  251. }
  252. m_NodeList.AddHead(pNode);
  253. }
  254. FreeTree(TREEPEM);
  255. FreeTree(TREEDER);
  256. return;
  257. }
  258. strpath.ReleaseBuffer();
  261. if(Asn1Parse(strpath.GetBuffer(0),TREEPEM,PEM,buf))//==1 ok
  262. {
  263. HTREEITEM depth[20]={0};//深度
  264. depth[0]=TVI_ROOT;
  265. CString str;
  266. for(temp=TREEPEM;temp!=NULL;temp=temp->Link)
  267. {
  268. stuNODE * pNode=new stuNODE;
  269. depth[temp->DEPTH+1]=m_Tree.InsertItem(temp->TYPE,10,10,depth[temp->DEPTH]);
  270. pNode->NODE=depth[temp->DEPTH+1];
  271. pNode->EXCURSION=temp->EXCURSION;
  272. pNode->LENGTH=temp->LENGTH;
  273. if(strlen(temp->INFO))
  274. {
  275. strncpy(pNode->INFO,temp->INFO,sizeof(pNode->INFO));
  276. }
  277. m_NodeList.AddHead(pNode);
  278. }
  279. }
  280. else
  281. AddMsg(buf, M_ERROR);
  282. strpath.ReleaseBuffer();
  284. FreeTree(TREEPEM);
  285. FreeTree(TREEDER);
  286. }
  288. void CAsn1ParsePage::AddMsg(CString info, DWORD type)
  289. {
  290. ((CMiniMainDlg *)GetParent())->AddMsg(MiniCT_0005, info, type);
  292. }
  295. BOOL CAsn1ParsePage::PreTranslateMessage(MSG* pMsg)
  296. {
  297. // CG: The following block was added by the ToolTips component. m_toolTip.RelayEvent(pMsg);
  298. return CPropertyPage::PreTranslateMessage(pMsg); // CG: This was added by the ToolTips component.
  299. }
  301. /*添加链表节点*/
  302. int CAsn1ParsePage::AddTree(stuTREE *& Head,UINT Excursion,UINT Depth,UINT Length,char * Type)//返回当前序号
  303. {
  304. int index=0;
  305. stuTREE * End=new stuTREE(Excursion,Depth,Length,Type);//钥增加的节点
  306. if(Head==NULL)
  307. {
  308. Head=End;
  309. }
  310. else 
  311. {
  312. stuTREE * p=Head;
  313. index+=1;
  314. while(p->Link!=NULL)
  315. {
  316. index++;
  317. p=p->Link;
  318. }
  319. p->Link=End; 
  320. }
  322. return index;
  323. }
  325. void CAsn1ParsePage::FreeTree(stuTREE *& Head)
  326. {
  327. stuTREE * temp =NULL;
  329. while(Head!=NULL)//遍历链表
  330. {
  331.     temp=Head;
  332. Head=Head->Link;
  333. delete [] temp;
  334. }
  336. }
  337. int CAsn1ParsePage::asn1_print_info(int tag, int xclass, int constructed,
  338. int indent,char * str)
  339. {
  340. // if (constructed & V_ASN1_CONSTRUCTED)
  341. // p="cons: ";
  342. // else
  343. // p="prim: ";
  344. // if (BIO_write(bp,p,6) < 6) goto err;
  345. // BIO_indent(bp,indent,128);
  346. const char *p;
  347. if ((xclass & V_ASN1_PRIVATE) == V_ASN1_PRIVATE)
  348. sprintf(str,"Private[%d] ",tag);
  349. else if ((xclass & V_ASN1_CONTEXT_SPECIFIC) == V_ASN1_CONTEXT_SPECIFIC)
  350. sprintf(str,"Context[%d]",tag);
  351. else if ((xclass & V_ASN1_APPLICATION) == V_ASN1_APPLICATION)
  352. sprintf(str,"Application [%d]",tag);
  353. else 
  354. {
  355. p = ASN1_tag2str(tag);
  356. sprintf(str,p);
  357. }
  358. return(1);
  359. }
  361. void CAsn1ParsePage::Utf8ToAnsi(UCHAR * lpsrc, int srclen, LPSTR lpdst, int& dstlen)
  362. {
  363. WCHAR * Unicode;
  364.     int len = MultiByteToWideChar ( CP_UTF8 , 0 ,(char*) lpsrc ,-1 ,NULL,0);
  365.     Unicode = new WCHAR[len * sizeof(WCHAR)];
  366.     MultiByteToWideChar ( CP_UTF8 , 0 ,( char * ) lpsrc, -1, Unicode , len );
  367.     len = WideCharToMultiByte(CP_ACP,0,Unicode,-1,NULL,0,NULL,NULL);
  368.     dstlen = WideCharToMultiByte (CP_ACP,0,Unicode,-1,lpdst,len,NULL,NULL);
  369.     delete []Unicode;
  370. }
  372. BOOL CAsn1ParsePage::GetAsn1Str(ASN1_STRING * str,char * outName)
  373. {
  374. if(str==NULL)
  375. return FALSE;
  376. setlocale(LC_CTYPE, "");
  377. //判断str是否为UTF-8
  378. int len = 0;
  379. unsigned char * tmp = NULL; 
  380. if (str && ASN1_STRING_type(str) == V_ASN1_UTF8STRING)
  381. {
  382. len = ASN1_STRING_length(str);
  383. if (len >= 0)
  384. {
  385. tmp = (UCHAR *)OPENSSL_malloc(len+1);
  386. if (tmp)
  387. {
  388. memcpy(tmp, ASN1_STRING_data(str), len);
  389. tmp[len] = '';
  390. }
  391. }
  392. }
  393. else /* not a UTF8 name */ ///////////转UTF-8
  394. {
  395. len = ASN1_STRING_to_UTF8(&tmp, str);
  396. }
  397. int dstlen = 0;
  398. Utf8ToAnsi(tmp, len, outName, dstlen);
  399. OPENSSL_free(tmp);
  400. return TRUE;
  401. }
  403. int CAsn1ParsePage::asn1_parse2(stuTREE *& TREE, unsigned char **pp, long length, int offset,
  404. int depth, int indent, int dump,char * msg)
  405. {
  406. const unsigned char *p,*ep,*tot,*op,*opp;
  407. long len;
  408. int tag,xclass,ret=0;
  409. int nl,hl,j,r;
  410. ASN1_OBJECT *o=NULL;
  411. ASN1_OCTET_STRING *os=NULL;
  412. /* ASN1_BMPSTRING *bmp=NULL;*/
  413. int dump_indent = 6; /* Because we know BIO_dump_indent() */
  414. p= *pp;
  415. tot=p+length;
  416. op=p-1;
  417. char  strInfo[128]={0};
  418. BUF_MEM *bptr;
  419. int biolen;
  420. char * pbuf;
  421. int index=0,i=0;
  422. ASN1_STRING * AsnStr;
  423. char buf[255]={0};
  425. BIO *mem = BIO_new(BIO_s_mem());
  426. BIO_set_close(mem, BIO_CLOSE); /*  BIO_free() free BUF_MEM  */
  428. while ((p < tot) && (op < p))
  429. {
  430. i=0;
  431. op=p;
  432. j=ASN1_get_object(&p,&len,&tag,&xclass,length);//p指向变化
  433. if (j & 0x80)
  434. {
  435. strcpy(msg,"Error in encodingn");
  436. ret=0;
  437. goto end;
  438. }
  439. hl=(p-op);
  440. length-=hl;
  441. /* if j == 0x21 it is a constructed indefinite length object */
  442. if (!asn1_print_info(tag,xclass,j,(indent)?depth:0,strInfo))//得到strInfo(SEQUENCE)
  443. goto end;
  444. //增加链表
  445. index=AddTree(TREE,(long)offset+(long)(op- *pp),depth,len,strInfo);
  446. if (j & V_ASN1_CONSTRUCTED)
  447. {
  448. ep=p+len;
  449. if (len > length)
  450. {
  451. sprintf(msg,"length is greater than %ld",length);
  452. ret=0;
  453. goto end;
  454. }
  455. if ((j == 0x21) && (len == 0))
  456. {
  457. for (;;)
  458. {
  459. r=asn1_parse2(TREE,(UCHAR **)&p,(long)(tot-p),
  460. offset+(p - *pp),depth+1,
  461. indent,dump,msg);
  462. if (r == 0) { ret=0; goto end; }
  463. if ((r == 2) || (p >= tot)) break;
  464. }
  465. }
  466. else
  467. while (p < ep)
  468. {
  469. r=asn1_parse2(TREE,(UCHAR **)&p,(long)len,
  470. offset+(p - *pp),depth+1,
  471. indent,dump,msg);
  472. if (r == 0) { ret=0; goto end; }
  473. }
  474. }
  475. else if (xclass != 0)
  476. {
  477. p+=len;
  478. }
  479. else
  480. {
  481. nl=0;
  482. if ( (tag == V_ASN1_PRINTABLESTRING) ||
  483. (tag == V_ASN1_T61STRING) ||
  484. (tag == V_ASN1_IA5STRING) ||
  485. (tag == V_ASN1_VISIBLESTRING) ||
  486. (tag == V_ASN1_UTCTIME) ||
  487. (tag == V_ASN1_GENERALIZEDTIME))
  488. {
  489. if ((len > 0) &&
  490. BIO_write(mem,(char *)p,(int)len)
  491. != (int)len)
  492. goto end;
  493. }
  494. else if (tag == V_ASN1_OBJECT)
  495. {
  496. opp=op;
  497. if (d2i_ASN1_OBJECT(&o,&opp,len+hl) != NULL)
  498. {
  499. i2a_ASN1_OBJECT(mem,o);
  500. }
  501. else
  502. {
  503. if (BIO_write(mem,":BAD OBJECT",11) <= 0)
  504. goto end;
  505. }
  506. }
  507. else if (tag == V_ASN1_BOOLEAN)
  508. {
  509. int ii;
  510. opp=op;
  511. ii=d2i_ASN1_BOOLEAN(NULL,&opp,len+hl);
  512. if (ii < 0)
  513. {
  514. if (BIO_write(mem,"Bad booleann",12))
  515. goto end;
  516. }
  517. BIO_printf(mem,":%d",ii);
  519. }
  520. else if (tag == V_ASN1_BMPSTRING||tag ==V_ASN1_UTF8STRING)
  521. {
  522. AsnStr=ASN1_STRING_type_new(tag);
  523. ASN1_STRING_set(AsnStr,p,len);
  524. GetAsn1Str(AsnStr,buf);
  525. ASN1_STRING_free(AsnStr);
  527. if (BIO_write(mem,buf,strlen(buf)) < 0)
  528. goto end;
  530. }
  531. else if (tag == V_ASN1_OCTET_STRING)
  532. {
  533. int i,printable=1;
  534. opp=op;
  535. os=d2i_ASN1_OCTET_STRING(NULL,&opp,len+hl);
  536. if (os != NULL)
  537. {
  538. opp=os->data;
  539. for (i=0; i<os->length; i++)
  540. {
  541. if (( (opp[i] < ' ') &&
  542. (opp[i] != 'n') &&
  543. (opp[i] != 'r') &&
  544. (opp[i] != 't')) ||
  545. (opp[i] > '~'))
  546. {
  547. printable=0;
  548. break;
  549. }
  550. }
  551. if (printable && (os->length > 0))
  552. {
  553. if (BIO_write(mem,(char *)opp,
  554. os->length) <= 0)
  555. goto end;
  556. }
  557. if (!printable && (os->length > 0)
  558. && dump)
  559. {
  560. if (!nl) 
  561. {
  562. }
  563. if (BIO_dump_indent(mem,(char *)opp,
  564. ((dump == -1 || dump > os->length)?os->length:dump),
  565. dump_indent) <= 0)
  566. goto end;
  567. nl=1;
  568. }
  569. M_ASN1_OCTET_STRING_free(os);
  570. os=NULL;
  571. }
  572. }
  573. else if (tag == V_ASN1_INTEGER)
  574. {
  575. ASN1_INTEGER *bs;
  576. int i;
  578. opp=op;
  579. bs=d2i_ASN1_INTEGER(NULL,&opp,len+hl);
  580. if (bs != NULL)
  581. {
  582. for (i=0; i<bs->length; i++)
  583. {
  584. if (BIO_printf(mem,"%02X",bs->data[i]) <= 0)
  585. goto end;
  586. }
  587. if (bs->length == 0)
  588. {
  589. if (BIO_write(mem,"00",2) <= 0)
  590. goto end;
  591. }
  592. }
  593. else
  594. {
  595. if (BIO_write(mem,"BAD INTEGER",11) <= 0)
  596. goto end;
  597. }
  598. M_ASN1_INTEGER_free(bs);
  599. }
  600. else if (tag == V_ASN1_ENUMERATED)
  601. {
  602. ASN1_ENUMERATED *bs;
  603. int i;
  605. opp=op;
  606. bs=d2i_ASN1_ENUMERATED(NULL,&opp,len+hl);
  607. if (bs != NULL)
  608. {
  609. if (bs->type == V_ASN1_NEG_ENUMERATED)
  610. if (BIO_write(mem,"-",1) <= 0)
  611. for (i=0; i<bs->length; i++)
  612. {
  613. if (BIO_printf(mem,"%02X",bs->data[i]) <= 0)
  614. goto end;
  616. }
  617. if (bs->length == 0)
  618. {
  619. if (BIO_write(mem,"00",2) <= 0)
  620. goto end;
  621. }
  622. }
  623. else
  624. {
  625. if (BIO_write(mem,"BAD ENUMERATED",11) <= 0)
  626. goto end;
  627. }
  628. M_ASN1_ENUMERATED_free(bs);
  629. }
  630. else if (len > 0 && dump)
  631. {
  632. if (!nl) 
  633. {
  634. }
  635. if (BIO_dump_indent(mem,(char *)p,
  636. ((dump == -1 || dump > len)?len:dump),
  637. dump_indent) <= 0)
  638. goto end;
  639. nl=1;
  640. }
  642. p+=len;
  643. if ((tag == V_ASN1_EOC) && (xclass == 0))
  644. {
  645. ret=2; // End of sequence 
  646. goto end;
  647. }
  648. }
  649. length-=len;
  650. if((p < tot) && (op < p))
  651. {
  652. BIO_get_mem_ptr(mem, &bptr);
  653. // BIO_get_mem_ptr(mem, &bptr);
  654. biolen=bptr->length;
  655. pbuf=new char[biolen+1];
  656. memset(pbuf,0,biolen+1);
  657. memcpy(pbuf,bptr->data,biolen);
  658. for(stuTREE * temp=TREE;temp!=NULL;temp=temp->Link,i++)
  659. {
  660. if(i==index)
  661. {
  662. strncpy(temp->INFO,pbuf,biolen+1>sizeof(temp->INFO)?128:biolen+1);
  663. break;
  664. }
  665. }
  666. delete [] pbuf;
  667. BIO_reset(mem);//恢复bio
  668. }
  669. }
  670. ret=1;
  671. end:
  672. BIO_get_mem_ptr(mem, &bptr);
  673. // BIO_get_mem_ptr(mem, &bptr);
  674. biolen=bptr->length;
  675. pbuf=new char[biolen+1];
  676. memset(pbuf,0,biolen+1);
  677. memcpy(pbuf,bptr->data,biolen);
  678. for(stuTREE * temp=TREE;temp!=NULL;temp=temp->Link,i++)
  679. {
  680. if(i==index)
  681. {
  682. strncpy(temp->INFO,pbuf,biolen+1>sizeof(temp->INFO)?128:biolen+1);
  683. break;
  684. }
  685. }
  687. delete [] pbuf;
  688. if (mem != NULL) BIO_free(mem);
  689. if (o != NULL) ASN1_OBJECT_free(o);
  690. if (os != NULL) M_ASN1_OCTET_STRING_free(os);
  691. *pp=(UCHAR *)p;
  692. return(ret);
  693. }
  695. int CAsn1ParsePage::ASN1_parsedump(stuTREE *& TREE, unsigned char *pp, long len,char * msg)
  696. {
  697. int indent=0;//不用格式化根据输出的数据自动缩进(不使用-i参数)
  698. int dump= 0;//输出16进制数据(0不使用 -dump参数,-1使用)
  699. return(asn1_parse2(TREE,&pp,len,0,0,indent,dump,msg));
  700. }
  702. BOOL CAsn1ParsePage::Asn1Parse(const char * infile,stuTREE *& TREE,const int informat,char * msg)
  703. {
  704. int i,badops=0,ret=0;//offset=0,,j
  705. unsigned int length=0;
  706. long num;
  707. BIO *in=NULL,*b64=NULL;
  708. int indent=0;
  709. char *str=NULL;
  710. BUF_MEM *buf=NULL;
  712. OpenSSL_add_all_algorithms();
  713. in=BIO_new(BIO_s_file());
  714. if (in == NULL)
  715. {
  716. sprintf(msg,"opne %s error",infile);
  717. goto end;
  718. }
  720. if (BIO_read_filename(in,infile) <= 0)
  721. {
  722. strcpy(msg,"read file error");
  723. goto end;
  724. }
  726. if ((buf=BUF_MEM_new()) == NULL) goto end;
  727. if (!BUF_MEM_grow(buf,BUFSIZ*8)) goto end; /* Pre-allocate :-) changes the size */
  729. if (informat == PEM)//PEM格式的先解码为der
  730. {
  731. BIO *tmp;
  732. if ((b64=BIO_new(BIO_f_base64())) == NULL)
  733. goto end;
  734. BIO_push(b64,in);//该函数把in附加到b64上，并返回b64,形成b64-in链
  735. tmp=in;
  736. in=b64;
  737. b64=tmp;
  738. }
  740. num=0;
  741. for (;;)
  742. {
  743. if (!BUF_MEM_grow(buf,(int)num+BUFSIZ)) goto end;
  744. try
  745. {
  746. i = BIO_read(in,&(buf->data[num]),BUFSIZ);
  747. }
  748. catch(...)
  749. {
  750. return FALSE;
  751. }
  752. if (i <= 0) break;
  753. num+=i;
  754. }
  755. str=buf->data;
  757. /* If any structs to parse go through in sequence */
  759. if (length == 0) length = (unsigned int)num;
  760. if (length == 0) 
  761. goto end;
  762. if (!ASN1_parsedump(TREE,(unsigned char *)&(str)[0],length,msg))//str[offset]
  763. {
  764. strcpy(msg,"parse file error");
  765. goto end;
  766. }
  767. ret=1;
  768. end:
  769. if (in != NULL) BIO_free(in);
  770. if (b64 != NULL) BIO_free(b64);
  771. if (ret == 0)
  772. strncpy(msg, MiniCT_1608, 20); //解码错误
  773. if (buf != NULL) BUF_MEM_free(buf);
  774. OBJ_cleanup();
  775. EVP_cleanup();
  776. return ret;
  777. }
  779. void CAsn1ParsePage::TranslateCT() //繙譯諸如樹型控件,列錶控件等內容
  780. {
  781. SetDlgItemText(IDC_B_READ, MiniCT_10001); //
  782. }