Incam_FormulariosCalidad/lib/pear/Compat/Function/fputcsv.php
2011-03-09 18:42:43 +00:00

56 lines
1.5 KiB
PHP

<?php
// $Id: fputcsv.php,v 1.4 2007/04/17 10:09:56 arpad Exp $
/**
* Replace fprintf()
*
* @category PHP
* @package PHP_Compat
* @license LGPL - http://www.gnu.org/licenses/lgpl.html
* @copyright 2004-2007 Aidan Lister <aidan@php.net>, Arpad Ray <arpad@php.net>
* @link http://php.net/function.fprintf
* @author Twebb <twebb@boisecenter.com>
* @author Aidan Lister <aidan@php.net>
* @version $Revision: 1.4 $
* @since PHP 5
* @require PHP 4.0.0 (user_error)
*/
function php_compat_fputcsv($handle, $fields, $delimiter = ',', $enclosure = '"')
{
// Sanity Check
if (!is_resource($handle)) {
user_error('fputcsv() expects parameter 1 to be resource, ' .
gettype($handle) . ' given', E_USER_WARNING);
return false;
}
$str = '';
foreach ($fields as $cell) {
$cell = str_replace($enclosure, $enclosure . $enclosure, $cell);
if (strchr($cell, $delimiter) !== false ||
strchr($cell, $enclosure) !== false ||
strchr($cell, "\n") !== false) {
$str .= $enclosure . $cell . $enclosure . $delimiter;
} else {
$str .= $cell . $delimiter;
}
}
fputs($handle, substr($str, 0, -1) . "\n");
return strlen($str);
}
// Define
if (!function_exists('fputcsv')) {
function fputcsv($handle, $fields, $delimiter = ',', $enclosure = '"')
{
return php_compat_fputcsv($handle, $fields, $delimiter, $enclosure);
}
}