lily/engraver-group.cc

   1 /*
   2   engravergroup.cc -- implement Engraver_group_engraver
   3
   4   source file of the GNU LilyPond music typesetter
   5
   6   (c) 1997 Han-Wen Nienhuys <hanwen@stack.nl>
   7 */
   8
   9 #include "proto.hh"
  10 #include "plist.hh"
  11 #include "engraver-group.hh"
  12 #include "engraver.hh"
  13 #include "debug.hh"
  14 #include "p-score.hh"
  15 #include "score-elem.hh"
  16 #include "input-translator.hh"
  17
  18 Engraver* get_engraver_p(String);
  19
  20 Engraver_group_engraver::~Engraver_group_engraver()
  21 {
  22     assert(removable_b());
  23 }
  24
  25 void
  26 Engraver_group_engraver::check_removal()
  27 {
  28     for (int i =0; i < group_l_arr_.size(); ) {
  29         group_l_arr_[i]->check_removal();
  30         if (group_l_arr_[i]->removable_b())
  31             terminate_engraver(group_l_arr_[i]);
  32         else
  33             i++;
  34     }
  35 }
  36
  37 bool
  38 Engraver_group_engraver::removable_b()const
  39 {
  40     return !iterator_count_&& !group_l_arr_.size() ;
  41 }
  42
  43 Engraver_group_engraver::Engraver_group_engraver()
  44 {
  45     itrans_l_ = 0;
  46 }
  47
  48 void
  49 Engraver_group_engraver::set_feature(Feature d)
  50 {
  51     PCursor<Engraver*> i(grav_list_.top());
  52     // why the while construct?
  53     while (i.ok()) {
  54         // this construction to ensure clean deletion
  55         Engraver *grav_l = i++;
  56         grav_l->set_feature(d);
  57     }
  58 }
  59
  60 void
  61 Engraver_group_engraver::sync_features()
  62 {
  63     PCursor<Engraver*> i(grav_list_.top());
  64     while (i.ok()) {
  65         Engraver *grav_l = i++;
  66         grav_l->sync_features();
  67     }
  68 }
  69
  70 void
  71 Engraver_group_engraver::do_pre_move_processing()
  72 {
  73     PCursor<Engraver*> i(grav_list_.top());
  74     while (i.ok()) {
  75         Engraver *grav_l = i++;
  76         grav_l->pre_move_processing();
  77     }
  78 }
  79
  80 void
  81 Engraver_group_engraver::do_process_requests()
  82 {
  83     PCursor<Engraver*> i(grav_list_.top());
  84     while (i.ok()) {
  85         Engraver *grav_l = i++;
  86         grav_l->process_requests();
  87     }
  88 }
  89
  90
  91 void
  92 Engraver_group_engraver::do_post_move_processing()
  93 {
  94     PCursor<Engraver*> i(grav_list_.top());
  95     while (i.ok()) {
  96                 // this construction to ensure clean deletion
  97         Engraver *grav_l = i++;
  98         grav_l->post_move_processing();
  99     }
 100 }
 101
 102
 103 bool
 104 Engraver_group_engraver::contains_b(Engraver* grav_l)const
 105 {
 106     bool parent_b = Engraver::contains_b(grav_l);
 107
 108     if (parent_b)
 109         return true;
 110     for (PCursor<Engraver*> i(grav_list_.top()); i.ok(); i++)
 111         if (i->contains_b(grav_l))
 112             return true;
 113     return false;
 114 }
 115
 116
 117
 118 bool
 119 Engraver_group_engraver::do_try_request(Request*req_l)
 120 {
 121     bool hebbes_b =false;
 122     for (int i =0; !hebbes_b && i < nongroup_l_arr_.size() ; i++)
 123         hebbes_b =nongroup_l_arr_[i]->try_request(req_l);
 124     if (!hebbes_b && daddy_grav_l_)
 125         hebbes_b = daddy_grav_l_->try_request(req_l);
 126     return hebbes_b ;
 127 }
 128
 129 bool
 130 Engraver_group_engraver::try_request(Request* r)
 131 {
 132     return Engraver::try_request(r);
 133 }
 134
 135 void
 136 Engraver_group_engraver::add(Engraver *grav_p)
 137 {
 138     grav_list_.bottom().add(grav_p);
 139     grav_p->daddy_grav_l_ = this;
 140
 141     if (grav_p->is_type_b(Engraver_group_engraver::static_name())) {
 142         group_l_arr_.push((Engraver_group_engraver*)grav_p);
 143     } else {
 144         nongroup_l_arr_ .push(grav_p);
 145     }
 146 }
 147
 148
 149 Engraver *
 150 Engraver_group_engraver::remove_engraver_p(Engraver*grav_l)
 151 {
 152     group_l_arr_.substitute((Engraver_group_engraver*)grav_l,0);
 153     nongroup_l_arr_.substitute(grav_l,0);
 154     PCursor<Engraver*> grav_cur( grav_list_.find(grav_l) );
 155
 156     return grav_cur.remove_p();
 157 }
 158
 159 void
 160 Engraver_group_engraver::terminate_engraver(Engraver*r_l)
 161 {
 162     mtor << "Removing " << r_l->name() << " at " << get_staff_info().when() << "\n";
 163     r_l->do_removal_processing();
 164     Engraver * grav_p =remove_engraver_p(r_l);
 165
 166     delete grav_p;
 167 }
 168
 169 IMPLEMENT_IS_TYPE_B2(Engraver_group_engraver,Engraver, Translator);
 170
 171 ADD_THIS_ENGRAVER(Engraver_group_engraver);
 172
 173 void
 174 Engraver_group_engraver::do_print()const
 175 {
 176 #ifndef NPRINT
 177     mtor << "ID: " << id_str_ << "\n";
 178     for (PCursor<Engraver*> i(grav_list_.top()); i.ok(); i++)
 179         i->print();
 180 #endif
 181 }
 182
 183
 184 Engraver_group_engraver*
 185 Engraver_group_engraver::find_engraver_l(String n, String id)
 186 {
 187     if (name() == n && id_str_ == id)
 188         return this;
 189     Engraver_group_engraver * r = 0;
 190     for (int i =0; !r && i<  group_l_arr_.size(); i++) {
 191         r = group_l_arr_[i]->find_engraver_l(n,id);
 192     }
 193
 194     return r;
 195 }
 196
 197 Translator*
 198 Engraver_group_engraver::find_get_translator_l(String n,String id)
 199 {
 200     Translator * ret=0;
 201     Input_translator * itrans_l= itrans_l_-> recursive_find ( n );
 202     if (itrans_l ) {
 203         ret = find_engraver_l(n,id);
 204         if (!ret) {
 205             Engraver_group_engraver * group =
 206                 itrans_l-> get_group_engraver_p();
 207
 208             add(group);
 209             ret = group;
 210
 211             if (group->itrans_l_->is_name_b( n ) )
 212                 ret ->id_str_ = id;
 213             else
 214                 return ret->find_get_translator_l(n,id);
 215
 216         }
 217     } else if (daddy_grav_l_)
 218         ret =daddy_grav_l_->find_get_translator_l(n,id);
 219     else {
 220         warning("Can't find or create `" + n + "' called `" + id + "'\n");
 221         ret =0;
 222     }
 223     return ret;
 224 }
 225
 226 int
 227 Engraver_group_engraver::depth_i()const
 228 {
 229     return daddy_grav_l_->depth_i()  + 1;
 230 }
 231
 232 Translator*
 233 Engraver_group_engraver::ancestor_l(int l)
 234 {
 235     if (!l || !daddy_grav_l_)
 236         return this;
 237
 238     return daddy_grav_l_->ancestor_l(l-1);
 239 }
 240
 241 void
 242 Engraver_group_engraver::announce_element(Score_elem_info info)
 243 {
 244     announce_info_arr_.push(info);
 245     Engraver::announce_element(info);
 246 }
 247
 248 void
 249 Engraver_group_engraver::do_announces()
 250 {
 251     for (int i=0; i < group_l_arr_.size(); i++) {
 252         group_l_arr_[i]->do_announces();
 253     }
 254
 255     Request dummy_req;
 256
 257     for (int j =0; j < announce_info_arr_.size(); j++){
 258        Score_elem_info info = announce_info_arr_[j];
 259
 260        if (!info.req_l_)
 261             info.req_l_ = &dummy_req;
 262        for (int i=0; i < nongroup_l_arr_.size(); i++) { // Is this good enough?6
 263            if (nongroup_l_arr_[i] != info.origin_grav_l_arr_[0])
 264                nongroup_l_arr_[i]->acknowledge_element(info);
 265        }
 266     }
 267     announce_info_arr_.set_size(0);
 268 }
 269
 270
 271 void
 272 Engraver_group_engraver::do_removal_processing()
 273 {
 274     for (PCursor<Engraver*> i(grav_list_.top()); i.ok(); i++)
 275         i->do_removal_processing();
 276 }
 277
 278 Staff_info
 279 Engraver_group_engraver::get_staff_info()const
 280 {
 281     Staff_info inf = Engraver::get_staff_info();
 282
 283     for (int i=0; i < nongroup_l_arr_.size(); i++)
 284         nongroup_l_arr_[i]->fill_staff_info(inf);
 285
 286     return inf;
 287 }
 288
 289 Translator*
 290 Engraver_group_engraver::get_default_interpreter()
 291 {
 292     // ?
 293     if ( is_bottom_engraver_b() )
 294         return daddy_grav_l_->get_default_interpreter();
 295
 296     Engraver_group_engraver *grav_p= itrans_l_->
 297         get_default_itrans_l()->get_group_engraver_p();
 298     add(grav_p );
 299     if (grav_p->is_bottom_engraver_b())
 300         return grav_p;
 301     else
 302         return grav_p->get_default_interpreter();
 303 }
 304
 305 bool
 306 Engraver_group_engraver::is_bottom_engraver_b()const
 307 {
 308     return !itrans_l_->get_default_itrans_l();
 309 }