CRM/Utils/Address.php

   1 <?php
   2 /*
   3  +--------------------------------------------------------------------+
   4  | CiviCRM version 4.6                                                |
   5  +--------------------------------------------------------------------+
   6  | Copyright CiviCRM LLC (c) 2004-2014                                |
   7  +--------------------------------------------------------------------+
   8  | This file is a part of CiviCRM.                                    |
   9  |                                                                    |
  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.   |
  13  |                                                                    |
  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.        |
  18  |                                                                    |
  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  +--------------------------------------------------------------------+
  26 */
  27
  28 /**
  29  * Address utilties
  30  *
  31  * @package CRM
  32  */
  33 class CRM_Utils_Address {
  34
  35   /**
  36    * Format an address string from address fields and a format string
  37    *
  38    * Format an address basing on the address fields provided.
  39    * Use Setting's address_format if there's no format specified.
  40    *
  41    * @param array $fields
  42    *   The address fields.
  43    * @param string $format
  44    *   The desired address format.
  45    * @param bool $microformat
  46    *   If true indicates, the address to be built in hcard-microformat standard.
  47    * @param bool $mailing
  48    *   If true indicates, the call has been made from mailing label.
  49    * @param bool $individualFormat
  50    *   If true indicates, the call has been made for the contact of type 'individual'.
  51    *
  52    * @param null $tokenFields
  53    *
  54    * @return string
  55    *   formatted address string
  56    *
  57    * @static
  58    */
  59   static function format(
  60     $fields,
  61     $format = NULL,
  62     $microformat = FALSE,
  63     $mailing = FALSE,
  64     $individualFormat = FALSE,
  65     $tokenFields = NULL
  66   ) {
  67     static $config = NULL;
  68
  69     if (!$format) {
  70       $format =
  71         CRM_Core_BAO_Setting::getItem(CRM_Core_BAO_Setting::SYSTEM_PREFERENCES_NAME, 'address_format');
  72     }
  73
  74     if ($mailing) {
  75       $format =
  76         CRM_Core_BAO_Setting::getItem(CRM_Core_BAO_Setting::SYSTEM_PREFERENCES_NAME, 'mailing_format');
  77     }
  78
  79     $formatted = $format;
  80
  81     $fullPostalCode = CRM_Utils_Array::value('postal_code', $fields);
  82     if (!empty($fields['postal_code_suffix'])) {
  83       $fullPostalCode .= "-$fields[postal_code_suffix]";
  84     }
  85
  86     // make sure that some of the fields do have values
  87     $emptyFields = array(
  88       'supplemental_address_1',
  89       'supplemental_address_2',
  90       'state_province_name',
  91       'county',
  92     );
  93     foreach ($emptyFields as $f) {
  94       if (!isset($fields[$f])) {
  95         $fields[$f] = NULL;
  96       }
  97     }
  98
  99     $contactName = CRM_Utils_Array::value('display_name', $fields);
 100     if (!$individualFormat) {
 101       if (isset($fields['id'])) {
 102         $type = CRM_Contact_BAO_Contact::getContactType($fields['id']);
 103       }
 104       else {
 105         $type = 'Individual';
 106       }
 107
 108       if ($type == 'Individual') {
 109         $contactName = CRM_Utils_Array::value('addressee_display', $fields);
 110       }
 111     }
 112
 113     if (!$microformat) {
 114       // replacements in case of Individual Name Format
 115       $replacements = array(
 116         'contact.display_name' => CRM_Utils_Array::value('display_name', $fields),
 117         'contact.individual_prefix' => CRM_Utils_Array::value('individual_prefix', $fields),
 118         'contact.formal_title' => CRM_Utils_Array::value('formal_title', $fields),
 119         'contact.first_name' => CRM_Utils_Array::value('first_name', $fields),
 120         'contact.middle_name' => CRM_Utils_Array::value('middle_name', $fields),
 121         'contact.last_name' => CRM_Utils_Array::value('last_name', $fields),
 122         'contact.individual_suffix' => CRM_Utils_Array::value('individual_suffix', $fields),
 123         'contact.address_name' => CRM_Utils_Array::value('address_name', $fields),
 124         'contact.street_address' => CRM_Utils_Array::value('street_address', $fields),
 125         'contact.supplemental_address_1' => CRM_Utils_Array::value('supplemental_address_1', $fields),
 126         'contact.supplemental_address_2' => CRM_Utils_Array::value('supplemental_address_2', $fields),
 127         'contact.city' => CRM_Utils_Array::value('city', $fields),
 128         'contact.state_province_name' => CRM_Utils_Array::value('state_province_name', $fields),
 129         'contact.county' => CRM_Utils_Array::value('county', $fields),
 130         'contact.state_province' => CRM_Utils_Array::value('state_province', $fields),
 131         'contact.postal_code' => $fullPostalCode,
 132         'contact.country' => CRM_Utils_Array::value('country', $fields),
 133         'contact.world_region' => CRM_Utils_Array::value('world_region', $fields),
 134         'contact.geo_code_1' => CRM_Utils_Array::value('geo_code_1', $fields),
 135         'contact.geo_code_2' => CRM_Utils_Array::value('geo_code_2', $fields),
 136         'contact.current_employer' => CRM_Utils_Array::value('current_employer', $fields),
 137         'contact.nick_name' => CRM_Utils_Array::value('nick_name', $fields),
 138         'contact.email' => CRM_Utils_Array::value('email', $fields),
 139         'contact.im' => CRM_Utils_Array::value('im', $fields),
 140         'contact.do_not_email' => CRM_Utils_Array::value('do_not_email', $fields),
 141         'contact.do_not_phone' => CRM_Utils_Array::value('do_not_phone', $fields),
 142         'contact.do_not_mail' => CRM_Utils_Array::value('do_not_mail', $fields),
 143         'contact.do_not_sms' => CRM_Utils_Array::value('do_not_sms', $fields),
 144         'contact.do_not_trade' => CRM_Utils_Array::value('do_not_trade', $fields),
 145         'contact.job_title' => CRM_Utils_Array::value('job_title', $fields),
 146         'contact.birth_date' => CRM_Utils_Array::value('birth_date', $fields),
 147         'contact.gender' => CRM_Utils_Array::value('gender', $fields),
 148         'contact.is_opt_out' => CRM_Utils_Array::value('is_opt_out', $fields),
 149         'contact.home_URL' => CRM_Utils_Array::value('home_URL', $fields),
 150         'contact.preferred_mail_format' => CRM_Utils_Array::value('preferred_mail_format', $fields),
 151         'contact.phone' => CRM_Utils_Array::value('phone', $fields),
 152         'contact.home_URL' => CRM_Utils_Array::value('home_URL', $fields),
 153         'contact.contact_source' => CRM_Utils_Array::value('contact_source', $fields),
 154         'contact.external_identifier' => CRM_Utils_Array::value('external_identifier', $fields),
 155         'contact.contact_id' => CRM_Utils_Array::value('id', $fields),
 156         'contact.household_name' => CRM_Utils_Array::value('display_name', $fields),
 157         'contact.organization_name' => CRM_Utils_Array::value('display_name', $fields),
 158         'contact.legal_name' => CRM_Utils_Array::value('legal_name', $fields),
 159         'contact.preferred_communication_method' => CRM_Utils_Array::value('preferred_communication_method', $fields),
 160         'contact.communication_style' => CRM_Utils_Array::value('communication_style', $fields),
 161         'contact.addressee' => CRM_Utils_Array::value('addressee_display', $fields),
 162         'contact.email_greeting' => CRM_Utils_Array::value('email_greeting_display', $fields),
 163         'contact.postal_greeting' => CRM_Utils_Array::value('postal_greeting_display', $fields),
 164       );
 165     }
 166     else {
 167       $replacements = array(
 168         'contact.address_name' => "<span class=\"address-name\">" . $fields['address_name'] . "</span>",
 169         'contact.street_address' => "<span class=\"street-address\">" . $fields['street_address'] . "</span>",
 170         'contact.supplemental_address_1' => "<span class=\"extended-address\">" . $fields['supplemental_address_1'] . "</span>",
 171         'contact.supplemental_address_2' => $fields['supplemental_address_2'],
 172         'contact.city' => "<span class=\"locality\">" . $fields['city'] . "</span>",
 173         'contact.state_province_name' => "<span class=\"region\">" . $fields['state_province_name'] . "</span>",
 174         'contact.county' => "<span class=\"region\">" . $fields['county'],
 175         'contact.state_province' => "<span class=\"region\">" . $fields['state_province'] . "</span>",
 176         'contact.postal_code' => "<span class=\"postal-code\">" . $fullPostalCode . "</span>",
 177         'contact.country' => "<span class=\"country-name\">" . $fields['country'] . "</span>",
 178         'contact.world_region' => "<span class=\"region\">" . $fields['world_region'] . "</span>",
 179       );
 180
 181       // erase all empty ones, so we dont get blank lines
 182       foreach (array_keys($replacements) as $key) {
 183         $exactKey = substr($key, 0, 8) == 'contact.' ? substr($key, 8) : $key;
 184         if ($key != 'contact.postal_code' &&
 185           CRM_Utils_Array::value($exactKey, $fields) == NULL
 186         ) {
 187           $replacements[$key] = '';
 188         }
 189       }
 190       if (empty($fullPostalCode)) {
 191         $replacements['contact.postal_code'] = '';
 192       }
 193     }
 194
 195     // replacements in case of Custom Token
 196     if (stristr($formatted, 'custom_')) {
 197       $customToken = array_keys($fields);
 198       foreach ($customToken as $value) {
 199         if (substr($value, 0, 7) == 'custom_') {
 200           $replacements["contact.{$value}"] = $fields["{$value}"];
 201         }
 202       }
 203     }
 204
 205     // also sub all token fields
 206     if ($tokenFields) {
 207       foreach ($tokenFields as $token) {
 208         $replacements["{$token}"] = CRM_Utils_Array::value("{$token}", $fields);
 209       }
 210     }
 211
 212     // for every token, replace {fooTOKENbar} with fooVALUEbar if
 213     // the value is not empty, otherwise drop the whole {fooTOKENbar}
 214     foreach ($replacements as $token => $value) {
 215       if ($value && is_string($value) || is_numeric($value)) {
 216         $formatted = preg_replace("/{([^{}]*)\b{$token}\b([^{}]*)}/u", "\${1}{$value}\${2}", $formatted);
 217       }
 218       else {
 219         $formatted = preg_replace("/{[^{}]*\b{$token}\b[^{}]*}/u", '', $formatted);
 220       }
 221     }
 222
 223     // drop any {...} constructs from lines' ends
 224     if (!$microformat) {
 225       $formatted = "\n$formatted\n";
 226     }
 227     else {
 228       if ($microformat == 1) {
 229         $formatted = "\n<div class=\"location vcard\"><span class=\"adr\">\n$formatted</span></div>\n";
 230       }
 231       else {
 232         $formatted = "\n<div class=\"vcard\"><span class=\"adr\">$formatted</span></div>\n";
 233       }
 234     }
 235
 236     $formatted = preg_replace('/\n{[^{}]*}/u', "\n", $formatted);
 237     $formatted = preg_replace('/{[^{}]*}\n/u', "\n", $formatted);
 238
 239     // if there are any 'sibling' {...} constructs, replace them with the
 240     // contents of the first one; for example, when there's no state_province:
 241     // 1. {city}{, }{state_province}{ }{postal_code}
 242     // 2. San Francisco{, }{ }12345
 243     // 3. San Francisco, 12345
 244     $formatted = preg_replace('/{([^{}]*)}({[^{}]*})+/u', '\1', $formatted);
 245
 246     // drop any remaining curly braces leaving their contents
 247     $formatted = str_replace(array('{', '}'), '', $formatted);
 248
 249     // drop any empty lines left after the replacements
 250     $formatted = preg_replace('/^[ \t]*[\r\n]+/m', '', $formatted);
 251
 252     if (!$microformat) {
 253       $finalFormatted = $formatted;
 254     }
 255     else {
 256       // remove \n from each line and only add at the end
 257       // this hack solves formatting issue, when we convert nl2br
 258       $lines = array();
 259       $count = 1;
 260       $finalFormatted = NULL;
 261       $formattedArray = explode("\n", $formatted);
 262       $formattedArray = array_filter($formattedArray);
 263
 264       foreach ($formattedArray as $line) {
 265         $line = trim($line);
 266         if ($line) {
 267           if ($count > 1 && $count < count($formattedArray)) {
 268             $line = "$line\n";
 269           }
 270           $finalFormatted .= $line;
 271           $count++;
 272         }
 273       }
 274     }
 275     return $finalFormatted;
 276   }
 277
 278   /**
 279    * @param $format
 280    *
 281    * @return array
 282    */
 283   public static function sequence($format) {
 284     // also compute and store the address sequence
 285     $addressSequence = array(
 286       'address_name',
 287       'street_address',
 288       'supplemental_address_1',
 289       'supplemental_address_2',
 290       'city',
 291       'county',
 292       'state_province',
 293       'postal_code',
 294       'country',
 295     );
 296
 297     // get the field sequence from the format
 298     $newSequence = array();
 299     foreach ($addressSequence as $field) {
 300       if (substr_count($format, $field)) {
 301         $newSequence[strpos($format, $field)] = $field;
 302       }
 303     }
 304     ksort($newSequence);
 305
 306     // add the addressSequence fields that are missing in the addressFormat
 307     // to the end of the list, so that (for example) if state_province is not
 308     // specified in the addressFormat it's still in the address-editing form
 309     $newSequence = array_merge($newSequence, $addressSequence);
 310     $newSequence = array_unique($newSequence);
 311     return $newSequence;
 312   }
 313 }