lily/slur-grav.cc

   1 /*
   2   slur-reg.cc -- implement Slur_engraver
   3
   4   (c) 1997 Han-Wen Nienhuys <hanwen@stack.nl>
   5 */
   6
   7 #include "proto.hh"
   8 #include "plist.hh"
   9 #include "musical-request.hh"
  10 #include "slur-grav.hh"
  11 #include "slur.hh"
  12 #include "debug.hh"
  13 #include "note-column.hh"
  14
  15 bool
  16 Slur_engraver::do_try_request (Request *req_l)
  17 {
  18   Musical_req *mus_l = req_l->musical();
  19   if (!mus_l || !mus_l->slur())
  20     return false;
  21
  22   new_slur_req_l_arr_.push (mus_l->slur());
  23   return true;
  24 }
  25
  26 void
  27 Slur_engraver::acknowledge_element (Score_elem_info info)
  28 {
  29   if (info.elem_l_->name() == Note_column::static_name ())
  30     {
  31       Note_column *col_l =(Note_column*) info.elem_l_->item() ;// ugh
  32       for (int i = 0; i < slur_l_stack_.size(); i++)
  33         slur_l_stack_[i]->add (col_l);
  34       for (int i = 0; i < end_slur_l_arr_.size(); i++)
  35         end_slur_l_arr_[i]->add (col_l);
  36     }
  37 }
  38
  39 /*
  40   abracadabra
  41   */
  42 Slur_engraver::Slur_engraver()
  43 {
  44   dir_ =CENTER;
  45 }
  46 void
  47 Slur_engraver::do_process_requests()
  48 {
  49   Array<Slur*> start_slur_l_arr_;
  50   for (int i=0; i< new_slur_req_l_arr_.size(); i++)
  51     {
  52       Slur_req* slur_req_l = new_slur_req_l_arr_[i];
  53       // end slur: move the slur to other array
  54       if (slur_req_l->spantype == Span_req::STOP)
  55         {
  56           if (slur_l_stack_.empty())
  57
  58             slur_req_l->warning ("can't find slur to end");
  59           else
  60             {
  61               end_slur_l_arr_.push (slur_l_stack_.pop());
  62               requests_arr_.pop();
  63             }
  64         }
  65       else  if (slur_req_l->spantype == Span_req::START)
  66         {
  67           // push a new slur onto stack.
  68           //(use temp. array to wait for all slur STOPs)
  69           Slur * s_p =new Slur;
  70           requests_arr_.push (slur_req_l);
  71           start_slur_l_arr_.push (s_p);
  72           announce_element (Score_elem_info (s_p, slur_req_l));
  73         }
  74     }
  75   for (int i=0; i < start_slur_l_arr_.size(); i++)
  76     slur_l_stack_.push (start_slur_l_arr_[i]);
  77 }
  78
  79 void
  80 Slur_engraver::do_pre_move_processing()
  81 {
  82   dir_ = (Direction) int(get_property ("ydirection"));
  83   for (int i = 0; i < end_slur_l_arr_.size(); i++)
  84     {
  85       if (dir_)
  86         end_slur_l_arr_[i]->dir_ = dir_;
  87       typeset_element (end_slur_l_arr_[i]);
  88     }
  89   end_slur_l_arr_.clear();
  90 }
  91
  92 void
  93 Slur_engraver::do_post_move_processing()
  94 {
  95   new_slur_req_l_arr_.clear();
  96 }
  97 Slur_engraver::~Slur_engraver()
  98 {
  99   for (int i=0; i < requests_arr_.size(); i++)
 100     {
 101       requests_arr_[i]->warning ("unterminated slur");
 102     }
 103 }
 104
 105 IMPLEMENT_IS_TYPE_B1(Slur_engraver,Engraver);
 106 ADD_THIS_TRANSLATOR(Slur_engraver);