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         Request_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         Request_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         Request_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         Request_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         Request_engraver *grav_l = i++;
  99         grav_l->post_move_processing();
 100     }
 101 }
 102
 103
 104 bool
 105 Engraver_group_engraver::contains_b(Request_engraver* grav_l)const
 106 {
 107     bool parent_b = Request_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 void
 131 Engraver_group_engraver::add(Request_engraver *grav_p)
 132 {
 133     grav_list_.bottom().add(grav_p);
 134     grav_p->daddy_grav_l_ = this;
 135
 136     if (grav_p->is_type_b(Engraver_group_engraver::static_name())) {
 137         group_l_arr_.push((Engraver_group_engraver*)grav_p);
 138     } else {
 139         nongroup_l_arr_ .push(grav_p);
 140     }
 141 }
 142
 143
 144 Request_engraver *
 145 Engraver_group_engraver::remove_engraver_p(Request_engraver*grav_l)
 146 {
 147     group_l_arr_.substitute((Engraver_group_engraver*)grav_l,0);
 148     nongroup_l_arr_.substitute(grav_l,0);
 149     iterator(grav_list_) grav_cur= grav_list_.find(grav_l);
 150
 151     return grav_cur.remove_p();
 152 }
 153
 154 void
 155 Engraver_group_engraver::terminate_engraver(Request_engraver*r_l)
 156 {
 157     mtor << "Removing " << r_l->name() << " at " << get_staff_info().when() << "\n";
 158     r_l->do_removal_processing();
 159     Request_engraver * grav_p =remove_engraver_p(r_l);
 160
 161     delete grav_p;
 162 }
 163
 164 IMPLEMENT_IS_TYPE_B2(Engraver_group_engraver,Request_engraver, Translator);
 165 IMPLEMENT_STATIC_NAME(Engraver_group_engraver);
 166 ADD_THIS_ENGRAVER(Engraver_group_engraver);
 167
 168 void
 169 Engraver_group_engraver::do_print()const
 170 {
 171 #ifndef NPRINT
 172     mtor << "ID: " << id_str_ << "\n";
 173     for (iter_top(grav_list_, i); i.ok(); i++)
 174         i->print();
 175 #endif
 176 }
 177
 178
 179 Engraver_group_engraver*
 180 Engraver_group_engraver::find_engraver_l(String n, String id)
 181 {
 182     if (name() == n && id_str_ == id)
 183         return this;
 184     Engraver_group_engraver * r = 0;
 185     for (int i =0; !r && i<  group_l_arr_.size(); i++) {
 186         r = group_l_arr_[i]->find_engraver_l(n,id);
 187     }
 188
 189     return r;
 190 }
 191
 192 Translator*
 193 Engraver_group_engraver::find_get_translator_l(String n,String id)
 194 {
 195     Translator * ret=0;
 196     Input_engraver * igrav_l= igrav_l_-> recursive_find ( n );
 197     if (igrav_l ) {
 198         ret = find_engraver_l(n,id);
 199         if (!ret) {
 200             Engraver_group_engraver * group =
 201                 igrav_l-> get_group_engraver_p();
 202
 203             add(group);
 204             ret = group;
 205
 206             if (group->igrav_l_->is_name_b( n ) )
 207                 ret ->id_str_ = id;
 208             else
 209                 return ret->find_get_translator_l(n,id);
 210
 211         }
 212     } else if (daddy_grav_l_)
 213         ret =daddy_grav_l_->find_get_translator_l(n,id);
 214     else {
 215         warning("Can't find or create `" + n + "' called `" + id + "'\n");
 216         ret =0;
 217     }
 218     return ret;
 219 }
 220
 221 int
 222 Engraver_group_engraver::depth_i()const
 223 {
 224     return daddy_grav_l_->depth_i()  + 1;
 225 }
 226
 227 Translator*
 228 Engraver_group_engraver::ancestor_l(int l)
 229 {
 230     if (!l || !daddy_grav_l_)
 231         return this;
 232
 233     return daddy_grav_l_->ancestor_l(l-1);
 234 }
 235
 236 void
 237 Engraver_group_engraver::announce_element(Score_elem_info info)
 238 {
 239     announce_info_arr_.push(info);
 240     Request_engraver::announce_element(info);
 241 }
 242
 243 void
 244 Engraver_group_engraver::do_announces()
 245 {
 246     for (int i=0; i < group_l_arr_.size(); i++) {
 247         group_l_arr_[i]->do_announces();
 248     }
 249
 250     Request dummy_req;
 251
 252     for (int j =0; j < announce_info_arr_.size(); j++){
 253        Score_elem_info info = announce_info_arr_[j];
 254
 255        if (!info.req_l_)
 256             info.req_l_ = &dummy_req;
 257        for (int i=0; i < nongroup_l_arr_.size(); i++) {
 258            if (nongroup_l_arr_[i] != info.origin_grav_l_arr_[0])
 259                nongroup_l_arr_[i]->acknowledge_element(info);
 260        }
 261     }
 262     announce_info_arr_.set_size(0);
 263 }
 264
 265
 266 void
 267 Engraver_group_engraver::do_removal_processing()
 268 {
 269     for (iter( grav_list_.top(), i); i.ok(); i++)
 270         i->do_removal_processing();
 271 }
 272
 273 Staff_info
 274 Engraver_group_engraver::get_staff_info()const
 275 {
 276     Staff_info inf = Request_engraver::get_staff_info();
 277
 278     for (int i=0; i < nongroup_l_arr_.size(); i++)
 279         nongroup_l_arr_[i]->fill_staff_info(inf);
 280
 281     return inf;
 282 }
 283
 284 Translator*
 285 Engraver_group_engraver::get_default_interpreter()
 286 {
 287     if ( interpreter_l() )
 288         return daddy_grav_l_->get_default_interpreter();
 289
 290     Engraver_group_engraver *grav_p= igrav_l_->
 291         get_default_igrav_l()->get_group_engraver_p();
 292     add(grav_p );
 293     if (grav_p->interpreter_l())
 294         return grav_p;
 295     else
 296         return grav_p->get_default_interpreter();
 297 }