X-Git-Url: https://git.donarmstrong.com/?a=blobdiff_plain;f=lily%2Finclude%2Fgrob.hh;h=a9408f09a2ac1cbc6beb21a9766526c3d3af5914;hb=3af0951f9a11677240efa6228683dd4fcea13eaf;hp=6c3ef612bd7a81c3526592c0a50baf31bd246a91;hpb=9f3572d98bb948c9689cd1f75401a029451fa001;p=lilypond.git
diff --git a/lily/include/grob.hh b/lily/include/grob.hh
index 6c3ef612bd..a9408f09a2 100644
--- a/lily/include/grob.hh
+++ b/lily/include/grob.hh
@@ -1,25 +1,42 @@
/*
- grob.hh -- declare Grob
+ This file is part of LilyPond, the GNU music typesetter.
- source file of the LilyPond music typesetter
+ Copyright (C) 1996--2015 Han-Wen Nienhuys
- (c) 1996--2006 Han-Wen Nienhuys
+ LilyPond is free software: you can redistribute it and/or modify
+ it under the terms of the GNU General Public License as published by
+ the Free Software Foundation, either version 3 of the License, or
+ (at your option) any later version.
+
+ LilyPond is distributed in the hope that it will be useful,
+ but WITHOUT ANY WARRANTY; without even the implied warranty of
+ MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
+ GNU General Public License for more details.
+
+ You should have received a copy of the GNU General Public License
+ along with LilyPond. If not, see .
*/
#ifndef GROB_HH
#define GROB_HH
+#include "box.hh"
#include "virtual-methods.hh"
#include "dimension-cache.hh"
#include "grob-interface.hh"
-#include "object-key.hh"
-class Grob
+#include
+
+class Grob : public Smob
{
+public:
+ int print_smob (SCM, scm_print_state *) const;
+ SCM mark_smob () const;
+ static const char * const type_p_name_;
+ virtual ~Grob ();
private:
- DECLARE_SMOBS (Grob, foo);
- DECLARE_CLASSNAME(Grob);
-
+ DECLARE_CLASSNAME (Grob);
+
void init ();
protected:
@@ -27,24 +44,26 @@ protected:
Dimension_cache dim_cache_[NO_AXES];
Output_def *layout_;
Grob *original_;
- Object_key const *key_;
/* SCM data */
SCM immutable_property_alist_;
SCM mutable_property_alist_;
SCM object_alist_;
-
+
/*
If this is a property, it accounts for 25% of the property
lookups.
*/
SCM interfaces_;
-
+
void substitute_object_links (SCM, SCM);
Real get_offset (Axis a) const;
SCM try_callback (SCM, SCM);
+ SCM try_callback_on_alist (SCM *, SCM, SCM);
+ void internal_set_value_on_alist (SCM *alist, SCM sym, SCM val);
+
public:
-
+
/* friends */
friend class Spanner;
friend class System;
@@ -52,21 +71,31 @@ public:
friend SCM ly_grob_basic_properties (SCM);
/* standard callbacks */
- DECLARE_SCHEME_CALLBACK(x_parent_positioning, (SCM));
- DECLARE_SCHEME_CALLBACK(y_parent_positioning, (SCM));
+ DECLARE_SCHEME_CALLBACK (x_parent_positioning, (SCM));
+ DECLARE_SCHEME_CALLBACK (y_parent_positioning, (SCM));
+ DECLARE_SCHEME_CALLBACK (pure_stencil_height, (SCM smob, SCM, SCM));
DECLARE_SCHEME_CALLBACK (stencil_height, (SCM smob));
DECLARE_SCHEME_CALLBACK (stencil_width, (SCM smob));
+ DECLARE_SCHEME_CALLBACK (pure_simple_vertical_skylines_from_extents, (SCM smob, SCM, SCM));
+ DECLARE_SCHEME_CALLBACK (simple_vertical_skylines_from_extents, (SCM smob));
+ DECLARE_SCHEME_CALLBACK (vertical_skylines_from_stencil, (SCM smob));
+ DECLARE_SCHEME_CALLBACK (pure_vertical_skylines_from_element_stencils, (SCM smob, SCM, SCM));
+ DECLARE_SCHEME_CALLBACK (vertical_skylines_from_element_stencils, (SCM smob));
+ DECLARE_SCHEME_CALLBACK (pure_simple_horizontal_skylines_from_extents, (SCM smob, SCM, SCM));
+ DECLARE_SCHEME_CALLBACK (simple_horizontal_skylines_from_extents, (SCM smob));
+ DECLARE_SCHEME_CALLBACK (horizontal_skylines_from_stencil, (SCM smob));
+ DECLARE_SCHEME_CALLBACK (pure_horizontal_skylines_from_element_stencils, (SCM smob, SCM, SCM));
+ DECLARE_SCHEME_CALLBACK (horizontal_skylines_from_element_stencils, (SCM smob));
/* R/O access */
Output_def *layout () const { return layout_; }
Grob *original () const { return original_; }
SCM interfaces () const { return interfaces_; }
- Object_key const *key () const { return key_; }
- /* life & death */
- Grob (SCM basic_props, Object_key const *);
- Grob (Grob const &, int copy_count);
- virtual Grob *clone (int count) const;
+ /* life & death */
+ Grob (SCM basic_props);
+ Grob (Grob const &);
+ virtual Grob *clone () const;
/* forced death */
void suicide ();
@@ -78,19 +107,23 @@ public:
/* Properties */
SCM get_property_alist_chain (SCM) const;
SCM internal_get_property (SCM symbol) const;
- SCM get_property_data (SCM symbol) const;
+ SCM internal_get_property_data (SCM symbol) const;
+ SCM internal_get_pure_property (SCM symbol, int start, int end) const;
+ SCM internal_get_maybe_pure_property (SCM symbol, bool pure, int start, int end) const;
+ SCM internal_get_non_callback_marker_property_data (SCM symbol) const;
SCM internal_get_object (SCM symbol) const;
- void del_property (SCM symbol);
- void internal_set_property (SCM sym, SCM val);
void internal_set_object (SCM sym, SCM val);
+ void internal_del_property (SCM symbol);
+ void instrumented_set_property (SCM, SCM, char const *, int, char const *);
+ void internal_set_property (SCM sym, SCM val);
- /* messages */
- void warning (string) const;
- void programming_error (string) const;
-
+ /* messages */
+ void warning (const string&) const;
+ void programming_error (const string&) const;
/* class hierarchy */
virtual System *get_system () const;
+ static System *get_system (Grob *);
virtual void do_break_processing ();
virtual Grob *find_broken_piece (System *) const;
virtual void discretionary_processing ();
@@ -104,41 +137,70 @@ public:
/* interfaces */
bool internal_has_interface (SCM intf);
- static bool has_interface (Grob *me);
/* offsets */
void translate_axis (Real, Axis);
Real relative_coordinate (Grob const *refp, Axis) const;
+ Real pure_relative_y_coordinate (Grob const *refp, int start, int end);
+ Real maybe_pure_coordinate (Grob const *refp, Axis a, bool pure, int start, int end);
/* extents */
Interval extent (Grob *refpoint, Axis) const;
void flush_extent_cache (Axis);
+ virtual Interval pure_y_extent (Grob *refpoint, int start, int end);
+ Interval maybe_pure_extent (Grob *refpoint, Axis, bool pure, int start, int end);
/* refpoints */
Grob *common_refpoint (Grob const *s, Axis a) const;
void set_parent (Grob *e, Axis);
Grob *get_parent (Axis a) const;
void fixup_refpoint ();
+
+ /* vertical ordering */
+ static bool internal_vertical_less (Grob *g1, Grob *g2, bool pure);
+ static Grob *get_root_vertical_alignment (Grob *g);
+ static Grob *get_vertical_axis_group (Grob *g);
+ static bool vertical_less (Grob *g1, Grob *g2);
+ static bool pure_vertical_less (Grob *g1, Grob *g2);
+ static int get_vertical_axis_group_index (Grob *g);
+
+ /* skylines */
+ virtual Interval_t spanned_rank_interval () const;
+ virtual bool pure_is_visible (int start, int end) const;
+ bool check_cross_staff (Grob *common);
+ static bool less (Grob *g1, Grob *g2);
+ static SCM maybe_pure_internal_simple_skylines_from_extents (Grob *, Axis, bool, int, int, bool, bool);
+ static SCM internal_skylines_from_element_stencils (Grob *me, Axis a, bool pure, int beg, int end);
+ static SCM internal_skylines_from_element_stencils (SCM, Axis);
};
-/* smob utilities */
-DECLARE_UNSMOB (Grob, grob);
-Spanner *unsmob_spanner (SCM);
-Item *unsmob_item (SCM);
+template
+inline bool has_interface(Grob *g)
+{
+ return g && g->internal_has_interface (Grob_interface::interface_symbol_);
+}
+
+/* unification */
+void uniquify (vector &);
/* refpoints */
Grob *common_refpoint_of_list (SCM elt_list, Grob *, Axis a);
-Grob *common_refpoint_of_array (vector const &, Grob *, Axis a);
+Grob *common_refpoint_of_array (vector const &, Grob *, Axis a);
+Grob *common_refpoint_of_array (set const &, Grob *, Axis a);
System *get_root_system (Grob *me);
-/* extents */
+/* extents */
Interval robust_relative_extent (Grob *, Grob *, Axis);
/* offset/extent callbacks. */
void add_offset_callback (Grob *g, SCM proc, Axis a);
void chain_offset_callback (Grob *g, SCM proc, Axis a);
+void chain_callback (Grob *g, SCM proc, SCM sym);
SCM axis_offset_symbol (Axis a);
SCM axis_parent_positioning (Axis a);
+SCM call_pure_function (SCM unpure, SCM args, int start, int end);
+
+void set_nested_property (Grob *, SCM property_path, SCM value);
#endif /* GROB_HH */