#
# 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
}
DEADSTAR (FRA) - The Hook Killer (2009)
Label : Auto-Production
Sortie du Scud : mai 2009
Pays : France
Genre : Instrumental horrifique
Type : Démo
Playtime : 7 Titres - 18 Mins
DEADSTAR, projet instrumental né de la créativité de François Pouvreau, avait déjà sorti une première démo intitulée Moonlight (en Août 2008). The Hook Killer, deuxième démo de DEADSTAR, révèle un peu plus les ambitions de son géniteur. Assurément, le compositeur de DEADSTAR pourrait intégrer n’importe quel groupe de Black symphonique à la recherche d’un clavier doué de ses doigts. Mais il voit plus loin. Beaucoup plus loin. Comme votre serviteur, il doit vouer une passion peu commune aux musiques de films. Aux petits détails sonores qui suscitent l’intrigue, aux mélodies ensorceleuses, aux orchestrations sombres qui font de l’homme chauve-souris un Chevalier Noir énigmatique et torturé (il fallait bien que je la case celle-là : Hans, tu es un génie).
En cela, je dois admettre que le concept de The Hook Killer m’a facilement séduit, d’où une chronique forcément subjective et une note finale qui ne signifiera pas grand-chose … D’autant que cette démo pousse le concept jusqu’à réécrire la trame musicale d’un film déjà sorti. Le « tueur au crochet », voilà un titre qui m’évoquait bien quelque chose. La pochette, elle, en apprend un peu plus sur le contenu. Ce visage si pur que vous découvrez, c’est celui de la belle, très belle Virginia Madsen (oui, la sœur de Michael, celui qui joue toujours les truands costauds au cœur tendre chez Tarantino). Et le « tueur au crochet » est plus connu sous le nom de Candyman.
« Candyman » (1992) ne représente ni plus ni moins que LE film culte d’épouvante des années 90. Réalisé par Bernard Rose, d’après une nouvelle du géant (par le talent) Clive Barker, cette légende urbaine portée à l’écran met en scène une journaliste, Helen, qui enquête sur le terrifiant tueur au crochet (joué par le non moins terrifiant Tony Todd). Il ne faut surtout pas jouer à prononcer 5 fois son nom devant un miroir, sinon … malheur à vous …
Le succès du film doit aussi à la bande-son de Philip Glass, illustre compositeur de musique contemporaine et de nombreuses musiques cinématographiques (« The Truman Show », c’est lui). Et François Pouvreau revendique ouvertement l’influence de Glass. Tel l’élève imitant son maître, le cerveau de DEADSTAR démontre que lui aussi sait instaurer un climat plus qu’horrifique …
D’une ambiance menaçante jusqu’aux instants les plus dramatiques et funèbres (« Saviour Of The City »), d’un orgue oppressant jusqu’aux terreurs les plus insupportables (« Act 4 – The Second Apparition », et il faut entendre cette voix malsaine prononcer « you are mine now » !), d’une berceuse inquiétante jusqu’à la triste mélodie d’un piano envoûtant (« I Came For You »), The Hook Killer offre sa propre version de la B.O. de « Candyman », glissant à de nombreuses reprises des extraits de dialogues du film.
Bien sûr, sur 18 minutes, certains diront que The Hook Killer ne présente pas assez de compositions dénuées de dialogues. Ils auront sûrement raison. Mais c’est justement le travail en fond sonore qu’il faut apprécier. Plus besoin d’image, la musique se suffit à elle-même.
Et maintenant, l’étape suivante pour DEADSTAR consiste à sortir un album entier de créations originales. Et de les proposer, pourquoi pas, à un réalisateur audacieux qui saura donner sa chance à un talentueux musicien.
Ajouté : Mardi 09 Juin 2009
Chroniqueur : NicoTheSpur
Score : 
Lien en relation: Deadstar Website
Hits: 17317
|
| © Metal-Impact Since 2001 | Webmaster et Rédacteur en chef : Blasphy De Blasphèmar
Rechercher sur M-I
