fivedev/harbour-core
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

2011-01-16 00:40 UTC+0200 Petr Chornyj (myorg63 at mail.ru)

Browse Source 
* contrib/hbmxml/hbmxml.c
    + Added experimental hb_mxmlGetAttrsCount(), hb_mxmlGetAttrs(), 
      hb_mxmlGetAttrsArray()
    ; WARNING: can be changed or even removed after final 2.7 miniXML release
This commit is contained in:
Petr Chornyj
2011-01-15 22:37:37 +00:00
parent 1c2abbd058
commit 0853196a9d
2 changed files with 77 additions and 0 deletions
Download Patch File Download Diff File Expand all files Collapse all files

6
harbour/ChangeLog
View File

@@ -16,6 +16,12 @@
The license applies to all entries newer than 2009-04-28.
*/
2011-01-16 00:40 UTC+0200 Petr Chornyj (myorg63 at mail.ru)
* contrib/hbmxml/hbmxml.c
+ Added experimental hb_mxmlGetAttrsCount(), hb_mxmlGetAttrs(),
hb_mxmlGetAttrsArray()
; WARNING: can be changed or even removed after final 2.7 miniXML release
2011-01-15 22:00 UTC+0200 Petr Chornyj (myorg63 at mail.ru)
* contrib/hbmxml/hbmxml.c
! Fixed mxmlIndexDelete(), simplified mxmlSaveString()

71
harbour/contrib/hbmxml/hbmxml.c
View File

@@ -1936,3 +1936,74 @@ HB_FUNC( MXMLSETCUSTOMHANDLERS )
mxmlSetCustomHandlers( NULL, NULL );
}
}
/* ============== temporary solution before final 2.7 release ================= */
HB_FUNC( HB_MXMLGETATTRSCOUNT )
{
mxml_node_t * node = mxml_node_param( 1 );
if( node && mxmlGetType( node ) == MXML_ELEMENT )
hb_retni( node->value.element.num_attrs );
else
MXML_ERR_ARGS;
}
HB_FUNC( HB_MXMLGETATTRSARRAY )
{
mxml_node_t * node = mxml_node_param( 1 );
if( node && mxmlGetType( node ) == MXML_ELEMENT )
{
PHB_ITEM pAttrs = hb_itemArrayNew( 0 );
int i;
mxml_attr_t * attr;
for ( i = node->value.element.num_attrs, attr = node->value.element.attrs ;
i > 0; i --, attr++ )
{
PHB_ITEM pAttr = hb_itemArrayNew( 2 );
hb_arraySetStrUTF8( pAttr, 1, attr->name );
hb_arraySetStrUTF8( pAttr, 2, attr->value );
hb_arrayAdd( pAttrs, pAttr );
hb_itemRelease( pAttr );
}
hb_itemReturnRelease( pAttrs );
}
else
MXML_ERR_ARGS;
}
HB_FUNC( HB_MXMLGETATTRS )
{
mxml_node_t * node = mxml_node_param( 1 );
if( node && mxmlGetType( node ) == MXML_ELEMENT )
{
PHB_ITEM pAttrs = hb_hashNew( hb_itemNew( NULL ) );
int i;
mxml_attr_t * attr;
hb_hashSetFlags( pAttrs, HB_HASH_KEEPORDER );
for ( i = node->value.element.num_attrs, attr = node->value.element.attrs ;
i > 0; i --, attr++ )
{
PHB_ITEM pKey = hb_itemPutStrUTF8( NULL, attr->name );
PHB_ITEM pValue = hb_itemPutStrUTF8( NULL, attr->value );
hb_hashAdd( pAttrs, pKey, pValue );
hb_itemRelease( pValue );
hb_itemRelease( pKey );
}
hb_itemReturnRelease( pAttrs );
}
else
MXML_ERR_ARGS;
}