#
# XML_node.objet
#
# This object is an XML node representation
#
# /- name (string)
# xml_node --- attributes (array)
# \- children (array) or value (string)
class xml_node {
var $name;
var $attributes = array();
var $children = array();
var $value = "";
function xml_node($name,$attributes,$children=array(),$value="") {
$this->name = $name;
if (is_array($attributes)) {
$this->attributes = $attributes;
}
$this->children = $children;
$this->value = $value;
}
}
#
# xml_tree class
#
# This object parses an XML stream and offers a tree composed by xml_nodes
#
class xml_tree {
var $xml_stream;
var $current_node;
var $root_node;
var $index;
var $value;
function xml_tree() {
$this->root_node = new xml_node("__ROOT_NODE",array());
$this->current_node = $this->root_node;
}
function add_tree($xml_stream) {
# Managing the parser
$this->xml_stream = $xml_stream;
$xml_parser = xml_parser_create();
xml_parser_set_option($xml_parser,XML_OPTION_CASE_FOLDING,0);
xml_parser_set_option($xml_parser,XML_OPTION_SKIP_WHITE,1);
if (!xml_parse_into_struct($xml_parser,$this->xml_stream,$this->value,$this->index)) {
xml_parser_free($xml_parser);
die("XML Parse error");
}
xml_parser_free($xml_parser);
# Now, $this->value and $this->index are informed, we can use the get_node methode.
$tab_result = $this->get_node(0,count($this->value) - 1);
$this->root_node->children[] = $tab_result[0];
$this->current_node = $this->root_node;
}
function get_node($index_start,$index_stop) {
#echo "
\n";
#echo "GET-NODE($index_start,$index_stop)
\n";
# What we are going to return is an array of xml_nodes
$return_tab = array();
# depth is only here to check if everything is all right
$tab_node = $this->value[$index_start];
$depth = $tab_node["level"]-1;
# Now we have to be sure we do not forget a single node
for ($index = $index_start;$index <= $index_stop;$index++) {
#echo "\$index = $index
";
# get the current node
$tab_node = $this->value[$index];
# what type of node is it ?
switch($tab_node["type"]) {
case "complete" :
# Depth integrity check
if ($tab_node["level"] != $depth+1) {
die("ERREUR # contrainte d'intégrité au noeud complet $index, niveau $depth + 1 au lieu de ".$tab_node["level"]);
}
#echo "Noeud complet trouvé position $index TAG ".$tab_node["tag"]."
\n";
# Easy one, no children to manage, only a value...
$return_tab[] = new xml_node($tab_node["tag"],$tab_node["attributes"],"",$tab_node["value"]);
break;
case "open" :
# Depth integrity check
if ($tab_node["level"] != $depth +1 ) {
die("ERREUR # contrainte d'intégrité au noeud ouvert $index, niveau $depth au lieu de ".$tab_node["level"]);
}
# Open tag, we re-use this methode to return its children
# Where is the correspondong close tag ?
$node_index = $this->index[$tab_node["tag"]];
$flipped_node_index = array_flip($node_index);
#echo "This ".$tab_node["tag"]." is at coords ".$flipped_node_index[$index]."
";
$i=1;
do {
$next_index = $node_index[$flipped_node_index[$index] + $i++];
$next_tag=$this->value[$next_index];
}
while ($next_tag["level"]!=$tab_node["level"]);
#echo "Ouverture de noeud détectée pos $index TAG ".$tab_node["tag"]."
\n Parcours jusqu au $next_index
\n";
# good, we can now instanciate our node
$return_tab[] = new xml_node($tab_node["tag"],$tab_node["attributes"],$this->get_node($index+1,$next_index),"");
# As we called the get_node methode, we are sure that nodes have been parsed to the corresponding close tag
$index = $next_index;
break;
case "close" :
# Depth integrity check
if ($tab_node["level"] != $depth ){
die("ERREUR # contrainte d'intégrité au noeud fermé $index, niveau $depth au lieu de ".$tab_node["level"]);
}
#echo "Fermeture de noeud detectée pos $index TAG ".$tab_node["tag"]."
\n";
# This ugly thing is useless because reaching a close tag means that $index==$index_stop but who knows ? =)
# it will be skipped soon
$index = $index_stop;
break;
default:
die("Erreur de type de TAG non déterminé :'".$tab_node["type"]."'");
}
}
# We are out ... returns the array with collected children...
return ($return_tab);
}
# this function browse the xml tree and set the current node to the selected node
function give_node($path) {
if ($path[0]=="/") {
$current_node=$this->root_node;
$path=substr($path,1);
#echo "ABSOLUTE PATH GIVEN=$path
";
}
else {
$current_node = $this->current_node;
}
#echo "PATH GIVEN=$path
";
$tab_path = split("/",$path);
foreach ($tab_path as $node_expr) {
#echo "STUDYING EXPR='$node_expr'
";
$node = $current_node;
$expr_tab = split("\?",$node_expr);
$node_name = $expr_tab[0];
$attr_tab = 0;
if (count($expr_tab)>1) {
##echo "TROUVE AU MOINS UNE CONDITION SUR LES ATTRIBUTS...
";
$attr_expr_tab=split(",",$expr_tab[1]);
$attr_tab=array();
foreach($attr_expr_tab as $attr_expr) {
$attr_split_expr=split("=",$attr_expr);
$attr_tab[$attr_split_expr[0]]=$attr_split_expr[1];
}
}
$last=0;
foreach ($node->children as $children) {
#echo "COMPARING WITH '$children->name'
";
if ($children->name == $node_name) {
##echo "TROUVE NOEUD CORRESPONDANT $node_name
";
if (is_array($attr_tab)) {
$node_attributes = $children->attributes;
foreach ($attr_tab as $key=>$value) {
if ($node_attributes[$key] == $value) {
#echo "ATTRIBUTE & CHANGE CURRENT NODE TO ".$children->name."
";
$current_node = $children;
$last = 1;
}
}
}
else {
##echo "CHILD=".$children->name."
";
#echo "CHANGE CURRENT NODE TO ".$children->name."
";
$current_node = $children;
$last=1;
}
}
if ($last) {
break;
}
}
if (!$last) {
#echo "PATH ERROR $node_name
";
#die("MMmmmh It seems that this file is not a DIA XML format...sorry...");
return 0;
}
}
return $current_node;
}
function browse_tree($path) {
$node = $this->give_node($path);
if (is_object($node)) {
$this->current_node = $node;
return 1;
}
return 0;
}
# this method dumps an html representation of the xml tree
function xml_show($node = "",$level=0,$last=0) {
if ($node=="") {
$node=$this->root_node;
}
if (!is_object($node)) {
die("ERROR : node is not an object");
}
$line="";
for($i=1;$i<=$level;$i++) {
if ((i==$level-1) and ($last)) {
$line.=" ";
}
else {
$line.=" |";
}
if ($i==$level) {
$line.="`-";
}
}
$line.=$node->name;
#echo $line;
$line.="".count($node->children)."";
if (count($node->children)==1) {
$line.=" (".$node->value.")
\n";
echo "$line";
}
else {
$line.="
\n";
echo "$line";
$i=1;
foreach($node->children as $children) {
if ($i==count($node->children)) {
$this->xml_show($children,$level+1,1);
}
else {
$this->xml_show($children,$level+1);
}
$i++;
}
}
}
#END_CLASS
}
STATUS QUO (uk) - Bula Quo! (2013)
Label : earMusic
Sortie du Scud : 2013
Pays : Angleterre
Genre : Boogie Rock
Type : Album
Playtime : 19 Titres - 75 Mins
Chroniquer STATUS QUO pour un webzine estampillé Metal, c'est ô combien risqué ! Au mieux, je me fais excommunier, au pire je me fais lyncher par une horde lobotomisée. Et si je vous évoque Dog Of Two Head et Piledriver, datés 1971, 1972, certains vont me prendre pour un fossile de trilobite.
Francis Rossi et Alan Lancaster m'accompagnent depuis 40 ans, ils ont assuré la bande son de plusieurs épisodes de ma vie, les plus beaux, il est donc naturel que je vous en cause un peu aujourd'hui, j'y trouve une légitimité à travers cette fidélité rarement prise en défaut.
Surtout que 2013 est une année inespérée car elle voit se réaliser la réunion improbable avec John Coghlan et Alan Lancaster pour un fabuleux Frantic Four Réunion Live 2013, et moi je vous dis que je ne serai pas surpris de les voir traîner leurs guêtres au Hellfest 2014 ! Je tairai mes sources car les négos sont en cours.
Revenons à notre CD Bula Quo! qui est en vérité la B.O.F du film sur le QUO, aux iles Fidji, que je trouve, il faut en convenir, desservi par une production trop clinique, trop aseptisée, l'autorisant à pénétrer sans restriction dans n'importe quel bloc de soins intensifs. Les enregistrements studio m'ont rarement transcendé, le QUO reste un groupe de scène, fait pour la scène, et basta ! Bula ou pas.
Avec le titre "Gogogo" on retrouve la marque de fabrique du QUO, rythme entraînant enrichi par une orchestration un tantinet fouillée, et un solo guitare bien senti en cours de route, on the road again !
On retrouve aussi l'intro, en douceur, qui nous livre ensuite une rythmique binaire et ô combien efficace, c'est le cas sur "Run And Hide".
Avec "Mistery Island", nous avons notre carte postale aux couleurs de l'exotisme, celui des îles Fidji, pays du ukulélé, musique polyphonique des fêtes du kava. On retrouve aussi cette ambiance sur "Fijitime", avec un chant tribal sur le festif "Bula Bula Quo".
Si vous voulez exaspérer votre voisine du dessous en tapant du pied à en désespérer tout un panel de ménagères de plus de 50 ans, passez en boucle le morceau "All That Money", et elle vous rendra la monnaie de votre pièce...
Le deuxième CD, un bonus qui vient nuancer notre déception, nous replonge dans les enregistrements Live du groupe, avec les classiques comme "Caroline" de 1973, titre culte à te faire faire une culbute, sans oublier "Down, Down", "Whatever You Want", et un titre plus récent "Beginning Of The End" de 2007 qui fait aussi ses preuves lors des concerts du QUO.
Alors que vous dire ? si ce n'est que la bête vit encore ! une discographie à rallonge qui se résume pour moi au Live ! de 1977, jamais égalé. On a raison de croire aux esprits du Rock For Ever, car retrouver Francis Rossi, Alan Lancaster et John Coghlan, ensemble sur scène, cette année, cela tient du miracle pour les aficionados du QUO.
Ce Bula Quo! est là pour parler du QUO, pour alimenter la gazette, continuer à faire l'actualité, mais le principal n'est pas là...replonger dans les images, et le boogie woogie de Just Doin't It Love, et Live At Montreux, vous ne me direz jamais assez merci...
Ajouté : Jeudi 06 Mars 2014
Chroniqueur : Le Patriarche
Score : 
Lien en relation: Status Quo Website
Hits: 5574
|
| © Metal-Impact Since 2001 | Webmaster et Rédacteur en chef : Blasphy De Blasphèmar
Rechercher sur M-I
