#
# 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
}
DEATHBOUND (fi) - We Deserve Much Worse (2008)
Label : Dynamic Arts Records / Socadisc
Sortie du Scud : janvier 2008
Pays : Finlande
Genre : Death Grind Joyeux
Type : Album
Playtime : 18 Titres - 32 Mins
Charles Ingalls se trouva fort marri. Son stock de bois diminuait beaucoup plus vite que prévu. Certes, ce grand sot d’Almonzo se servait à grandes brassées, vu qu’il était trop feignant pour en couper lui-même. En plus, il aurait été capable de se trancher le bras, puisqu’en plus de n’être pas très futé, il est aussi maladroit.
Est alors Albert qui subtilisait ce précieux combustible pour payer sa morphine, ce petit drogué ?
Non, c’était sûrement la grande Mary, qui, miro comme une taupe, à du confondre avec le meuble en kit qu’elle venait d’acheter dans la fabuleuse échoppe des Olsons.
Bref, tout allait à vau-l’eau. En plus, Charles venait juste de peter une corde de son stradivarius, alors que Caroline, chaude comme la braise, leur avait aménagé une soirée peinarde, en envoyant leurs 17 moutards chercher de l’huile de soja dans les montagnes.
Plus rien pour se chauffer, la Caro qui n’allait certainement pas miauler autour de son totem pour cause de juke-box défaillant, Charlie décida d’aller voir Mr Edwards, son vieux pote, rustique, mais plein de flair…
« Dis donc mon bon Isaiah, ce grand sot d’Almonzo m’a niqué toutes mes bûches de sapin, l’hiver arrive, qu’on prédit hyper froid, et j’ai rien pour mettre dans la cheminée. »
« Putain Charlot, tu vas être emmerdé pour réchauffer le ragoût, t’as plus qu’à sortir ton quatre cordes pour attiser les sens de ta belle ! »
« M’en parle pas, j’ai pété une corde hier soir en reprenant mon célèbre quadrille ! »
« J’tais déjà dit d’acheter des Ernie Ball, en plus elles brillent, et avec, tu peux frimer ! »
« Oui, je sais, mais je fais quoi moi maintenant ? »
« Ben j’ai bien une solution pour toi, si t’as réparé ton pick-up. Fourres y donc le dernier DEATHBOUND, avec une ration de Death-Grind pareille, tu vas incendier toute la vallée ! »
« DEATHBOUND, c’est des gars de chez nous ? »
« Non, ça vient de Finlande, mais ça rappelle TERRORIZER et BRUTAL TRUTH, et eux, sont 100% américains ! »
« Ben je veux bien être patriote, c’est bon pour la série, mais ça dépote ? »
« Tu parles Charles, c’est brutal, mais parfaitement exécuté ! De tempos médium en accélérations purement Napalmiennes, ils arrivent même à recréer l’ambiance qu’on retrouvait sur certains albums d’ENTOMBED. En plus, le son est énorme, et le chant vindicatif ! »
« C’est du lourd alors, mais y’a du rab ? »
« Bien sur, écoute donc le hit « Debate Or Terminate », et si t’y sens pas des relents du « Blessed Be » de Clandestine, c’est que t’es aussi sourd que ta Mary est miro ! »
« Je prends alors, en plus la Caro est bouillante, elle arrête pas de se frotter au poêle, avec ça, j’emballe aussi sec, surtout qu’elle commence à regarder le révérend bizarrement… »
« Méfie toi du cureton ! Il a l’air con, mais c’est un chaudard ! Mais au moins, t’es sur qu’il écoute pas DEATHBOUND ! »
« Tant pis pour lui, il sait pas ce qu’il perd. Bon j’y vais, faut encore que j’aille ramasser les petits pois et les carottes, et c’est pas cette feignasse d’Albert qui va le faire pour moi ! »
Ainsi, Charles avait tout compris. DEATHBOUND, c’est pire que la nitro. Il était tellement guilleret qu’il alla coller une tannée à ce crétin d’Almonzo….
Ajouté : Dimanche 11 Mai 2008
Chroniqueur : Mortne2001
Score :  
Lien en relation: Deathbound Website
Hits: 14271
|
| © Metal-Impact Since 2001 | Webmaster et Rédacteur en chef : Blasphy De Blasphèmar
Rechercher sur M-I
