]> git.donarmstrong.com Git - lilypond.git/blob - lily/multi-measure-rest.cc
0ab27b60f59763b90f93e7101449d09285282cd1
[lilypond.git] / lily / multi-measure-rest.cc
1 /*   
2   multi-measure-rest.cc --  implement Multi_measure_rest
3   
4   source file of the GNU LilyPond music typesetter
5   
6   (c) 1998--1999 Jan Nieuwenhuizen <janneke@gnu.org>
7   
8  */
9
10 #include "multi-measure-rest.hh"
11 #include "debug.hh"
12 #include "paper-def.hh"
13 #include "paper-column.hh" // urg
14 #include "bar.hh"
15 #include "lookup.hh"
16 #include "rest.hh"
17 #include "molecule.hh"
18 #include "misc.hh"
19 #include "group-interface.hh"
20 #include "stem.hh"
21 #include "staff-symbol-referencer.hh"
22
23 Multi_measure_rest::Multi_measure_rest ()
24 {
25   measures_i_ = 0;
26   set_elt_property ("columns", SCM_EOL);
27 }
28
29
30
31
32
33 /*
34    [TODO]                                          17
35  * variable-sized multi-measure rest symbol: |====| ??
36  
37  * build 3, 5, 6, 7, 8 symbols (how far, property?)
38        from whole, brevis and longa rests
39
40 */
41 Molecule*
42 Multi_measure_rest::do_brew_molecule_p () const
43 {
44   Interval sp_iv;
45   Direction d = LEFT;
46   do
47     {
48       Item * col = spanned_drul_[d]->column_l ();
49
50       Interval coldim = col->extent (X_AXIS)
51         + col->relative_coordinate (0, X_AXIS);
52
53       sp_iv[d] = coldim[-d]  ;
54     }
55   while ((flip (&d)) != LEFT);
56   Molecule *mol_p  = new Molecule;
57   Real x_off = 0.0;
58
59   Real rx  = spanned_drul_[LEFT]->relative_coordinate (0, X_AXIS);
60   /*
61     we gotta stay clear of sp_iv, so move a bit to the right if
62     needed.
63    */
64   x_off += (sp_iv[LEFT] -  rx) >? 0;
65
66   /*
67     center between stuff.
68    */
69   x_off += sp_iv.length ()/ 2;
70
71   
72   Molecule s;
73   bool rest_symbol=true;
74   SCM alt_symbol_sym =get_elt_property ("alt-symbol");
75   if (gh_string_p (alt_symbol_sym))
76     {
77       s = lookup_l () -> afm_find (ly_scm2string (alt_symbol_sym));
78       rest_symbol = false;
79     }
80   else if (measures_i_ == 1 || measures_i_ == 2 || measures_i_ == 4) 
81     {
82       s = lookup_l ()->afm_find ("rests-" + to_str (- intlog2(measures_i_)));
83       s.translate_axis (-s.extent ()[X_AXIS].length () / 2, X_AXIS);
84     }
85   else 
86     {
87       String idx =  ("rests-") + to_str (-4);
88       s = lookup_l ()->afm_find (idx);
89     }
90   
91   mol_p->add_molecule (s);
92   Real interline_f
93     = staff_symbol_referencer_interface (this).staff_space ();
94   if (measures_i_ == 1 && rest_symbol)
95     {
96       mol_p->translate_axis (interline_f, Y_AXIS);
97     }
98   else if (measures_i_ > 1)
99     {
100       Molecule s (lookup_l ()->text ("number", to_str (measures_i_), paper_l ()));
101       s.align_to (X_AXIS, CENTER);
102       s.translate_axis (3.0 * interline_f, Y_AXIS);
103       mol_p->add_molecule (s);
104     }
105   mol_p->translate_axis (x_off, X_AXIS);
106   return mol_p;
107 }
108
109 /*
110   UGH. JUNKME elt prop "columns" isn't really needed. 
111  */
112
113 void
114 Multi_measure_rest::do_add_processing ()
115 {
116   if (gh_pair_p (get_elt_property ("columns")))
117     {
118       Link_array<Item> column_arr (Group_interface__extract_elements (this, (Item*)0, "columns"));
119                                     
120       set_bounds (LEFT, column_arr[0 >? column_arr.size () - 2]);
121       set_bounds (RIGHT, column_arr.top ());
122     }
123 }
124   
125 void
126 Multi_measure_rest::do_post_processing ()
127 {
128   if (!gh_pair_p (get_elt_property ("columns")))
129     set_elt_property ("transparent", SCM_BOOL_T);
130 }
131
132
133  
134 void
135 Multi_measure_rest::add_column (Item* c)
136 {
137   Group_interface gi (this, "columns");
138   gi.add_element (c);
139
140   
141   add_dependency (c);
142 }
143
144
145 Array<Rod>
146 Multi_measure_rest::get_rods () const
147 {
148   Array<Rod> a;
149
150   if (!(spanned_drul_[LEFT] && spanned_drul_[RIGHT]))
151     {
152       programming_error ("Multi_measure_rest::get_rods (): I am not spanned!");
153       return a;
154     }
155
156   Item * l = spanned_drul_[LEFT]->column_l ();
157   Item * r = spanned_drul_[RIGHT]->column_l ();
158   Item * lb = l->find_broken_piece (RIGHT);
159   Item * rb = r->find_broken_piece (LEFT);      
160   
161   Item* combinations[4][2]={{l,r}, {lb,r}, {l,rb},{lb,rb}};
162   for (int i=0; i < 4; i++)
163     {
164       Item * l =  combinations[i][0];
165       Item *r = combinations[i][1];
166
167       if (!l || !r)
168         continue;
169
170       Rod rod;
171       rod.item_l_drul_[LEFT] = l;
172       rod.item_l_drul_[RIGHT] = r;
173
174         /*
175           should do something more advanced.
176          */
177       rod.distance_f_ = l->extent (X_AXIS)[BIGGER] - r->extent (X_AXIS)[SMALLER]
178         + paper_l ()->get_var ("mmrest_x_minimum");
179   
180       a.push (rod);
181     }
182   
183   return a;
184 }
185