]> git.donarmstrong.com Git - lilypond.git/blobdiff - lily/p-score.cc
release: 0.0.76
[lilypond.git] / lily / p-score.cc
index 24421334ab955f99922618156380bfd918ef9368..0e093c9693a55ec6e849ec987ea503aef74c517a 100644 (file)
-#include "idealspacing.hh"
+/*
+  p-score.cc -- implement PScore
+
+  source file of the GNU LilyPond music typesetter
+
+  (c) 1996, 1997 Han-Wen Nienhuys <hanwen@stack.nl>
+*/
+
+#include "super-elem.hh"
 #include "debug.hh"
 #include "lookup.hh"
 #include "spanner.hh"
 #include "paper-def.hh"
-#include "molecule.hh"
-#include "dimen.hh"
 #include "scoreline.hh"
 #include "p-score.hh"
 #include "tex-stream.hh"
-#include "item.hh"
-#include "break.hh"
-
-Idealspacing*
-PScore::get_spacing(PCol*l, PCol*r)
-{
-    assert(l!=r);
-
-    Idealspacing*i_p =new Idealspacing(l,r);
-    suz.bottom().add(i_p);
+#include "word-wrap.hh"
+#include "p-col.hh"
 
-    return i_p;
-}
-
-
-void
-PScore::clean_cols()
+PScore::PScore(Paper_def*p)
 {
-    int rank_i = 0;
-    for (iter_top(cols,c); c.ok(); )
-       if (!c->used_b()) {
-           delete c.remove_p();
-       } else {
-           c->set_rank(rank_i++);
-           c++;
-       }
-    
+    paper_l_ = p;
+    super_elem_l_   = new Super_elem;
+    typeset_element(super_elem_l_);
 }
 
-
-void
-PScore::add(PStaff *s)
+PScore::~PScore()
 {
-    assert(s->pscore_l_ == this);
-    staffs.bottom().add(s);
+    super_elem_l_->unlink_all();
 }
 
-
 void
-PScore::do_connect(PCol *c1, PCol *c2, Real d, Real h)
+PScore::typeset_element(Score_elem * elem_p)
 {
-    if (!c1 || !c2 )
-       return;
-    Idealspacing*s_l=get_spacing(c1,c2);
+    elem_p_list_.bottom().add(elem_p);
+    elem_p->pscore_l_ = this;
 
-    
-    s_l->hooke = h;
-    s_l->space =d;
-}
-
-void
-PScore::connect(PCol* c1, PCol *c2, Real d, Real h)
-{
-    do_connect(c1,c2,d,h);
-    do_connect(c1->postbreak_p_, c2,d,h);
-    do_connect(c1, c2->prebreak_p_,d,h);
-    do_connect(c1->postbreak_p_, c2->prebreak_p_,d,h);
+    elem_p->add_processing();
 }
 
 void
-PScore::typeset_item(Item *i, PCol *c, PStaff *s, int breakstat)
+PScore::typeset_item(Item *i, PCol *c, int breakstat)
 {
-    assert(c && i && s);
+    assert(c && i);
 
-    if (breakstat == 0) {
-       typeset_item(i, c->prebreak_p_, s);
+    if (breakstat == -1) {
+       typeset_item(i, c->prebreak_p_);
        return;
     }
 
-    if (breakstat == 2) {
-       typeset_item(i, c->postbreak_p_, s);
+    if (breakstat == 1) {
+       typeset_item(i, c->postbreak_p_);
        return;
     }
 
-
-    its.bottom().add(i);
-    s->add(i);
     c->add(i);
+    typeset_element(i);
+}
+
+void
+PScore::typeset_broken_spanner(Spanner*span_p)
+{
+    span_p->left_col_l_->starters.bottom().add (span_p);
+    span_p->right_col_l_->stoppers.bottom().add(span_p);
+    assert(span_p->left_col_l_->line_l_ == span_p->right_col_l_->line_l_);
 
-    /* first do this, because i->width() may follow the 0-pointer */
-    i->add_processing();    
+    typeset_element(span_p);
 }
 
+
 void
-PScore::typeset_spanner(Spanner*span_p, PStaff*ps)
+PScore::typeset_unbroken_spanner(Spanner*span_p)
 {
-    span_p->pstaff_l_ = ps;
-    spanners.bottom().add(span_p);
-    ps->spans.bottom().add(span_p);
+    span_p_list_.bottom().add(span_p);
+    span_p->pscore_l_=this;
 
+    if (span_p->left_col_l_) 
+       span_p->left_col_l_->used_b_ = true;
+    if ( span_p->right_col_l_)
+       span_p->right_col_l_->used_b_ = true;
+    
     // do not init start/stop fields. These are for broken spans only.
     span_p->add_processing();
 }
 
 
+void
+PScore::clean_cols()
+{
+    int rank_i = 0;
+    for (iter_top(col_p_list_,c); c.ok(); )
+       if (!c->used_b()) {
+           delete c.remove_p();
+       } else {
+           c->set_rank(rank_i++);
+           c++;
+       }
+}
+
 void
 PScore::add(PCol *p)
 {
@@ -111,50 +105,24 @@ PScore::add(PCol *p)
        p->prebreak_p_->pscore_l_ = this;
        p->postbreak_p_->pscore_l_ = this;
     }
-    cols.bottom().add(p);
-}
-
-PScore::PScore( Paper_def*p)
-{
-    paper_l_ = p;
+    col_p_list_.bottom().add(p);
 }
 
 void
 PScore::output(Tex_stream &ts)
 {
-    int l=1;
-
     ts << "\n "<<  paper_l_->lookup_l()->texsetting << "%(Tex id)\n";
-    for (iter_top(lines,lic); lic.ok(); lic++) {
-       ts << "% line of score no. " << l++ <<"\n";
-       ts << lic->TeXstring();
-       if ((lic+1).ok())
-           ts << "\\interscoreline\n";
-    }  
+    ts<< super_elem_l_->TeX_string();
     ts << "\n\\EndLilyPondOutput";
 }
 
 
-Array<Item*>
-PScore::select_items(PStaff*ps, PCol*pc)
-{
-    Array<Item*> ret;
-    assert(ps && pc);
-    for (iter_top(pc->its,i); i.ok(); i++){
-       if (i->pstaff_l_ == ps)
-           ret.push((Item*)(Item const *)i);
-    }
-    return ret;
-}
-
 void
 PScore::OK()const
 {
 #ifndef NDEBUG
-    for (iter_top(cols,cc); cc.ok(); cc++)
+    for (iter_top(col_p_list_,cc); cc.ok(); cc++)
        cc->OK();
-    for (iter_top(suz,i); i.ok(); i++)
-       i->OK();
 #endif
 }
 
@@ -164,13 +132,16 @@ PScore::print() const
 #ifndef NPRINT
     mtor << "PScore { ";
     paper_l_->print();
+    mtor << "\n elements: ";
+    for (iter_top(elem_p_list_,cc); cc.ok(); cc++)     
+       cc->print();
+    mtor << "\n unbroken spanners: ";
+    for (iter(span_p_list_.top(), i); i.ok(); i++)
+       i->print();
     mtor << "\ncolumns: ";
-    for (iter_top(cols,cc); cc.ok(); cc++)
+     for (iter_top(col_p_list_,cc); cc.ok(); cc++)
        cc->print();
     
-    mtor << "\nideals: ";
-    for (iter_top(suz,i); i.ok(); i++)
-       i->print();
     mtor << "}\n";
 #endif 
 }
@@ -178,34 +149,15 @@ PScore::print() const
 void
 PScore::preprocess()
 {
-    for (iter_top(spanners,i); i.ok(); i++) {
-       i->pre_processing();
-    }
-    for (iter_top(its,i); i.ok(); i++){
-       i->pre_processing();
-    }
+    super_elem_l_->breakable_col_processing();
+    super_elem_l_->pre_processing();
 }
 
 void
 PScore::postprocess()
 {
-    for (iter_top(broken_spans,i); i.ok(); i++) { // could chase spans as well.
-       i->post_processing();
-    }
-    for (iter_top(its,i); i.ok(); i++){
-       i->post_processing();
-    }
-    
-    for (iter_top(broken_spans,i); i.ok(); i++) {
-       i->molecule_processing();
-    }
-    for (iter_top(its,i); i.ok(); i++){
-       i->molecule_processing();
-    }
-
-    for (iter_top(lines,i); i.ok(); i++)
-       i->process();
-
+    super_elem_l_->post_processing();
+    super_elem_l_->molecule_processing();
 }
 
 PCursor<PCol *>
@@ -215,41 +167,44 @@ PScore::find_col(PCol const *c)const
     if (what->daddy_l_ )
        what = what->daddy_l_;
     
-    return cols.find((PCol*)what);
+    return col_p_list_.find((PCol*)what);
 }
 
-void
-PScore::add_broken(Spanner*s)
-{
-    assert(s->left_col_l_->line_l_ == s->right_col_l_->line_l_);
-    broken_spans.bottom().add(s);
-    s->left_col_l_->starters.bottom().add (s);
-    s->right_col_l_->stoppers.bottom().add (s);
-}
 
 void
 PScore::set_breaking(Array<Col_hpositions> const &breaking)
 {
-    for (int j=0; j < breaking.size(); j++) {
-       const Array<PCol*> &curline(breaking[j].cols);
-       const Array<PCol*> &errors(breaking[j].error_col_l_arr_);
-       const Array<Real> &config(breaking[j].config);
-       
-       Line_of_score *s_p = new Line_of_score(curline,this);
-       s_p->error_mark_b_ =  breaking[j].ugh_b_;
-       lines.bottom().add(s_p);        
-       for (int i=0; i < curline.size(); i++){
-           curline[i]->hpos = config[i];
+    super_elem_l_->line_of_score_l_->set_breaking( breaking);
+    super_elem_l_->break_processing();
+
+
+    for (iter(span_p_list_.top(),i); i.ok(); ) {
+       Spanner *span_p = i.remove_p();
+       if (span_p->broken_b()) {
+           span_p->unlink();
+           delete span_p;
+       }else{
+           typeset_broken_spanner(span_p);
        }
-       for (int i=0; i < errors.size(); i++)
-           errors[i]->error_mark_b_ = true;
     }
+    for (iter(elem_p_list_.top(),i ); i.ok() ;) {
+       Item *i_l =i->item();
+       if ( i_l && !i_l->pcol_l_->line_l_) {
+           i_l->unlink();
+           delete i.remove_p();
+       } else
+           i++;
+    }
+
+    for (iter_top(col_p_list_, i); i.ok(); i++)
+       i->clean_breakable_items();
 }
 
 void
 PScore::calc_breaking()
 {
     Word_wrap w(*this);
+
     set_breaking(w.solve());
 }
 
@@ -265,3 +220,61 @@ PScore::process()
     *mlog << "\nPostprocessing elements..." << endl;
     postprocess();
 }
+
+/** Get all breakable columns between l and r, (not counting l and r).  */
+Link_array<PCol>
+PScore::breakable_col_range(PCol*l,PCol*r)const
+{
+    Link_array<PCol> ret;
+
+    PCursor<PCol*> start(l ? find_col(l)+1 : col_p_list_.top() );
+    PCursor<PCol*> stop(r ? find_col(r) : col_p_list_.bottom());
+
+    /*
+      ugh! windows-suck-suck-suck.
+     */
+    while ( PCursor<PCol*>::compare(start,stop) < 0 ) {
+       if (start->breakable_b())
+           ret.push(start);
+       start++;
+    }
+
+    return ret;
+}
+Link_array<PCol>
+PScore::col_range(PCol*l,PCol*r)const
+{
+    Link_array<PCol> ret;
+    
+    PCursor<PCol*> start(l ? find_col(l)+1 : col_p_list_.top() );
+    PCursor<PCol*> stop(r ? find_col(r) : col_p_list_.bottom());
+    ret.push(l);
+    
+    /*
+      ugh! windows-suck-suck-suck.
+     */
+    while ( PCursor<PCol*>::compare(start,stop) < 0 )
+       ret.push(start++);
+    ret.push(r);
+    return ret;
+}
+
+Link_array<PCol>
+PScore::broken_col_range(PCol*l,PCol*r)const
+{
+    Link_array<PCol> ret;
+
+    PCursor<PCol*> start(l ? find_col(l)+1 : col_p_list_.top() );
+    PCursor<PCol*> stop(r ? find_col(r) : col_p_list_.bottom());
+  
+    /*
+      ugh! windows-suck-suck-suck.
+      */
+    while ( PCursor<PCol*>::compare(start,stop) < 0 ) {
+       if (start->breakable_b() && !start->line_l_ )
+           ret.push(start);
+       start++;
+    }
+
+    return ret;
+}