#
# 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
}
TANKARD (de) - Thirst (2008)
Label : AFM Records / Underclass
Sortie du Scud : 19 décembre 2008
Pays : Allemagne
Genre : Thrash Metal aviné
Type : Album
Playtime : 10 Titres - 44 Mins
Eine Bier bitte schön! Danke! Un tankard est une chope dans la langue de Shakespeare au cas où quelques-uns d’entre vous se poseraient des questions quant à la signification de cette palabre à la consonance pour le moins exotique. Mais lorsqu’on est fan de Metal, on sait également que ce mot s’applique à un groupe d’allemand bien burinés par le stout qui a fait la promotion de la binouze bien écumante à travers le monde : TANKARD.
Ce sont les amateurs de bière en général et les fans de l’Eintracht Francfort qui vont être particulièrement ravi de ce retour avec ce treizième opus fraîchement intitulé Thirst, la soif ! Le ton est donné ! Les teutons ont encore soif et les chopes de bière s’apprêtent à couler à flot ! Fondé en 1982 à Francfort, ca ne nous rajeunit pas, le légendaire quartet germain se définit fièrement comme le créateur et le porte étendard du Alcoholic Metal, sous genre ayant pour caractéristiques de baser son image sur l’alcool, sujet que Gerre et ses acolytes maîtrisent à merveille depuis plus de 25 ans. Qui n’a plus en mémoire ces riffs matraqués par une macque dans un coin de sa petite tête ? Responsables d’opus mythiques comme Zombie Attack (1986) et The Morning After (1988) qui en ont impressionné plus d’un, TANKARD fait partie, au même titre qu’ACCEPT, DESTRUCTION ou KREATOR du panthéon métallique d’outre Rhin. Classifié leur Thrash de Metal à la papy serait leur faire offense, bien qu’on sente que le groupe ait conservé sa fougue et une certaine nostalgie musicale spécifique des années 80 ! Dans la construction de ses morceaux pour ce treizième opus à la front cover toujours aussi ignoble et humoristique, marque de fabrique des joyeux drilles germains à l’autodérision facile.
Entrons dans le vif du sujet en s’enquillant une bonne pinte. TANKARD est toujours le même, rien qu’à écouter «Stay Thirsty» qui dépote un maximum, on sent tout de suite le légendaire combo revenir au galop avec son refrain fédérateur qui est là pour nous abreuver de cervoise. Produit par Andy Classen (HOLY MOSES, DEW SCENTED) au Stage One Studio chez nos voisins allemands, l’Andy a su leur redonner une classe sonore qui rend justice à la puissance et à la rapidité d’exécution des dix nouveaux titres de TANKARD. Marque de fabrique bien huilée oblige, TANKARD revient en force avec dix titres bien nerveux faits de refrains catchy et facilement mémorisables. Du Thrash fun fait pour faire la fiesta, des cavalcades de riffs, des chœurs féminins comme suir «When Daddy Comes to Play», des tempi et des rythmiques véloces avec «Zodiac Man» ou bien «G.A.L.O.W.». De plus, les quatre Allemands n’ont rien perdu de leur hargne et de leur humour avec le morceau «My Evil Fart» ! Sous couvert d’humour potache et d’ode à la boisson, TANKARD reste encore une valeur du Thrash Metal à l’ancienne comme on l’aime. Les soli se font discrets et viennent juste embellir les titres sans trop en faire. TANKARD revient en super forme comme quoi, les bonnes vertus sanitaires de la bière sont belles et bien évidentes. À votre santé et Prost !
Ajouté : Jeudi 18 Décembre 2008
Chroniqueur : Loki
Score : 
Lien en relation: Tankard Website
Hits: 11001
|
| © Metal-Impact Since 2001 | Webmaster et Rédacteur en chef : Blasphy De Blasphèmar
Rechercher sur M-I
