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         group_l_arr_.push ((Performer_group_performer*)perf_p);
  30     } else {
  31         nongroup_l_arr_ .push (perf_p);
  32     }
  33 }
  34
  35 Translator*
  36 Performer_group_performer::ancestor_l (int l)
  37 {
  38     if (!l || !daddy_perf_l_)
  39         return this;
  40
  41     return daddy_perf_l_->ancestor_l (l - 1);
  42 }
  43
  44 int
  45 Performer_group_performer::depth_i() const
  46 {
  47     return daddy_perf_l_->depth_i() + 1;
  48 }
  49
  50 void
  51 Performer_group_performer::do_creation_processing()
  52 {
  53     for ( PCursor<Performer*> i (perf_p_list_.top()); i.ok (); i++ )
  54         i->creation_processing();
  55 }
  56
  57 void
  58 Performer_group_performer::do_print()const
  59 {
  60 #ifndef NPRINT
  61     if ( !check_debug)
  62         return ;
  63     for ( PCursor<Performer*> i (perf_p_list_.top()); i.ok (); i++ )
  64         i->print();
  65 #endif
  66 }
  67
  68 void
  69 Performer_group_performer::do_removal_processing()
  70 {
  71     for ( PCursor<Performer*> i (perf_p_list_.top()); i.ok (); i++ )
  72         i->do_removal_processing();
  73 }
  74
  75 bool
  76 Performer_group_performer::do_try_request (Request* req_l)
  77 {
  78     bool hebbes_b =false;
  79     for (int i =0; !hebbes_b && i < nongroup_l_arr_.size() ; i++)
  80         hebbes_b =nongroup_l_arr_[i]->try_request (req_l);
  81     if ( !hebbes_b && daddy_perf_l_)
  82         hebbes_b = daddy_perf_l_->try_request (req_l);
  83     return hebbes_b ;
  84 }
  85
  86 Translator*
  87 Performer_group_performer::find_get_translator_l (String n,String id)
  88 {
  89     Translator * ret=0;
  90     Input_translator* itrans_l= itrans_l_-> recursive_find ( n);
  91     if (itrans_l) {
  92         ret = find_performer_l (n,id);
  93         if (!ret) {
  94             Performer_group_performer * group =
  95                 itrans_l-> get_group_performer_p();
  96
  97             add (group);
  98             ret = group;
  99
 100             if (group->itrans_l_->is_name_b (n) )
 101                 ret ->id_str_ = id;
 102             else
 103                 return ret->find_get_translator_l (n,id);
 104
 105         }
 106     } else if (daddy_perf_l_)
 107         ret =daddy_perf_l_->find_get_translator_l (n,id);
 108     else {
 109         warning ("Can't find or create `" + n + "' called `" + id + "'\n");
 110         ret =0;
 111     }
 112     return ret;
 113 }
 114
 115 Performer_group_performer*
 116 Performer_group_performer::find_performer_l (String n, String id)
 117 {
 118     if (name() == n && id_str_ == id)
 119         return this;
 120     Performer_group_performer * r = 0;
 121     for (int i =0; !r && i<  group_l_arr_.size(); i++) {
 122         r = group_l_arr_[i]->find_performer_l (n,id);
 123     }
 124
 125     return r;
 126 }
 127
 128 Translator*
 129 Performer_group_performer::get_default_interpreter()
 130 {
 131     // ?
 132     if ( is_bottom_performer_b())
 133         return daddy_perf_l_->get_default_interpreter();
 134
 135     Performer_group_performer *perf_p= itrans_l_->
 136         get_default_itrans_l()->get_group_performer_p ();
 137     add (perf_p);
 138     if (perf_p->is_bottom_performer_b())
 139         return perf_p;
 140     else
 141         return perf_p->get_default_interpreter();
 142 }
 143
 144 bool
 145 Performer_group_performer::is_bottom_performer_b() const
 146 {
 147     return !itrans_l_->get_default_itrans_l();
 148 }
 149
 150 void
 151 Performer_group_performer::print() const
 152 {
 153     Performer::print();
 154 }
 155
 156 void
 157 Performer_group_performer::process_requests()
 158 {
 159     for ( PCursor<Performer*> i (perf_p_list_.top()); i.ok (); i++ )
 160         i->process_requests();
 161 }
 162
 163 bool
 164 Performer_group_performer::try_request (Request* r)
 165 {
 166     return Performer::try_request (r);
 167 }