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     if ( !check_debug)
 178         return ;
 179     mtor << "ID: " << id_str_ << "\n";
 180     for (PCursor<Engraver*> i(grav_list_.top()); i.ok(); i++)
 181         i->print();
 182 #endif
 183 }
 184
 185
 186 Engraver_group_engraver*
 187 Engraver_group_engraver::find_engraver_l(String n, String id)
 188 {
 189     if (name() == n && id_str_ == id)
 190         return this;
 191     Engraver_group_engraver * r = 0;
 192     for (int i =0; !r && i<  group_l_arr_.size(); i++) {
 193         r = group_l_arr_[i]->find_engraver_l(n,id);
 194     }
 195
 196     return r;
 197 }
 198
 199 Translator*
 200 Engraver_group_engraver::find_get_translator_l(String n,String id)
 201 {
 202     Translator * ret=0;
 203     Input_translator * itrans_l= itrans_l_-> recursive_find ( n );
 204     if (itrans_l ) {
 205         ret = find_engraver_l(n,id);
 206         if (!ret) {
 207             Engraver_group_engraver * group =
 208                 itrans_l-> get_group_engraver_p();
 209
 210             add(group);
 211             ret = group;
 212
 213             if (group->itrans_l_->is_name_b( n ) )
 214                 ret ->id_str_ = id;
 215             else
 216                 return ret->find_get_translator_l(n,id);
 217
 218         }
 219     } else if (daddy_grav_l_)
 220         ret =daddy_grav_l_->find_get_translator_l(n,id);
 221     else {
 222         warning("Can't find or create `" + n + "' called `" + id + "'\n");
 223         ret =0;
 224     }
 225     return ret;
 226 }
 227
 228 int
 229 Engraver_group_engraver::depth_i()const
 230 {
 231     return daddy_grav_l_->depth_i()  + 1;
 232 }
 233
 234 Translator*
 235 Engraver_group_engraver::ancestor_l(int l)
 236 {
 237     if (!l || !daddy_grav_l_)
 238         return this;
 239
 240     return daddy_grav_l_->ancestor_l(l-1);
 241 }
 242
 243 void
 244 Engraver_group_engraver::announce_element(Score_elem_info info)
 245 {
 246     announce_info_arr_.push(info);
 247     Engraver::announce_element(info);
 248 }
 249
 250 void
 251 Engraver_group_engraver::do_announces()
 252 {
 253     for (int i=0; i < group_l_arr_.size(); i++) {
 254         group_l_arr_[i]->do_announces();
 255     }
 256
 257     Request dummy_req;
 258
 259     for (int j =0; j < announce_info_arr_.size(); j++){
 260        Score_elem_info info = announce_info_arr_[j];
 261
 262        if (!info.req_l_)
 263             info.req_l_ = &dummy_req;
 264        for (int i=0; i < nongroup_l_arr_.size(); i++) { // Is this good enough?6
 265            if (nongroup_l_arr_[i] != info.origin_grav_l_arr_[0])
 266                nongroup_l_arr_[i]->acknowledge_element(info);
 267        }
 268     }
 269     announce_info_arr_.set_size(0);
 270 }
 271
 272
 273 void
 274 Engraver_group_engraver::do_removal_processing()
 275 {
 276     for (PCursor<Engraver*> i(grav_list_.top()); i.ok(); i++)
 277         i->do_removal_processing();
 278 }
 279
 280 Staff_info
 281 Engraver_group_engraver::get_staff_info()const
 282 {
 283     Staff_info inf = Engraver::get_staff_info();
 284
 285     for (int i=0; i < nongroup_l_arr_.size(); i++)
 286         nongroup_l_arr_[i]->fill_staff_info(inf);
 287
 288     return inf;
 289 }
 290
 291 Translator*
 292 Engraver_group_engraver::get_default_interpreter()
 293 {
 294     // ?
 295     if ( is_bottom_engraver_b() )
 296         return daddy_grav_l_->get_default_interpreter();
 297
 298     Engraver_group_engraver *grav_p= itrans_l_->
 299         get_default_itrans_l()->get_group_engraver_p();
 300     add(grav_p );
 301     if (grav_p->is_bottom_engraver_b())
 302         return grav_p;
 303     else
 304         return grav_p->get_default_interpreter();
 305 }
 306
 307 bool
 308 Engraver_group_engraver::is_bottom_engraver_b()const
 309 {
 310     return !itrans_l_->get_default_itrans_l();
 311 }