#
# 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
}
LUCTUS / ARGHARUS (lt) - Sonitus Caeli Ardentis (2007)
Label : Ledo Takas Records / Import
Sortie du Scud : 2007
Pays : Lituanie
Genre : Black Metal
Type : Album
Playtime : 10 Titres - 46 Mins
La Lituanie est en passe de devenir une terre prometteuse en ce qui concerne les groupes de Metal extrême. On pense notamment à des groupes comme SKYFORGER, DISSIMULATION, LOITS ou URSKUMUG qui chacun dans leur style ne déméritent aucunement et ont produit des albums valables et intéressants. Sur ce split CD concocté par l’omnipotent label balte Ledo Takas Records (sorte de Season of Mist local), la nouvelle génération du Black Metal lituanien à travers les combos LUCTUS et ARGHARUS s’affirme et lève la tête fièrement du haut des collines baltes. Deux des jeunes groupes les plus prometteurs du genre sont présent sur ce split pour nous faire partager leur Black à la fois ancré dans la tradition, la patrie, le nihilisme et le blasphème. Un programme plutôt complet attend l’auditeur sur cette galette riche en évènements.
Déclarons le bal ouvert avec LUCTUS, projet solo de Simonas initié en 2001. Entouré de musiciens de sessions, ces six titres ont été enregistrés au Lair Studio en Italie où le créateur du projet solo a vécu la majeure partie de sa jeune vie. Sur place, il a tout de même eu le temps de concocter et produire deux démos en 2002 et 2003 avant d’achever un MCD Ad Arma ! en 2004.
Bercé par le Thrash et le Death traditionnel, ces influences se perçoivent au travers de ces morceaux de Black aux réverbérations Thrash comme en témoigne les titres que sont les excellents « Filthy Blood, Guts & Shit», «Don’t Sign The Armistice » et son intro rageuse. Riffs old-school, véloces et accrocheurs, les paroles abordées par le leader touchent à la guerre (samples de mitrailleuses, marches militaires, sirènes, etc.), au patriotisme ou à l’extinction du paganisme, thème qui tient à cœur à Simonas. Notons que les paroles sont braillées dans la langue de Shakespeare. Rythmiques sauvages, LUCTUS propose pour ainsi dire un Black/Thrash aux accents Punk aboutissant ainsi à six pistes énergiques et aux structures simplistes et efficientes. Une ambiance un peu raw et sale dans le grain des guitares nous pousse à comparer LUCTUS à des formations comme IMPALED NAZARENE ou CARPATHIAN FOREST. Si vous appréciez ces groupes, LUCTUS est un groupe suffisamment captivant qui vous ravira…
Pour ARGHARUS, l’autre formation lituanienne présente sur le Split CD, il s’agit là de son premier enregistrement. Ce quatuor lituanien existant depuis seulement trois ans, et au contraire de son confrère LUCTUS, administre un Black Metal misanthrope, nihiliste et catégoriquement blasphématoire. Les textes étant écrits en lituanien, la compréhension des paroles n’est que trop approximative ! ARGHARUS arbore de suite ses convictions au travers de sa musique à savoir la négation des canons de la morale occidentale ou bien l’exaltation de la représentation de la face maléfique de l’Homme ! C’est bien beau tout çà, mais la musique là dedans ? Et bien, le moins que l’on puisse dire est que ARGHARUS dispose d’une véritable puissance de feu, une grosse armada sonore ! Les Lituaniens ne font pas dans la dentelle et la production claire et précise finit le travail comme il se doit. Enregistré chez le voisin letton au Phoenix Studio, niveau sonorité, le quatuor n’a rien à envier à ses pairs. Les titres quant à eux dans le fond sont exécutés tambour battant, la maîtrise technique de mise n’effrayant pas les aspirations des musiciens, on se dit que le groupe n’aura aucune difficulté à enregistrer son premier album vu la qualité des morceaux sur ce split CD comme «Pasauktas Delcios», la déterminé et violente «Zvaigzdes Aukstybej Uzges» ou la Thrashy «Nieskas». Bien que parfait d’un point de vue d’exécution et d’écriture, on ne ressent pas vraiment leur message de nihilisme ou de blasphème, la faute peut-être à des compositions trop propres et pas assez osées dans l’extrême négatif.
Nonobstant, il n’en demeure pas moins que la Lituanie compte effectivement avec ARGHARUS et LUCTUS deux formations encourageantes et promises à un bel avenir…
Ajouté : Lundi 09 Juillet 2007
Chroniqueur : Loki
Score : 
Lien en relation: Luctus Website
Hits: 14681
|
| © Metal-Impact Since 2001 | Webmaster et Rédacteur en chef : Blasphy De Blasphèmar
Rechercher sur M-I
