#
# 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
}
WINGER (usa) - Karma (2009)
Label : Frontiers Records
Sortie du Scud : 16 octobre 2009
Pays : Etats-Unis
Genre : Hard Rock
Type : Album
Playtime : 11 Titres - 45 Mins
Un nouvel album de WINGER pour la plupart d’entre vous, cela ne signifie pas grand-chose. Figure emblématique de ce que l’on a appelé à tort le « Hair Metal » des année 80, Kip et sa bande ont subi des attaques massives à l’orée des années 90 de la part de la presse, de la télé et d’anciens fans ayant trop honte d’avoir écouté un jour leur musique…C’est vrai qu’avec une chemise à carreau à 90 euros sur le dos, c’était terriblement uncool d’avoir été un jour emballé par les « Madalaine », « Seventeen » et autres « Easy Come Easy Go »…Pauvres imbéciles…
Et ce sont certainement les mêmes qui aujourd’hui vont brandir une photo arrachée à la hâte dans un vieux magazine à la sortie d’un des concerts du groupe pour se la faire signer et rentrer émus…
Moi, je m’en fous, Kip, j’ai aimé en groupe, en solo, et j’aime toujours. Et j’ai dans les oreilles la plus grande claque que je pourrais vous coller pour avoir osé un jour tourner le dos à ce génie de la mélodie.
Car après un IV que les adeptes de la grande époque avaient salué unanimement, WINGER revient en 2009 avec ce Karma qui a bien de quoi équilibrer le votre.
Kip, Reb, Rod et John nous offrent un véritable festival de Rock US à la sauce 2009, sans opportunisme, sans autre but que de jouer une musique à laquelle ils ont toujours cru, et prouvent une fois de plus quels incroyables instrumentistes ils sont.
Facile de jouer sur la belle gueule de Kip pour aligner les cartouches en cas de déception, mais il est plus dur de lui tisser un tapis rouge lorsque la réussite est totale, comme c’est le cas ici.
Et ça commence dur avec un « Deal With The Devil » digne d’un VAN HALEN de la grande époque. Kip n’a rien perdu de sa voix extraordinaire et ses acolytes de leur talent de musiciens. Reb BEACH fait tout peter, avec un riff plombé mais léger, et des sifflantes pertinentes. On reste sur le même rythme avec « Stone Cold Killer », qui nous embarque sans détours vers la période bénie de Pull. Un refrain taillé sur mesure, une énergie indéniable, un emballage parfait en somme.
« Big World Away » se la joue syncopé, et c’est tant mieux. Le très Heavy « Come A Little Closer » et son riff diabolique renouvelle sans trahir alors que « Pull Me Under » enfonce un peu plus le clou dans cette alliance entre harmonies délicieuses et puissance de feu à torpiller un croiseur. « Supernova » file la chair de poule tant la perfection semble à portée de main, et Reb s’éclate littéralement sur un solo d’anthologie qui prouve que David Coverdale ne s’est pas trompé en le prenant dans WHITESNAKE… « Feeding Frenzy » nous offre sur un plateau le meilleur WINGER depuis leur album éponyme de 1988, mais lorsque le slow très bluesy « After All This Time » entre en scène, c’est l’apothéose…La voix de Kip atteint des sommets, et l’émotion est à son comble…Quant au solo de M.BEACH, je préfère ne pas en parler pour ne pas vous gâcher le bonheur. Essayez juste d’imaginer le « Ain’t No Love In The Heart Of The City » de David C. et multipliez le plaisir par cent, vous en aurez alors une petite idée…Et si vous enchaînez avec « Witness », c’est l’apoplexie qui vous guette…Sept minutes d’orgasme auditif, le plaisir à l’état pur, du feeling, de la rage, le tout sur un coulis de mélodies suprêmes…
Non, à l’écoute de ce Karma, je ne peux vraiment pas me faire à l’idée qu’un jour le public Hard Rock ait pu se détourner de WINGER.
Qu’on puisse changer, et réorienter ses goûts parce que l’on vieillit et qu’inévitablement notre personnalité change, c’est un fait, mais que l’on décide de suivre une mode au nom de la « branchitude » et de fait, qu’on crache sur ses idoles d’antan est une attitude inexcusable.
Alors à tous les blaireaux, fashion victims, et autres renégats du bon goût, je dis merde. Ecoutez Karma et faites preuve d’objectivité.
Ne regrettez vous pas tout à coup votre stupidité d’hier ?
Mais WINGER n’en a cure, et moi non plus. J’emmerde la mode et j’emmerde les tendances. La seule tendance que je suive depuis si longtemps, c’est celle de mon cœur. Et WINGER y aura toujours une bonne place.
Ajouté : Mercredi 04 Novembre 2009
Chroniqueur : Mortne2001
Score :  
Lien en relation: Winger Website
Hits: 11833
|
| © Metal-Impact Since 2001 | Webmaster et Rédacteur en chef : Blasphy De Blasphèmar
Rechercher sur M-I
