lily/include/context.hh

   1 /*
   2      context.hh -- declare  Context
   3
   4      source file of the GNU LilyPond music typesetter
   5
   6      (c) 2004 Han-Wen Nienhuys <hanwen@xs4all.nl>
   7  */
   8
   9 #ifndef CONTEXT_HH
  10 #define CONTEXT_HH
  11
  12 #include "moment.hh"
  13 #include "lily-proto.hh"
  14
  15
  16 class Context
  17 {
  18   Scheme_hash_table *properties_dict () const;
  19   Context (Context const &src);
  20
  21   DECLARE_SMOBS (Context, dummy);
  22
  23   void terminate ();
  24
  25 private:
  26   friend class Interpretation_context_handle;
  27   int iterator_count_;
  28   bool init_;
  29
  30 protected:
  31   Context * daddy_context_;
  32   SCM definition_;
  33   SCM properties_scm_;
  34   SCM context_list_;
  35   SCM accepts_list_;
  36   SCM aliases_;
  37   SCM implementation_;
  38
  39   friend class Context_def;
  40 public:
  41   SCM children_contexts () const { return context_list_; }
  42   SCM default_child_context_name () const;
  43   Translator_group* implementation () const;
  44
  45   Context * get_parent_context () const;
  46
  47   Context ();
  48   void execute_pushpop_property (SCM prop, SCM sym, SCM val);
  49   SCM internal_get_property (SCM name_sym) const;
  50
  51   Context *remove_context (Context*trans);
  52   void check_removal ();
  53
  54   SCM properties_as_alist () const;
  55   void unset_property (SCM var_sym);
  56   void internal_set_property (SCM var_sym, SCM value);
  57
  58   Context *where_defined (SCM name_sym) const;
  59   String context_name () const;
  60   Global_context * get_global_context () const;
  61
  62   virtual Score_context * get_score_context () const;
  63   bool is_alias (SCM) const;
  64   void add_alias (SCM);
  65   void add_context (Context *trans);
  66   bool is_bottom_context () const;
  67   bool is_removable () const;
  68   bool try_music (Music *);
  69
  70   virtual Music_output_def *get_output_def () const;
  71   virtual Moment now_mom () const;
  72   Context *find_create_context (SCM context_name,
  73                                 String id, SCM ops);
  74   Link_array<Context> path_to_acceptable_context (SCM alias,
  75                                                   Music_output_def*) const;
  76   virtual Context *get_default_interpreter ();
  77   String id_string_;
  78 };
  79
  80 /*
  81   Context arg?
  82  */
  83
  84 void apply_property_operations (Context*tg, SCM pre_init_ops);
  85 void execute_pushpop_property (Context * trg, SCM prop, SCM eltprop, SCM val);
  86 SCM updated_grob_properties (Context* tg, SCM sym);
  87 Context * find_context_below (Context * where,
  88                               SCM type_sym, String id);
  89 bool melisma_busy (Context*);
  90
  91 Context *get_voice_to_lyrics (Context *lyrics);
  92 Grob *get_current_note_head (Context * voice);
  93 Context *unsmob_context (SCM);
  94
  95 DECLARE_UNSMOB(Context,context);
  96
  97 #endif /* CONTEXT_HH */
  98