3 /***************************************************************************\
4 * SPIP, Systeme de publication pour l'internet *
6 * Copyright (c) 2001-2011 *
7 * Arnaud Martin, Antoine Pitrou, Philippe Riviere, Emmanuel Saint-James *
9 * Ce programme est un logiciel libre distribue sous licence GNU/GPL. *
10 * Pour plus de details voir le fichier COPYING.txt ou l'aide en ligne. *
11 \***************************************************************************/
13 if (!defined('_ECRIRE_INC_VERSION')) return;
15 // http://doc.spip.org/@inc_import_1_3_dist
16 function inc_import_1_3_dist($lecteur, $request, $gz='fread', $atts=array()) {
17 global $import_ok, $tables_trans, $trans;
19 static $phpmyadmin, $fin;
20 static $field_desc = array ();
21 static $defaut = array('field' => array());
23 // au premier appel, init des invariants de boucle
25 if (!$tables OR $trans) {
26 $init = $request['init'];
27 $tables = $init($request);
28 if (!$tables) return ($import_ok = false);
29 $phpmyadmin = preg_match("{^phpmyadmin::}is",
30 $GLOBALS['meta']['restauration_version_archive'])
31 ?
array(array('"','>'),array('"','>'))
33 $fin = '/' . $GLOBALS['meta']['restauration_tag_archive'];
37 if (!($table = xml_fetch_tag($lecteur, $b, $gz))) return false;
38 if ($table == $fin) return !($import_ok = true);
39 if (strpos($table,'=')!==FALSE) {
40 list($table, $attl) = xml_parse_tag($table);
41 $atts = array_merge($atts, $attl);
44 $new = isset($tables_trans[$table]) ?
$tables_trans[$table]: $table;
46 // indique a la fois la fonction a appliquer
47 // et les infos qu'il faut lui communiquer
48 $boucle = $request['boucle'];
50 if (!in_array($new,$tables))
51 $field_desc[$boucle][$table] = $desc = $defaut;
52 elseif (isset($field_desc[$boucle][$table]))
53 $desc = $field_desc[$boucle][$table];
55 // recuperer la description de la table pour connaitre ses champs valides
56 $desc = description_table($table);
57 if (!isset($desc['field']))
59 elseif (isset($request['insertion'])
60 AND $request['insertion']=='on')
61 $desc['field'] = import_collecte($desc);
62 $field_desc[$boucle][$table] = $desc;
63 #spip_log("$table :".var_export($field_desc[$boucle][$table],1),'dbrest');
66 $values = import_lire_champs($lecteur,
73 if ($values === false) return ($import_ok = false);
75 if ($values) $boucle($values, $new, $desc, $request, $atts);
77 return $import_ok = $new;
80 // Au premier tour de l'insertion, ne memoriser que le strict necessaire
81 // pour pouvoir identifier avec l'existant.
82 // (Faudrait convenir d'une structure de donnees, c'est lourd & inextensible)
84 // http://doc.spip.org/@import_collecte
85 function import_collecte($desc)
87 $fields = $desc['field'];
89 if (isset($fields[$p='titre']))
91 if (isset($fields[$p='id_groupe']))
93 if (isset($fields[$p='id_parent']))
95 if (isset($fields[$p='id_rubrique']))
97 if (isset($fields[$p='fichier']))
99 if (isset($fields[$p='taille']))
101 if (isset($fields[$p='extension']))
104 $p = $desc['key']["PRIMARY KEY"];
105 $b[$p] = $fields[$p];
109 // Les 2 derniers args ne servent que pour l'insertion
111 // http://doc.spip.org/@import_replace
112 function import_replace($values, $table, $desc, $request, $atts='') {
113 if (!isset($desc['field']['impt'])) {// pas de champ de gestion d'import
114 if (!sql_replace($table, $values, $desc))
115 $GLOBALS['erreur_restauration'] = sql_error();
117 // la table contient un champ 'impt' qui permet de gerer des interdiction d'overwrite par import
118 // impt=oui : la ligne est surchargeable par import
119 // impt=non : la ligne ne doit pas etre ecrasee par un import
120 // il faut gerer l'existence de la primary, et l'autorisation ou non de mettre a jour
121 if (!isset($desc['key']["PRIMARY KEY"]))
122 $GLOBALS['erreur_restauration'] = "champ impt sans cle primaire sur la table $table";
124 $keys = $desc['key']["PRIMARY KEY"];
125 $keys = explode(",",$keys);
126 if (!is_array($keys)) $keys = array($keys);
128 foreach($keys as $key){
129 if (!isset($values[$key])){
130 $GLOBALS['erreur_restauration'] = "champ $key manquant a l'import sur la table $table";
134 $where .= " AND $key=".sql_quote($values[$key]);
137 $where = substr($where,4);
138 $impt = sql_getfetsel('impt', $table, $where);
139 #spip_log("IMPT : $table/$where/impt=$impt/",'dbrest');
141 sql_insertq($table, $values);
142 elseif ($impt == 'oui') {
143 if (!sql_updateq($table, $values, $where))
144 $GLOBALS['erreur_restauration'] = sql_error();
151 // http://doc.spip.org/@import_lire_champs
152 function import_lire_champs($f, $fields, $gz, $phpmyadmin, $table, $atts)
158 if (($atts['version_base'] < '1.934')
159 AND $table == '/spip_documents') {
161 $dir_img = '@^'. preg_quote (isset($atts['dir_img']) ?
$atts['dir_img']:'IMG/') . '@';
164 if (!isset($GLOBALS['meta']['charset_insertion']))
167 $charset = $GLOBALS['meta']['charset_insertion'];
168 if ($charset == $GLOBALS['meta']['charset'])
173 if (!($col = xml_fetch_tag($f, $b, $gz))) return false;
174 if ($col[0] == '/') {
175 if ($col != $table) {
176 spip_log("table $table, tag fermant inattendu:$col");
180 $value = $b = (($col != 'maj') AND (isset($fields[$col])));
181 if (!xml_fetch_tag($f, $value, $gz)) return false;
185 $value = str_replace($phpmyadmin[0],$phpmyadmin[1],$value);
187 $value = preg_replace($dir_img, '', $value);
190 $value = importer_charset($value, $charset);
191 $values[$col]= $value;