#
# 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
}
PSYCHONAUT 4 (ge) - Have A Nice Trip (2012)
Label : Depressive Illusions Records
Sortie du Scud : 11 août 2012
Pays : Georgie
Genre : Depressive Black Metal
Type : Album
Playtime : 11 Titres - 63 Mins
Avant de commencer la chronique du premier album des Géorgiens de PSYCHONAUT 4, une petite présentation s'impose. PSYCHONAUT 4 est un savant mélange entre des narcotiques et une dépression importante, auxquels on peut rajouter une inspiration tout droit sortie d'un des pionniers du genre : LIFELOVER.
L'opus commence par une mise en bouche instrumentale courte, posant très clairement le contexte. Les Géorgiens n'hésiteront pas, à travers cet album, à nous partager leur folie, leur addiction à l'héroïne. C'est en effet leur principale source d'inspiration comme le justifie simplement le titre de l'opus Have A Nice Trip ainsi que le titre "Overdose Was The Best Way To Die" par exemple. La particularité du quintet est sans aucun doute la voix de Graf Von Baphomet, qui crie d'une façon qu'on trouve en premier lieu déconcertante, mais qui après un temps d'écoute suffisant, devient vite un élément notoire et très important du DSBM que nous propose PSYCHONAUT 4. A travers cette voix on peut ressentir tout le désespoir, toute la détresse du jeune vocaliste qui ne sait plus quoi faire pour venir à bout de sa tristesse. Les habitués verront très vite les influences de LIFELOVER, comme notamment à travers le titre "Yle" dans lequel on retrouve les Géorgiens totalement "heureux" de vivre, grâce au " La La La La La" qui composent la bonus track de Have A Nice Trip. L'album contient un morceau originaire de l'EP 40% : "Parasite". C'est notamment à travers ce morceau (durant le passage où l'un des membres parle) que l'on obtient la " recette" de l'héroïne. Bien entendu, quelques titres peuvent paraitre louches, pouvant limite faire peur. Je prends pour exemple "Antihuman", dont l'outro nous offre un G.V.B suffoquant, pleurant, hurlant sa détresse sur une simple boite à musique. Côté instrumental, on peut encore retrouver des influences de LIFELOVER. En effet, les 4 autres membres du groupe jouent un DSBM très rapide, énergique et en fin de compte assez contradictoire au genre de base. Si l'on exclut la drogue, le quintet se penchera sur plusieurs sentiments comme la haine, la mort, ou bien l'auto destruction qui est un sujet courant dans le milieu.
Quand les connaisseurs du genre DSBM parlent de Have A Nice Trip, ils disent souvent que c'est l'album phare de la nouvelle génération du style. C'est en effet à un édifice de tristesse que nous avons affaire ici, enchainant piqures et coupures, nous découvrons une dépression enjouée à travers la voix accablante de Graf ainsi qu'à travers les partitions énergiques composées par André (basse). Magnifique surprise que celle de la découverte d'un jeune groupe tel que PSYCHONAUT 4 venu d'un pays pauvre où la musique est loin d'être une spécialité. C'est donc avec impatience que les fans du groupe attendent le prochain opus qui, on l'espère, sera tout aussi bien voir mieux que ce premier album !
Ajouté : Mercredi 26 Février 2014
Chroniqueur : HopelessLife
Score :  
Lien en relation: Psychonaut 4 Website
Hits: 8150
|
| © Metal-Impact Since 2001 | Webmaster et Rédacteur en chef : Blasphy De Blasphèmar
Rechercher sur M-I
