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