]> git.donarmstrong.com Git - lilypond.git/blob - lily/script-column-engraver.cc
release: 1.1.67
[lilypond.git] / lily / script-column-engraver.cc
1 /*   
2   g-script-column-engraver.cc --  implement Script_column_engraver
3   
4   source file of the GNU LilyPond music typesetter
5   
6   (c) 1999 Han-Wen Nienhuys <hanwen@cs.uu.nl>
7   
8  */
9
10 #include "engraver.hh"
11 #include "script-column.hh"
12 #include "staff-side.hh"
13 #include "dimension-cache.hh"
14
15 /**
16    Find potentially colliding scripts, and put them in a
17    Script_column, that will fix the collisions.  */
18 class Script_column_engraver : public Engraver
19 {
20   Script_column *scol_p_;
21   Link_array<Item> script_l_arr_;
22   Link_array<Staff_side_item> staff_side_l_arr_;  
23 public:
24   Script_column_engraver ();
25   VIRTUAL_COPY_CONS(Translator);
26 protected:
27   virtual void acknowledge_element (Score_element_info);
28   virtual void process_acknowledged ();
29   virtual void  do_pre_move_processing ();
30   virtual void  do_post_move_processing ();
31 };
32
33
34 Script_column_engraver::Script_column_engraver()
35 {
36   scol_p_ =0;
37 }
38
39 void
40 Script_column_engraver::do_pre_move_processing ()
41 {
42   if (scol_p_)
43     {
44       typeset_element (scol_p_);
45       scol_p_ =0;
46     }
47 }
48
49 void
50 Script_column_engraver::do_post_move_processing ()
51 {
52   script_l_arr_.clear ();
53   staff_side_l_arr_.clear ();
54 }
55
56 void
57 Script_column_engraver::acknowledge_element( Score_element_info inf) 
58 {
59   Item *thing =  dynamic_cast<Item*>(inf.elem_l_);
60   if (!thing)
61     return;
62   
63   Dimension_cache * parcache = thing->dim_cache_[Y_AXIS]->parent_l_;
64   if (!parcache || !thing)
65     return ;
66   
67   Graphical_element *parent = parcache->element_l ();
68
69   if (Staff_side_item * ss = dynamic_cast<Staff_side_item*>(parent))
70     {
71       if (!ss->breakable_b ())
72         {
73           script_l_arr_.push (thing);
74         }
75     }
76 }
77
78 void
79 Script_column_engraver::process_acknowledged ()
80 {
81   if (!scol_p_ && script_l_arr_.size () > 1)
82     {
83       scol_p_ = new Script_column;
84       announce_element (Score_element_info (scol_p_, 0));
85     }
86
87   if (scol_p_)
88     {
89       for (int i=0; i < script_l_arr_.size (); i++)
90         scol_p_->add_staff_sided (script_l_arr_[i]);
91       script_l_arr_.clear ();
92     }
93 }
94 ADD_THIS_TRANSLATOR(Script_column_engraver);