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 "translator-admin.hh"
  10 #include "debug.hh"
  11 #include "engraver.hh"
  12 #include "input-translator.hh"
  13 #include "parray.hh"
  14 #include "input-translator.hh"
  15 #include "engraver-group.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 (iter(contains_itrans_p_list_.top(), i); 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     iter(contains_itrans_p_list_.top(), i);
  52     for (; !r &&i.ok(); i++) {
  53         if (i->recursive_find(nm))
  54             r = i.ptr();
  55     }
  56
  57     return r;
  58 }
  59
  60 Input_translator *
  61 Input_translator::find_itrans_l(String nm)
  62 {
  63     for (iter(contains_itrans_p_list_.top(), i); i.ok(); i++)
  64         if (i->is_name_b( nm))
  65             return i;
  66
  67     return 0;
  68 }
  69
  70
  71 Engraver_group_engraver *
  72 Input_translator::get_group_engraver_p()
  73 {
  74     assert (base_str_ == "Engraver");
  75     Engraver_group_engraver * grav_p = (Engraver_group_engraver*)
  76         get_engraver_p(type_str_);
  77
  78     for (int i=0; i < consists_str_arr_.size(); i++) {
  79         grav_p->add( get_engraver_p( consists_str_arr_[i]) );
  80     }
  81     grav_p->itrans_l_ = this;
  82     grav_p->id_str_ = default_id_str_;
  83     return grav_p;
  84 }
  85
  86 #if 0
  87 Performer_group_performer*
  88 Input_translator::get_group_performer_p()
  89 {
  90     assert (base_str_ == "Performer");
  91     Performer_group_performer * grav_p = (Performer_group_performer*)
  92         get_performer_p(type_str_);
  93
  94     for (int i=0; i < consists_str_arr_.size(); i++) {
  95         grav_p->add( get_performer_p( consists_str_arr_[i]) );
  96     }
  97     grav_p->itrans_l_ = this;
  98     grav_p->id_str_ = default_id_str_;
  99     return grav_p;
 100 }
 101 #endif
 102
 103 bool
 104 Input_translator::accept_req_b()
 105 {
 106     return ! contains_itrans_p_list_.size();
 107 }
 108
 109 void
 110 Input_translator::add(Input_translator *ip)
 111 {
 112     contains_itrans_p_list_.bottom().add(ip);
 113 }
 114
 115 Input_translator*
 116 Input_translator::get_default_itrans_l()
 117 {
 118     if ( contains_itrans_p_list_.size() )
 119         return contains_itrans_p_list_.top();
 120     else
 121         return 0;
 122 }
 123
 124
 125 Input_translator_list::Input_translator_list(Input_translator_list const &s)
 126 {
 127     for (PCursor<Input_translator*> pc(s); pc.ok(); pc++) {
 128         Input_translator *q = pc;
 129         Input_translator *p=new Input_translator(*q) ;
 130         bottom().add(p);
 131     }
 132 }