Dépôt officiel du core SPIP * Anciennement présent sur svn://trac.rezo.net/spip * Les plugins-dist faisant partie de la distribution SPIP sont présents dans https://git.spip.net/SPIP/[nom du plugin dist] https://www.spip.net
You can not select more than 25 topics Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
 
 
 
 

161 lines
4.9 KiB

<?php
/***************************************************************************\
* SPIP, Système de publication pour l'internet *
* *
* Copyright © avec tendresse depuis 2001 *
* Arnaud Martin, Antoine Pitrou, Philippe Rivière, Emmanuel Saint-James *
* *
* Ce programme est un logiciel libre distribué sous licence GNU/GPL. *
* Pour plus de détails voir le fichier COPYING.txt ou l'aide en ligne. *
\***************************************************************************/
if (!defined('_ECRIRE_INC_VERSION')) {
return;
}
include_spip('inc/charsets');
/**
* Based on an example by ramdac at ramdac dot org
* Returns a multi-dimensional array from a CSV file optionally using the
* first row as a header to create the underlying data as associative arrays.
*
* @param string $file Filepath including filename
* @param bool $head Use first row as header.
* @param string $delim Specify a delimiter other than a comma.
* @param int $len Line length to be passed to fgetcsv
* @return array or false on failure to retrieve any rows.
*/
/**
* Importer le charset d'une ligne
*
* Importe un texte de CSV dans un charset et le passe dans le charset du site (utf8 probablement)
* Les CSV peuvent sous ms@@@ avoir le charset 'iso-8859-1', mais pasfois aussi 'windows-1252' :/
*
* @param mixed $texte
* @param bool|string $definir_charset_source
* false : ne fait rien
* string : utilisera pour les prochains imports le charset indiqué
* true : remet le charset d'import par défaut de la fonction
* @return array
*/
function importer_csv_importcharset($texte, $definir_charset_source = false) {
// le plus frequent, en particulier avec les trucs de ms@@@
static $charset_source = 'iso-8859-1';
if ($definir_charset_source) {
if ($definir_charset_source === true) {
$charset_source = 'iso-8859-1';
} else {
$charset_source = $definir_charset_source;
}
}
// mais open-office sait faire mieux, donc mefiance !
if (is_utf8($texte)) {
$charset = 'utf-8';
} else {
$charset = $charset_source;
}
return importer_charset($texte, $charset);
}
/**
* enlever les accents des cles presentes dans le head,
* sinon ca pose des problemes ...
*
* @param string $key
* @return string
*/
function importer_csv_nettoie_key($key) {
return translitteration($key);
}
/**
* Lit un fichier csv et retourne un tableau
* si $head est true, la premiere ligne est utilisee en header
* pour generer un tableau associatif
*
* @param string $file
* @param array $options
* bool $head
* string $delim
* string $enclos
* int $len
* string $charset_source : Permet de définir un charset source du CSV, si différent de utf-8 ou iso-8859-1
* @return false|array
*/
function inc_importer_csv_dist($file, $options = []) {
// support ancienne syntaxe
// inc_importer_csv_dist($file, $head = false, $delim = ',', $enclos = '"', $len = 10000, $charset_source = '')
if (!is_array($options)) {
$args = func_get_args();
$options = [];
foreach ([1 => 'head', 2 => 'delim', 3 => 'enclos', 4 => 'len', 5 => 'charset_source'] as $k => $option) {
if (!empty($args[$k])) {
$options[$option] = $args[$k];
}
}
}
$default_options = [
'head' => false,
'delim' => ',',
'enclos' => '"',
'len' => 10000,
'charset_source' => '',
];
$options = array_merge($default_options, $options);
$return = false;
if (@file_exists($file)
and $handle = fopen($file, 'r')) {
if ($options['charset_source']) {
importer_csv_importcharset('', $options['charset_source']);
}
if ($options['head']) {
$header = fgetcsv($handle, $options['len'], $options['delim'], $options['enclos']);
if ($header) {
$header = array_map('importer_csv_importcharset', $header);
$header = array_map('importer_csv_nettoie_key', $header);
$header_type = array();
foreach ($header as $heading) {
if (!isset($header_type[$heading])) {
$header_type[$heading] = "scalar";
} else {
$header_type[$heading] = "array";
}
}
}
}
while (($data = fgetcsv($handle, $options['len'], $options['delim'], $options['enclos'])) !== false) {
$data = array_map('importer_csv_importcharset', $data);
if ($options['head'] and isset($header)) {
$row = array();
foreach ($header as $key => $heading) {
if ($header_type[$heading] == "array") {
if (!isset($row[$heading])) {
$row[$heading] = array();
}
if (isset($data[$key]) and strlen($data[$key])) {
$row[$heading][] = $data[$key];
}
} else {
$row[$heading] = (isset($data[$key])) ? $data[$key] : '';
}
}
$return[] = $row;
} else {
$return[] = $data;
}
}
if ($options['charset_source']) {
importer_csv_importcharset('', true);
}
}
return $return;
}