2006 => 2007 Happy New Year\!
[platal.git] / include / geoloc.inc.php
index a8d2c08..d736b60 100644 (file)
@@ -1,6 +1,6 @@
 <?php
 /***************************************************************************
- *  Copyright (C) 2003-2006 Polytechnique.org                              *
+ *  Copyright (C) 2003-2007 Polytechnique.org                              *
  *  http://opensource.polytechnique.org/                                   *
  *                                                                         *
  *  This program is free software; you can redistribute it and/or modify   *
  *  59 Temple Place, Suite 330, Boston, MA  02111-1307  USA                *
  ***************************************************************************/
 
-
 // {{{ liste les pays ou les régions d'un pays
 /** donne la liste déroulante des pays
  * @param $current pays actuellement selectionné
  */
 function geoloc_country($current) {
-    global $globals;
-    $res  = $globals->xdb->iterRow('SELECT a2,pays FROM geoloc_pays ORDER BY pays');
+    $res  = XDB::iterRow('SELECT a2,pays FROM geoloc_pays ORDER BY pays');
     $html = "";
     while (list($my_id, $my_pays) = $res->next()) {
        $html .= sprintf("<option value=\"%s\" %s>%s</option>\n",
@@ -47,8 +45,7 @@ $GLOBALS['page']->register_function('geoloc_country', '_geoloc_country_smarty');
  * @param $current la region actuellement selectionnee
  */
 function geoloc_region($country,$current) {
-    global $globals;
-    $res  = $globals->xdb->iterRow('SELECT region,name FROM geoloc_region where a2={?} ORDER BY name', $country);
+    $res  = XDB::iterRow('SELECT region,name FROM geoloc_region where a2={?} ORDER BY name', $country);
     $html = "<option value=\"\"></option>";
     while (list($regid, $regname) = $res->next()) {
        $html .= sprintf("<option value=\"%s\" %s>%s</option>\n",
@@ -67,6 +64,16 @@ function _geoloc_region_smarty($params){
 $GLOBALS['page']->register_function('geoloc_region', '_geoloc_region_smarty');
 // }}}
 
+function geoloc_is_utf8($text)
+{
+    return (iconv('utf-8', 'utf-8', $text) == $text);
+}
+
+function geoloc_utf8_decode($text)
+{
+    return geoloc_is_utf8($text)  ? utf8_decode($text) : $text;
+}
+
 // {{{ get_address_infos($txt)
 /** retrieve the infos on a text address
  * store on the fly the info of the city concerned
@@ -79,11 +86,22 @@ function get_address_infos($txt) {
     $keys = explode('|',fgets($f));
     $vals = explode('|',fgets($f));
     $infos = array();
-    foreach ($keys as $i=>$key) if($vals[$i]) $infos[$key] = ($key == 'sql')?$vals[$i]:utf8_decode(strtr($vals[$i], array(chr(197).chr(147) => "&oelig;")));
-    if ($infos['sql'])
-       $globals->xdb->execute("REPLACE INTO geoloc_city VALUES ".$infos['sql']);
-    if ($infos['display'])
-       $globals->xdb->execute("UPDATE geoloc_pays SET display = {?} WHERE a2 = {?}", $infos['display'], $infos['country']);
+    foreach ($keys as $i=>$key) {
+        if($vals[$i]) {
+            if ($key == 'sql') {
+                $infos[$key] = $vals[$i];
+            } else {
+                $val = strtr($vals[$i], array(chr(197).chr(147) => "&oelig;"));
+                $infos[$key] = geoloc_utf8_decode($val);
+            }
+        }
+    }
+    if (isset($infos['sql']) && $infos['sql'])
+       XDB::execute("REPLACE INTO geoloc_city VALUES ".$infos['sql']);
+    if (isset($infos['display']) && $infos['display'])
+        XDB::execute("UPDATE geoloc_pays SET display = {?} WHERE a2 = {?}", $infos['display'], $infos['country']);
+    if (isset($infos['cityid']))
+       fix_cities_not_on_map(1, $infos['cityid']);
     return $infos;
 }
 // }}}
@@ -113,18 +131,24 @@ function get_cities_maps($array)
 /** set new maps from url **/
 function get_new_maps($url)
 {
-       if (!($f = @fopen($url, 'r'))) return false;
-       global $globals;
-       $globals->xdb->query('TRUNCATE TABLE geoloc_maps');
-       $s = '';
-  while (!feof($f)) {
-       $l = fgetcsv($f, 1024, ';', '"');
-       foreach ($l as $i => $val) if ($val != 'NULL') $l[$i] = '\''.addslashes($val).'\'';
-       $s .= ',('.implode(',',$l).')';
-  }
-       $globals->xdb->execute('INSERT INTO geoloc_maps VALUES '.substr($s, 1));
-       return true;
+    if (!($f = @fopen($url, 'r'))) {
+        return false;
+    }
+    XDB::query('TRUNCATE TABLE geoloc_maps');
+    $s = '';
+    while (!feof($f)) {
+        $l = fgetcsv($f, 1024, ';', '"');
+        foreach ($l as $i => $val) {
+            if ($val != 'NULL') {
+                $l[$i] = '\''.addslashes($val).'\'';
+            }
+        }
+        $s .= ',('.implode(',',$l).')';
+    }
+    XDB::execute('INSERT INTO geoloc_maps VALUES '.substr($s, 1));
+    return true;
 }
+// }}}
 
 // {{{ get_address_text($adr)
 /** make the text of an address that can be read by a mailman
@@ -132,11 +156,11 @@ function get_new_maps($url)
  */
 function get_address_text($adr) {
     $t = "";
-    if ($adr['adr1']) $t.= $adr['adr1'];
-    if ($adr['adr2']) $t.= "\n".$adr['adr2'];
-    if ($adr['adr3']) $t.= "\n".$adr['adr3'];
+    if (isset($adr['adr1']) && $adr['adr1']) $t.= $adr['adr1'];
+    if (isset($adr['adr2']) && $adr['adr2']) $t.= "\n".$adr['adr2'];
+    if (isset($adr['adr3']) && $adr['adr3']) $t.= "\n".$adr['adr3'];
     $l = "";
-    if ($adr['display']) {
+    if (isset($adr['display']) && $adr['display']) {
         $keys = explode(' ', $adr['display']);
         foreach ($keys as $key) {
             if (isset($adr[$key]))
@@ -153,17 +177,16 @@ function get_address_text($adr) {
             if ($adr['region']) $l .= $adr['region']." ";
             if ($adr['postcode']) $l .= $adr['postcode'];
         } else {
-            if ($adr['postcode']) $l .= $adr['postcode']." ";
-            if ($adr['city']) $l .= $adr['city'];
+            if (isset($adr['postcode']) && $adr['postcode']) $l .= $adr['postcode']." ";
+            if (isset($adr['city']) && $adr['city']) $l .= $adr['city'];
         }
     }
     if ($l) $t .= "\n".trim($l);
     if ($adr['country'] != '00' && (!$adr['countrytxt'] || $adr['countrytxt'] == strtoupper($adr['countrytxt']))) {
-        global $globals;
-        $res = $globals->xdb->query("SELECT pays FROM geoloc_pays WHERE a2 = {?}", $adr['country']);
+        $res = XDB::query("SELECT pays FROM geoloc_pays WHERE a2 = {?}", $adr['country']);
         $adr['countrytxt'] = $res->fetchOneCell();
     }
-    if ($adr['countrytxt']) $t .= "\n".$adr['countrytxt'];
+    if (isset($adr['countrytxt']) && $adr['countrytxt']) $t .= "\n".$adr['countrytxt'];
     return trim($t);
 }
 // }}}
@@ -214,14 +237,13 @@ function cut_address($txt) {
  * @param $uid the id of the user
  */
 function localize_addresses($uid) {
-    global $globals;
-    $res = $globals->xdb->iterator("SELECT * FROM adresses WHERE uid = {?} and (cityid IS NULL OR cityid = 0)", $uid);
+    $res = XDB::iterator("SELECT * FROM adresses WHERE uid = {?} and (cityid IS NULL OR cityid = 0)", $uid);
     $erreur = Array();
 
     while ($a = $res->next()) {
         $new = get_address_infos($ta = get_address_text($a));
         if (compare_addresses_text($ta, get_address_text($new))) {
-            $globals->xdb->execute("UPDATE adresses SET
+            XDB::execute("UPDATE adresses SET
                 adr1 = {?}, adr2 = {?}, adr3 = {?},
                 cityid = {?}, city = {?}, postcode = {?},
                 region = {?}, regiontxt = {?}, country = {?},
@@ -253,15 +275,14 @@ function localize_addresses($uid) {
     if (!($f = @fopen($url, 'r'))) return false;
     $s = fgets($f);
     if ($s)
-        return $globals->xdb->execute("REPLACE INTO geoloc_city VALUES ".$s) > 0;
+        return XDB::execute("REPLACE INTO geoloc_city VALUES ".$s) > 0;
  }
  // }}}
 
 // {{{ function fix_cities_not_on_map($limit)
-function fix_cities_not_on_map($limit=false)
+function fix_cities_not_on_map($limit=false, $cityid=false)
 {
-    global $globals;
-    $missing = $globals->xdb->query("SELECT c.id FROM geoloc_city AS c LEFT JOIN geoloc_city_in_maps AS m ON(c.id = m.city_id) WHERE m.city_id IS NULL".($limit?" LIMIT $limit":""));
+    $missing = XDB::query("SELECT c.id FROM geoloc_city AS c LEFT JOIN geoloc_city_in_maps AS m ON(c.id = m.city_id) WHERE m.city_id IS NULL".($cityid?(" AND c.id = '".$cityid."'"):"").($limit?" LIMIT $limit":""));
     $maps = get_cities_maps($missing->fetchColumn());
     if ($maps)
     {
@@ -269,7 +290,7 @@ function fix_cities_not_on_map($limit=false)
         foreach ($maps as $cityid => $maps_c)
             foreach ($maps_c as $map_id)
                 $values .= ",($cityid, $map_id, '')";
-        $globals->xdb->execute("REPLACE INTO geoloc_city_in_maps VALUES ".substr($values, 1));
+        XDB::execute("REPLACE INTO geoloc_city_in_maps VALUES ".substr($values, 1));
     }
     else
         return false;
@@ -277,15 +298,14 @@ function fix_cities_not_on_map($limit=false)
 }
 
 function set_smallest_levels() {
-    global $globals;
-    $maxlengths = $globals->xdb->iterRow("SELECT MAX(LENGTH(gm.path)), gcim.city_id
+    $maxlengths = XDB::iterRow("SELECT MAX(LENGTH(gm.path)), gcim.city_id
         FROM geoloc_city_in_maps AS gcim
         INNER JOIN geoloc_maps AS gm
         USING ( map_id )
         GROUP BY gcim.city_id
         ");
     while (list($length, $id) = $maxlengths->next()) {
-        $globals->xdb->execute("UPDATE geoloc_city_in_maps AS gcim
+        XDB::execute("UPDATE geoloc_city_in_maps AS gcim
             INNER JOIN geoloc_maps AS gm USING(map_id)
             SET gcim.infos = IF(LENGTH(gm.path) = {?}, 'smallest', '')
             WHERE gcim.city_id = {?}", $length, $id);
@@ -307,7 +327,6 @@ function size_of_city($nb) { $s = round(log($nb + 1)*2,2); if ($s < 1) return 1;
 function size_of_territory($nb) { return size_of_city($nb); }
 
 function geoloc_getData_subcities($mapid, $SFields, &$cities, $direct=true) {
-    global $globals;
     for ($i_mapfield=0; $i_mapfield < count($SFields) ; $i_mapfield++) if ($SFields[$i_mapfield]->fieldFormName == 'mapid') break;
     $SFields[$i_mapfield] = new MapSField('mapid', array('gcim.map_id'), array('adresses','geoloc_city_in_maps'), array('am','gcim'), array(getadr_join('am'), 'am.cityid = gcim.city_id'), $mapid);
     
@@ -315,7 +334,7 @@ function geoloc_getData_subcities($mapid, $SFields, &$cities, $direct=true) {
     $where = $fields->get_where_statement();
     if ($where) $where = " AND ".$where;
 
-    $cityres = $globals->xdb->iterator("
+    $cityres = XDB::iterator("
         SELECT  gc.id,
                 gc.lon / 100000 AS x, gc.lat/100000 AS y,
                 gc.name,
@@ -332,6 +351,10 @@ function geoloc_getData_subcities($mapid, $SFields, &$cities, $direct=true) {
         if ($c['pop'] > 0)
         {
             $city = $c;
+            //      $city['name'] = geoloc_utf8_decode($city['name']);
+            if (!geoloc_is_utf8($city['name'])) {
+                $city['name'] = utf8_encode($city['name']);
+            }
             $city['x'] = geoloc_to_x($c['x'], $c['y']);
             $city['y'] = geoloc_to_y($c['x'], $c['y']);
             $city['size'] = size_of_city($c['pop']);
@@ -340,7 +363,6 @@ function geoloc_getData_subcities($mapid, $SFields, &$cities, $direct=true) {
 }
 
 function geoloc_getData_subcountries($mapid, $SFields, $minentities) {
-    global $globals;
     $countries = array();
     $cities = array();
     
@@ -348,11 +370,13 @@ function geoloc_getData_subcountries($mapid, $SFields, $minentities) {
        $wheremapid = "WHERE gm.parent IS NULL";
     else
        $wheremapid = "WHERE   gm.parent = {?}";
-    $submapres = $globals->xdb->iterator(
+    $submapres = XDB::iterator(
         "SELECT  gm.map_id AS id, gm.name, gm.x, gm.y, gm.xclip, gm.yclip, 
                 gm.width, gm.height, gm.scale, 1 AS rat
         FROM    geoloc_maps AS gm
-        ".$wheremapid, Env::get('mapid',''));
+        ".$wheremapid, Env::v('mapid',''));
+
+    global $globals;
 
     while ($c = $submapres->next())
     {
@@ -365,7 +389,7 @@ function geoloc_getData_subcountries($mapid, $SFields, $minentities) {
     
     if ($mapid === false) return array($countries, $cities);
 
-       geoloc_getData_subcities(Env::getInt('mapid'), $SFields, $cities);
+       geoloc_getData_subcities(Env::i('mapid'), $SFields, $cities);
        $nbcities = count($cities);
        $nocity = $nbcities == 0;
 
@@ -376,7 +400,7 @@ function geoloc_getData_subcountries($mapid, $SFields, $minentities) {
        $where = $fields->get_where_statement();
        if ($where) $where = " WHERE ".$where;
                
-       $countryres = $globals->xdb->iterator("
+       $countryres = XDB::iterator("
            SELECT  map.map_id AS id,
                    COUNT(u.user_id) AS nbPop,
                    SUM(u.promo % 2) AS yellow,
@@ -422,5 +446,7 @@ function geoloc_getData_subcountries($mapid, $SFields, $minentities) {
        
     return array($countries, $cities);   
 } 
+// }}}
+
 // vim:set et sw=4 sts=4 sws=4 foldmethod=marker:
 ?>