* lily/align-interface.cc (find_fixed_alignment_parent): new function.

[lilypond.git] / lily / performer-group-performer.cc

diff --git a/lily/performer-group-performer.cc b/lily/performer-group-performer.cc
index 1f09116811fe66173e15ac0fd709c5df0f6e596d..b8f4349ef8df3b374625b587d4e3ad3862592323 100644 (file)
--- a/lily/performer-group-performer.cc
+++ b/lily/performer-group-performer.cc
@@ -1,137 +1,93 @@
 /*
   performer-group-performer.cc -- implement Performer_group_performer
 
-  (c) 1996, 1997 Han-Wen Nienhuys <hanwen@stack.nl>
-                 Jan Nieuwenhuizen <jan@digicash.com>
+  source file of the GNU LilyPond music typesetter
+
+  (c) 1996--2003 Han-Wen Nienhuys <hanwen@cs.uu.nl>
+               Jan Nieuwenhuizen <janneke@gnu.org>
  */
 
 #include "performer-group-performer.hh"
-#include "input-translator.hh"
-#include "debug.hh"
 
-IMPLEMENT_IS_TYPE_B2(Performer_group_performer,Performer, Translator);
-IMPLEMENT_STATIC_NAME(Performer_group_performer);
-ADD_THIS_PERFORMER(Performer_group_performer);
+#include "audio-element.hh"
+#include "warn.hh"
 
-Performer_group_performer::Performer_group_performer()
-{
-}
 
-Performer_group_performer::~Performer_group_performer()
-{
-}
+ENTER_DESCRIPTION(Performer_group_performer,
+/* descr */       "",
+/* creats*/       "",
+/* accepts */     "",
+/* acks  */      "",
+/* reads */       "",
+/* write */       "");
 
-void
-Performer_group_performer::add( Performer *perf_p )
-{
-    perf_p_list_.bottom().add(perf_p);
-    perf_p->daddy_perf_l_ = this;
 
-    if (perf_p->is_type_b(Performer_group_performer::static_name())) {
-       group_l_arr_.push((Performer_group_performer*)perf_p);
-    } else {
-       nongroup_l_arr_ .push(perf_p);
-    }
-}
 
-Translator*
-Performer_group_performer::ancestor_l( int l )
+void
+Performer_group_performer::announce_element (Audio_element_info info)
 {
-    if (!l || !daddy_perf_l_)
-       return this;
-    
-    return daddy_perf_l_->ancestor_l( l - 1 );
+  announce_infos_.push (info);
+  Performer::announce_element (info);
 }
 
-int
-Performer_group_performer::depth_i() const
-{
-    return daddy_perf_l_->depth_i() + 1;
-}
 
-Translator*
-Performer_group_performer::find_get_translator_l( String n,String id )
-{
-    Translator * ret=0;
-    Input_translator* itrans_l= itrans_l_-> recursive_find ( n );
-    if (itrans_l ) {
-       ret = find_performer_l(n,id);
-       if (!ret) {
-           Performer_group_performer * group = 
-               itrans_l-> get_group_performer_p();
-           
-           add(group);
-           ret = group;
-           
-           if (group->itrans_l_->is_name_b( n ) )
-               ret ->id_str_ = id;
-           else
-               return ret->find_get_translator_l(n,id);
 
-       }
-    } else if (daddy_perf_l_)
-       ret =daddy_perf_l_->find_get_translator_l(n,id);
-    else {
-       warning("Can't find or create `" + n + "' called `" + id + "'\n");
-       ret =0;
+void
+Performer_group_performer::create_audio_elements ()
+{
+  for (SCM p = simple_trans_list_; gh_pair_p (p); p = ly_cdr (p))
+    {
+      Translator * t = unsmob_translator (ly_car (p));
+      Performer * eng = dynamic_cast<Performer*> (t);
+      if (eng)
+       eng->create_audio_elements ();
     }
-    return ret;
 }
 
-Performer_group_performer*
-Performer_group_performer::find_performer_l( String n, String id )
+void
+Performer_group_performer::acknowledge_audio_elements ()
 {
-    if (name() == n && id_str_ == id)
-       return this;
-    Performer_group_performer * r = 0;
-    for (int i =0; !r && i<  group_l_arr_.size(); i++) {
-       r = group_l_arr_[i]->find_performer_l(n,id);
+  for (int j =0; j < announce_infos_.size (); j++)
+    {
+      Audio_element_info info = announce_infos_[j];
+
+      for (SCM p = simple_trans_list_; gh_pair_p (p); p = ly_cdr (p))
+       {
+         Translator * t = unsmob_translator (ly_car (p));
+         Performer * eng = dynamic_cast<Performer*> (t);
+         if (eng && eng!= info.origin_trans_)
+           eng->acknowledge_audio_element (info);
+       }
     }
-    
-    return r;
 }
 
-Translator*
-Performer_group_performer::get_default_interpreter()
+void
+Performer_group_performer::do_announces ()
 {
-    // ? 
-    if ( is_bottom_performer_b() )
-       return daddy_perf_l_->get_default_interpreter();
-
-    Performer_group_performer *perf_p= itrans_l_->
-       get_default_itrans_l()->get_group_performer_p();
-    add(perf_p );
-    if (perf_p->is_bottom_performer_b())
-       return perf_p;
-    else
-       return perf_p->get_default_interpreter();
-}
+  for (SCM p = trans_group_list_; gh_pair_p (p); p =ly_cdr (p))
+    {
+      Translator * t = unsmob_translator (ly_car (p));
+      dynamic_cast<Performer_group_performer*> (t)->do_announces ();
+    }
 
-bool
-Performer_group_performer::is_bottom_performer_b() const
-{
-    return !itrans_l_->get_default_itrans_l();
-}
+  
+  create_audio_elements ();
+    
+  while (announce_infos_.size ())
+    {
+      acknowledge_audio_elements ();
+      announce_infos_.clear ();
+      create_audio_elements ();
+    }
 
-void
-Performer_group_performer::process_requests()
-{
-    PCursor<Performer*> i( perf_p_list_.top() );
-    while( i.ok() ) {
-       Performer* perf_l = i++; 
-       perf_l->process_requests();
+  if (announce_infos_.size ())
+    {
+#if 0  //printf?  -> include <stdio.h>     
+      printf ("do_announces: elt: %s\n",
+             classname (announce_infos_[0].elem_));
+#endif      
+      announce_infos_.clear ();
     }
 }
 
-bool
-Performer_group_performer::try_request( Request* req_l )
-{
-//    return Performer::try_request( req_l );
-    bool hebbes_b =false;
-    for (int i =0; !hebbes_b && i < nongroup_l_arr_.size() ; i++)
-       hebbes_b =nongroup_l_arr_[i]->try_request(req_l);
-//    if (!hebbes_b)
-    if ( !hebbes_b && daddy_perf_l_ )
-       hebbes_b = daddy_perf_l_->try_request(req_l);
-    return hebbes_b ;
-}
+Performer_group_performer::Performer_group_performer(){}