lily/input-translator.cc

   1 /*
   2   input-translator.cc -- implement Input_translator
   3
   4   source file of the GNU LilyPond music typesetter
   5
   6   (c) 1997 Han-Wen Nienhuys <hanwen@stack.nl>
   7 */
   8
   9 #include "debug.hh"
  10 #include "engraver.hh"
  11 #include "input-translator.hh"
  12 #include "parray.hh"
  13 #include "input-translator.hh"
  14 #include "engraver-group.hh"
  15 #include "performer-group-performer.hh"
  16
  17 bool
  18 Input_translator::is_name_b(String n)
  19 {
  20     for (int i=0; i < alias_str_arr_.size(); i++)
  21         if (alias_str_arr_[i] == n)
  22             return true;
  23     return false;
  24 }
  25
  26 void
  27 Input_translator::print() const
  28 {
  29 #ifndef NPRINT
  30     mtor << base_str_ <<" " << type_str_<<" {\n";
  31     mtor << "Consists of ";
  32     for (int i=0; i< consists_str_arr_.size(); i++)
  33         mtor << consists_str_arr_[i] << ',';
  34     if (contains_itrans_p_list_.size())
  35         mtor << "\nContains " ;
  36     for (PCursor<Input_translator*> i(contains_itrans_p_list_.top()); i.ok(); i++)
  37         i->print();
  38     mtor << "}\n";
  39 #endif
  40 }
  41
  42
  43
  44 Input_translator *
  45 Input_translator::recursive_find(String nm)
  46 {
  47     if ( is_name_b( nm) )
  48         return this;
  49
  50     Input_translator * r =0;
  51     // what bout for() ?
  52     PCursor<Input_translator*> i(contains_itrans_p_list_.top());
  53     for (; !r &&i.ok(); i++) {
  54         if (i->recursive_find(nm))
  55             r = i.ptr();
  56     }
  57
  58     return r;
  59 }
  60
  61 Input_translator *
  62 Input_translator::find_itrans_l(String nm)
  63 {
  64     for (PCursor<Input_translator*> i(contains_itrans_p_list_.top()); i.ok(); i++)
  65         if (i->is_name_b( nm))
  66             return i;
  67
  68     return 0;
  69 }
  70
  71
  72 Engraver_group_engraver *
  73 Input_translator::get_group_engraver_p()
  74 {
  75     assert (base_str_ == "Engraver");
  76     Engraver_group_engraver * grav_p = (Engraver_group_engraver*)
  77         get_engraver_p(type_str_);
  78
  79     for (int i=0; i < consists_str_arr_.size(); i++) {
  80         grav_p->add( get_engraver_p( consists_str_arr_[i]) );
  81     }
  82     grav_p->itrans_l_ = this;
  83     grav_p->id_str_ = default_id_str_;
  84     return grav_p;
  85 }
  86
  87 Performer_group_performer*
  88 Input_translator::get_group_performer_p()
  89 {
  90     assert (base_str_ == "Performer");
  91     Performer_group_performer * perf_p = (Performer_group_performer*)
  92         get_performer_p(type_str_);
  93
  94     for (int i=0; i < consists_str_arr_.size(); i++) {
  95         perf_p->add( get_performer_p( consists_str_arr_[i]) );
  96     }
  97     perf_p->itrans_l_ = this;
  98     perf_p->id_str_ = default_id_str_;
  99     return perf_p;
 100 }
 101
 102 bool
 103 Input_translator::accept_req_b()
 104 {
 105     return ! contains_itrans_p_list_.size();
 106 }
 107
 108 void
 109 Input_translator::add(Input_translator *ip)
 110 {
 111     contains_itrans_p_list_.bottom().add(ip);
 112 }
 113
 114 Input_translator*
 115 Input_translator::get_default_itrans_l()
 116 {
 117     if ( contains_itrans_p_list_.size() )
 118         return contains_itrans_p_list_.top();
 119     else
 120         return 0;
 121 }
 122
 123
 124 Input_translator_list::Input_translator_list(Input_translator_list const &s)
 125 {
 126     for (PCursor<Input_translator*> pc(s); pc.ok(); pc++) {
 127         Input_translator *q = pc;
 128         Input_translator *p=new Input_translator(*q) ;
 129         bottom().add(p);
 130     }
 131 }