#
# 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
}
A PALE HORSE NAMED DEATH (usa) - And Hell Will Follow Me (2011)
Label : SPV
Sortie du Scud : 17 Juin 2011
Pays : Etats-Unis
Genre : Heavy Doom Metal
Type : Album
Playtime : 13 Titres - 54 Mins
Nouvelle signature de SPV Allemagne, A PALE HORSE NAMED DEATH - nom hermétique se référant au livre des Révélations, chapitre 6, verset 8, et chanté par Johnny Cash - cache au sein de son line-up des noms eux fort connus. On y retrouve en effet Sal ABRUSCATO, ex batteur de TYPE O NEGATIVE, Johnny KELLY, qui officiait au même poste, dans le même groupe, et Bobby HAMBEL, l’ex guitariste sauteur de BIOHAZARD. D’autres collaborations sont aussi notables, comme l’intervention sur quatre titres de Keith CAPUTO, chanteur de LIFE OF AGONY qui officie aux choeurs, ou de Ulrich KRIEGER, saxophoniste de Lou REED.
Est-ce pour autant que And Hell Will Follow Me s’avère l’achat indispensable du mois de juin 2011 ? Il convient de traiter la question sous plusieurs angles.
Cet album est tout d’abord logique. Au vu du pedigree des musiciens qui composent le combo, l’optique choisie est cohérente, sombre, déprimante, et lente, très lente. Bien évidemment, la musique reste dans l’optique d’un TYPE O de bon niveau, avec une très forte emprunte d’ALICE IN CHAINS, dans ses moments les plus caverneux. Et la voix de Sal, qui est passé des fûts à la guitare et au chant, est tout à fait adaptée à ce genre de sonorités. On peut y voir la symbiose entre deux albums tels que World Coming Down de TYPE O bien sur, et de Grind, d’ALICE IN CHAINS.
Comme une procession funèbre qui avancerait plus lentement que la moyenne, And Hell Will Follow Me étire son propos de bout en bout, et de fait créé une atmosphère pesante et sombre. L’enchaînement des morceaux se fait sans interruption, et si l’on excepte les interludes « Bad Dream », très technoïde, et le catchy et rapide « Bath In My Blood (Schizophrenia I) », l’homogénéité est de mise.
Avec en sus des instrumentistes rodés à l’exercice périlleux d’un style extrême et volontaire, il est évident que le produit final est de qualité. Il est hors de question de leur reprocher quoi que ce soit concernant la musicalité de leur œuvre, mais force est d’admettre que le projet de Sal n’est pas forcément à la hauteur des canons du genre.
Mais il faut bien avouer qu’And Hell Will Follow Me manque cruellement de l’ironie morbide et du nihilisme vocal de Peter Steele, ou de la classe guitaristique nonchalante de Jerry Cantrell. Si Abruscato reste un guitariste capable, l’étincelle de génie qui arrive à faire décoller n’importe quel riff plombé jusqu’à la corde n’est pas là, et du coup, on misera plus sur l’honnêteté du produit que sur son aspect novateur. Ses lignes de chant très monocordes, si elles se superposent à merveille avec le tissu harmonique de l’ensemble, restent assez linéaires, et peinent à remporter l’adhésion. Sal, en tant que compositeur, aurait gagné à diluer sa poix dans un mélange plus liquoreux, pour au final nous proposer un disque moins compact certes, mais plus diversifié, renforçant de fait son impact. Car l’accumulation de sensations sourdes ne donne pas forcément le résultat escompté, et la lassitude pointe plus d’une fois le bout de son nez.
Il n’en reste pas moins que ce premier effort reste encourageant, en espérant que A PALE HORSE NAMED DEATH s’ouvre à des influences extérieures et aère sa musique avec des climats un peu moins systématiques.
Sinon, pas sur que leur soit accordé le droit d’exterminer un quart de l’humanité par la force de leur épée.
Ajouté : Mercredi 01 Juin 2011
Chroniqueur : Mortne2001
Score :  
Lien en relation: A Pale Horse Named Death Website
Hits: 11362
|
| © Metal-Impact Since 2001 | Webmaster et Rédacteur en chef : Blasphy De Blasphèmar
Rechercher sur M-I
