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   String id_string_;
  39
  40   friend class Context_def;
  41 public:
  42   String id_string () const { return id_string_; }
  43   SCM children_contexts () const { return context_list_; }
  44   SCM default_child_context_name () const;
  45
  46   Translator_group* implementation () const;
  47   Context * get_parent_context () const;
  48   Context ();
  49
  50   /*
  51     properties:
  52    */
  53   void execute_pushpop_property (SCM prop, SCM sym, SCM val);
  54   SCM internal_get_property (SCM name_sym) const;
  55   SCM properties_as_alist () const;
  56   void internal_set_property (SCM var_sym, SCM value);
  57   Context *where_defined (SCM name_sym) const;
  58   void unset_property (SCM var_sym);
  59
  60
  61   Context *remove_context (Context*trans);
  62   void check_removal ();
  63   String context_name () const;
  64   Global_context * get_global_context () const;
  65
  66   virtual Score_context * get_score_context () const;
  67   virtual Output_def *get_output_def () const;
  68   virtual Moment now_mom () const;
  69   virtual Context *get_default_interpreter ();
  70
  71   bool is_alias (SCM) const;
  72   void add_alias (SCM);
  73   void add_context (Context *trans);
  74   bool is_bottom_context () const;
  75   bool is_removable () const;
  76   bool try_music (Music *);
  77
  78   Context *find_create_context (SCM context_name,
  79                                 String id, SCM ops);
  80   Link_array<Context> path_to_acceptable_context (SCM alias,
  81                                                   Output_def*) const;
  82
  83 };
  84
  85 /*
  86   Context arg?
  87  */
  88
  89 void apply_property_operations (Context*tg, SCM pre_init_ops);
  90 void execute_pushpop_property (Context * trg, SCM prop, SCM eltprop, SCM val);
  91 SCM updated_grob_properties (Context* tg, SCM sym);
  92 Context * find_context_below (Context * where,
  93                               SCM type_sym, String id);
  94 bool melisma_busy (Context*);
  95
  96 Context *get_voice_to_lyrics (Context *lyrics);
  97 Grob *get_current_note_head (Context * voice);
  98 Context *unsmob_context (SCM);
  99
 100 DECLARE_UNSMOB(Context,context);
 101
 102 #endif /* CONTEXT_HH */
 103