<?php

/**
 * @copyright (c) Kufer Software GmbH, Loisachstrasse 4, D-84453 Mühldorf
 */

class SimpleBicCheck
{
  public static $laendercodes = array('AF', 'EG', 'AX', 'AL', 'DZ', 'AS', 'VI', 'AD', 'AO',
                             'AI', 'AQ', 'AG', 'GQ', 'AR', 'AM', 'AW', 'AC', 'AZ',
                             'ET', 'AU', 'BS', 'BH', 'BD', 'BB', 'BY', 'BE', 'BZ',
                             'BJ', 'BM', 'BT', 'BO', 'BQ', 'BA', 'BW', 'BV', 'BR',
                             'VG', 'IO', 'BN', 'BG', 'BF', 'BU', 'BI', 'EA', 'CL',
                             'CN', 'CP', 'CK', 'CR', 'CI', 'CW', 'DK', 'DD', 'DE',
                             'DG', 'DM', 'DO', 'DJ', 'EC', 'SV', 'ER', 'EE', 'CE',
                             'EU', 'FK', 'FO', 'FJ', 'FI', 'SF', 'FR', 'FX', 'GF',
                             'PF', 'TF', 'GA', 'GM', 'GE', 'GH', 'GI', 'GD', 'GR',
                             'GL', 'GP', 'GU', 'GT', 'GG', 'GN', 'GW', 'GY', 'HT',
                             'HM', 'HN', 'HK', 'IN', 'ID', 'IM', 'IQ', 'IR', 'IE',
                             'IS', 'IL', 'IT', 'JM', 'JP', 'YE', 'JE', 'JO', 'YU',
                             'KY', 'KH', 'CM', 'CA', 'IC', 'CV', 'KZ', 'QA', 'KE',
                             'KG', 'KI', 'CC', 'CO', 'KM', 'CD', 'CG', 'KP', 'KR',
                             'HR', 'CU', 'KW', 'LA', 'LS', 'LV', 'LB', 'LR', 'LY',
                             'LI', 'LT', 'LU', 'MO', 'MG', 'MW', 'MY', 'MV', 'ML',
                             'MT', 'MA', 'MH', 'MQ', 'MR', 'MU', 'YT', 'MK', 'MX',
                             'FM', 'MD', 'MC', 'MN', 'ME', 'MS', 'MZ', 'MM', 'NA',
                             'NR', 'NP', 'NC', 'NZ', 'NT', 'NI', 'NL', 'AN', 'NE',
                             'NG', 'NU', 'MP', 'NF', 'NO', 'OM', 'AT', 'TL', 'TP',
                             'PK', 'PS', 'PW', 'PA', 'PG', 'PY', 'PE', 'PH', 'PN',
                             'PL', 'PT', 'PR', 'RE', 'RW', 'RO', 'RU', 'SB', 'BL',
                             'MF', 'ZM', 'WS', 'SM', 'ST', 'SA', 'SE', 'CH', 'SN',
                             'RS', 'CS', 'SC', 'SL', 'ZW', 'SG', 'SX', 'SK', 'SI',
                             'SO', 'ES', 'LK', 'SH', 'KN', 'LC', 'PM', 'VC', 'ZA',
                             'SD', 'GS', 'SS', 'SR', 'SJ', 'SZ', 'SY', 'TJ', 'TW',
                             'TZ', 'TH', 'TG', 'TK', 'TO', 'TT', 'TA', 'TD', 'CZ',
                             'CS', 'TN', 'TR', 'TM', 'TC', 'TV', 'SU', 'UG', 'UA',
                             'HU', 'UM', 'UY', 'UZ', 'VU', 'VA', 'VE', 'AE', 'US',
                             'GB', 'UK', 'VN', 'WF', 'CX', 'EH', 'ZR', 'CF', 'CY');

  
  public static function check($pBic)
  {
    $bic = self::_bicAufbereiten($pBic);
    if (StringOperations::strlen($bic) !== 11) {
      return false;
    }

    if (!self::_is_alphanumeric($bic)) {
      return false;
    }

    
    $bankCode = StringOperations::substr($bic, 0, 4);
    $laenderCode = StringOperations::substr($bic, 4, 2); 
    $ortCode = StringOperations::substr($bic, 6, 2); 
    $branchCode = StringOperations::substr($bic, 8, 3); 

    return self::_checkBankCode($bankCode)
               && self::_checkLaenderCode($laenderCode)
               && self::_checkOrtCode($ortCode)
               && self::_checkBranchenCode($branchCode);
  }

  
  private static function _bicAufbereiten($pBic)
  {
    $bic = trim(StringOperations::strtoupper($pBic));
    if (StringOperations::strlen($bic) === 8) {
      $bic .= 'XXX';
    }

    return $bic;
  }

  
  private static function _checkBankCode($pBankCode)
  {
    return self::_is_alpha($pBankCode);
  }

  
  private static function _checkLaenderCode($pLaenderCode)
  {
    return in_array($pLaenderCode, self::$laendercodes);
  }

  
  private static function _checkOrtCode($pLaenderCode)
  {
    $erstesZeichen = $pLaenderCode[0];
    $zweitesZeichen = $pLaenderCode[1];

    if ($erstesZeichen === '0' || $erstesZeichen === '1') {
      return false;
    }

    if ($zweitesZeichen === 'O') {
      return false;
    }

    return true;
  }

  
  private static function _checkBranchenCode($pBranchenCode)
  {
    $erstesZeichen = $pBranchenCode[0];
    if ($erstesZeichen !== 'X' || $pBranchenCode === 'XXX') {
      return true;
    }

    return false;
  }

  
  private static function _is_alphanumeric($str)
  {
    return preg_match('/[^0-9A-Z]/', $str) === 0;
  }

  
  private static function _is_alpha($str)
  {
    return preg_match('/[^A-Z]/', $str) === 0;
  }
}