2 @define('CONST_ConnectionBucket_PageType', 'Details');
4 require_once(dirname(dirname(__FILE__)).'/lib/init-website.php');
5 require_once(CONST_BasePath.'/lib/log.php');
7 $sOutputFormat = 'html';
9 $fLoadAvg = getLoadAverage();
12 echo "Page temporarily blocked due to high server load\n";F
16 ini_set('memory_limit', '200M');
20 $aLangPrefOrder = getPreferredLanguages();
21 $sLanguagePrefArraySQL = "ARRAY[".join(',',array_map("getDBQuoted",$aLangPrefOrder))."]";
23 if (isset($_GET['osmtype']) && isset($_GET['osmid']) && (int)$_GET['osmid'] && ($_GET['osmtype'] == 'N' || $_GET['osmtype'] == 'W' || $_GET['osmtype'] == 'R'))
25 $_GET['place_id'] = $oDB->getOne("select place_id from placex where osm_type = '".$_GET['osmtype']."' and osm_id = ".(int)$_GET['osmid']." order by type = 'postcode' asc");
27 // Be nice about our error messages for broken geometry
29 if (!$_GET['place_id'])
31 $aPointDetails = $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 = '".$_GET['osmtype']."' and osm_id = ".(int)$_GET['osmid']." order by updated desc limit 1");
32 if (!PEAR::isError($aPointDetails) && $aPointDetails) {
33 if (preg_match('/\[(-?\d+\.\d+) (-?\d+\.\d+)\]/', $aPointDetails['errormessage'], $aMatches))
35 $aPointDetails['error_x'] = $aMatches[1];
36 $aPointDetails['error_y'] = $aMatches[2];
40 $aPointDetails['error_x'] = 0;
41 $aPointDetails['error_y'] = 0;
43 include(CONST_BasePath.'/lib/template/details-error-'.$sOutputFormat.'.php');
50 if (!isset($_GET['place_id']))
52 echo "Please select a place id";
56 $iPlaceID = (int)$_GET['place_id'];
58 $iParentPlaceID = $oDB->getOne('select parent_place_id from location_property_tiger where place_id = '.$iPlaceID);
59 if ($iParentPlaceID) $iPlaceID = $iParentPlaceID;
60 $iParentPlaceID = $oDB->getOne('select parent_place_id from location_property_aux where place_id = '.$iPlaceID);
61 if ($iParentPlaceID) $iPlaceID = $iParentPlaceID;
63 $hLog = logStart($oDB, 'details', $_SERVER['QUERY_STRING'], $aLangPrefOrder);
65 // Make sure the point we are reporting on is fully indexed
66 //$sSQL = "UPDATE placex set indexed = true where indexed = false and place_id = $iPlaceID";
69 // Get the details for this point
70 $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,";
71 $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, ";
72 $sSQL .= " ST_GeometryType(geometry) in ('ST_Polygon','ST_MultiPolygon') as isarea, ";
73 //$sSQL .= " ST_Area(geometry::geography) as area, ";
74 $sSQL .= " ST_y(centroid) as lat, ST_x(centroid) as lon,";
75 $sSQL .= " case when importance = 0 OR importance IS NULL then 0.75-(rank_search::float/40) else importance end as calculated_importance, ";
76 $sSQL .= " ST_AsText(CASE WHEN ST_NPoints(geometry) > 5000 THEN ST_SimplifyPreserveTopology(geometry, 0.0001) ELSE geometry END) as outlinestring";
77 $sSQL .= " from placex where place_id = $iPlaceID";
78 $aPointDetails = $oDB->getRow($sSQL);
79 if (PEAR::IsError($aPointDetails))
81 failInternalError("Could not get details of place object.", $sSQL, $aPointDetails);
83 $aPointDetails['localname'] = $aPointDetails['localname']?$aPointDetails['localname']:$aPointDetails['housenumber'];
85 $aClassType = getClassTypesWithImportance();
86 $aPointDetails['icon'] = $aClassType[$aPointDetails['class'].':'.$aPointDetails['type']]['icon'];
88 // Get all alternative names (languages, etc)
89 $sSQL = "select (each(name)).key,(each(name)).value from placex where place_id = $iPlaceID order by (each(name)).key";
90 $aPointDetails['aNames'] = $oDB->getAssoc($sSQL);
91 if (PEAR::isError($aPointDetails['aNames'])) // possible timeout
93 $aPointDetails['aNames'] = [];
97 $sSQL = "select (each(extratags)).key,(each(extratags)).value from placex where place_id = $iPlaceID order by (each(extratags)).key";
98 $aPointDetails['aExtraTags'] = $oDB->getAssoc($sSQL);
99 if (PEAR::isError($aPointDetails['aExtraTags'])) // possible timeout
101 $aPointDetails['aExtraTags'] = [];
105 $aAddressLines = getAddressDetails($oDB, $sLanguagePrefArraySQL, $iPlaceID, $aPointDetails['country_code'], -1, true);
108 $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, ";
109 $sSQL .= " get_name_by_language(name,$sLanguagePrefArraySQL) as localname, length(name::text) as namelength ";
110 $sSQL .= " from placex, (select centroid as placegeometry from placex where place_id = $iPlaceID) as x";
111 $sSQL .= " where linked_place_id = $iPlaceID";
112 $sSQL .= " order by rank_address asc,rank_search asc,get_name_by_language(name,$sLanguagePrefArraySQL),housenumber";
113 $aLinkedLines = $oDB->getAll($sSQL);
114 if (PEAR::isError($aLinkedLines)) // possible timeout
119 // All places this is an imediate parent of
120 $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, ";
121 $sSQL .= " get_name_by_language(name,$sLanguagePrefArraySQL) as localname, length(name::text) as namelength ";
122 $sSQL .= " from (select placex.place_id, osm_type, osm_id, class, type, housenumber, admin_level, rank_address, rank_search, geometry, name from placex ";
123 $sSQL .= " where parent_place_id = $iPlaceID order by rank_address asc,rank_search asc limit 500) as obj,";
124 $sSQL .= " (select centroid as placegeometry from placex where place_id = $iPlaceID) as x";
125 $sSQL .= " order by rank_address asc,rank_search asc,localname,housenumber";
126 $aParentOfLines = $oDB->getAll($sSQL);
127 if (PEAR::isError($aParentOfLines)) // possible timeout
129 $aParentOfLines = [];
132 $aPlaceSearchNameKeywords = false;
133 $aPlaceSearchAddressKeywords = false;
134 if (isset($_GET['keywords']) && $_GET['keywords'])
136 $sSQL = "select * from search_name where place_id = $iPlaceID";
137 $aPlaceSearchName = $oDB->getRow($sSQL);
138 if (PEAR::isError($aPlaceSearchName)) // possible timeout
140 $aPlaceSearchName = [];
143 $sSQL = "select * from word where word_id in (".substr($aPlaceSearchName['name_vector'],1,-1).")";
144 $aPlaceSearchNameKeywords = $oDB->getAll($sSQL);
145 if (PEAR::isError($aPlaceSearchNameKeywords)) // possible timeout
147 $aPlaceSearchNameKeywords = [];
151 $sSQL = "select * from word where word_id in (".substr($aPlaceSearchName['nameaddress_vector'],1,-1).")";
152 $aPlaceSearchAddressKeywords = $oDB->getAll($sSQL);
153 if (PEAR::isError($aPlaceSearchAddressKeywords)) // possible timeout
155 $aPlaceSearchAddressKeywords = [];
160 logEnd($oDB, $hLog, 1);
162 if ($sOutputFormat=='html')
164 $sDataDate = $oDB->getOne("select TO_CHAR(lastimportdate - '2 minutes'::interval,'YYYY/MM/DD HH24:MI')||' GMT' from import_status limit 1");
165 $sTileURL = CONST_Map_Tile_URL;
166 $sTileAttribution = CONST_Map_Tile_Attribution;
170 include(CONST_BasePath.'/lib/template/details-'.$sOutputFormat.'.php');