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