# Copyright (C) 2002-2004 gregoire HUBERT.
#
# This library is free software; you can redistribute it and/or
# modify it under the terms of the GNU Lesser General Public
# License as published by the Free Software Foundation; either
# version 2.1 of the License, or (at your option) any later version.
#
# This library is distributed in the hope that it will be useful,
# but WITHOUT ANY WARRANTY; without even the implied warranty of
# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
# Lesser General Public License for more details.
#
# You should have received a copy of the GNU Lesser General Public
# License along with this library; if not, write to the Free Software
# Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
#
# Author : gregoire HUBERT
#
# 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;
}
}
# Copyright (C) 2003-2004 gregoire HUBERT.
#
# This library is free software; you can redistribute it and/or
# modify it under the terms of the GNU Lesser General Public
# License as published by the Free Software Foundation; either
# version 2.1 of the License, or (at your option) any later version.
#
# This library is distributed in the hope that it will be useful,
# but WITHOUT ANY WARRANTY; without even the implied warranty of
# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
# Lesser General Public License for more details.
#
# You should have received a copy of the GNU Lesser General Public
# License along with this library; if not, write to the Free Software
# Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
#
# Author : gregoire HUBERT
#
# 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
}
RED FANG (usa) - Red Fang (2008)
Label : Wäntage USA
Sortie du Scud : octobre 2008
Pays : Etats-Unis
Genre : Stoner Rock
Type : Album
Playtime : 10 Titres - 36 Mins
Le metaleux a, plus que le reste de l'humanité, une sympathie certaine, une bienveillance affirmée à l'égard des buveurs de bière de tous poils. Sans doutes parce qu'à l'instar du t-shirt noir et de la veste à patch, la bière est la plus fidèle compagne du metaleux. Faut-il voir dans cette disposition favorable l'une des raisons du succès des quatre allumés de Portrland qui ont fondé RED FANG en 2005 ? Pas exclusivement, mais sans doutes un peu. Parce que ces quatre types sont ce qui se rapproche le plus du working class heroe de base. Le barbu débonnaire, chemise à carreaux, jean crasseux et casquette de routier qui va descendre un pack de six avec ses potes après le boulot, dans un bar sombre avec un comptoir en bois, une serveuse à gros seins, des pubs pour alcools en tube néon accrochés au mur et un juke box qui passe du Willie Nelson.
Il n'est d'ailleurs pas impossible que notre quat'zamis de Portrland aient par la suite décidé de JOUER sur cette image qui fait sa marque de fabrique. Mais si ces mecs ont cet air sympa de musicien du dimanche qui jamme dans son garage avec ses potes, c'est parce que c'est ce qu'ils sont.
Car Brian Giles (chant, guitare), Aaron Beam (chant, basse), David Sullivan (guitare) et John Sherman (batterie) ne sont pas des petits jeunots avec du lait qui leur coule du nez. On a plutôt affaire à des quadras au poil blanchi qui envoient un Heavy Rock gras du bide. Le debut album du gang réunit leurs deux premiers EP. Le son est poussiéreux, gras, un peu confus, mais c'est aussi cette ambiance "enregistré dans le garage après avoir vidé trois packs de Pabst Blue Ribbon" qui fait le charme du disque. Un charme à géométrie variable. Car les deux chanteurs de la formation ont chacun leur personnalité musicale, leur patte. Aaron Beam est sur un registre incisif, tout dans le tonus, la pêche, comme sur "Prehistoric Dog" ou "Reverse Thunder". De l'autre côté du miroir, Brian Giles joue d'un registre plus dark, plus gras, à la limite du Doom ("Whales and Leeches" et surtout le mémorable "Humain Remain Humain Remains") . Mais ces écarts sont quelque peu gommés puisque sur la plupart des titres, les deux chanteurs se partagent le micro, l'un en lead, l'autre en backvoice et souvent en choeur.
Niveau style, on classe RED FANG dans le Stoner Rock, mais c'est un petit raccourci car la musique du quatuor rappelle plus le Grunge barré de de TAD que les riffs désertiques de KYUSS ou les sonorités torturées d'ELECTRIC WIZARD. C'est plutôt l'esprit général du gang qui est très Stoner Rock puisqu'il plaît au public qui aime cette musique et ces groupes qui ont su rester naturels, monter sur scène sans chichi, et donner du bonheur à leur public avec des prestations scéniques remarquables. L'autre touche de génie de RED FANG, qui a contribué à diffuser cette image de mecs à la coule bien au-delà du petit monde des concerts, c'est la série de video clips dans lesquels ils se mettent en scène en working class heroes bourrus et barbus qui passent une grande partie de leur temps boire des bières entre potes, faire des conneries d'alcoolo et jouer de la musique. Suivant de près la publication de Red Fang, le clip de "Prehistoric Dog" où ils se fabriquent des armures en pack de bière pour aller mettre une raclée à une bande de mômes qui font un jeu de rôle grandeur nature est un must see.
A l'instar de son clip porte drapeau, le disque est bourré de charmes, toutes les chansons proposent quelque chose d'original et entraînant. Les riffs se gravent durablement dans la tête et l'album s'écoute et se réécoute sans fatigue ni lassitude. Si la technique des musiciens et la prod s'améliorent sur les projets suivants, le son originel de RED FANG est déjà présent dans cet opus.
Ajouté : Mardi 04 Août 2015 Chroniqueur : Rivax Score : Lien en relation: Red Fang Website Hits: 4816
|