#
# 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
}
BELPHEGOR (at) - Bondage Goat Zombie (2008)
Label : Nuclear Blast / Pias
Sortie du Scud : 14 avril 2008
Pays : Autrichien
Genre : Black Metal Brutal
Type : Album
Playtime : 9 Titres - 39 Mins
J'espère que je n'aurais pas à vous présenter BELPHEGOR. Pas d'inquiétude, si jamais vous me faites l'affront de ne pas connaître ce groupe de grande envergure, ils viendront vous même vous décapiter et planter vos sales tronches sur un pieu. Ainsi va la vie avec ces Autrichiens. Ca blaste, ça hurle, ça se déchaîne et bien évidemment ça blasphème, bienvenue dans le Black Brutal. Histoire d'être au clair avec leurs futurs auditeurs, les gars de BELPHEGOR annoncent tout de suite la couleur avec le titre de l'offrande : Bondage Goat Zombie. 3 mots assez simple, amusez-vous à deviner l'imagerie qui se cache derrière, il y a de quoi écrire plusieurs bouquins d'horreur gore à défrayer la chronique.
N'ayant découvert le combo qu'avec Goatreich – Fleshcult, sorti en 2005, autant dire qu'ils ont déjà séparer mon chef du reste de mon corps. Mais le culte que j'ai voué à cet album a tôt fait de me racheter. Je dois donc dire que j'attendais énormément de cet album, qui aurait dû surpasser ce que je connaissais d'eux. Vous devinez bien, il n'en est rien. Pas que ce soit mauvais mais...
Disons-le clairement, BELPHEGOR a pris un tournant vaguement mélodique. Il n'y a pas de soli à outrance, ni de belles mélodies enchanteresses mais on sait qu'un effort a été fait pour apporter des lignes moins chaotiques, plus faciles à retenir, plus à la DARK FUNERAL. Ce côté là ne m'a pas tellement plus, car il s'en dégage une perte d'énergie considérable. Heureusement certains titres rappellent la bonne époque, étant bien plus bruts, austères et malsains. « Armageddon's Raid » est un bon exemple de santé déclinante aux influences NILE-iennes, alors que « Bondage Goat Zombie » est un morceau classique d'ouverture, entraînant, bourrin à souhait. Il nous gratifie même d'une intro typique, à savoir cloches, cris bestiaux de bourreau broyant les os de sa victime avec jubilation.
La production est comme toujours très soignée, détail incontournable pour avoir un bon son brutal et distinct à la fois. Ainsi les furieux blasts de Torturer sont rendus avec précision, Morluch quand a lui sait toujours aussi bien faire du bon bruit avec sa six cordes. On note de plus en plus l'influence de NILE dans ses lignes, qui se tournent ainsi du côté Death de la force, s'éloignant un peu plus des racines Black du groupe. Heureusement les paroles sont toujours là pour nous rappeler leur idéologie forte et blasphématoire.
On se lasse un peu des chansons à force. « Justine Soaked In Blood » n'est pas forcément bien placée, cassant un peu le rythme de l'album. D'une manière générale je dirais que ce n'est pas le meilleur opus de BELPHEGOR. Il sonne plus uni que Goatreich – Fleshcult, mais aussi plus lourd, avec de sérieux ralentissements. « Sexdictator Lucifer », malgré son refrain entraînant et ses paroles teutonnes n'arrive pas à faire oublier qu'il vient encore plomber l'ambiance. On est Black Brutal ou on ne l'est pas ? Je ne suis pas du genre fermé d'esprit aux multiples styles et mélanges de Metal, mais je trouve que la mayonnaise aurait pu être plus noire et plus amère, comme BELPHEGOR a su le faire par le passé.
Ajouté : Jeudi 18 Septembre 2008
Chroniqueur : Metalrom
Score :  
Lien en relation: Belphegor Website
Hits: 12849
|
| © Metal-Impact Since 2001 | Webmaster et Rédacteur en chef : Blasphy De Blasphèmar
Rechercher sur M-I
