Phraseanet/lib/classes/format.class.php

<?php

class format
{

  static public function arr_to_csv_line($arr, $tri_column = false)
  {
    $line = array();
    $tmp = array();
    foreach ($arr as $v)
    {
      if (is_array($v))
      {
        $line[] = self::arr_to_csv_line($v);
      }
      elseif ($tri_column)
      {
        $key = array_search($v, $arr);
        unset($arr[$key]);

        if (array_key_exists($key, $tri_column))
        {
          $tmp[$key] = $v;
        }
      }
      else
        $line[] = '"' . str_replace('"', '""', strip_tags($v)) . '"';
    }
    if ($tri_column)
    {
      foreach ($tri_column as $key => $value)
      {
        foreach ($tmp as $k => $v)
        {
          if ($key == $k)
          {
            $line[] = '"' . str_replace('"', '""', strip_tags($v)) . '"';
          }
        }
      }
    }

    if($tri_column  && count($tri_column) == count($line))
    {
      return implode(",", $line);
    }
    elseif(count($arr) == count($line))
    {
      return implode(",", $line);
    }
    else
      throw new Exception('CSV failed');


  }

  static public function arr_to_csv($arr, $tri_column = false)
  {
    $lines = array();

    if ($tri_column)
    {
      $title = "";
      foreach ($tri_column as $v)
      {
        if (isset($v['title']))
          $title .= ( empty($title) ? "" : ",") . '"' . str_replace('"', '""', strip_tags($v['title'])) . '"';
      }
      !empty($title) ? $lines[] = $title : "";
    }
    foreach ($arr as $v)
    {
      $lines[] = self::arr_to_csv_line($v, $tri_column);
    }

    return implode("\n", $lines);
  }

}