<?php
/**
 * Converts the ICU files into Prado style format:
 * ICU: http://source.icu-project.org/repos/icu/icu/tags/milestone-4-3-4/source/data/
 * Prado: http://code.google.com/p/prado3/source/browse/#svn/trunk/framework/I18N/core/data
 *
 * Created for http://www.symfony-project.org by Fabian Lange (Fabian.Lange@symfony-project.com)
 * 
 * The generated files are directly compatible with symfony 1.3+
 * The script can be changed to generate more backwards compatible files if desired.
 */
/**
 * How to use:
 *  - put this file and sfYaml classes in a directory
 *  - download ICU files in subdirectory called "data"
 *  - preprocess some ICU files.
 *  - run
 */
/**
 * Preprocess (take care not to kill utf-8):
 * due to line wrappings in icu files:
 * region/es.txt line 141 HK{"Región Administrativa Especial de Hong Kong de la República Popular China"}
 * locales/he.txt line 337 fix date time patterns
 * region/it.txt line 140 HK{"Regione Amministrativa Speciale di Hong Kong della Repubblica Popolare Cinese"}
 * region/it.txt line 198 MO{"Regione Amministrativa Speciale di Macao della Repubblica Popolare Cinese"}
 *
 * Note: feel free to supply a patch that eliminates the need of preprocessing
 */

// Include the symfony YAML library (can be obtained from symfony components)
// http://svn.symfony-project.com/components/yaml/branches/1.0/lib
include_once('sfYaml.php');

function sanitize($string)
{ 
    if(substr($string, 0,3) == pack("CCC",0xef,0xbb,0xbf))
    {
        $string = substr($string, 3);
    }
    return str_replace(array("\r\n", "\n", "\r"), "\n", $string);
}

// some postprocessing might result in empty arrays. we should clean them before serializing
function remove_emtpy_arrays($input)
{
  foreach ($input as $key => $value)
  {
    if (is_array($value))
    {
      if (empty($value))
      {
        unset($input[$key]);
      }
      else
      {
        $value = remove_emtpy_arrays($value);
      }
    }
  }
  return $input;
} 

// dirty hack to avoid special handling of the metazone input data
copy('data/misc/metaZones.txt', 'data/locales/metaZones.txt');

// since newer icu releases the data is split n multiple files
$types = array ("locales", "curr", "zone", "lang", "region");

foreach ($types as $type)
{
  $files = glob("data/".$type."/*.txt");
  foreach ($files as $filename)
  {
    $locale = substr($filename, 6 + strlen($type));
    $locale = substr($locale, 0, -4);

    // Step 1: convert ICU txt into yml:
    $icu_data = file_get_contents('data/'.$type.'/'.$locale.'.txt');
    $icu_data = sanitize($icu_data);
    // skip Copyright - file starting with $locale{
    $icu_data = preg_replace('/\/\/.*?('.$locale.'\{)/sm','$1', $icu_data);

    // Remove Duplicated from xxx package
    $icu_data = preg_replace ('/\{\s*\/\*\*[^\}]*\}/sm','', $icu_data);

    // this should reference the current locale
    $icu_data = str_replace('/LOCALE', $locale, $icu_data);
    // done for BC with old prado files
    $icu_data = str_replace('%%ALIAS','__ALIAS', $icu_data);

    // original prado neither uses this, nor imports this correctly. this is a typemarker. php manages this on its own
    // this enables sensible use of the field if required in future
    $icu_data = str_replace(':intvector{','{ ', $icu_data);
    $icu_data = str_replace(':int{','{ ', $icu_data);

    // hack need to preserve {0} and {1} placeholders from later array conversions:
    $icu_data = str_replace('{0}','<0>', $icu_data);
    $icu_data = str_replace('{1}','<1>', $icu_data);

    // only valid for metazone, but will remove need for manual preprocessing
    $icu_data = str_replace('metazoneInfo:table(nofallback)', 'metazoneInfo', $icu_data);

    // Step 2: make yml out of icu format
    $yml = $icu_data;

    // create array structure from csv
    //             "R$",
    // ->
    //            - "R$"
    $yml = preg_replace('/^(\s*)(.*),\s*$/m','$1- $2',$yml);

    // create array structure for name elements
    //         PT{"Portugal"}
    // ->
    //         PT: ["Portugal"]
    $yml = str_replace('"}','"]', $yml);
    $yml = str_replace('{"',': ["', $yml);

    // create yml key-value pairs from { array notation
    $yml = str_replace('{',':', $yml);
    $yml = str_replace('}','', $yml);

    // some example chars are multiline, we will remove them anyway later.
    // for parsing them lets pretend its a string block
    $yml = str_replace('ExemplarCharacters:','ExemplarCharacters: |', $yml);

    // the original CultureInfo class simplified single element arrays into the element alone
    // now we do this already at data creation time and remove the simplify() calles
    // this greatly reduces file size and improces runtime performance
    //         PT: ["Portugal"]
    // ->
    //         PT: "Portugal"
    $yml = preg_replace('/\[("[^"]*")\]/','$1', $yml);

    // hack need to preserve {0} and {1} placeholders from later array conversions:
    $yml = str_replace('<0>','{0}', $yml);
    $yml = str_replace('<1>','{1}', $yml);

    // save for manual checks of generated yml
    file_put_contents('data/'.$type.'/'.$locale.'.yml', $yml);
  }
}

// we use the locales directory as input for locales, because it contains all files
// 'region' or other may contain less files
$files = glob("data/locales/*.yml");
foreach ($files as $filename)
{
  $locale = substr($filename, 6 + strlen('locales'));
  $locale = substr($locale, 0, -4);

  // step 3: Load and Merge the YAML files and save serialized
  $dat_data = array();
  foreach ($types as $type)
  {
    $array = sfYaml::load('data/'.$type.'/'.$locale.'.yml');
    if (is_array($array))
    {
      $type_data = $array[$locale];
      if ($type == 'region' && isset($type_data['Countries']))
      {
        foreach ($type_data['Countries'] as $key => $country)
        {
          // numeric keys are regions, no countries (why are they in the data files?)
          if (is_numeric($key)) unset($type_data['Countries'][$key]);
        }
        // ZZ is the unknown entry
        unset($type_data['Countries']['ZZ']);
      }
      if ($type == 'curr')
      {
        // XXX is unknown and XTS is testing
        unset($type_data['Currencies']['XTS']);
        unset($type_data['Currencies']['XXX']);
        unset($type_data['CurrencyPlurals']['XTS']);
        unset($type_data['CurrencyPlurals']['XXX']);
      }
      $dat_data = array_merge($dat_data, $type_data);
    }
  }

  // those were not in prado and seem not to make any usable sense for us
  // we remove them to reduce file size
  unset($dat_data['codePatterns']);
  unset($dat_data['ExemplarCharacters']);
  unset($dat_data['AuxExemplarCharacters']);
  unset($dat_data['CurrencyUnitPatterns']);

  // possibly remove more, but the data is actually useful

  // clean any remaining empty arrays
  $dat_data = remove_emtpy_arrays($dat_data);
  
  //save for import into symfony
  file_put_contents('data/'.$locale.'.dat',serialize($dat_data));
}

// postprocess the metaZones.dat into root.dat
$metazoneInfo = unserialize(file_get_contents('data/metaZones.dat'));
$zones = array();
foreach ($metazoneInfo['metazoneMappings'] as $key => $value)
{
  // only take last valid timezone mapping
  $validMetazone = array_pop($value);
  $zones[str_replace(':', '/', $key)] = $validMetazone[0];
}
// add to root file
$rootData = unserialize(file_get_contents('data/root.dat'));
$rootData['TimeZones'] = $zones;
file_put_contents('data/root.dat',serialize($rootData));
unlink('data/metaZones.dat');