website/details.php

   1 <?php
   2         @define('CONST_ConnectionBucket_PageType', 'Details');
   3
   4         require_once(dirname(dirname(__FILE__)).'/settings/settings.php');
   5         require_once(CONST_BasePath.'/lib/init-website.php');
   6         require_once(CONST_BasePath.'/lib/log.php');
   7         require_once(CONST_BasePath.'/lib/output.php');
   8
   9         $sOutputFormat = 'html';
  10
  11         ini_set('memory_limit', '200M');
  12
  13         $oDB =& getDB();
  14
  15         $aLangPrefOrder = getPreferredLanguages();
  16         $sLanguagePrefArraySQL = "ARRAY[".join(',',array_map("getDBQuoted",$aLangPrefOrder))."]";
  17
  18         $sPlaceId = getParamString('place_id');
  19         $sOsmType = getParamSet('osmtype', array('N', 'W', 'R'));
  20         $iOsmId = getParamInt('osmid', -1);
  21         if ($sOsmType && $iOsmId > 0)
  22         {
  23                 $sPlaceId = chksql($oDB->getOne("select place_id from placex where osm_type = '".$sOsmType."' and osm_id = ".$iOsmId." order by type = 'postcode' asc"));
  24
  25                 // Be nice about our error messages for broken geometry
  26
  27                 if (!$sPlaceId)
  28                 {
  29                         $aPointDetails = chksql($oDB->getRow("select osm_type, osm_id, errormessage, class, type, get_name_by_language(name,$sLanguagePrefArraySQL) as localname, ST_AsText(prevgeometry) as prevgeom, ST_AsText(newgeometry) as newgeom from import_polygon_error where osm_type = '".$sOsmType."' and osm_id = ".$iOsmId." order by updated desc limit 1"));
  30                         if (!PEAR::isError($aPointDetails) && $aPointDetails) {
  31                                 if (preg_match('/\[(-?\d+\.\d+) (-?\d+\.\d+)\]/', $aPointDetails['errormessage'], $aMatches))
  32                                 {
  33                                         $aPointDetails['error_x'] = $aMatches[1];
  34                                         $aPointDetails['error_y'] = $aMatches[2];
  35                                 }
  36                                 else
  37                                 {
  38                                         $aPointDetails['error_x'] = 0;
  39                                         $aPointDetails['error_y'] = 0;
  40                                 }
  41                                 include(CONST_BasePath.'/lib/template/details-error-'.$sOutputFormat.'.php');
  42                                 exit;
  43                         }
  44                 }
  45         }
  46
  47
  48         if (!$sPlaceId) userError("Please select a place id");
  49
  50         $iPlaceID = (int)$sPlaceId;
  51
  52         if (CONST_Use_US_Tiger_Data)
  53         {
  54                 $iParentPlaceID = chksql($oDB->getOne('select parent_place_id from location_property_tiger where place_id = '.$iPlaceID));
  55                 if ($iParentPlaceID) $iPlaceID = $iParentPlaceID;
  56         }
  57
  58         if (CONST_Use_Aux_Location_data)
  59         {
  60                 $iParentPlaceID = chksql($oDB->getOne('select parent_place_id from location_property_aux where place_id = '.$iPlaceID));
  61                 if ($iParentPlaceID) $iPlaceID = $iParentPlaceID;
  62         }
  63
  64         $hLog = logStart($oDB, 'details', $_SERVER['QUERY_STRING'], $aLangPrefOrder);
  65
  66         // Get the details for this point
  67         $sSQL = "select place_id, osm_type, osm_id, class, type, name, admin_level, housenumber, street, isin, postcode, calculated_country_code as country_code, importance, wikipedia,";
  68         $sSQL .= " to_char(indexed_date, 'YYYY-MM-DD HH24:MI') as indexed_date, parent_place_id, rank_address, rank_search, get_searchrank_label(rank_search) as rank_search_label, get_name_by_language(name,$sLanguagePrefArraySQL) as localname, ";
  69         $sSQL .= " ST_GeometryType(geometry) in ('ST_Polygon','ST_MultiPolygon') as isarea, ";
  70         //$sSQL .= " ST_Area(geometry::geography) as area, ";
  71         $sSQL .= " ST_y(centroid) as lat, ST_x(centroid) as lon,";
  72         $sSQL .= " case when importance = 0 OR importance IS NULL then 0.75-(rank_search::float/40) else importance end as calculated_importance, ";
  73         $sSQL .= " ST_AsText(CASE WHEN ST_NPoints(geometry) > 5000 THEN ST_SimplifyPreserveTopology(geometry, 0.0001) ELSE geometry END) as outlinestring";
  74         $sSQL .= " from placex where place_id = $iPlaceID";
  75         $aPointDetails = chksql($oDB->getRow($sSQL),
  76                                 "Could not get details of place object.");
  77         $aPointDetails['localname'] = $aPointDetails['localname']?$aPointDetails['localname']:$aPointDetails['housenumber'];
  78
  79         $aClassType = getClassTypesWithImportance();
  80         $aPointDetails['icon'] = $aClassType[$aPointDetails['class'].':'.$aPointDetails['type']]['icon'];
  81
  82         // Get all alternative names (languages, etc)
  83         $sSQL = "select (each(name)).key,(each(name)).value from placex where place_id = $iPlaceID order by (each(name)).key";
  84         $aPointDetails['aNames'] = $oDB->getAssoc($sSQL);
  85         if (PEAR::isError($aPointDetails['aNames'])) // possible timeout
  86         {
  87                 $aPointDetails['aNames'] = [];
  88         }
  89
  90         // Extra tags
  91         $sSQL = "select (each(extratags)).key,(each(extratags)).value from placex where place_id = $iPlaceID order by (each(extratags)).key";
  92         $aPointDetails['aExtraTags'] = $oDB->getAssoc($sSQL);
  93         if (PEAR::isError($aPointDetails['aExtraTags'])) // possible timeout
  94         {
  95                 $aPointDetails['aExtraTags'] = [];
  96         }
  97
  98         // Address
  99         $aAddressLines = getAddressDetails($oDB, $sLanguagePrefArraySQL, $iPlaceID, $aPointDetails['country_code'], -1, true);
 100
 101         // Linked places
 102         $sSQL = "select placex.place_id, osm_type, osm_id, class, type, housenumber, admin_level, rank_address, ST_GeometryType(geometry) in ('ST_Polygon','ST_MultiPolygon') as isarea, ST_Distance_Spheroid(geometry, placegeometry, 'SPHEROID[\"WGS 84\",6378137,298.257223563, AUTHORITY[\"EPSG\",\"7030\"]]') as distance, ";
 103         $sSQL .= " get_name_by_language(name,$sLanguagePrefArraySQL) as localname, length(name::text) as namelength ";
 104         $sSQL .= " from placex, (select centroid as placegeometry from placex where place_id = $iPlaceID) as x";
 105         $sSQL .= " where linked_place_id = $iPlaceID";
 106         $sSQL .= " order by rank_address asc,rank_search asc,get_name_by_language(name,$sLanguagePrefArraySQL),housenumber";
 107         $aLinkedLines = $oDB->getAll($sSQL);
 108         if (PEAR::isError($aLinkedLines)) // possible timeout
 109         {
 110                 $aLinkedLines = [];
 111         }
 112
 113         // All places this is an imediate parent of
 114         $sSQL = "select obj.place_id, osm_type, osm_id, class, type, housenumber, admin_level, rank_address, ST_GeometryType(geometry) in ('ST_Polygon','ST_MultiPolygon') as isarea, ST_Distance_Spheroid(geometry, placegeometry, 'SPHEROID[\"WGS 84\",6378137,298.257223563, AUTHORITY[\"EPSG\",\"7030\"]]') as distance, ";
 115         $sSQL .= " get_name_by_language(name,$sLanguagePrefArraySQL) as localname, length(name::text) as namelength ";
 116         $sSQL .= " from (select placex.place_id, osm_type, osm_id, class, type, housenumber, admin_level, rank_address, rank_search, geometry, name from placex ";
 117         $sSQL .= " where parent_place_id = $iPlaceID order by rank_address asc,rank_search asc limit 500) as obj,";
 118         $sSQL .= " (select centroid as placegeometry from placex where place_id = $iPlaceID) as x";
 119         $sSQL .= " order by rank_address asc,rank_search asc,localname,housenumber";
 120         $aParentOfLines = $oDB->getAll($sSQL);
 121         if (PEAR::isError($aParentOfLines)) // possible timeout
 122         {
 123                 $aParentOfLines = [];
 124         }
 125
 126         $aPlaceSearchNameKeywords = false;
 127         $aPlaceSearchAddressKeywords = false;
 128         if (getParamBool('keywords'))
 129         {
 130                 $sSQL = "select * from search_name where place_id = $iPlaceID";
 131                 $aPlaceSearchName = $oDB->getRow($sSQL);
 132                 if (PEAR::isError($aPlaceSearchName)) // possible timeout
 133                 {
 134                         $aPlaceSearchName = [];
 135                 }
 136
 137                 $sSQL = "select * from word where word_id in (".substr($aPlaceSearchName['name_vector'],1,-1).")";
 138                 $aPlaceSearchNameKeywords = $oDB->getAll($sSQL);
 139                 if (PEAR::isError($aPlaceSearchNameKeywords)) // possible timeout
 140                 {
 141                         $aPlaceSearchNameKeywords = [];
 142                 }
 143
 144
 145                 $sSQL = "select * from word where word_id in (".substr($aPlaceSearchName['nameaddress_vector'],1,-1).")";
 146                 $aPlaceSearchAddressKeywords = $oDB->getAll($sSQL);
 147                 if (PEAR::isError($aPlaceSearchAddressKeywords)) // possible timeout
 148                 {
 149                         $aPlaceSearchAddressKeywords = [];
 150                 }
 151
 152         }
 153
 154         logEnd($oDB, $hLog, 1);
 155
 156         if ($sOutputFormat=='html')
 157         {
 158                 $sDataDate = chksql($oDB->getOne("select TO_CHAR(lastimportdate - '2 minutes'::interval,'YYYY/MM/DD HH24:MI')||' GMT' from import_status limit 1"));
 159                 $sTileURL = CONST_Map_Tile_URL;
 160                 $sTileAttribution = CONST_Map_Tile_Attribution;
 161         }
 162
 163         include(CONST_BasePath.'/lib/template/details-'.$sOutputFormat.'.php');