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

源码开发语言/平台
当前位置：首页 > 源码/资料 > 行业应用 > 金融证券系统 > 查看源码
XMLDoc.cpp
资源名称：clking_src.rar　[点击查看]
上传用户：zhanglf88
上传日期：2013-11-19
资源大小：6036k
文件大小：9k
源码类别：

金融证券系统

开发平台：

Visual C++

XMLDoc.cpp：源码内容
  1. /*
  2. Cross Platform Core Code.
  4. Copyright(R) 2001-2002 Balang Software.
  5. All rights reserved.
  7. Using:
  8. class CXMLNode;
  9. class CXMLDocument;
  10. Warning:
  11. To use these classes, must call AfxOleInit() first.
  12. */
  14. #include "stdafx.h"
  15. #include <afxconv.h>
  16. #include <errno.h>
  17. #include "../Include/Markup.h"
  18. #include "../Include/XMLDoc.h"
  19. #include "strings.h"
  21. #ifdef _DEBUG
  22. #undef THIS_FILE
  23. static char THIS_FILE[]=__FILE__;
  24. #define new DEBUG_NEW
  25. #endif
  27. static CString FormatTime( CSPTime tm )
  28. {
  29. return (LPCTSTR)tm.Format( "%Y/%m/%d %H:%M:%S" );
  30. }
  32. static BOOL ParseTime( CString strTime, CSPTime &tm )
  33. {
  34. char sepDate = '/';
  35. char sepTime = ':';
  36. char sepDateTime = ' ';
  38. strTime.TrimLeft();
  39. strTime.TrimRight();
  40. if( strTime.IsEmpty() )
  41. return FALSE;
  43. int nYear = 1971, nMonth = 1, nDay = 1;
  44. int nHour = 0, nMinute= 0, nSecond = 0;
  45. CString strTemp;
  46. int nIndex;
  48. // year
  49. nIndex = strTime.Find( sepDate );
  50. if( -1 != nIndex )
  51. {
  52. strTemp = strTime.Left(nIndex);
  53. strTime = strTime.Mid(nIndex+1);
  54. nYear = atol(strTemp);
  55. }
  56. else
  57. {
  58. nYear = atol(strTime);
  59. tm = CSPTime( nYear, nMonth, nDay, nHour, nMinute, nSecond );
  60. return (-1 != tm.GetTime());
  61. }
  63. // month
  64. nIndex = strTime.Find( sepDate );
  65. if( -1 != nIndex )
  66. {
  67. strTemp = strTime.Left(nIndex);
  68. strTime = strTime.Mid(nIndex+1);
  69. nMonth = atol(strTemp);
  70. }
  71. else
  72. {
  73. nMonth = atol(strTime);
  74. tm = CSPTime( nYear, nMonth, nDay, nHour, nMinute, nSecond );
  75. return (-1 != tm.GetTime());
  76. }
  78. // day
  79. nIndex = strTime.Find( sepDateTime );
  80. if( -1 != nIndex )
  81. {
  82. strTemp = strTime.Left(nIndex);
  83. strTime = strTime.Mid(nIndex+1);
  84. nDay = atol(strTemp);
  85. }
  86. else
  87. {
  88. nDay = atol(strTime);
  89. tm = CSPTime( nYear, nMonth, nDay, nHour, nMinute, nSecond );
  90. return (-1 != tm.GetTime());
  91. }
  93. // hour
  94. nIndex = strTime.Find( sepTime );
  95. if( -1 != nIndex )
  96. {
  97. strTemp = strTime.Left(nIndex);
  98. strTime = strTime.Mid(nIndex+1);
  99. nHour = atol(strTemp);
  100. }
  101. else
  102. {
  103. nHour = atol(strTime);
  104. tm = CSPTime( nYear, nMonth, nDay, nHour, nMinute, nSecond );
  105. return (-1 != tm.GetTime());
  106. }
  108. // minute
  109. nIndex = strTime.Find( sepTime );
  110. if( -1 != nIndex )
  111. {
  112. strTemp = strTime.Left(nIndex);
  113. strTime = strTime.Mid(nIndex+1);
  114. nMinute = atol(strTemp);
  115. }
  116. else
  117. {
  118. nMinute = atol(strTime);
  119. tm = CSPTime( nYear, nMonth, nDay, nHour, nMinute, nSecond );
  120. return (-1 != tm.GetTime());
  121. }
  123. // second
  124. nSecond = atol(strTime);
  125. tm = CSPTime( nYear, nMonth, nDay, nHour, nMinute, nSecond );
  126. return (-1 != tm.GetTime());
  127. }
  129. //////////////////////////////////////////////////////////////////////////////////
  130. // class CXMLNode
  131. CXMLNode::CXMLNode( )
  132. {
  133. }
  135. BOOL CXMLNode::SetAttribute( CMarkup & markup )
  136. {
  137. return TRUE;
  138. }
  140. CString CXMLNode::getAttrValue( CMarkup & markup, LPCTSTR lpszName )
  141. {
  142. ASSERT( NULL != lpszName );
  143. return markup.GetAttrib( lpszName );
  144. }
  146. long CXMLNode::getAttrValue_I( CMarkup & markup, LPCTSTR lpszName )
  147. {
  148. ASSERT( NULL != lpszName );
  149. CString strValue = markup.GetAttrib( lpszName );
  151. if( strValue.GetLength() <= 0 )
  152. return 0;
  153. LPTSTR lpstrRet = NULL;
  154. long nRet;
  155. nRet = _tcstoul( (LPCTSTR)strValue, &lpstrRet, 10 );
  156. if( ERANGE == errno || ( lpstrRet && '' != *lpstrRet ) )
  157. return 0;
  158. return nRet;
  159. }
  161. CSPTime CXMLNode::getAttrValue_T( CMarkup & markup, LPCTSTR lpszName )
  162. {
  163. ASSERT( NULL != lpszName );
  164. CString strValue = markup.GetAttrib( lpszName );
  166. CSPTime tmRet;
  167. if( ParseTime( strValue, tmRet ) )
  168. return tmRet;
  169. else
  170. return CSPTime::GetCurrentTime();
  171. }
  173. //////////////////////////////////////////////////////////////////////////////////
  174. // class CXMLDocument
  176. CXMLDocument::CXMLDocument()
  177. {
  178. }
  180. CXMLDocument::~CXMLDocument()
  181. {
  182. }
  184. BOOL CXMLDocument::Initialize()
  185. {
  186. return TRUE;
  187. }
  189. void CXMLDocument::Release()
  190. {
  191. m_markup.SetDoc( _T("") );
  192. }
  194. BOOL CXMLDocument::SetRawDocument( CString &strDoc )
  195. {
  196. return m_markup.SetDoc( strDoc );
  197. }
  199. void CXMLDocument::SetLastErrorMessage(LPCTSTR lpszError)
  200. {
  201. if( NULL != lpszError )
  202. m_strLastErrorMessage = lpszError;
  203. }
  205. BOOL CXMLDocument::GetLastErrorMessage(LPTSTR lpszError, UINT nMaxError )
  206. {
  207. if( m_strLastErrorMessage.IsEmpty() )
  208. m_strLastErrorMessage = szErrXMLDefault;
  210. strncpy( lpszError, m_strLastErrorMessage.GetBuffer(m_strLastErrorMessage.GetLength()+1), nMaxError );
  211. m_strLastErrorMessage.ReleaseBuffer();
  212. return strlen(lpszError)>0;
  213. }
  215. /////////////////////////////////////////////////////////////////////////////////////
  216. // The Old XMLDoc using msxml.dll 2.5(gb2312) or above
  217. /* 
  218. //////////////////////////////////////////////////////////////////////////////////
  219. // class CXMLNode
  220. CXMLNode::CXMLNode( )
  221. {
  222. }
  224. BOOL CXMLNode::SetAttribute( MSXML::IXMLDOMNodePtr pNode )
  225. {
  226. MSXML::IXMLDOMNamedNodeMapPtr pMap = pNode->Getattributes( );
  227. if( NULL == pMap )
  228. return FALSE;
  229. return TRUE;
  230. }
  232. BOOL CXMLNode::getAttrValue( MSXML::IXMLDOMNamedNodeMapPtr pMap, 
  233. LPCTSTR lpcszName, _bstr_t& bstrValue )
  234. {
  235. ASSERT( NULL != pMap );
  236. ASSERT( NULL != lpcszName );
  238. _bstr_t bstrName = lpcszName;
  239. MSXML::IXMLDOMNodePtr pNode = pMap->getNamedItem( bstrName );
  240. if( NULL == pNode )
  241. {
  242. return FALSE;
  243. }
  244. bstrValue = pNode->Gettext( );
  245. return TRUE;
  246. }
  248. CString CXMLNode::getAttrValue( MSXML::IXMLDOMNamedNodeMapPtr pMap, 
  249. LPCTSTR lpcszName )
  250. {
  251. ASSERT( NULL != pMap );
  252. ASSERT( NULL != lpcszName );
  254. _bstr_t bstrName = lpcszName;
  255. MSXML::IXMLDOMNodePtr pNode = pMap->getNamedItem( bstrName );
  256. if( NULL == pNode )
  257. {
  258. return "";
  259. }
  260. return (LPCTSTR)pNode->Gettext( );
  261. }
  263. long CXMLNode::getAttrValue_I( MSXML::IXMLDOMNamedNodeMapPtr pMap, LPCTSTR lpcszName )
  264. {
  265. LPTSTR lpstrRet = NULL;
  266. long nRet;
  268. CString strValue = getAttrValue( pMap, lpcszName );
  269. nRet = _tcstoul( (LPCTSTR)strValue, &lpstrRet, 10 );
  270. if( ERANGE == errno || ( lpstrRet && '' != *lpstrRet ) )
  271. return 0;
  272. return nRet;
  273. }
  275. CSPTime CXMLNode::getAttrValue_T( MSXML::IXMLDOMNamedNodeMapPtr pMap, LPCTSTR lpcszName )
  276. {
  277. CSPTime tmRet;
  279. CString strValue = getAttrValue( pMap, lpcszName );
  280. if( ParseTime( strValue, tmRet ) )
  281. return tmRet;
  282. else
  283. return CSPTime::GetCurrentTime();
  284. }
  286. //////////////////////////////////////////////////////////////////////////////////
  287. // class CXMLDocument
  289. CXMLDocument::CXMLDocument()
  290. {
  291. m_pDOMDoc = NULL;
  292. }
  294. CXMLDocument::~CXMLDocument()
  295. {
  297. }
  299. BOOL CXMLDocument::Initialize()
  300. {
  301. if( m_pDOMDoc )
  302. return TRUE;
  304. try
  305. {
  306. MSXML::IXMLDOMDocumentPtr pDOMDoc(__uuidof(MSXML::DOMDocument));
  307. m_pDOMDoc = pDOMDoc;
  308. }
  309. catch(_com_error e)
  310. {
  311. TRACE(_T("Caught Exception: OnOpenURL"));
  312. }
  313. catch(...)
  314. {
  315. TRACE(_T("Caught Exception: OnOpenURL"));
  316. }
  318. return ( NULL != m_pDOMDoc );
  319. }
  321. void CXMLDocument::Release()
  322. {
  323. }
  325. //Synchronously create a stream on a URL.
  326. //
  327. // hr = URLOpenBlockingStream(0, pszURL, &pStm, 0,0);    
  328. // CHECK_ERROR(SUCCEEDED(hr) && pStm, "Couldn't open stream on URL")
  329. //
  330. //Get the IPersistStreamInit interface to the XML doc.
  331. //
  332. // hr = pDoc->QueryInterface(IID_IPersistStreamInit, (void **)&pPSI);
  333. // CHECK_ERROR(SUCCEEDED(hr), "QI for IPersistStreamInit failed");
  334. //
  335. //Init the XML doc from the stream.
  336. // hr = pPSI->Load(pStm);
  338. BOOL CXMLDocument::Load(LPCTSTR lpcszURL)
  339. {
  340. USES_CONVERSION;
  342. if( NULL == m_pDOMDoc || NULL == lpcszURL )
  343. return FALSE;
  345. try
  346. {
  347. m_pDOMDoc->put_async(VARIANT_FALSE);
  348. _bstr_t bstrURL = lpcszURL;
  349. VARIANT_BOOL varResult = m_pDOMDoc->load(_variant_t(bstrURL));
  350. if (VARIANT_FALSE == varResult)
  351. {
  352. // Load failed
  353. MSXML::IXMLDOMParseErrorPtr pParseError = m_pDOMDoc->GetparseError();
  354. long dwError = pParseError->GeterrorCode();
  355. _bstr_t bstrReason = pParseError->Getreason();
  356. CString strError;
  357. strError.Format(_T("XML Parse Error 0x%x : %s"), dwError, W2T(bstrReason));
  358. m_strLastErrorMessage = strError;
  359. return FALSE;
  360. }
  361. }
  362. catch( ... )
  363. {
  364. return FALSE;
  365. }
  367. return TRUE;
  368. }
  370. BOOL CXMLDocument::SetRawDocument( CString &strDoc )
  371. {
  372. USES_CONVERSION;
  373. if( NULL == m_pDOMDoc )
  374. return FALSE;
  376. try
  377. {
  378. m_pDOMDoc->put_async(VARIANT_FALSE);
  379. VARIANT_BOOL varResult = m_pDOMDoc->loadXML( _bstr_t(strDoc) );
  380. if (VARIANT_FALSE == varResult)
  381. {
  382. // Load failed
  383. MSXML::IXMLDOMParseErrorPtr pParseError = m_pDOMDoc->GetparseError();
  384. long dwError = pParseError->GeterrorCode();
  385. _bstr_t bstrReason = pParseError->Getreason();
  386. CString strError;
  387. strError.Format(_T("XML Parse Error 0x%x : %s"), dwError, W2T(bstrReason));
  388. m_strLastErrorMessage = strError;
  389. return FALSE;
  390. }
  391. }
  392. catch( ... )
  393. {
  394. return FALSE;
  395. }
  397. return TRUE;
  398. }
  400. void CXMLDocument::SetLastErrorMessage(LPCTSTR lpszError)
  401. {
  402. if( NULL != lpszError )
  403. m_strLastErrorMessage = lpszError;
  404. }
  406. BOOL CXMLDocument::GetLastErrorMessage(LPTSTR lpszError, UINT nMaxError )
  407. {
  408. if( m_strLastErrorMessage.IsEmpty() )
  409. m_strLastErrorMessage = szErrXMLDefault;
  411. strncpy( lpszError, m_strLastErrorMessage.GetBuffer(m_strLastErrorMessage.GetLength()+1), nMaxError );
  412. m_strLastErrorMessage.ReleaseBuffer();
  413. return strlen(lpszError)>0;
  414. }
  415. */
  416. // The Old XMLDoc using msxml.dll 2.5(gb2312) or above
  417. /////////////////////////////////////////////////////////////////////////////////////