#wm geom .konsola 588x685+423+18; kons_font 15
#kons_font 13

## inne uslugi w OSM: Nominatim
# + geocoding, reverse geocoding, 
#   czyli zamiana adresu na wsp geo i odwrotnie
#   docs: http://wiki.openstreetmap.org/wiki/Nominatim
# + pakiet tdom sluzy do przetwarzania XML ...
#   docs: http://docs.activestate.com/activetcl/8.4/tdom/index.html
#

package re http
  #% 2.5.2
package re tdom
  #% 0.8.2
package re dict
  #% 8.5.2

set q1 [http::formatQuery \
  q "Poland, Poznan, Umultowska 87" \
  format xml polygon 0 addressdetails 1
]
  # + params: limit -ogranicza liczbe elem place

set h1 [http::geturl http://nominatim.openstreetmap.org/search?$q1]
set r1 [http::data $h1]
http::cleanup $h1
  # + w $r1 jest dok. XML z odpowiedzia...

dom parse $r1 d1
  #% domDoc0x82d2570
set d2 [$d1 documentElement]
  #% domNode0x82b33e8

$d2 asXML
  #% <searchresults timestamp="Sun, 25 Jan 15 20:15:12 +0000" attribution="Data ? OpenStreetMap contributors, ODbL 1.0. http://www.openstreetmap.org/copyright" querystring="Poland, Poznan, Umultowska 87" polygon="false" exclude_place_ids="140926135" more_url="http://nominatim.openstreetmap.org/search?format=xml&amp;exclude_place_ids=140926135&amp;addressdetails=1&amp;q=Poland%2C+Poznan%2C+Umultowska+87">
    <place place_id="140926135" osm_type="way" osm_id="241639189" place_rank="30" boundingbox="52.4661055,52.4675275,16.9261568,16.9278279" lat="52.4668407" lon="16.9270391568189" display_name="Wydział Matematyki i Informatyki, 87, Umultowska, Stefana Batorego, Poznań, województwo wielkopolskie, 61-614, Polska" class="place" type="house" importance="0.221">
        <house>Wydział Matematyki i Informatyki</house>
        <house_number>87</house_number>
        <road>Umultowska</road>
        <neighbourhood>Stefana Batorego</neighbourhood>
        <city>Poznań</city>
        <county>Poznań</county>
        <state>województwo wielkopolskie</state>
        <postcode>61-614</postcode>
        <country>Polska</country>
        <country_code>pl</country_code>
    </place>
</searchresults>


set l1 [$d2 selectNodes {//place}]
  #% domNode0x82b3414

set d3 [lindex $l1 0] 
  #% domNode0x82b3414

$d3 asXML
  #% <place place_id="140926135" osm_type="way" osm_id="241639189" place_rank="30" boundingbox="52.4661055,52.4675275,16.9261568,16.9278279" lat="52.4668407" lon="16.9270391568189" display_name="Wydział Matematyki i Informatyki, 87, Umultowska, Stefana Batorego, Poznań, województwo wielkopolskie, 61-614, Polska" class="place" type="house" importance="0.221">
    <house>Wydział Matematyki i Informatyki</house>
    <house_number>87</house_number>
    <road>Umultowska</road>
    <neighbourhood>Stefana Batorego</neighbourhood>
    <city>Poznań</city>
    <county>Poznań</county>
    <state>województwo wielkopolskie</state>
    <postcode>61-614</postcode>
    <country>Polska</country>
    <country_code>pl</country_code>
</place>


$d3 attributes
  #% place_id osm_type osm_id place_rank boundingbox lat lon display_name class type importance

$d3 getAttribute lon
  #% 16.9270391568189
$d3 getAttribute lat
  #% 52.4668407