#
# 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
}
GRIS (ca) - À l'Âme Enflammée, l'Äme Constellée... (2013)
Label : Sepulchral Productions
Sortie du Scud : 9 juillet 2013
Pays : Canada
Genre : Ambiant Depressive Black Metal
Type : Album
Playtime : 10 Titres - 80 Mins
Après une longue pause de 6 ans durant laquelle Neptune et Icare se sont concentrés sur MISERERE LUMINIS en collaboration avec Annatar de SOMBRES FORÊTS, les voici de retour avec un nouvel album auquel ils ont consacré deux grosses années. Un nouveau chapitre de l'œuvre de GRIS ! Tout le monde se souvient du triste Il Etait Une Forêt.... Alors, qu'attendre de plus si ce n'est une suite de ce magnifique opus qui fait partie intégrante des incontournables du DSBM ? A la surprise générale et au désespoir de certains (dont moi, il faut l'avouer), GRIS n'a pas opté pour un DSBM pleurant et accablant pour ce nouvel album intitulé À l'Âme Enflammée, L'Äme Constellée...
L'opus que les Québécois nous proposent est sorti en même temps que La Mort Du Soleil de SOMBRES FORETS. En effet, chaque groupe se définit comme le "frère d'âme" de l'autre. Qui plus est, les deux groupes ont radicalement changé de style avec leurs albums respectifs. Pour GRIS, ils sont passés d'un DSBM poussif et criard à un Ambiant teinté de tristesse mais très instrumental. Malheureusement, ce changement n'a pas satisfait tous les fans du genre.
Les guitares sèches & tristes (chez GRIS, cela se marie très bien) qu'on pouvait trouver dans l'opus précédent sont de retour ! Dès la première track ("L'Aube"), elles sont présentes aux côtés de nombreux instruments peu communs tels que des djembés, des violons, des flûtes ou bien encore des pianos. Mais maintenant, intéressons nous aux grands changements. Le chant. Les voix de Neptune et Icare sont (comme celle d'Annatar dans son nouvel album) très lointaines, et surtout, beaucoup moins pleurantes, ce qui distingue énormément À l'Âme Enflammée, L'Äme Constellée... de son prédécesseur. Mais attention ! GRIS reste fidèle à lui-même. Une notion de douleur, de souffrance et de tristesse est bien évidemment présente. Ca reste GRIS, et heureusement ! De cris en accords tous plus beaux les uns que les autres, ce full-lenght plus long que la normale est un disque à écouter d'un seul trait, car c'est en réalité un seul morceau. Les deux Québécois nous emmènent loin à travers leurs paroles plus inventives, plus "joyeuses" que celles de Il Etait Une Forêt.... Malgré leur dimension évasive, les paroles tristes restent présentes, mais sont dissimulées à travers de longs poèmes. C'est précisément ici que se trouve le génie de GRIS. La dissimulation de la tristesse à travers de belles choses. L'album entier est une succession d'instruments insolites qui s'accordent d'une façon remarquable. C'est en quelque sorte un mélange de couleurs qui en créent une nouvelle.
La longue pause aura très largement profité au duo nordique qui revient avec un album différent, très différent. Le changement n'empêche pas la réussite, et c'est ce que nous prouve GRIS aujourd'hui ! Néanmoins, il y a toujours un revers à la médaille. Les vieux fans du groupe n'ont pas aimé cet album qui, comme je l'ai dit, se distingue complètement de Il Etait Une Forêt.... La surprise est maintenant de savoir vers quelle branche s'orientera le prochain opus des sombres Québécois !
Ajouté : Mercredi 26 Février 2014
Chroniqueur : HopelessLife
Score :  
Lien en relation: Gris Website
Hits: 7608
|
| © Metal-Impact Since 2001 | Webmaster et Rédacteur en chef : Blasphy De Blasphèmar
Rechercher sur M-I
