X-Git-Url: http://git.cyclocoop.org/?p=velocampus%2Fweb%2Fwww.git;a=blobdiff_plain;f=www%2Fplugins%2Fauto%2Fspip-bonux%2Finc%2Fimporter_csv.php;fp=www%2Fplugins%2Fauto%2Fspip-bonux%2Finc%2Fimporter_csv.php;h=6cc27882d3f48e7b470e58865fe7f12d4732e514;hp=0000000000000000000000000000000000000000;hb=80b4d3e85f78d402ed2e73f8f5d1bf4c19962eed;hpb=aaf970bf4cdaf76689ecc10609048e18d073820c

diff --git a/www/plugins/auto/spip-bonux/inc/importer_csv.php b/www/plugins/auto/spip-bonux/inc/importer_csv.php
new file mode 100644
index 0000000..6cc2788
--- /dev/null
+++ b/www/plugins/auto/spip-bonux/inc/importer_csv.php
@@ -0,0 +1,94 @@
+<?php
+/**
+ * Plugin Spip-Bonux
+ * Le plugin qui lave plus SPIP que SPIP
+ * (c) 2008 Mathieu Marcillaud, Cedric Morin, Romy Tetue
+ * Licence GPL
+ * 
+ * Fonctions de lecture d'un fichier CSV pour transformation en array()
+ * 
+ */
+
+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
+ *
+ * @param unknown_type $texte
+ * @return array
+ */
+function importer_csv_importcharset($texte){
+	// le plus frequent, en particulier avec les trucs de ms@@@
+	$charset_source = 'iso-8859-1';
+	// mais open-office sait faire mieux, donc mefiance !
+	if (is_utf8($texte))
+		$charset_source = 'utf-8';
+	return importer_charset($texte,$charset_source);
+}
+
+/**
+ * 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);
+	/*$accents=array('�','�','�','�','�',"�","�","'");
+	$accents_rep=array('e','e','e','a','u',"o","c","_");
+	return str_replace($accents,$accents_rep,$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 bool $head
+ * @param string $delim
+ * @param string $enclos
+ * @param int $len
+ * @return array
+ */
+function inc_importer_csv_dist($file, $head = false, $delim = ",", $enclos = '"', $len = 10000) {
+	$return = false;
+	$handle = fopen($file, "r");
+	if ($handle){
+		if ($head) {
+			$header = fgetcsv($handle, $len, $delim, $enclos);
+			if ($header){
+				$header = array_map('importer_csv_importcharset',$header);
+				$header = array_map('importer_csv_nettoie_key',$header);
+			}
+		}
+		while (($data = fgetcsv($handle, $len, $delim, $enclos)) !== FALSE) {
+			$data = array_map('importer_csv_importcharset',$data);
+			if ($head AND isset($header)) {
+				foreach ($header as $key=>$heading) {
+					$row[$heading]=(isset($data[$key])) ? $data[$key] : '';
+				}
+				$return[]=$row;
+			} else {
+				$return[]=$data;
+			}
+		}
+		fclose($handle);
+	}
+	return $return;
+}
+