dtc->elements[$name]))) { if ($p = strpos($name, ':')) { $name = substr($name, $p+1); $p = isset($this->dtc->elements[$name]); } if (!$p) { coordonnees_erreur($this," $name " . _T('zxml_inconnu_balise')); return; } } // controler les filles illegitimes, ca suffit $depth = $this->depth; $ouvrant = $this->ouvrant; # spip_log("trouve $name apres " . $ouvrant[$depth]); if (isset($ouvrant[$depth])) { if (preg_match('/^\s*(\w+)/', $ouvrant[$depth], $r)) { $pere = $r[1]; # spip_log("pere $pere"); if (isset($this->dtc->elements[$pere])) { $fils = $this->dtc->elements[$pere]; # spip_log("rejeton $name fils " . @join(',',$fils)); if (!($p = @in_array($name, $fils))) { if ($p = strpos($name, ':')) { $p = substr($name, $p+1); $p = @in_array($p, $fils); } } if (!$p) { $bons_peres = @join (', ', $this->dtc->peres[$name]); coordonnees_erreur($this, " $name " . _T('zxml_non_fils') . ' ' . $pere . '' . (!$bons_peres ? '' : ('
'._T('zxml_mais_de').' '. $bons_peres . '
'))); } else if ($this->dtc->regles[$pere][0]=='/') { $this->fratrie[substr($depth,2)].= "$name "; } } } } // Init de la suite des balises a memoriser si regle difficile if ($this->dtc->regles[$name][0]=='/') $this->fratrie[$depth]=''; if (isset($this->dtc->attributs[$name])) { foreach ($this->dtc->attributs[$name] as $n => $v) { if (($v[1] == '#REQUIRED') AND (!isset($attrs[$n]))) coordonnees_erreur($this, " $n" . ' : ' . _T('zxml_obligatoire_attribut') . " $name"); } } } // http://doc.spip.org/@validerAttribut function validerAttribut($phraseur, $name, $val, $bal) { // Si la balise est inconnue, eviter d'insister if (!isset($this->dtc->attributs[$bal])) return ; $a = $this->dtc->attributs[$bal]; if (!isset($a[$name])) { $bons = join(', ',array_keys($a)); if ($bons) $bons = " title=' " . _T('zxml_connus_attributs') . ' : ' . $bons . "'"; $bons .= " style='font-weight: bold'"; coordonnees_erreur($this, " $name " . _T('zxml_inconnu_attribut').' '._T('zxml_de') . " $bal (" . _T('zxml_survoler') . ")"); } else{ $type = $a[$name][0]; if (!preg_match('/^\w+$/', $type)) $this->valider_motif($phraseur, $name, $val, $bal, $type); else if (method_exists($this, $f = 'validerAttribut_' . $type)) $this->$f($phraseur, $name, $val, $bal); # else spip_log("$type type d'attribut inconnu"); } } function validerAttribut_NMTOKEN($phraseur, $name, $val, $bal) { $this->valider_motif($phraseur, $name, $val, $bal, _REGEXP_NMTOKEN); } function validerAttribut_NMTOKENS($phraseur, $name, $val, $bal) { $this->valider_motif($phraseur, $name, $val, $bal, _REGEXP_NMTOKENS); } // http://doc.spip.org/@validerAttribut_ID function validerAttribut_ID($phraseur, $name, $val, $bal) { if (isset($this->ids[$val])) { list($l,$c) = $this->ids[$val]; coordonnees_erreur($this, "
$val " . _T('zxml_valeur_attribut') . " $name " . _T('zxml_de') . " $bal " . _T('zxml_vu') . " (L$l,C$c)"); } else { $this->valider_motif($phraseur, $name, $val, $bal, _REGEXP_ID); $this->ids[$val] = array(xml_get_current_line_number($phraseur), xml_get_current_column_number($phraseur)); } } // http://doc.spip.org/@validerAttribut_IDREF function validerAttribut_IDREF($phraseur, $name, $val, $bal) { $this->idrefs[] = array($val, xml_get_current_line_number($phraseur), xml_get_current_column_number($phraseur)); } // http://doc.spip.org/@validerAttribut_IDREFS function validerAttribut_IDREFS($phraseur, $name, $val, $bal) { $this->idrefss[] = array($val, xml_get_current_line_number($phraseur), xml_get_current_column_number($phraseur)); } // http://doc.spip.org/@valider_motif function valider_motif($phraseur, $name, $val, $bal, $motif) { if (!preg_match($motif, $val)) { coordonnees_erreur($this, "$val " . _T('zxml_valeur_attribut') . " $name " . _T('zxml_de') . " $bal " . _T('zxml_non_conforme') . "
" . "" . $motif . ""); } } // http://doc.spip.org/@valider_idref function valider_idref($nom, $ligne, $col) { if (!isset($this->ids[$nom])) $this->err[]= array("
$nom " . _T('zxml_inconnu_id'), $ligne, $col); } // http://doc.spip.org/@valider_passe2 function valider_passe2() { if (!$this->err) { foreach ($this->idrefs as $idref) { list($nom, $ligne, $col) = $idref; $this->valider_idref($nom, $ligne, $col); } foreach ($this->idrefss as $idref) { list($noms, $ligne, $col) = $idref; foreach(preg_split('/\s+/', $noms) as $nom) $this->valider_idref($nom, $ligne, $col); } } } // http://doc.spip.org/@debutElement function debutElement($phraseur, $name, $attrs) { if ($this->dtc->elements) $this->validerElement($phraseur, $name, $attrs); if ($f = $this->process['debut']) $f($this, $name, $attrs); $depth = $this->depth; $this->debuts[$depth] = strlen($this->res); foreach ($attrs as $k => $v) { $this->validerAttribut($phraseur, $k, $v, $name); } } // http://doc.spip.org/@finElement function finElement($phraseur, $name) { $depth = $this->depth; $contenu = $this->contenu; $n = strlen($this->res); $c = strlen(trim($contenu[$depth])); $k = $this->debuts[$depth]; $regle = $this->dtc->regles[$name]; $vide = ($regle == 'EMPTY'); // controler que les balises devant etre vides le sont if ($vide) { if ($n <> ($k + $c)) coordonnees_erreur($this, "
$name " . _T('zxml_nonvide_balise')); // pour les regles PCDATA ou iteration de disjonction, tout est fait } elseif ($regle AND ($regle != '*')) { if ($regle == '+') { // iteration de disjonction non vide: 1 balise au - if ($n == $k) { coordonnees_erreur($this, "
\n$name " . _T('zxml_vide_balise')); } } else { $f = $this->fratrie[substr($depth,2)]; if (!preg_match($regle, $f)) { coordonnees_erreur($this, "
\n$name " . _T('zxml_succession_fils_incorrecte') . ' : ' . $f . ''); } } } if ($f = $this->process['fin']) $f($this, $name, $vide); } // http://doc.spip.org/@textElement function textElement($phraseur, $data) { if (trim($data)) { $d = $this->depth; $d = $this->ouvrant[$d]; preg_match('/^\s*(\S+)/', $d, $m); if ($this->dtc->pcdata[$m[1]]) { coordonnees_erreur($this, "
". $m[1] . " " . _T('zxml_nonvide_balise') // message a affiner ); } } if ($f = $this->process['text']) $f($this, $data); } function piElement($phraseur, $target, $data) { if ($f = $this->process['pi']) $f($this, $target, $data); } // Denonciation des entitees XML inconnues // Pour contourner le bug de conception de SAX qui ne signale pas si elles // sont dans un attribut, les entites les plus frequentes ont ete // transcodees au prealable (sauf & < > " que SAX traite correctement). // On ne les verra donc pas passer a cette etape, contrairement a ce que // le source de la page laisse legitimement supposer. // http://doc.spip.org/@defautElement function defaultElement($phraseur, $data) { if (!preg_match('/^