add attributes_dict

Author: lindahua

README.md

@@ -99,13 +99,20 @@ r = content(t)  # r <- "Everyday Italian"
 One can also traverse all attributes of an element ``e`` as
 
 ```julia
-for a in attributes(e)  # a is an instance of 
+for a in attributes(e)  # a is an instance of XMLAttr
 	n = name(a)
 	v = value(a)
 	println("$n = $v")
 end
 ```
 
+Another way to access attributes is to turn them into a dictionary using ``attributes_dict``, as
+
+```julia
+ad = attributes_dict(e1)  
+v = (ad["lang"])  # v <-- "en"
+```
+
 **Note:** The functions ``child_nodes``, ``child_elements``, and ``attributes`` return light weight iterators -- so that one can use them with for-loop. To get an array of all items, one may use the ``collect`` function provided by Julia.
 
 
@@ -204,6 +211,9 @@ child_nodes(x)       # iterator of all child nodes of a node/element x
 child_elements(e)    # iterator of all child elements of e
 attributes(e)        # iterator of all attributes of e
 
+attributes_dict(e)   # a dictionary of all attributes of e, 
+                     # which maps names to corresponding values
+
 has_attribute(e, name)  # whether a named attribute exists for e
 
 # get the value of a named attribute

src/LightXML.jl

@@ -10,8 +10,8 @@ module LightXML
 	XMLAttr, XMLAttrIter, XMLNode, XMLNodeIter, XMLElement, XMLElementIter,
 	nodetype, value, content, attribute, has_attribute,
 	is_elementnode, is_textnode, is_commentnode, is_cdatanode, is_blanknode,
-	child_nodes, has_children, attributes, has_attributes, child_elements,
-	find_element, get_elements_by_tagname,
+	child_nodes, has_children, attributes, has_attributes, attributes_dict,
+	child_elements, find_element, get_elements_by_tagname,
 
 	new_node, add_child, new_child, add_text, set_attribute,
 

src/nodes.jl

@@ -232,6 +232,19 @@ end
 has_attributes(x::XMLElement) = (x.node._struct.attrs != nullptr)
 attributes(x::XMLElement) = XMLAttrIter(x.node._struct.attrs)
 
+function attributes_dict(x::XMLElement)
+	# make an dictionary based on attributes
+
+	dct = (ASCIIString=>ASCIIString)[]
+	if has_attributes(x)
+		for a in attributes(x)
+			dct[name(a)] = value(a)
+		end
+	end
+	return dct
+end
+
+
 # element access
 
 immutable XMLElementIter

test/parse.jl

@@ -84,6 +84,11 @@ b1a2 = b1as[2]
 @test name(b1a2) == "tag"
 @test value(b1a2) == "first"
 
+adct = attributes_dict(xb1)
+@test length(adct) == 2
+@test adct["category"] == "COOKING"
+@test adct["tag"] == "first"
+
 xb2 = XMLElement(rcs[4])
 
 @test name(xb2) == "book"