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 Engraver* get_engraver_p(String);
  18
  19 Engraver_group_engraver::~Engraver_group_engraver()
  20 {
  21     assert(removable_b());
  22 }
  23
  24 void
  25 Engraver_group_engraver::check_removal()
  26 {
  27     for (int i =0; i < group_l_arr_.size(); ) {
  28         group_l_arr_[i]->check_removal();
  29         if (group_l_arr_[i]->removable_b())
  30             terminate_engraver(group_l_arr_[i]);
  31         else
  32             i++;
  33     }
  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     iter_top(grav_list_, i);
  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     iter_top(grav_list_, i);
  63     while (i.ok()) {
  64
  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     iter_top(grav_list_, i);
  74     while (i.ok()) {
  75
  76         Engraver *grav_l = i++;
  77         grav_l->pre_move_processing();
  78     }
  79 }
  80
  81 void
  82 Engraver_group_engraver::do_process_requests()
  83 {
  84     iter_top(grav_list_, i);
  85     while (i.ok()) {
  86
  87         Engraver *grav_l = i++;
  88         grav_l->process_requests();
  89     }
  90 }
  91
  92
  93 void
  94 Engraver_group_engraver::do_post_move_processing()
  95 {
  96     iter_top(grav_list_, i);
  97     while (i.ok()) {
  98                 // this construction to ensure clean deletion
  99         Engraver *grav_l = i++;
 100         grav_l->post_move_processing();
 101     }
 102 }
 103
 104
 105 bool
 106 Engraver_group_engraver::contains_b(Engraver* grav_l)const
 107 {
 108     bool parent_b = Engraver::contains_b(grav_l);
 109
 110     if (parent_b)
 111         return true;
 112     for (iter_top(grav_list_, j); j.ok(); j++)
 113         if (j->contains_b(grav_l))
 114             return true;
 115     return false;
 116 }
 117
 118
 119
 120 bool
 121 Engraver_group_engraver::do_try_request(Request*req_l)
 122 {
 123     bool hebbes_b =false;
 124     for (int i =0; !hebbes_b && i < nongroup_l_arr_.size() ; i++)
 125         hebbes_b =nongroup_l_arr_[i]->try_request(req_l);
 126     if (!hebbes_b)
 127         hebbes_b = daddy_grav_l_->try_request(req_l);
 128     return hebbes_b ;
 129 }
 130
 131 bool
 132 Engraver_group_engraver::try_request(Request* r)
 133 {
 134     return Engraver::try_request(r);
 135 }
 136
 137 void
 138 Engraver_group_engraver::add(Engraver *grav_p)
 139 {
 140     grav_list_.bottom().add(grav_p);
 141     grav_p->daddy_grav_l_ = this;
 142
 143     if (grav_p->is_type_b(Engraver_group_engraver::static_name())) {
 144         group_l_arr_.push((Engraver_group_engraver*)grav_p);
 145     } else {
 146         nongroup_l_arr_ .push(grav_p);
 147     }
 148 }
 149
 150
 151 Engraver *
 152 Engraver_group_engraver::remove_engraver_p(Engraver*grav_l)
 153 {
 154     group_l_arr_.substitute((Engraver_group_engraver*)grav_l,0);
 155     nongroup_l_arr_.substitute(grav_l,0);
 156     iterator(grav_list_) grav_cur= grav_list_.find(grav_l);
 157
 158     return grav_cur.remove_p();
 159 }
 160
 161 void
 162 Engraver_group_engraver::terminate_engraver(Engraver*r_l)
 163 {
 164     mtor << "Removing " << r_l->name() << " at " << get_staff_info().when() << "\n";
 165     r_l->do_removal_processing();
 166     Engraver * grav_p =remove_engraver_p(r_l);
 167
 168     delete grav_p;
 169 }
 170
 171 IMPLEMENT_IS_TYPE_B2(Engraver_group_engraver,Engraver, Translator);
 172 IMPLEMENT_STATIC_NAME(Engraver_group_engraver);
 173 ADD_THIS_ENGRAVER(Engraver_group_engraver);
 174
 175 void
 176 Engraver_group_engraver::do_print()const
 177 {
 178 #ifndef NPRINT
 179     mtor << "ID: " << id_str_ << "\n";
 180     for (iter_top(grav_list_, i); 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 (iter( grav_list_.top(), i); 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 }