3 +--------------------------------------------------------------------+
4 | CiviCRM version 4.5 |
5 +--------------------------------------------------------------------+
6 | Copyright CiviCRM LLC (c) 2004-2014 |
7 +--------------------------------------------------------------------+
8 | This file is a part of CiviCRM. |
10 | CiviCRM is free software; you can copy, modify, and distribute it |
11 | under the terms of the GNU Affero General Public License |
12 | Version 3, 19 November 2007 and the CiviCRM Licensing Exception. |
14 | CiviCRM is distributed in the hope that it will be useful, but |
15 | WITHOUT ANY WARRANTY; without even the implied warranty of |
16 | MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. |
17 | See the GNU Affero General Public License for more details. |
19 | You should have received a copy of the GNU Affero General Public |
20 | License and the CiviCRM Licensing Exception along |
21 | with this program; if not, contact CiviCRM LLC |
22 | at info[AT]civicrm[DOT]org. If you have questions about the |
23 | GNU Affero General Public License or the licensing of CiviCRM, |
24 | see the CiviCRM license FAQ at http://civicrm.org/licensing |
25 +--------------------------------------------------------------------+
31 * @copyright CiviCRM LLC (c) 2004-2014
37 * Class that uses google geocoder
39 class CRM_Utils_Geocode_Google
{
42 * server to retrieve the lat/long
47 static protected $_server = 'maps.googleapis.com';
55 static protected $_uri = '/maps/api/geocode/xml?sensor=false&address=';
58 * function that takes an address object and gets the latitude / longitude for this
59 * address. Note that at a later stage, we could make this function also clean up
60 * the address into a more valid format
63 * @param bool $stateName
65 * @internal param object $address
67 * @return boolean true if we modified the address, false otherwise
70 static function format(&$values, $stateName = FALSE) {
71 // we need a valid country, else we ignore
72 if (empty($values['country'])) {
76 $config = CRM_Core_Config
::singleton();
80 if (!empty($values['street_address'])) {
81 $add = urlencode(str_replace('', '+', $values['street_address']));
85 $city = CRM_Utils_Array
::value('city', $values);
87 $add .= '+' . urlencode(str_replace('', '+', $city));
91 if (!empty($values['state_province'])) {
92 if (!empty($values['state_province_id'])) {
93 $stateProvince = CRM_Core_DAO
::getFieldValue('CRM_Core_DAO_StateProvince', $values['state_province_id']);
97 $stateProvince = CRM_Core_DAO
::getFieldValue('CRM_Core_DAO_StateProvince',
98 $values['state_province'],
104 $stateProvince = $values['state_province'];
108 // dont add state twice if replicated in city (happens in NZ and other countries, CRM-2632)
109 if ($stateProvince != $city) {
110 $add .= '+' . urlencode(str_replace('', '+', $stateProvince));
115 if (!empty($values['postal_code'])) {
116 $add .= '+' . urlencode(str_replace('', '+', $values['postal_code']));
120 if (!empty($values['country'])) {
121 $add .= '+' . urlencode(str_replace('', '+', $values['country']));
124 $query = 'http://' . self
::$_server . self
::$_uri . $add;
126 require_once 'HTTP/Request.php';
127 $request = new HTTP_Request($query);
128 $request->sendRequest();
129 $string = $request->getResponseBody();
131 libxml_use_internal_errors(TRUE);
132 $xml = @simplexml_load_string
($string);
133 if ($xml === FALSE) {
134 // account blocked maybe?
135 CRM_Core_Error
::debug_var('Geocoding failed. Message from Google:', $string);
139 if (isset($xml->status
)) {
140 if ($xml->status
== 'OK' &&
141 is_a($xml->result
->geometry
->location
,
145 $ret = $xml->result
->geometry
->location
->children();
146 if ($ret->lat
&& $ret->lng
) {
147 $values['geo_code_1'] = (float)$ret->lat
;
148 $values['geo_code_2'] = (float)$ret->lng
;
152 elseif ($xml->status
== 'OVER_QUERY_LIMIT') {
153 CRM_Core_Error
::debug_var('Geocoding failed. Message from Google: ', (string ) $xml->status
);
154 $values['geo_code_1'] = $values['geo_code_2'] = 'null';
155 $values['geo_code_error'] = $xml->status
;
160 // reset the geo code values if we did not get any good values
161 $values['geo_code_1'] = $values['geo_code_2'] = 'null';