ecrire/public/phraser_html.php ➔ public_phraser_html_dist()

Complexity

Conditions	19
Paths	9218

Size

Total Lines	172
Code Lines	112

Duplication

Lines	13
Ratio	7.56 %

Importance

Changes	2
Bugs	0	Features	0

<?php
function public_phraser_html_dist($texte, $id_parent, &$boucles, $descr, $ligne = 1){

	$all_res = array();

	while (($pos_boucle = strpos($texte, BALISE_BOUCLE))!==false){

		$err_b = ''; // indiquera s'il y a eu une erreur
		$result = new Boucle;
		$result->id_parent = $id_parent;
		$result->descr = $descr;
# attention: reperer la premiere des 2 balises: pre_boucle ou boucle

		if (!preg_match("," . BALISE_PRE_BOUCLE . '[0-9_],', $texte, $r)
			OR ($n = strpos($texte, $r[0]))===false
			OR ($n>$pos_boucle)
		){
			$debut = substr($texte, 0, $pos_boucle);
			$milieu = substr($texte, $pos_boucle);
			$k = strpos($milieu, '(');
			$id_boucle = trim(substr($milieu,
				strlen(BALISE_BOUCLE),
				$k-strlen(BALISE_BOUCLE)));
			$milieu = substr($milieu, $k);

		} else {
			$debut = substr($texte, 0, $n);
			$milieu = substr($texte, $n);
			$k = strpos($milieu, '>');
			$id_boucle = substr($milieu,
				strlen(BALISE_PRE_BOUCLE),
				$k-strlen(BALISE_PRE_BOUCLE));

			if (!preg_match("," . BALISE_BOUCLE . $id_boucle . "[[:space:]]*\(,", $milieu, $r)){
				$err_b = array('zbug_erreur_boucle_syntaxe', array('id' => $id_boucle));
				erreur_squelette($err_b, $result);
				$texte = substr($texte, $n+1);
				continue;
			} else {
				$pos_boucle = $n;

$pos_boucle is not used, you could remove the assignment.

				$n = strpos($milieu, $r[0]);
				$result->avant = substr($milieu, $k+1, $n-$k-1);
				$milieu = substr($milieu, $n+strlen($id_boucle)+strlen(BALISE_BOUCLE));
			}
		}
		$result->id_boucle = $id_boucle;

		preg_match(SPEC_BOUCLE, $milieu, $match);
		$result->type_requete = $match[0];
		$milieu = substr($milieu, strlen($match[0]));
		$type = $match[1];
		$jointures = trim($match[2]);
		$table_optionnelle = ($match[3]);
		if ($jointures){
			// on affecte pas ici les jointures explicites, mais dans la compilation
			// ou elles seront completees des jointures declarees
			$result->jointures_explicites = $jointures;
		}

		if ($table_optionnelle){
			$result->table_optionnelle = $type;

The property $table_optionnelle was declared of type boolean, but $type is of type string. Maybe add a type cast?

		}

		// 1ere passe sur les criteres, vu comme des arguments sans fct
		// Resultat mis dans result->param
		phraser_args($milieu, "/>", "", $all_res, $result);

		// En 2e passe result->criteres contiendra un tableau
		// pour l'instant on met le source (chaine) :
		// si elle reste ici au final, c'est qu'elle contient une erreur
		$result->criteres = substr($milieu, 0, @strpos($milieu, $result->apres));
		$milieu = $result->apres;
		$result->apres = "";

		//
		// Recuperer la fin :
		//
		if ($milieu[0]==='/'){
			$suite = substr($milieu, 2);
			$milieu = '';
		} else {
			$milieu = substr($milieu, 1);
			$s = BALISE_FIN_BOUCLE . $id_boucle . ">";
			$p = strpos($milieu, $s);
			if ($p===false){
				$err_b = array('zbug_erreur_boucle_fermant',
					array('id' => $id_boucle));
				erreur_squelette($err_b, $result);
			}

			$suite = substr($milieu, $p+strlen($s));
			$milieu = substr($milieu, 0, $p);
		}

		$result->milieu = $milieu;

		//
		// 1. Recuperer la partie conditionnelle apres
		//
		$s = BALISE_POST_BOUCLE . $id_boucle . ">";
		$p = strpos($suite, $s);
		if ($p!==false){

This code seems to be duplicated across your project.

			$result->apres = substr($suite, 0, $p);
			$suite = substr($suite, $p+strlen($s));
		}

		//
		// 2. Recuperer la partie alternative
		//
		$s = BALISE_ALT_BOUCLE . $id_boucle . ">";
		$p = strpos($suite, $s);
		if ($p!==false){

This code seems to be duplicated across your project.

			$result->altern = substr($suite, 0, $p);
			$suite = substr($suite, $p+strlen($s));
		}
		$result->ligne = $ligne+substr_count($debut, "\n");
		$m = substr_count($milieu, "\n");
		$b = substr_count($result->avant, "\n");
		$a = substr_count($result->apres, "\n");

		if ($p = strpos($type, ':')){

This code seems to be duplicated across your project.

			$result->sql_serveur = substr($type, 0, $p);
			$type = substr($type, $p+1);
		}
		$soustype = strtolower($type);

		if (!isset($GLOBALS["table_des_tables"][$soustype]))
			$soustype = $type;

		$result->type_requete = $soustype;
		// Lancer la 2e passe sur les criteres si la 1ere etait bonne
		if (!is_array($result->param))
			$err_b = true;
		else {
			phraser_criteres($result->param, $result);
			if (strncasecmp($soustype, TYPE_RECURSIF, strlen(TYPE_RECURSIF))==0){
				$result->type_requete = TYPE_RECURSIF;
				$args = $result->param;
				array_unshift($args,
					substr($type, strlen(TYPE_RECURSIF)));
				$result->param = $args;
			}
		}

		$result->avant = public_phraser_html_dist($result->avant, $id_parent, $boucles, $descr, $result->ligne);
		$result->apres = public_phraser_html_dist($result->apres, $id_parent, $boucles, $descr, $result->ligne+$b+$m);
		$result->altern = public_phraser_html_dist($result->altern, $id_parent, $boucles, $descr, $result->ligne+$a+$m+$b);
		$result->milieu = public_phraser_html_dist($milieu, $id_boucle, $boucles, $descr, $result->ligne+$b);

		// Prevenir le generateur de code que le squelette est faux
		if ($err_b) $result->type_requete = false;

		// Verifier qu'il n'y a pas double definition
		// apres analyse des sous-parties (pas avant).

		if (isset($boucles[$id_boucle])){
			$err_b_d = array('zbug_erreur_boucle_double',
				array('id' => $id_boucle));
			erreur_squelette($err_b_d, $result);
			// Prevenir le generateur de code que le squelette est faux
			$boucles[$id_boucle]->type_requete = false;
		} else
			$boucles[$id_boucle] = $result;
		$all_res = phraser_champs_etendus($debut, $ligne, $all_res);
		$all_res[] = &$boucles[$id_boucle];
		if (!empty($suite)){

This code seems to be duplicated across your project.

			$ligne += substr_count(substr($texte, 0, strpos($texte, $suite)), "\n");
		}
		$texte = $suite;
	}

	return phraser_champs_etendus($texte, $ligne, $all_res);
}