phone.pa.inc in Phone 6

CCK field for Panamanian phone numbers

File

phone.pa.inc

<?php

/**
 * @file
 * CCK field for Panamanian phone numbers
 */

/*
 * ((00|\+)?[0-9]{3}[\s])?  #First group    00507 or +507 (plus space)
 * ([0-9]{3,4})       #Second group three or four numbers (four for cellphones)
 * [\s|-]? space or dash
 * ([0-9]{4})  #Third group
 *
 * Accepted:
 *  00507 2603133
 *  [phone]
 *  260 3133
 *  260-3133
 *
 *  Cellphones
 *  [phone]
 *  6545-4345
 *  6545 4345
 *  65454345
 */
define('PHONE_PA_REGEX', '/((00|\\+)?[0-9]{3}[\\s])?([0-9]{3,4})[\\s|-]?([0-9]{4})/');
function phone_pa_metadata() {

  // These strings are translated using t() on output.
  return array(
    'label' => 'Phone Numbers - Panama',
    'error' => '"%value" is not a valid Panamanian phone number!<br>Panamanian phone numbers should contain only numbers, spaces and dashes be like 9999-999, 9999 999 or 9999999 with an optional prefix of "+507" or "00507".',
  );
}

/**
 * Verifies that $phonenumber is a valid nine-digit Panamanian phone number
 *
 * @param string $phonenumber
 * @return boolean Returns boolean FALSE if the phone number is not valid.
 */
function valid_pa_phone_number($phonenumber) {

  //$phonenumber = trim($phonenumber);

  // define regular expression
  // return true if valid, false otherwise
  return (bool) preg_match(PHONE_PA_REGEX, $phonenumber);
}

/**
 * Convert a valid Panamenian phone number into standard ([phone] format
 *
 * @param $phonenumber must be a valid nine-digit number (with optional international prefix)
 *
 */
function format_pa_phone_number($phonenumber, $field = FALSE) {

  // get digits of phone number
  preg_match(PHONE_PA_REGEX, $phonenumber, $matches);
  if (preg_match(PHONE_PA_REGEX, $phonenumber, $matches) != 1) {
    return $phonenumber;

    // not a Panamanian phone number
  }
  $phonenumber = $matches[3] . '-' . $matches[4];
  if (trim($matches[1]) != '') {
    $phonenumber = '+' . substr($matches[1], -4) . $phonenumber;
  }
  elseif ($field && isset($field['phone_country_code'])) {
    $phonenumber = '+507 ' . $phonenumber;
  }
  return $phonenumber;
}

Functions

Name	Description
format_pa_phone_number	Convert a valid Panamenian phone number into standard ([phone] format
phone_pa_metadata
valid_pa_phone_number	Verifies that $phonenumber is a valid nine-digit Panamanian phone number

Constants

Name	Description
PHONE_PA_REGEX