Subversion-Projekte lars-tiefland.php_share

--TEST--

File_CSV Test Case 005: Mac EOL

--FILE--

<?php

// $Id: 005.phpt,v 1.4 2007/05/11 21:49:01 cipri Exp $

/**

 * Test for:

 * - File_CSV::discoverFormat()

 * - File_CSV::read()

 */

require_once 'File/CSV.php';

$file = dirname(__FILE__) . '/005.csv';

$conf = File_CSV::discoverFormat($file);

print "Format:\n";

print_r($conf);

print "\n";

$data = array();

while ($res = File_CSV::read($file, $conf)) {

    $data[] = $res;

}

function _dbgBuff($data)

{

    foreach ($data as $key => $row) {

        if (strpos($row, "\r") !== false) {

            $row = str_replace("\r", "_r_", $row);

        }

        if (strpos($row, "\n") !== false) {

            $str = str_replace("\n", "_n_", $row);

        }

        if (strpos($row, "\t") !== false) {

            $row = str_replace("\t", "_t_", $row);

        }

        $data[$key] = $row;

    }

    return $data;

}

$data = array_map('_dbgBuff', $data);

print "Data:\n";

print_r($data);

?>

--EXPECT--

Format:

Array

(

    [fields] => 4

    [sep] => ,

    [quote] => "

)

Data:

Array

(

    [0] => Array

        (

            [0] => Field 1-1

            [1] => Field 1-2

            [2] => Field 1-3

            [3] => Field 1-4

        )

    [1] => Array

        (

            [0] => Field 2-1

            [1] => Field 2-2

            [2] => Field 2-3

            [3] => I'm multiline_r_Field

        )

    [2] => Array

        (

            [0] => Field 3-1

            [1] => Field 3-2

            [2] => Field 3-3

            [3] =>

        )

)