lily/performer-group-performer.cc

   1 /*
   2   performer-group-performer.cc -- implement Performer_group_performer
   3
   4   source file of the GNU LilyPond music typesetter
   5
   6   (c) 1996, 1997 Han-Wen Nienhuys <hanwen@stack.nl>
   7                Jan Nieuwenhuizen <jan@digicash.com>
   8  */
   9
  10 #include "performer-group-performer.hh"
  11 #include "input-translator.hh"
  12 #include "debug.hh"
  13
  14 IMPLEMENT_IS_TYPE_B2(Performer_group_performer,Performer, Translator);
  15 ADD_THIS_PERFORMER(Performer_group_performer);
  16
  17 Performer_group_performer::~Performer_group_performer()
  18 {
  19
  20 }
  21
  22 void
  23 Performer_group_performer::add (Performer *perf_p)
  24 {
  25   perf_p_list_.bottom().add (perf_p);
  26   perf_p->daddy_perf_l_ = this;
  27
  28   if (perf_p->is_type_b (Performer_group_performer::static_name()))
  29     {
  30         group_l_arr_.push ((Performer_group_performer*)perf_p);
  31     }
  32   else
  33     {
  34         nongroup_l_arr_ .push (perf_p);
  35     }
  36 }
  37
  38 Translator*
  39 Performer_group_performer::ancestor_l (int l)
  40 {
  41   if (!l || !daddy_perf_l_)
  42         return this;
  43
  44   return daddy_perf_l_->ancestor_l (l - 1);
  45 }
  46
  47 int
  48 Performer_group_performer::depth_i() const
  49 {
  50   return daddy_perf_l_->depth_i() + 1;
  51 }
  52
  53 void
  54 Performer_group_performer::do_creation_processing()
  55 {
  56   for ( PCursor<Performer*> i (perf_p_list_.top()); i.ok (); i++ )
  57         i->creation_processing();
  58 }
  59
  60 void
  61 Performer_group_performer::do_print()const
  62 {
  63 #ifndef NPRINT
  64   if ( !check_debug)
  65         return ;
  66   for ( PCursor<Performer*> i (perf_p_list_.top()); i.ok (); i++ )
  67         i->print();
  68 #endif
  69 }
  70
  71 void
  72 Performer_group_performer::do_removal_processing()
  73 {
  74   for ( PCursor<Performer*> i (perf_p_list_.top()); i.ok (); i++ )
  75         i->do_removal_processing();
  76 }
  77
  78 bool
  79 Performer_group_performer::do_try_request (Request* req_l)
  80 {
  81   bool hebbes_b =false;
  82   for (int i =0; !hebbes_b && i < nongroup_l_arr_.size() ; i++)
  83         hebbes_b =nongroup_l_arr_[i]->try_request (req_l);
  84   if ( !hebbes_b && daddy_perf_l_)
  85         hebbes_b = daddy_perf_l_->try_request (req_l);
  86   return hebbes_b ;
  87 }
  88
  89 Translator*
  90 Performer_group_performer::find_get_translator_l (String n,String id)
  91 {
  92   Translator * ret=0;
  93   Input_translator* itrans_l= itrans_l_-> recursive_find ( n);
  94   if (itrans_l)
  95     {
  96         ret = find_performer_l (n,id);
  97         if (!ret)
  98           {
  99             Performer_group_performer * group =
 100                 itrans_l-> get_group_performer_p();
 101
 102             add (group);
 103             ret = group;
 104
 105             if (group->itrans_l_->is_name_b (n) )
 106                 ret ->id_str_ = id;
 107             else
 108                 return ret->find_get_translator_l (n,id);
 109
 110           }
 111     }
 112   else if (daddy_perf_l_)
 113         ret =daddy_perf_l_->find_get_translator_l (n,id);
 114   else
 115     {
 116         warning ("Can't find or create `" + n + "' called `" + id + "'\n");
 117         ret =0;
 118     }
 119   return ret;
 120 }
 121
 122 Performer_group_performer*
 123 Performer_group_performer::find_performer_l (String n, String id)
 124 {
 125   if (name() == n && id_str_ == id)
 126         return this;
 127   Performer_group_performer * r = 0;
 128   for (int i =0; !r && i<  group_l_arr_.size(); i++)
 129     {
 130         r = group_l_arr_[i]->find_performer_l (n,id);
 131     }
 132
 133   return r;
 134 }
 135
 136 Translator*
 137 Performer_group_performer::get_default_interpreter()
 138 {
 139   // ?
 140   if ( is_bottom_performer_b())
 141         return daddy_perf_l_->get_default_interpreter();
 142
 143   Performer_group_performer *perf_p= itrans_l_->
 144         get_default_itrans_l()->get_group_performer_p ();
 145   add (perf_p);
 146   if (perf_p->is_bottom_performer_b())
 147         return perf_p;
 148   else
 149         return perf_p->get_default_interpreter();
 150 }
 151
 152 bool
 153 Performer_group_performer::is_bottom_performer_b() const
 154 {
 155   return !itrans_l_->get_default_itrans_l();
 156 }
 157
 158 void
 159 Performer_group_performer::print() const
 160 {
 161   Performer::print();
 162 }
 163
 164 void
 165 Performer_group_performer::process_requests()
 166 {
 167   for ( PCursor<Performer*> i (perf_p_list_.top()); i.ok (); i++ )
 168         i->process_requests();
 169 }
 170
 171 bool
 172 Performer_group_performer::try_request (Request* r)
 173 {
 174   return Performer::try_request (r);
 175 }