kimcinoo
/
efl
forked from enlightenment/efl
1
0
Fork 0
Code Issues Pull Requests Projects Releases Wiki Activity
efl/src/lib/evas/canvas/evas_object_textblock.c

16042 lines
508 KiB
C
Raw Blame History

/**
* @internal
* @subsection Evas_Object_Textblock_Internal Internal Textblock Object Tutorial
*
* This explains the internal design of the Evas Textblock Object, it's assumed
* that the reader of this section has already read @ref Evas_Object_Textblock_Tutorial "Textblock's usage docs.".
*
* @subsection textblock_internal_intro Introduction
* There are two main parts to the textblock object, the first being the node
* system, and the second being the layout system. The former is just an
* internal representation of the markup text, while the latter is the internal
* visual representation of the text (i.e positioning, sizing, fonts and etc).
*
* @subsection textblock_nodes The Nodes system
* The nodes mechanism consists of two main data types:
* ::Evas_Object_Textblock_Node_Text and ::Evas_Object_Textblock_Node_Format
* the former is for Text nodes and the latter is for format nodes.
* There's always at least one text node, even if there are only formats.
*
* @subsection textblock_nodes_text Text nodes
* Each text node is essentially a paragraph, it includes an @ref Eina_UStrbuf
* that stores the actual paragraph text, a utf8 string to store the paragraph
* text in utf8 (which is not used internally at all), A pointer to it's
* main @ref textblock_nodes_format_internal "Format Node" and the paragraph's
* @ref evas_bidi_props "BiDi properties". The pointer to the format node may be
* NULL if there's no format node anywhere before the end of the text node,
* not even in previous text nodes. If not NULL, it points to the first format
* node pointing to text inside of the text node, or if there is none, it points
* to the previous's text nodes format node. Each paragraph has a format node
* representing a paragraph separator pointing to it's last position except
* for the last paragraph, which has no such constraint. This constraint
* happens because text nodes are paragraphs and paragraphs are delimited by
* paragraph separators.
*
* @subsection textblock_nodes_format_internal Format Nodes - Internal
* Each format node stores a group of format information, for example the
* markup: \<font=Vera,Kochi font_size=10 align=left\> will all be inserted
* inside the same format node, although it consists of different formatting
* commands.
* Each node has a pointer to it's text node, this pointer is NEVER NULL, even
* if there's only one format, and no text, a text node is created. Each format
* node includes an offset from the last format node of the same text node. For
* example, the markup "0<b>12</b>" will create two format nodes, the first
* having an offset of 1 and the second an offset of 2. Each format node also
* includes a @ref Eina_Strbuf that includes the textual representation of the
* format, and a boolean stating if the format is a visible format or not, see
* @ref textblock_nodes_format_visible
*
* @subsection textblock_nodes_format_visible Visible Format Nodes
* There are two types of format nodes, visible and invisible. They are the same
* in every way, except for the representation in the text node. While invisible
* format nodes have no representation in the text node, the visible ones do.
* The Uniceode object replacement character (0xFFFC) is inserted to every place
* a visible format node points to. This makes it very easy to treat visible
* formats as items in the text, both for BiDi purposes and cursor handling
* purposes.
* Here are a few example visible an invisible formats:
* Visible: newline char, tab, paragraph separator and an embedded item.
* Invisible: setting the color, font or alignment of the text.
*
* @subsection textblock_layout The layout system
* @todo write @ref textblock_layout
*/
#define EFL_CANVAS_OBJECT_BETA
#define EFL_CANVAS_FILTER_INTERNAL_PROTECTED
#include "evas_common_private.h"
#include "evas_private.h"
//#define LYDBG(f, args...) printf(f, ##args)
#define LYDBG(f, args...)
#define MY_CLASS EFL_CANVAS_TEXT_CLASS
#define MY_CLASS_NAME "Efl Canvas Text"
#include "linebreak.h"
#include "wordbreak.h"
#include "evas_filter.h"
#include "efl_canvas_filter_internal.eo.h"
/* private magic number for textblock objects */
static const char o_type[] = "textblock";
/* The char to be inserted instead of visible formats */
#define _REPLACEMENT_CHAR 0xFFFC
#define _PARAGRAPH_SEPARATOR 0x2029
#define _NEWLINE '\n'
#define _TAB '\t'
#define _REPLACEMENT_CHAR_UTF8 "\xEF\xBF\xBC"
#define _PARAGRAPH_SEPARATOR_UTF8 "\xE2\x80\xA9"
#define _NEWLINE_UTF8 "\n"
#define _TAB_UTF8 "\t"
#define EVAS_TEXTBLOCK_IS_VISIBLE_FORMAT_CHAR(ch) \
(((ch) == _REPLACEMENT_CHAR) || \
((ch) == _NEWLINE) || \
((ch) == _TAB) || \
((ch) == _PARAGRAPH_SEPARATOR))
#ifdef CRI
#undef CRI
#endif
#define CRI(...) EINA_LOG_DOM_CRIT(EINA_LOG_DOMAIN_DEFAULT, __VA_ARGS__)
#ifdef ERR
#undef ERR
#endif
#define ERR(...) EINA_LOG_DOM_ERR(EINA_LOG_DOMAIN_DEFAULT, __VA_ARGS__)
#ifdef WRN
#undef WRN
#endif
#define WRN(...) EINA_LOG_DOM_WARN(EINA_LOG_DOMAIN_DEFAULT, __VA_ARGS__)
#ifdef INF
#undef INF
#endif
#define INF(...) EINA_LOG_DOM_INFO(EINA_LOG_DOMAIN_DEFAULT, __VA_ARGS__)
#ifdef DBG
#undef DBG
#endif
#define DBG(...) EINA_LOG_DOM_DBG(EINA_LOG_DOMAIN_DEFAULT, __VA_ARGS__)
#define TB_NULL_CHECK(null_check, ...) \
do \
{ \
if (!null_check) \
{ \
ERR("%s is NULL while it shouldn't be, please notify developers.", #null_check); \
return __VA_ARGS__; \
} \
} \
while(0)
// testing out some macros to maybe add to eina
#define EINA_INLIST_REMOVE(l,i) do { l = (__typeof__(l)) eina_inlist_remove(EINA_INLIST_GET(l), EINA_INLIST_GET(i)); } while (0)
#define EINA_INLIST_APPEND(l,i) do { l = (__typeof__(l)) eina_inlist_append(EINA_INLIST_GET(l), EINA_INLIST_GET(i)); } while (0)
/* private struct for textblock object internal data */
/**
* @internal
* @typedef Efl_Canvas_Text_Data
* The actual textblock object.
*/
typedef struct _Evas_Object_Textblock Efl_Canvas_Text_Data;
/**
* @internal
* @typedef Evas_Object_Style_Tag
* The structure used for finding style tags.
*/
typedef struct _Evas_Object_Style_Tag Evas_Object_Style_Tag;
/**
* @internal
* @typedef Evas_Object_Style_Tag
* The structure used for finding style tags.
*/
typedef struct _Evas_Object_Style_Tag_Base Evas_Object_Style_Tag_Base;
/**
* @internal
* @typedef Evas_Object_Textblock_Node_Text
* A text node.
*/
typedef struct _Evas_Object_Textblock_Node_Text Evas_Object_Textblock_Node_Text;
/*
* Defined in Evas.h
typedef struct _Evas_Object_Textblock_Node_Format Evas_Object_Textblock_Node_Format;
*/
typedef struct _Evas_Textblock_Node_Format Evas_Textblock_Node_Format;
/**
* @internal
* @typedef Evas_Object_Textblock_Paragraph
* A layouting paragraph.
*/
typedef struct _Evas_Object_Textblock_Paragraph Evas_Object_Textblock_Paragraph;
/**
* @internal
* @typedef Evas_Object_Textblock_Line
* A layouting line.
*/
typedef struct _Evas_Object_Textblock_Line Evas_Object_Textblock_Line;
/**
* @internal
* @typedef Evas_Object_Textblock_Item
* A layouting item.
*/
typedef struct _Evas_Object_Textblock_Item Evas_Object_Textblock_Item;
/**
* @internal
* @typedef Evas_Object_Textblock_Item
* A layouting text item.
*/
typedef struct _Evas_Object_Textblock_Text_Item Evas_Object_Textblock_Text_Item;
/**
* @internal
* @typedef Evas_Object_Textblock_Format_Item
* A layouting format item.
*/
typedef struct _Evas_Object_Textblock_Format_Item Evas_Object_Textblock_Format_Item;
/**
* @internal
* @typedef Evas_Object_Textblock_Format
* A textblock format.
*/
typedef struct _Evas_Object_Textblock_Format Evas_Object_Textblock_Format;
/**
* @internal
* @typedef Evas_Textblock_Selection_Iterator
* A textblock selection iterator.
*/
typedef struct _Evas_Textblock_Selection_Iterator Evas_Textblock_Selection_Iterator;
/**
* @internal
* @typedef Efl_Text_Annotate_Annotation_Iterator
* A textblock annotation iterator.
*/
typedef struct _Efl_Text_Annotate_Annotation_Iterator Efl_Text_Annotate_Annotation_Iterator;
/**
* @internal
* @typedef Efl_Canvas_Text_Filter
* A structure holding gfx filter information for a text item
*/
typedef struct _Efl_Canvas_Text_Filter Efl_Canvas_Text_Filter;
/**
* @internal
* @typedef Efl_Canvas_Text_Filter_Post_Render
* Post-render data for async rendering of gfx filters
*/
typedef struct _Efl_Canvas_Text_Filter_Post_Render Efl_Canvas_Text_Filter_Post_Render;
/**
* @internal
* @typedef Efl_Canvas_Text_Filter_Program
* Filter name - code database
*/
typedef struct _Efl_Canvas_Text_Filter_Program Efl_Canvas_Text_Filter_Program;
/**
* @internal
* @typedef Text_Item_Filter
* Text item filter properties (run context, output buffer, ...)
*/
typedef struct _Text_Item_Filter Text_Item_Filter;
/**
* @internal
* @def IS_AT_END(ti, ind)
* Return true if ind is at the end of the text item, false otherwise.
*/
#define IS_AT_END(ti, ind) (ind == ti->text_props.text_len)
/**
* @internal
* @def MOVE_PREV_UNTIL(limit, ind)
* This decrements ind as long as ind > limit.
*/
#define MOVE_PREV_UNTIL(limit, ind) \
do \
{ \
if ((limit) < (ind)) \
(ind)--; \
} \
while (0)
/**
* @internal
* @def MOVE_NEXT_UNTIL(limit, ind)
* This increments ind as long as ind < limit
*/
#define MOVE_NEXT_UNTIL(limit, ind) \
do \
{ \
if ((ind) < (limit)) \
(ind)++; \
} \
while (0)
/**
* @internal
* @def GET_ITEM_LEN(it)
* Returns length of item (Format or Text)
*/
#define GET_ITEM_LEN(it) \
(((it)->type == EVAS_TEXTBLOCK_ITEM_TEXT) ? \
_ITEM_TEXT(it)->text_props.text_len : 1)
/**
* @internal
* @def GET_ITEM_TEXT(ti)
* Returns a const reference to the text of the ti (not null terminated).
*/
#define GET_ITEM_TEXT(ti) \
(((ti)->parent.text_node) ? \
(eina_ustrbuf_string_get((ti)->parent.text_node->unicode) + \
(ti)->parent.text_pos) : EINA_UNICODE_EMPTY_STRING)
/**
* @internal
* @def _FORMAT_IS_CLOSER_OF(base, closer, closer_len)
* Returns true if closer is the closer of base.
*/
#define _FORMAT_IS_CLOSER_OF(base, closer, closer_len) \
(!strncmp(base, closer, closer_len) && \
(!base[closer_len] || \
(base[closer_len] == '=') || \
_is_white(base[closer_len])))
struct _Evas_Object_Style_Tag_Base
{
char *tag; /**< Format Identifier: b=Bold, i=Italic etc. */
char *replace; /**< Replacement string. "font_weight=Bold", "font_style=Italic" etc. */
size_t tag_len; /**< Strlen of tag. */
size_t replace_len; /**< Strlen of replace. */
};
struct _Evas_Object_Style_Tag
{
EINA_INLIST;
Evas_Object_Style_Tag_Base tag; /**< Base style object for holding style information. */
};
struct _Evas_Object_Textblock_Node_Text
{
EINA_INLIST;
Eina_UStrbuf *unicode; /**< Actual paragraph text. */
char *utf8; /**< Text in utf8 format. */
Evas_Object_Textblock_Node_Format *format_node; /**< Points to the last format node before the paragraph, or if there is none, to the first format node within the paragraph.*/
Evas_Object_Textblock_Paragraph *par; /**< Points to the paragraph node of which this node is a part. */
Eina_Bool dirty : 1; /**< EINA_TRUE if already handled/format changed, else EINA_FALSE. */
Eina_Bool is_new : 1; /**< EINA_TRUE if its a new paragraph, else EINA_FALSE. */
};
struct _Evas_Textblock_Node_Format
{
EINA_INLIST;
const char *format; /**< Cached, parsed and translated version of orig_format. */
const char *orig_format; /**< Original format information. */
Evas_Object_Textblock_Node_Text *text_node; /**< The text node it's pointing to. */
Efl_Text_Annotate_Annotation *annotation; /**< Pointer to this node's annotation handle (if exists). */
size_t offset; /**< Offset from the last format node of the same text. */
struct {
unsigned char l, r, t, b;
} pad; /**< Amount of padding required. */
unsigned char anchor : 2; /**< ANCHOR_NONE, ANCHOR_A or ANCHOR_ITEM. */
Eina_Bool opener : 1; /**< EINA_TRUE if opener, else EINA_FALSE. */
Eina_Bool own_closer : 1; /**< EINA_TRUE if own_closer, else EINA_FALSE. */
Eina_Bool visible : 1; /**< EINA_TRUE if format is visible format, else EINA_FALSE. */
Eina_Bool format_change : 1; /**< EINA_TRUE if the format of the textblock has changed, else EINA_FALSE. */
Eina_Bool is_new : 1; /**< EINA_TRUE if its a new format node, else EINA_FALSE */
};
/* The default tags to use */
static const Evas_Object_Style_Tag_Base default_tags[] = {
{ "b", "+ font_weight=Bold", 1, 18 },
{ "i", "+ font_style=Italic", 1, 19 }};
#define ANCHOR_NONE 0
#define ANCHOR_A 1
#define ANCHOR_ITEM 2
/**
* @internal
* @def _NODE_TEXT(x)
* A convinience macro for casting to a text node.
*/
#define _NODE_TEXT(x) ((Evas_Object_Textblock_Node_Text *) (x))
/**
* @internal
* @def _NODE_FORMAT(x)
* A convinience macro for casting to a format node.
*/
#define _NODE_FORMAT(x) ((Evas_Object_Textblock_Node_Format *) (x))
/**
* @internal
* @def _ITEM(x)
* A convinience macro for casting to a generic item.
*/
#define _ITEM(x) ((Evas_Object_Textblock_Item *) (x))
/**
* @internal
* @def _ITEM_TEXT(x)
* A convinience macro for casting to a text item.
*/
#define _ITEM_TEXT(x) ((Evas_Object_Textblock_Text_Item *) (x))
/**
* @internal
* @def _ITEM_FORMAT(x)
* A convinience macro for casting to a format item.
*/
#define _ITEM_FORMAT(x) ((Evas_Object_Textblock_Format_Item *) (x))
struct _Evas_Object_Textblock_Paragraph
{
EINA_INLIST;
Evas_Object_Textblock_Line *lines; /**< Points to the first line of this paragraph. */
Evas_Object_Textblock_Node_Text *text_node; /**< Points to the first text node of this paragraph. */
Eina_List *logical_items; /**< Logical items are the properties of this paragraph, like width, height etc. */
Evas_BiDi_Paragraph_Props *bidi_props; /**< Only valid during layout. */
Evas_BiDi_Direction direction; /**< Bidi direction enum value. The display direction like right to left.*/
Evas_Coord y, w, h; /**< Text block co-ordinates. y co-ord, width and height. */
Evas_Coord last_fw; /**< Last calculated formatted width */
int line_no; /**< Line no of the text block. */
Eina_Bool is_bidi : 1; /**< EINA_TRUE if this is BiDi Paragraph, else EINA_FALSE. */
Eina_Bool visible : 1; /**< EINA_TRUE if paragraph visible, else EINA_FALSE. */
Eina_Bool rendered : 1; /**< EINA_TRUE if paragraph rendered, else EINA_FALSE. */
};
struct _Evas_Object_Textblock_Line
{
EINA_INLIST;
Evas_Object_Textblock_Item *items; /**< Pointer to layouting text item. Contains actual text and information about its display. */
Evas_Object_Textblock_Paragraph *par; /**< Points to the paragraph of which this line is a part. */
Evas_Coord x, y, w, h; /**< Text block line co-ordinates. */
int baseline; /**< Baseline of the textblock. */
int line_no; /**< Line no of this line. */
};
typedef enum _Evas_Textblock_Item_Type
{
EVAS_TEXTBLOCK_ITEM_TEXT,
EVAS_TEXTBLOCK_ITEM_FORMAT,
} Evas_Textblock_Item_Type;
typedef enum _Evas_Textblock_Align_Auto
{
EVAS_TEXTBLOCK_ALIGN_AUTO_NONE,
EVAS_TEXTBLOCK_ALIGN_AUTO_NORMAL,
EVAS_TEXTBLOCK_ALIGN_AUTO_LOCALE
} Evas_Textblock_Align_Auto;
struct _Evas_Object_Textblock_Item
{
EINA_INLIST;
Evas_Object_Textblock_Node_Text *text_node; /**< Pointer to textblock node text. It contains actual text in unicode and utf8 format. */
Evas_Object_Textblock_Format *format; /**< Pointer to textblock format. It contains all the formatting information for this text block. */
Evas_Object_Textblock_Line *ln; /**< Pointer to textblock line. It contains the co-ord, baseline, and line no for this item. */
size_t text_pos; /**< Position of this item in textblock line. */
#ifdef BIDI_SUPPORT
size_t visual_pos; /**< Visual position of this item. */
#endif
Evas_Textblock_Item_Type type; /**< EVAS_TEXTBLOCK_ITEM_TEXT or EVAS_TEXTBLOCK_ITEM_FORMAT */
Evas_Coord adv, x, w, h; /**< Item co-ordinates. Advancement to be made, x co-ord, width and height. */
Evas_Coord yoff; /**< y offset. */
Eina_Bool merge : 1; /**< Indicates whether this item should merge to the previous item or not */
Eina_Bool visually_deleted : 1; /**< Indicates whether this item is used in the visual layout or not. */
};
struct _Evas_Object_Textblock_Text_Item
{
Evas_Object_Textblock_Item parent; /**< Textblock item. */
Evas_Text_Props text_props; /**< Props for this item. */
Evas_Coord x_adjustment; /**< Used to indicate by how much we adjusted sizes */
Text_Item_Filter *gfx_filter;
};
struct _Evas_Object_Textblock_Format_Item
{
Evas_Object_Textblock_Item parent; /**< Textblock item. */
Evas_BiDi_Direction bidi_dir; /**< Bidi text direction. */
const char *item; /**< Pointer to item contents. */
int y; /**< Co-ordinate of item. */
unsigned char vsize : 2; /**< VSIZE_FULL or VSIZE_ASCENT */
unsigned char size : 2; /**< SIZE, SIZE_ABS or SIZE_REL*/
Eina_Bool formatme : 1; /**< EINA_TRUE if format required, else EINA_FALSE */
};
struct _Text_Item_Filter
{
EINA_INLIST; /**< list on the tb object */
Efl_Canvas_Text_Data *textblock;
Evas_Object_Textblock_Text_Item *ti; /**< associated text item. if null, it was deleted */
Evas_Filter_Context *ctx; /**< running context for the filter */
Evas_Public_Data *evas; /**< evas instance */
void *output; /**< output rgba buffer for this text item (engine image) */
Eina_Bool do_async; /**< do_async flag when running the filter */
};
struct _Efl_Canvas_Text_Filter
{
Eina_Stringshare *name;
Evas_Object *eo_obj;
Evas_Public_Data *evas;
void *dc; /* draw context - no clip, white, no colmul... */
Evas_Filter_Padding pad;
Eina_Bool invalid;
Eina_Bool redraw;
};
struct _Efl_Canvas_Text_Filter_Post_Render
{
Evas_Filter_Context *ctx;
Eina_Bool success;
};
struct _Efl_Canvas_Text_Filter_Program
{
EINA_INLIST;
Eina_Stringshare *name;
Eina_Stringshare *code;
Evas_Filter_Program *pgm;
Eina_Bool changed;
};
struct _Evas_Object_Textblock_Format
{
Evas_Object_Textblock_Node_Format *fnode; /**< Pointer to textblock format node. */
double halign; /**< Horizontal alignment value. */
double valign; /**< Vertical alignment value. */
struct {
Evas_Font_Description *fdesc; /**< Pointer to font description. */
const char *source; /**< Pointer to object from which to search for the font. */
Evas_Font_Set *font; /**< Pointer to font set. */
Evas_Font_Size size; /**< Size of the font. */
Efl_Text_Font_Bitmap_Scalable bitmap_scalable; /**< Scalable for bitmap font. */
} font;
struct {
struct {
unsigned char r, g, b, a;
} normal, underline, underline2, underline_dash, outline, shadow, glow, glow2, backing,
strikethrough;
} color;
struct {
int l, r;
} margin; /**< Left and right margin width. */
Efl_Canvas_Text_Filter *gfx_filter; /**< Gfx Filter to apply to the children text items */
int ref; /**< Value of the ref. */
int tabstops; /**< Value of the size of the tab character. */
int linesize; /**< Value of the size of the line of the text. */
int linegap; /**< Value to set the line gap in text. */
int underline_dash_width; /**< Valule to set the width of the underline dash. */
int underline_dash_gap; /**< Value to set the gap of the underline dash. */
double underline_height; /**< Value to set the height of the single underline. */
double linerelsize; /**< Value to set the size of line of text. */
double linerelgap; /**< Value for setting line gap. */
double linefill; /**< The value must be a percentage. */
double ellipsis; /**< The value should be a number. Any value smaller than 0.0 or greater than 1.0 disables ellipsis. A value of 0 means ellipsizing the leftmost portion of the text first, 1 on the other hand the rightmost portion. */
unsigned char style; /**< Value from Evas_Text_Style_Type enum. */
Eina_Bool wrap_word : 1; /**< EINA_TRUE if only wraps lines at word boundaries, else EINA_FALSE. */
Eina_Bool wrap_char : 1; /**< EINA_TRUE if wraps at any character, else EINA_FALSE. */
Eina_Bool wrap_mixed : 1; /**< EINA_TRUE if wrap at words if possible, else EINA_FALSE. */
Eina_Bool wrap_hyphenation : 1; /**< EINA_TRUE if wrap at mixed and hyphenate if possible, else EINA_FALSE. */
Eina_Bool underline : 1; /**< EINA_TRUE if a single line under the text, else EINA_FALSE */
Eina_Bool underline2 : 1; /**< EINA_TRUE if two lines under the text, else EINA_FALSE */
Eina_Bool underline_dash : 1; /**< EINA_TRUE if a dashed line under the text, else EINA_FALSE */
Eina_Bool strikethrough : 1; /**< EINA_TRUE if text should be stricked off, else EINA_FALSE */
Eina_Bool backing : 1; /**< EINA_TRUE if enable background color, else EINA_FALSE */
Eina_Bool password : 1; /**< EINA_TRUE if the text is password, else EINA_FALSE */
Evas_Textblock_Align_Auto halign_auto : 2; /**< Auto horizontal align mode */
};
struct _Efl_Canvas_Text_Style
{
const char *style_text;
char *default_tag;
Eina_Stringshare *key; /* FIXME: Very hacky. */
Evas_Object_Style_Tag *tags;
Eina_List *objects;
Eina_Bool delete_me : 1;
};
struct _Efl_Text_Cursor_Cursor
{
Evas_Object *obj;
size_t pos;
Evas_Object_Textblock_Node_Text *node;
Eina_Bool changed : 1;
};
struct _Efl_Text_Annotate_Annotation
{
EINA_INLIST;
Evas_Object *obj;
Evas_Object_Textblock_Node_Format *start_node, *end_node;
Eina_Bool is_item : 1; /**< indicates it is an item/object placeholder */
};
#define _FMT(x) (o->default_format.format.x)
#define _FMT_INFO(x) (o->default_format.info.x)
/* Size of the index array */
#define TEXTBLOCK_PAR_INDEX_SIZE 10
#define ASYNC_BLOCK do { \
if (o->layout_th) \
{ \
ecore_thread_wait(o->layout_th, 1); \
}} while(0)
#include "Ecore.h"
struct _Evas_Object_Textblock
{
Ecore_Thread *layout_th;
int layout_jobs;
Evas_Textblock_Style *style;
Eina_List *styles;
Efl_Text_Cursor_Cursor *cursor;
Eina_List *cursors;
Evas_Object_Textblock_Node_Text *text_nodes;
Evas_Object_Textblock_Node_Format *format_nodes;
int num_paragraphs;
Evas_Object_Textblock_Paragraph *paragraphs;
Evas_Object_Textblock_Paragraph *par_index[TEXTBLOCK_PAR_INDEX_SIZE];
Evas_Object_Textblock_Text_Item *ellip_ti;
Eina_List *ellip_prev_it; /* item that is placed before ellipsis item (0.0 <= ellipsis < 1.0), if required */
Eina_List *anchors_a;
Eina_List *anchors_item;
Eina_List *obstacles;
Eina_List *hyphen_items; /* Hyphen items storage to free when clearing lines */
Efl_Text_Annotate_Annotation *annotations; /* All currently applied annotations on the text. */
int last_w, last_h;
struct {
int l, r, t, b;
} style_pad;
struct {
Evas_Object_Textblock_Format format;
struct {
Eina_Stringshare *font;
Evas_Font_Size size;
Eina_Stringshare *font_source;
Eina_Stringshare *font_fallbacks;
Eina_Stringshare *font_lang;
Eina_Stringshare *gfx_filter_name;
unsigned int font_weight;
unsigned int font_slant;
unsigned int font_width;
Efl_Text_Style_Effect_Type effect;
Efl_Text_Style_Shadow_Direction shadow_direction;
Efl_Text_Format_Wrap wrap;
Efl_Text_Font_Bitmap_Scalable bitmap_scalable;
} info;
} default_format;
double valign;
Eina_Stringshare *markup_text;
char *utf8;
void *engine_data;
const char *repch;
const char *bidi_delimiters;
Evas_BiDi_Direction paragraph_direction : 2;
struct {
int w, h, oneline_h;
Eina_Bool valid : 1;
} formatted, native;
struct {
Efl_Canvas_Text_Filter_Program *programs;
Evas_Filter_Data_Binding *data_bindings;
Eina_Hash *sources;
Text_Item_Filter *text_items; // inlist
} gfx_filter;
Eina_Bool redraw : 1;
Eina_Bool changed : 1;
Eina_Bool obstacle_changed : 1;
Eina_Bool content_changed : 1;
Eina_Bool format_changed : 1;
Eina_Bool have_ellipsis : 1;
Eina_Bool hyphenating : 1;
Eina_Bool legacy_newline : 1;
Eina_Bool inherit_paragraph_direction : 1;
Eina_Bool changed_paragraph_direction : 1;
Eina_Bool multiline : 1;
Eina_Bool wrap_changed : 1;
};
struct _Evas_Textblock_Selection_Iterator
{
Eina_Iterator iterator; /**< Eina Iterator. */
Eina_List *list; /**< Head of list. */
Eina_List *current; /**< Current node in loop. */
};
struct _Efl_Text_Annotate_Annotation_Iterator
{
Eina_Iterator iterator; /**< Eina Iterator. */
Eina_List *list; /**< Head of list. */
Eina_List *current; /**< Current node in loop. */
};
/* private methods for textblock objects */
static void evas_object_textblock_init(Evas_Object *eo_obj);
static void evas_object_textblock_render(Evas_Object *eo_obj,
Evas_Object_Protected_Data *obj,
void *type_private_data,
void *engine, void *output, void *context, void *surface,
int x, int y, Eina_Bool do_async);
static void evas_object_textblock_free(Evas_Object *eo_obj);
static void evas_object_textblock_render_pre(Evas_Object *eo_obj,
Evas_Object_Protected_Data *obj,
void *type_private_data);
static void evas_object_textblock_render_post(Evas_Object *eo_obj,
Evas_Object_Protected_Data *obj,
void *type_private_data);
static Evas_Object_Textblock_Node_Text *_evas_textblock_node_text_new(void);
static unsigned int evas_object_textblock_id_get(Evas_Object *eo_obj);
static unsigned int evas_object_textblock_visual_id_get(Evas_Object *eo_obj);
static void *evas_object_textblock_engine_data_get(Evas_Object *eo_obj);
static int evas_object_textblock_is_opaque(Evas_Object *eo_obj,
Evas_Object_Protected_Data *obj,
void *type_private_data);
static int evas_object_textblock_was_opaque(Evas_Object *eo_obj,
Evas_Object_Protected_Data *obj,
void *type_private_data);
static void evas_object_textblock_coords_recalc(Evas_Object *eo_obj,
Evas_Object_Protected_Data *obj,
void *type_private_data);
static void evas_object_textblock_scale_update(Evas_Object *eo_obj,
Evas_Object_Protected_Data *obj,
void *type_private_data);
static const Evas_Object_Func object_func =
{
/* methods (compulsory) */
NULL,
evas_object_textblock_render,
evas_object_textblock_render_pre,
evas_object_textblock_render_post,
evas_object_textblock_id_get,
evas_object_textblock_visual_id_get,
evas_object_textblock_engine_data_get,
/* these are optional. NULL = nothing */
NULL,
NULL,
NULL,
NULL,
evas_object_textblock_is_opaque,
evas_object_textblock_was_opaque,
NULL,
NULL,
NULL, /*evas_object_textblock_coords_recalc, <- disable - not useful. */
evas_object_textblock_scale_update,
NULL,
NULL,
NULL,
NULL, // render_prepare
NULL
};
/* the actual api call to add a textblock */
#define TB_HEAD() \
MAGIC_CHECK(eo_obj, Evas_Object, MAGIC_OBJ); \
return; \
MAGIC_CHECK_END(); \
Efl_Canvas_Text_Data *o = efl_data_scope_get(eo_obj, MY_CLASS);
#define TB_HEAD_RETURN(x) \
MAGIC_CHECK(eo_obj, Evas_Object, MAGIC_OBJ); \
return (x); \
MAGIC_CHECK_END();
static Eina_Bool _evas_textblock_cursor_is_at_the_end(const Efl_Text_Cursor_Cursor *cur);
static void _evas_textblock_node_text_remove(Efl_Canvas_Text_Data *o, Evas_Object_Textblock_Node_Text *n);
static Evas_Object_Textblock_Node_Format *_evas_textblock_cursor_node_format_before_or_at_pos_get(const Efl_Text_Cursor_Cursor *cur);
static size_t _evas_textblock_node_format_pos_get(const Evas_Object_Textblock_Node_Format *fmt);
static void _evas_textblock_node_format_remove(Efl_Canvas_Text_Data *o, Evas_Object_Textblock_Node_Format *n, int visual_adjustment);
static void _evas_textblock_node_format_free(Efl_Canvas_Text_Data *o, Evas_Object_Textblock_Node_Format *n);
static void _evas_textblock_node_text_free(Evas_Object_Textblock_Node_Text *n);
static void _evas_textblock_changed(Efl_Canvas_Text_Data *o, Evas_Object *eo_obj);
static void _evas_textblock_invalidate_all(Efl_Canvas_Text_Data *o);
static void _evas_textblock_cursors_update_offset(const Efl_Text_Cursor_Cursor *cur, const Evas_Object_Textblock_Node_Text *n, size_t start, int offset);
static void _evas_textblock_cursors_set_node(Efl_Canvas_Text_Data *o, const Evas_Object_Textblock_Node_Text *n, Evas_Object_Textblock_Node_Text *new_node);
static void _evas_textblock_annotations_clear(Efl_Canvas_Text_Data *o);
static void _evas_textblock_annotation_remove(Efl_Canvas_Text_Data *o, Efl_Text_Annotate_Annotation *an, Eina_Bool remove_nodes);
static Eina_Bool _evas_textblock_cursor_format_is_visible_get(const Efl_Text_Cursor_Cursor *cur);
static void _evas_textblock_cursor_at_format_set(Efl_Text_Cursor_Cursor *cur, const Evas_Object_Textblock_Node_Format *fmt);
static void _evas_textblock_cursor_init(Efl_Text_Cursor_Cursor *cur, const Evas_Object *tb);
static Evas_Filter_Program *_format_filter_program_get(Efl_Canvas_Text_Data *o, Evas_Object_Textblock_Format *fmt);
#ifdef HAVE_HYPHEN
/* Hyphenation */
#include "evas_textblock_hyphenation.x"
#endif
static int _efl_canvas_text_cursor_text_append(Efl_Text_Cursor_Cursor *cur, const char *text);
static Eina_Bool _evas_textblock_cursor_format_append(Efl_Text_Cursor_Cursor *cur, const char *format, Evas_Object_Textblock_Node_Format **_fnode, Eina_Bool is_item);
EAPI Eina_Bool evas_textblock_cursor_eol_get(const Evas_Textblock_Cursor *cur);
static void _evas_textblock_cursor_init(Efl_Text_Cursor_Cursor *cur, const Evas_Object *tb);
static Eina_Bool _evas_textblock_cursor_format_is_visible_get(const Efl_Text_Cursor_Cursor *cur);
static void _find_layout_item_line_match(Evas_Object *eo_obj, Evas_Object_Textblock_Node_Text *n, size_t pos, Evas_Object_Textblock_Line **lnr, Evas_Object_Textblock_Item **itr);
static Evas_Object_Textblock_Node_Format *_evas_textblock_cursor_node_format_at_pos_get(const Efl_Text_Cursor_Cursor *cur);
static int _evas_textblock_cursor_text_prepend(Efl_Text_Cursor_Cursor *cur, const char *_text);
static void _evas_textblock_cursor_copy(Efl_Text_Cursor_Cursor *dst, const Efl_Text_Cursor_Cursor *src);
/** selection iterator */
/**
* @internal
* Returns the value of the current data of list node,
* and goes to the next list node.
*
* @param it the iterator.
* @param data the data of the current list node.
* @return EINA_FALSE if the current list node does not exists.
* Otherwise, returns EINA_TRUE.
*/
static Eina_Bool
_evas_textblock_selection_iterator_next(Evas_Textblock_Selection_Iterator *it, void **data)
{
if (!it->current)
return EINA_FALSE;
*data = eina_list_data_get(it->current);
it->current = eina_list_next(it->current);
return EINA_TRUE;
}
/**
* @internal
* Gets the iterator container (Eina_List) which created the iterator.
* @param it the iterator.
* @return A pointer to Eina_List.
*/
static Eina_List *
_evas_textblock_selection_iterator_get_container(Evas_Textblock_Selection_Iterator *it)
{
return it->list;
}
/**
* @internal
* Frees the iterator container (Eina_List).
* @param it the iterator.
*/
static void
_evas_textblock_selection_iterator_free(Evas_Textblock_Selection_Iterator *it)
{
Evas_Textblock_Rectangle *tr;
EINA_LIST_FREE(it->list, tr)
free(tr);
EINA_MAGIC_SET(&it->iterator, 0);
free(it);
}
/**
* @internal
* Creates newly allocated iterator associated to a list.
* @param list The list.
* @return If the memory cannot be allocated, NULL is returned.
* Otherwise, a valid iterator is returned.
*/
Eina_Iterator *
_evas_textblock_selection_iterator_new(Eina_List *list)
{
Evas_Textblock_Selection_Iterator *it;
it = calloc(1, sizeof(Evas_Textblock_Selection_Iterator));
if (!it) return NULL;
EINA_MAGIC_SET(&it->iterator, EINA_MAGIC_ITERATOR);
it->list = list;
it->current = list;
it->iterator.version = EINA_ITERATOR_VERSION;
it->iterator.next = FUNC_ITERATOR_NEXT(
_evas_textblock_selection_iterator_next);
it->iterator.get_container = FUNC_ITERATOR_GET_CONTAINER(
_evas_textblock_selection_iterator_get_container);
it->iterator.free = FUNC_ITERATOR_FREE(
_evas_textblock_selection_iterator_free);
return &it->iterator;
}
/* styles */
/**
* @internal
* Clears the textblock style passed except for the style_text which is replaced.
* @param ts The ts to be cleared. Must not be NULL.
* @param style_text the style's text.
*/
static void
_style_replace(Evas_Textblock_Style *ts, const char *style_text)
{
eina_stringshare_replace(&ts->style_text, style_text);
if (ts->default_tag) free(ts->default_tag);
while (ts->tags)
{
Evas_Object_Style_Tag *tag;
tag = (Evas_Object_Style_Tag *)ts->tags;
ts->tags = (Evas_Object_Style_Tag *)eina_inlist_remove(EINA_INLIST_GET(ts->tags), EINA_INLIST_GET(tag));
free(tag->tag.tag);
free(tag->tag.replace);
free(tag);
}
ts->default_tag = NULL;
ts->tags = NULL;
}
/**
* @internal
* Clears the textblock style passed.
* @param ts The ts to be cleared. Must not be NULL.
*/
static void
_style_clear(Evas_Textblock_Style *ts)
{
_style_replace(ts, NULL);
}
/**
* @internal
* Searches inside the tags stored in the style for the tag matching s.
* @param ts The ts to be cleared. Must not be NULL.
* @param s The tag to be matched.
* @param tag_len the length of the tag string.
* @param[out] replace_len The length of the replcaement found. - Must not be NULL.
* @return The replacement string found.
*/
static inline const char *
_style_match_tag(const Evas_Textblock_Style *ts, const char *s, size_t tag_len, size_t *replace_len)
{
Evas_Object_Style_Tag *tag;
/* Try the style tags */
if (ts)
{
EINA_INLIST_FOREACH(ts->tags, tag)
{
if (tag->tag.tag_len != tag_len) continue;
if (!strncmp(tag->tag.tag, s, tag_len))
{
*replace_len = tag->tag.replace_len;
return tag->tag.replace;
}
}
}
/* Try the default tags */
{
size_t i;
const Evas_Object_Style_Tag_Base *btag;
for (btag = default_tags, i = 0 ;
i < (sizeof(default_tags) / sizeof(default_tags[0])) ;
btag++, i++)
{
if (btag->tag_len != tag_len) continue;
if (!strncmp(btag->tag, s, tag_len))
{
*replace_len = btag->replace_len;
return btag->replace;
}
}
}
*replace_len = 0;
return NULL;
}
/**
* @internal
* Clears all the nodes (text and format) of the textblock object.
* @param obj The evas object, must not be NULL.
*/
static void
_nodes_clear(const Evas_Object *eo_obj)
{
Efl_Canvas_Text_Data *o = efl_data_scope_get(eo_obj, MY_CLASS);
/* First, clear all annotations that may have spawned format nodes. */
_evas_textblock_annotations_clear(o);
while (o->text_nodes)
{
Evas_Object_Textblock_Node_Text *n;
n = o->text_nodes;
o->text_nodes = _NODE_TEXT(eina_inlist_remove(
EINA_INLIST_GET(o->text_nodes), EINA_INLIST_GET(n)));
_evas_textblock_node_text_free(n);
}
while (o->format_nodes)
{
Evas_Object_Textblock_Node_Format *n;
n = o->format_nodes;
o->format_nodes = _NODE_FORMAT(eina_inlist_remove(EINA_INLIST_GET(o->format_nodes), EINA_INLIST_GET(n)));
_evas_textblock_node_format_free(o, n);
}
}
/**
* @internal
* Unrefs and frees (if needed) a textblock format.
* @param obj The Evas_Object, Must not be NULL.
* @param fmt the format to be cleaned, must not be NULL.
*/
static void
_format_unref_free(Evas_Object_Protected_Data *evas_o, Evas_Object_Textblock_Format *fmt)
{
Evas_Object_Protected_Data *obj = evas_o;
fmt->ref--;
if (fmt->ref > 0) return;
if (fmt->font.fdesc) evas_font_desc_unref(fmt->font.fdesc);
if (fmt->font.source) eina_stringshare_del(fmt->font.source);
if (fmt->gfx_filter)
{
eina_stringshare_del(fmt->gfx_filter->name);
if (fmt->gfx_filter->dc)
ENFN->context_free(ENC, fmt->gfx_filter->dc);
free(fmt->gfx_filter);
fmt->gfx_filter = NULL;
}
if ((obj->layer) && (obj->layer->evas))
evas_font_free(obj->layer->evas->evas, fmt->font.font);
free(fmt);
}
static inline void
_image_safe_unref(Evas_Public_Data *e, void *image, Eina_Bool async)
{
if (!image) return;
if (async)
evas_unref_queue_image_put(e, image);
else
e->engine.func->image_free(_evas_engine_context(e), image);
}
/**
* @internal
* Free a layout item
* @param obj The evas object, must not be NULL.
* @param ln the layout line on which the item is in, must not be NULL.
* @param it the layout item to be freed
*/
static void
_item_free(Evas_Public_Data *evas,
Efl_Canvas_Text_Data *o,
Evas_Object_Protected_Data *evas_o,
Evas_Object_Textblock_Line *ln, Evas_Object_Textblock_Item *it)
{
if (it->type == EVAS_TEXTBLOCK_ITEM_TEXT)
{
Evas_Object_Textblock_Text_Item *ti = _ITEM_TEXT(it);
evas_common_text_props_content_unref(&ti->text_props);
if (EINA_UNLIKELY(ti->gfx_filter != NULL))
{
if (ti->gfx_filter->output)
{
//Evas *eo_evas = evas_object_evas_get(eo_obj);
//Evas_Public_Data *evas = efl_data_scope_get(eo_evas, EVAS_CANVAS_CLASS);
Eina_Bool async = ti->gfx_filter->do_async;
_image_safe_unref(evas, ti->gfx_filter->output, async);
ti->gfx_filter->output = NULL;
}
EINA_INLIST_REMOVE(o->gfx_filter.text_items, ti->gfx_filter);
if (!ti->gfx_filter->ctx)
{
free(ti->gfx_filter);
ti->gfx_filter = NULL;
}
else
{
evas_filter_context_unref(ti->gfx_filter->ctx);
ti->gfx_filter->ctx = NULL;
ti->gfx_filter->ti = NULL;
}
}
}
else
{
Evas_Object_Textblock_Format_Item *fi = _ITEM_FORMAT(it);
if (fi->item) eina_stringshare_del(fi->item);
}
_format_unref_free(evas_o, it->format);
if (ln)
{
ln->items = (Evas_Object_Textblock_Item *) eina_inlist_remove(
EINA_INLIST_GET(ln->items), EINA_INLIST_GET(it));
}
free(it);
}
/**
* @internal
* Free a layout line.
* @param obj The evas object, must not be NULL.
* @param ln the layout line to be freed, must not be NULL.
*/
static void
_line_free(Evas_Object_Textblock_Line *ln)
{
/* Items are freed from the logical list, except for the ellip item */
if (ln) free(ln);
}
/* table of html escapes (that i can find) this should be ordered with the
* most common first as it's a linear search to match - no hash for this.
*
* these are stored as one large string and one additional array that
* contains the offsets to the tokens for space efficiency.
*/
/**
* @internal
* @var escape_strings[]
* This string consists of NULL terminated pairs of strings, the first of
* every pair is an escape and the second is the value of the escape.
*/
static const char escape_strings[] =
/* most common escaped stuff */
"&quot;\0" "\x22\0"
"&amp;\0" "\x26\0"
"&apos;\0" "\x27\0"
"&lt;\0" "\x3c\0"
"&gt;\0" "\x3e\0"
/* all the rest */
"&nbsp;\0" "\xc2\xa0\0"
"&iexcl;\0" "\xc2\xa1\0"
"&cent;\0" "\xc2\xa2\0"
"&pound;\0" "\xc2\xa3\0"
"&curren;\0" "\xc2\xa4\0"
"&yen;\0" "\xc2\xa5\0"
"&brvbar;\0" "\xc2\xa6\0"
"&sect;\0" "\xc2\xa7\0"
"&uml;\0" "\xc2\xa8\0"
"&copy;\0" "\xc2\xa9\0"
"&ordf;\0" "\xc2\xaa\0"
"&laquo;\0" "\xc2\xab\0"
"&not;\0" "\xc2\xac\0"
"&shy;\0" "\xc2\xad\0"
"&reg;\0" "\xc2\xae\0"
"&macr;\0" "\xc2\xaf\0"
"&deg;\0" "\xc2\xb0\0"
"&plusmn;\0" "\xc2\xb1\0"
"&sup2;\0" "\xc2\xb2\0"
"&sup3;\0" "\xc2\xb3\0"
"&acute;\0" "\xc2\xb4\0"
"&micro;\0" "\xc2\xb5\0"
"&para;\0" "\xc2\xb6\0"
"&middot;\0" "\xc2\xb7\0"
"&cedil;\0" "\xc2\xb8\0"
"&sup1;\0" "\xc2\xb9\0"
"&ordm;\0" "\xc2\xba\0"
"&raquo;\0" "\xc2\xbb\0"
"&frac14;\0" "\xc2\xbc\0"
"&frac12;\0" "\xc2\xbd\0"
"&frac34;\0" "\xc2\xbe\0"
"&iquest;\0" "\xc2\xbf\0"
"&Agrave;\0" "\xc3\x80\0"
"&Aacute;\0" "\xc3\x81\0"
"&Acirc;\0" "\xc3\x82\0"
"&Atilde;\0" "\xc3\x83\0"
"&Auml;\0" "\xc3\x84\0"
"&Aring;\0" "\xc3\x85\0"
"&Aelig;\0" "\xc3\x86\0"
"&Ccedil;\0" "\xc3\x87\0"
"&Egrave;\0" "\xc3\x88\0"
"&Eacute;\0" "\xc3\x89\0"
"&Ecirc;\0" "\xc3\x8a\0"
"&Euml;\0" "\xc3\x8b\0"
"&Igrave;\0" "\xc3\x8c\0"
"&Iacute;\0" "\xc3\x8d\0"
"&Icirc;\0" "\xc3\x8e\0"
"&Iuml;\0" "\xc3\x8f\0"
"&Eth;\0" "\xc3\x90\0"
"&Ntilde;\0" "\xc3\x91\0"
"&Ograve;\0" "\xc3\x92\0"
"&Oacute;\0" "\xc3\x93\0"
"&Ocirc;\0" "\xc3\x94\0"
"&Otilde;\0" "\xc3\x95\0"
"&Ouml;\0" "\xc3\x96\0"
"&times;\0" "\xc3\x97\0"
"&Oslash;\0" "\xc3\x98\0"
"&Ugrave;\0" "\xc3\x99\0"
"&Uacute;\0" "\xc3\x9a\0"
"&Ucirc;\0" "\xc3\x9b\0"
"&Yacute;\0" "\xc3\x9d\0"
"&Thorn;\0" "\xc3\x9e\0"
"&szlig;\0" "\xc3\x9f\0"
"&agrave;\0" "\xc3\xa0\0"
"&aacute;\0" "\xc3\xa1\0"
"&acirc;\0" "\xc3\xa2\0"
"&atilde;\0" "\xc3\xa3\0"
"&auml;\0" "\xc3\xa4\0"
"&aring;\0" "\xc3\xa5\0"
"&aelig;\0" "\xc3\xa6\0"
"&ccedil;\0" "\xc3\xa7\0"
"&egrave;\0" "\xc3\xa8\0"
"&eacute;\0" "\xc3\xa9\0"
"&ecirc;\0" "\xc3\xaa\0"
"&euml;\0" "\xc3\xab\0"
"&igrave;\0" "\xc3\xac\0"
"&iacute;\0" "\xc3\xad\0"
"&icirc;\0" "\xc3\xae\0"
"&iuml;\0" "\xc3\xaf\0"
"&eth;\0" "\xc3\xb0\0"
"&ntilde;\0" "\xc3\xb1\0"
"&ograve;\0" "\xc3\xb2\0"
"&oacute;\0" "\xc3\xb3\0"
"&ocirc;\0" "\xc3\xb4\0"
"&otilde;\0" "\xc3\xb5\0"
"&ouml;\0" "\xc3\xb6\0"
"&divide;\0" "\xc3\xb7\0"
"&oslash;\0" "\xc3\xb8\0"
"&ugrave;\0" "\xc3\xb9\0"
"&uacute;\0" "\xc3\xba\0"
"&ucirc;\0" "\xc3\xbb\0"
"&uuml;\0" "\xc3\xbc\0"
"&yacute;\0" "\xc3\xbd\0"
"&thorn;\0" "\xc3\xbe\0"
"&yuml;\0" "\xc3\xbf\0"
"&alpha;\0" "\xce\x91\0"
"&beta;\0" "\xce\x92\0"
"&gamma;\0" "\xce\x93\0"
"&delta;\0" "\xce\x94\0"
"&epsilon;\0" "\xce\x95\0"
"&zeta;\0" "\xce\x96\0"
"&eta;\0" "\xce\x97\0"
"&theta;\0" "\xce\x98\0"
"&iota;\0" "\xce\x99\0"
"&kappa;\0" "\xce\x9a\0"
"&lambda;\0" "\xce\x9b\0"
"&mu;\0" "\xce\x9c\0"
"&nu;\0" "\xce\x9d\0"
"&xi;\0" "\xce\x9e\0"
"&omicron;\0" "\xce\x9f\0"
"&pi;\0" "\xce\xa0\0"
"&rho;\0" "\xce\xa1\0"
"&sigma;\0" "\xce\xa3\0"
"&tau;\0" "\xce\xa4\0"
"&upsilon;\0" "\xce\xa5\0"
"&phi;\0" "\xce\xa6\0"
"&chi;\0" "\xce\xa7\0"
"&psi;\0" "\xce\xa8\0"
"&omega;\0" "\xce\xa9\0"
"&hellip;\0" "\xe2\x80\xa6\0"
"&euro;\0" "\xe2\x82\xac\0"
"&larr;\0" "\xe2\x86\x90\0"
"&uarr;\0" "\xe2\x86\x91\0"
"&rarr;\0" "\xe2\x86\x92\0"
"&darr;\0" "\xe2\x86\x93\0"
"&harr;\0" "\xe2\x86\x94\0"
"&larr;\0" "\xe2\x87\x90\0"
"&rarr;\0" "\xe2\x87\x92\0"
"&forall;\0" "\xe2\x88\x80\0"
"&exist;\0" "\xe2\x88\x83\0"
"&nabla;\0" "\xe2\x88\x87\0"
"&prod;\0" "\xe2\x88\x8f\0"
"&sum;\0" "\xe2\x88\x91\0"
"&and;\0" "\xe2\x88\xa7\0"
"&or;\0" "\xe2\x88\xa8\0"
"&int;\0" "\xe2\x88\xab\0"
"&ne;\0" "\xe2\x89\xa0\0"
"&equiv;\0" "\xe2\x89\xa1\0"
"&oplus;\0" "\xe2\x8a\x95\0"
"&perp;\0" "\xe2\x8a\xa5\0"
"&dagger;\0" "\xe2\x80\xa0\0"
"&Dagger;\0" "\xe2\x80\xa1\0"
"&bull;\0" "\xe2\x80\xa2\0"
"&zwnj;\0" "\xe2\x80\x8c\0"
"&zwj;\0" "\xe2\x80\x8d\0"
"&lrm;\0" "\xe2\x80\x8e\0"
"&rlm;\0" "\xe2\x80\x8f\0"
;
/**
* @internal
* Checks if a char is a whitespace.
* @param c the unicode codepoint.
* @return @c EINA_TRUE if the unicode codepoint is a whitespace, @c EINA_FALSE
* otherwise.
*/
static Eina_Bool
_is_white(Eina_Unicode c)
{
/*
* unicode list of whitespace chars
*
* 0009..000D <control-0009>..<control-000D>
* 0020 SPACE
* 0085 <control-0085>
* 00A0 NO-BREAK SPACE
* 1680 OGHAM SPACE MARK
* 180E MONGOLIAN VOWEL SEPARATOR
* 2000..200A EN QUAD..HAIR SPACE
* 2028 LINE SEPARATOR
* 2029 PARAGRAPH SEPARATOR
* 202F NARROW NO-BREAK SPACE
* 205F MEDIUM MATHEMATICAL SPACE
* 3000 IDEOGRAPHIC SPACE
*/
if (
(c == 0x20) ||
((c >= 0x9) && (c <= 0xd)) ||
(c == 0x85) ||
(c == 0xa0) ||
(c == 0x1680) ||
(c == 0x180e) ||
((c >= 0x2000) && (c <= 0x200a)) ||
(c == 0x2028) ||
(c == 0x2029) ||
(c == 0x202f) ||
(c == 0x205f) ||
(c == 0x3000)
)
return EINA_TRUE;
return EINA_FALSE;
}
/**
* @internal
* Prepends the text between s and p to the main cursor of the object.
*
* @param cur the cursor to prepend to.
* @param[in] s start of the string
* @param[in] p end of the string
*/
static void
_prepend_text_run(Efl_Text_Cursor_Cursor *cur, const char *s, const char *p)
{
if ((s) && (p > s))
{
char *ts;
ts = alloca(p - s + 1);
strncpy(ts, s, p - s);
ts[p - s] = 0;
evas_textblock_cursor_text_prepend(cur, ts);
}
}
/* The refcount for the formats. */
static int format_refcount = 0;
/* Holders for the stringshares */
static const char *fontstr = NULL;
static const char *font_fallbacksstr = NULL;
static const char *font_sizestr = NULL;
static const char *font_sourcestr = NULL;
static const char *font_weightstr = NULL;
static const char *font_stylestr = NULL;
static const char *font_widthstr = NULL;
static const char *langstr = NULL;
static const char *colorstr = NULL;
static const char *underline_colorstr = NULL;
static const char *underline2_colorstr = NULL;
static const char *underline_dash_colorstr = NULL;
static const char *outline_colorstr = NULL;
static const char *shadow_colorstr = NULL;
static const char *glow_colorstr = NULL;
static const char *glow2_colorstr = NULL;
static const char *backing_colorstr = NULL;
static const char *strikethrough_colorstr = NULL;
static const char *alignstr = NULL;
static const char *valignstr = NULL;
static const char *text_valignstr = NULL;
static const char *wrapstr = NULL;
static const char *left_marginstr = NULL;
static const char *right_marginstr = NULL;
static const char *underlinestr = NULL;
static const char *strikethroughstr = NULL;
static const char *backingstr = NULL;
static const char *stylestr = NULL;
static const char *tabstopsstr = NULL;
static const char *linesizestr = NULL;
static const char *linerelsizestr = NULL;
static const char *linegapstr = NULL;
static const char *linerelgapstr = NULL;
static const char *itemstr = NULL;
static const char *linefillstr = NULL;
static const char *ellipsisstr = NULL;
static const char *passwordstr = NULL;
static const char *replacement_charstr = NULL;
static const char *underline_dash_widthstr = NULL;
static const char *underline_dash_gapstr = NULL;
static const char *underline_heightstr = NULL;
static const char *gfx_filterstr = NULL;
/**
* @page evas_textblock_style_page Evas Textblock Style Options
*
* @brief This page describes how to style text in an Evas Text Block.
*/
/**
* @internal
* Init the format strings.
*/
static void
_format_command_init(void)
{
if (format_refcount == 0)
{
/**
* @page evas_textblock_style_page Evas Textblock Style Options
*
* @section evas_textblock_style_index Index
*
* The following styling commands are accepted:
* @li @ref evas_textblock_style_font
* @li @ref evas_textblock_style_font_fallback
* @li @ref evas_textblock_style_font_size
* @li @ref evas_textblock_style_font_source
* @li @ref evas_textblock_style_font_weight
* @li @ref evas_textblock_style_font_style
* @li @ref evas_textblock_style_font_width
* @li @ref evas_textblock_style_lang
* @li @ref evas_textblock_style_color
* @li @ref evas_textblock_style_underline_color
* @li @ref evas_textblock_style_underline2_color
* @li @ref evas_textblock_style_underline_dash_color
* @li @ref evas_textblock_style_outline_color
* @li @ref evas_textblock_style_shadow_color
* @li @ref evas_textblock_style_glow_color
* @li @ref evas_textblock_style_glow2_color
* @li @ref evas_textblock_style_backing_color
* @li @ref evas_textblock_style_strikethrough_color
* @li @ref evas_textblock_style_align
* @li @ref evas_textblock_style_valign
* @li @ref evas_textblock_style_wrap
* @li @ref evas_textblock_style_left_margin
* @li @ref evas_textblock_style_right_margin
* @li @ref evas_textblock_style_underline
* @li @ref evas_textblock_style_strikethrough
* @li @ref evas_textblock_style_backing
* @li @ref evas_textblock_style_style
* @li @ref evas_textblock_style_tabstops
* @li @ref evas_textblock_style_linesize
* @li @ref evas_textblock_style_linerelsize
* @li @ref evas_textblock_style_linegap
* @li @ref evas_textblock_style_linerelgap
* @li @ref evas_textblock_style_item
* @li @ref evas_textblock_style_linefill
* @li @ref evas_textblock_style_ellipsis
* @li @ref evas_textblock_style_password
* @li @ref evas_textblock_style_underline_dash_width
* @li @ref evas_textblock_style_underline_dash_gap
* @li @ref evas_textblock_style_underline_height
*
* @section evas_textblock_style_contents Contents
*/
fontstr = eina_stringshare_add("font");
font_fallbacksstr = eina_stringshare_add("font_fallbacks");
font_sizestr = eina_stringshare_add("font_size");
font_sourcestr = eina_stringshare_add("font_source");
font_weightstr = eina_stringshare_add("font_weight");
font_stylestr = eina_stringshare_add("font_style");
font_widthstr = eina_stringshare_add("font_width");
langstr = eina_stringshare_add("lang");
colorstr = eina_stringshare_add("color");
underline_colorstr = eina_stringshare_add("underline_color");
underline2_colorstr = eina_stringshare_add("underline2_color");
underline_dash_colorstr = eina_stringshare_add("underline_dash_color");
outline_colorstr = eina_stringshare_add("outline_color");
shadow_colorstr = eina_stringshare_add("shadow_color");
glow_colorstr = eina_stringshare_add("glow_color");
glow2_colorstr = eina_stringshare_add("glow2_color");
backing_colorstr = eina_stringshare_add("backing_color");
strikethrough_colorstr = eina_stringshare_add("strikethrough_color");
alignstr = eina_stringshare_add("align");
valignstr = eina_stringshare_add("valign");
text_valignstr = eina_stringshare_add("text_valign");
wrapstr = eina_stringshare_add("wrap");
left_marginstr = eina_stringshare_add("left_margin");
right_marginstr = eina_stringshare_add("right_margin");
underlinestr = eina_stringshare_add("underline");
strikethroughstr = eina_stringshare_add("strikethrough");
backingstr = eina_stringshare_add("backing");
stylestr = eina_stringshare_add("style");
tabstopsstr = eina_stringshare_add("tabstops");
linesizestr = eina_stringshare_add("linesize");
linerelsizestr = eina_stringshare_add("linerelsize");
linegapstr = eina_stringshare_add("linegap");
linerelgapstr = eina_stringshare_add("linerelgap");
itemstr = eina_stringshare_add("item");
linefillstr = eina_stringshare_add("linefill");
ellipsisstr = eina_stringshare_add("ellipsis");
passwordstr = eina_stringshare_add("password");
replacement_charstr = eina_stringshare_add("replacement_char");
underline_dash_widthstr = eina_stringshare_add("underline_dash_width");
underline_dash_gapstr = eina_stringshare_add("underline_dash_gap");
underline_heightstr = eina_stringshare_add("underline_height");
gfx_filterstr = eina_stringshare_add("gfx_filter"); // FIXME: bg, fg filters
}
format_refcount++;
}
/**
* @internal
* Shutdown the format strings.
*/
static void
_format_command_shutdown(void)
{
if (--format_refcount > 0) return;
eina_stringshare_del(fontstr);
eina_stringshare_del(font_fallbacksstr);
eina_stringshare_del(font_sizestr);
eina_stringshare_del(font_sourcestr);
eina_stringshare_del(font_weightstr);
eina_stringshare_del(font_stylestr);
eina_stringshare_del(font_widthstr);
eina_stringshare_del(langstr);
eina_stringshare_del(colorstr);
eina_stringshare_del(underline_colorstr);
eina_stringshare_del(underline2_colorstr);
eina_stringshare_del(underline_dash_colorstr);
eina_stringshare_del(outline_colorstr);
eina_stringshare_del(shadow_colorstr);
eina_stringshare_del(glow_colorstr);
eina_stringshare_del(glow2_colorstr);
eina_stringshare_del(backing_colorstr);
eina_stringshare_del(strikethrough_colorstr);
eina_stringshare_del(alignstr);
eina_stringshare_del(valignstr);
eina_stringshare_del(text_valignstr);
eina_stringshare_del(wrapstr);
eina_stringshare_del(left_marginstr);
eina_stringshare_del(right_marginstr);
eina_stringshare_del(underlinestr);
eina_stringshare_del(strikethroughstr);
eina_stringshare_del(backingstr);
eina_stringshare_del(stylestr);
eina_stringshare_del(tabstopsstr);
eina_stringshare_del(linesizestr);
eina_stringshare_del(linerelsizestr);
eina_stringshare_del(linegapstr);
eina_stringshare_del(linerelgapstr);
eina_stringshare_del(itemstr);
eina_stringshare_del(linefillstr);
eina_stringshare_del(ellipsisstr);
eina_stringshare_del(passwordstr);
eina_stringshare_del(replacement_charstr);
eina_stringshare_del(underline_dash_widthstr);
eina_stringshare_del(underline_dash_gapstr);
eina_stringshare_del(underline_heightstr);
eina_stringshare_del(gfx_filterstr);
}
/**
* @internal
* Copies str to dst while removing the \\ char, i.e unescape the escape sequences.
*
* @param[out] dst the destination string - Should not be NULL.
* @param[in] src the source string - Should not be NULL.
*/
static int
_format_clean_param(Eina_Tmpstr *s)
{
Eina_Tmpstr *ss;
char *ds;
int len = 0;
ds = (char*) s;
for (ss = s; *ss; ss++, ds++, len++)
{
if ((*ss == '\\') && *(ss + 1)) ss++;
if (ds != ss) *ds = *ss;
}
*ds = 0;
return len;
}
/**
* @internal
* Parses the cmd and parameter and adds the parsed format to fmt.
*
* @param obj the evas object - should not be NULL.
* @param fmt The format to populate - should not be NULL.
* @param[in] cmd the command to process, should be stringshared.
* @param[in] param the parameter of the command.
*/
static void
_format_command(Evas_Object *eo_obj, Evas_Object_Textblock_Format *fmt, const char *cmd, Eina_Tmpstr *param)
{
int len;
len = _format_clean_param(param);
/* If we are changing the font, create the fdesc. */
if ((cmd == font_weightstr) || (cmd == font_widthstr) ||
(cmd == font_stylestr) || (cmd == langstr) ||
(cmd == fontstr) || (cmd == font_fallbacksstr))
{
if (!fmt->font.fdesc)
{
fmt->font.fdesc = evas_font_desc_new();
/* Set default language according to locale. */
eina_stringshare_replace(&(fmt->font.fdesc->lang),
evas_font_lang_normalize("auto"));
}
else if (!fmt->font.fdesc->is_new)
{
Evas_Font_Description *old = fmt->font.fdesc;
fmt->font.fdesc = evas_font_desc_dup(fmt->font.fdesc);
if (old) evas_font_desc_unref(old);
}
}
if (cmd == fontstr)
{
/**
* @page evas_textblock_style_page Evas Textblock Style Options
*
* @subsection evas_textblock_style_font Font
*
* This sets the name of the font to be used.
* @code
* font=<font name>
* @endcode
*/
evas_font_name_parse(fmt->font.fdesc, param);
}
else if (cmd == font_fallbacksstr)
{
/**
* @page evas_textblock_style_page Evas Textblock Style Options
*
* @subsection evas_textblock_style_font_fallback Font fallback
*
* This sets the name of the fallback font to be used. This font will
* be used if the primary font is not available.
* @code
* font_fallbacks=<font name>
* @endcode
*/
eina_stringshare_replace(&(fmt->font.fdesc->fallbacks), param);
}
else if (cmd == font_sizestr)
{
/**
* @page evas_textblock_style_page Evas Textblock Style Options
*
* @subsection evas_textblock_style_font_size Font size
*
* This sets the the size of font in points to be used.
* @code
* font_size=<size>
* @endcode
*/
int v;
v = atoi(param);
if (v != fmt->font.size)
{
fmt->font.size = v;
}
}
else if (cmd == font_sourcestr)
{
/**
* @page evas_textblock_style_page Evas Textblock Style Options
*
* @subsection evas_textblock_style_font_source Font source
*
* Specify an object from which to search for the font.
* @code
* font_source=<source>
* @endcode
*/
if ((!fmt->font.source) ||
((fmt->font.source) && (strcmp(fmt->font.source, param))))
{
eina_stringshare_replace(&(fmt->font.source), param);
}
}
else if (cmd == font_weightstr)
{
/**
* @page evas_textblock_style_page Evas Textblock Style Options
*
* @subsection evas_textblock_style_font_weight Font weight
*
* Sets the weight of the font. The value must be one of:
* @li "normal"
* @li "thin"
* @li "ultralight"
* @li "extralight"
* @li "light"
* @li "book"
* @li "medium"
* @li "semibold"
* @li "bold"
* @li "ultrabold"
* @li "extrabold"
* @li "black"
* @li "extrablack"
* @code
* font_weight=<weight>
* @endcode
*/
fmt->font.fdesc->weight = evas_font_style_find(param,
param + len,
EVAS_FONT_STYLE_WEIGHT);
}
else if (cmd == font_stylestr)
{
/**
* @page evas_textblock_style_page Evas Textblock Style Options
*
* @subsection evas_textblock_style_font_style Font style
*
* Sets the style of the font. The value must be one of:
* @li "normal"
* @li "oblique"
* @li "italic"
* @code
* font_style=<style>
* @endcode
*/
fmt->font.fdesc->slant = evas_font_style_find(param,
param + len,
EVAS_FONT_STYLE_SLANT);
}
else if (cmd == font_widthstr)
{
/**
* @page evas_textblock_style_page Evas Textblock Style Options
*
* @subsection evas_textblock_style_font_width Font width
*
* Sets the width of the font. The value must be one of:
* @li "normal"
* @li "ultracondensed"
* @li "extracondensed"
* @li "condensed"
* @li "semicondensed"
* @li "semiexpanded"
* @li "expanded"
* @li "extraexpanded"
* @li "ultraexpanded"
* @code
* font_width=<width>
* @endcode
*/
fmt->font.fdesc->width = evas_font_style_find(param,
param + len,
EVAS_FONT_STYLE_WIDTH);
}
else if (cmd == langstr)
{
/**
* @page evas_textblock_style_page Evas Textblock Style Options
*
* @subsection evas_textblock_style_lang Language
*
* Sets the language of the text for FontConfig.
* The value can either be a language text or one of presets:
* @li "auto" - Respects system locale settings as language
* @li "none" - Disable language support
* @code
* lang=<language>
* @endcode
*/
eina_stringshare_replace(&(fmt->font.fdesc->lang),
evas_font_lang_normalize(param));
}
else if (cmd == colorstr)
/**
* @page evas_textblock_style_page Evas Textblock Style Options
*
* @subsection evas_textblock_style_color Color
*
* Sets the color of the text. The following formats are accepted:
* @li "#RRGGBB"
* @li "#RRGGBBAA"
* @li "#RGB"
* @li "#RGBA"
* @code
* color=<color>
* @endcode
*/
evas_common_format_color_parse(param, len,
&(fmt->color.normal.r), &(fmt->color.normal.g),
&(fmt->color.normal.b), &(fmt->color.normal.a));
else if (cmd == underline_colorstr)
/**
* @page evas_textblock_style_page Evas Textblock Style Options
*
* @subsection evas_textblock_style_underline_color Underline Color
*
* Sets the color of the underline. The following formats are accepted:
* @li "#RRGGBB"
* @li "#RRGGBBAA"
* @li "#RGB"
* @li "#RGBA"
* @code
* underline_color=<color>
* @endcode
*/
evas_common_format_color_parse(param, len,
&(fmt->color.underline.r), &(fmt->color.underline.g),
&(fmt->color.underline.b), &(fmt->color.underline.a));
else if (cmd == underline2_colorstr)
/**
* @page evas_textblock_style_page Evas Textblock Style Options
*
* @subsection evas_textblock_style_underline2_color Second Underline Color
*
* Sets the color of the second line of underline(when using underline
* mode "double"). The following formats are accepted:
* @li "#RRGGBB"
* @li "#RRGGBBAA"
* @li "#RGB"
* @li "#RGBA"
* @code
* underline2_color=<color>
* @endcode
*/
evas_common_format_color_parse(param, len,
&(fmt->color.underline2.r), &(fmt->color.underline2.g),
&(fmt->color.underline2.b), &(fmt->color.underline2.a));
else if (cmd == underline_dash_colorstr)
/**
* @page evas_textblock_style_page Evas Textblock Style Options
*
* @subsection evas_textblock_style_underline_dash_color Underline Dash Color
*
* Sets the color of dashed underline. The following formats are accepted:
* @li "#RRGGBB"
* @li "#RRGGBBAA"
* @li "#RGB"
* @li "#RGBA"
* @code
* underline_dash_color=<color>
* @endcode
*/
evas_common_format_color_parse(param, len,
&(fmt->color.underline_dash.r), &(fmt->color.underline_dash.g),
&(fmt->color.underline_dash.b), &(fmt->color.underline_dash.a));
else if (cmd == outline_colorstr)
/**
* @page evas_textblock_style_page Evas Textblock Style Options
*
* @subsection evas_textblock_style_outline_color Outline Color
*
* Sets the color of the outline of the text. The following formats are
* accepted:
* @li "#RRGGBB"
* @li "#RRGGBBAA"
* @li "#RGB"
* @li "#RGBA"
* @code
* outline_color=<color>
* @endcode
*/
evas_common_format_color_parse(param, len,
&(fmt->color.outline.r), &(fmt->color.outline.g),
&(fmt->color.outline.b), &(fmt->color.outline.a));
else if (cmd == shadow_colorstr)
/**
* @page evas_textblock_style_page Evas Textblock Style Options
*
* @subsection evas_textblock_style_shadow_color Shadow Color
*
* Sets the color of the shadow of the text. The following formats are
* accepted:
* @li "#RRGGBB"
* @li "#RRGGBBAA"
* @li "#RGB"
* @li "#RGBA"
* @code
* shadow_color=<color>
* @endcode
*/
evas_common_format_color_parse(param, len,
&(fmt->color.shadow.r), &(fmt->color.shadow.g),
&(fmt->color.shadow.b), &(fmt->color.shadow.a));
else if (cmd == glow_colorstr)
/**
* @page evas_textblock_style_page Evas Textblock Style Options
*
* @subsection evas_textblock_style_glow_color First Glow Color
*
* Sets the first color of the glow of text. The following formats are
* accepted:
* @li "#RRGGBB"
* @li "#RRGGBBAA"
* @li "#RGB"
* @li "#RGBA"
* @code
* glow_color=<color>
* @endcode
*/
evas_common_format_color_parse(param, len,
&(fmt->color.glow.r), &(fmt->color.glow.g),
&(fmt->color.glow.b), &(fmt->color.glow.a));
else if (cmd == glow2_colorstr)
/**
* @page evas_textblock_style_page Evas Textblock Style Options
*
* @subsection evas_textblock_style_glow2_color Second Glow Color
*
* Sets the second color of the glow of text. The following formats are
* accepted:
* @li "#RRGGBB"
* @li "#RRGGBBAA"
* @li "#RGB"
* @li "#RGBA"
* @code
* glow2_color=<color>
* @endcode
*/
evas_common_format_color_parse(param, len,
&(fmt->color.glow2.r), &(fmt->color.glow2.g),
&(fmt->color.glow2.b), &(fmt->color.glow2.a));
else if (cmd == backing_colorstr)
/**
* @page evas_textblock_style_page Evas Textblock Style Options
*
* @subsection evas_textblock_style_backing_color Backing Color
*
* Sets a background color for text. The following formats are
* accepted:
* @li "#RRGGBB"
* @li "#RRGGBBAA"
* @li "#RGB"
* @li "#RGBA"
* @code
* backing_color=<color>
* @endcode
*/
evas_common_format_color_parse(param, len,
&(fmt->color.backing.r), &(fmt->color.backing.g),
&(fmt->color.backing.b), &(fmt->color.backing.a));
else if (cmd == strikethrough_colorstr)
/**
* @page evas_textblock_style_page Evas Textblock Style Options
*
* @subsection evas_textblock_style_strikethrough_color Strikethrough Color
*
* Sets the color of text that is striked through. The following formats
* are accepted:
* @li "#RRGGBB"
* @li "#RRGGBBAA"
* @li "#RGB"
* @li "#RGBA"
* @code
* strikethrough_color=<color>
* @endcode
*/
evas_common_format_color_parse(param, len,
&(fmt->color.strikethrough.r), &(fmt->color.strikethrough.g),
&(fmt->color.strikethrough.b), &(fmt->color.strikethrough.a));
else if (cmd == alignstr)
{
/**
* @page evas_textblock_style_page Evas Textblock Style Options
*
* @subsection evas_textblock_style_align Horizontal Align
*
* Sets the horizontal alignment of the text. The value can either be
* a number, a percentage or one of several presets:
* @li "auto" - Respects LTR/RTL settings
* @li "locale" - Respects locale(language) direction settings
* @li "center" - Centers the text in the line
* @li "middle" - Alias for "center"
* @li "left" - Puts the text at the left of the line
* @li "right" - Puts the text at the right of the line
* @li <number> - A number between 0.0 and 1.0 where 0.0 represents
* "left" and 1.0 represents "right"
* @li <number>% - A percentage between 0% and 100% where 0%
* represents "left" and 100% represents "right"
* @code
* align=<value or preset>
* @endcode
*/
if (len == 4 && !strcmp(param, "auto"))
{
fmt->halign_auto = EVAS_TEXTBLOCK_ALIGN_AUTO_NORMAL;
}
if (len == 6 && !strcmp(param, "locale"))
{
fmt->halign_auto = EVAS_TEXTBLOCK_ALIGN_AUTO_LOCALE;
}
else
{
static const struct {
const char *param;
int len;
double halign;
} halign_named[] = {
{ "middle", 6, 0.5 },
{ "center", 6, 0.5 },
{ "left", 4, 0.0 },
{ "right", 5, 1.0 },
{ NULL, 0, 0.0 }
};
unsigned int i;
for (i = 0; halign_named[i].param; i++)
if (len == halign_named[i].len &&
!strcmp(param, halign_named[i].param))
{
fmt->halign = halign_named[i].halign;
break;
}
if (halign_named[i].param == NULL)
{
char *endptr = NULL;
double val = strtod(param, &endptr);
if (endptr)
{
while (*endptr && _is_white(*endptr))
endptr++;
if (*endptr == '%')
val /= 100.0;
}
fmt->halign = val;
if (fmt->halign < 0.0) fmt->halign = 0.0;
else if (fmt->halign > 1.0) fmt->halign = 1.0;
}
fmt->halign_auto = EVAS_TEXTBLOCK_ALIGN_AUTO_NONE;
}
}
else if (cmd == valignstr)
{
/**
* @page evas_textblock_style_page Evas Textblock Style Options
*
* @subsection evas_textblock_style_valign Vertical Align
*
* Sets the vertical alignment of the text. The value can either be
* a number or one of the following presets:
* @li "top" - Puts text at the top of the line
* @li "center" - Centers the text in the line
* @li "middle" - Alias for "center"
* @li "bottom" - Puts the text at the bottom of the line
* @li "baseline" - Baseline
* @li "base" - Alias for "baseline"
* @li <number> - A number between 0.0 and 1.0 where 0.0 represents
* "top" and 1.0 represents "bottom"
* @li <number>% - A percentage between 0% and 100% where 0%
* represents "top" and 100% represents "bottom"
* @code
* valign=<value or preset>
* @endcode
*
* See explanation of baseline at:
* https://en.wikipedia.org/wiki/Baseline_%28typography%29
*/
static const struct {
const char *param;
int len;
double valign;
} valign_named[] = {
{ "top", 3, 0.0 },
{ "middle", 6, 0.5 },
{ "center", 6, 0.5 },
{ "bottom", 6, 1.0 },
{ "baseline", 8, -1.0 },
{ "base", 4, -1.0 },
{ NULL, 0, 0 }
};
unsigned int i;
for (i = 0; valign_named[i].param; i++)
if (len == valign_named[i].len &&
!strcmp(valign_named[i].param, param))
{
fmt->valign = valign_named[i].valign;
break;
}
if (valign_named[i].param == NULL)
{
char *endptr = NULL;
double val = strtod(param, &endptr);
if (endptr)
{
while (*endptr && _is_white(*endptr))
endptr++;
if (*endptr == '%')
val /= 100.0;
}
fmt->valign = val;
if (fmt->valign < 0.0) fmt->valign = 0.0;
else if (fmt->valign > 1.0) fmt->valign = 1.0;
}
}
else if (cmd == text_valignstr)
{
Efl_Canvas_Text_Data *o = efl_data_scope_get(eo_obj, MY_CLASS);
char *endptr = NULL;
double val = strtod(param, &endptr);
o->valign = val;
if (o->valign < 0.0) o->valign = 0.0;
else if (o->valign > 1.0) o->valign = 1.0;
}
else if (cmd == wrapstr)
{
/**
* @page evas_textblock_style_page Evas Textblock Style Options
*
* @subsection evas_textblock_style_wrap Wrap
*
* Sets the wrap policy of the text. The value must be one of the
* following:
* @li "word" - Only wraps lines at word boundaries
* @li "char" - Wraps at any character
* @li "mixed" - Wrap at words if possible, if not at any character
* @li "hyphenation" - Hyphenate if possible, if not wrap at words if possible, if not at any character
* @li "" - Don't wrap
* @code
* wrap=<value or preset>
* @endcode
*/
static const struct {
const char *param;
int len;
Eina_Bool wrap_word;
Eina_Bool wrap_char;
Eina_Bool wrap_mixed;
Eina_Bool wrap_hyphenation;
} wrap_named[] = {
{ "word", 4, 1, 0, 0, 0 },
{ "char", 4, 0, 1, 0, 0 },
{ "mixed", 5, 0, 0, 1, 0 },
{ "hyphenation", 11, 0, 0, 0, 1 },
{ NULL, 0, 0, 0, 0, 0 }
};
unsigned int i;
fmt->wrap_word = fmt->wrap_mixed = fmt->wrap_char =
fmt->wrap_hyphenation = 0;
for (i = 0; wrap_named[i].param; i++)
if (wrap_named[i].len == len &&
!strcmp(wrap_named[i].param, param))
{
fmt->wrap_word = wrap_named[i].wrap_word;
fmt->wrap_char = wrap_named[i].wrap_char;
fmt->wrap_mixed = wrap_named[i].wrap_mixed;
fmt->wrap_hyphenation = wrap_named[i].wrap_hyphenation;
break;
}
#ifdef HAVE_HYPHEN
/* Hyphenating textblocks are registered as "clients", so we load/unload
* the hyphenation dictionaries on-demand. */
if (fmt->wrap_hyphenation)
{
_dicts_hyphen_init(eo_obj);
}
#endif
}
else if (cmd == left_marginstr)
{
/**
* @page evas_textblock_style_page Evas Textblock Style Options
*
* @subsection evas_textblock_style_left_margin Left margin
*
* Sets the left margin of the text. The value can be a number, an
* increment, decrement or "reset":
* @li +<number> - Increments existing left margin by <number>
* @li -<number> - Decrements existing left margin by <number>
* @li <number> - Sets left margin to <number>
* @li "reset" - Sets left margin to 0
* @code
* left_margin=<value or reset>
* @endcode
*/
if (len == 5 && !strcmp(param, "reset"))
fmt->margin.l = 0;
else
{
if (param[0] == '+')
fmt->margin.l += atoi(&(param[1]));
else if (param[0] == '-')
fmt->margin.l -= atoi(&(param[1]));
else
fmt->margin.l = atoi(param);
if (fmt->margin.l < 0) fmt->margin.l = 0;
}
}
else if (cmd == right_marginstr)
{
/**
* @page evas_textblock_style_page Evas Textblock Style Options
*
* @subsection evas_textblock_style_right_margin Right margin
*
* Sets the right margin of the text. The value can be a number, an
* increment, decrement or "reset":
* @li +<number> - Increments existing right margin by <number>
* @li -<number> - Decrements existing right margin by <number>
* @li <number> - Sets left margin to <number>
* @li "reset" - Sets left margin to 0
* @code
* right_margin=<value or reset>
* @endcode
*/
if (len == 5 && !strcmp(param, "reset"))
fmt->margin.r = 0;
else
{
if (param[0] == '+')
fmt->margin.r += atoi(&(param[1]));
else if (param[0] == '-')
fmt->margin.r -= atoi(&(param[1]));
else
fmt->margin.r = atoi(param);
if (fmt->margin.r < 0) fmt->margin.r = 0;
}
}
else if (cmd == underlinestr)
{
/**
* @page evas_textblock_style_page Evas Textblock Style Options
*
* @subsection evas_textblock_style_underline Underline
*
* Sets if and how a text will be underlined. The value must be one of
* the following:
* @li "off" - No underlining
* @li "single" - A single line under the text
* @li "on" - Alias for "single"
* @li "double" - Two lines under the text
* @li "dashed" - A dashed line under the text
* @code
* underline=off/single/on/double/dashed
* @endcode
*/
static const struct {
const char *param;
int len;
Eina_Bool underline;
Eina_Bool underline2;
Eina_Bool underline_dash;
} underlines_named[] = {
{ "off", 3, 0, 0, 0 },
{ "on", 2, 1, 0, 0 },
{ "single", 6, 1, 0, 0 },
{ "double", 6, 1, 1, 0 },
{ "dashed", 6, 0, 0, 1 },
{ NULL, 0, 0, 0, 0 }
};
unsigned int i;
fmt->underline = fmt->underline2 = fmt->underline_dash = 0;
for (i = 0; underlines_named[i].param; ++i)
if (underlines_named[i].len == len &&
!strcmp(underlines_named[i].param, param))
{
fmt->underline = underlines_named[i].underline;
fmt->underline2 = underlines_named[i].underline2;
fmt->underline_dash = underlines_named[i].underline_dash;
break;
}
}
else if (cmd == strikethroughstr)
{
/**
* @page evas_textblock_style_page Evas Textblock Style Options
*
* @subsection evas_textblock_style_strikethrough Strikethrough
*
* Sets if the text will be striked through. The value must be one of
* the following:
* @li "off" - No strikethrough
* @li "on" - Strikethrough
* @code
* strikethrough=on/off
* @endcode
*/
if (len == 3 && !strcmp(param, "off"))
fmt->strikethrough = 0;
else if (len == 2 && !strcmp(param, "on"))
fmt->strikethrough = 1;
}
else if (cmd == backingstr)
{
/**
* @page evas_textblock_style_page Evas Textblock Style Options
*
* @subsection evas_textblock_style_backing Backing
*
* Sets if the text will have backing. The value must be one of
* the following:
* @li "off" - No backing
* @li "on" - Backing
* @code
* backing=on/off
* @endcode
*/
if (len == 3 && !strcmp(param, "off"))
fmt->backing = 0;
else if (len == 2 && !strcmp(param, "on"))
fmt->backing = 1;
}
else if (cmd == stylestr)
{
/**
* @page evas_textblock_style_page Evas Textblock Style Options
*
* @subsection evas_textblock_style_style Style
*
* Sets the style of the text. The value must be a string composed of
* two comma separated parts. The first part of the value sets the
* appearance of the text, the second the position.
*
* The first part may be any of the following values:
* @li "plain"
* @li "off" - Alias for "plain"
* @li "none" - Alias for "plain"
* @li "shadow"
* @li "outline"
* @li "soft_outline"
* @li "outline_shadow"
* @li "outline_soft_shadow"
* @li "glow"
* @li "far_shadow"
* @li "soft_shadow"
* @li "far_soft_shadow"
* The second part may be any of the following values:
* @li "bottom_right"
* @li "bottom"
* @li "bottom_left"
* @li "left"
* @li "top_left"
* @li "top"
* @li "top_right"
* @li "right"
* @code
* style=<appearance>,<position>
* @endcode
*/
const char *p;
char *p1, *p2, *pp;
p2 = alloca(len + 1);
*p2 = 0;
/* no comma */
if (!strstr(param, ",")) p1 = (char*) param;
else
{
p1 = alloca(len + 1);
*p1 = 0;
/* split string "str1,str2" into p1 and p2 (if we have more than
* 1 str2 eg "str1,str2,str3,str4" then we don't care. p2 just
* ends up being the last one as right now it's only valid to have
* 1 comma and 2 strings */
pp = p1;
for (p = param; *p; p++)
{
if (*p == ',')
{
*pp = 0;
pp = p2;
continue;
}
*pp = *p;
pp++;
}
*pp = 0;
}
if (!strcmp(p1, "off")) fmt->style = EVAS_TEXT_STYLE_PLAIN;
else if (!strcmp(p1, "none")) fmt->style = EVAS_TEXT_STYLE_PLAIN;
else if (!strcmp(p1, "plain")) fmt->style = EVAS_TEXT_STYLE_PLAIN;
else if (!strcmp(p1, "shadow")) fmt->style = EVAS_TEXT_STYLE_SHADOW;
else if (!strcmp(p1, "outline")) fmt->style = EVAS_TEXT_STYLE_OUTLINE;
else if (!strcmp(p1, "soft_outline")) fmt->style = EVAS_TEXT_STYLE_SOFT_OUTLINE;
else if (!strcmp(p1, "outline_shadow")) fmt->style = EVAS_TEXT_STYLE_OUTLINE_SHADOW;
else if (!strcmp(p1, "outline_soft_shadow")) fmt->style = EVAS_TEXT_STYLE_OUTLINE_SOFT_SHADOW;
else if (!strcmp(p1, "glow")) fmt->style = EVAS_TEXT_STYLE_GLOW;
else if (!strcmp(p1, "far_shadow")) fmt->style = EVAS_TEXT_STYLE_FAR_SHADOW;
else if (!strcmp(p1, "soft_shadow")) fmt->style = EVAS_TEXT_STYLE_SOFT_SHADOW;
else if (!strcmp(p1, "far_soft_shadow")) fmt->style = EVAS_TEXT_STYLE_FAR_SOFT_SHADOW;
else fmt->style = EVAS_TEXT_STYLE_PLAIN;
if (*p2)
{
if (!strcmp(p2, "bottom_right")) EVAS_TEXT_STYLE_SHADOW_DIRECTION_SET(fmt->style, EVAS_TEXT_STYLE_SHADOW_DIRECTION_BOTTOM_RIGHT);
else if (!strcmp(p2, "bottom")) EVAS_TEXT_STYLE_SHADOW_DIRECTION_SET(fmt->style, EVAS_TEXT_STYLE_SHADOW_DIRECTION_BOTTOM);
else if (!strcmp(p2, "bottom_left")) EVAS_TEXT_STYLE_SHADOW_DIRECTION_SET(fmt->style, EVAS_TEXT_STYLE_SHADOW_DIRECTION_BOTTOM_LEFT);
else if (!strcmp(p2, "left")) EVAS_TEXT_STYLE_SHADOW_DIRECTION_SET(fmt->style, EVAS_TEXT_STYLE_SHADOW_DIRECTION_LEFT);
else if (!strcmp(p2, "top_left")) EVAS_TEXT_STYLE_SHADOW_DIRECTION_SET(fmt->style, EVAS_TEXT_STYLE_SHADOW_DIRECTION_TOP_LEFT);
else if (!strcmp(p2, "top")) EVAS_TEXT_STYLE_SHADOW_DIRECTION_SET(fmt->style, EVAS_TEXT_STYLE_SHADOW_DIRECTION_TOP);
else if (!strcmp(p2, "top_right")) EVAS_TEXT_STYLE_SHADOW_DIRECTION_SET(fmt->style, EVAS_TEXT_STYLE_SHADOW_DIRECTION_TOP_RIGHT);
else if (!strcmp(p2, "right")) EVAS_TEXT_STYLE_SHADOW_DIRECTION_SET(fmt->style, EVAS_TEXT_STYLE_SHADOW_DIRECTION_RIGHT);
else EVAS_TEXT_STYLE_SHADOW_DIRECTION_SET(fmt->style, EVAS_TEXT_STYLE_SHADOW_DIRECTION_BOTTOM_RIGHT);
}
}
else if (cmd == tabstopsstr)
{
/**
* @page evas_textblock_style_page Evas Textblock Style Options
*
* @subsection evas_textblock_style_tabstops Tabstops
*
* Sets the size of the tab character. The value must be a number
* greater than one.
* @code
* tabstops=<number>
* @endcode
*/
fmt->tabstops = atoi(param);
if (fmt->tabstops < 1) fmt->tabstops = 1;
}
else if (cmd == linesizestr)
{
/**
* @page evas_textblock_style_page Evas Textblock Style Options
*
* @subsection evas_textblock_style_linesize Line size
*
* Sets the size of line of text. The value should be a number.
* @warning Setting this value sets linerelsize to 0%!
* @code
* linesize=<number>
* @endcode
*/
fmt->linesize = atoi(param);
fmt->linerelsize = 0.0;
}
else if (cmd == linerelsizestr)
{
/**
* @page evas_textblock_style_page Evas Textblock Style Options
*
* @subsection evas_textblock_style_linerelsize Relative line size
*
* Sets the relative size of line of text. The value must be a
* percentage.
* @warning Setting this value sets linesize to 0!
* @code
* linerelsize=<number>%
* @endcode
*/
char *endptr = NULL;
double val = strtod(param, &endptr);
if (endptr)
{
while (*endptr && _is_white(*endptr))
endptr++;
if (*endptr == '%')
{
fmt->linerelsize = val / 100.0;
fmt->linesize = 0;
if (fmt->linerelsize < 0.0) fmt->linerelsize = 0.0;
}
}
}
else if (cmd == linegapstr)
{
/**
* @page evas_textblock_style_page Evas Textblock Style Options
*
* @subsection evas_textblock_style_linegap Line gap
*
* Sets the size of the line gap in text. The value should be a
* number.
* @warning Setting this value sets linerelgap to 0%!
* @code
* linegap=<number>
* @endcode
*/
fmt->linegap = atoi(param);
fmt->linerelgap = 0.0;
}
else if (cmd == linerelgapstr)
{
/**
* @page evas_textblock_style_page Evas Textblock Style Options
*
* @subsection evas_textblock_style_linerelgap Relative line gap
*
* Sets the relative size of the line gap in text. The value must be
* a percentage.
* @warning Setting this value sets linegap to 0!
* @code
* linerelgap=<number>%
* @endcode
*/
char *endptr = NULL;
double val = strtod(param, &endptr);
if (endptr)
{
while (*endptr && _is_white(*endptr))
endptr++;
if (*endptr == '%')
{
fmt->linerelgap = val / 100.0;
fmt->linegap = 0;
if (fmt->linerelgap < 0.0) fmt->linerelgap = 0.0;
}
}
}
else if (cmd == itemstr)
{
/**
* @page evas_textblock_style_page Evas Textblock Style Options
*
* @subsection evas_textblock_style_item Item
*
* Not implemented! Does nothing!
* @code
* item=<anything>
* @endcode
*/
// itemstr == replacement object items in textblock - inline imges
// for example
}
else if (cmd == linefillstr)
{
/**
* @page evas_textblock_style_page Evas Textblock Style Options
*
* @subsection evas_textblock_style_linefill Line fill
*
* Sets the size of the line fill in text. The value must be a
* percentage.
* @code
* linefill=<number>%
* @endcode
*/
char *endptr = NULL;
double val = strtod(param, &endptr);
if (endptr)
{
while (*endptr && _is_white(*endptr))
endptr++;
if (*endptr == '%')
{
fmt->linefill = val / 100.0;
if (fmt->linefill < 0.0) fmt->linefill = 0.0;
}
}
}
else if (cmd == ellipsisstr)
{
/**
* @page evas_textblock_style_page Evas Textblock Style Options
*
* @subsection evas_textblock_style_ellipsis Ellipsis
*
* Sets ellipsis mode. The value should be a number. Any value smaller
* than 0.0 or greater than 1.0 disables ellipsis.
* A value of 0 means ellipsizing the leftmost portion of the text
* first, 1 on the other hand the rightmost portion.
* @code
* ellipsis=<number>
* @endcode
*/
char *endptr = NULL;
fmt->ellipsis = strtod(param, &endptr);
if ((fmt->ellipsis < 0.0) || (fmt->ellipsis > 1.0))
fmt->ellipsis = -1.0;
else
{
Efl_Canvas_Text_Data *o = efl_data_scope_get(eo_obj, MY_CLASS);
o->have_ellipsis = 1;
}
}
else if (cmd == passwordstr)
{
/**
* @page evas_textblock_style_page Evas Textblock Style Options
*
* @subsection evas_textblock_style_password Password
*
* Sets if the text is being used for passwords. Enabling this causes
* all characters to be substituted for '*'.
* Value must be one of the following:
* @li "on" - Enable
* @li "off" - Disable
* @code
* password=<number>
* @endcode
*/
if (len == 3 && !strcmp(param, "off"))
fmt->password = 0;
else if (len == 2 && !strcmp(param, "on"))
fmt->password = 1;
}
else if (cmd == replacement_charstr)
{
Efl_Canvas_Text_Data *o = efl_data_scope_get(eo_obj, MY_CLASS);
eina_stringshare_replace(&o->repch, param);
}
else if (cmd == underline_dash_widthstr)
{
/**
* @page evas_textblock_style_page Evas Textblock Style Options
*
* @subsection evas_textblock_style_underline_dash_width Underline dash width
*
* Sets the width of the underline dash. The value should be a number.
* @code
* underline_dash_width=<number>
* @endcode
*/
fmt->underline_dash_width = atoi(param);
if (fmt->underline_dash_width <= 0) fmt->underline_dash_width = 1;
}
else if (cmd == underline_dash_gapstr)
{
/**
* @page evas_textblock_style_page Evas Textblock Style Options
*
* @subsection evas_textblock_style_underline_dash_gap Underline dash gap
*
* Sets the gap of the underline dash. The value should be a number.
* @code
* underline_dash_gap=<number>
* @endcode
*/
fmt->underline_dash_gap = atoi(param);
if (fmt->underline_dash_gap <= 0) fmt->underline_dash_gap = 1;
}
else if (cmd == underline_heightstr)
{
/**
* @page evas_textblock_style_page Evas Textblock Style Options
*
* @subsection evas_textblock_style_underline_height Underline height
*
* Sets the height of the single underline. The value should be a floating number.
* @code
* underline_height=<floatingnumber>
* @endcode
*/
fmt->underline_height = atof(param);
if (fmt->underline_height <= 0.0) fmt->underline_height = 1.0;
}
else if (cmd == gfx_filterstr)
{
/**
* @page evas_textblock_style_page Evas Textblock Style Options
*
* @subsection evas_textblock_style_gfx_filter Gfx Filter
*
* Experimental filter, see efl_gfx_filter for more information.
* @code
* gfx_filter='filter name'
* @endcode
*/
if (!fmt->gfx_filter)
fmt->gfx_filter = calloc(1, sizeof(Efl_Canvas_Text_Filter));
eina_stringshare_replace(&fmt->gfx_filter->name, param);
}
}
/**
* @internal
* Returns @c EINA_TRUE if the item is a format parameter, @c EINA_FALSE
* otherwise.
*
* @param[in] item the item to check - Not NULL.
*/
static Eina_Bool
_format_is_param(const char *item)
{
if (strchr(item, '=')) return EINA_TRUE;
return EINA_FALSE;
}
/**
* @internal
* Parse the format item and populate key and val with the stringshares that
* corrospond to the formats parsed.
* It expects item to be of the structure:
* "key=val"
*
* @param[in] item the item to parse - Not NULL.
* @param[out] key where to store the key at - Not NULL.
* @param[out] val where to store the value at - Not NULL.
*/
static void
_format_param_parse(const char *item, const char **key, Eina_Tmpstr **val)
{
const char *start, *end;
char *tmp, *s, *d;
size_t len;
start = strchr(item, '=');
if (!start) return ;
*key = eina_stringshare_add_length(item, start - item);
start++; /* Advance after the '=' */
/* If we can find a quote as the first non-space char,
* our new delimiter is a quote, not a space. */
while (*start == ' ')
start++;
if (*start == '\'')
{
start++;
end = strchr(start, '\'');
while ((end) && (end > start) && (end[-1] == '\\'))
end = strchr(end + 1, '\'');
}
else
{
end = strchr(start, ' ');
while ((end) && (end > start) && (end[-1] == '\\'))
end = strchr(end + 1, ' ');
}
/* Null terminate before the spaces */
if (end) len = end - start;
else len = strlen(start);
tmp = (char*) eina_tmpstr_add_length(start, len);
if (!tmp) goto end;
for (d = tmp, s = tmp; *s; s++)
{
if (*s != '\\')
{
*d = *s;
d++;
}
}
*d = '\0';
end:
*val = tmp;
}
/**
* @internal
* This function parses the format passed in *s and advances s to point to the
* next format item, while returning the current one as the return value.
* @param s The current and returned position in the format string.
* @return the current item parsed from the string.
*/
static const char *
_format_parse(const char **s)
{
const char *p;
const char *s1 = NULL, *s2 = NULL;
Eina_Bool quote = EINA_FALSE;
p = *s;
if (*p == 0) return NULL;
for (;;)
{
if (!s1)
{
if (*p != ' ') s1 = p;
if (*p == 0) break;
}
else if (!s2)
{
if (*p == '\'')
{
quote = !quote;
}
if ((p > *s) && (p[-1] != '\\') && (!quote))
{
if (*p == ' ') s2 = p;
}
if (*p == 0) s2 = p;
}
p++;
if (s1 && s2)
{
*s = s2;
return s1;
}
}
*s = p;
return NULL;
}
/**
* @internal
* Parse the format str and populate fmt with the formats found.
*
* @param obj The evas object - Not NULL.
* @param[out] fmt The format to populate - Not NULL.
* @param[in] str the string to parse.- Not NULL.
*/
static void
_format_fill(Evas_Object *eo_obj, Evas_Object_Textblock_Format *fmt, const char *str)
{
const char *s;
const char *item;
s = str;
/* get rid of any spaces at the start of the string */
while (*s == ' ') s++;
while ((item = _format_parse(&s)))
{
if (_format_is_param(item))
{
const char *key = NULL;
Eina_Tmpstr *val = NULL;
_format_param_parse(item, &key, &val);
if ((key) && (val)) _format_command(eo_obj, fmt, key, val);
eina_stringshare_del(key);
eina_tmpstr_del(val);
}
else
{
/* immediate - not handled here */
}
}
}
/**
* @internal
* Duplicate a format and return the duplicate.
*
* @param obj The evas object - Not NULL.
* @param[in] fmt The format to duplicate - Not NULL.
* @return the copy of the format.
*/
static Evas_Object_Textblock_Format *
_format_dup(Evas_Object *eo_obj, const Evas_Object_Textblock_Format *fmt)
{
Evas_Object_Protected_Data *obj = efl_data_scope_get(eo_obj, EFL_CANVAS_OBJECT_CLASS);
Evas_Object_Textblock_Format *fmt2;
fmt2 = calloc(1, sizeof(Evas_Object_Textblock_Format));
memcpy(fmt2, fmt, sizeof(Evas_Object_Textblock_Format));
fmt2->ref = 1;
if (fmt->font.fdesc) fmt2->font.fdesc = evas_font_desc_ref(fmt->font.fdesc);
if (fmt->font.source) fmt2->font.source = eina_stringshare_add(fmt->font.source);
/* FIXME: just ref the font here... */
fmt2->font.font = evas_font_load(obj->layer->evas->evas, fmt2->font.fdesc,
fmt2->font.source, (int)(((double) fmt2->font.size) * obj->cur->scale), fmt2->font.bitmap_scalable);
if (fmt->gfx_filter)
{
fmt2->gfx_filter = malloc(sizeof(*fmt2->gfx_filter));
memcpy(fmt2->gfx_filter, fmt->gfx_filter, sizeof(*fmt->gfx_filter));
fmt2->gfx_filter->name = eina_stringshare_ref(fmt->gfx_filter->name);
fmt2->gfx_filter->dc = ENFN->context_dup(ENC, fmt->gfx_filter->dc);
}
return fmt2;
}
typedef enum
{
TEXTBLOCK_POSITION_START,
TEXTBLOCK_POSITION_END,
TEXTBLOCK_POSITION_ELSE,
TEXTBLOCK_POSITION_SINGLE
} Textblock_Position;
/**
* @internal
* @typedef Ctxt
*
* A pack of information that needed to be passed around in the layout engine,
* packed for easier access.
*/
typedef struct _Ctxt Ctxt;
struct _Ctxt
{
Evas_Object *obj;
Efl_Canvas_Text_Data *o;
Evas_Object_Protected_Data *evas_o;
Evas_Public_Data *evas;
Evas_Object_Textblock_Paragraph *paragraphs;
Evas_Object_Textblock_Paragraph *par;
Evas_Object_Textblock_Line *ln;
Evas_Object_Textblock_Text_Item *hyphen_ti;
Eina_List *format_stack;
Evas_Object_Textblock_Format *fmt;
Eina_List *obs_infos; /**< Extra information for items in current line. */
int x, y;
int w, h;
int wmax, hmax;
int ascent, descent;
int maxascent, maxdescent;
int marginl, marginr;
int line_no;
int underline_extend;
int have_underline, have_underline2;
double align, valign;
struct {
int l, r, t, b;
} style_pad;
Textblock_Position position;
Evas_Textblock_Align_Auto align_auto : 2;
Eina_Bool width_changed : 1;
Eina_Bool handle_obstacles : 1;
};
static void _layout_text_add_logical_item(Ctxt *c, Evas_Object_Textblock_Text_Item *ti, Eina_List *rel);
static void _text_item_update_sizes(Ctxt *c, Evas_Object_Textblock_Text_Item *ti);
static Evas_Object_Textblock_Format_Item *_layout_do_format(const Evas_Object *obj EINA_UNUSED, Ctxt *c, Evas_Object_Textblock_Format **_fmt, Evas_Object_Textblock_Node_Format *n, int *style_pad_l, int *style_pad_r, int *style_pad_t, int *style_pad_b, Eina_Bool create_item);
/**
* @internal
* Adjust the ascent/descent of the format and context.
*
* @param maxascent The ascent to update - Not NUL.
* @param maxdescent The descent to update - Not NUL.
* @param fmt The format to adjust - NOT NULL.
*/
static void
_layout_format_ascent_descent_adjust(Evas_Object_Protected_Data *obj,
Evas_Coord *maxascent, Evas_Coord *maxdescent,
Evas_Object_Textblock_Format *fmt)
{
int ascent, descent;
if (fmt->font.font)
{
ascent = *maxascent;
descent = *maxdescent;
if (fmt->linesize > 0)
{
int scaled_linesize = fmt->linesize * obj->cur->scale;
if ((ascent + descent) < scaled_linesize)
{
ascent = ((scaled_linesize * ascent) / (ascent + descent));
descent = scaled_linesize - ascent;
}
}
else if (fmt->linerelsize > 0.0)
{
descent = descent * fmt->linerelsize;
ascent = ascent * fmt->linerelsize;
}
descent += fmt->linegap * obj->cur->scale;
descent += ((ascent + descent) * fmt->linerelgap);
if (*maxascent < ascent) *maxascent = ascent;
if (*maxdescent < descent) *maxdescent = descent;
if (fmt->linefill > 0.0)
{
int dh;
dh = obj->cur->geometry.h - (*maxascent + *maxdescent);
if (dh < 0) dh = 0;
dh = fmt->linefill * dh;
*maxdescent += dh / 2;
*maxascent += dh - (dh / 2);
// FIXME: set flag that says "if heigh changes - reformat"
}
}
}
static void
_layout_item_max_ascent_descent_calc(Evas_Object_Protected_Data *obj,
Evas_Coord *maxascent, Evas_Coord *maxdescent,
Evas_Object_Textblock_Item *it, Textblock_Position position)
{
void *fi = NULL;
*maxascent = *maxdescent = 0;
if (!it || !it->format || !it->format->font.font)
return;
if (it->type == EVAS_TEXTBLOCK_ITEM_TEXT)
{
fi = _ITEM_TEXT(it)->text_props.font_instance;
}
if ((position == TEXTBLOCK_POSITION_START) ||
(position == TEXTBLOCK_POSITION_SINGLE))
{
Evas_Coord asc = 0;
if (fi)
{
asc = evas_common_font_instance_max_ascent_get(fi);
}
else
{
asc = ENFN->font_max_ascent_get(ENC,
it->format->font.font);
}
if (asc > *maxascent)
*maxascent = asc;
}
if ((position == TEXTBLOCK_POSITION_END) ||
(position == TEXTBLOCK_POSITION_SINGLE))
{
/* Calculate max descent. */
Evas_Coord desc = 0;
if (fi)
{
desc = evas_common_font_instance_max_descent_get(fi);
}
else
{
desc = ENFN->font_max_descent_get(ENC,
it->format->font.font);
}
if (desc > *maxdescent)
*maxdescent = desc;
}
}
/**
* @internal
* Adjust the ascent/descent of the item and context.
*
* @param ascent The ascent to update - Not NUL.
* @param descent The descent to update - Not NUL.
* @param it The format to adjust - NOT NULL.
* @param position The position inside the textblock
*/
static void
_layout_item_ascent_descent_adjust(Evas_Object_Protected_Data *obj,
Evas_Coord *ascent, Evas_Coord *descent,
Evas_Object_Textblock_Item *it, Evas_Object_Textblock_Format *fmt)
{
void *fi = NULL;
int asc = 0, desc = 0;
if ((!it || !it->format || !it->format->font.font) &&
(!fmt || !fmt->font.font))
{
return;
}
if (it)
{
fmt = it->format;
if (it->type == EVAS_TEXTBLOCK_ITEM_TEXT)
{
fi = _ITEM_TEXT(it)->text_props.font_instance;
}
}
if (fi)
{
asc = evas_common_font_instance_ascent_get(fi);
desc = evas_common_font_instance_descent_get(fi);
}
else
{
if (fmt)
{
asc = ENFN->font_ascent_get(ENC, fmt->font.font);
desc = ENFN->font_descent_get(ENC, fmt->font.font);
}
}
if (fmt) _layout_format_ascent_descent_adjust(obj, &asc, &desc, fmt);
if (asc > *ascent) *ascent = asc;
if (desc > *descent) *descent = desc;
}
/**
* @internal
* Create a new line using the info from the format and update the format
* and context.
*
* @param c The context to work on - Not NULL.
* @param fmt The format to use info from - NOT NULL.
*/
static void
_layout_line_new(Ctxt *c, Evas_Object_Textblock_Format *fmt)
{
c->ln = calloc(1, sizeof(Evas_Object_Textblock_Line));
c->align = fmt->halign;
c->align_auto = fmt->halign_auto;
c->marginl = fmt->margin.l;
c->marginr = fmt->margin.r;
c->par->lines = (Evas_Object_Textblock_Line *)eina_inlist_append(EINA_INLIST_GET(c->par->lines), EINA_INLIST_GET(c->ln));
c->x = 0;
c->ascent = c->descent = 0;
c->maxascent = c->maxdescent = 0;
c->ln->line_no = -1;
c->ln->par = c->par;
}
static inline Evas_Object_Textblock_Paragraph *
_layout_find_paragraph_by_y(Efl_Canvas_Text_Data *o, Evas_Coord y)
{
Evas_Object_Textblock_Paragraph *start, *par;
int i;
start = o->paragraphs;
for (i = 0 ; i < TEXTBLOCK_PAR_INDEX_SIZE ; i++)
{
if (!o->par_index[i] || (o->par_index[i]->y > y))
{
break;
}
start = o->par_index[i];
}
EINA_INLIST_FOREACH(start, par)
{
if ((par->y <= y) && (y < par->y + par->h))
return par;
}
return NULL;
}
static inline Evas_Object_Textblock_Paragraph *
_layout_find_paragraph_by_line_no(Efl_Canvas_Text_Data *o, int line_no)
{
Evas_Object_Textblock_Paragraph *start, *par;
int i;
start = o->paragraphs;
for (i = 0 ; i < TEXTBLOCK_PAR_INDEX_SIZE ; i++)
{
if (!o->par_index[i] || (o->par_index[i]->line_no > line_no))
{
break;
}
start = o->par_index[i];
}
EINA_INLIST_FOREACH(start, par)
{
Evas_Object_Textblock_Paragraph *npar =
(Evas_Object_Textblock_Paragraph *) EINA_INLIST_GET(par)->next;
if ((par->line_no <= line_no) &&
(!npar || (line_no < npar->line_no)))
return par;
}
return NULL;
}
/* End of rbtree index functios */
/**
* @internal
* Create a new layout paragraph.
* If c->par is not NULL, the paragraph is appended/prepended according
* to the append parameter. If it is NULL, the paragraph is appended at
* the end of the list.
*
* @param c The context to work on - Not NULL.
* @param n the associated text node
* @param append true to append, false to prpend.
*/
static void
_layout_paragraph_new(Ctxt *c, Evas_Object_Textblock_Node_Text *n,
Eina_Bool append)
{
Evas_Object_Textblock_Paragraph *rel_par = c->par;
c->par = calloc(1, sizeof(Evas_Object_Textblock_Paragraph));
if (append || !rel_par)
c->paragraphs = (Evas_Object_Textblock_Paragraph *)
eina_inlist_append_relative(EINA_INLIST_GET(c->paragraphs),
EINA_INLIST_GET(c->par),
EINA_INLIST_GET(rel_par));
else
c->paragraphs = (Evas_Object_Textblock_Paragraph *)
eina_inlist_prepend_relative(EINA_INLIST_GET(c->paragraphs),
EINA_INLIST_GET(c->par),
EINA_INLIST_GET(rel_par));
c->ln = NULL;
c->par->text_node = n;
if (n)
n->par = c->par;
c->par->line_no = -1;
c->par->visible = 1;
c->o->num_paragraphs++;
}
#ifdef BIDI_SUPPORT
/**
* @internal
* Update bidi paragraph props.
*
* @param par The paragraph to update
*/
static inline void
_layout_update_bidi_props(const Efl_Canvas_Text_Data *o,
Evas_Object_Textblock_Paragraph *par)
{
if (par->text_node)
{
const Eina_Unicode *text;
int *segment_idxs = NULL;
Evas_BiDi_Direction par_dir;
EvasBiDiParType bidi_par_type;
text = eina_ustrbuf_string_get(par->text_node->unicode);
if (o->bidi_delimiters)
segment_idxs = evas_bidi_segment_idxs_get(text, o->bidi_delimiters);
par_dir = o->paragraph_direction;
switch (par_dir)
{
case EVAS_BIDI_DIRECTION_LTR:
bidi_par_type = EVAS_BIDI_PARAGRAPH_LTR;
break;
case EVAS_BIDI_DIRECTION_RTL:
bidi_par_type = EVAS_BIDI_PARAGRAPH_RTL;
break;
case EVAS_BIDI_DIRECTION_NEUTRAL:
default:
bidi_par_type = EVAS_BIDI_PARAGRAPH_NEUTRAL;
break;
}
evas_bidi_paragraph_props_unref(par->bidi_props);
par->bidi_props = evas_bidi_paragraph_props_get(text,
eina_ustrbuf_length_get(par->text_node->unicode),
segment_idxs, bidi_par_type);
par->direction = EVAS_BIDI_PARAGRAPH_DIRECTION_IS_RTL(par->bidi_props) ?
EVAS_BIDI_DIRECTION_RTL : EVAS_BIDI_DIRECTION_LTR;
par->is_bidi = !!par->bidi_props;
if (segment_idxs) free(segment_idxs);
}
}
#endif
/**
* @internal
* Free the visual lines in the paragraph (logical items are kept)
*/
static void
_paragraph_clear(Evas_Public_Data *evas,
Efl_Canvas_Text_Data *o, Evas_Object_Protected_Data *obj,
Evas_Object_Textblock_Paragraph *par)
{
while (par->lines)
{
Evas_Object_Textblock_Line *ln;
ln = (Evas_Object_Textblock_Line *) par->lines;
par->lines = (Evas_Object_Textblock_Line *)eina_inlist_remove(EINA_INLIST_GET(par->lines), EINA_INLIST_GET(par->lines));
/* Could be done better, but it's only when hyphenating and limited
* to number of hyphens created */
if (o->hyphenating)
{
Evas_Object_Textblock_Text_Item *ti;
Eina_List *i, *i_next;
EINA_LIST_FOREACH_SAFE(o->hyphen_items, i, i_next, ti)
{
if (ti->parent.ln == ln)
{
o->hyphen_items = eina_list_remove_list(o->hyphen_items, i);
_item_free(evas, o, obj, NULL, _ITEM(ti));
}
}
}
_line_free(ln);
}
}
/**
* @internal
* Free the layout paragraph and all of it's lines and logical items.
*/
static void
_paragraph_free(Evas_Public_Data *evas,
Efl_Canvas_Text_Data *o, Evas_Object_Protected_Data *obj,
Evas_Object_Textblock_Paragraph *par)
{
_paragraph_clear(evas, o, obj, par);
{
Evas_Object_Textblock_Item *it;
EINA_LIST_FREE(par->logical_items, it)
{
_item_free(evas, o, obj, NULL, it);
}
}
#ifdef BIDI_SUPPORT
if (par->bidi_props)
evas_bidi_paragraph_props_unref(par->bidi_props);
#endif
/* If we are the active par of the text node, set to NULL */
if (par->text_node && (par->text_node->par == par))
par->text_node->par = NULL;
o->num_paragraphs--;
free(par);
}
/**
* @internal
* Clear all the paragraphs from the inlist pars.
*
* @param obj the evas object - Not NULL.
* @param pars the paragraphs to clean - Not NULL.
*/
static void
_paragraphs_clear(Ctxt *c)
{
Evas_Object_Textblock_Paragraph *par;
EINA_INLIST_FOREACH(EINA_INLIST_GET(c->paragraphs), par)
{
_paragraph_clear(c->evas, c->o, c->evas_o, par);
}
}
/**
* @internal
* Free the paragraphs from the inlist pars, the difference between this and
* _paragraphs_clear is that the latter keeps the logical items and the par
* items, while the former frees them as well.
*
* @param c the context - Not NULL.
*/
static void
_paragraphs_free(Evas_Public_Data *evas,
Efl_Canvas_Text_Data *o, Evas_Object_Protected_Data *obj,
Evas_Object_Textblock_Paragraph *pars)
{
o->num_paragraphs = 0;
while (pars)
{
Evas_Object_Textblock_Paragraph *par;
par = (Evas_Object_Textblock_Paragraph *) pars;
pars = (Evas_Object_Textblock_Paragraph *)eina_inlist_remove(EINA_INLIST_GET(pars), EINA_INLIST_GET(par));
_paragraph_free(evas, o, obj, par);
}
}
/**
* @internal
* Push fmt to the format stack, if fmt is NULL, will push a default item.
*
* @param c the context to work on - Not NULL.
* @param fmt the format to push.
* @see _layout_format_pop()
*/
static Evas_Object_Textblock_Format *
_layout_format_push(Ctxt *c, Evas_Object_Textblock_Format *fmt,
Evas_Object_Textblock_Node_Format *fnode)
{
Efl_Canvas_Text_Data *o = c->o;
if (fmt)
{
fmt = _format_dup(c->obj, fmt);
c->format_stack = eina_list_prepend(c->format_stack, fmt);
fmt->fnode = fnode;
}
else
{
fmt = calloc(1, sizeof(Evas_Object_Textblock_Format));
c->format_stack = eina_list_prepend(c->format_stack, fmt);
*fmt = c->o->default_format.format;
fmt->ref = 1;
fmt->font.bitmap_scalable = _FMT_INFO(bitmap_scalable);
// Apply font if specified
if (_FMT_INFO(font))
{
Evas_Object_Protected_Data *evas_obj = efl_data_scope_get(c->obj, EFL_CANVAS_OBJECT_CLASS);
if (fmt->font.fdesc)
{
evas_font_desc_unref(fmt->font.fdesc);
}
fmt->font.fdesc = evas_font_desc_new();
evas_font_name_parse(fmt->font.fdesc, _FMT_INFO(font));
eina_stringshare_replace(&(fmt->font.fdesc->lang),
evas_font_lang_normalize("auto"));
eina_stringshare_replace(&(fmt->font.fdesc->fallbacks),
_FMT_INFO(font_fallbacks));
fmt->font.size = _FMT_INFO(size);
fmt->font.fdesc->weight = _FMT_INFO(font_weight);
fmt->font.fdesc->slant = _FMT_INFO(font_slant);
fmt->font.fdesc->width = _FMT_INFO(font_width);
fmt->font.fdesc->lang = _FMT_INFO(font_lang);
fmt->font.font = evas_font_load(evas_obj->layer->evas->evas, fmt->font.fdesc,
fmt->font.source, (int)(((double) _FMT_INFO(size)) * evas_obj->cur->scale), fmt->font.bitmap_scalable);
}
if (_FMT_INFO(gfx_filter_name))
{
if (!fmt->gfx_filter)
{
fmt->gfx_filter = calloc(1, sizeof(Efl_Canvas_Text_Filter));
eina_stringshare_replace(&fmt->gfx_filter->name,
_FMT_INFO(gfx_filter_name));
}
}
}
return fmt;
}
/**
* @internal
* Pop fmt to the format stack, if there's something in the stack free fmt
* and set it to point to the next item instead, else return fmt.
*
* @param c the context to work on - Not NULL.
* @param format - the text of the format to free (assured to start with '-').
* @return the next format in the stack, or format if there's none.
* @see _layout_format_push()
*/
static Evas_Object_Textblock_Format *
_layout_format_pop(Ctxt *c, const char *format)
{
Evas_Object_Textblock_Format *fmt = eina_list_data_get(c->format_stack);
if ((c->format_stack) && (c->format_stack->next))
{
Eina_List *redo_nodes = NULL;
/* Generic pop, should just pop. */
if (((format[0] == '/') && !format[1]) ||
!format[0])
{
_format_unref_free(c->evas_o, fmt);
c->format_stack =
eina_list_remove_list(c->format_stack, c->format_stack);
}
else
{
size_t len = strlen(format);
Eina_List *i, *i_next;
/* Remove only the matching format. */
EINA_LIST_FOREACH_SAFE(c->format_stack, i, i_next, fmt)
{
/* Stop when we reach the base item */
if (!i_next)
break;
c->format_stack =
eina_list_remove_list(c->format_stack, c->format_stack);
/* Make sure the ending tag matches the starting tag.
* I.e whole of the ending tag matches the start of the
* starting tag, and the starting tag's next char is either
* NULL or white. Skip the starting '+'. */
if (_FORMAT_IS_CLOSER_OF(
fmt->fnode->orig_format, format + 1, len - 1))
{
_format_unref_free(c->evas_o, fmt);
break;
}
else
{
redo_nodes = eina_list_prepend(redo_nodes, fmt->fnode);
_format_unref_free(c->evas_o, fmt);
}
}
}
/* Redo all the nodes needed to be redone */
{
Evas_Object_Textblock_Node_Format *fnode;
Eina_List *i, *i_next;
EINA_LIST_FOREACH_SAFE(redo_nodes, i, i_next, fnode)
{
/* FIXME: Actually do something with the new acquired padding,
* they can be different and affect our padding! */
Evas_Coord style_pad_l, style_pad_r, style_pad_t, style_pad_b;
style_pad_l = style_pad_r = style_pad_t = style_pad_b = 0;
redo_nodes = eina_list_remove_list(redo_nodes, i);
fmt = eina_list_data_get(c->format_stack);
_layout_do_format(c->obj, c, &fmt, fnode,
&style_pad_l, &style_pad_r,
&style_pad_t, &style_pad_b, EINA_FALSE);
}
}
fmt = eina_list_data_get(c->format_stack);
}
return fmt;
}
/**
* @internal
* Parse item and fill fmt with the item.
*
* @param c the context to work on - Not NULL.
* @param fmt the format to fill - not null.
*/
static void
_layout_format_value_handle(Ctxt *c, Evas_Object_Textblock_Format *fmt, const char *item)
{
const char *key = NULL;
Eina_Tmpstr *val = NULL;
_format_param_parse(item, &key, &val);
if ((key) && (val)) _format_command(c->obj, fmt, key, val);
if (key) eina_stringshare_del(key);
if (val) eina_tmpstr_del(val);
c->align = fmt->halign;
c->align_auto = fmt->halign_auto;
c->marginl = fmt->margin.l;
c->marginr = fmt->margin.r;
}
#define VSIZE_FULL 0
#define VSIZE_ASCENT 1
#define SIZE 0
#define SIZE_ABS 1
#define SIZE_REL 2
/**
* @internal
* Get the current line's alignment from the context.
*
* @param c the context to work on - Not NULL.
*/
static inline double
_layout_line_align_get(Ctxt *c)
{
#ifdef BIDI_SUPPORT
if ((c->align_auto == EVAS_TEXTBLOCK_ALIGN_AUTO_NORMAL) && c->ln)
{
if (c->ln->items && c->ln->items->text_node &&
(c->ln->par->direction == EVAS_BIDI_DIRECTION_RTL))
{
/* Align right*/
return 1.0;
}
else
{
/* Align left */
return 0.0;
}
}
else if (c->align_auto == EVAS_TEXTBLOCK_ALIGN_AUTO_LOCALE)
{
if (evas_common_language_direction_get() == EVAS_BIDI_DIRECTION_RTL)
{
/* Align right*/
return 1.0;
}
else
{
/* Align left */
return 0.0;
}
}
#endif
return c->align;
}
#ifdef BIDI_SUPPORT
/**
* @internal
* Reorder the items in visual order
*
* @param line the line to reorder
*/
static void
_layout_line_reorder(Evas_Object_Textblock_Line *line)
{
/*FIXME: do it a bit more efficient - not very efficient ATM. */
Evas_Object_Textblock_Item *it;
EvasBiDiStrIndex *v_to_l = NULL;
Evas_Coord x;
size_t start, end;
size_t len;
if (line->items && line->items->text_node &&
line->par->bidi_props)
{
Evas_BiDi_Paragraph_Props *props;
props = line->par->bidi_props;
start = end = line->items->text_pos;
/* Find the first and last positions in the line */
EINA_INLIST_FOREACH(line->items, it)
{
if (it->text_pos < start)
{
start = it->text_pos;
}
else
{
int tlen;
tlen = (it->type == EVAS_TEXTBLOCK_ITEM_TEXT) ?
_ITEM_TEXT(it)->text_props.text_len : 1;
if (it->text_pos + tlen > end)
{
end = it->text_pos + tlen;
}
}
}
len = end - start;
evas_bidi_props_reorder_line(NULL, start, len, props, &v_to_l);
/* Update visual pos */
{
Evas_Object_Textblock_Item *i;
i = line->items;
while (i)
{
i->visual_pos = evas_bidi_position_logical_to_visual(
v_to_l, len, i->text_pos - start);
i = (Evas_Object_Textblock_Item *) EINA_INLIST_GET(i)->next;
}
}
/*FIXME: not very efficient, sort the items arrays. Anyhow, should only
* reorder if it's a bidi paragraph */
{
Evas_Object_Textblock_Item *i, *j, *min;
i = line->items;
while (i)
{
min = i;
EINA_INLIST_FOREACH(i, j)
{
if (j->visual_pos < min->visual_pos)
{
min = j;
}
}
if (min != i)
{
line->items = (Evas_Object_Textblock_Item *) eina_inlist_remove(EINA_INLIST_GET(line->items), EINA_INLIST_GET(min));
line->items = (Evas_Object_Textblock_Item *) eina_inlist_prepend_relative(EINA_INLIST_GET(line->items), EINA_INLIST_GET(min), EINA_INLIST_GET(i));
}
i = (Evas_Object_Textblock_Item *) EINA_INLIST_GET(min)->next;
}
}
}
if (v_to_l) free(v_to_l);
x = 0;
EINA_INLIST_FOREACH(line->items, it)
{
it->x = x;
x += it->adv;
}
}
#endif
/* FIXME: doc */
static void
_layout_calculate_format_item_size(Evas_Object_Protected_Data *obj,
const Evas_Object_Textblock_Format_Item *fi,
Evas_Coord *maxascent, Evas_Coord *maxdescent,
Evas_Coord *_y, Evas_Coord *_w, Evas_Coord *_h)
{
/* Adjust sizes according to current line height/scale */
Evas_Coord w, h;
const char *p, *s;
s = fi->item;
w = fi->parent.w;
h = fi->parent.h;
if (!s)
{
*_w = w;
*_h = h;
return;
}
switch (fi->size)
{
case SIZE:
p = strstr(s, " size=");
if (p)
{
p += 6;
if (sscanf(p, "%ix%i", &w, &h) == 2)
{
w = w * obj->cur->scale;
h = h * obj->cur->scale;
}
}
break;
case SIZE_REL:
p = strstr(s, " relsize=");
p += 9;
if (sscanf(p, "%ix%i", &w, &h) == 2)
{
int sz = 1;
if (fi->vsize == VSIZE_FULL)
{
sz = *maxdescent + *maxascent;
}
else if (fi->vsize == VSIZE_ASCENT)
{
sz = *maxascent;
}
w = (w * sz) / h;
h = sz;
}
break;
case SIZE_ABS:
/* Nothing to do */
default:
break;
}
switch (fi->size)
{
case SIZE:
case SIZE_ABS:
switch (fi->vsize)
{
case VSIZE_FULL:
if (h > (*maxdescent + *maxascent))
{
*maxascent += h - (*maxdescent + *maxascent);
*_y = -*maxascent;
}
else
*_y = -(h - *maxdescent);
break;
case VSIZE_ASCENT:
if (h > *maxascent)
{
*maxascent = h;
*_y = -h;
}
else
*_y = -h;
break;
default:
break;
}
break;
case SIZE_REL:
switch (fi->vsize)
{
case VSIZE_FULL:
case VSIZE_ASCENT:
*_y = -*maxascent;
break;
default:
break;
}
break;
default:
break;
}
*_w = w;
*_h = h;
}
static Evas_Coord
_layout_last_line_max_descent_adjust_calc(Ctxt *c, const Evas_Object_Textblock_Paragraph *last_vis_par)
{
if (last_vis_par->lines)
{
Evas_Object_Textblock_Line *ln = (Evas_Object_Textblock_Line *)
EINA_INLIST_GET(last_vis_par->lines)->last;
Evas_Object_Textblock_Item *it;
EINA_INLIST_FOREACH(ln->items, it)
{
if (it->type == EVAS_TEXTBLOCK_ITEM_TEXT)
{
Evas_Coord asc = 0, desc = 0;
Evas_Coord maxasc = 0, maxdesc = 0;
_layout_item_ascent_descent_adjust(c->evas_o, &asc, &desc,
it, it->format);
_layout_item_max_ascent_descent_calc(c->evas_o, &maxasc, &maxdesc,
it, c->position);
if (desc > c->descent)
c->descent = desc;
if (maxdesc > c->maxdescent)
c->maxdescent = maxdesc;
}
}
if (c->maxdescent > c->descent)
{
return c->maxdescent - c->descent;
}
}
return 0;
}
typedef struct _Evas_Textblock_Obstacle_Info
{
Evas_Object_Textblock_Item *it; /**< the corresponding item node. */
Evas_Coord obs_adv;
Evas_Coord obs_preadv;
} Evas_Textblock_Obstacle_Info;
/**
* @internal
* Order the items in the line, update it's properties and update it's
* corresponding paragraph.
*
* @param c the context to work on - Not NULL.
* @param fmt the format to use.
* @param add_line true if we should create a line, false otherwise.
*/
static void
_layout_line_finalize(Ctxt *c, Evas_Object_Textblock_Format *fmt)
{
Evas_Object_Textblock_Item *it;
Evas_Coord obs_preadv = 0, obs_adv = 0;
Eina_List *i;
Evas_Textblock_Obstacle_Info *obs_info = NULL;
Evas_Coord x = 0;
/* If there are no text items yet, calc ascent/descent
* according to the current format. */
if (c->ascent + c->descent == 0)
_layout_item_ascent_descent_adjust(c->evas_o, &c->ascent, &c->descent,
NULL, fmt);
#ifdef BIDI_SUPPORT
_layout_line_reorder(c->ln);
#endif
/* Adjust all the item sizes according to the final line size,
* and update the x positions of all the items of the line. */
EINA_INLIST_FOREACH(c->ln->items, it)
{
if (it->type == EVAS_TEXTBLOCK_ITEM_FORMAT)
{
Evas_Object_Textblock_Format_Item *fi = _ITEM_FORMAT(it);
if (!fi->formatme) goto loop_advance;
_layout_calculate_format_item_size(c->evas_o, fi, &c->ascent,
&c->descent, &fi->y, &fi->parent.w, &fi->parent.h);
fi->parent.adv = fi->parent.w;
}
else
{
Evas_Coord asc = 0, desc = 0;
Evas_Coord maxasc = 0, maxdesc = 0;
_layout_item_ascent_descent_adjust(c->evas_o, &asc, &desc,
it, it->format);
_layout_item_max_ascent_descent_calc(c->evas_o, &maxasc, &maxdesc,
it, c->position);
if (asc > c->ascent)
c->ascent = asc;
if (desc > c->descent)
c->descent = desc;
if (maxasc > c->maxascent)
c->maxascent = maxasc;
if (maxdesc > c->maxdescent)
c->maxdescent = maxdesc;
}
loop_advance:
obs_preadv = 0;
obs_adv = 0;
EINA_LIST_FOREACH(c->obs_infos, i, obs_info)
{
if (obs_info->it == it)
{
obs_preadv += obs_info->obs_preadv;
obs_adv += obs_info->obs_adv;
}
}
x += obs_preadv;
it->x = x;
x += it->adv + obs_adv;
if ((it->w > 0) && ((it->x + it->w) > c->ln->w)) c->ln->w = it->x + it->w;
}
/* clear obstacle info for this line */
EINA_LIST_FREE(c->obs_infos, obs_info)
{
free(obs_info);
}
c->ln->y = c->y - c->par->y;
c->ln->h = c->ascent + c->descent;
/* Handle max ascent and descent if at the edges */
{
/* If it's the start, offset the line according to the max ascent. */
if (((c->position == TEXTBLOCK_POSITION_START) ||
(c->position == TEXTBLOCK_POSITION_SINGLE))
&& (c->maxascent > c->ascent))
{
Evas_Coord ascdiff;
ascdiff = c->maxascent - c->ascent;
c->ln->y += ascdiff;
c->y += ascdiff;
c->ln->y += c->o->style_pad.t;
c->y += c->o->style_pad.t;
}
}
c->ln->baseline = c->ascent;
/* FIXME: Actually needs to be adjusted using the actual font value.
* Also, underline_extend is actually not being used. */
if (c->have_underline2)
{
if (c->descent < 4) c->underline_extend = 4 - c->descent;
}
else if (c->have_underline)
{
if (c->descent < 2) c->underline_extend = 2 - c->descent;
}
c->ln->line_no = c->line_no - c->ln->par->line_no;
c->line_no++;
c->y += c->ascent + c->descent;
if (c->w >= 0)
{
/* c->o->style_pad.r is already included in the line width, so it's
* not used in this calculation. . */
c->ln->x = c->marginl + c->o->style_pad.l +
((c->w - c->ln->w - c->o->style_pad.l -
c->marginl - c->marginr) * _layout_line_align_get(c));
}
else
{
c->ln->x = c->marginl + c->o->style_pad.l;
}
c->par->h = c->ln->y + c->ln->h;
if (c->ln->w > c->par->w)
{
c->par->w = c->ln->w;
}
/* Calculate new max width */
{
Evas_Coord new_wmax = c->ln->w +
c->marginl + c->marginr - (c->o->style_pad.l + c->o->style_pad.r);
if (new_wmax > c->par->last_fw)
c->par->last_fw = new_wmax;
if (new_wmax > c->wmax)
c->wmax = new_wmax;
}
if (c->position == TEXTBLOCK_POSITION_START)
c->position = TEXTBLOCK_POSITION_ELSE;
}
/**
* @internal
* Create a new line and append it to the lines in the context.
*
* @param c the context to work on - Not NULL.
* @param fmt the format to use.
* @param add_line true if we should create a line, false otherwise.
*/
static void
_layout_line_advance(Ctxt *c, Evas_Object_Textblock_Format *fmt)
{
Evas_Object_Textblock_Format *last_fmt = fmt;
if (c->hyphen_ti)
{
c->ln->items = (Evas_Object_Textblock_Item *)
eina_inlist_append(EINA_INLIST_GET(c->ln->items),
EINA_INLIST_GET(_ITEM(c->hyphen_ti)));
c->hyphen_ti->parent.ln = c->ln;
c->o->hyphen_items =
eina_list_append(c->o->hyphen_items, c->hyphen_ti);
c->hyphen_ti = NULL;
}
if (c->ln->items)
{
last_fmt = _ITEM(EINA_INLIST_GET(c->ln->items)->last)->format;
}
_layout_line_finalize(c, last_fmt);
_layout_line_new(c, fmt);
}
/**
* @internal
* Create a new text layout item from the string and the format.
*
* @param c the context to work on - Not NULL.
* @param fmt the format to use.
* @param str the string to use.
* @param len the length of the string.
*/
static Evas_Object_Textblock_Text_Item *
_layout_text_item_new(Ctxt *c EINA_UNUSED, Evas_Object_Textblock_Format *fmt)
{
Evas_Object_Textblock_Text_Item *ti;
ti = calloc(1, sizeof(Evas_Object_Textblock_Text_Item));
ti->parent.format = fmt;
ti->parent.format->ref++;
ti->parent.type = EVAS_TEXTBLOCK_ITEM_TEXT;
return ti;
}
/**
* @internal
* Return the cutoff of the text in the text item.
*
* @param c the context to work on - Not NULL.
* @param fmt the format to use. - Not NULL.
* @param it the item to check - Not null.
* @return -1 if there is no cutoff (either because there is really none,
* or because of an error), cutoff index on success.
*/
static int
_layout_text_cutoff_get(Ctxt *c, Evas_Object_Textblock_Format *fmt,
const Evas_Object_Textblock_Text_Item *ti,
Evas_Coord w, Evas_Coord from_x, int width_offset)
{
if (fmt->font.font)
{
Evas_Coord x;
Evas_Object_Protected_Data *obj = c->evas_o;
x = w - c->o->style_pad.l - c->o->style_pad.r - c->marginl -
c->marginr - from_x - ti->x_adjustment;
if (x < 0)
x = 0;
return ENFN->font_last_up_to_pos(ENC, fmt->font.font,
&ti->text_props, x, 0, width_offset);
}
return -1;
}
static Evas_Object_Textblock_Text_Item * _layout_hyphen_item_new(Ctxt *c, const Evas_Object_Textblock_Text_Item *cur_ti);
/**
* @internal
* Split before cut, and strip if str[cut - 1] is a whitespace.
*
* @param c the context to work on - Not NULL.
* @param ti the item to cut - not null.
* @param lti the logical list item of the item.
* @param cut the cut index.
* @return the second (newly created) item.
*/
static Evas_Object_Textblock_Text_Item *
_layout_item_text_split_strip_white(Ctxt *c,
Evas_Object_Textblock_Text_Item *ti, Eina_List *lti, size_t cut)
{
const Eina_Unicode *ts;
Evas_Object_Textblock_Text_Item *new_ti = NULL, *white_ti = NULL;
ts = GET_ITEM_TEXT(ti);
if (!IS_AT_END(ti, cut) && (ti->text_props.text_len > 0))
{
new_ti = _layout_text_item_new(c, ti->parent.format);
new_ti->parent.text_node = ti->parent.text_node;
new_ti->parent.text_pos = ti->parent.text_pos + cut;
new_ti->parent.merge = EINA_TRUE;
evas_common_text_props_split(&ti->text_props,
&new_ti->text_props, cut);
_layout_text_add_logical_item(c, new_ti, lti);
}
/* Strip the previous white if needed */
if ((cut >= 1) && _is_white(ts[cut - 1]) && (ti->text_props.text_len > 0))
{
if (cut - 1 > 0)
{
size_t white_cut = cut - 1;
white_ti = _layout_text_item_new(c, ti->parent.format);
white_ti->parent.text_node = ti->parent.text_node;
white_ti->parent.text_pos = ti->parent.text_pos + white_cut;
white_ti->parent.merge = EINA_TRUE;
white_ti->parent.visually_deleted = EINA_TRUE;
evas_common_text_props_split(&ti->text_props,
&white_ti->text_props, white_cut);
_layout_text_add_logical_item(c, white_ti, lti);
}
else
{
/* Mark this one as the visually deleted. */
ti->parent.visually_deleted = EINA_TRUE;
}
}
if (new_ti || white_ti)
{
_text_item_update_sizes(c, ti);
}
return new_ti;
}
/**
* @internal
* Merge item2 into item1 and free item2.
*
* @param c the context to work on - Not NULL.
* @param item1 the item to copy to
* @param item2 the item to copy from
*/
static void
_layout_item_merge_and_free(Ctxt *c,
Evas_Object_Textblock_Text_Item *item1,
Evas_Object_Textblock_Text_Item *item2)
{
evas_common_text_props_merge(&item1->text_props,
&item2->text_props);
_text_item_update_sizes(c, item1);
item1->parent.merge = EINA_FALSE;
item1->parent.visually_deleted = EINA_FALSE;
_item_free(c->evas, c->o, c->evas_o, NULL, _ITEM(item2));
}
/**
* @internal
* Calculates an item's size.
*
* @param c the context
* @param it the item itself.
*/
static void
_text_item_update_sizes(Ctxt *c, Evas_Object_Textblock_Text_Item *ti)
{
int tw = 0, th = 0, advw = 0;
const Evas_Object_Textblock_Format *fmt = ti->parent.format;
int shad_sz = 0, shad_dst = 0, out_sz = 0;
int dx = 0, minx = 0, maxx = 0, shx1, shx2;
Evas_Object_Protected_Data *obj = c->evas_o;
if (fmt->font.font)
{
ENFN->font_string_size_get(ENC, fmt->font.font,
&ti->text_props, &tw, &th);
advw = ENFN->font_h_advance_get(ENC, fmt->font.font,
&ti->text_props);
}
if (EINA_UNLIKELY(ti->parent.format->gfx_filter != NULL))
{
Evas_Filter_Padding pad = { 0, 0, 0, 0 };
Evas_Filter_Program *pgm;
pgm = _format_filter_program_get(c->o, ti->parent.format);
if (pgm)
{
evas_filter_program_padding_get(pgm, &pad, NULL);
ti->x_adjustment = pad.r + pad.l;
ti->parent.w = tw + ti->x_adjustment; // FIXME: why add l+r here,
ti->parent.h = th; // but not t+b here?
ti->parent.adv = advw;
ti->parent.x = 0;
return;
}
}
/* These adjustments are calculated and thus heavily linked to those in
* textblock_render!!! Don't change one without the other. */
switch (ti->parent.format->style & EVAS_TEXT_STYLE_MASK_BASIC)
{
case EVAS_TEXT_STYLE_SHADOW:
shad_dst = 1;
break;
case EVAS_TEXT_STYLE_OUTLINE_SHADOW:
case EVAS_TEXT_STYLE_FAR_SHADOW:
shad_dst = 2;
out_sz = 1;
break;
case EVAS_TEXT_STYLE_OUTLINE_SOFT_SHADOW:
shad_dst = 1;
shad_sz = 2;
out_sz = 1;
break;
case EVAS_TEXT_STYLE_FAR_SOFT_SHADOW:
shad_dst = 2;
shad_sz = 2;
break;
case EVAS_TEXT_STYLE_SOFT_SHADOW:
shad_dst = 1;
shad_sz = 2;
break;
case EVAS_TEXT_STYLE_GLOW:
case EVAS_TEXT_STYLE_SOFT_OUTLINE:
out_sz = 2;
break;
case EVAS_TEXT_STYLE_OUTLINE:
out_sz = 1;
break;
default:
break;
}
switch (ti->parent.format->style & EVAS_TEXT_STYLE_MASK_SHADOW_DIRECTION)
{
case EVAS_TEXT_STYLE_SHADOW_DIRECTION_BOTTOM_LEFT:
case EVAS_TEXT_STYLE_SHADOW_DIRECTION_LEFT:
case EVAS_TEXT_STYLE_SHADOW_DIRECTION_TOP_LEFT:
dx = -1;
break;
case EVAS_TEXT_STYLE_SHADOW_DIRECTION_BOTTOM_RIGHT:
case EVAS_TEXT_STYLE_SHADOW_DIRECTION_TOP_RIGHT:
case EVAS_TEXT_STYLE_SHADOW_DIRECTION_RIGHT:
dx = 1;
break;
case EVAS_TEXT_STYLE_SHADOW_DIRECTION_TOP:
case EVAS_TEXT_STYLE_SHADOW_DIRECTION_BOTTOM:
default:
dx = 0;
break;
}
minx = -out_sz;
maxx = out_sz;
shx1 = dx * shad_dst;
shx1 -= shad_sz;
shx2 = dx * shad_dst;
shx2 += shad_sz;
if (shx1 < minx) minx = shx1;
if (shx2 > maxx) maxx = shx2;
ti->x_adjustment = maxx - minx;
ti->parent.w = tw + ti->x_adjustment;
ti->parent.h = th;
ti->parent.adv = advw;
ti->parent.x = 0;
}
/**
* @internal
* Adds the item to the list, updates the item's properties (e.g, x,w,h)
*
* @param c the context
* @param it the item itself.
* @param rel item ti will be appened after, NULL = last.
*/
static void
_layout_text_add_logical_item(Ctxt *c, Evas_Object_Textblock_Text_Item *ti,
Eina_List *rel)
{
_text_item_update_sizes(c, ti);
c->par->logical_items = eina_list_append_relative_list(
c->par->logical_items, ti, rel);
}
static void
_layout_text_append_add_logical_item(Ctxt *c, Evas_Object_Textblock_Text_Item *ti,
Eina_List *rel)
{
_text_item_update_sizes(c, ti);
if (rel)
{
c->par->logical_items = eina_list_prepend_relative_list(
c->par->logical_items, ti, rel);
}
else
{
c->par->logical_items = eina_list_append(
c->par->logical_items, ti);
}
}
typedef struct {
EINA_INLIST;
Evas_Object_Textblock_Format *format;
size_t start;
int off;
} Layout_Text_Append_Queue;
/**
* @internal
* Appends the text from node n starting at start ending at off to the layout.
* It uses the fmt for the formatting.
*
* @param c the current context- NOT NULL.
* @param fmt the format to use.
* @param n the text node. - Not null.
* @param start the start position. - in range.
* @param off the offset - start + offset in range. if offset is -1, it'll add everything to the end of the string if offset = 0 it'll return with doing nothing.
* @param repch a replacement char to print instead of the original string, for example, * when working with passwords.
*/
static void
_layout_text_append(Ctxt *c, Layout_Text_Append_Queue *queue, Evas_Object_Textblock_Node_Text *n, int start, int off, const char *repch, Eina_List *rel)
{
const Eina_Unicode *str = EINA_UNICODE_EMPTY_STRING;
const Eina_Unicode *tbase;
Evas_Object_Textblock_Text_Item *ti;
size_t cur_len = 0;
Eina_Unicode urepch = 0;
/* prepare a working copy of the string, either filled by the repch or
* filled with the true values */
if (n)
{
int len;
int orig_off = off;
/* Figure out if we want to bail, work with an empty string,
* or continue with a slice of the passed string */
len = eina_ustrbuf_length_get(n->unicode);
if (off == 0) return;
else if (off < 0) off = len - start;
if (start < 0)
{
start = 0;
}
else if ((start == 0) && (off == 0) && (orig_off == -1))
{
/* Special case that means that we need to add an empty
* item */
str = EINA_UNICODE_EMPTY_STRING;
goto skip;
}
else if ((start >= len) || (start + off > len))
{
return;
}
/* If we work with a replacement char, create a string which is the same
* but with replacement chars instead of regular chars. */
if ((queue->format->password) && (repch) && (eina_ustrbuf_length_get(n->unicode)))
{
int i, ind;
Eina_Unicode *ptr;
tbase = str = ptr = alloca((off + 1) * sizeof(Eina_Unicode));
ind = 0;
urepch = eina_unicode_utf8_next_get(repch, &ind);
for (i = 0 ; i < off; ptr++, i++)
*ptr = urepch;
*ptr = 0;
}
/* Use the string, just cut the relevant parts */
else
{
str = eina_ustrbuf_string_get(n->unicode) + start;
}
cur_len = off;
}
skip:
tbase = str;
/* If there's no parent text node, only create an empty item */
if (!n)
{
ti = _layout_text_item_new(c, queue->format);
ti->parent.text_node = NULL;
ti->parent.text_pos = 0;
_layout_text_append_add_logical_item(c, ti, rel);
return;
}
while (cur_len > 0)
{
Evas_Font_Instance *script_fi = NULL;
int script_len, tmp_cut;
Evas_Script_Type script;
script_len = cur_len;
tmp_cut = evas_common_language_script_end_of_run_get(str,
c->par->bidi_props, start + str - tbase, script_len);
if (tmp_cut > 0)
{
script_len = tmp_cut;
}
cur_len -= script_len;
script = evas_common_language_script_type_get(str, script_len);
Evas_Object_Protected_Data *obj = efl_data_scope_get(c->obj, EFL_CANVAS_OBJECT_CLASS);
while (script_len > 0)
{
Evas_Font_Instance *cur_fi = NULL;
size_t run_start;
int run_len = script_len;
ti = _layout_text_item_new(c, queue->format);
ti->parent.text_node = n;
ti->parent.text_pos = run_start = start + str - tbase;
if (ti->parent.format->font.font)
{
run_len = ENFN->font_run_end_get(ENC,
ti->parent.format->font.font, &script_fi, &cur_fi,
script, str, script_len);
}
evas_common_text_props_bidi_set(&ti->text_props,
c->par->bidi_props, ti->parent.text_pos);
evas_common_text_props_script_set(&ti->text_props, script);
if (cur_fi)
{
ENFN->font_text_props_info_create(ENC,
cur_fi, str, &ti->text_props, c->par->bidi_props,
ti->parent.text_pos, run_len, EVAS_TEXT_PROPS_MODE_SHAPE,
ti->parent.format->font.fdesc->lang);
}
while ((queue->start + queue->off) < (run_start + run_len))
{
Evas_Object_Textblock_Text_Item *new_ti;
/* There must be a next because of the test in the while. */
queue = (Layout_Text_Append_Queue *) EINA_INLIST_GET(queue)->next;
new_ti = _layout_text_item_new(c, queue->format);
new_ti->parent.text_node = ti->parent.text_node;
new_ti->parent.text_pos = queue->start;
evas_common_text_props_split(&ti->text_props, &new_ti->text_props,
new_ti->parent.text_pos - ti->parent.text_pos);
_layout_text_append_add_logical_item(c, ti, rel);
ti = new_ti;
}
_layout_text_append_add_logical_item(c, ti, rel);
str += run_len;
script_len -= run_len;
}
}
}
/**
* @internal
* Add a format item from the format node n and the item item.
*
* @param c the current context- NOT NULL.
* @param n the source format node - not null.
* @param item the format text.
*
* @return the new format item.
*/
static Evas_Object_Textblock_Format_Item *
_layout_format_item_add(Ctxt *c, Evas_Object_Textblock_Node_Format *n, const char *item, Evas_Object_Textblock_Format *fmt)
{
Evas_Object_Textblock_Format_Item *fi;
fi = calloc(1, sizeof(Evas_Object_Textblock_Format_Item));
fi->item = eina_stringshare_add(item);
fi->parent.type = EVAS_TEXTBLOCK_ITEM_FORMAT;
fi->parent.format = fmt;
fi->parent.format->ref++;
c->par->logical_items = eina_list_append(c->par->logical_items, fi);
if (n)
{
fi->parent.text_node = n->text_node;
/* FIXME: make it more efficient */
fi->parent.text_pos = _evas_textblock_node_format_pos_get(n);
#ifdef BIDI_SUPPORT
fi->bidi_dir = (evas_bidi_is_rtl_char(
c->par->bidi_props,
0,
fi->parent.text_pos)) ?
EVAS_BIDI_DIRECTION_RTL : EVAS_BIDI_DIRECTION_LTR;
#else
fi->bidi_dir = EVAS_BIDI_DIRECTION_LTR;
#endif
}
return fi;
}
/**
* @internal
* Should be call after we finish filling a format.
* FIXME: doc.
*/
static void
_format_finalize(Evas_Object *eo_obj, Evas_Object_Textblock_Format *fmt)
{
Evas_Object_Protected_Data *obj = efl_data_scope_get(eo_obj, EFL_CANVAS_OBJECT_CLASS);
void *of;
of = fmt->font.font;
fmt->font.font = evas_font_load(obj->layer->evas->evas, fmt->font.fdesc,
fmt->font.source, (int)(((double) fmt->font.size) * obj->cur->scale), fmt->font.bitmap_scalable);
if (of) evas_font_free(obj->layer->evas->evas, of);
}
static Efl_Canvas_Text_Filter_Program *
_filter_program_find(Efl_Canvas_Text_Data *o, const char *name)
{
Efl_Canvas_Text_Filter_Program *prg;
if (!name) return NULL;
EINA_INLIST_FOREACH(o->gfx_filter.programs, prg)
{
if (eina_streq(name, prg->name))
return prg;
}
return NULL;
}
static Evas_Filter_Program *
_format_filter_program_get(Efl_Canvas_Text_Data *o, Evas_Object_Textblock_Format *fmt)
{
Efl_Canvas_Text_Filter_Program *program;
Efl_Canvas_Text_Filter *filter;
Evas_Filter_Program *pgm;
filter = fmt->gfx_filter;
if (!filter) return NULL;
program = _filter_program_find(o, filter->name);
if (!program) return NULL;
if (program->changed)
{
evas_filter_program_del(program->pgm);
program->pgm = NULL;
}
pgm = program->pgm;
if (!pgm)
{
pgm = evas_filter_program_new(program->name, EINA_FALSE);
evas_filter_program_data_set_all(pgm, EINA_INLIST_GET(o->gfx_filter.data_bindings));
evas_filter_program_source_set_all(pgm, o->gfx_filter.sources);
if (!evas_filter_program_parse(pgm, program->code))
{
evas_filter_program_del(pgm);
filter->invalid = EINA_TRUE;
return NULL;
}
filter->invalid = EINA_FALSE;
program->pgm = pgm;
}
return pgm;
}
/**
* @internal
* Returns true if the item is a tab
* @def _IS_TAB(item)
*/
#define _IS_TAB(item) \
(!strcmp(item, "tab") || !strcmp(item, "\t") || !strcmp(item, "\\t"))
/**
* @internal
* Returns true if the item is a line spearator, false otherwise
* @def _IS_LINE_SEPARATOR(item)
*/
#define _IS_LINE_SEPARATOR(item) \
(!strcmp(item, "br") || !strcmp(item, "\n") || !strcmp(item, "\\n"))
/**
* @internal
* Returns true if the item is a paragraph separator, false otherwise
* @def _IS_PARAGRAPH_SEPARATOR(item)
*/
#define _IS_PARAGRAPH_SEPARATOR_SIMPLE(item) \
(!strcmp(item, "ps"))
/**
* @internal
* Returns true if the item is a paragraph separator, false otherwise
* takes legacy mode into account.
* @def _IS_PARAGRAPH_SEPARATOR(item)
*/
#define _IS_PARAGRAPH_SEPARATOR(o, item) \
(_IS_PARAGRAPH_SEPARATOR_SIMPLE(item) || \
(o->legacy_newline && _IS_LINE_SEPARATOR(item))) /* Paragraph separator */
/**
* @internal
* Handles a format by processing a format node. It returns the relevant format
* through _fmt and updates the padding through style_pad_*. If needed,
* it creates a format item.
*
* @param obj the evas object - NOT NULL.
* @param c the current context- NOT NULL.
* @param _fmt the format that holds the result.
* @param n the source format node - not null.
* @param style_pad_l the pad to update.
* @param style_pad_r the pad to update.
* @param style_pad_t the pad to update.
* @param style_pad_b the pad to update.
* @param create_item Create a new format item if true, only process otherwise.
*
* @return fi if created.
*/
static Evas_Object_Textblock_Format_Item *
_layout_do_format(const Evas_Object *obj, Ctxt *c,
Evas_Object_Textblock_Format **_fmt, Evas_Object_Textblock_Node_Format *n,
int *style_pad_l, int *style_pad_r, int *style_pad_t, int *style_pad_b,
Eina_Bool create_item)
{
Evas_Object_Textblock_Format_Item *fi = NULL;
Evas_Object_Textblock_Format *fmt = *_fmt;
/* FIXME: comment the algo */
const char *s;
const char *item;
int handled = 0;
Eina_Bool is_item = (n->annotation && n->annotation->is_item && n->opener);
s = n->format;
if (!strncmp(s, "item ", 5) || is_item)
{
// one of:
// item size=20x10 href=name
// item relsize=20x10 href=name
// item abssize=20x10 href=name
//
// optional arguments:
// vsize=full
// vsize=ascent
//
// size == item size (modifies line size) - can be multiplied by
// scale factor
// relsize == relative size (height is current font height, width
// modified accordingly keeping aspect)
// abssize == absolute size (modifies line size) - never mulitplied by
// scale factor
// href == name of item - to be found and matched later and used for
// positioning
int w = 1, h = 1;
int vsize = 0, size = 0;
char *p;
// don't care
//href = strstr(s, " href=");
p = strstr(s, is_item ? "vsize=" : " vsize=");
if (p)
{
p += (is_item ? 6 : 7);
if (!strncmp(p, "full", 4)) vsize = VSIZE_FULL;
else if (!strncmp(p, "ascent", 6)) vsize = VSIZE_ASCENT;
}
p = strstr(s, is_item ? "size=" : " size=");
if (p)
{
p += (is_item ? 5 : 6);
if (sscanf(p, "%ix%i", &w, &h) == 2)
{
/* this is handled somewhere else because it depends
* on the current scaling factor of the object which
* may change and break because the results of this
* function are cached */
size = SIZE;
}
}
else
{
p = strstr(s, is_item ? "absize=" : " absize=");
if (p)
{
p += (is_item ? 7 : 8);
if (sscanf(p, "%ix%i", &w, &h) == 2)
{
size = SIZE_ABS;
}
}
else
{
p = strstr(s, is_item ? "relsize=" : " relsize=");
if (p)
{
/* this is handled somewhere else because it depends
* on the line it resides in, which is not defined
* at this point and will change anyway, which will
* break because the results of this function are
* cached */
size = SIZE_REL;
}
}
}
if (create_item)
{
fi = _layout_format_item_add(c, n, s, fmt);
fi->vsize = vsize;
fi->size = size;
fi->formatme = 1;
/* For formats items it's usually
the same, we don't handle the
special cases yet. */
fi->parent.w = fi->parent.adv = w;
fi->parent.h = h;
}
/* Not sure if it's the best handling, but will do it for now. */
fmt = _layout_format_push(c, fmt, n);
handled = 1;
}
if (!handled)
{
Eina_Bool push_fmt = EINA_FALSE;
if (n->opener && !n->own_closer)
{
fmt = _layout_format_push(c, fmt, n);
push_fmt = EINA_TRUE;
}
else if (!n->opener)
{
fmt = _layout_format_pop(c, n->orig_format);
}
while ((item = _format_parse(&s)))
{
if (_format_is_param(item))
{
/* Only handle it if it's a push format, otherwise,
* don't let overwrite the format stack.. */
if (push_fmt)
{
_layout_format_value_handle(c, fmt, item);
}
}
else if (create_item)
{
if ((_IS_PARAGRAPH_SEPARATOR(c->o, item)) ||
(_IS_LINE_SEPARATOR(item)))
{
fi = _layout_format_item_add(c, n, item, fmt);
fi->parent.w = fi->parent.adv = 0;
}
else if (_IS_TAB(item))
{
fi = _layout_format_item_add(c, n, item, fmt);
fi->parent.w = fi->parent.adv = fmt->tabstops;
fi->formatme = 1;
}
}
}
_format_finalize(c->obj, fmt);
}
{
Evas_Filter_Padding pad = { 0, 0, 0, 0 };
Evas_Filter_Program *pgm = NULL;
if (EINA_UNLIKELY(fmt->gfx_filter != NULL))
pgm = _format_filter_program_get(efl_data_scope_get(obj, MY_CLASS), fmt);
if (EINA_UNLIKELY(pgm != NULL))
evas_filter_program_padding_get(pgm, &pad, NULL);
else
evas_text_style_pad_get(fmt->style, &pad.l, &pad.r, &pad.t, &pad.b);
if (pad.l > *style_pad_l) *style_pad_l = pad.l;
if (pad.r > *style_pad_r) *style_pad_r = pad.r;
if (pad.t > *style_pad_t) *style_pad_t = pad.t;
if (pad.b > *style_pad_b) *style_pad_b = pad.b;
}
if (fmt->underline2)
c->have_underline2 = 1;
else if (fmt->underline || fmt->underline_dash)
c->have_underline = 1;
*_fmt = fmt;
return fi;
}
static void
_layout_update_par(Ctxt *c)
{
Evas_Object_Textblock_Paragraph *last_par;
last_par = (Evas_Object_Textblock_Paragraph *)
EINA_INLIST_GET(c->par)->prev;
if (last_par)
{
c->par->y = last_par->y + last_par->h;
}
else
{
c->par->y = 0;
}
}
/* -1 means no wrap */
static int
_layout_get_charwrap(Ctxt *c, Evas_Object_Textblock_Format *fmt,
const Evas_Object_Textblock_Item *it, size_t line_start,
const char *breaks,
Evas_Coord w, Evas_Coord from_x)
{
int wrap;
size_t uwrap;
size_t len = eina_ustrbuf_length_get(it->text_node->unicode);
/* Currently not being used, because it doesn't contain relevant
* information */
(void) breaks;
{
if (it->type == EVAS_TEXTBLOCK_ITEM_FORMAT)
wrap = 0;
else
wrap = _layout_text_cutoff_get(c, fmt, _ITEM_TEXT(it),
w, from_x, 0);
if (wrap < 0)
return -1;
uwrap = (size_t) wrap + it->text_pos;
}
if ((uwrap == line_start) && (it->type == EVAS_TEXTBLOCK_ITEM_TEXT))
{
uwrap = it->text_pos +
(size_t) evas_common_text_props_cluster_next(
&_ITEM_TEXT(it)->text_props, wrap);
}
if ((uwrap <= line_start) || (uwrap > len))
return -1;
return uwrap;
}
/* -1 means no wrap */
/* Allow break means: if we can break after the current char */
#define ALLOW_BREAK(i) \
(breaks[i] <= LINEBREAK_ALLOWBREAK)
/* Give a position in text, find the end of word by using Unicode word
* boundary rules */
static inline size_t
_layout_word_end(const char *breaks, size_t pos, size_t len)
{
for ( ; (pos < len - 1) && (breaks[pos] != WORDBREAK_BREAK) ; pos++)
;
return pos;
}
#define SHY_HYPHEN 0xad
static int
_layout_get_hyphenationwrap(Ctxt *c, Evas_Object_Textblock_Format *fmt,
const Evas_Object_Textblock_Item *it, size_t line_start,
const char *breaks, const char *wordbreaks,
Evas_Coord w, Evas_Coord from_x)
{
size_t wrap;
size_t orig_wrap;
const Eina_Unicode *str = eina_ustrbuf_string_get(
it->text_node->unicode);
int item_start = it->text_pos;
size_t len = eina_ustrbuf_length_get(it->text_node->unicode);
Eina_Bool try_hyphenate = EINA_FALSE;
{
int swrap = -1;
int hyphen_swrap = -1;
if (it->type == EVAS_TEXTBLOCK_ITEM_FORMAT)
swrap = 0;
else
{
/* Get cutoff */
swrap = _layout_text_cutoff_get(c, fmt, _ITEM_TEXT(it), 0,
w, from_x);
/* Get cutoff considering an additional hyphen item */
c->hyphen_ti = _layout_hyphen_item_new(c, _ITEM_TEXT(it));
hyphen_swrap = _layout_text_cutoff_get(c, fmt, _ITEM_TEXT(it),
w - c->hyphen_ti->parent.w, from_x, c->hyphen_ti->parent.w);
/* Stronger condition than '< 0' for hyphenations */
if (hyphen_swrap >= 2)
{
try_hyphenate = EINA_TRUE;
}
else
{
_item_free(c->evas, c->o, c->evas_o, NULL, _ITEM(c->hyphen_ti));
c->hyphen_ti = NULL;
}
}
if (swrap < 0)
return -1;
orig_wrap = wrap = swrap + item_start;
if (try_hyphenate)
{
orig_wrap = wrap = hyphen_swrap + item_start;
}
}
if (wrap > line_start)
{
Eina_Bool found_hyphen = EINA_FALSE;
size_t word_end;
if (!_is_white(str[wrap]) || (wrap + 1 == len))
MOVE_PREV_UNTIL(line_start, wrap);
/* If there's a breakable point inside the text, scan backwards until
* we find it */
while (wrap > line_start)
{
/* When iterating back, 'wrap - 1' is the word delimiter,
* but isn't the word's start. The word's start is 'wrap'. */
if (try_hyphenate && ((wordbreaks[wrap - 1] == WORDBREAK_BREAK) ||
(wrap - 1 == line_start)))
{
size_t word_start, word_len;
word_start = wrap; /* easier to understand if we tag this */
word_end = _layout_word_end(wordbreaks, wrap, len);
word_len = word_end - word_start + 1;
if (word_len >= 4)
{
size_t hyphen_off;
size_t i = 0;
size_t pos = 0;
#ifdef HAVE_HYPHEN
char *hyphens = _layout_wrap_hyphens_get(
str, it->format->font.fdesc->lang,
word_start, word_len);
#endif
/* This only happens one time, if the cutoff is in
* the middle of this word */
if (word_end > orig_wrap - 1)
{
word_end = orig_wrap - 1;
}
hyphen_off = word_end - word_start;
/* We limit our search to the start of the line */
if (word_start < line_start)
{
word_start = line_start;
}
for (i = hyphen_off, pos = word_end ; pos > word_start ; i--, pos--)
{
if (
#ifdef HAVE_HYPHEN
(hyphens && (hyphens[i] & 1)) ||
#endif
(str[pos] == SHY_HYPHEN))
{
found_hyphen = EINA_TRUE;
break;
}
}
#ifdef HAVE_HYPHEN
if (hyphens)
{
free(hyphens);
}
#endif
/* Rejecting sequences smaller than 2 characters.
* This also works with 'i' initialized to 0 */
if (found_hyphen)
{
wrap = pos;
break;
}
}
}
/* SHY-HYPHEN is considered a wordbreak. We don't block it
* internally in ALLOW_BREAK, just here. */
if (ALLOW_BREAK(wrap) && (str[wrap] != SHY_HYPHEN))
break;
wrap--;
}
/* hyphen item cleanup */
if (!found_hyphen && c->hyphen_ti)
{
_item_free(c->evas, c->o, c->evas_o, NULL, _ITEM(c->hyphen_ti));
c->hyphen_ti = NULL;
}
if ((wrap > line_start) ||
((wrap == line_start) && (ALLOW_BREAK(wrap)) && (wrap < len)))
{
/* We found a suitable wrapping point, break here. */
MOVE_NEXT_UNTIL(len, wrap);
return wrap;
}
}
/* Hyphenation falls-back to char wrapping at start of line */
return _layout_get_charwrap(c, fmt, it,
line_start, breaks, w, from_x);
}
static int
_layout_get_word_mixwrap_common(Ctxt *c, Evas_Object_Textblock_Format *fmt,
const Evas_Object_Textblock_Item *it, Eina_Bool mixed_wrap,
size_t line_start, const char *breaks,
Evas_Coord w, Evas_Coord from_x,
Eina_Bool scan_fwd)
{
Eina_Bool wrap_after = EINA_FALSE;
size_t wrap;
size_t orig_wrap;
const Eina_Unicode *str = eina_ustrbuf_string_get(
it->text_node->unicode);
int item_start = it->text_pos;
size_t len = eina_ustrbuf_length_get(it->text_node->unicode);
{
int swrap = -1;
if (it->type == EVAS_TEXTBLOCK_ITEM_FORMAT)
swrap = 0;
else
swrap = _layout_text_cutoff_get(c, fmt, _ITEM_TEXT(it), w, from_x, 0);
/* Avoiding too small textblocks to even contain one char.
* FIXME: This can cause breaking inside ligatures. */
if (swrap < 0)
return -1;
orig_wrap = wrap = swrap + item_start;
}
if (wrap > line_start)
{
/* The wrapping point found is the first char of the next string
the rest works on the last char of the previous string.
If it's a whitespace, then it's ok, and no need to go back
because we'll remove it anyway. */
if (!_is_white(str[wrap]) || (wrap + 1 == len))
MOVE_PREV_UNTIL(line_start, wrap);
/* If there's a breakable point inside the text, scan backwards until
* we find it */
while (wrap > line_start)
{
if (ALLOW_BREAK(wrap))
break;
wrap--;
}
if ((wrap > line_start) ||
((wrap == line_start) && (ALLOW_BREAK(wrap)) && (wrap < len)))
{
/* We found a suitable wrapping point, break here. */
MOVE_NEXT_UNTIL(len, wrap);
return wrap;
}
else
{
if (mixed_wrap)
{
return ((orig_wrap >= line_start) && (orig_wrap < len)) ?
((int) orig_wrap) : -1;
}
else if (scan_fwd)
{
/* Scan forward to find the next wrapping point */
wrap = orig_wrap;
wrap_after = EINA_TRUE;
}
}
}
/* If we need to find the position after the cutting point */
if ((wrap == line_start) || (wrap_after))
{
if (!scan_fwd) return wrap;
if (mixed_wrap)
{
return _layout_get_charwrap(c, fmt, it,
line_start, breaks, w, from_x);
}
else
{
while (wrap < len)
{
if (ALLOW_BREAK(wrap))
break;
wrap++;
}
if ((wrap < len) && (wrap >= line_start))
{
MOVE_NEXT_UNTIL(len, wrap);
return wrap;
}
else
{
return -1;
}
}
}
return -1;
}
/* -1 means no wrap */
static int
_layout_get_wordwrap(Ctxt *c, Evas_Object_Textblock_Format *fmt,
const Evas_Object_Textblock_Item *it, size_t line_start,
const char *breaks,
Evas_Coord w, Evas_Coord from_x,
Eina_Bool allow_scan_fwd)
{
return _layout_get_word_mixwrap_common(c, fmt, it, EINA_FALSE, line_start,
breaks, w, from_x, allow_scan_fwd);
}
/* -1 means no wrap */
static int
_layout_get_mixedwrap(Ctxt *c, Evas_Object_Textblock_Format *fmt,
const Evas_Object_Textblock_Item *it, size_t line_start,
const char *breaks,
Evas_Coord w, Evas_Coord from_x,
Eina_Bool allow_scan_fwd)
{
return _layout_get_word_mixwrap_common(c, fmt, it, EINA_TRUE, line_start,
breaks, w, from_x, allow_scan_fwd);
}
static Evas_Object_Textblock_Text_Item *
_layout_ellipsis_item_new(Ctxt *c, const Evas_Object_Textblock_Item *cur_it)
{
const Eina_Unicode _ellip_str[2] = { 0x2026, '\0' };
Evas_Object_Textblock_Text_Item *ellip_ti;
Evas_Script_Type script;
Evas_Font_Instance *script_fi = NULL, *cur_fi;
size_t len = 1; /* The length of _ellip_str */
/* We can free it here, cause there's only one ellipsis item per tb. */
if (c->o->ellip_ti) _item_free(c->evas, c->o, c->evas_o, NULL, _ITEM(c->o->ellip_ti));
c->o->ellip_ti = ellip_ti = _layout_text_item_new(c, cur_it->format);
ellip_ti->parent.text_node = cur_it->text_node;
ellip_ti->parent.text_pos = cur_it->text_pos;
script = evas_common_language_script_type_get(_ellip_str, len);
evas_common_text_props_bidi_set(&ellip_ti->text_props,
c->par->bidi_props, ellip_ti->parent.text_pos);
evas_common_text_props_script_set (&ellip_ti->text_props, script);
if (ellip_ti->parent.format->font.font)
{
Evas_Object_Protected_Data *obj = c->evas_o;
/* It's only 1 char anyway, we don't need the run end. */
(void) ENFN->font_run_end_get(ENC,
ellip_ti->parent.format->font.font, &script_fi, &cur_fi,
script, _ellip_str, len);
ENFN->font_text_props_info_create(ENC,
cur_fi, _ellip_str, &ellip_ti->text_props,
c->par->bidi_props, ellip_ti->parent.text_pos, len, EVAS_TEXT_PROPS_MODE_SHAPE,
ellip_ti->parent.format->font.fdesc->lang);
}
_text_item_update_sizes(c, ellip_ti);
if (cur_it->type == EVAS_TEXTBLOCK_ITEM_TEXT)
{
ellip_ti->parent.text_pos += _ITEM_TEXT(cur_it)->text_props.text_len
- 1;
}
else
{
ellip_ti->parent.text_pos++;
}
return ellip_ti;
}
/**
* @internel
* Handle ellipsis
*/
static inline void
_layout_handle_ellipsis(Ctxt *c, Evas_Object_Textblock_Item *it, Eina_List *i)
{
Evas_Object_Textblock_Text_Item *ti, *ellip_ti;
Evas_Object_Textblock_Item *last_it, *prev_it;
Evas_Coord save_cx, ellip_w;
Evas_Coord temp_w;
int wrap;
ellip_ti = _layout_ellipsis_item_new(c, it);
prev_it = last_it = it;
save_cx = c->x;
temp_w = c->w;
ellip_w = ellip_ti->parent.w;
#ifdef BIDI_SUPPORT
// XXX: with RTL considerations in mind, we need to take max(adv, w) as the
// line may be reordered in a way that the item placement will cause the
// formatted width to exceed the width constraints.
if (c->par->is_bidi && ellip_ti->parent.adv > ellip_ti->parent.w)
{
ellip_w = ellip_ti->parent.adv;
}
#endif
temp_w -= ellip_w;
/* If there is no enough space for ellipsis item, remove all of items */
if (temp_w <= 0)
{
while (c->ln->items)
{
last_it = _ITEM(EINA_INLIST_GET(c->ln->items)->last);
c->ln->items = _ITEM(eina_inlist_remove(
EINA_INLIST_GET(c->ln->items),
EINA_INLIST_GET(last_it)));
}
last_it = NULL;
}
while (last_it)
{
if (last_it->type == EVAS_TEXTBLOCK_ITEM_TEXT)
{
ti = _ITEM_TEXT(last_it);
wrap = _layout_text_cutoff_get(c, last_it->format, ti,
temp_w, c->x, ellip_ti->parent.w);
if ((wrap > 0) && !IS_AT_END(ti, (size_t) wrap))
{
Evas_Object_Textblock_Text_Item *new_ti;
Eina_List *l = i;
while (l)
{
Evas_Object_Textblock_Item *iit = eina_list_data_get(l);
if (iit == _ITEM(ti)) break;
l = eina_list_prev(l);
}
new_ti = _layout_item_text_split_strip_white(c, ti, l, wrap);
ellip_ti->parent.text_pos = new_ti->parent.text_pos;
break;
}
else if (wrap < 0)
{
// Removal of the previous item left enough space.
ellip_ti->parent.text_pos = prev_it->text_pos;
break;
}
}
else
{
/* We will ignore format items. ex) tab
* But, if there is <item> tag and size is acceptable, we have to insert it to line. */
if (!strncmp(_ITEM_FORMAT(last_it)->item, "item", 4) &&
((temp_w - c->o->style_pad.l - c->o->style_pad.r - c->marginl - c->marginr) >= (c->x + last_it->adv)))
{
break;
}
}
if (c->ln->items && last_it != it)
{
c->ln->items = _ITEM(eina_inlist_remove(
EINA_INLIST_GET(c->ln->items),
EINA_INLIST_GET(last_it)));
}
prev_it = last_it;
last_it = (c->ln->items) ? _ITEM(EINA_INLIST_GET(c->ln->items)->last) : NULL;
if (last_it)
{
/* We need to renew ellipsis item.
* Because, base format is changed to last_it.
* We can't reuse it. */
temp_w += ellip_ti->parent.w;
ellip_ti = _layout_ellipsis_item_new(c, last_it);
temp_w -= ellip_ti->parent.w;
c->x -= last_it->adv;
if (c->x < 0)
c->x = 0;
save_cx = c->x;
}
}
c->x = save_cx;
/* If we should add this item, do it */
if (last_it == it)
{
c->ln->items = (Evas_Object_Textblock_Item *)
eina_inlist_append(EINA_INLIST_GET(c->ln->items),
EINA_INLIST_GET(it));
it->ln = c->ln;
if (it->type == EVAS_TEXTBLOCK_ITEM_FORMAT)
{
Evas_Object_Textblock_Format_Item *fi;
fi = _ITEM_FORMAT(it);
fi->y = c->y;
}
}
c->ln->items = (Evas_Object_Textblock_Item *)
eina_inlist_append(EINA_INLIST_GET(c->ln->items),
EINA_INLIST_GET(_ITEM(ellip_ti)));
_ITEM(ellip_ti)->ln = c->ln;
c->position = (c->position == TEXTBLOCK_POSITION_START) ?
TEXTBLOCK_POSITION_SINGLE : TEXTBLOCK_POSITION_END;
_layout_line_finalize(c, ellip_ti->parent.format);
}
/* Don't do much for the meanwhile. */
static inline void
_layout_paragraph_render(Efl_Canvas_Text_Data *o,
Evas_Object_Textblock_Paragraph *par)
{
if (par->rendered)
return;
par->rendered = EINA_TRUE;
(void) o;
}
/* calculates items width in current paragraph */
static inline Evas_Coord
_calc_items_width(Ctxt *c)
{
Evas_Object_Textblock_Item *it, *last_it = NULL;
Eina_List *i;
Evas_Coord w = 0;
if (!c->par->logical_items)
return 0;
EINA_LIST_FOREACH(c->par->logical_items, i, it)
{
w += it->adv;
last_it = it;
}
//reaching this point when it is the last item
if (last_it)
w += last_it->w - last_it->adv;
return w;
}
static inline int
_item_get_cutoff(Ctxt *c, Evas_Object_Textblock_Item *it, Evas_Coord x, Evas_Coord width_offset)
{
int pos = -1;
Evas_Object_Textblock_Text_Item *ti;
Evas_Object_Protected_Data *obj = c->evas_o;
ti = (it->type == EVAS_TEXTBLOCK_ITEM_TEXT) ? _ITEM_TEXT(it) : NULL;
if (ti && ti->parent.format->font.font)
{
pos = ENFN->font_last_up_to_pos(ENC, ti->parent.format->font.font,
&ti->text_props, x, 0, width_offset);
}
return pos;
}
/**
* @internal
* This handles ellipsis prior most of the work in _layout_par.
* Currently it is here to handle all value in the range of 0.0 to 0.9999 (<1).
* It starts by getting the total width of items, and calculates the 'block' of
* text that needs to be removed i.e. sets low and high boundaries
* of that block.
* All text items that intersect this block will be cut: the edge items (ones
* that don't intersect in whole) will be split, and the rest are set to be
* visually-deleted.
* Note that a special case for visible format items does not
* split them, but instead just visually-deletes them (because there are no
* characters to split).
*/
static inline void
_layout_par_ellipsis_items(Ctxt *c, double ellip)
{
Evas_Object_Textblock_Item *it;
Evas_Object_Textblock_Text_Item *ellip_ti;
Eina_List *i, *j;
Evas_Coord items_width, exceed, items_cut;
Evas_Coord l, h, off;
int pos;
c->o->ellip_prev_it = NULL;
/* calc exceed amount */
items_width = _calc_items_width(c);
exceed = items_width - (c->w - c->o->style_pad.l - c->o->style_pad.r
- c->marginl - c->marginr);
if (exceed <= 0)
return;
{
Evas_Object_Textblock_Item *first_it =
_ITEM(eina_list_data_get(c->par->logical_items));
ellip_ti = _layout_ellipsis_item_new(c, first_it);
}
exceed += ellip_ti->parent.adv;
items_cut = items_width * ellip;
l = items_cut - (exceed * ellip);
h = l + exceed; //h = items_cut - (exceed * (1 - ellip))
off = 0;
/* look for the item that is being cut by the lower boundary */
i = c->par->logical_items;
EINA_LIST_FOREACH(c->par->logical_items, i, it)
{
if (it->w > (l - off))
break;
off += it->adv;
}
c->o->ellip_prev_it = i;
if (it) ellip_ti = _layout_ellipsis_item_new(c, it);
pos = (it && it->type == EVAS_TEXTBLOCK_ITEM_TEXT) ?
(_item_get_cutoff(c, it, l - off, ellip_ti->parent.w)) : -1;
if (pos >= 0)
{
_layout_item_text_split_strip_white(c, _ITEM_TEXT(it), i, pos);
off += it->adv;
i = eina_list_next(i);
}
/* look for the item that is being cut by the upper boundary */
EINA_LIST_FOREACH(i, j, it)
{
if (it->w > (h - off))
break;
off += it->adv;
/* if item is not being cut by the upper boundary, then
* it is contained in the area that we are supposed to
* visually remove */
it->visually_deleted = EINA_TRUE;
}
pos = (it && it->type == EVAS_TEXTBLOCK_ITEM_TEXT) ?
(_item_get_cutoff(c, it, h - off, 0)) : -1;
if (pos >= 0)
_layout_item_text_split_strip_white(c, _ITEM_TEXT(it), j, pos + 1);
if (it)
it->visually_deleted = EINA_TRUE;
}
static inline void
_layout_par_append_ellipsis(Ctxt *c)
{
Evas_Object_Textblock_Text_Item *ellip_ti = c->o->ellip_ti;
c->ln->items = (Evas_Object_Textblock_Item *)
eina_inlist_append(EINA_INLIST_GET(c->ln->items),
EINA_INLIST_GET(_ITEM(ellip_ti)));
ellip_ti->parent.ln = c->ln;
c->x += ellip_ti->parent.adv;
}
/* obstacles */
static inline void
_layout_obstacles_update(Ctxt *c);
typedef struct _Evas_Textblock_Obstacle
{
Eo *eo_obs; /**< Pointer to evas object which serves as an obstacle. */
Evas_Coord x, y, w, h; /**< Geometry of the obstacle object. x,y are
the offset position of the obstacle relative to the textblock object. */
Eina_Bool visible : 1;
} Evas_Textblock_Obstacle;
static Evas_Textblock_Obstacle *
_layout_item_obstacle_get(Ctxt *c, Evas_Object_Textblock_Item *it);
/* 0 means go ahead, 1 means break without an error, 2 means
* break with an error, should probably clean this a bit (enum/macro)
* FIXME ^ */
static int
_layout_par(Ctxt *c)
{
Evas_Object_Textblock_Item *it;
Eina_List *i;
int ret = 0;
int wrap = -1;
char *line_breaks = NULL;
char *word_breaks = NULL;
if (!c->par->logical_items)
return 2;
/* We want to show it. */
c->par->visible = 1;
/* Check if we need to skip this paragraph because it's already layouted
* correctly, and mark handled nodes as dirty. */
c->par->line_no = c->line_no;
if (c->par->text_node)
{
/* Skip this paragraph if width is the same, there is no ellipsis
* and we aren't just calculating. */
if (!c->par->text_node->is_new && !c->par->text_node->dirty &&
!c->width_changed && c->par->lines &&
!c->o->have_ellipsis && !c->o->obstacle_changed &&
!c->o->wrap_changed)
{
Evas_Object_Textblock_Line *ln;
/* Update c->line_no */
ln = (Evas_Object_Textblock_Line *)
EINA_INLIST_GET(c->par->lines)->last;
if (ln)
c->line_no = c->par->line_no + ln->line_no + 1;
/* After this par we are no longer at the beginning, as there
* must be some text in the par. */
if (!EINA_INLIST_GET(c->par)->next)
{
c->position = (c->position == TEXTBLOCK_POSITION_START) ?
TEXTBLOCK_POSITION_SINGLE : TEXTBLOCK_POSITION_END;
}
else
{
if (c->position == TEXTBLOCK_POSITION_START)
c->position = TEXTBLOCK_POSITION_ELSE;
}
if (c->par->last_fw > c->wmax) c->wmax = c->par->last_fw;
return 0;
}
c->par->text_node->dirty = EINA_FALSE;
c->par->text_node->is_new = EINA_FALSE;
c->par->rendered = EINA_FALSE;
/* Merge back and clear the paragraph */
{
Eina_List *itr, *itr_next;
Evas_Object_Textblock_Item *ititr, *prev_it = NULL;
_paragraph_clear(c->evas, c->o, c->evas_o, c->par);
EINA_LIST_FOREACH_SAFE(c->par->logical_items, itr, itr_next, ititr)
{
if (ititr->merge && prev_it &&
(prev_it->type == EVAS_TEXTBLOCK_ITEM_TEXT) &&
(ititr->type == EVAS_TEXTBLOCK_ITEM_TEXT))
{
_layout_item_merge_and_free(c, _ITEM_TEXT(prev_it),
_ITEM_TEXT(ititr));
c->par->logical_items =
eina_list_remove_list(c->par->logical_items, itr);
}
else
{
ititr->visually_deleted = EINA_FALSE;
prev_it = ititr;
}
}
}
}
c->y = c->par->y;
#ifdef BIDI_SUPPORT
if (c->par->is_bidi)
{
_layout_update_bidi_props(c->o, c->par);
}
#endif
it = _ITEM(eina_list_data_get(c->par->logical_items));
_layout_line_new(c, it->format);
/* We walk on our own because we want to be able to add items from
* inside the list and then walk them on the next iteration. */
/* TODO: We need to consider where ellipsis is used in the current text.
Currently, we assume that ellipsis is at the beginning of the
paragraph. This is a safe assumption for now, as other usages
seem a bit unnatural.*/
// FIXME: revisit this for multi-line.
{
double ellip;
ellip = it->format->ellipsis;
if ((0 <= ellip) && (ellip < 1.0) && c->line_no == 0)
_layout_par_ellipsis_items(c, ellip);
}
Eina_Bool item_preadv = EINA_FALSE;
Evas_Textblock_Obstacle *obs = NULL;
c->par->last_fw = 0;
for (i = c->par->logical_items ; i ; )
{
Evas_Coord prevdescent = 0, prevascent = 0;
int adv_line = 0;
int redo_item = 0;
Evas_Textblock_Obstacle_Info *obs_info = NULL;
it = _ITEM(eina_list_data_get(i));
/* Skip visually deleted items */
if (it->visually_deleted ||
((it->type == EVAS_TEXTBLOCK_ITEM_TEXT) && !it->format->font.font))
{
//one more chance for ellipsis special cases
if (c->o->ellip_prev_it == i)
_layout_par_append_ellipsis(c);
i = eina_list_next(i);
continue;
}
it->x = c->x;
if (it->type == EVAS_TEXTBLOCK_ITEM_TEXT)
{
_layout_item_ascent_descent_adjust(c->evas_o, &c->ascent,
&c->descent, it, it->format);
}
else
{
Evas_Object_Textblock_Format_Item *fi = _ITEM_FORMAT(it);
if (fi->formatme)
{
prevdescent = c->descent;
prevascent = c->ascent;
/* If there are no text items yet, calc ascent/descent
* according to the current format. */
if (c->ascent + c->descent == 0)
_layout_item_ascent_descent_adjust(c->evas_o, &c->ascent,
&c->descent, it, it->format);
_layout_calculate_format_item_size(c->evas_o, fi, &c->ascent,
&c->descent, &fi->y, &fi->parent.w, &fi->parent.h);
fi->parent.adv = fi->parent.w;
}
}
if (c->handle_obstacles && !obs)
{
obs = _layout_item_obstacle_get(c, it);
}
/* Check if we need to wrap, i.e the text is bigger than the width,
or we already found a wrap point. */
if ((c->w >= 0) &&
(obs ||
(((c->x + it->w) >
(c->w - c->o->style_pad.l - c->o->style_pad.r -
c->marginl - c->marginr)) || (wrap > 0))))
{
/* Handle ellipsis here. If we don't have more width left
* and no height left, or no more width left and no wrapping.
* Note that this is only for ellipsis == 1.0, and is treated in a
* fast path.
* Other values of 0.0 <= ellipsis < 1.0 are handled in
* _layout_par_ellipsis_items */
int ellip_h_thresh = 0;
/* Calculate ellipsis threshold height. */
{
int ascent = 0, descent = 0, maxasc = 0, maxdesc = 0;
_layout_item_ascent_descent_adjust(c->evas_o, &ascent, &descent,
it, it->format);
if (c->position == TEXTBLOCK_POSITION_START)
_layout_item_max_ascent_descent_calc(c->evas_o, &maxasc, &maxdesc,
it, TEXTBLOCK_POSITION_SINGLE);
else
_layout_item_max_ascent_descent_calc(c->evas_o, &maxasc, &maxdesc,
it, TEXTBLOCK_POSITION_END);
if (ascent > maxasc) maxasc = ascent;
if (descent > maxdesc) maxdesc = descent;
/* The ascent/descent of this item + the ascent descent of
* the next item as if it was the last. */
ellip_h_thresh = ascent + descent + maxasc + maxdesc;
}
if ((EINA_DBL_EQ(it->format->ellipsis, 1.0)) && (c->h >= 0) &&
((c->y + ellip_h_thresh >
c->h - c->o->style_pad.t - c->o->style_pad.b) ||
(!it->format->wrap_word && !it->format->wrap_char &&
!it->format->wrap_mixed && !it->format->wrap_hyphenation) ||
!c->o->multiline))
{
_layout_handle_ellipsis(c, it, i);
ret = 1;
goto end;
}
/* If we want to wrap and it's worth checking for wrapping
* (i.e there's actually text). */
else if (c->o->multiline &&
((wrap > 0) || it->format->wrap_word || it->format->wrap_char ||
it->format->wrap_mixed || it->format->wrap_hyphenation) && it->text_node)
{
size_t line_start;
size_t it_len;
it_len = (it->type == EVAS_TEXTBLOCK_ITEM_FORMAT) ?
1 : _ITEM_TEXT(it)->text_props.text_len;
/* If we haven't calculated the linebreaks yet,
* do */
if (!line_breaks)
{
/* Only relevant in those cases */
if (it->format->wrap_word || it->format->wrap_mixed ||
it->format->wrap_hyphenation)
{
const char *lang;
lang = (it->format->font.fdesc) ?
it->format->font.fdesc->lang : "";
size_t len =
eina_ustrbuf_length_get(
it->text_node->unicode);
line_breaks = malloc(len);
set_linebreaks_utf32((const utf32_t *)
eina_ustrbuf_string_get(
it->text_node->unicode),
len, lang, line_breaks);
}
}
if (!word_breaks && it->format->wrap_hyphenation)
{
const char *lang;
lang = (it->format->font.fdesc) ?
it->format->font.fdesc->lang : "";
size_t len =
eina_ustrbuf_length_get(
it->text_node->unicode);
word_breaks = malloc(len);
set_wordbreaks_utf32((const utf32_t *)
eina_ustrbuf_string_get(
it->text_node->unicode),
len, lang, word_breaks);
}
if (c->ln->items)
line_start = c->ln->items->text_pos;
else
line_start = it->text_pos;
/* Only when doing non-obstacle handling */
if (!obs)
adv_line = 1;
/* If we don't already have a wrap point from before */
if (wrap < 0)
{
/* Originally with wrapping, we may have ended up
* wrapping on the item next to the current one,
* if the current one was the first item in a line.
* This is different with obstacles: we allow the
* wrapping point algorithm to consider the first
* item in a line as well, and "push" it forward
* after the obstacle.
* There is one specific case with obstacles, where
* we DON'T allow to scan forward on the textblock's
* edges, and that's if the first item in a line
* was pushed forward by an obstacle once, as there
* is a chance it will fit in the next lines. */
Eina_Bool allow_scan_fwd = (!obs && !item_preadv);
Evas_Coord cw = c->w;
if (obs)
{
cw -= obs->w;
}
if (it->format->wrap_word)
wrap = _layout_get_wordwrap(c, it->format, it,
line_start, line_breaks,
cw, c->x, allow_scan_fwd);
else if (it->format->wrap_char)
wrap = _layout_get_charwrap(c, it->format, it,
line_start, line_breaks, cw, c->x);
else if (it->format->wrap_mixed)
wrap = _layout_get_mixedwrap(c, it->format, it,
line_start, line_breaks, cw, c->x, allow_scan_fwd);
else if (it->format->wrap_hyphenation)
wrap = _layout_get_hyphenationwrap(c, it->format, it,
line_start, line_breaks, word_breaks,
cw, c->x);
else
wrap = -1;
}
/* If it's before the item, rollback and apply.
if it's in the item, cut.
If it's after the item, delay the cut */
if (wrap > 0)
{
size_t uwrap = (size_t) wrap;
if (uwrap < it->text_pos)
{
/* Rollback latest additions, and cut that
item */
i = eina_list_prev(i);
it = eina_list_data_get(i);
while (uwrap < it->text_pos)
{
c->ln->items = _ITEM(
eina_inlist_remove(
EINA_INLIST_GET(c->ln->items),
EINA_INLIST_GET(it)));
it->ln = c->ln;
i = eina_list_prev(i);
it = eina_list_data_get(i);
}
c->x = it->x;
c->ln->items = _ITEM(
eina_inlist_remove(
EINA_INLIST_GET(c->ln->items),
EINA_INLIST_GET(it)));
continue;
}
/* If it points to the end, it means the previous
* char is a whitespace we should remove, so this
* is a wanted cutting point. */
else if (uwrap > it->text_pos + it_len)
{
/* FIXME: Should redo the ellipsis handling.
* If we can do ellipsis, just cut here. */
if (EINA_DBL_EQ(it->format->ellipsis, 1.0))
{
_layout_handle_ellipsis(c, it, i);
ret = 1;
goto end;
}
else
{
/* Delay the cut in a smart way i.e use the
item_pos as the line_start, because
there's already no cut before*/
wrap = -1;
adv_line = 0;
}
}
else
{
wrap -= it->text_pos; /* Cut here */
}
}
/* Specific case for obstacles */
if (obs && (wrap >= 0))
{
obs_info = calloc(1, sizeof(Evas_Textblock_Obstacle_Info));
obs_info->it = it;
c->obs_infos = eina_list_append(c->obs_infos, obs_info);
}
if ((wrap >= 0) && ((size_t) wrap == it_len))
{
/* Can happen if this is the last word in the paragraph */
adv_line = 0;
}
else if (wrap > 0)
{
if (it->type == EVAS_TEXTBLOCK_ITEM_TEXT)
{
_layout_item_text_split_strip_white(c,
_ITEM_TEXT(it), i, wrap);
}
if (obs)
{
obs_info->obs_adv = obs->x + obs->w - c->x - it->adv;
c->x = obs->x + obs->w;
}
}
else if (wrap == 0)
{
/* Should wrap before the item */
/* We didn't end up using the item, so revert the ascent
* and descent changes. */
c->descent = prevdescent;
c->ascent = prevascent;
adv_line = 0;
redo_item = 1;
if (obs)
{
obs_info->obs_preadv = obs->x + obs->w - c->x;
c->x = obs->x + obs->w;
item_preadv = EINA_TRUE;
}
else
{
_layout_line_advance(c, it->format);
item_preadv = EINA_FALSE;
}
}
else // (wrap < 0)
{
/* avoid line advance if there is no wrapping point */
adv_line = 0;
}
/* Reset wrap */
obs = NULL;
wrap = -1;
}
}
if (!redo_item && !it->visually_deleted)
{
c->ln->items = (Evas_Object_Textblock_Item *)
eina_inlist_append(EINA_INLIST_GET(c->ln->items),
EINA_INLIST_GET(it));
it->ln = c->ln;
if (it->type == EVAS_TEXTBLOCK_ITEM_FORMAT)
{
Evas_Object_Textblock_Format_Item *fi;
fi = _ITEM_FORMAT(it);
fi->y = c->y;
/* If it's a newline, and we are not in newline compat
* mode, or we are in newline compat mode, and this is
* not used as a paragraph separator, advance */
if (c->o->multiline &&
fi->item && _IS_LINE_SEPARATOR(fi->item) &&
(!c->o->legacy_newline ||
eina_list_next(i)))
{
adv_line = 1;
}
}
if (!obs_info) c->x += it->adv;
if (c->o->ellip_prev_it == i)
_layout_par_append_ellipsis(c);
i = eina_list_next(i);
item_preadv = EINA_FALSE;
}
if (adv_line)
{
/* Each line is according to the first item in it, and here
* i is already the next item (or the current if we redo it) */
if (i)
{
it = _ITEM(eina_list_data_get(i));
}
_layout_line_advance(c, it->format);
}
}
if (c->ln->items)
{
if (!EINA_INLIST_GET(c->par)->next)
{
c->position = (c->position == TEXTBLOCK_POSITION_START) ?
TEXTBLOCK_POSITION_SINGLE : TEXTBLOCK_POSITION_END;
}
/* Here 'it' is the last format used */
_layout_line_finalize(c, it->format);
}
end:
if (line_breaks)
free(line_breaks);
if (word_breaks)
free(word_breaks);
#ifdef BIDI_SUPPORT
if (c->par->bidi_props)
{
evas_bidi_paragraph_props_unref(c->par->bidi_props);
c->par->bidi_props = NULL;
}
#endif
return ret;
}
/**
* @internal
* Invalidate text nodes according to format changes
* This goes through all the new format changes and marks the text nodes
* that should be invalidated because of format changes.
*
* @param c the working context.
*/
static inline void
_format_changes_invalidate_text_nodes(Ctxt *c)
{
Evas_Object_Textblock_Node_Format *fnode = c->o->format_nodes;
Evas_Object_Textblock_Node_Text *start_n = NULL;
Eina_List *fstack = NULL;
int balance = 0;
while (fnode)
{
if (fnode->is_new)
{
const char *fstr = fnode->orig_format;
/* balance < 0 means we gave up and everything should be
* invalidated */
if (fnode->opener && !fnode->own_closer)
{
balance++;
if (!fstack)
start_n = fnode->text_node;
fstack = eina_list_prepend(fstack, fnode);
}
else if (!fnode->opener)
{
size_t fstr_len;
fstr_len = strlen(fstr);
/* Generic popper, just pop */
if (((fstr[0] == '/') && !fstr[1]) || !fstr[0])
{
fstack = eina_list_remove_list(fstack, fstack);
balance--;
}
/* Find the matching format and pop it, if the matching format
* is out format, i.e the last one, pop and break. */
else
{
Eina_List *i;
Evas_Object_Textblock_Node_Format *fnode2;
EINA_LIST_FOREACH(fstack, i, fnode2)
{
if (_FORMAT_IS_CLOSER_OF(
fnode2->orig_format, fstr + 1, fstr_len - 1))
{
fstack = eina_list_remove_list(fstack, i);
break;
}
}
balance--;
}
if (!fstack)
{
Evas_Object_Textblock_Node_Text *f_tnode =
fnode->text_node;
while (start_n)
{
start_n->dirty = EINA_TRUE;
if (start_n == f_tnode)
break;
start_n =
_NODE_TEXT(EINA_INLIST_GET(start_n)->next);
}
start_n = NULL;
}
}
else if (!fnode->visible)
balance = -1;
if (balance < 0)
{
/* if we don't already have a starting point, use the
* current paragraph. */
if (!start_n)
start_n = fnode->text_node;
break;
}
}
fnode = _NODE_FORMAT(EINA_INLIST_GET(fnode)->next);
}
if (balance != 0)
{
while (start_n)
{
start_n->dirty = EINA_TRUE;
start_n = _NODE_TEXT(EINA_INLIST_GET(start_n)->next);
}
}
eina_list_free(fstack);
}
static Layout_Text_Append_Queue *
_layout_text_append_queue_item_append(Layout_Text_Append_Queue *queue,
Evas_Object_Textblock_Format *format, size_t start, int off)
{
/* Don't add empty items. */
if (off == 0)
return (Layout_Text_Append_Queue *) queue;
Layout_Text_Append_Queue *item = calloc(1, sizeof(*item));
item->format = format;
item->start = start;
item->off = off;
item->format->ref++;
return (Layout_Text_Append_Queue *) eina_inlist_append(EINA_INLIST_GET(queue), EINA_INLIST_GET(item));
}
static void
_layout_text_append_item_free(Ctxt *c, Layout_Text_Append_Queue *item)
{
if (item->format)
_format_unref_free(c->evas_o, item->format);
free(item);
}
static void
_layout_text_append_commit(Ctxt *c, Layout_Text_Append_Queue **_queue, Evas_Object_Textblock_Node_Text *n, Eina_List *rel)
{
Layout_Text_Append_Queue *item, *queue = *_queue;
if (!queue)
return;
{
item = (Layout_Text_Append_Queue *) EINA_INLIST_GET(queue)->last;
int off = item->start - queue->start + item->off;
_layout_text_append(c, queue, n, queue->start, off, c->o->repch, rel);
}
while (queue)
{
item = queue;
queue = (Layout_Text_Append_Queue *) EINA_INLIST_GET(queue)->next;
_layout_text_append_item_free(c, item);
}
*_queue = NULL;
}
static Eina_Bool
_layout_split_text_because_format(const Evas_Object_Textblock_Format *fmt,
const Evas_Object_Textblock_Format *nfmt)
{
if ((fmt->password != nfmt->password) ||
memcmp(&fmt->font, &nfmt->font, sizeof(fmt->font)))
{
return EINA_TRUE;
}
return EINA_FALSE;
}
/** FIXME: Document */
static void
_layout_pre(Ctxt *c)
{
int *style_pad_l, *style_pad_r, *style_pad_t, *style_pad_b;
Evas_Object *eo_obj = c->obj;
Efl_Canvas_Text_Data *o = c->o;
style_pad_l = &c->style_pad.l;
style_pad_r = &c->style_pad.r;
style_pad_b = &c->style_pad.b;
style_pad_t = &c->style_pad.t;
/* Mark text nodes as dirty if format have changed. */
if (o->format_changed)
_format_changes_invalidate_text_nodes(c);
if (o->content_changed)
{
Evas_Object_Textblock_Node_Text *n;
c->o->have_ellipsis = 0;
c->par = c->paragraphs = o->paragraphs;
/* Go through all the text nodes to create the logical layout */
EINA_INLIST_FOREACH(c->o->text_nodes, n)
{
Evas_Object_Textblock_Node_Format *fnode;
size_t start;
int off;
/* If it's not a new paragraph, either update it or skip it.
* Remove all the paragraphs that were deleted */
if (!n->is_new)
{
/* Remove all the deleted paragraphs at this point */
while (c->par->text_node != n)
{
Evas_Object_Textblock_Paragraph *tmp_par =
(Evas_Object_Textblock_Paragraph *)
EINA_INLIST_GET(c->par)->next;
c->paragraphs = (Evas_Object_Textblock_Paragraph *)
eina_inlist_remove(EINA_INLIST_GET(c->paragraphs),
EINA_INLIST_GET(c->par));
_paragraph_free(c->evas, c->o, c->evas_o, c->par);
c->par = tmp_par;
}
/* If it's dirty, remove and recreate, if it's clean,
* skip to the next. */
if (n->dirty)
{
Evas_Object_Textblock_Paragraph *prev_par = c->par;
_layout_paragraph_new(c, n, EINA_TRUE);
c->paragraphs = (Evas_Object_Textblock_Paragraph *)
eina_inlist_remove(EINA_INLIST_GET(c->paragraphs),
EINA_INLIST_GET(prev_par));
_paragraph_free(c->evas, c->o, c->evas_o, prev_par);
}
else
{
c->par = (Evas_Object_Textblock_Paragraph *)
EINA_INLIST_GET(c->par)->next;
/* Update the format stack according to the node's
* formats */
fnode = n->format_node;
while (fnode && (fnode->text_node == n))
{
/* Only do this if this actually changes format */
if (fnode->format_change)
{
int pl = 0, pr = 0, pt = 0, pb = 0;
_layout_do_format(eo_obj, c, &c->fmt, fnode,
&pl, &pr, &pt, &pb, EINA_FALSE);
fnode->pad.l = pl;
fnode->pad.r = pr;
fnode->pad.t = pt;
fnode->pad.b = pb;
}
if (fnode->pad.l > *style_pad_l) *style_pad_l = fnode->pad.l;
if (fnode->pad.r > *style_pad_r) *style_pad_r = fnode->pad.r;
if (fnode->pad.t > *style_pad_t) *style_pad_t = fnode->pad.t;
if (fnode->pad.b > *style_pad_b) *style_pad_b = fnode->pad.b;
fnode = _NODE_FORMAT(EINA_INLIST_GET(fnode)->next);
}
continue;
}
}
else
{
/* If it's a new paragraph, just add it. */
_layout_paragraph_new(c, n, EINA_FALSE);
}
#ifdef BIDI_SUPPORT
_layout_update_bidi_props(c->o, c->par);
#endif
/* For each text node, go through all of it's format nodes, and
* append text from the start to the offset of the next format
* using the last format got. If needed it also creates format
* items this is the core algorithm of the layout mechanism.
* Skip the unicode replacement chars when there are because
* we don't want to print them. */
Layout_Text_Append_Queue *queue = NULL;
fnode = n->format_node;
start = off = 0;
while (fnode && (fnode->text_node == n))
{
Evas_Object_Textblock_Format_Item *fi = NULL;
Evas_Object_Textblock_Format *pfmt = c->fmt;
pfmt->ref++;
off += fnode->offset;
/* No need to skip on the first run, or a non-visible one */
queue = _layout_text_append_queue_item_append(queue, c->fmt, start, off);
fi = _layout_do_format(eo_obj, c, &c->fmt, fnode, style_pad_l,
style_pad_r, style_pad_t, style_pad_b, EINA_TRUE);
if (fi || _layout_split_text_because_format(pfmt, c->fmt))
{
Eina_List *rel = NULL;
if (fi)
{
rel = eina_list_last(c->par->logical_items);
}
_layout_text_append_commit(c, &queue, n, rel);
}
_format_unref_free(c->evas_o, pfmt);
if ((c->have_underline2) || (c->have_underline))
{
if (*style_pad_b < c->underline_extend)
*style_pad_b = c->underline_extend;
c->have_underline = 0;
c->have_underline2 = 0;
c->underline_extend = 0;
}
start += off;
if (fnode->visible)
{
off = -1;
start++;
}
else
{
off = 0;
}
fnode->is_new = EINA_FALSE;
fnode = _NODE_FORMAT(EINA_INLIST_GET(fnode)->next);
}
queue = _layout_text_append_queue_item_append(queue, c->fmt, start,
eina_ustrbuf_length_get(n->unicode) - start);
_layout_text_append_commit(c, &queue, n, NULL);
#ifdef BIDI_SUPPORT
/* Clear the bidi props because we don't need them anymore. */
if (c->par->bidi_props)
{
evas_bidi_paragraph_props_unref(c->par->bidi_props);
c->par->bidi_props = NULL;
}
#endif
c->par = (Evas_Object_Textblock_Paragraph *)
EINA_INLIST_GET(c->par)->next;
}
/* Delete the rest of the layout paragraphs */
while (c->par)
{
Evas_Object_Textblock_Paragraph *tmp_par =
(Evas_Object_Textblock_Paragraph *)
EINA_INLIST_GET(c->par)->next;
c->paragraphs = (Evas_Object_Textblock_Paragraph *)
eina_inlist_remove(EINA_INLIST_GET(c->paragraphs),
EINA_INLIST_GET(c->par));
_paragraph_free(c->evas, c->o, c->evas_o, c->par);
c->par = tmp_par;
}
o->paragraphs = c->paragraphs;
c->par = NULL;
}
else
{
if (o->style_pad.l > *style_pad_l) *style_pad_l = o->style_pad.l;
if (o->style_pad.r > *style_pad_r) *style_pad_r = o->style_pad.r;
if (o->style_pad.t > *style_pad_t) *style_pad_t = o->style_pad.t;
if (o->style_pad.b > *style_pad_b) *style_pad_b = o->style_pad.b;
}
/* If there are no paragraphs, create the minimum needed,
* if the last paragraph has no lines/text, create that as well */
if (!c->paragraphs)
{
_layout_paragraph_new(c, NULL, EINA_TRUE);
o->paragraphs = c->paragraphs;
}
c->par = (Evas_Object_Textblock_Paragraph *)
EINA_INLIST_GET(c->paragraphs)->last;
if (!c->par->logical_items)
{
Evas_Object_Textblock_Text_Item *ti;
ti = _layout_text_item_new(c, c->fmt);
ti->parent.text_node = c->par->text_node;
ti->parent.text_pos = 0;
_layout_text_add_logical_item(c, ti, NULL);
}
/* End of logical layout creation */
}
static void
_layout_visual(Ctxt *c)
{
/* Start of visual layout creation */
{
Evas_Object_Textblock_Paragraph *last_vis_par = NULL;
int par_index_step = c->o->num_paragraphs / TEXTBLOCK_PAR_INDEX_SIZE;
int par_count = 1; /* Force it to take the first one */
int par_index_pos = 0;
c->position = TEXTBLOCK_POSITION_START;
if (par_index_step == 0) par_index_step = 1;
/* Clear all of the index */
memset(c->o->par_index, 0, sizeof(c->o->par_index));
EINA_INLIST_FOREACH(c->paragraphs, c->par)
{
_layout_update_par(c);
/* Break if we should stop here. */
if (_layout_par(c))
{
last_vis_par = c->par;
break;
}
if ((par_index_pos < TEXTBLOCK_PAR_INDEX_SIZE) && (--par_count == 0))
{
par_count = par_index_step;
c->o->par_index[par_index_pos++] = c->par;
}
}
/* Clear the rest of the paragraphs and mark as invisible */
if (c->par)
{
c->par = (Evas_Object_Textblock_Paragraph *)
EINA_INLIST_GET(c->par)->next;
while (c->par)
{
c->par->visible = 0;
_paragraph_clear(c->evas, c->o, c->evas_o, c->par);
c->par = (Evas_Object_Textblock_Paragraph *)
EINA_INLIST_GET(c->par)->next;
}
}
/* Get the last visible paragraph in the layout */
if (!last_vis_par && c->paragraphs)
last_vis_par = (Evas_Object_Textblock_Paragraph *)
EINA_INLIST_GET(c->paragraphs)->last;
if (last_vis_par)
{
c->hmax = last_vis_par->y + last_vis_par->h +
_layout_last_line_max_descent_adjust_calc(c, last_vis_par);
}
}
}
static void _layout(const Evas_Object *eo_obj, int w, int h, int *w_ret, int *h_ret);
static void
_layout_done(Ctxt *c, Evas_Coord *w_ret, Evas_Coord *h_ret)
{
/* Clean the rest of the format stack */
while (c->format_stack)
{
c->fmt = c->format_stack->data;
c->format_stack = eina_list_remove_list(c->format_stack, c->format_stack);
_format_unref_free(c->evas_o, c->fmt);
}
if (w_ret) *w_ret = c->wmax;
if (h_ret) *h_ret = c->hmax;
/* Vertically align the textblock */
if ((c->o->valign > 0.0) && (c->h > c->hmax))
{
Evas_Coord adjustment = (c->h - c->hmax) * c->o->valign;
Evas_Object_Textblock_Paragraph *par;
EINA_INLIST_FOREACH(c->paragraphs, par)
{
par->y += adjustment;
}
}
if ((c->o->style_pad.l != c->style_pad.l) || (c->o->style_pad.r != c->style_pad.r) ||
(c->o->style_pad.t != c->style_pad.t) || (c->o->style_pad.b != c->style_pad.b))
{
c->o->style_pad.l = c->style_pad.l;
c->o->style_pad.r = c->style_pad.r;
c->o->style_pad.t = c->style_pad.t;
c->o->style_pad.b = c->style_pad.b;
_paragraphs_clear(c);
LYDBG("ZZ: ... layout #2\n");
_layout(c->obj, c->w, c->h, w_ret, h_ret);
efl_event_callback_call(c->obj, EFL_CANVAS_TEXT_EVENT_STYLE_INSETS_CHANGED, NULL);
c->o->obstacle_changed = EINA_FALSE;
}
}
static Eina_Bool
_layout_setup(Ctxt *c, const Eo *eo_obj, Evas_Coord w, Evas_Coord h)
{
Efl_Canvas_Text_Data *o = efl_data_scope_get(eo_obj, MY_CLASS);
Evas_Object_Protected_Data *obj = efl_data_scope_get(eo_obj, EFL_CANVAS_OBJECT_CLASS);
Evas *eo_e;
/* setup context */
c->obj = (Evas_Object *)eo_obj;
c->o = o;
c->paragraphs = c->par = NULL;
c->format_stack = NULL;
c->fmt = NULL;
c->x = c->y = 0;
c->w = w;
c->h = h;
c->wmax = c->hmax = 0;
c->ascent = c->descent = 0;
c->maxascent = c->maxdescent = 0;
c->marginl = c->marginr = 0;
c->have_underline = 0;
c->have_underline2 = 0;
c->underline_extend = 0;
c->line_no = 0;
c->align = 0.0;
c->align_auto = EINA_TRUE;
c->ln = NULL;
c->width_changed = (obj->cur->geometry.w != o->last_w);
c->obs_infos = NULL;
c->hyphen_ti = NULL;
c->handle_obstacles = EINA_FALSE;
c->w = w;
c->h = h;
c->style_pad.r = c->style_pad.l = c->style_pad.t = c->style_pad.b = 0;
/* Update all obstacles */
if (c->o->obstacle_changed || c->width_changed)
{
_layout_obstacles_update(c);
c->handle_obstacles = EINA_TRUE;
}
c->evas_o = efl_data_scope_get(eo_obj, EFL_CANVAS_OBJECT_CLASS);
eo_e = evas_object_evas_get(eo_obj);
c->evas = efl_data_scope_get(eo_e, EVAS_CANVAS_CLASS);
/* Start of logical layout creation */
/* setup default base style */
{
Eina_List *itr;
Evas_Textblock_Style *style;
Eina_Bool finalize = EINA_FALSE;
if (!c->fmt)
{
c->fmt = _layout_format_push(c, NULL, NULL);
finalize = EINA_TRUE;
}
if ((c->o->style) && (c->o->style->default_tag))
{
_format_fill(c->obj, c->fmt, c->o->style->default_tag);
finalize = EINA_TRUE;
}
EINA_LIST_FOREACH(c->o->styles, itr, style)
{
if ((style) && (style->default_tag))
{
_format_fill(c->obj, c->fmt, style->default_tag);
finalize = EINA_TRUE;
}
}
if (finalize)
_format_finalize(c->obj, c->fmt);
}
if (!c->fmt)
{
return EINA_FALSE;
}
c->paragraphs = o->paragraphs;
return EINA_TRUE;
}
/**
* @internal
* Create the layout from the nodes.
*
* @param obj the evas object - NOT NULL.
* @param calc_only true if should only calc sizes false if should also create the layout.. It assumes native size is being calculated, doesn't support formatted size atm.
* @param w the object's w, -1 means no wrapping (i.e infinite size)
* @param h the object's h, -1 means inifinte size.
* @param w_ret the object's calculated w.
* @param h_ret the object's calculated h.
*/
static void
_layout(const Evas_Object *eo_obj, int w, int h, int *w_ret, int *h_ret)
{
Ctxt ctxt, *c;
c = &ctxt;
LYDBG("ZZ: layout %p %4ix%4i | w=%4i | last_w=%4i --- '%s'\n", eo_obj, w, h, obj->cur->geometry.w, o->last_w, o->markup_text);
if (!_layout_setup(c, eo_obj, w, h))
{
if (w_ret) *w_ret = 0;
if (h_ret) *h_ret = 0;
return;
}
_layout_pre(c);
_layout_visual(c);
_layout_done(c, w_ret, h_ret);
}
/*
* @internal
* Relayout the object according to current object size.
*
* @param obj the evas object - NOT NULL.
*/
static void
_relayout(const Evas_Object *eo_obj)
{
Evas_Object_Protected_Data *obj = efl_data_scope_get(eo_obj, EFL_CANVAS_OBJECT_CLASS);
Efl_Canvas_Text_Data *o = efl_data_scope_get(eo_obj, MY_CLASS);
_layout(eo_obj, obj->cur->geometry.w, obj->cur->geometry.h,
&o->formatted.w, &o->formatted.h);
o->formatted.valid = 1;
o->formatted.oneline_h = 0;
o->last_w = obj->cur->geometry.w;
o->wrap_changed = EINA_FALSE;
LYDBG("ZZ: --------- layout %p @ %ix%i = %ix%i\n", eo_obj, obj->cur->geometry.w, obj->cur->geometry.h, o->formatted.w, o->formatted.h);
o->last_h = obj->cur->geometry.h;
if ((o->paragraphs) && (!EINA_INLIST_GET(o->paragraphs)->next) &&
(o->paragraphs->lines) && (!EINA_INLIST_GET(o->paragraphs->lines)->next))
{
if (obj->cur->geometry.h < o->formatted.h)
{
LYDBG("ZZ: 1 line only... lasth == formatted h (%i)\n", o->formatted.h);
o->formatted.oneline_h = o->formatted.h;
}
}
o->changed = 0;
o->content_changed = 0;
o->format_changed = EINA_FALSE;
o->redraw = 1;
#ifdef BIDI_SUPPORT
o->changed_paragraph_direction = EINA_FALSE;
#endif
}
/*
* @internal
* Check if the object needs a relayout, and if so, execute it.
*/
static Eina_Bool
_relayout_if_needed(Evas_Object *eo_obj, Efl_Canvas_Text_Data *o)
{
ASYNC_BLOCK;
Evas_Object_Protected_Data *obj = efl_data_scope_get(eo_obj, EFL_CANVAS_OBJECT_CLASS);
evas_object_textblock_coords_recalc(eo_obj, obj, obj->private_data);
if (o->formatted.valid)
{
return EINA_TRUE;
}
LYDBG("ZZ: relayout\n");
_relayout(eo_obj);
return EINA_TRUE;
}
/**
* @internal
* Find the layout item and line that match the text node and position passed.
*
* @param obj the evas object - NOT NULL.
* @param n the text node - Not null.
* @param pos the position to look for - valid.
* @param[out] lnr the line found - not null.
* @param[out] tir the item found - not null.
* @see _find_layout_format_item_line_match()
*/
static void
_find_layout_item_line_match(Evas_Object *eo_obj, Evas_Object_Textblock_Node_Text *n, size_t pos, Evas_Object_Textblock_Line **lnr, Evas_Object_Textblock_Item **itr)
{
Evas_Object_Textblock_Paragraph *found_par;
Evas_Object_Textblock_Line *ln;
Efl_Canvas_Text_Data *o = efl_data_scope_get(eo_obj, MY_CLASS);
_relayout_if_needed(eo_obj, o);
found_par = n->par;
if (found_par)
{
_layout_paragraph_render(o, found_par);
EINA_INLIST_FOREACH(found_par->lines, ln)
{
Evas_Object_Textblock_Item *it;
EINA_INLIST_FOREACH(ln->items, it)
{
size_t p = it->text_pos;
if (it->type == EVAS_TEXTBLOCK_ITEM_TEXT)
{
Evas_Object_Textblock_Text_Item *ti =
_ITEM_TEXT(it);
p += ti->text_props.text_len;
}
else
{
p++;
}
if (((pos >= it->text_pos) && (pos < p)))
{
*lnr = ln;
*itr = it;
return;
}
else if (p == pos)
{
*lnr = ln;
*itr = it;
}
}
}
}
}
/**
* @internal
* Return the line number 'line'.
*
* @param obj the evas object - NOT NULL.
* @param line the line to find
* @return the line of line number or NULL if no line found.
*/
static Evas_Object_Textblock_Line *
_find_layout_line_num(const Evas_Object *eo_obj, int line)
{
Evas_Object_Textblock_Paragraph *par;
Evas_Object_Textblock_Line *ln;
Efl_Canvas_Text_Data *o = efl_data_scope_get(eo_obj, MY_CLASS);
par = _layout_find_paragraph_by_line_no(o, line);
if (par)
{
_layout_paragraph_render(o, par);
EINA_INLIST_FOREACH(par->lines, ln)
{
if (par->line_no + ln->line_no == line) return ln;
}
}
return NULL;
}
EAPI Evas_Object *
evas_object_textblock_add(Evas *e)
{
Efl_Canvas_Text_Data *o;
MAGIC_CHECK(e, Evas, MAGIC_EVAS);
return NULL;
MAGIC_CHECK_END();
Evas_Object *eo_obj = efl_add(MY_CLASS, e,
efl_text_multiline_set(efl_added, EINA_TRUE),
efl_canvas_object_legacy_ctor(efl_added));
o = efl_data_scope_get(eo_obj, MY_CLASS);
o->legacy_newline = EINA_TRUE;
return eo_obj;
}
EOLIAN static Eo *
_efl_canvas_text_efl_object_constructor(Eo *eo_obj, Efl_Canvas_Text_Data *class_data EINA_UNUSED)
{
Evas_Object_Protected_Data *obj = efl_data_scope_get(eo_obj, EFL_CANVAS_OBJECT_CLASS);
Efl_Canvas_Text_Data *o;
eo_obj = efl_constructor(efl_super(eo_obj, MY_CLASS));
/* set up methods (compulsory) */
obj->func = &object_func;
obj->private_data = efl_data_ref(eo_obj, MY_CLASS);
obj->type = o_type;
o = obj->private_data;
o->cursor = evas_object_textblock_cursor_new(eo_obj);
//XXX: empty the list hacky but we need o->cursors to not contain o->cursor
o->cursors = eina_list_remove_list(o->cursors, o->cursors);
_format_command_init();
evas_object_textblock_init(eo_obj);
_FMT(ref) = 1;
_FMT(halign) = 0.0;
_FMT(halign_auto) = EINA_TRUE;
_FMT(valign) = -1.0;
_FMT(style) = EVAS_TEXT_STYLE_PLAIN;
_FMT(tabstops) = 32;
_FMT(linesize) = 0;
_FMT(linerelsize) = 0.0;
_FMT(linegap) = 0;
_FMT(underline_dash_width) = 6;
_FMT(underline_dash_gap) = 2;
_FMT(underline_height) = 1.0;
_FMT(linerelgap) = 0.0;
_FMT(password) = 1;
_FMT(ellipsis) = -1;
_FMT_INFO(bitmap_scalable) = EFL_TEXT_FONT_BITMAP_SCALABLE_COLOR;
return eo_obj;
}
EAPI Evas_Textblock_Style *
evas_textblock_style_new(void)
{
Evas_Textblock_Style *ts;
ts = calloc(1, sizeof(Evas_Textblock_Style));
return ts;
}
EAPI void
evas_textblock_style_free(Evas_Textblock_Style *ts)
{
if (!ts) return;
if (ts->objects)
{
ts->delete_me = 1;
return;
}
_style_clear(ts);
eina_stringshare_del(ts->key);
free(ts);
}
EAPI void
evas_textblock_style_set(Evas_Textblock_Style *ts, const char *text)
{
Eina_List *l;
Evas_Object *eo_obj;
if (!ts) return;
/* If the style wasn't really changed, abort. */
if ((!ts->style_text && !text) ||
(ts->style_text && text && !strcmp(text, ts->style_text)))
return;
EINA_LIST_FOREACH(ts->objects, l, eo_obj)
{
Efl_Canvas_Text_Data *o = efl_data_scope_get(eo_obj, MY_CLASS);
Evas_Object_Protected_Data *obj = efl_data_scope_get(eo_obj, EFL_CANVAS_OBJECT_CLASS);
evas_object_async_block(obj);
_evas_textblock_invalidate_all(o);
_evas_textblock_changed(o, eo_obj);
}
_style_replace(ts, text);
if (ts->style_text)
{
// format MUST be KEY='VALUE'[KEY='VALUE']...
const char *p;
const char *key_start, *key_stop, *val_start;
key_start = key_stop = val_start = NULL;
p = ts->style_text;
while (*p)
{
if (!key_start)
{
if (!isspace((unsigned char)(*p)))
{
key_start = p;
}
}
else if (!key_stop)
{
if ((*p == '=') || (isspace((unsigned char)(*p))))
{
key_stop = p;
}
}
else if (!val_start)
{
if (((*p) == '\'') && (*(p + 1)))
{
val_start = ++p;
}
}
if ((key_start) && (key_stop) && (val_start))
{
char *tags, *replaces = NULL;
Evas_Object_Style_Tag *tag;
const char *val_stop = NULL;
size_t tag_len;
size_t replace_len;
{
Eina_Strbuf *buf = eina_strbuf_new();
val_stop = val_start;
while(*p)
{
if (*p == '\'')
{
/* Break if we found the tag end */
if (p[-1] != '\\')
{
eina_strbuf_append_length(buf, val_stop,
p - val_stop);
break;
}
else
{
eina_strbuf_append_length(buf, val_stop,
p - val_stop - 1);
eina_strbuf_append_char(buf, '\'');
val_stop = p + 1;
}
}
p++;
}
replaces = eina_strbuf_string_steal(buf);
eina_strbuf_free(buf);
}
/* If we didn't find an end, just aboart. */
if (!*p)
{
if (replaces) free(replaces);
break;
}
tag_len = key_stop - key_start;
replace_len = val_stop - val_start;
tags = malloc(tag_len + 1);
if (tags)
{
memcpy(tags, key_start, tag_len);
tags[tag_len] = 0;
}
if ((tags) && (replaces))
{
if (!strcmp(tags, "DEFAULT"))
{
ts->default_tag = replaces;
free(tags);
}
else
{
tag = calloc(1, sizeof(Evas_Object_Style_Tag));
if (tag)
{
tag->tag.tag = tags;
tag->tag.replace = replaces;
tag->tag.tag_len = tag_len;
tag->tag.replace_len = replace_len;
ts->tags = (Evas_Object_Style_Tag *)eina_inlist_append(EINA_INLIST_GET(ts->tags), EINA_INLIST_GET(tag));
}
else
{
free(tags);
free(replaces);
}
}
}
else
{
if (tags) free(tags);
if (replaces) free(replaces);
}
key_start = key_stop = val_start = NULL;
}
p++;
}
}
}
EAPI const char *
evas_textblock_style_get(const Evas_Textblock_Style *ts)
{
if (!ts) return NULL;
return ts->style_text;
}
static const char *
_textblock_format_node_from_style_tag(Efl_Canvas_Text_Data *o, Evas_Object_Textblock_Node_Format *fnode, const char *format, size_t format_len)
{
Eina_List *itr;
Evas_Textblock_Style *style;
const char *match = NULL;
size_t replace_len;
EINA_LIST_REVERSE_FOREACH(o->styles, itr, style)
{
match = _style_match_tag(style, format, format_len, &replace_len);
if (match)
break;
}
if (!match)
{
match = _style_match_tag(o->style, format, format_len,
&replace_len);
}
if (match)
{
if (match[0] != '-')
{
fnode->opener = EINA_TRUE;
if (match[0] != '+')
{
fnode->own_closer = EINA_TRUE;
}
}
}
return match;
}
/* textblock styles */
static void
_textblock_style_generic_set(Evas_Object *eo_obj, Evas_Textblock_Style *ts,
Evas_Textblock_Style **obj_ts)
{
TB_HEAD();
if (ts == *obj_ts) return;
if ((ts) && (ts->delete_me)) return;
if (*obj_ts)
{
Evas_Textblock_Style *old_ts;
if (o->markup_text)
{
eina_stringshare_del(o->markup_text);
o->markup_text = NULL;
}
old_ts = *obj_ts;
old_ts->objects = eina_list_remove(old_ts->objects, eo_obj);
if ((old_ts->delete_me) && (!old_ts->objects))
evas_textblock_style_free(old_ts);
}
if (ts)
{
ts->objects = eina_list_append(ts->objects, eo_obj);
}
*obj_ts = ts;
Evas_Object_Textblock_Node_Format *fnode = o->format_nodes;
while (fnode)
{
const char *match;
size_t format_len = eina_stringshare_strlen(fnode->orig_format);
/* Is this safe to use alloca here? Strings might possibly get large */
if (fnode->own_closer &&
(format_len > 0) && (fnode->orig_format[format_len - 1] == '/'))
{
format_len--;
}
match = _textblock_format_node_from_style_tag(o, fnode, fnode->orig_format,
format_len);
if (match && fnode->format && strcmp(match, fnode->format))
{
if ((*match == '+') || (*match == '-'))
{
match++;
while (*match == ' ') match++;
}
fnode->is_new = EINA_TRUE;
eina_stringshare_replace(&fnode->format, match);
}
fnode = _NODE_FORMAT(EINA_INLIST_GET(fnode)->next);
}
o->format_changed = EINA_TRUE;
_evas_textblock_invalidate_all(o);
_evas_textblock_changed(o, eo_obj);
}
EAPI void
evas_object_textblock_style_set(Eo *eo_obj, const Evas_Textblock_Style *ts)
{
Evas_Object_Protected_Data *obj = efl_data_scope_get(eo_obj, EFL_CANVAS_OBJECT_CLASS);
evas_object_async_block(obj);
Efl_Canvas_Text_Data *o = efl_data_scope_get(eo_obj, MY_CLASS);
_textblock_style_generic_set(eo_obj, (Evas_Textblock_Style *) ts, &(o->style));
}
static Evas_Textblock_Style *
_style_by_key_find(Efl_Canvas_Text_Data *o, const char *key)
{
Eina_List *itr;
Evas_Textblock_Style *style;
if (!key)
return o->style;
EINA_LIST_FOREACH(o->styles, itr, style)
{
if (!strcmp(style->key, key))
return style;
}
return NULL;
}
EOLIAN static void
_efl_canvas_text_style_set(Eo *eo_obj, Efl_Canvas_Text_Data *o, const char *key, const char *style)
{
// FIXME: Make key value behaviour.
Evas_Object_Protected_Data *obj = efl_data_scope_get(eo_obj, EFL_CANVAS_OBJECT_CLASS);
evas_object_async_block(obj);
Evas_Textblock_Style *ts;
ts = _style_by_key_find(o, key);
if (!ts && !style)
{
return;
}
if (ts && !style)
{
// Delete the style
if (!key)
{
evas_textblock_style_set(ts, "");
}
else
{
o->styles = eina_list_remove(o->styles, ts);
ts->objects = eina_list_remove(ts->objects, eo_obj);
evas_textblock_style_free(ts);
}
}
else if (!ts && style)
{
Evas_Textblock_Style *tmp = NULL;
// No entry for respective key, so create one.
ts = evas_textblock_style_new();
evas_textblock_style_set(ts, style);
ts->key = eina_stringshare_add(key);
o->styles = eina_list_append(o->styles, ts);
_textblock_style_generic_set(eo_obj, ts, &tmp);
}
else if (ts && style)
{
evas_textblock_style_set(ts, style);
}
o->format_changed = EINA_TRUE;
_evas_textblock_invalidate_all(o);
_evas_textblock_changed(o, eo_obj);
efl_event_callback_call(eo_obj, EFL_CANVAS_TEXT_EVENT_CHANGED, NULL);
}
EAPI Evas_Textblock_Style *
evas_object_textblock_style_get(const Eo *eo_obj EINA_UNUSED)
{
Evas_Object_Protected_Data *obj = efl_data_scope_get(eo_obj, EFL_CANVAS_OBJECT_CLASS);
evas_object_async_block(obj);
Efl_Canvas_Text_Data *o = efl_data_scope_get(eo_obj, MY_CLASS);
return o->style;
}
EOLIAN static const char *
_efl_canvas_text_style_get(Eo *eo_obj EINA_UNUSED, Efl_Canvas_Text_Data *o, const char *key)
{
Evas_Textblock_Style *ts = _style_by_key_find(o, key);
return ts ? ts->style_text : NULL;
}
#define _STYLE_USER "_style_user"
EAPI void
evas_object_textblock_style_user_push(Eo *eo_obj, Evas_Textblock_Style *ts)
{
Efl_Canvas_Text_Data *o = efl_data_scope_get(eo_obj, MY_CLASS);
Evas_Object_Protected_Data *obj = efl_data_scope_get(eo_obj, EFL_CANVAS_OBJECT_CLASS);
evas_object_async_block(obj);
Evas_Textblock_Style *old_ts = _style_by_key_find(o, _STYLE_USER);
if (old_ts)
{
efl_canvas_text_style_set(eo_obj, _STYLE_USER, NULL);
}
Evas_Textblock_Style *tmp = NULL;
_textblock_style_generic_set(eo_obj, ts, &tmp);
ts->key = eina_stringshare_add(_STYLE_USER);
o->styles = eina_list_append(o->styles, ts);
}
EAPI const Evas_Textblock_Style*
evas_object_textblock_style_user_peek(const Eo *eo_obj)
{
Evas_Object_Protected_Data *obj = efl_data_scope_get(eo_obj, EFL_CANVAS_OBJECT_CLASS);
evas_object_async_block(obj);
Efl_Canvas_Text_Data *o = efl_data_scope_get(eo_obj, MY_CLASS);
Evas_Textblock_Style *ts = _style_by_key_find(o, _STYLE_USER);
return ts;
}
EAPI void
evas_object_textblock_style_user_pop(Eo *eo_obj)
{
Evas_Object_Protected_Data *obj = efl_data_scope_get(eo_obj, EFL_CANVAS_OBJECT_CLASS);
evas_object_async_block(obj);
efl_canvas_text_style_set(eo_obj, _STYLE_USER, NULL);
}
EAPI void
evas_object_textblock_replace_char_set(Efl_Canvas_Text *eo_obj, const char *ch)
{
Efl_Canvas_Text_Data *o = efl_data_scope_get(eo_obj, MY_CLASS);
Evas_Object_Protected_Data *obj = efl_data_scope_get(eo_obj, EFL_CANVAS_OBJECT_CLASS);
evas_object_async_block(obj);
if (o->repch) eina_stringshare_del(o->repch);
if (ch) o->repch = eina_stringshare_add(ch);
else o->repch = NULL;
_evas_textblock_invalidate_all(o);
_evas_textblock_changed(o, eo_obj);
}
EOLIAN static void
_efl_canvas_text_legacy_newline_set(Eo *eo_obj EINA_UNUSED, Efl_Canvas_Text_Data *o, Eina_Bool mode)
{
Evas_Object_Protected_Data *obj = efl_data_scope_get(eo_obj, EFL_CANVAS_OBJECT_CLASS);
evas_object_async_block(obj);
if (o->legacy_newline == mode)
return;
o->legacy_newline = mode;
/* FIXME: Should recreate all the textnodes... For now, it's just
* for new text inserted. */
}
EOLIAN static Eina_Bool
_efl_canvas_text_legacy_newline_get(Eo *eo_obj EINA_UNUSED, Efl_Canvas_Text_Data *o)
{
return o->legacy_newline;
}
EOLIAN static Eina_Bool
_efl_canvas_text_is_empty_get(Eo *eo_obj EINA_UNUSED, Efl_Canvas_Text_Data *o)
{
return !o->text_nodes || (eina_ustrbuf_length_get(o->text_nodes->unicode) == 0);
}
EAPI void
evas_object_textblock_valign_set(Efl_Canvas_Text *eo_obj, double align)
{
Efl_Canvas_Text_Data *o = efl_data_scope_get(eo_obj, MY_CLASS);
Evas_Object_Protected_Data *obj = efl_data_scope_get(eo_obj, EFL_CANVAS_OBJECT_CLASS);
evas_object_async_block(obj);
if (align < 0.0) align = 0.0;
else if (align > 1.0) align = 1.0;
if (EINA_DBL_EQ(o->valign, align)) return;
o->valign = align;
_evas_textblock_changed(o, eo_obj);
}
EAPI double
evas_object_textblock_valign_get(const Efl_Canvas_Text *obj)
{
Efl_Canvas_Text_Data *o = efl_data_scope_get(obj, MY_CLASS);
return o->valign;
}
EOLIAN static void
_efl_canvas_text_bidi_delimiters_set(Eo *eo_obj EINA_UNUSED, Efl_Canvas_Text_Data *o, const char *delim)
{
Evas_Object_Protected_Data *obj = efl_data_scope_get(eo_obj, EFL_CANVAS_OBJECT_CLASS);
evas_object_async_block(obj);
eina_stringshare_replace(&o->bidi_delimiters, delim);
}
EOLIAN static const char*
_efl_canvas_text_bidi_delimiters_get(Eo *eo_obj EINA_UNUSED, Efl_Canvas_Text_Data *o)
{
return o->bidi_delimiters;
}
EAPI const char *
evas_object_textblock_replace_char_get(const Efl_Canvas_Text *obj)
{
Efl_Canvas_Text_Data *o = efl_data_scope_get(obj, MY_CLASS);
return o->repch;
}
/**
* @internal
* Advance p_buff to point after the end of the string. It's used with the
* @ref escaped_strings[] variable.
*
* @param p_buff the pointer to the current string.
*/
static inline void
_escaped_advance_after_end_of_string(const char **p_buf)
{
while (**p_buf != 0) (*p_buf)++;
(*p_buf)++;
}
/**
* @internal
* Advance p_buff to point after the end of the string. It's used with the
* @ref escaped_strings[] variable. Also chec if matches.
* FIXME: doc.
*
* @param p_buff the pointer to the current string.
*/
static inline int
_escaped_is_eq_and_advance(const char *s, const char *s_end,
const char **p_m, const char *m_end)
{
Eina_Bool reached_end;
for (;((s < s_end) && (*p_m < m_end)); s++, (*p_m)++)
{
if (*s != **p_m)
{
_escaped_advance_after_end_of_string(p_m);
return 0;
}
}
reached_end = !**p_m;
if (*p_m < m_end)
_escaped_advance_after_end_of_string(p_m);
return ((s == s_end) && reached_end);
}
/**
* @internal
*
* @param s the string to match
*/
static inline const char *
_escaped_char_match(const char *s, int *adv)
{
const char *map_itr, *map_end, *mc, *sc;
map_itr = escape_strings;
map_end = map_itr + sizeof(escape_strings);
while (map_itr < map_end)
{
const char *escape;
int match;
escape = map_itr;
_escaped_advance_after_end_of_string(&map_itr);
if (map_itr >= map_end) break;
mc = map_itr;
sc = s;
match = 1;
while ((*mc) && (*sc))
{
if ((unsigned char)*sc < (unsigned char)*mc) return NULL;
if (*sc != *mc)
{
match = 0;
break;
}
mc++;
sc++;
}
if (match)
{
*adv = mc - map_itr;
return escape;
}
_escaped_advance_after_end_of_string(&map_itr);
}
return NULL;
}
/**
* @internal
* FIXME: TBD.
*
* @param s the string to match
*/
static inline const char *
_escaped_char_get(const char *s, const char *s_end)
{
/* Handle numeric escape codes. */
if (s[1] == '#')
{
static char utf8_escape[7]; /* Support up to 6 bytes utf8 */
char ustr[10];
Eina_Unicode uchar[2] = { 0, 0 };
char *utf8_char;
size_t len = 0;
int base = 10;
s += 2; /* Skip "&#" */
if (tolower((unsigned char)(*s)) == 'x')
{
s++;
base = 16;
}
len = s_end - s;
if (len > sizeof(ustr))
len = sizeof(ustr);
memcpy(ustr, s, len);
ustr[len - 1] = '\0';
uchar[0] = strtol(ustr, NULL, base);
if (uchar[0] == 0)
return NULL;
utf8_char = eina_unicode_unicode_to_utf8(uchar, NULL);
// eina_unicode_unicode_to_utf8() always creates a string that
// is nul terminated - guaranteed
if (utf8_char)
{
strcpy(utf8_escape, utf8_char);
free(utf8_char);
}
return utf8_escape;
}
else
{
const char *map_itr, *map_end;
map_itr = escape_strings;
map_end = map_itr + sizeof(escape_strings);
while (map_itr < map_end)
{
if (_escaped_is_eq_and_advance(s, s_end, &map_itr, map_end))
return map_itr;
if (map_itr < map_end)
_escaped_advance_after_end_of_string(&map_itr);
}
}
return NULL;
}
EAPI const char *
evas_textblock_escape_string_get(const char *escape)
{
/* &amp; -> & */
if (!escape) return NULL;
return _escaped_char_get(escape, escape + strlen(escape));
}
EAPI const char *
evas_textblock_escape_string_range_get(const char *escape_start, const char *escape_end)
{
if ((!escape_start) || (!escape_end)) return NULL;
return _escaped_char_get(escape_start, escape_end);
}
EAPI const char *
evas_textblock_string_escape_get(const char *string, int *len_ret)
{
if ((!string) || (!len_ret)) return NULL;
/* & -> &amp; */
return _escaped_char_match(string, len_ret);
}
static void
_cursor_emit_if_changed(Efl_Text_Cursor_Cursor *cur)
{
if (cur->changed)
{
cur->changed = EINA_FALSE;
efl_event_callback_legacy_call(cur->obj, EFL_CANVAS_TEXT_EVENT_CURSOR_CHANGED, NULL);
}
}
/**
* @internal
* prepends the escaped char beteewn s and s_end to the curosr
*
*
* @param s the start of the string
* @param s_end the end of the string.
*/
static inline void
_prepend_escaped_char(Efl_Text_Cursor_Cursor *cur_obj, const char *s,
const char *s_end)
{
const char *escape;
escape = _escaped_char_get(s, s_end);
if (escape)
evas_textblock_cursor_text_prepend(cur_obj, escape);
}
EAPI void
evas_object_textblock_text_markup_set(Eo *eo_obj, const char *text)
{
Evas_Object_Protected_Data *obj = efl_data_scope_get(eo_obj, EFL_CANVAS_OBJECT_CLASS);
evas_object_async_block(obj);
Efl_Canvas_Text_Data *o = efl_data_scope_get(eo_obj, MY_CLASS);
if (text == o->markup_text)
{
/* Text is the same and already stringshared, do nothing */
return;
}
else
{
text = eina_stringshare_add(text);
if (text == o->markup_text)
{
eina_stringshare_del(text);
/* Text is the same, do nothing. */
return;
}
}
_nodes_clear(eo_obj);
Efl_Text_Cursor_Cursor *co = o->cursor;
co->node = _evas_textblock_node_text_new();
o->text_nodes = _NODE_TEXT(eina_inlist_append(
EINA_INLIST_GET(o->text_nodes),
EINA_INLIST_GET(co->node)));
evas_textblock_cursor_paragraph_first(o->cursor);
evas_object_textblock_text_markup_prepend(o->cursor, text);
efl_event_freeze(eo_obj);
/* Point all the cursors to the starrt */
{
Eina_List *l;
Efl_Text_Cursor_Cursor *data;
evas_textblock_cursor_paragraph_first(o->cursor);
EINA_LIST_FOREACH(o->cursors, l, data)
{
evas_textblock_cursor_paragraph_first(data);
}
}
efl_event_thaw(eo_obj);
efl_event_callback_legacy_call(eo_obj, EFL_CANVAS_TEXT_EVENT_CURSOR_CHANGED, NULL);
o->markup_text = text;
}
EAPI void
evas_object_textblock_text_markup_prepend(Efl_Text_Cursor_Cursor *cur, const char *text)
{
if (!cur) return;
Evas_Object *eo_obj = cur->obj;
Evas_Object_Protected_Data *obj = efl_data_scope_get(eo_obj, EFL_CANVAS_OBJECT_CLASS);
evas_object_async_block(obj);
TB_HEAD();
if (text)
{
char *s, *p;
char *tag_start, *tag_end, *esc_start, *esc_end;
tag_start = tag_end = esc_start = esc_end = NULL;
p = (char *)text;
s = p;
/* This loop goes through all of the mark up text until it finds format
* tags, escape sequences or the terminating NULL. When it finds either
* of those, it appends the text found up until that point to the textblock
* proccesses whatever found. It repeats itself until the termainating
* NULL is reached. */
for (;;)
{
size_t text_len;
/* If we got to the end of string or just finished/started tag
* or escape sequence handling. */
if ((*p == 0) ||
(tag_end) || (esc_end) ||
(tag_start) || (esc_start))
{
if (tag_end)
{
/* If we reached to a tag ending, analyze the tag */
char *ttag;
size_t ttag_len = tag_end - tag_start;
ttag = malloc(ttag_len + 1);
if (ttag)
{
memcpy(ttag, tag_start, ttag_len);
ttag[ttag_len] = 0;
evas_textblock_cursor_format_prepend(cur, ttag);
free(ttag);
}
tag_start = tag_end = NULL;
}
else if (esc_end)
{
_prepend_escaped_char(cur, esc_start, esc_end + 1);
esc_start = esc_end = NULL;
}
else if (*p == 0)
{
_prepend_text_run(cur, s, p);
s = NULL;
}
if (*p == 0)
break;
}
if (*p == '<')
{
if (!esc_start)
{
/* Append the text prior to this to the textblock and mark
* the start of the tag */
tag_start = p;
tag_end = NULL;
_prepend_text_run(cur, s, p);
s = NULL;
}
}
else if (*p == '>')
{
if (tag_start)
{
tag_end = p + 1;
s = p + 1;
}
}
else if (*p == '&')
{
if (!tag_start)
{
/* Append the text prior to this to the textblock and mark
* the start of the escape sequence */
esc_start = p;
esc_end = NULL;
_prepend_text_run(cur, s, p);
s = NULL;
}
}
else if (*p == ';')
{
if (esc_start)
{
esc_end = p;
s = p + 1;
}
}
/* Unicode object replacement char */
else if (!strncmp(_REPLACEMENT_CHAR_UTF8, p,
text_len = strlen(_REPLACEMENT_CHAR_UTF8)) ||
!strncmp(_NEWLINE_UTF8, p,
text_len = strlen(_NEWLINE_UTF8)) ||
!strncmp(_TAB_UTF8, p,
text_len = strlen(_TAB_UTF8)) ||
!strncmp(_PARAGRAPH_SEPARATOR_UTF8, p,
text_len = strlen(_PARAGRAPH_SEPARATOR_UTF8)))
{
/*FIXME: currently just remove them, maybe do something
* fancier in the future, atm it breaks if this char
* is inside <> */
_prepend_text_run(cur, s, p);
/* it's also advanced later in this loop need +text_len
in total*/
p += text_len - 1;
s = p + 1; /* One after the end of the replacement char */
}
p++;
}
}
_evas_textblock_changed(o, eo_obj);
}
/**
* @internal
* An helper function to markup get. Appends the format from fnode to the strbugf txt.
*
* @param o the textblock object.
* @param txt the strbuf to append to.
* @param fnode the format node to process.
*/
static void
_markup_get_format_append(Eina_Strbuf *txt, Evas_Object_Textblock_Node_Format *fnode)
{
eina_strbuf_append_char(txt, '<');
{
const char *s;
// FIXME: need to escape
s = fnode->orig_format;
eina_strbuf_append(txt, s);
}
eina_strbuf_append_char(txt, '>');
}
/**
* @internal
* An helper function to _markup_get_text_append and others, used for getting
* back only the "dangerous" escapes.
*/
static void
_markup_get_text_utf8_append(Eina_Strbuf *sbuf, const char *text)
{
int ch, pos = 0, pos2 = 0;
for (;;)
{
pos = pos2;
ch = eina_unicode_utf8_next_get(text, &pos2);
if ((ch <= 0) || (pos2 <= 0)) break;
if (ch == _NEWLINE)
eina_strbuf_append(sbuf, "<br/>");
else if (ch == _TAB)
eina_strbuf_append(sbuf, "<tab/>");
else if (ch == '<')
eina_strbuf_append(sbuf, "&lt;");
else if (ch == '>')
eina_strbuf_append(sbuf, "&gt;");
else if (ch == '&')
eina_strbuf_append(sbuf, "&amp;");
else if (ch == '"')
eina_strbuf_append(sbuf, "&quot;");
else if (ch == _PARAGRAPH_SEPARATOR)
eina_strbuf_append(sbuf, "<ps/>");
else if (ch == _REPLACEMENT_CHAR)
eina_strbuf_append(sbuf, "&#xfffc;");
else if (ch != '\r')
{
eina_strbuf_append_length(sbuf, text + pos, pos2 - pos);
}
}
}
/**
* @internal
* An helper function to markup get. Appends the text in text.
*
* @param txt the strbuf to append to.
* @param text the text to process.
*/
static void
_markup_get_text_append(Eina_Strbuf *txt, const Eina_Unicode *text)
{
char *base = eina_unicode_unicode_to_utf8(text, NULL);
if (!base) return;
_markup_get_text_utf8_append(txt, base);
free(base);
}
EAPI const char*
evas_object_textblock_text_markup_get(Eo *eo_obj)
{
Evas_Object_Textblock_Node_Text *n;
Eina_Strbuf *txt = NULL;
Evas_Object_Protected_Data *obj = efl_data_scope_get(eo_obj, EFL_CANVAS_OBJECT_CLASS);
evas_object_async_block(obj);
Efl_Canvas_Text_Data *o = efl_data_scope_get(eo_obj, MY_CLASS);
const char *markup;
if (o->markup_text)
{
markup = (o->markup_text);
return markup;
}
txt = eina_strbuf_new();
EINA_INLIST_FOREACH(o->text_nodes, n)
{
Evas_Object_Textblock_Node_Format *fnode;
Eina_Unicode *text_base, *text;
int off;
int len;
/* For each text node to thorugh all of it's format nodes
* append text from the start to the offset of the next format
* using the last format got. If needed it also creates format items
* this is the core algorithm of the layout mechanism.
* Skip the unicode replacement chars when there are because
* we don't want to print them. */
len = (int) eina_ustrbuf_length_get(n->unicode);
text_base = text =
eina_unicode_strndup(eina_ustrbuf_string_get(n->unicode), len);
fnode = n->format_node;
off = 0;
while (fnode && (fnode->text_node == n))
{
Eina_Unicode tmp_ch;
off += fnode->offset;
if (off > len) break;
/* No need to skip on the first run */
tmp_ch = text[off];
text[off] = 0; /* Null terminate the part of the string */
_markup_get_text_append(txt, text);
_markup_get_format_append(txt, fnode);
text[off] = tmp_ch; /* Restore the char */
text += off;
if (fnode->visible)
{
off = -1;
text++;
}
else
{
off = 0;
}
fnode = _NODE_FORMAT(EINA_INLIST_GET(fnode)->next);
}
/* Add the rest, skip replacement */
_markup_get_text_append(txt, text);
free(text_base);
}
(((Efl_Canvas_Text_Data *)o)->markup_text) = eina_stringshare_add(eina_strbuf_string_get(txt));
eina_strbuf_free(txt);
markup = (o->markup_text);
return markup;
}
EAPI char *
evas_textblock_text_markup_to_utf8(const Evas_Object *eo_obj, const char *text)
{
/* FIXME: Redundant and awful, should be merged with markup_prepend */
Eina_Strbuf *sbuf;
char *s, *p, *ret;
char *tag_start, *tag_end, *esc_start, *esc_end;
if (!text) return NULL;
tag_start = tag_end = esc_start = esc_end = NULL;
sbuf = eina_strbuf_new();
p = (char *)text;
s = p;
/* This loop goes through all of the mark up text until it finds format
* tags, escape sequences or the terminating NULL. When it finds either
* of those, it appends the text found up until that point to the textblock
* proccesses whatever found. It repeats itself until the termainating
* NULL is reached. */
for (;;)
{
/* If we got to the end of string or just finished/started tag
* or escape sequence handling. */
if ((*p == 0) ||
(tag_end) || (esc_end) ||
(tag_start) || (esc_start))
{
if (tag_end)
{
/* If we reached to a tag ending, analyze the tag */
char *ttag;
size_t ttag_len;
tag_start++; /* Skip the < */
tag_end--; /* Skip the > */
if ((tag_end > tag_start) && (*(tag_end - 1) == '/'))
{
tag_end --; /* Skip the terminating '/' */
while (*(tag_end - 1) == ' ')
tag_end--; /* skip trailing ' ' */
}
ttag_len = tag_end - tag_start;
ttag = malloc(ttag_len + 1);
if (ttag)
{
const char *match = NULL;
size_t replace_len;
memcpy(ttag, tag_start, ttag_len);
ttag[ttag_len] = 0;
if (eo_obj)
{
match = _style_match_tag(
evas_object_textblock_style_get(eo_obj),
ttag, ttag_len, &replace_len);
}
if (!match) match = ttag;
if (_IS_PARAGRAPH_SEPARATOR_SIMPLE(match))
eina_strbuf_append(sbuf, _PARAGRAPH_SEPARATOR_UTF8);
else if (_IS_LINE_SEPARATOR(match))
eina_strbuf_append(sbuf, _NEWLINE_UTF8);
else if (_IS_TAB(match))
eina_strbuf_append(sbuf, _TAB_UTF8);
else if (!strncmp(match, "item", 4))
eina_strbuf_append(sbuf, _REPLACEMENT_CHAR_UTF8);
free(ttag);
}
tag_start = tag_end = NULL;
}
else if (esc_end)
{
const char *escape;
escape = _escaped_char_get(esc_start, esc_end + 1);
if (escape) eina_strbuf_append(sbuf, escape);
esc_start = esc_end = NULL;
}
else if (*p == 0)
{
if (s)
{
eina_strbuf_append_length(sbuf, s, p - s);
s = NULL;
}
else
{
ERR("There is a invalid markup tag at positoin '%u'. Please check the text.", (unsigned int) (p - text));
}
}
if (*p == 0)
break;
}
if (*p == '<')
{
if (!esc_start)
{
/* Append the text prior to this to the textblock and
* mark the start of the tag */
tag_start = p;
tag_end = NULL;
if (s)
{
eina_strbuf_append_length(sbuf, s, p - s);
s = NULL;
}
else
{
ERR("There is a invalid markup tag at positoin '%u'. Please check the text.", (unsigned int) (p - text));
}
}
}
else if (*p == '>')
{
if (tag_start)
{
tag_end = p + 1;
s = p + 1;
}
}
else if (*p == '&')
{
if (!tag_start)
{
/* Append the text prior to this to the textblock and mark
* the start of the escape sequence */
esc_start = p;
esc_end = NULL;
if (s)
{
eina_strbuf_append_length(sbuf, s, p - s);
s = NULL;
}
else
{
ERR("There is a invalid markup tag at positoin '%u'. Please check the text.", (unsigned int) (p - text));
}
}
}
else if (*p == ';')
{
if (esc_start)
{
esc_end = p;
s = p + 1;
}
}
p++;
}
ret = eina_strbuf_string_steal(sbuf);
eina_strbuf_free(sbuf);
return ret;
}
EAPI char *
evas_textblock_text_utf8_to_markup(const Evas_Object *eo_obj, const char *text)
{
Eina_Strbuf *sbuf;
char *str = NULL;
(void) eo_obj;
if (!text) return NULL;
sbuf = eina_strbuf_new();
_markup_get_text_utf8_append(sbuf, text);
str = eina_strbuf_string_steal(sbuf);
eina_strbuf_free(sbuf);
return str;
}
static void
_obstacle_update(Evas_Textblock_Obstacle *obs, Eo *eo_obj)
{
Eina_Rect tb_geom, obs_geom;
Eo *eo_obs = obs->eo_obs;
obs_geom = efl_gfx_geometry_get(eo_obs);
tb_geom = efl_gfx_geometry_get(eo_obj);
obs->x = obs_geom.x - tb_geom.x;
obs->y = obs_geom.y - tb_geom.y;
obs->w = obs_geom.w;
obs->h = obs_geom.h;
}
static void
_layout_obstacles_update(Ctxt *c)
{
Eina_List *i;
Eina_Bool obstacle_changed = c->o->obstacle_changed;
Evas_Textblock_Obstacle *obs;
EINA_LIST_FOREACH(c->o->obstacles, i, obs)
{
if (obstacle_changed)
_obstacle_update(obs, c->obj);
}
}
static Evas_Textblock_Obstacle *
_obstacle_find(Efl_Canvas_Text_Data *o, Eo *eo_obs)
{
Evas_Textblock_Obstacle *obs;
Eina_List *i;
EINA_LIST_FOREACH(o->obstacles, i, obs)
{
if (eo_obs == obs->eo_obs)
return obs;
}
return NULL;
}
void
_obstacle_del_cb(void *data, const Efl_Event *event)
{
Eo *eo_obj = data;
Efl_Canvas_Text_Data *o = efl_data_scope_get(eo_obj, MY_CLASS);
Eina_List *i;
Evas_Textblock_Obstacle *obs;
EINA_LIST_FOREACH(o->obstacles, i, obs)
{
if (event->object == obs->eo_obs)
break;
}
o->obstacles = eina_list_remove_list(o->obstacles, i);
free(obs);
_evas_textblock_changed(o, data);
o->obstacle_changed = EINA_TRUE;
}
static void
_obstacle_clear(Eo *eo_obj, Evas_Textblock_Obstacle *obs)
{
efl_event_callback_del(obs->eo_obs, EFL_EVENT_DEL, _obstacle_del_cb, eo_obj);
}
static void
_obstacle_free(Eo *eo_obj, Evas_Textblock_Obstacle *obs)
{
_obstacle_clear(eo_obj, obs);
free(obs);
}
static void
_obstacles_free(Eo *eo_obj, Efl_Canvas_Text_Data *o)
{
Evas_Textblock_Obstacle *obs;
EINA_LIST_FREE(o->obstacles, obs)
{
_obstacle_free(eo_obj, obs);
}
}
EOLIAN static Eina_Bool
_efl_canvas_text_obstacle_add(Eo *eo_obj,
Efl_Canvas_Text_Data *o, Eo *eo_obs)
{
Evas_Textblock_Obstacle *obs;
if (!efl_isa(eo_obs, EFL_CANVAS_OBJECT_CLASS))
return EINA_FALSE;
obs = _obstacle_find(o, eo_obs);
if (obs) return EINA_FALSE;
obs = calloc(1, sizeof(Evas_Textblock_Obstacle));
if (!obs) return EINA_FALSE;
obs->eo_obs = eo_obs;
efl_event_callback_add(eo_obs, EFL_EVENT_DEL, _obstacle_del_cb, eo_obj);
o->obstacles = eina_list_append(o->obstacles, obs);
_obstacle_update(obs, eo_obj);
_evas_textblock_changed(o, eo_obj);
o->obstacle_changed = EINA_TRUE;
return EINA_TRUE;
}
EOLIAN static Eina_Bool
_efl_canvas_text_obstacle_del(Eo *eo_obj, Efl_Canvas_Text_Data *o,
Eo *eo_obs EINA_UNUSED)
{
Evas_Textblock_Obstacle *obs;
Eina_List *i;
if (!efl_isa(eo_obs, EFL_CANVAS_OBJECT_CLASS))
return EINA_FALSE;
EINA_LIST_FOREACH(o->obstacles, i, obs)
{
if (eo_obs == obs->eo_obs)
{
break;
}
}
if (!i) return EINA_FALSE;
o->obstacles = eina_list_remove_list(o->obstacles, i);
_obstacle_free(eo_obj, obs);
_evas_textblock_changed(o, eo_obj);
o->obstacle_changed = EINA_TRUE;
return EINA_TRUE;
}
EOLIAN static void
_efl_canvas_text_obstacles_update(Eo *eo_obj, Efl_Canvas_Text_Data *obj)
{
_evas_textblock_changed(obj, eo_obj);
obj->obstacle_changed = EINA_TRUE;
}
static Evas_Textblock_Obstacle *
_layout_item_obstacle_get(Ctxt *c, Evas_Object_Textblock_Item *it)
{
Evas_Textblock_Obstacle *obs, *min_obs = NULL;
Eina_List *i;
EINA_LIST_FOREACH(c->o->obstacles, i, obs)
{
Eina_Bool is_visible;
is_visible = efl_gfx_visible_get(obs->eo_obs);
if (!is_visible)
continue;
if ((obs->y < c->y + it->h) &&
(obs->x < c->x + it->w) &&
(obs->x + obs->w > c->x) &&
(obs->y + obs->h > c->y))
{
if ((obs->x < c->w) &&
(!min_obs || (obs->x < min_obs->x)))
{
min_obs = obs;
}
}
}
return min_obs;
}
/* Hyphenation (since 1.17) */
static Evas_Object_Textblock_Text_Item *
_layout_hyphen_item_new(Ctxt *c, const Evas_Object_Textblock_Text_Item *cur_ti)
{
/* U+2010 - Unicode HYPHEN */
const Eina_Unicode _hyphen_str[2] = { 0x2010, '\0' };
Evas_Object_Textblock_Text_Item *hyphen_ti;
Evas_Script_Type script;
Evas_Font_Instance *script_fi = NULL, *cur_fi;
size_t len = 1; /* The length of _hyphen_str */
if (c->hyphen_ti)
{
_item_free(c->evas, c->o, c->evas_o, NULL, _ITEM(c->hyphen_ti));
}
c->hyphen_ti = hyphen_ti = _layout_text_item_new(c, cur_ti->parent.format);
hyphen_ti->parent.text_node = cur_ti->parent.text_node;
hyphen_ti->parent.text_pos = cur_ti->parent.text_pos + cur_ti->text_props.text_len - 1;
script = evas_common_language_script_type_get(_hyphen_str, len);
evas_common_text_props_bidi_set(&hyphen_ti->text_props,
c->par->bidi_props, hyphen_ti->parent.text_pos);
evas_common_text_props_script_set (&hyphen_ti->text_props, script);
if (hyphen_ti->parent.format->font.font)
{
Evas_Object_Protected_Data *obj = c->evas_o;
/* It's only 1 char anyway, we don't need the run end. */
(void) ENFN->font_run_end_get(ENC,
hyphen_ti->parent.format->font.font, &script_fi, &cur_fi,
script, _hyphen_str, len);
ENFN->font_text_props_info_create(ENC,
cur_fi, _hyphen_str, &hyphen_ti->text_props,
c->par->bidi_props, hyphen_ti->parent.text_pos, len, EVAS_TEXT_PROPS_MODE_SHAPE,
hyphen_ti->parent.format->font.fdesc->lang);
}
_text_item_update_sizes(c, hyphen_ti);
return hyphen_ti;
}
/* cursors */
/**
* @internal
* Merge the current node with the next, no need to remove PS, already
* not there.
*
* @param o the text block object.
* @param to merge into to.
*/
static void
_evas_textblock_nodes_merge(Efl_Canvas_Text_Data *o, Evas_Object_Textblock_Node_Text *to)
{
Evas_Object_Textblock_Node_Format *itr;
Evas_Object_Textblock_Node_Format *pnode;
Evas_Object_Textblock_Node_Text *from;
const Eina_Unicode *text;
int to_len, len;
if (!to) return;
from = _NODE_TEXT(EINA_INLIST_GET(to)->next);
to_len = eina_ustrbuf_length_get(to->unicode);
text = eina_ustrbuf_string_get(from->unicode);
len = eina_ustrbuf_length_get(from->unicode);
eina_ustrbuf_append_length(to->unicode, text, len);
itr = from->format_node;
if (itr && (itr->text_node == from))
{
pnode = _NODE_FORMAT(EINA_INLIST_GET(itr)->prev);
if (pnode && (pnode->text_node == to))
{
itr->offset += to_len - _evas_textblock_node_format_pos_get(pnode);
}
else
{
itr->offset += to_len;
}
}
while (itr && (itr->text_node == from))
{
itr->text_node = to;
itr = _NODE_FORMAT(EINA_INLIST_GET(itr)->next);
}
if (!to->format_node || (to->format_node->text_node != to))
{
to->format_node = from->format_node;
}
/* When it comes to how we handle it, merging is like removing both nodes
* and creating a new one, so we need to do the needed cleanups. */
if (to->par)
to->par->text_node = NULL;
to->par = NULL;
to->is_new = EINA_TRUE;
_evas_textblock_cursors_set_node(o, from, to);
_evas_textblock_node_text_remove(o, from);
}
/**
* @internal
* Merge the current node with the next, no need to remove PS, already
* not there.
*
* @param cur the cursor that points to the current node
*/
static void
_evas_textblock_cursor_nodes_merge(Efl_Text_Cursor_Cursor *cur)
{
Evas_Object_Textblock_Node_Text *nnode;
int len;
if (!cur) return;
len = eina_ustrbuf_length_get(cur->node->unicode);
Efl_Canvas_Text_Data *o = efl_data_scope_get(cur->obj, MY_CLASS);
nnode = _NODE_TEXT(EINA_INLIST_GET(cur->node)->next);
_evas_textblock_nodes_merge(o, cur->node);
_evas_textblock_cursors_update_offset(cur, nnode, 0, len);
_evas_textblock_cursors_set_node(o, nnode, cur->node);
Efl_Text_Cursor_Cursor *co = o->cursor;
if (nnode == co->node)
{
co->node = cur->node;
co->pos += len;
}
}
/**
* @internal
* Return the format at a specific position.
*
* @param cur the cursor to the position.
* @return the format node at the specific position or NULL if not found.
*/
static Evas_Object_Textblock_Node_Format *
_evas_textblock_cursor_node_format_at_pos_get(const Efl_Text_Cursor_Cursor *cur)
{
Evas_Object_Textblock_Node_Format *node;
Evas_Object_Textblock_Node_Format *itr;
int position = 0;
TB_NULL_CHECK(cur->node, NULL);
node = cur->node->format_node;
if (!node) return NULL;
/* If there is no exclusive format node to this paragraph return the
* previous's node */
/* Find the main format node */
EINA_INLIST_FOREACH(node, itr)
{
if (itr->text_node != cur->node)
{
return NULL;
}
if ((position + itr->offset) == cur->pos)
{
return itr;
}
position += itr->offset;
}
return NULL;
}
/**
* @internal
* Return the last format node at the position of the format node n.
*
* @param n a format node at the position.
* @return the last format node at the position of n.
*/
static Evas_Object_Textblock_Node_Format *
_evas_textblock_node_format_last_at_off(const Evas_Object_Textblock_Node_Format *n)
{
const Evas_Object_Textblock_Node_Format *nnode;
const Evas_Object_Textblock_Node_Text *tnode;
if (!n) return NULL;
nnode = n;
tnode = n->text_node;
do
{
n = nnode;
nnode = _NODE_FORMAT(EINA_INLIST_GET(nnode)->next);
}
while (nnode && (nnode->text_node == tnode) && (nnode->offset == 0));
return (Evas_Object_Textblock_Node_Format *) n;
}
/**
* @internal
* Returns the visible format at a specific location.
*
* @param n a format at the specific position.
* @return the format node at the specific position or NULL if not found.
*/
static Evas_Object_Textblock_Node_Format *
_evas_textblock_node_visible_at_pos_get(const Evas_Object_Textblock_Node_Format *n)
{
const Evas_Object_Textblock_Node_Format *nnode;
if (!n) return NULL;
/* The visible format is the last one, because it inserts a replacement
* char that advances the next formats. */
nnode = n;
do
{
n = nnode;
if (n->visible) return (Evas_Object_Textblock_Node_Format *) n;
nnode = _NODE_FORMAT(EINA_INLIST_GET(nnode)->next);
}
while (nnode && (nnode->offset == 0));
return NULL;
}
/**
* @internal
* Return the last format that applies to a specific cursor or at the specific
* position the cursor points to. This means either a cursor at or before the
* position of the cursor in the text node is returned or the previous's text
* node's format node.
*
* @param cur the position to look at.
* @return the format node found.
*/
static Evas_Object_Textblock_Node_Format *
_evas_textblock_cursor_node_format_before_or_at_pos_get(const Efl_Text_Cursor_Cursor *cur)
{
Evas_Object_Textblock_Node_Format *node, *pitr = NULL;
Evas_Object_Textblock_Node_Format *itr;
size_t position = 0;
TB_NULL_CHECK(cur->node, NULL);
node = cur->node->format_node;
if (!node) return NULL;
/* If there is no exclusive format node to this paragraph return the
* previous's node */
if (node->text_node != cur->node)
{
return node;
}
else if (node->offset > cur->pos)
{
return _NODE_FORMAT(EINA_INLIST_GET(node)->prev);
}
/* Find the main format node */
pitr = _NODE_FORMAT(EINA_INLIST_GET(node)->prev);
EINA_INLIST_FOREACH(node, itr)
{
if ((itr->text_node != cur->node) ||
((position + itr->offset) > cur->pos))
{
return pitr;
}
else if ((position + itr->offset) == cur->pos)
{
return itr;
}
pitr = itr;
position += itr->offset;
}
return pitr;
}
/**
* @internal
* Find the layout item and line that match the cursor.
*
* @param cur the cursor we are currently at. - NOT NULL.
* @param[out] lnr the line found - not null.
* @param[out] itr the item found - not null.
* @return @c EINA_TRUE if we matched the previous format, @c EINA_FALSE
* otherwise.
*/
static Eina_Bool
_find_layout_item_match(const Efl_Text_Cursor_Cursor *cur, Evas_Object_Textblock_Line **lnr, Evas_Object_Textblock_Item **itr)
{
Efl_Text_Cursor_Cursor cur2;
Eina_Bool previous_format = EINA_FALSE;
_evas_textblock_cursor_init(&cur2, cur->obj);
_evas_textblock_cursor_copy(&cur2, cur);
if (cur2.pos > 0)
{
cur2.pos--;
}
if (_evas_textblock_cursor_is_at_the_end(cur) &&
_evas_textblock_cursor_format_is_visible_get(&cur2))
{
_find_layout_item_line_match(cur2.obj, cur2.node, cur2.pos, lnr, itr);
previous_format = EINA_TRUE;
}
else
{
_find_layout_item_line_match(cur->obj, cur->node, cur->pos, lnr, itr);
}
return previous_format;
}
static void
_evas_textblock_cursor_init(Efl_Text_Cursor_Cursor *cur, const Evas_Object *tb)
{
cur->obj = (Eo *) tb;
Efl_Canvas_Text_Data *o = efl_data_scope_get(cur->obj, MY_CLASS);
cur->node = o->text_nodes;
cur->pos = 0;
}
EAPI Efl_Text_Cursor_Cursor *
evas_object_textblock_cursor_new(const Evas_Object *eo_obj)
{
EINA_SAFETY_ON_NULL_RETURN_VAL(eo_obj, NULL);
return efl_text_cursor_new((Eo *) eo_obj);
}
EAPI void
evas_textblock_cursor_free(Evas_Textblock_Cursor *cur)
{
if (!cur) return;
Efl_Canvas_Text_Data *o = efl_data_scope_get(cur->obj, MY_CLASS);
if (cur == o->cursor) return;
o->cursors = eina_list_remove(o->cursors, cur);
free(cur);
}
EAPI Eina_Bool
_evas_textblock_cursor_is_format(const Efl_Text_Cursor_Cursor *cur)
{
if ((!cur) || (!cur->node)) return EINA_FALSE;
Evas_Object_Protected_Data *obj = efl_data_scope_get(cur->obj, EFL_CANVAS_OBJECT_CLASS);
evas_object_async_block(obj);
return (_evas_textblock_cursor_node_format_at_pos_get(cur)) ?
EINA_TRUE : EINA_FALSE;
}
EAPI Eina_Bool
evas_textblock_cursor_is_format(const Evas_Textblock_Cursor *cur)
{
return _evas_textblock_cursor_is_format(cur);
}
EAPI const Eina_List *
evas_textblock_node_format_list_get(const Eo *eo_obj, const char *anchor)
{
Evas_Object_Protected_Data *obj = efl_data_scope_get(eo_obj, EFL_CANVAS_OBJECT_CLASS);
evas_object_async_block(obj);
Efl_Canvas_Text_Data *o = efl_data_scope_get(eo_obj, MY_CLASS);
if (!strcmp(anchor, "a"))
return o->anchors_a;
else if (!strcmp(anchor, "item"))
return o->anchors_item;
return NULL;
}
EAPI const Evas_Object_Textblock_Node_Format*
evas_textblock_node_format_first_get(Evas_Object *eo_obj)
{
Evas_Object_Protected_Data *obj = efl_data_scope_get(eo_obj, EFL_CANVAS_OBJECT_CLASS);
evas_object_async_block(obj);
Efl_Canvas_Text_Data *o = efl_data_scope_get(eo_obj, MY_CLASS);
return o->format_nodes;
}
EAPI const Evas_Object_Textblock_Node_Format*
evas_textblock_node_format_last_get(Evas_Object *eo_obj)
{
Evas_Object_Protected_Data *obj = efl_data_scope_get(eo_obj, EFL_CANVAS_OBJECT_CLASS);
evas_object_async_block(obj);
Efl_Canvas_Text_Data *o = efl_data_scope_get(eo_obj, MY_CLASS);
return o->format_nodes ? _NODE_FORMAT(EINA_INLIST_GET(o->format_nodes)->last) : NULL;
}
EAPI const Evas_Object_Textblock_Node_Format *
evas_textblock_node_format_next_get(const Evas_Object_Textblock_Node_Format *n)
{
if (!n) return NULL;
return _NODE_FORMAT(EINA_INLIST_GET(n)->next);
}
EAPI const Evas_Object_Textblock_Node_Format *
evas_textblock_node_format_prev_get(const Evas_Object_Textblock_Node_Format *n)
{
if (!n) return NULL;
return _NODE_FORMAT(EINA_INLIST_GET(n)->prev);
}
EAPI void
evas_textblock_node_format_remove_pair(Eo *eo_obj, Evas_Object_Textblock_Node_Format *n)
{
Evas_Object_Textblock_Node_Text *tnode1;
Evas_Object_Textblock_Node_Format *fmt, *found_node = NULL;
Eina_List *fstack = NULL;
if (!n) return;
fmt = n;
Evas_Object_Protected_Data *obj = efl_data_scope_get(eo_obj, EFL_CANVAS_OBJECT_CLASS);
evas_object_async_block(obj);
Efl_Canvas_Text_Data *o = efl_data_scope_get(eo_obj, MY_CLASS);
do
{
const char *fstr = fmt->orig_format;
if (fmt->opener && !fmt->own_closer)
{
fstack = eina_list_prepend(fstack, fmt);
}
else if (fstr && !fmt->opener)
{
size_t fstr_len;
fstr_len = strlen(fstr);
/* Generic popper, just pop */
if (((fstr[0] == '/') && !fstr[1]) || !fstr[0])
{
fstack = eina_list_remove_list(fstack, fstack);
if (!fstack)
{
found_node = fmt;
goto found;
}
}
/* Find the matching format and pop it, if the matching format
* is out format, i.e the last one, pop and break. */
else
{
Eina_List *i;
Evas_Object_Textblock_Node_Format *fnode;
EINA_LIST_FOREACH(fstack, i, fnode)
{
if (_FORMAT_IS_CLOSER_OF(
fnode->orig_format, fstr + 1, fstr_len - 1))
{
/* Last one, this is our item! */
if (!eina_list_next(i))
{
found_node = fmt;
goto found;
}
fstack = eina_list_remove_list(fstack, i);
break;
}
}
}
}
fmt = _NODE_FORMAT(EINA_INLIST_GET(fmt)->next);
}
while (fmt && fstack);
found:
fstack = eina_list_free(fstack);
if (n->visible)
{
size_t ind = _evas_textblock_node_format_pos_get(n);
const char *format = n->format;
Efl_Text_Cursor_Cursor cur;
_evas_textblock_cursor_init(&cur, eo_obj);
eina_ustrbuf_remove(n->text_node->unicode, ind, ind + 1);
if (format && _IS_PARAGRAPH_SEPARATOR(o, format))
{
_evas_textblock_cursor_at_format_set(&cur, n);
_evas_textblock_cursor_nodes_merge(&cur);
}
_evas_textblock_cursors_update_offset(&cur, n->text_node, ind, -1);
}
tnode1 = n->text_node;
_evas_textblock_node_format_remove(o, n, 0);
if (found_node && (found_node != n))
{
Evas_Object_Textblock_Node_Text *tnode2;
tnode2 = found_node->text_node;
/* found_node can never be visible! (it's the closing format) */
_evas_textblock_node_format_remove(o, found_node, 0);
/* FIXME: Should be unified in the layout, for example, added to a list
* that checks this kind of removals. But until then, this is very fast
* and works. */
/* Mark all the text nodes in between the removed formats as dirty. */
while (tnode1)
{
tnode1->dirty = EINA_TRUE;
if (tnode1 == tnode2)
break;
tnode1 =
_NODE_TEXT(EINA_INLIST_GET(tnode1)->next);
}
}
_evas_textblock_changed(o, eo_obj);
}
EAPI void
evas_textblock_cursor_paragraph_first(Efl_Text_Cursor_Cursor *cur)
{
if (!cur) return;
Evas_Object_Protected_Data *obj = efl_data_scope_get(cur->obj, EFL_CANVAS_OBJECT_CLASS);
evas_object_async_block(obj);
Efl_Canvas_Text_Data *o = efl_data_scope_get(cur->obj, MY_CLASS);
cur->node = o->text_nodes;
cur->pos = 0;
}
EOLIAN static void
_efl_canvas_text_efl_text_cursor_cursor_paragraph_first(Eo *eo_obj, Efl_Canvas_Text_Data *o EINA_UNUSED, Efl_Text_Cursor_Cursor *cur)
{
ASYNC_BLOCK;
evas_textblock_cursor_paragraph_first(cur);
efl_event_callback_legacy_call(eo_obj, EFL_CANVAS_TEXT_EVENT_CURSOR_CHANGED, NULL);
}
EAPI void
evas_textblock_cursor_paragraph_last(Efl_Text_Cursor_Cursor *cur)
{
Evas_Object_Textblock_Node_Text *node;
if (!cur) return;
Evas_Object_Protected_Data *obj = efl_data_scope_get(cur->obj, EFL_CANVAS_OBJECT_CLASS);
evas_object_async_block(obj);
Efl_Canvas_Text_Data *o = efl_data_scope_get(cur->obj, MY_CLASS);
node = o->text_nodes;
if (node)
{
node = _NODE_TEXT(EINA_INLIST_GET(node)->last);
cur->node = node;
cur->pos = 0;
evas_textblock_cursor_paragraph_char_last(cur);
}
else
{
cur->node = NULL;
cur->pos = 0;
}
}
EOLIAN static void
_efl_canvas_text_efl_text_cursor_cursor_paragraph_last(Eo *eo_obj, Efl_Canvas_Text_Data *o EINA_UNUSED, Efl_Text_Cursor_Cursor *cur)
{
ASYNC_BLOCK;
evas_textblock_cursor_paragraph_last(cur);
efl_event_callback_legacy_call(eo_obj, EFL_CANVAS_TEXT_EVENT_CURSOR_CHANGED, NULL);
}
static Eina_Bool
_evas_textblock_cursor_paragraph_next(Efl_Text_Cursor_Cursor *cur)
{
if (!cur) return EINA_FALSE;
Evas_Object_Protected_Data *obj = efl_data_scope_get(cur->obj, EFL_CANVAS_OBJECT_CLASS);
evas_object_async_block(obj);
TB_NULL_CHECK(cur->node, EINA_FALSE);
/* If there is a current text node, return the next text node (if exists)
* otherwise, just return False. */
if (cur->node)
{
Evas_Object_Textblock_Node_Text *nnode;
nnode = _NODE_TEXT(EINA_INLIST_GET(cur->node)->next);
if (nnode)
{
cur->node = nnode;
cur->pos = 0;
return EINA_TRUE;
}
}
return EINA_FALSE;
}
EAPI Eina_Bool
evas_textblock_cursor_paragraph_next(Efl_Text_Cursor_Cursor *cur)
{
if (!cur) return EINA_FALSE;
return _evas_textblock_cursor_paragraph_next(cur);
}
EOLIAN static void
_efl_canvas_text_efl_text_cursor_cursor_paragraph_next(Eo *obj EINA_UNUSED, Efl_Canvas_Text_Data *o EINA_UNUSED, Evas_Textblock_Cursor *cur)
{
ASYNC_BLOCK;
evas_textblock_cursor_paragraph_next(cur);
efl_event_callback_legacy_call(obj, EFL_CANVAS_TEXT_EVENT_CURSOR_CHANGED, NULL);
}
static Eina_Bool
_evas_textblock_cursor_paragraph_prev(Efl_Text_Cursor_Cursor *cur)
{
Evas_Object_Textblock_Node_Text *node;
if (!cur) return EINA_FALSE;
Evas_Object_Protected_Data *obj = efl_data_scope_get(cur->obj, EFL_CANVAS_OBJECT_CLASS);
evas_object_async_block(obj);
TB_NULL_CHECK(cur->node, EINA_FALSE);
/* If the current node is a text node, just get the prev if any,
* if it's a format, get the current text node out of the format and return
* the prev text node if any. */
node = cur->node;
/* If there is a current text node, return the prev text node
* (if exists) otherwise, just return False. */
if (node)
{
Evas_Object_Textblock_Node_Text *pnode;
pnode = _NODE_TEXT(EINA_INLIST_GET(cur->node)->prev);
if (pnode)
{
cur->node = pnode;
evas_textblock_cursor_paragraph_char_last(cur);
return EINA_TRUE;
}
}
return EINA_FALSE;
}
EAPI Eina_Bool
evas_textblock_cursor_paragraph_prev(Efl_Text_Cursor_Cursor *cur)
{
if (!cur) return EINA_FALSE;
return _evas_textblock_cursor_paragraph_prev(cur);
}
EOLIAN static void
_efl_canvas_text_efl_text_cursor_cursor_paragraph_prev(Eo *obj EINA_UNUSED,
Efl_Canvas_Text_Data *o EINA_UNUSED, Efl_Text_Cursor_Cursor *cur)
{
ASYNC_BLOCK;
_evas_textblock_cursor_paragraph_prev(cur);
efl_event_callback_legacy_call(obj, EFL_CANVAS_TEXT_EVENT_CURSOR_CHANGED, NULL);
}
EAPI void
evas_textblock_cursor_set_at_format(Evas_Textblock_Cursor *cur, const Evas_Object_Textblock_Node_Format *n)
{
evas_textblock_cursor_at_format_set(cur, n);
}
EAPI Eina_Bool
evas_textblock_cursor_format_next(Evas_Textblock_Cursor *cur)
{
Evas_Object_Textblock_Node_Format *node;
if (!cur) return EINA_FALSE;
Evas_Object_Protected_Data *obj = efl_data_scope_get(cur->obj, EFL_CANVAS_OBJECT_CLASS);
evas_object_async_block(obj);
TB_NULL_CHECK(cur->node, EINA_FALSE);
/* If the current node is a format node, just get the next if any,
* if it's a text, get the current format node out of the text and return
* the next format node if any. */
node = _evas_textblock_cursor_node_format_before_or_at_pos_get(cur);
node = _evas_textblock_node_format_last_at_off(node);
if (!node)
{
if (cur->node->format_node)
{
cur->pos = _evas_textblock_node_format_pos_get(node);
return EINA_TRUE;
}
}
/* If there is a current text node, return the next format node (if exists)
* otherwise, just return False. */
else
{
Evas_Object_Textblock_Node_Format *nnode;
nnode = _NODE_FORMAT(EINA_INLIST_GET(node)->next);
if (nnode)
{
cur->node = nnode->text_node;
cur->pos = _evas_textblock_node_format_pos_get(nnode);
return EINA_TRUE;
}
}
return EINA_FALSE;
}
EAPI Eina_Bool
evas_textblock_cursor_format_prev(Evas_Textblock_Cursor *cur)
{
const Evas_Object_Textblock_Node_Format *node;
if (!cur) return EINA_FALSE;
Evas_Object_Protected_Data *obj = efl_data_scope_get(cur->obj, EFL_CANVAS_OBJECT_CLASS);
evas_object_async_block(obj);
TB_NULL_CHECK(cur->node, EINA_FALSE);
node = evas_textblock_cursor_format_get(cur);
if (!node)
{
node = _evas_textblock_cursor_node_format_before_or_at_pos_get(cur);
if (node)
{
cur->node = node->text_node;
cur->pos = _evas_textblock_node_format_pos_get(node);
return EINA_TRUE;
}
}
/* If there is a current text node, return the next text node (if exists)
* otherwise, just return False. */
if (node)
{
Evas_Object_Textblock_Node_Format *pnode;
pnode = _NODE_FORMAT(EINA_INLIST_GET(node)->prev);
if (pnode)
{
cur->node = pnode->text_node;
cur->pos = _evas_textblock_node_format_pos_get(pnode);
return EINA_TRUE;
}
}
return EINA_FALSE;
}
/* BREAK_AFTER: true if we can break after the current char.
* Both macros assume str[i] is not the terminating nul */
#define BREAK_AFTER(i) \
(breaks[i] == WORDBREAK_BREAK)
EAPI Eina_Bool
evas_textblock_cursor_word_start(Efl_Text_Cursor_Cursor *cur)
{
if (!cur) return EINA_FALSE;
const Eina_Unicode *text;
size_t i;
char *breaks;
Evas_Object_Protected_Data *obj = efl_data_scope_get(cur->obj, EFL_CANVAS_OBJECT_CLASS);
evas_object_async_block(obj);
TB_NULL_CHECK(cur->node, EINA_FALSE);
size_t len = eina_ustrbuf_length_get(cur->node->unicode);
text = eina_ustrbuf_string_get(cur->node->unicode);
{
const char *lang = ""; /* FIXME: get lang */
breaks = malloc(len);
set_wordbreaks_utf32((const utf32_t *) text, len, lang, breaks);
}
if ((cur->pos > 0) && (cur->pos == len))
cur->pos--;
for (i = cur->pos ; _is_white(text[i]) && BREAK_AFTER(i) ; i--)
{
if (i == 0)
{
Evas_Object_Textblock_Node_Text *pnode;
pnode = _NODE_TEXT(EINA_INLIST_GET(cur->node)->prev);
if (pnode)
{
cur->node = pnode;
len = eina_ustrbuf_length_get(cur->node->unicode);
cur->pos = len - 1;
free(breaks);
return evas_textblock_cursor_word_start(cur);
}
else
{
break;
}
}
}
for ( ; i > 0 ; i--)
{
if (BREAK_AFTER(i - 1))
{
break;
}
}
cur->pos = i;
free(breaks);
return EINA_TRUE;
}
EOLIAN static void
_efl_canvas_text_efl_text_cursor_cursor_word_start(Eo *eo_obj, Efl_Canvas_Text_Data *o EINA_UNUSED, Efl_Text_Cursor_Cursor *cur EINA_UNUSED)
{
ASYNC_BLOCK;
evas_textblock_cursor_word_start(cur);
efl_event_callback_legacy_call(eo_obj, EFL_CANVAS_TEXT_EVENT_CURSOR_CHANGED, NULL);
}
EAPI Eina_Bool
evas_textblock_cursor_word_end(Efl_Text_Cursor_Cursor *cur)
{
if (!cur) return EINA_FALSE;
const Eina_Unicode *text;
size_t i;
char *breaks;
Evas_Object_Protected_Data *obj = efl_data_scope_get(cur->obj, EFL_CANVAS_OBJECT_CLASS);
evas_object_async_block(obj);
TB_NULL_CHECK(cur->node, EINA_FALSE);
size_t len = eina_ustrbuf_length_get(cur->node->unicode);
if (cur->pos == len)
return EINA_TRUE;
text = eina_ustrbuf_string_get(cur->node->unicode);
{
const char *lang = ""; /* FIXME: get lang */
breaks = malloc(len);
set_wordbreaks_utf32((const utf32_t *) text, len, lang, breaks);
}
for (i = cur->pos; text[i] && _is_white(text[i]) && (BREAK_AFTER(i)) ; i++);
if (i == len)
{
Evas_Object_Textblock_Node_Text *nnode;
nnode = _NODE_TEXT(EINA_INLIST_GET(cur->node)->next);
if (nnode)
{
cur->node = nnode;
cur->pos = 0;
free(breaks);
return evas_textblock_cursor_word_end(cur);
}
}
for ( ; text[i] ; i++)
{
if (BREAK_AFTER(i))
{
/* This is the one to break after. */
break;
}
}
cur->pos = i;
free(breaks);
return EINA_TRUE;
}
EOLIAN static void
_efl_canvas_text_efl_text_cursor_cursor_word_end(Eo *eo_obj, Efl_Canvas_Text_Data *o EINA_UNUSED, Efl_Text_Cursor_Cursor *cur EINA_UNUSED)
{
ASYNC_BLOCK;
evas_textblock_cursor_word_end(cur);
efl_event_callback_legacy_call(eo_obj, EFL_CANVAS_TEXT_EVENT_CURSOR_CHANGED, NULL);
}
EAPI Eina_Bool
evas_textblock_cursor_char_next(Efl_Text_Cursor_Cursor *cur)
{
int ind;
const Eina_Unicode *text;
if (!cur) return EINA_FALSE;
Evas_Object_Protected_Data *obj = efl_data_scope_get(cur->obj, EFL_CANVAS_OBJECT_CLASS);
evas_object_async_block(obj);
TB_NULL_CHECK(cur->node, EINA_FALSE);
ind = cur->pos;
text = eina_ustrbuf_string_get(cur->node->unicode);
if (text[ind]) ind++;
/* Only allow pointing a null if it's the last paragraph.
* because we don't have a PS there. */
if (text[ind])
{
cur->pos = ind;
return EINA_TRUE;
}
else
{
if (!_evas_textblock_cursor_paragraph_next(cur))
{
/* If we already were at the end, that means we don't have
* where to go next we should return FALSE */
if (cur->pos == (size_t) ind)
return EINA_FALSE;
cur->pos = ind;
return EINA_TRUE;
}
else
{
return EINA_TRUE;
}
}
}
EOLIAN static void
_efl_canvas_text_efl_text_cursor_cursor_char_next(Eo *eo_obj, Efl_Canvas_Text_Data *o EINA_UNUSED, Efl_Text_Cursor_Cursor *cur)
{
ASYNC_BLOCK;
evas_textblock_cursor_char_next(cur);
efl_event_callback_legacy_call(eo_obj, EFL_CANVAS_TEXT_EVENT_CURSOR_CHANGED, NULL);
}
static Eina_Bool
_evas_textblock_cursor_char_prev(Efl_Text_Cursor_Cursor *cur)
{
if (!cur) return EINA_FALSE;
TB_NULL_CHECK(cur->node, EINA_FALSE);
if (cur->pos != 0)
{
cur->pos--;
return EINA_TRUE;
}
return evas_textblock_cursor_paragraph_prev(cur);
}
EAPI Eina_Bool
evas_textblock_cursor_char_prev(Efl_Text_Cursor_Cursor *cur)
{
if (!cur) return EINA_FALSE;
return _evas_textblock_cursor_char_prev(cur);
}
EOLIAN static void
_efl_canvas_text_efl_text_cursor_cursor_char_prev(Eo *eo_obj EINA_UNUSED, Efl_Canvas_Text_Data *o EINA_UNUSED, Efl_Text_Cursor_Cursor *cur)
{
ASYNC_BLOCK;
_evas_textblock_cursor_char_prev(cur);
efl_event_callback_legacy_call(eo_obj, EFL_CANVAS_TEXT_EVENT_CURSOR_CHANGED, NULL);
}
EAPI void
evas_textblock_cursor_paragraph_char_first(Efl_Text_Cursor_Cursor *cur)
{
if (!cur) return;
Evas_Object_Protected_Data *obj = efl_data_scope_get(cur->obj, EFL_CANVAS_OBJECT_CLASS);
evas_object_async_block(obj);
cur->pos = 0;
}
EOLIAN static void
_efl_canvas_text_efl_text_cursor_cursor_paragraph_char_first(Eo *eo_obj, Efl_Canvas_Text_Data *o EINA_UNUSED, Efl_Text_Cursor_Cursor *cur)
{
ASYNC_BLOCK;
evas_textblock_cursor_paragraph_char_first(cur);
efl_event_callback_legacy_call(eo_obj, EFL_CANVAS_TEXT_EVENT_CURSOR_CHANGED, NULL);
}
EAPI void
evas_textblock_cursor_paragraph_char_last(Efl_Text_Cursor_Cursor *cur)
{
int ind;
if (!cur) return;
Evas_Object_Protected_Data *obj = efl_data_scope_get(cur->obj, EFL_CANVAS_OBJECT_CLASS);
evas_object_async_block(obj);
TB_NULL_CHECK(cur->node);
ind = eina_ustrbuf_length_get(cur->node->unicode);
/* If it's not the last paragraph, go back one, because we want to point
* to the PS, not the NULL */
if (EINA_INLIST_GET(cur->node)->next)
ind--;
if (ind >= 0)
cur->pos = ind;
else
cur->pos = 0;
}
EOLIAN static void
_efl_canvas_text_efl_text_cursor_cursor_paragraph_char_last(Eo *eo_obj, Efl_Canvas_Text_Data *o EINA_UNUSED, Efl_Text_Cursor_Cursor *cur)
{
ASYNC_BLOCK;
evas_textblock_cursor_paragraph_char_last(cur);
efl_event_callback_legacy_call(eo_obj, EFL_CANVAS_TEXT_EVENT_CURSOR_CHANGED, NULL);
}
static void
_cursor_line_first_char_get(Evas_Object_Textblock_Line *ln,
Efl_Text_Cursor_Cursor *cur,
Efl_Canvas_Text_Data *o)
{
if (ln->items)
{
Evas_Object_Textblock_Item *it;
size_t pos;
pos = ln->items->text_pos;
EINA_INLIST_FOREACH(EINA_INLIST_GET(ln->items)->next, it)
{
if (it->text_pos < pos)
{
pos = it->text_pos;
}
}
cur->pos = pos;
cur->node = ln->items->text_node;
}
else
{
cur->pos = 0;
cur->node = o->text_nodes;
}
}
EAPI void
evas_textblock_cursor_line_char_first(Efl_Text_Cursor_Cursor *cur)
{
Evas_Object_Textblock_Line *ln = NULL;
Evas_Object_Textblock_Item *it = NULL;
if (!cur) return;
Evas_Object_Protected_Data *obj = efl_data_scope_get(cur->obj, EFL_CANVAS_OBJECT_CLASS);
evas_object_async_block(obj);
evas_object_async_block(obj);
TB_NULL_CHECK(cur->node);
Efl_Canvas_Text_Data *o = efl_data_scope_get(cur->obj, MY_CLASS);
_relayout_if_needed(cur->obj, o);
/* We don't actually need 'it', but it needs to be non NULL */
_find_layout_item_match(cur, &ln, &it);
if (!ln) return;
_cursor_line_first_char_get(ln, cur, o);
}
EAPI void
evas_textblock_cursor_line_char_last(Efl_Text_Cursor_Cursor *cur)
{
Evas_Object_Textblock_Line *ln = NULL;
Evas_Object_Textblock_Item *it = NULL;
if (!cur) return;
Evas_Object_Protected_Data *obj = efl_data_scope_get(cur->obj, EFL_CANVAS_OBJECT_CLASS);
evas_object_async_block(obj);
TB_NULL_CHECK(cur->node);
Efl_Canvas_Text_Data *o = efl_data_scope_get(cur->obj, MY_CLASS);
_relayout_if_needed(cur->obj, o);
_find_layout_item_match(cur, &ln, &it);
if (!ln) return;
if (ln->items)
{
Evas_Object_Textblock_Item *i;
it = ln->items;
EINA_INLIST_FOREACH(ln->items, i)
{
if (it->text_pos < i->text_pos)
{
it = i;
}
}
}
if (it)
{
size_t ind;
cur->node = it->text_node;
cur->pos = it->text_pos;
if (it->type == EVAS_TEXTBLOCK_ITEM_TEXT)
{
ind = _ITEM_TEXT(it)->text_props.text_len - 1;
if (!IS_AT_END(_ITEM_TEXT(it), ind)) ind++;
cur->pos += ind;
}
else if (!EINA_INLIST_GET(ln)->next && !EINA_INLIST_GET(ln->par)->next)
{
cur->pos++;
}
}
}
EOLIAN static void
_efl_canvas_text_efl_text_cursor_cursor_line_char_last(Eo *eo_obj, Efl_Canvas_Text_Data *o EINA_UNUSED, Efl_Text_Cursor_Cursor *cur)
{
ASYNC_BLOCK;
evas_textblock_cursor_line_char_last(cur);
efl_event_callback_legacy_call(eo_obj, EFL_CANVAS_TEXT_EVENT_CURSOR_CHANGED, NULL);
}
EOLIAN static void
_efl_canvas_text_efl_text_cursor_cursor_line_char_first(Eo *eo_obj, Efl_Canvas_Text_Data *o EINA_UNUSED, Efl_Text_Cursor_Cursor *cur)
{
ASYNC_BLOCK;
evas_textblock_cursor_line_char_first(cur);
efl_event_callback_legacy_call(eo_obj, EFL_CANVAS_TEXT_EVENT_CURSOR_CHANGED, NULL);
}
/**
* @internal
* checks if a format (as a string) is visible/changes format and sets the
* fnode properties accordingly.
*
* @param fnode the format node
* @param s the string.
*/
static void
_evas_textblock_format_is_visible(Evas_Object_Textblock_Node_Format *fnode,
const char *s, Eina_Bool is_item)
{
const char *item;
Eina_Bool is_opener = EINA_TRUE;
fnode->visible = fnode->format_change = EINA_FALSE;
fnode->anchor = ANCHOR_NONE;
if (!s) return;
if (!fnode->own_closer)
{
is_opener = fnode->opener;
fnode->format_change = EINA_TRUE;
}
while ((item = _format_parse(&s)))
{
int itlen = s - item;
/* We care about all of the formats even after a - except for
* item which we don't care after a - because it's just a standard
* closing */
if ((!strncmp(item, "\n", itlen) || !strncmp(item, "\\n", itlen)) ||
(!strncmp(item, "\t", itlen) || !strncmp(item, "\\t", itlen)) ||
(!strncmp(item, "br", itlen) && (itlen >= 2)) ||
(!strncmp(item, "tab", itlen) && (itlen >= 3)) ||
(!strncmp(item, "ps", itlen) && (itlen >= 2)) ||
(is_opener &&
(is_item ||
(fnode->annotation && fnode->annotation->is_item) ||
((!strncmp(item, "item", itlen) && (itlen >= 4))))))
{
fnode->visible = EINA_TRUE;
}
if (is_opener && !strncmp(item, "a", itlen))
{
fnode->anchor = ANCHOR_A;
}
else if (is_opener &&
((fnode->annotation && fnode->annotation->is_item) ||
(!strncmp(item, "item", itlen) && (itlen >= 4))))
{
fnode->anchor = ANCHOR_ITEM;
}
}
}
/**
* Sets the cursor to the position of where the fmt points to.
*
* @param cur the cursor to update.
* @param fmt the format to set according to.
* @return nothing.
*/
static void EINA_UNUSED
_evas_textblock_cursor_node_text_at_format(Efl_Text_Cursor_Cursor *cur, Evas_Object_Textblock_Node_Format *fmt)
{
Evas_Object_Textblock_Node_Text *text;
Evas_Object_Textblock_Node_Format *base_format;
Evas_Object_Textblock_Node_Format *itr;
size_t position = 0;
if (!cur || !fmt) return;
/* Find the main format node */
text = fmt->text_node;
cur->node = text;
base_format = text->format_node;
EINA_INLIST_FOREACH(base_format, itr)
{
if (itr == fmt)
{
break;
}
position += itr->offset;
}
cur->pos = position;
}
/**
* @internal
* Remove pairs of + and - formats and also remove formats without + or -
* i.e formats that pair to themselves. Only removes invisible formats
* that pair themselves, if you want to remove invisible formats that pair
* themselves, please first change fmt->visible to EINA_FALSE.
*
* @param o the textblock object.
* @param fmt the current format.
*/
static void
_evas_textblock_node_format_remove_matching(Efl_Canvas_Text_Data *o,
Evas_Object_Textblock_Node_Format *fmt)
{
Evas_Object_Textblock_Node_Text *tnode;
Eina_List *formats = NULL;
size_t offset = 0;
if (!fmt) return;
tnode = fmt->text_node;
do
{
Evas_Object_Textblock_Node_Format *nnode;
const char *fstr = fmt->orig_format;
nnode = _NODE_FORMAT(EINA_INLIST_GET(fmt)->next);
if (nnode)
{
offset = nnode->offset;
}
if (fmt->opener && !fmt->own_closer)
{
formats = eina_list_prepend(formats, fmt);
}
else if (fstr && !fmt->opener)
{
Evas_Object_Textblock_Node_Format *fnode;
size_t fstr_len;
fstr_len = strlen(fstr);
/* Generic popper, just pop (if there's anything to pop). */
if (formats && (((fstr[0] == '/') && !fstr[1]) || !fstr[0]))
{
fnode = eina_list_data_get(formats);
formats = eina_list_remove_list(formats, formats);
_evas_textblock_node_format_remove(o, fnode, 0);
_evas_textblock_node_format_remove(o, fmt, 0);
}
/* Find the matching format and pop it, if the matching format
* is our format, i.e the last one, pop and break. */
else
{
Eina_List *i, *next;
EINA_LIST_FOREACH_SAFE(formats, i, next, fnode)
{
if (_FORMAT_IS_CLOSER_OF(
fnode->orig_format, fstr + 1, fstr_len - 1))
{
Efl_Text_Annotate_Annotation *an = fmt->annotation;
fnode = eina_list_data_get(i);
formats = eina_list_remove_list(formats, i);
_evas_textblock_node_format_remove(o, fnode, 0);
_evas_textblock_node_format_remove(o, fmt, 0);
if (an)
{
_evas_textblock_annotation_remove(
o, an, EINA_FALSE);
}
break;
}
}
}
}
else if (!fmt->visible)
{
_evas_textblock_node_format_remove(o, fmt, 0);
}
fmt = nnode;
}
while (fmt && (offset == 0) && (fmt->text_node == tnode));
eina_list_free(formats);
}
/**
* @internal
* Add the offset (may be negative) to the first node after fmt which is
* pointing to the text node tnode or to o->format_nodes if fmt is null
* and it points to tnode.
*
* @param o the textblock object.
* @param tnode the text node the format should point to.
* @param fmt the current format.
* @param offset the offest to add (may be negative).
*/
static void
_evas_textblock_node_format_adjust_offset(Efl_Canvas_Text_Data *o,
Evas_Object_Textblock_Node_Text *tnode,
Evas_Object_Textblock_Node_Format *fmt, int offset)
{
if (fmt)
{
fmt = _NODE_FORMAT(EINA_INLIST_GET(fmt)->next);
}
else
{
fmt = o->format_nodes;
}
if (fmt && (tnode == fmt->text_node))
{
fmt->offset += offset;
}
}
/**
* @internal
* Removes a format node updating the offset of the next format node and the
* text nodes pointing to this node.
*
* @param o the textblock object.
* @param n the fromat node to remove
*/
static void
_evas_textblock_node_format_remove(Efl_Canvas_Text_Data *o, Evas_Object_Textblock_Node_Format *n, int visible_adjustment)
{
/* Update the text nodes about the change */
{
Evas_Object_Textblock_Node_Format *nnode;
nnode = _NODE_FORMAT(EINA_INLIST_GET(n)->next);
/* If there's a next node that belongs to the same text node
* and the curret node was the main one, advance the format node */
if (nnode && (nnode->text_node == n->text_node))
{
if (nnode->text_node->format_node == n)
{
nnode->text_node->format_node = nnode;
}
}
else
{
Evas_Object_Textblock_Node_Text *tnode;
/* If there's no next one update the text nodes */
nnode = _NODE_FORMAT(EINA_INLIST_GET(n)->prev);
tnode = n->text_node;
/* Even if it's not the current text_node's main node
* it can still be the next's. */
if (tnode && (tnode->format_node != n))
{
tnode = _NODE_TEXT(EINA_INLIST_GET(tnode)->next);
}
while (tnode && (tnode->format_node == n))
{
tnode->format_node = nnode;
tnode = _NODE_TEXT(EINA_INLIST_GET(tnode)->next);
}
}
}
_evas_textblock_node_format_adjust_offset(o, n->text_node, n,
n->offset - visible_adjustment);
o->format_nodes = _NODE_FORMAT(eina_inlist_remove(
EINA_INLIST_GET(o->format_nodes), EINA_INLIST_GET(n)));
_evas_textblock_node_format_free(o, n);
}
/**
* @internal
* Sets all the offsets of the format nodes between start and end in the text
* node n to 0 and sets visibility to EINA_FALSE.
* If end == -1 end means the end of the string.
* Assumes there is a prev node or the current node will be preserved.
*
* @param n the text node the positinos refer to.
* @param start the start of where to delete from.
* @param end the end of the section to delete, if end == -1 it means the end of the string.
* @returns @c EINA_TRUE if removed a PS, @c EINA_FALSE otherwise.
*/
static Eina_Bool
_evas_textblock_node_text_adjust_offsets_to_start(Efl_Canvas_Text_Data *o,
Evas_Object_Textblock_Node_Text *n, size_t start, int end)
{
Evas_Object_Textblock_Node_Format *last_node, *itr;
int use_end = 1;
int delta = 0;
int first = 1;
size_t pos = 0;
int orig_end;
itr = n->format_node;
if (!itr || (itr->text_node != n)) return EINA_FALSE;
orig_end = end;
if ((end < 0) || ((size_t) end == eina_ustrbuf_length_get(n->unicode)))
{
use_end = 0;
}
else if (end > 0)
{
/* We don't want the last one */
end--;
}
/* Find the first node after start */
while (itr && (itr->text_node == n))
{
pos += itr->offset;
if (pos >= start)
{
break;
}
itr = _NODE_FORMAT(EINA_INLIST_GET(itr)->next);
}
if (!itr || (itr->text_node != n))
{
return EINA_FALSE;
}
delta = orig_end - pos;
itr->offset -= pos - start;
while (itr && (itr->text_node == n))
{
last_node = itr;
itr = _NODE_FORMAT(EINA_INLIST_GET(itr)->next);
if (!first)
{
pos += last_node->offset;
}
/* start is negative when this gets relevant */
if (use_end && (pos > (size_t) end))
{
last_node->offset -= delta;
break;
}
delta = orig_end - pos;
if (!first)
{
last_node->offset = 0;
}
else
{
first = 0;
}
last_node->visible = EINA_FALSE;
if (!itr || (itr->text_node != n))
{
/* Remove the PS, and return since it's the end of the node */
if (_IS_PARAGRAPH_SEPARATOR(o, last_node->format))
{
_evas_textblock_node_format_remove(o, last_node, 0);
return EINA_TRUE;
}
}
}
return EINA_FALSE;
}
/**
* @internal
* Returns the first format in the range between start and end in the textblock
* n.
*
* @param o the textblock object.
* @param n the text node the positinos refer to.
* @param start the start of where to delete from.
* @param end the end of the section to delete, if end == -1 it means the end of the string.
*/
static Evas_Object_Textblock_Node_Format *
_evas_textblock_node_text_get_first_format_between(
Evas_Object_Textblock_Node_Text *n, int start, int end)
{
Evas_Object_Textblock_Node_Format *itr;
int use_end = 1;
itr = n->format_node;
if (end < 0) use_end = 0;
while (itr && (itr->text_node == n))
{
start -= itr->offset;
end -= itr->offset;
if ((end <= 0) && use_end)
{
break;
}
if (start <= 0)
{
return itr;
}
itr = _NODE_FORMAT(EINA_INLIST_GET(itr)->next);
}
return NULL;
}
/**
* Removes a text node and the corresponding format nodes.
*
* @param o the textblock objec.t
* @param n the node to remove.
*/
static void
_evas_textblock_node_text_remove(Efl_Canvas_Text_Data *o, Evas_Object_Textblock_Node_Text *n)
{
_evas_textblock_node_text_adjust_offsets_to_start(o, n, 0, -1);
o->text_nodes = _NODE_TEXT(eina_inlist_remove(
EINA_INLIST_GET(o->text_nodes), EINA_INLIST_GET(n)));
_evas_textblock_node_text_free(n);
}
/**
* @internal
* Return the position where the formats starts at.
*
* @param fmt the format to return the position of.
* @return the position of the format in the text node it points to.
*/
static size_t
_evas_textblock_node_format_pos_get(const Evas_Object_Textblock_Node_Format *fmt)
{
Evas_Object_Textblock_Node_Text *text;
Evas_Object_Textblock_Node_Format *base_format;
Evas_Object_Textblock_Node_Format *itr;
size_t position = 0;
if (!fmt) return 0;
/* Find the main format node */
text = fmt->text_node;
base_format = text->format_node;
EINA_INLIST_FOREACH(base_format, itr)
{
if (itr == fmt)
{
break;
}
position += itr->offset;
}
return position + fmt->offset;
}
EOLIAN static int
_efl_canvas_text_efl_text_cursor_cursor_position_get(Eo *eo_obj EINA_UNUSED, Efl_Canvas_Text_Data *o EINA_UNUSED, Efl_Text_Cursor_Cursor *cur)
{
ASYNC_BLOCK;
Evas_Object_Textblock_Node_Text *n;
size_t npos = 0;
if (!cur) return -1;
if (cur->obj != eo_obj) return -1;
Evas_Object_Protected_Data *obj = efl_data_scope_get(eo_obj, EFL_CANVAS_OBJECT_CLASS);
evas_object_async_block(obj);
TB_NULL_CHECK(cur->node, 0);
n = o->text_nodes;
while (n != cur->node)
{
npos += eina_ustrbuf_length_get(n->unicode);
n = _NODE_TEXT(EINA_INLIST_GET(n)->next);
}
return npos + cur->pos;
}
EAPI int
evas_textblock_cursor_pos_get(const Efl_Text_Cursor_Cursor *cur)
{
if (!cur) return -1;
return efl_text_cursor_position_get(cur->obj,
(Efl_Text_Cursor_Cursor *) cur);
}
EAPI void
evas_textblock_cursor_pos_set(Efl_Text_Cursor_Cursor *cur, int _pos)
{
Evas_Object_Textblock_Node_Text *n;
size_t pos;
if (!cur) return;
Evas_Object_Protected_Data *obj = efl_data_scope_get(cur->obj, EFL_CANVAS_OBJECT_CLASS);
evas_object_async_block(obj);
Efl_Canvas_Text_Data *o = efl_data_scope_get(cur->obj, MY_CLASS);
if (_pos < 0)
{
pos = 0;
}
else
{
pos = (size_t) _pos;
}
n = o->text_nodes;
while (n && (pos >= eina_ustrbuf_length_get(n->unicode)))
{
pos -= eina_ustrbuf_length_get(n->unicode);
n = _NODE_TEXT(EINA_INLIST_GET(n)->next);
}
if (n)
{
cur->node = n;
cur->pos = pos;
}
else if (o->text_nodes)
{
/* In case we went pass the last node, we need to put the cursor
* at the absolute end. */
Evas_Object_Textblock_Node_Text *last_n;
last_n = _NODE_TEXT(EINA_INLIST_GET(o->text_nodes)->last);
pos = eina_ustrbuf_length_get(last_n->unicode);
cur->node = last_n;
cur->pos = pos;
}
}
EOLIAN static void
_efl_canvas_text_efl_text_cursor_cursor_position_set(Eo *cur_obj, Efl_Canvas_Text_Data *o EINA_UNUSED, Efl_Text_Cursor_Cursor *cur, int _pos)
{
ASYNC_BLOCK;
evas_textblock_cursor_pos_set(cur, _pos);
efl_event_callback_legacy_call(cur_obj, EFL_CANVAS_TEXT_EVENT_CURSOR_CHANGED, NULL);
}
EAPI Eina_Bool
evas_textblock_cursor_line_set(Evas_Textblock_Cursor *cur, int line)
{
Evas_Object_Textblock_Line *ln;
if (!cur) return EINA_FALSE;
Evas_Object_Protected_Data *obj = efl_data_scope_get(cur->obj, EFL_CANVAS_OBJECT_CLASS);
evas_object_async_block(obj);
Efl_Canvas_Text_Data *o = efl_data_scope_get(cur->obj, MY_CLASS);
_relayout_if_needed(cur->obj, o);
ln = _find_layout_line_num(cur->obj, line);
if (!ln) return EINA_FALSE;
_cursor_line_first_char_get(ln, cur, o);
return EINA_TRUE;
}
EOLIAN static void
_efl_canvas_text_efl_text_cursor_cursor_line_jump_by(Eo *eo_obj EINA_UNUSED, Efl_Canvas_Text_Data *o EINA_UNUSED, Efl_Text_Cursor_Cursor *cur EINA_UNUSED, int by)
{
ASYNC_BLOCK;
int ln;
ln = evas_textblock_cursor_line_geometry_get(cur, NULL, NULL, NULL, NULL) + by;
Evas_Coord cx, cw;
Evas_Coord lx, ly, lw, lh;
int last;
evas_textblock_cursor_geometry_get(cur, &cx, NULL, &cw, NULL, NULL, EVAS_TEXTBLOCK_CURSOR_UNDER);
cx += (cw / 2);
evas_textblock_cursor_paragraph_last(cur);
last = evas_textblock_cursor_line_geometry_get(cur, NULL, NULL, NULL, NULL);
if (ln < 0)
{
evas_textblock_cursor_paragraph_first(cur);
return;
}
if (ln > last)
{
evas_textblock_cursor_paragraph_last(cur);
return;
}
if (!evas_object_textblock_line_number_geometry_get(cur->obj, ln, &lx, &ly, &lw, &lh))
return;
if (evas_textblock_cursor_char_coord_set(cur, cx, ly + (lh / 2)))
return;
evas_textblock_cursor_line_set(cur, ln);
if (cx < (lx + (lw / 2)))
{
if (ln == last) evas_textblock_cursor_paragraph_last(cur);
evas_textblock_cursor_line_char_first(cur);
}
else
{
if (ln == last)
evas_textblock_cursor_paragraph_last(cur);
else
evas_textblock_cursor_line_char_last(cur);
}
efl_event_callback_legacy_call(eo_obj, EFL_CANVAS_TEXT_EVENT_CURSOR_CHANGED, NULL);
}
EAPI int
evas_textblock_cursor_compare(const Efl_Text_Cursor_Cursor *cur1,
const Efl_Text_Cursor_Cursor *cur2)
{
Eina_Inlist *l1, *l2;
if (!cur1) return 0;
if (!cur2) return 0;
if (cur1->obj != cur2->obj) return 0;
if ((!cur1->node) || (!cur2->node)) return 0;
if (cur1->node == cur2->node)
{
if (cur1->pos < cur2->pos) return -1; /* cur1 < cur2 */
else if (cur1->pos > cur2->pos) return 1; /* cur2 < cur1 */
return 0;
}
for (l1 = EINA_INLIST_GET(cur1->node),
l2 = EINA_INLIST_GET(cur1->node); (l1) || (l2);)
{
if (l1 == EINA_INLIST_GET(cur2->node)) return 1; /* cur2 < cur 1 */
else if (l2 == EINA_INLIST_GET(cur2->node)) return -1; /* cur1 < cur 2 */
else if (!l1) return -1; /* cur1 < cur 2 */
else if (!l2) return 1; /* cur2 < cur 1 */
l1 = l1->prev;
l2 = l2->next;
}
return 0;
}
EOLIAN static int
_efl_canvas_text_efl_text_cursor_cursor_compare(Eo *eo_obj EINA_UNUSED, Efl_Canvas_Text_Data *o EINA_UNUSED,
const Efl_Text_Cursor_Cursor *cur1, const Efl_Text_Cursor_Cursor *cur2)
{
ASYNC_BLOCK;
Evas_Object_Protected_Data *obj = efl_data_scope_get(cur1->obj, EFL_CANVAS_OBJECT_CLASS);
evas_object_async_block(obj);
return evas_textblock_cursor_compare(cur1, cur2);
}
EAPI Eina_Bool
evas_textblock_cursor_equal(const Evas_Textblock_Cursor *cur1,
const Evas_Textblock_Cursor *cur2)
{
if (!cur1->obj) return EINA_FALSE;
return efl_text_cursor_equal(cur1->obj, cur1, cur2);
}
EOLIAN static Eina_Bool
_efl_canvas_text_efl_text_cursor_cursor_equal(Eo *eo_obj EINA_UNUSED, Efl_Canvas_Text_Data *o EINA_UNUSED, const Efl_Text_Cursor_Cursor *cur, const Efl_Text_Cursor_Cursor *cur2)
{
ASYNC_BLOCK;
Evas_Object_Protected_Data *obj = efl_data_scope_get(eo_obj, EFL_CANVAS_OBJECT_CLASS);
evas_object_async_block(obj);
return ((cur->node == cur2->node) && (cur->pos == cur2->pos));
}
EAPI void
evas_textblock_cursor_copy(const Evas_Textblock_Cursor *cur_src, Efl_Text_Cursor_Cursor *cur_dest)
{
if (!cur_src || !cur_dest) return;
efl_text_cursor_copy(cur_src->obj, cur_dest, cur_src);
}
static void
_evas_textblock_cursor_copy(Evas_Textblock_Cursor *dst, const Efl_Text_Cursor_Cursor *src)
{
if (!src) return;
if (!dst) return;
if (src->obj != dst->obj)
{
ERR("Tried copying a cursor from the wrong object");
return;
}
dst->pos = src->pos;
dst->node = src->node;
}
EOLIAN static void
_efl_canvas_text_efl_text_cursor_cursor_copy(Eo *obj EINA_UNUSED, Efl_Canvas_Text_Data *o EINA_UNUSED,
Efl_Text_Cursor_Cursor *dst, const Efl_Text_Cursor_Cursor *src)
{
ASYNC_BLOCK;
if (!efl_text_cursor_equal(obj, dst, src))
{
_evas_textblock_cursor_copy(dst, src);
efl_event_callback_legacy_call(obj, EFL_CANVAS_TEXT_EVENT_CURSOR_CHANGED, NULL);
}
}
/* text controls */
/**
* @internal
* Free a text node. Shouldn't be used usually, it's better to use
* @ref _evas_textblock_node_text_remove for most cases .
*
* @param n the text node to free
* @see _evas_textblock_node_text_remove
*/
static void
_evas_textblock_node_text_free(Evas_Object_Textblock_Node_Text *n)
{
if (!n) return;
eina_ustrbuf_free(n->unicode);
if (n->utf8)
free(n->utf8);
if (n->par)
n->par->text_node = NULL;
free(n);
}
/**
* @internal
* Create a new text node
*
* @return the new text node.
*/
static Evas_Object_Textblock_Node_Text *
_evas_textblock_node_text_new(void)
{
Evas_Object_Textblock_Node_Text *n;
n = calloc(1, sizeof(Evas_Object_Textblock_Node_Text));
n->unicode = eina_ustrbuf_new();
/* We want to layout each paragraph at least once. */
n->dirty = EINA_TRUE;
n->is_new = EINA_TRUE;
return n;
}
/**
* @internal
* Break a paragraph. This does not add a PS but only splits the paragraph
* where a ps was just added!
*
* @param cur the cursor to break at.
* @param fnode the format node of the PS just added.
* @return Returns no value.
*/
static void
_evas_textblock_cursor_break_paragraph(Efl_Text_Cursor_Cursor *cur,
Evas_Object_Textblock_Node_Format *fnode,
Eina_Bool legacy)
{
Evas_Object_Textblock_Node_Text *n;
if (!cur) return;
Efl_Canvas_Text_Data *o = efl_data_scope_get(cur->obj, MY_CLASS);
n = _evas_textblock_node_text_new();
o->text_nodes = _NODE_TEXT(eina_inlist_append_relative(
EINA_INLIST_GET(o->text_nodes),
EINA_INLIST_GET(n),
cur->node ? EINA_INLIST_GET(cur->node) : NULL));
/* Handle text and format changes. */
if (cur->node)
{
Evas_Object_Textblock_Node_Format *nnode;
size_t len, start;
const Eina_Unicode *text;
if (legacy)
{
/* If there was a format node in the delete range,
* make it our format and update the text_node fields,
* otherwise, use the paragraph separator
* of the previous paragraph. */
nnode = _NODE_FORMAT(EINA_INLIST_GET(fnode)->next);
if (nnode && (nnode->text_node == cur->node))
{
n->format_node = nnode;
nnode->offset--; /* We don't have to take the replacement char
into account anymore */
while (nnode && (nnode->text_node == cur->node))
{
nnode->text_node = n;
nnode = _NODE_FORMAT(EINA_INLIST_GET(nnode)->next);
}
}
else
{
n->format_node = fnode;
}
}
else
{
n->format_node = fnode;
}
start = cur->pos;
if (legacy)
{
/* cur->pos now points to the PS, move after. */
start++;
}
len = eina_ustrbuf_length_get(cur->node->unicode) - start;
if (len > 0)
{
text = eina_ustrbuf_string_get(cur->node->unicode);
eina_ustrbuf_append_length(n->unicode, text + start, len);
eina_ustrbuf_remove(cur->node->unicode, start, start + len);
cur->node->dirty = EINA_TRUE;
}
}
else if (!cur->node)
{
fnode = o->format_nodes;
if (fnode)
{
fnode = _NODE_FORMAT(EINA_INLIST_GET(fnode)->last);
}
n->format_node = fnode;
}
}
/**
* @internal
* Set the node and offset of all the curs after cur.
*
* @param cur the cursor.
* @param n the current textblock node.
* @param new_node the new node to set.
*/
static void
_evas_textblock_cursors_set_node(Efl_Canvas_Text_Data *o,
const Evas_Object_Textblock_Node_Text *n,
Evas_Object_Textblock_Node_Text *new_node)
{
Eina_List *l;
Efl_Text_Cursor_Cursor *cur = o->cursor;
Efl_Text_Cursor_Cursor *data;
if (n == cur->node)
{
cur->pos = 0;
cur->node = new_node;
cur->changed = EINA_TRUE;
}
EINA_LIST_FOREACH(o->cursors, l, data)
{
if (n == data->node)
{
data->pos = 0;
data->node = new_node;
data->changed = EINA_TRUE;
}
}
}
static inline void
_cursor_update_offset(Efl_Text_Cursor_Cursor *cur, Efl_Canvas_Text_Data *o,
const Evas_Object_Textblock_Node_Text *n, size_t start, int offset)
{
if ((n == cur->node) &&
(cur->pos > start))
{
if ((offset < 0) && (cur->pos <= (size_t) (-1 * offset)))
{
cur->pos = 0;
}
else
{
cur->pos += offset;
}
cur->changed = EINA_TRUE;
}
else if (!cur->node)
{
cur->node = o->text_nodes;
cur->pos = 0;
cur->changed = EINA_TRUE;
}
}
/**
* @internal
* Update the offset of all the cursors after cur.
*
* @param cur the cursor.
* @param n the current textblock node.
* @param start the starting pos.
* @param offset how much to adjust (can be negative).
*/
static void
_evas_textblock_cursors_update_offset(const Efl_Text_Cursor_Cursor *cur,
const Evas_Object_Textblock_Node_Text *n,
size_t start, int offset)
{
Eina_List *l;
Efl_Text_Cursor_Cursor *ocur;
Efl_Canvas_Text_Data *o = efl_data_scope_get(cur->obj, MY_CLASS);
ocur = o->cursor;
if (cur != ocur)
{
_cursor_update_offset(ocur, o, n, start, offset);
}
EINA_LIST_FOREACH(o->cursors, l, ocur)
{
if (ocur != cur)
{
_cursor_update_offset(ocur, o, n, start, offset);
}
}
}
/**
* @internal
* Mark that the textblock has changed.
*
* @param o the textblock object.
* @param obj the evas object.
*/
static void
_evas_textblock_changed(Efl_Canvas_Text_Data *o, Evas_Object *eo_obj)
{
Evas_Object_Protected_Data *obj = efl_data_scope_get(eo_obj, EFL_CANVAS_OBJECT_CLASS);
Eina_List *l;
Efl_Text_Cursor_Cursor *data_obj;
LYDBG("ZZ: invalidate 1 %p\n", eo_obj);
o->formatted.valid = 0;
o->native.valid = 0;
o->content_changed = 1;
if (o->markup_text)
{
eina_stringshare_del(o->markup_text);
o->markup_text = NULL;
}
// FIXME: emit ONCE after this following checks
_cursor_emit_if_changed(o->cursor);
EINA_LIST_FOREACH(o->cursors, l, data_obj)
{
_cursor_emit_if_changed(data_obj);
}
evas_object_change(eo_obj, obj);
}
static void
_evas_textblock_invalidate_all(Efl_Canvas_Text_Data *o)
{
Evas_Object_Textblock_Node_Text *n;
EINA_INLIST_FOREACH(o->text_nodes, n)
{
n->dirty = EINA_TRUE;
}
}
static int
_evas_textblock_cursor_text_append(Efl_Text_Cursor_Cursor *cur, const char *_text)
{
Evas_Object_Textblock_Node_Text *n;
Evas_Object_Textblock_Node_Format *fnode = NULL;
Eina_Unicode *text;
Efl_Text_Cursor_Cursor *main_cur;
int len = 0;
if (!cur) return 0;
Evas_Object_Protected_Data *obj = efl_data_scope_get(cur->obj, EFL_CANVAS_OBJECT_CLASS);
evas_object_async_block(obj);
text = eina_unicode_utf8_to_unicode(_text, &len);
Efl_Canvas_Text_Data *o = efl_data_scope_get(cur->obj, MY_CLASS);
n = cur->node;
if (n)
{
Evas_Object_Textblock_Node_Format *nnode;
fnode = _evas_textblock_cursor_node_format_before_or_at_pos_get(cur);
fnode = _evas_textblock_node_format_last_at_off(fnode);
/* find the node after the current in the same paragraph
* either we find one and then take the next, or we try to get
* the first for the paragraph which must be after our position */
if (fnode)
{
if (!_evas_textblock_cursor_format_is_visible_get(cur))
{
nnode = _NODE_FORMAT(EINA_INLIST_GET(fnode)->next);
if (nnode && (nnode->text_node == n))
{
fnode = nnode;
}
else
{
fnode = NULL;
}
}
}
else
{
fnode = n->format_node;
}
}
else if (o->text_nodes)
{
n = cur->node = o->text_nodes;
cur->pos = 0;
cur->changed = EINA_TRUE;
}
else
{
n = _evas_textblock_node_text_new();
o->text_nodes = _NODE_TEXT(eina_inlist_append(
EINA_INLIST_GET(o->text_nodes),
EINA_INLIST_GET(n)));
cur->node = n;
cur->changed = EINA_TRUE;
}
eina_ustrbuf_insert_length(n->unicode, text, len, cur->pos);
/* Advance the formats */
if (fnode && (fnode->text_node == cur->node))
fnode->offset += len;
/* Update all the cursors after our position. */
_evas_textblock_cursors_update_offset(cur, cur->node, cur->pos, len);
_evas_textblock_changed(o, cur->obj);
n->dirty = EINA_TRUE;
free(text);
main_cur = o->cursor;
if (!main_cur->node)
main_cur->node = o->text_nodes;
return len;
}
EAPI int
evas_textblock_cursor_text_append(Evas_Textblock_Cursor *cur, const char *_text)
{
return _evas_textblock_cursor_text_append(cur, _text);
}
static int
_evas_textblock_cursor_text_prepend(Efl_Text_Cursor_Cursor *cur, const char *_text)
{
int len;
/*append is essentially prepend without advancing */
if (!cur) return 0;
Evas_Object_Protected_Data *obj = efl_data_scope_get(cur->obj, EFL_CANVAS_OBJECT_CLASS);
evas_object_async_block(obj);
len = _evas_textblock_cursor_text_append(cur, _text);
if (len == 0) return 0;
cur->pos += len; /*Advance */
return len;
}
EAPI int
evas_textblock_cursor_text_prepend(Efl_Text_Cursor_Cursor *cur, const char *_text)
{
return _evas_textblock_cursor_text_prepend(cur, _text);
}
EOLIAN static int
_efl_canvas_text_efl_text_cursor_cursor_text_insert(Eo *eo_obj,
Efl_Canvas_Text_Data *o,
Efl_Text_Cursor_Cursor *cur, const char *_text)
{
ASYNC_BLOCK;
int len = _efl_canvas_text_cursor_text_append(cur, _text);
_evas_textblock_changed(o, eo_obj);
efl_event_callback_call(eo_obj, EFL_CANVAS_TEXT_EVENT_CHANGED, NULL);
return len;
}
/**
* @internal
* Free a format node
*
* @param o the textblock object
* @param n the format node to free
*/
static void
_evas_textblock_node_format_free(Efl_Canvas_Text_Data *o,
Evas_Object_Textblock_Node_Format *n)
{
if (!n) return;
eina_stringshare_del(n->format);
eina_stringshare_del(n->orig_format);
if (n->anchor == ANCHOR_ITEM)
o->anchors_item = eina_list_remove(o->anchors_item, n);
else if (n->anchor == ANCHOR_A)
o->anchors_a = eina_list_remove(o->anchors_a, n);
free(n);
}
/**
* @internal
* Create a new format node.
*
* @param format the text to create the format node from.
* @param o the textblock object.
* @return Returns the new format node
*/
static Evas_Object_Textblock_Node_Format *
_evas_textblock_node_format_new(Efl_Canvas_Text_Data *o, const char *_format,
Eina_Bool is_item)
{
Evas_Object_Textblock_Node_Format *n;
const char *format = _format;
const char *pre_stripped_format = NULL;
n = calloc(1, sizeof(Evas_Object_Textblock_Node_Format));
/* Create orig_format and format */
if (format[0] == '<')
{
const char *match;
size_t format_len;
format++; /* Advance after '<' */
format_len = strlen(format);
if ((format_len > 0) && format[format_len - 1] == '>')
{
format_len--; /* We don't care about '>' */
n->orig_format = eina_stringshare_add_length(format, format_len);
/* Check if it closes itself, i.e. one of the following:
* 1. Ends with a "/" e.g. "<my_tag/>"
* 2. Is a paragraph separator */
/* Skip the </> case. */
if (format_len > 1)
{
if (format[format_len - 1] == '/')
{
format_len--; /* We don't care about '/' */
n->own_closer = EINA_TRUE;
}
else if (format_len == 2)
{
char tmp[format_len + 1];
strncpy(tmp, format, format_len);
tmp[format_len] = '\0';
if (_IS_PARAGRAPH_SEPARATOR(o, tmp))
{
n->own_closer = EINA_TRUE;
}
}
}
}
match = _textblock_format_node_from_style_tag(o, n, format, format_len);
if (match)
{
pre_stripped_format = match;
}
else
{
if (format[0] == '/')
{
format++;
format_len--;
}
else
{
n->opener = EINA_TRUE;
}
}
if (!pre_stripped_format)
pre_stripped_format = n->orig_format;
}
/* Just use as is, it's a special format. */
else
{
const char *tmp = format;
if (format[0] != '-')
{
n->opener = EINA_TRUE;
if (format[0] != '+')
{
n->own_closer = EINA_TRUE;
}
}
if ((*tmp == '+') || (*tmp == '-'))
{
tmp++;
while (*tmp == ' ') tmp++;
}
n->orig_format = eina_stringshare_add(tmp);
pre_stripped_format = n->orig_format;
}
/* Strip format */
{
const char *tmp = pre_stripped_format;
int len = strlen(tmp);
if ((*tmp == '+') || (*tmp == '-'))
{
len--;
tmp++;
while (*tmp == ' ') tmp++;
}
if (tmp[len - 1] == '/')
{
len--;
}
else if (tmp[0] == '/')
{
len--;
tmp++;
}
n->format = eina_stringshare_add_length(tmp, len);
}
format = n->format;
_evas_textblock_format_is_visible(n, format, is_item);
if (n->anchor == ANCHOR_A)
{
o->anchors_a = eina_list_append(o->anchors_a, n);
}
else if (n->anchor == ANCHOR_ITEM)
{
o->anchors_item = eina_list_append(o->anchors_item, n);
}
n->is_new = EINA_TRUE;
return n;
}
static Eina_Bool
_evas_textblock_cursor_is_at_the_end(const Efl_Text_Cursor_Cursor *cur)
{
const Eina_Unicode *text;
if (!cur) return EINA_FALSE;
TB_NULL_CHECK(cur->node, EINA_FALSE);
text = eina_ustrbuf_string_get(cur->node->unicode);
if ((cur->pos - 1) > eina_ustrbuf_length_get(cur->node->unicode)) return EINA_FALSE;
return ((text[cur->pos] == 0) && (!EINA_INLIST_GET(cur->node)->next)) ?
EINA_TRUE : EINA_FALSE;
}
static Eina_Bool
_evas_textblock_cursor_format_append(Efl_Text_Cursor_Cursor *cur,
const char *format, Evas_Object_Textblock_Node_Format **_fnode,
Eina_Bool is_item)
{
Evas_Object_Textblock_Node_Format *n;
Eina_Bool is_visible;
if (!cur) return EINA_FALSE;
Evas_Object_Protected_Data *obj = efl_data_scope_get(cur->obj, EFL_CANVAS_OBJECT_CLASS);
evas_object_async_block(obj);
if ((!format) || (format[0] == 0)) return EINA_FALSE;
Efl_Canvas_Text_Data *o = efl_data_scope_get(cur->obj, MY_CLASS);
/* We should always have at least one text node */
if (!o->text_nodes)
{
_evas_textblock_cursor_text_prepend(cur, "");
}
n = _evas_textblock_node_format_new(o, format, is_item);
is_visible = n->visible;
format = n->format;
if (!cur->node)
{
o->format_nodes = _NODE_FORMAT(eina_inlist_append(
EINA_INLIST_GET(o->format_nodes),
EINA_INLIST_GET(n)));
cur->pos = 0;
n->text_node = (EINA_INLIST_GET(n)->prev) ?
_NODE_FORMAT(EINA_INLIST_GET(n)->prev)->text_node :
o->text_nodes;
cur->node = n->text_node;
cur->changed = EINA_TRUE;
}
else
{
Evas_Object_Textblock_Node_Format *fmt;
fmt = _evas_textblock_cursor_node_format_before_or_at_pos_get(cur);
n->text_node = cur->node;
if (!fmt)
{
o->format_nodes = _NODE_FORMAT(eina_inlist_prepend(
EINA_INLIST_GET(o->format_nodes),
EINA_INLIST_GET(n)));
n->offset = cur->pos;
}
else
{
fmt = _evas_textblock_node_format_last_at_off(fmt);
if (_evas_textblock_cursor_format_is_visible_get(cur))
{
o->format_nodes = _NODE_FORMAT(eina_inlist_prepend_relative(
EINA_INLIST_GET(o->format_nodes),
EINA_INLIST_GET(n),
EINA_INLIST_GET(fmt)
));
n->offset = fmt->offset;
if (fmt->text_node->format_node == fmt)
{
fmt->text_node->format_node = n;
}
}
else
{
o->format_nodes = _NODE_FORMAT(eina_inlist_append_relative(
EINA_INLIST_GET(o->format_nodes),
EINA_INLIST_GET(n),
EINA_INLIST_GET(fmt)
));
if (fmt->text_node != cur->node)
{
n->offset = cur->pos;
}
else
{
n->offset = cur->pos -
_evas_textblock_node_format_pos_get(fmt);
}
}
}
/* Adjust differently if we insert a format char */
if (is_visible)
{
_evas_textblock_node_format_adjust_offset(o, cur->node, n,
-(n->offset - 1));
}
else
{
_evas_textblock_node_format_adjust_offset(o, cur->node, n,
-n->offset);
}
if (!fmt || (fmt->text_node != cur->node))
{
cur->node->format_node = n;
}
}
if (is_visible && cur->node)
{
Eina_Unicode insert_char;
/* Insert a visual representation according to the type of the
format */
if (_IS_PARAGRAPH_SEPARATOR(o, format))
insert_char = _PARAGRAPH_SEPARATOR;
else if (_IS_LINE_SEPARATOR(format))
insert_char = _NEWLINE;
else if (_IS_TAB(format))
insert_char = _TAB;
else
insert_char = _REPLACEMENT_CHAR;
eina_ustrbuf_insert_char(cur->node->unicode, insert_char, cur->pos);
/* Advance all the cursors after our cursor */
_evas_textblock_cursors_update_offset(cur, cur->node, cur->pos, 1);
if (_IS_PARAGRAPH_SEPARATOR(o, format))
{
_evas_textblock_cursor_break_paragraph(cur, n, EINA_TRUE);
}
else
{
/* Handle visible format nodes here */
cur->node->dirty = EINA_TRUE;
n->is_new = EINA_FALSE;
}
}
else
{
o->format_changed = EINA_TRUE;
}
_evas_textblock_changed(o, cur->obj);
Efl_Text_Cursor_Cursor *ocur = o->cursor;
if (!ocur->node)
ocur->node = o->text_nodes;
if (_fnode) *_fnode = n;
return is_visible;
}
EAPI Eina_Bool
evas_textblock_cursor_format_append(Evas_Textblock_Cursor *cur, const char *format)
{
return _evas_textblock_cursor_format_append(cur, format, NULL, EINA_FALSE);
}
static Eina_Bool
_evas_textblock_cursor_format_prepend(Efl_Text_Cursor_Cursor *cur, const char *format)
{
Eina_Bool is_visible;
if (!cur) return EINA_FALSE;
Evas_Object_Protected_Data *obj = efl_data_scope_get(cur->obj, EFL_CANVAS_OBJECT_CLASS);
evas_object_async_block(obj);
/* append is essentially prepend without advancing */
is_visible = _evas_textblock_cursor_format_append(cur, format, NULL, EINA_FALSE);
if (is_visible)
{
/* Advance after the replacement char */
evas_textblock_cursor_char_next(cur);
}
return is_visible;
}
EAPI Eina_Bool
evas_textblock_cursor_format_prepend(Evas_Textblock_Cursor *cur, const char *format)
{
return _evas_textblock_cursor_format_prepend(cur, format);
}
EAPI void
evas_textblock_cursor_char_delete(Efl_Text_Cursor_Cursor *cur)
{
Evas_Object_Textblock_Node_Text *n, *n2;
const Eina_Unicode *text;
int chr, ind, ppos;
if (!cur || !cur->node) return;
Evas_Object_Protected_Data *obj = efl_data_scope_get(cur->obj, EFL_CANVAS_OBJECT_CLASS);
evas_object_async_block(obj);
Efl_Canvas_Text_Data *o = efl_data_scope_get(cur->obj, MY_CLASS);
n = cur->node;
text = eina_ustrbuf_string_get(n->unicode);
ind = cur->pos;
if (text[ind])
chr = text[ind++];
else
chr = 0;
if (chr == 0) return;
ppos = cur->pos;
eina_ustrbuf_remove(n->unicode, cur->pos, ind);
/* Remove a format node if needed, and remove the char only if the
* fmt node is not visible */
{
Eina_Bool should_merge = EINA_FALSE;
Evas_Object_Textblock_Node_Format *fmt, *fmt2;
fmt = _evas_textblock_cursor_node_format_at_pos_get(cur);
if (fmt)
{
const char *format = NULL;
Evas_Object_Textblock_Node_Format *last_fmt;
/* If there's a PS it must be the last become it delimits paragraphs */
last_fmt = _evas_textblock_node_format_last_at_off(fmt);
format = last_fmt->format;
if (format && _IS_PARAGRAPH_SEPARATOR(o, format))
{
/* If it was a paragraph separator, we should merge the
* current with the next, there must be a next. */
should_merge = EINA_TRUE;
}
/* If a singular, mark as invisible, so we'll delete it. */
if (!format || last_fmt->own_closer)
{
last_fmt->visible = EINA_FALSE;
}
}
fmt2 = _evas_textblock_cursor_node_format_before_or_at_pos_get(cur);
fmt2 = _evas_textblock_node_format_last_at_off(fmt2);
_evas_textblock_node_format_adjust_offset(o, cur->node, fmt2,
-(ind - cur->pos));
if (should_merge)
{
_evas_textblock_cursor_nodes_merge(cur);
}
_evas_textblock_node_format_remove_matching(o, fmt);
}
if (cur->pos == eina_ustrbuf_length_get(n->unicode))
{
n2 = _NODE_TEXT(EINA_INLIST_GET(n)->next);
if (n2)
{
cur->node = n2;
cur->pos = 0;
cur->changed = EINA_TRUE;
}
}
_evas_textblock_cursors_update_offset(cur, n, ppos, -(ind - ppos));
_evas_textblock_changed(o, cur->obj);
cur->node->dirty = EINA_TRUE;
}
EOLIAN static void
_efl_canvas_text_efl_text_cursor_cursor_char_delete(Eo *eo_obj, Efl_Canvas_Text_Data *o EINA_UNUSED, Efl_Text_Cursor_Cursor *cur)
{
ASYNC_BLOCK;
evas_textblock_cursor_char_delete(cur);
efl_event_callback_call(eo_obj, EFL_CANVAS_TEXT_EVENT_CHANGED, NULL);
}
EAPI void
evas_textblock_cursor_range_delete(Efl_Text_Cursor_Cursor *cur1, Efl_Text_Cursor_Cursor *cur2)
{
if (!cur1) return;
efl_canvas_text_range_delete(cur1->obj, cur1, cur2);
}
EOLIAN static void
_efl_canvas_text_range_delete(Eo *eo_obj EINA_UNUSED, Efl_Canvas_Text_Data *pd EINA_UNUSED,
Efl_Text_Cursor_Cursor *cur1, Evas_Textblock_Cursor *cur2)
{
Evas_Object_Textblock_Node_Format *fnode = NULL;
Evas_Object_Textblock_Node_Text *n1, *n2;
Eina_Bool should_merge = EINA_FALSE, reset_cursor = EINA_FALSE;
if (!cur1 || !cur1->node) return;
if (!cur2 || !cur2->node) return;
if (cur1->obj != cur2->obj) return;
Evas_Object_Protected_Data *obj = efl_data_scope_get(cur1->obj, EFL_CANVAS_OBJECT_CLASS);
evas_object_async_block(obj);
Efl_Canvas_Text_Data *o = efl_data_scope_get(cur1->obj, MY_CLASS);
if (evas_textblock_cursor_compare(cur1, cur2) > 0)
{
Efl_Text_Cursor_Cursor *tc;
tc = cur1;
cur1 = cur2;
cur2 = tc;
}
n1 = cur1->node;
n2 = cur2->node;
if ((evas_textblock_cursor_compare(o->cursor, cur1) >= 0) &&
(evas_textblock_cursor_compare(cur2, o->cursor) >= 0))
{
reset_cursor = EINA_TRUE;
}
if (n1 == n2)
{
if ((cur1->pos == 0) &&
(cur2->pos == eina_ustrbuf_length_get(n1->unicode)))
{
/* Remove the whole node. */
Evas_Object_Textblock_Node_Text *n =
_NODE_TEXT(EINA_INLIST_GET(n1)->next);
if (n)
{
should_merge = EINA_TRUE;
}
_evas_textblock_node_text_adjust_offsets_to_start(o, n1, cur1->pos, -1);
}
else
{
should_merge = _evas_textblock_node_text_adjust_offsets_to_start(o,
n1, cur1->pos, cur2->pos);
}
eina_ustrbuf_remove(n1->unicode, cur1->pos, cur2->pos);
_evas_textblock_cursors_update_offset(cur1, cur1->node, cur1->pos, - (cur2->pos - cur1->pos));
}
else
{
Evas_Object_Textblock_Node_Text *n;
int len;
n = _NODE_TEXT(EINA_INLIST_GET(n1)->next);
/* Remove all the text nodes between */
while (n && (n != n2))
{
Evas_Object_Textblock_Node_Text *nnode;
nnode = _NODE_TEXT(EINA_INLIST_GET(n)->next);
_evas_textblock_nodes_merge(o, n1);
n = nnode;
}
/* After we merged all the nodes, move the formats to the start of
* the range. */
_evas_textblock_node_text_adjust_offsets_to_start(o, n1, cur1->pos, -1);
should_merge = _evas_textblock_node_text_adjust_offsets_to_start(o, n2,
0, cur2->pos);
/* Remove the formats and the strings in the first and last nodes */
len = eina_ustrbuf_length_get(n1->unicode);
eina_ustrbuf_remove(n1->unicode, cur1->pos, len);
eina_ustrbuf_remove(n2->unicode, 0, cur2->pos);
/* Merge the nodes because we removed the PS */
_evas_textblock_cursors_update_offset(cur1, cur1->node, cur1->pos,
-cur1->pos);
_evas_textblock_cursors_update_offset(cur2, cur2->node, 0, -cur2->pos);
cur2->pos = 0;
cur2->changed = EINA_TRUE;
_evas_textblock_nodes_merge(o, n1);
}
fnode = _evas_textblock_cursor_node_format_at_pos_get(cur1);
n1 = cur1->node;
n2 = cur2->node;
n1->dirty = n2->dirty = EINA_TRUE;
if (should_merge)
{
/* We call this function instead of the cursor one because we already
* updated the cursors */
_evas_textblock_nodes_merge(o, n1);
}
_evas_textblock_node_format_remove_matching(o, fnode);
evas_textblock_cursor_copy(cur1, cur2);
if (reset_cursor)
evas_textblock_cursor_copy(cur1, o->cursor);
_evas_textblock_changed(o, cur1->obj);
efl_event_callback_call(eo_obj, EFL_CANVAS_TEXT_EVENT_CHANGED, NULL);
}
EOLIAN static Eina_Unicode
_efl_canvas_text_efl_text_cursor_cursor_content_get(Eo *obj EINA_UNUSED, Efl_Canvas_Text_Data *o EINA_UNUSED,
const Efl_Text_Cursor_Cursor *cur)
{
ASYNC_BLOCK;
return eina_ustrbuf_string_get(cur->node->unicode)[cur->pos];
}
EAPI char *
evas_textblock_cursor_content_get(const Evas_Textblock_Cursor *cur)
{
if (!cur || !cur->node) return NULL;
Evas_Object_Protected_Data *obj = efl_data_scope_get(cur->obj, EFL_CANVAS_OBJECT_CLASS);
evas_object_async_block(obj);
if (evas_textblock_cursor_format_is_visible_get(cur))
{
Eina_Strbuf *buf;
Evas_Object_Textblock_Node_Format *fnode;
char *ret;
fnode = _evas_textblock_node_visible_at_pos_get(
evas_textblock_cursor_format_get(cur));
buf = eina_strbuf_new();
_markup_get_format_append(buf, fnode);
ret = eina_strbuf_string_steal(buf);
eina_strbuf_free(buf);
return ret;
}
else
{
Eina_Unicode buf[2];
char *s;
buf[0] = efl_text_cursor_content_get(cur->obj, cur);
buf[1] = 0;
s = eina_unicode_unicode_to_utf8(buf, NULL);
return s;
}
}
static char *
_evas_textblock_cursor_range_text_markup_get(const Efl_Text_Cursor_Cursor *cur1, const Efl_Text_Cursor_Cursor *_cur2)
{
Evas_Object_Textblock_Node_Text *tnode;
Eina_Strbuf *buf;
Efl_Text_Cursor_Cursor *cur2;
buf = eina_strbuf_new();
if (evas_textblock_cursor_compare(cur1, _cur2) > 0)
{
const Efl_Text_Cursor_Cursor *tc;
tc = cur1;
cur1 = _cur2;
_cur2 = tc;
}
/* Work on a local copy of the cur */
cur2 = alloca(sizeof(Efl_Text_Cursor_Cursor));
cur2->obj = _cur2->obj;
_evas_textblock_cursor_copy(cur2, _cur2);
/* Parse the text between the cursors. */
for (tnode = cur1->node ; tnode ;
tnode = _NODE_TEXT(EINA_INLIST_GET(tnode)->next))
{
Evas_Object_Textblock_Node_Format *fnode;
Eina_Unicode *text_base, *text;
int cur1_pos = 0, cur2_pos = -1;
int off = 0;
text_base = text =
eina_unicode_strndup(eina_ustrbuf_string_get(tnode->unicode),
eina_ustrbuf_length_get(tnode->unicode));
if (tnode == cur2->node)
cur2_pos = cur2->pos;
if (tnode == cur1->node)
cur1_pos = cur1->pos;
fnode = _evas_textblock_node_text_get_first_format_between(tnode,
cur1_pos, cur2_pos);
/* Init the offset so the first one will count starting from cur1->pos
* and not the previous format node */
if (tnode == cur1->node)
{
if (fnode)
{
off = _evas_textblock_node_format_pos_get(fnode) -
cur1->pos - fnode->offset;
}
text += cur1->pos;
}
else
{
off = 0;
}
while (fnode && (fnode->text_node == tnode))
{
Eina_Unicode tmp_ch;
off += fnode->offset;
if ((tnode == cur2->node) &&
((size_t) (text - text_base + off) >= cur2->pos))
{
break;
}
/* No need to skip on the first run */
tmp_ch = text[off];
text[off] = 0; /* Null terminate the part of the string */
_markup_get_text_append(buf, text);
_markup_get_format_append(buf, fnode);
text[off] = tmp_ch; /* Restore the char */
text += off;
if (fnode->visible)
{
off = -1;
text++;
}
else
{
off = 0;
}
fnode = _NODE_FORMAT(EINA_INLIST_GET(fnode)->next);
}
/* If we got to the last node, stop and add the rest outside */
if (cur2->node == tnode)
{
/* Add the rest, skip replacement */
/* Don't go past the second cursor pos */
text_base[cur2->pos] = '\0';
_markup_get_text_append(buf, text);
free(text_base);
break;
}
else
{
/* Add the rest, skip replacement */
_markup_get_text_append(buf, text);
free(text_base);
}
}
/* return the string */
{
char *ret;
ret = eina_strbuf_string_steal(buf);
eina_strbuf_free(buf);
return ret;
}
}
static char *
_evas_textblock_cursor_range_text_plain_get(const Efl_Text_Cursor_Cursor *cur1, const Efl_Text_Cursor_Cursor *_cur2)
{
Eina_UStrbuf *buf;
Evas_Object_Textblock_Node_Text *n1, *n2;
Efl_Text_Cursor_Cursor *cur2;
buf = eina_ustrbuf_new();
if (evas_textblock_cursor_compare(cur1, _cur2) > 0)
{
const Efl_Text_Cursor_Cursor *tc;
tc = cur1;
cur1 = _cur2;
_cur2 = tc;
}
n1 = cur1->node;
n2 = _cur2->node;
/* Work on a local copy of the cur */
cur2 = alloca(sizeof(Efl_Text_Cursor_Cursor));
cur2->obj = _cur2->obj;
_evas_textblock_cursor_copy(cur2, _cur2);
if (n1 == n2)
{
const Eina_Unicode *tmp;
tmp = eina_ustrbuf_string_get(n1->unicode);
eina_ustrbuf_append_length(buf, tmp + cur1->pos, cur2->pos - cur1->pos);
}
else
{
const Eina_Unicode *tmp;
tmp = eina_ustrbuf_string_get(n1->unicode);
eina_ustrbuf_append(buf, tmp + cur1->pos);
n1 = _NODE_TEXT(EINA_INLIST_GET(n1)->next);
while (n1 != n2)
{
tmp = eina_ustrbuf_string_get(n1->unicode);
eina_ustrbuf_append_length(buf, tmp,
eina_ustrbuf_length_get(n1->unicode));
n1 = _NODE_TEXT(EINA_INLIST_GET(n1)->next);
}
tmp = eina_ustrbuf_string_get(n2->unicode);
eina_ustrbuf_append_length(buf, tmp, cur2->pos);
}
/* Free and return */
{
char *ret;
ret = eina_unicode_unicode_to_utf8(eina_ustrbuf_string_get(buf), NULL);
eina_ustrbuf_free(buf);
return ret;
}
}
EAPI Eina_List *
evas_textblock_cursor_range_formats_get(const Efl_Text_Cursor_Cursor *cur1, const Evas_Textblock_Cursor *cur2)
{
Evas_Object *eo_obj;
Eina_List *ret = NULL;
Evas_Object_Textblock_Node_Text *n1, *n2;
Evas_Object_Textblock_Node_Format *first, *last;
if (!cur1 || !cur1->node) return NULL;
if (!cur2 || !cur2->node) return NULL;
if (cur1->obj != cur2->obj) return NULL;
Evas_Object_Protected_Data *obj = efl_data_scope_get(cur1->obj, EFL_CANVAS_OBJECT_CLASS);
evas_object_async_block(obj);
eo_obj = cur1->obj;
TB_HEAD_RETURN(NULL);
if (evas_textblock_cursor_compare(cur1, cur2) > 0)
{
const Efl_Text_Cursor_Cursor *tc;
tc = cur1;
cur1 = cur2;
cur2 = tc;
}
n1 = cur1->node;
n2 = cur2->node;
/* FIXME: Change first and last getting to format_before_or_at_pos_get */
last = n2->format_node;
/* If n2->format_node is NULL, we don't have formats in the tb/range. */
if (!last)
return NULL;
/* If the found format is on our text node, we should go to the last
* one, otherwise, the one we found is good enough. */
if (last->text_node == n2)
{
Evas_Object_Textblock_Node_Format *fnode = last;
while (fnode && (fnode->text_node == n2))
{
last = fnode;
fnode = _NODE_FORMAT(EINA_INLIST_GET(fnode)->next);
}
}
/* If the first format node is within the range (i.e points to n1) or if
* we have other formats in the range, go through them */
first = n1->format_node;
if ((first->text_node == n1) || (first != last))
{
Evas_Object_Textblock_Node_Format *fnode = first;
/* Go to the first one in the range */
if (fnode->text_node != n1)
{
fnode = _NODE_FORMAT(EINA_INLIST_GET(fnode)->next);
}
while (fnode)
{
ret = eina_list_append(ret, fnode);
if (fnode == last)
break;
fnode = _NODE_FORMAT(EINA_INLIST_GET(fnode)->next);
}
}
return ret;
}
static char *
_evas_textblock_cursor_range_text_get(const Efl_Text_Cursor_Cursor *cur1, const Efl_Text_Cursor_Cursor *cur2, Evas_Textblock_Text_Type format)
{
if (!cur1 || !cur1->node) return NULL;
if (!cur2 || !cur2->node) return NULL;
if (cur1->obj != cur2->obj) return NULL;
Evas_Object_Protected_Data *obj;
obj = efl_data_scope_get(cur1->obj, EFL_CANVAS_OBJECT_CLASS);
evas_object_async_block(obj);
if (format == EVAS_TEXTBLOCK_TEXT_MARKUP)
return _evas_textblock_cursor_range_text_markup_get(cur1, cur2);
else if (format == EVAS_TEXTBLOCK_TEXT_PLAIN)
return _evas_textblock_cursor_range_text_plain_get(cur1, cur2);
else
return NULL; /* Not yet supported */
}
// Add to legacy api
EAPI char *
evas_textblock_cursor_range_text_get(const Efl_Text_Cursor_Cursor *cur1, const Evas_Textblock_Cursor *cur2, Evas_Textblock_Text_Type format)
{
return _evas_textblock_cursor_range_text_get(cur1, cur2, format);
}
EOLIAN static char *
_efl_canvas_text_range_text_get(Eo *eo_obj EINA_UNUSED,
Efl_Canvas_Text_Data *pd EINA_UNUSED,
const Efl_Text_Cursor_Cursor *cur1,
const Evas_Textblock_Cursor *cur2)
{
return _evas_textblock_cursor_range_text_get(cur1, cur2, EVAS_TEXTBLOCK_TEXT_PLAIN);
}
EAPI const char *
evas_textblock_cursor_paragraph_text_get(const Evas_Textblock_Cursor *cur)
{
Efl_Text_Cursor_Cursor cur1, cur2;
if (!cur) return NULL;
Evas_Object_Protected_Data *obj = efl_data_scope_get(cur->obj, EFL_CANVAS_OBJECT_CLASS);
evas_object_async_block(obj);
TB_NULL_CHECK(cur->node, NULL);
if (cur->node->utf8)
{
free(cur->node->utf8);
}
_evas_textblock_cursor_init(&cur1, cur->obj);
_evas_textblock_cursor_init(&cur2, cur->obj);
cur1.node = cur2.node = cur->node;
evas_textblock_cursor_paragraph_char_first(&cur1);
evas_textblock_cursor_paragraph_char_last(&cur2);
cur->node->utf8 = _evas_textblock_cursor_range_text_get(&cur1, &cur2,
EVAS_TEXTBLOCK_TEXT_MARKUP);
return cur->node->utf8;
}
EAPI int
evas_textblock_cursor_paragraph_text_length_get(const Evas_Textblock_Cursor *cur)
{
int len;
if (!cur) return -1;
Evas_Object_Protected_Data *obj = efl_data_scope_get(cur->obj, EFL_CANVAS_OBJECT_CLASS);
evas_object_async_block(obj);
TB_NULL_CHECK(cur->node, -1);
len = eina_ustrbuf_length_get(cur->node->unicode);
if (EINA_INLIST_GET(cur->node)->next)
return len - 1; /* Remove the paragraph separator */
else
return len;
}
EAPI const Evas_Object_Textblock_Node_Format *
evas_textblock_cursor_format_get(const Evas_Textblock_Cursor *cur)
{
if (!cur) return NULL;
Evas_Object_Protected_Data *obj = efl_data_scope_get(cur->obj, EFL_CANVAS_OBJECT_CLASS);
evas_object_async_block(obj);
TB_NULL_CHECK(cur->node, NULL);
return _evas_textblock_cursor_node_format_at_pos_get(cur);
}
EAPI const char *
evas_textblock_node_format_text_get(const Evas_Object_Textblock_Node_Format *fmt)
{
static char *ret = NULL;
char *tmp;
const char *stripped;
size_t stripped_len;
if (!fmt) return NULL;
if (ret) free(ret);
stripped = fmt->orig_format;
stripped_len = strlen(fmt->orig_format);
if (stripped[stripped_len - 1] == '/')
{
stripped_len--;
}
else if (stripped[0] == '/')
{
stripped++;
stripped_len--;
}
ret = calloc(stripped_len + 2 + 1, sizeof(char));
tmp = ret;
if (fmt->opener && !fmt->own_closer)
{
*(tmp++) = '+';
*(tmp++) = ' ';
}
else if (!fmt->opener)
{
*(tmp++) = '-';
*(tmp++) = ' ';
}
strncpy(tmp, stripped, stripped_len);
return ret;
}
static void
_evas_textblock_cursor_at_format_set(Efl_Text_Cursor_Cursor *cur,
const Evas_Object_Textblock_Node_Format *fmt)
{
if (!fmt || !cur) return;
Evas_Object_Protected_Data *obj = efl_data_scope_get(cur->obj, EFL_CANVAS_OBJECT_CLASS);
evas_object_async_block(obj);
cur->node = fmt->text_node;
cur->pos = _evas_textblock_node_format_pos_get(fmt);
}
EAPI void
evas_textblock_cursor_at_format_set(Evas_Textblock_Cursor *cur, const Evas_Object_Textblock_Node_Format *fmt)
{
_evas_textblock_cursor_at_format_set(cur, fmt);
}
static Eina_Bool
_evas_textblock_cursor_format_is_visible_get(const Efl_Text_Cursor_Cursor *cur)
{
const Eina_Unicode *text;
if (!cur) return EINA_FALSE;
Evas_Object_Protected_Data *obj = efl_data_scope_get(cur->obj, EFL_CANVAS_OBJECT_CLASS);
evas_object_async_block(obj);
TB_NULL_CHECK(cur->node, EINA_FALSE);
if (!_evas_textblock_cursor_is_format(cur)) return EINA_FALSE;
text = eina_ustrbuf_string_get(cur->node->unicode);
return EVAS_TEXTBLOCK_IS_VISIBLE_FORMAT_CHAR(text[cur->pos]);
}
EAPI Eina_Bool
evas_textblock_cursor_format_is_visible_get(const Evas_Textblock_Cursor *cur)
{
return _evas_textblock_cursor_format_is_visible_get(cur);
}
#ifdef BIDI_SUPPORT
static Evas_Object_Textblock_Line*
_find_layout_line_by_item(Evas_Object_Textblock_Paragraph *par, Evas_Object_Textblock_Item *_it)
{
Evas_Object_Textblock_Line *ln;
EINA_INLIST_FOREACH(par->lines, ln)
{
Evas_Object_Textblock_Item *it;
EINA_INLIST_FOREACH(ln->items, it)
{
if (_it == it)
return ln;
}
}
return NULL;
}
#endif
EAPI Eina_Bool
evas_textblock_cursor_geometry_bidi_get(const Efl_Text_Cursor_Cursor *cur, Evas_Coord *cx, Evas_Coord *cy, Evas_Coord *cw, Evas_Coord *ch, Evas_Coord *cx2, Evas_Coord *cy2, Evas_Coord *cw2, Evas_Coord *ch2, Evas_Textblock_Cursor_Type ctype)
{
if (!cur) return EINA_FALSE;
return efl_text_cursor_geometry_get(cur->obj, cur,
(ctype == EVAS_TEXTBLOCK_CURSOR_BEFORE) ?
EFL_TEXT_CURSOR_TYPE_BEFORE : EFL_TEXT_CURSOR_TYPE_UNDER,
cx, cy, cw, ch, cx2, cy2, cw2, ch2);
}
EOLIAN static Eina_Bool
_efl_canvas_text_efl_text_cursor_cursor_geometry_get(Eo *eo_obj EINA_UNUSED, Efl_Canvas_Text_Data *o EINA_UNUSED, const Efl_Text_Cursor_Cursor *cur, Efl_Text_Cursor_Cursor_Type ctype, Evas_Coord *cx, Evas_Coord *cy, Evas_Coord *cw, Evas_Coord *ch, Evas_Coord *cx2, Evas_Coord *cy2, Evas_Coord *cw2, Evas_Coord *ch2)
{
ASYNC_BLOCK;
if (!cur) return EINA_FALSE;
Evas_Object_Protected_Data *obj = efl_data_scope_get(cur->obj, EFL_CANVAS_OBJECT_CLASS);
evas_object_async_block(obj);
if (!_relayout_if_needed(cur->obj, o)) return EINA_FALSE;
if (ctype == EFL_TEXT_CURSOR_TYPE_UNDER)
{
evas_textblock_cursor_pen_geometry_get(cur, cx, cy, cw, ch);
return EINA_FALSE;
}
#ifdef BIDI_SUPPORT
#define IS_RTL(par) ((par) % 2)
#define IS_DIFFERENT_DIR(l1, l2) (IS_RTL(l1) != IS_RTL(l2))
else
{
Evas_Object_Textblock_Line *ln = NULL;
Evas_Object_Textblock_Item *it = NULL;
_find_layout_item_match(cur, &ln, &it);
if (ln && it)
{
if (ln->par->is_bidi)
{
if (cw) *cw = 0;
if (cw2) *cw2 = 0;
/* If we are at the start or the end of the item there's a chance
* we'll want a split cursor. */
Evas_Object_Textblock_Item *previt = NULL;
Evas_Object_Textblock_Item *it1 = NULL, *it2 = NULL;
Evas_Coord adv1 = 0, adv2 = 0;
if (cur->pos == it->text_pos)
{
EvasBiDiLevel par_level, it_level, previt_level;
_layout_update_bidi_props(o, ln->par);
par_level = *(ln->par->bidi_props->embedding_levels);
it_level = ln->par->bidi_props->embedding_levels[it->text_pos];
/* Get the logically previous item. */
{
Eina_List *itr;
Evas_Object_Textblock_Item *ititr;
EINA_LIST_FOREACH(ln->par->logical_items, itr, ititr)
{
if (ititr == it)
break;
previt = ititr;
}
if (previt)
{
previt_level = ln->par->bidi_props->embedding_levels[previt->text_pos];
}
}
if (previt && (it_level != previt_level))
{
Evas_Object_Textblock_Item *curit = NULL, *curit_opp = NULL;
EvasBiDiLevel cur_level;
if (it_level > previt_level)
{
curit = it;
curit_opp = previt;
cur_level = it_level;
}
else
{
curit = previt;
curit_opp = it;
cur_level = previt_level;
}
if (((curit == it) && (!IS_RTL(par_level))) ||
((curit == previt) && (IS_RTL(par_level))))
{
adv1 = (IS_DIFFERENT_DIR(cur_level, par_level)) ?
curit_opp->adv : 0;
adv2 = curit->adv;
}
else if (((curit == previt) && (!IS_RTL(par_level))) ||
((curit == it) && (IS_RTL(par_level))))
{
adv1 = (IS_DIFFERENT_DIR(cur_level, par_level)) ?
0 : curit->adv;
adv2 = 0;
}
if (!IS_DIFFERENT_DIR(cur_level, par_level))
curit_opp = curit;
it1 = curit_opp;
it2 = curit;
}
/* Clear the bidi props because we don't need them anymore. */
evas_bidi_paragraph_props_unref(ln->par->bidi_props);
ln->par->bidi_props = NULL;
}
/* Handling last char in line (or in paragraph).
* T.e. prev condition didn't work, so we are not standing in the beginning of item,
* but in the end of line or paragraph. */
else if (evas_textblock_cursor_eol_get(cur))
{
EvasBiDiLevel par_level, it_level;
_layout_update_bidi_props(o, ln->par);
par_level = *(ln->par->bidi_props->embedding_levels);
it_level = ln->par->bidi_props->embedding_levels[it->text_pos];
if (it_level > par_level)
{
Evas_Object_Textblock_Item *lastit = it;
if (IS_RTL(par_level)) /* RTL par*/
{
/* We know, that all the items before current are of the same or bigger embedding level.
* So search backwards for the first one. */
while (EINA_INLIST_GET(lastit)->prev)
{
lastit = _EINA_INLIST_CONTAINER(it, EINA_INLIST_GET(lastit)->prev);
}
adv1 = 0;
adv2 = it->adv;
}
else /* LTR par */
{
/* We know, that all the items after current are of bigger or same embedding level.
* So search forward for the last one. */
while (EINA_INLIST_GET(lastit)->next)
{
lastit = _EINA_INLIST_CONTAINER(it, EINA_INLIST_GET(lastit)->next);
}
adv1 = lastit->adv;
adv2 = 0;
}
it1 = lastit;
it2 = it;
}
/* Clear the bidi props because we don't need them anymore. */
evas_bidi_paragraph_props_unref(ln->par->bidi_props);
ln->par->bidi_props = NULL;
}
if (it1 && it2)
{
Evas_Object_Textblock_Line *ln1 = NULL, *ln2 = NULL;
ln1 = _find_layout_line_by_item(ln->par, it1);
if (cx) *cx = ln1->x + it1->x + adv1;
if (cy) *cy = ln1->par->y + ln1->y;
if (ch) *ch = ln1->h;
ln2 = _find_layout_line_by_item(ln->par, it2);
if (cx2) *cx2 = ln2->x + it2->x + adv2;
if (cy2) *cy2 = ln2->par->y + ln2->y;
if (ch2) *ch2 = ln2->h;
return EINA_TRUE;
}
}
}
}
#undef IS_DIFFERENT_DIR
#undef IS_RTL
#else
(void) cx2;
(void) cy2;
(void) cw2;
(void) ch2;
#endif
evas_textblock_cursor_geometry_get(cur, cx, cy, cw, ch, NULL,
(ctype == EFL_TEXT_CURSOR_TYPE_BEFORE) ?
EVAS_TEXTBLOCK_CURSOR_BEFORE : EVAS_TEXTBLOCK_CURSOR_UNDER);
return EINA_FALSE;
}
EAPI int
evas_textblock_cursor_geometry_get(const Efl_Text_Cursor_Cursor *cur, Evas_Coord *cx, Evas_Coord *cy, Evas_Coord *cw, Evas_Coord *ch, Evas_BiDi_Direction *dir, Evas_Textblock_Cursor_Type ctype)
{
int ret = -1;
if (!cur) return -1;
Evas_Object_Protected_Data *obj = efl_data_scope_get(cur->obj, EFL_CANVAS_OBJECT_CLASS);
evas_object_async_block(obj);
Efl_Canvas_Text_Data *o = efl_data_scope_get(cur->obj, MY_CLASS);
_relayout_if_needed(cur->obj, o);
if (ctype == EVAS_TEXTBLOCK_CURSOR_UNDER)
{
Evas_Object_Textblock_Line *ln;
Evas_Object_Textblock_Item *it;
ret = evas_textblock_cursor_pen_geometry_get(cur, cx, cy, cw, ch);
_find_layout_item_match(cur, &ln, &it);
if (ret >= 0)
{
Evas_BiDi_Direction itdir =
(it->type == EVAS_TEXTBLOCK_ITEM_TEXT) ?
_ITEM_TEXT(it)->text_props.bidi_dir :
_ITEM_FORMAT(it)->bidi_dir;
if (dir) *dir = itdir;
}
}
else if (ctype == EVAS_TEXTBLOCK_CURSOR_BEFORE)
{
/* In the case of a "before cursor", we should get the coordinates
* of just after the previous char (which in bidi text may not be
* just before the current char). */
Evas_Coord x, y, w, h;
Evas_Object_Textblock_Line *ln;
Evas_Object_Textblock_Item *it;
ret = evas_textblock_cursor_pen_geometry_get(cur, &x, &y, &w, &h);
_find_layout_item_match(cur, &ln, &it);
if (ret >= 0)
{
Evas_BiDi_Direction itdir =
(it->type == EVAS_TEXTBLOCK_ITEM_TEXT) ?
_ITEM_TEXT(it)->text_props.bidi_dir :
_ITEM_FORMAT(it)->bidi_dir;
if (itdir == EVAS_BIDI_DIRECTION_RTL)
{
if (cx) *cx = x + w;
}
else
{
if (cx) *cx = x;
}
if (cy) *cy = y;
if (cw) *cw = 0;
if (ch) *ch = h;
if (dir) *dir = itdir;
}
}
return ret;
}
/**
* @internal
* Returns the geometry/pen position (depending on query_func) of the char
* at pos.
*
* @param cur the position of the char.
* @param query_func the query function to use.
* @param cx the x of the char (or pen_x in the case of pen position).
* @param cy the y of the char.
* @param cw the w of the char (or advance in the case pen position).
* @param ch the h of the char.
* @return line number of the char on success, -1 on error.
*/
static int
_evas_textblock_cursor_char_pen_geometry_common_get(int (*query_func) (void *data, Evas_Font_Set *font, const Evas_Text_Props *intl_props, int pos, int *cx, int *cy, int *cw, int *ch), const Evas_Textblock_Cursor *cur, Evas_Coord *cx, Evas_Coord *cy, Evas_Coord *cw, Evas_Coord *ch)
{
Evas_Object_Textblock_Line *ln = NULL;
Evas_Object_Textblock_Item *it = NULL;
Evas_Object_Textblock_Text_Item *ti = NULL;
Evas_Object_Textblock_Format_Item *fi = NULL;
int x = 0, y = 0, w = 0, h = 0;
int pos;
Eina_Bool previous_format;
if (!cur) return -1;
Efl_Canvas_Text_Data *o = efl_data_scope_get(cur->obj, MY_CLASS);
_relayout_if_needed(cur->obj, o);
if (!cur->node)
{
if (!o->text_nodes)
{
if (!o->paragraphs) return -1;
ln = o->paragraphs->lines;
if (!ln) return -1;
if (cx) *cx = ln->x;
if (cy) *cy = ln->par->y + ln->y;
if (cw) *cw = ln->w;
if (ch) *ch = ln->h;
return ln->par->line_no + ln->line_no;
}
else
return -1;
}
previous_format = _find_layout_item_match(cur, &ln, &it);
if (!it)
{
return -1;
}
if (it->type == EVAS_TEXTBLOCK_ITEM_TEXT)
{
ti = _ITEM_TEXT(it);
}
else
{
fi = _ITEM_FORMAT(it);
}
if (ln && ti)
{
pos = cur->pos - ti->parent.text_pos;
if (pos < 0) pos = 0;
if (ti->parent.format->font.font)
{
Evas_Object_Protected_Data *obj = efl_data_scope_get(cur->obj, EFL_CANVAS_OBJECT_CLASS);
query_func(ENC,
ti->parent.format->font.font,
&ti->text_props,
pos,
&x, &y, &w, &h);
}
x += ln->x + _ITEM(ti)->x;
if (x < ln->x)
{
x = ln->x;
}
y = ln->par->y + ln->y;
h = ln->h;
}
else if (ln && fi)
{
if (previous_format)
{
if (_IS_LINE_SEPARATOR(fi->item))
{
x = 0;
y = ln->par->y + ln->y + ln->h;
}
else
{
#ifdef BIDI_SUPPORT
if (ln->par->direction == EVAS_BIDI_DIRECTION_RTL)
{
x = ln->x;
}
else
#endif
{
x = ln->x + ln->w;
}
y = ln->par->y + ln->y;
}
w = 0;
h = ln->h;
}
else
{
x = ln->x + _ITEM(fi)->x;
y = ln->par->y + ln->y;
w = _ITEM(fi)->w;
h = ln->h;
}
}
else
{
return -1;
}
if (cx) *cx = x;
if (cy) *cy = y;
if (cw) *cw = w;
if (ch) *ch = h;
return ln->par->line_no + ln->line_no;
}
EAPI int
evas_textblock_cursor_char_geometry_get(const Evas_Textblock_Cursor *cur, Evas_Coord *cx, Evas_Coord *cy, Evas_Coord *cw, Evas_Coord *ch)
{
if (!cur) return -1;
Evas_Object_Protected_Data *obj = efl_data_scope_get(cur->obj, EFL_CANVAS_OBJECT_CLASS);
evas_object_async_block(obj);
return _evas_textblock_cursor_char_pen_geometry_common_get(
ENFN->font_char_coords_get, cur, cx, cy, cw, ch);
}
EAPI int
evas_textblock_cursor_pen_geometry_get(const Evas_Textblock_Cursor *cur, Evas_Coord *cx, Evas_Coord *cy, Evas_Coord *cw, Evas_Coord *ch)
{
if (!cur) return -1;
Evas_Object_Protected_Data *obj = efl_data_scope_get(cur->obj, EFL_CANVAS_OBJECT_CLASS);
evas_object_async_block(obj);
return _evas_textblock_cursor_char_pen_geometry_common_get(
ENFN->font_pen_coords_get, cur, cx, cy, cw, ch);
}
EAPI int
evas_textblock_cursor_line_geometry_get(const Evas_Textblock_Cursor *cur, Evas_Coord *cx, Evas_Coord *cy, Evas_Coord *cw, Evas_Coord *ch)
{
Evas_Object_Textblock_Line *ln = NULL;
Evas_Object_Textblock_Item *it = NULL;
int x, y, w, h;
if (!cur) return -1;
Evas_Object_Protected_Data *obj = efl_data_scope_get(cur->obj, EFL_CANVAS_OBJECT_CLASS);
evas_object_async_block(obj);
Efl_Canvas_Text_Data *o = efl_data_scope_get(cur->obj, MY_CLASS);
_relayout_if_needed(cur->obj, o);
if (!cur->node)
{
ln = o->paragraphs->lines;
}
else
{
_find_layout_item_match(cur, &ln, &it);
}
if (!ln) return -1;
x = ln->x;
y = ln->par->y + ln->y;
w = ln->w;
h = ln->h;
if (cx) *cx = x;
if (cy) *cy = y;
if (cw) *cw = w;
if (ch) *ch = h;
return ln->par->line_no + ln->line_no;
}
EAPI Eina_Bool
evas_textblock_cursor_visible_range_get(Efl_Text_Cursor_Cursor *start, Evas_Textblock_Cursor *end)
{
return efl_canvas_text_visible_range_get(start->obj, start, end);
}
EOLIAN static Eina_Bool
_efl_canvas_text_visible_range_get(Eo *eo_obj EINA_UNUSED,
Efl_Canvas_Text_Data *pd EINA_UNUSED,
Efl_Text_Cursor_Cursor *start, Evas_Textblock_Cursor *end)
{
Evas *eo_e;
Evas_Coord cy, ch;
Evas_Object_Protected_Data *obj = efl_data_scope_get(eo_obj, EFL_CANVAS_OBJECT_CLASS);
evas_object_async_block(obj);
TB_HEAD_RETURN(EINA_FALSE);
eo_e = evas_object_evas_get(eo_obj);
Evas_Public_Data *e = efl_data_scope_get(eo_e, EVAS_CANVAS_CLASS);
cy = 0 - obj->cur->geometry.y;
ch = e->viewport.h;
evas_textblock_cursor_line_coord_set(start, cy);
evas_textblock_cursor_line_coord_set(end, cy + ch);
evas_textblock_cursor_line_char_last(end);
return EINA_TRUE;
}
EAPI Eina_Bool
evas_textblock_cursor_char_coord_set(Evas_Textblock_Cursor *cur, Evas_Coord x, Evas_Coord y)
{
Evas_Object_Textblock_Paragraph *found_par;
Evas_Object_Textblock_Line *ln;
Evas_Object_Textblock_Item *it = NULL;
Eina_Bool ret = EINA_FALSE;
Evas_Object_Protected_Data *obj = efl_data_scope_get(cur->obj, EFL_CANVAS_OBJECT_CLASS);
evas_object_async_block(obj);
Efl_Canvas_Text_Data *o = efl_data_scope_get(cur->obj, MY_CLASS);
_relayout_if_needed(cur->obj, o);
x += o->style_pad.l;
y += o->style_pad.t;
found_par = _layout_find_paragraph_by_y(o, y);
if (found_par)
{
_layout_paragraph_render(o, found_par);
EINA_INLIST_FOREACH(found_par->lines, ln)
{
if (ln->par->y + ln->y > y) break;
if ((ln->par->y + ln->y <= y) && ((ln->par->y + ln->y + ln->h) > y))
{
/* If before or after the line, go to start/end according
* to paragraph direction. */
if (x < ln->x)
{
cur->pos = ln->items->text_pos;
cur->node = found_par->text_node;
if (found_par->direction == EVAS_BIDI_DIRECTION_RTL)
{
evas_textblock_cursor_line_char_last(cur);
}
else
{
evas_textblock_cursor_line_char_first(cur);
}
ret = EINA_TRUE;
goto end;
}
else if (x >= ln->x + ln->w)
{
cur->pos = ln->items->text_pos;
cur->node = found_par->text_node;
if (found_par->direction == EVAS_BIDI_DIRECTION_RTL)
{
evas_textblock_cursor_line_char_first(cur);
}
else
{
evas_textblock_cursor_line_char_last(cur);
}
ret = EINA_TRUE;
goto end;
}
EINA_INLIST_FOREACH(ln->items, it)
{
if (((it->x + ln->x) <= x) && (((it->x + ln->x) + it->adv) > x))
{
if (it->type == EVAS_TEXTBLOCK_ITEM_TEXT)
{
int pos;
int cx, cy, cw, ch;
Evas_Object_Textblock_Text_Item *ti;
ti = _ITEM_TEXT(it);
pos = -1;
if (ti->parent.format->font.font)
pos = ENFN->font_char_at_coords_get(
ENC,
ti->parent.format->font.font,
&ti->text_props,
x - it->x - ln->x, 0,
&cx, &cy, &cw, &ch);
if (pos < 0)
goto end;
cur->pos = pos + it->text_pos;
cur->node = it->text_node;
ret = EINA_TRUE;
goto end;
}
else
{
Evas_Object_Textblock_Format_Item *fi;
fi = _ITEM_FORMAT(it);
/* Lets keep cur position half way for easy positioning */
if (x > (ln->x + it->x + (it->adv / 2)))
{
cur->pos = fi->parent.text_pos + 1;
}
else
{
cur->pos = fi->parent.text_pos;
}
cur->node = found_par->text_node;
ret = EINA_TRUE;
goto end;
}
}
}
}
}
}
if (o->paragraphs)
{
Evas_Object_Textblock_Line *first_line = o->paragraphs->lines;
if (y >= o->paragraphs->y + o->formatted.h)
{
/* If we are after the last paragraph, use the last position in the
* text. */
evas_textblock_cursor_paragraph_last(cur);
ret = EINA_TRUE;
goto end;
}
else if (o->paragraphs && (y < (o->paragraphs->y + first_line->y)))
{
evas_textblock_cursor_paragraph_first(cur);
ret = EINA_TRUE;
goto end;
}
}
end:
if (ret)
{
efl_event_callback_legacy_call(cur->obj, EFL_CANVAS_TEXT_EVENT_CURSOR_CHANGED, NULL);
}
return ret;
}
EOLIAN static void
_efl_canvas_text_efl_text_cursor_cursor_coord_set(Eo *eo_obj EINA_UNUSED, Efl_Canvas_Text_Data *o EINA_UNUSED, Efl_Text_Cursor_Cursor *cur EINA_UNUSED,
Evas_Coord x, Evas_Coord y)
{
ASYNC_BLOCK;
evas_textblock_cursor_char_coord_set(cur, x, y);
}
EAPI int
evas_textblock_cursor_line_coord_set(Evas_Textblock_Cursor *cur, Evas_Coord y)
{
Evas_Object_Textblock_Paragraph *found_par;
Evas_Object_Textblock_Line *ln;
if (!cur) return -1;
Evas_Object_Protected_Data *obj = efl_data_scope_get(cur->obj, EFL_CANVAS_OBJECT_CLASS);
evas_object_async_block(obj);
Efl_Canvas_Text_Data *o = efl_data_scope_get(cur->obj, MY_CLASS);
_relayout_if_needed(cur->obj, o);
y += o->style_pad.t;
found_par = _layout_find_paragraph_by_y(o, y);
if (found_par)
{
/* If we are before the first paragraph, use the first position in the text */
if ((found_par->y >= y) && (!EINA_INLIST_GET(found_par)->prev))
{
evas_textblock_cursor_paragraph_first(cur);
return 0;
}
_layout_paragraph_render(o, found_par);
EINA_INLIST_FOREACH(found_par->lines, ln)
{
if (ln->par->y + ln->y > y) break;
if ((ln->par->y + ln->y <= y) && ((ln->par->y + ln->y + ln->h) > y))
{
evas_textblock_cursor_line_set(cur, ln->par->line_no +
ln->line_no);
return ln->par->line_no + ln->line_no;
}
}
}
else if (o->paragraphs && (y >= o->paragraphs->y + o->formatted.h))
{
int line_no = 0;
/* If we are after the last paragraph, use the last position in the
* text. */
evas_textblock_cursor_paragraph_last(cur);
if (cur->node && cur->node->par)
{
line_no = cur->node->par->line_no;
if (cur->node->par->lines)
{
line_no += ((Evas_Object_Textblock_Line *)
EINA_INLIST_GET(cur->node->par->lines)->last)->line_no;
}
}
return line_no;
}
else if (o->paragraphs && (y < o->paragraphs->y))
{
int line_no = 0;
evas_textblock_cursor_paragraph_first(cur);
if (cur->node && cur->node->par)
{
line_no = cur->node->par->line_no;
}
return line_no;
}
return -1;
}
/**
* @internal
* Updates x and w according to the text direction, position in text and
* if it's a special case switch
*
* @param ti the text item we are working on
* @param x the current x (we get) and the x we return
* @param w the current w (we get) and the w we return
* @param start if this is the first item or not
* @param switch_items toogles item switching (rtl cases)
*/
static void
_evas_textblock_range_calc_x_w(const Evas_Object_Textblock_Item *it,
Evas_Coord *x, Evas_Coord *w, Eina_Bool start, Eina_Bool switch_items)
{
if ((start && !switch_items) || (!start && switch_items))
{
#ifdef BIDI_SUPPORT
if (((it->type == EVAS_TEXTBLOCK_ITEM_TEXT) &&
_ITEM_TEXT(it)->text_props.bidi_dir == EVAS_BIDI_DIRECTION_RTL)
||
((it->type == EVAS_TEXTBLOCK_ITEM_FORMAT) &&
_ITEM_FORMAT(it)->bidi_dir == EVAS_BIDI_DIRECTION_RTL))
{
*w = *x + *w;
*x = 0;
}
else
#endif
{
*w = it->adv - *x;
}
}
else
{
#ifdef BIDI_SUPPORT
if (((it->type == EVAS_TEXTBLOCK_ITEM_TEXT) &&
_ITEM_TEXT(it)->text_props.bidi_dir == EVAS_BIDI_DIRECTION_RTL)
||
((it->type == EVAS_TEXTBLOCK_ITEM_FORMAT) &&
_ITEM_FORMAT(it)->bidi_dir == EVAS_BIDI_DIRECTION_RTL))
{
*x = *x + *w;
*w = it->adv - *x;
}
else
#endif
{
*w = *x;
*x = 0;
}
}
}
/**
* @internal
* Returns the geometry of the range in line ln. Cur1 is the start cursor,
* cur2 is the end cursor, NULL means from the start or to the end accordingly.
* Assumes that ln is valid, and that at least one of cur1 and cur2 is not NULL.
*
* @param ln the line to work on.
* @param cur1 the start cursor
* @param cur2 the end cursor
* @return Returns the geometry of the range
*/
static Eina_List *
_evas_textblock_cursor_range_in_line_geometry_get(
const Evas_Object_Textblock_Line *ln, const Efl_Text_Cursor_Cursor *cur1,
const Efl_Text_Cursor_Cursor *cur2)
{
Evas_Object_Textblock_Item *it;
Evas_Object_Textblock_Item *it1, *it2;
Eina_List *rects = NULL;
Evas_Textblock_Rectangle *tr;
size_t start, end;
Eina_Bool switch_items;
const Efl_Text_Cursor_Cursor *cur;
cur = (cur1) ? cur1 : cur2;
if (!cur) return NULL;
Evas_Object_Protected_Data *obj = efl_data_scope_get(cur->obj, EFL_CANVAS_OBJECT_CLASS);
/* Find the first and last items */
it1 = it2 = NULL;
start = end = 0;
EINA_INLIST_FOREACH(ln->items, it)
{
size_t item_len;
item_len = (it->type == EVAS_TEXTBLOCK_ITEM_TEXT) ?
_ITEM_TEXT(it)->text_props.text_len
: 1;
if ((!cur1 || (cur1->pos < it->text_pos + item_len)) &&
(!cur2 || (cur2->pos > it->text_pos)))
{
if (!it1)
{
it1 = it;
start = item_len; /* start stores the first item_len */
}
it2 = it;
end = item_len; /* end stores the last item_len */
}
}
/* If we couldn't find even one item, return */
if (!it1) return NULL;
/* If the first item is logically before or equal the second item
* we have to set start and end differently than in the other case */
if (it1->text_pos <= it2->text_pos)
{
start = (cur1) ? (cur1->pos - it1->text_pos) : 0;
end = (cur2) ? (cur2->pos - it2->text_pos) : end;
switch_items = EINA_FALSE;
}
else
{
start = (cur2) ? (cur2->pos - it1->text_pos) : start;
end = (cur1) ? (cur1->pos - it2->text_pos) : 0;
switch_items = EINA_TRUE;
}
/* IMPORTANT: Don't use cur1/cur2 past this point (because they probably
* don't make sense anymore. That's why there are start and end),
* unless you know what you are doing */
/* Special case when they share the same item and it's a text item */
if ((it1 == it2) && (it1->type == EVAS_TEXTBLOCK_ITEM_TEXT))
{
Evas_Coord x1, w1, x2, w2;
Evas_Coord x, w, y, h;
Evas_Object_Textblock_Text_Item *ti;
int ret = 0;
ti = _ITEM_TEXT(it1);
if (ti->parent.format->font.font)
{
ret = ENFN->font_pen_coords_get(ENC,
ti->parent.format->font.font,
&ti->text_props,
start,
&x1, &y, &w1, &h);
}
if (!ret)
{
return NULL;
}
ret = ENFN->font_pen_coords_get(ENC,
ti->parent.format->font.font,
&ti->text_props,
end,
&x2, &y, &w2, &h);
if (!ret)
{
return NULL;
}
#ifdef BIDI_SUPPORT
if (ti->text_props.bidi_dir == EVAS_BIDI_DIRECTION_RTL)
{
x1 = x1 + w1;
x2 = x2 + w2;
}
#endif
/* Make x2 the one on the right */
if (x2 < x1)
{
Evas_Coord tmp;
tmp = x1;
x1 = x2;
x2 = tmp;
}
x = x1;
w = x2 - x1;
if (w > 0)
{
tr = calloc(1, sizeof(Evas_Textblock_Rectangle));
rects = eina_list_append(rects, tr);
tr->x = ln->x + it1->x + x;
tr->y = ln->par->y + ln->y;
tr->h = ln->h;
tr->w = w;
}
}
else if ((it1 == it2) && (it1->type != EVAS_TEXTBLOCK_ITEM_TEXT))
{
Evas_Coord x, w;
x = 0;
w = it1->w;
_evas_textblock_range_calc_x_w(it1, &x, &w, EINA_TRUE,
switch_items);
if (w > 0)
{
tr = calloc(1, sizeof(Evas_Textblock_Rectangle));
rects = eina_list_append(rects, tr);
tr->x = ln->x + it1->x + x;
tr->y = ln->par->y + ln->y;
tr->h = ln->h;
tr->w = w;
}
}
else if (it1 != it2)
{
/* Get the middle items */
Evas_Coord min_x, max_x;
Evas_Coord x, w;
it = _ITEM(EINA_INLIST_GET(it1)->next);
min_x = max_x = it->x;
if (it1->type == EVAS_TEXTBLOCK_ITEM_TEXT)
{
Evas_Coord y, h;
Evas_Object_Textblock_Text_Item *ti;
int ret;
ti = _ITEM_TEXT(it1);
ret = ENFN->font_pen_coords_get(ENC,
ti->parent.format->font.font,
&ti->text_props,
start,
&x, &y, &w, &h);
if (!ret)
{
/* BUG! Skip the first item */
x = w = 0;
}
else
{
_evas_textblock_range_calc_x_w(it1, &x, &w, EINA_TRUE,
switch_items);
}
}
else
{
x = 0;
w = it1->w;
_evas_textblock_range_calc_x_w(it1, &x, &w, EINA_TRUE,
switch_items);
}
if (w > 0)
{
tr = calloc(1, sizeof(Evas_Textblock_Rectangle));
rects = eina_list_append(rects, tr);
tr->x = ln->x + it1->x + x;
tr->y = ln->par->y + ln->y;
tr->h = ln->h;
tr->w = w;
}
while (it && (it != it2))
{
if (((it1->text_pos <= it->text_pos) && (it->text_pos <= it2->text_pos)) ||
((it2->text_pos <= it->text_pos) && (it->text_pos <= it1->text_pos)))
{
max_x = it->x + it->adv;
}
it = (Evas_Object_Textblock_Item *) EINA_INLIST_GET(it)->next;
}
if (min_x != max_x)
{
tr = calloc(1, sizeof(Evas_Textblock_Rectangle));
rects = eina_list_append(rects, tr);
tr->x = ln->x + min_x;
tr->y = ln->par->y + ln->y;
tr->h = ln->h;
tr->w = max_x - min_x;
}
if (it2->type == EVAS_TEXTBLOCK_ITEM_TEXT)
{
Evas_Coord y, h;
Evas_Object_Textblock_Text_Item *ti;
int ret;
ti = _ITEM_TEXT(it2);
ret = ENFN->font_pen_coords_get(ENC,
ti->parent.format->font.font,
&ti->text_props,
end,
&x, &y, &w, &h);
if (!ret)
{
/* BUG! skip the last item */
x = w = 0;
}
else
{
_evas_textblock_range_calc_x_w(it2, &x, &w, EINA_FALSE,
switch_items);
}
}
else
{
if (end > 0)
{
x = it2->adv;
w = 0;
}
else
{
x = 0;
w = it2->adv;
}
_evas_textblock_range_calc_x_w(it2, &x, &w, EINA_FALSE,
switch_items);
}
if (w > 0)
{
tr = calloc(1, sizeof(Evas_Textblock_Rectangle));
rects = eina_list_append(rects, tr);
tr->x = ln->x + it2->x + x;
tr->y = ln->par->y + ln->y;
tr->h = ln->h;
tr->w = w;
}
}
return rects;
}
/* Helper that creates a selection rectangle to a given line.
* The given 'inv' indicates an inverse behavior. */
static Evas_Textblock_Rectangle *
_line_fill_rect_get(const Evas_Object_Textblock_Line *ln,
Evas_Coord w, Evas_Coord lm, Evas_Coord rm, Eina_Bool inv)
{
Evas_Textblock_Rectangle *tr;
tr = calloc(1, sizeof(Evas_Textblock_Rectangle));
tr->y = ln->par->y + ln->y;
tr->h = ln->h;
//Reminder: ln->x includes the left margin */
if ((!inv && (ln->par->direction == EVAS_BIDI_DIRECTION_RTL)) ||
(inv && (ln->par->direction != EVAS_BIDI_DIRECTION_RTL)))
{
tr->x = lm;
tr->w = ln->x - lm;
}
else
{
tr->x = ln->x + ln->w;
tr->w = w - rm - tr->x;
}
if (tr->w == 0)
{
free(tr);
tr = NULL;
}
return tr;
}
EAPI Eina_Iterator *
evas_textblock_cursor_range_simple_geometry_get(const Efl_Text_Cursor_Cursor *cur1, const Evas_Textblock_Cursor *cur2)
{
if (!cur1) return NULL;
return efl_canvas_text_range_simple_geometry_get(cur1->obj, cur1, cur2);
}
EOLIAN static Eina_Iterator *
_efl_canvas_text_range_simple_geometry_get(Eo *eo_obj EINA_UNUSED,
Efl_Canvas_Text_Data *o, const Efl_Text_Cursor_Cursor *cur1, const
Evas_Textblock_Cursor *cur2)
{
Evas_Object_Textblock_Line *ln1, *ln2;
Evas_Object_Textblock_Item *it1, *it2;
Eina_List *rects = NULL;
Eina_Iterator *itr = NULL;
if (!cur1 || !cur1->node) return NULL;
if (!cur2 || !cur2->node) return NULL;
if (cur1->obj != cur2->obj) return NULL;
Evas_Object_Protected_Data *obj = efl_data_scope_get(cur1->obj, EFL_CANVAS_OBJECT_CLASS);
evas_object_async_block(obj);
_relayout_if_needed(cur1->obj, o);
if (evas_textblock_cursor_compare(cur1, cur2) > 0)
{
const Efl_Text_Cursor_Cursor *tc;
tc = cur1;
cur1 = cur2;
cur2 = tc;
}
ln1 = ln2 = NULL;
it1 = it2 = NULL;
_find_layout_item_match(cur1, &ln1, &it1);
if (!ln1 || !it1) return NULL;
_find_layout_item_match(cur2, &ln2, &it2);
if (!ln2 || !it2) return NULL;
if (ln1 == ln2)
{
rects = _evas_textblock_cursor_range_in_line_geometry_get(ln1, cur1, cur2);
}
else
{
int lm = 0, rm = 0;
Eina_List *rects2 = NULL;
Evas_Coord w;
Evas_Textblock_Rectangle *tr;
evas_object_geometry_get(cur1->obj, NULL, NULL, &w, NULL);
/* Use the minimum left margin and right margin for a uniform
* line coverage of the rectangles */
if (ln1->items)
{
Evas_Object_Textblock_Format *fm = ln1->items->format;
if (fm)
{
lm = fm->margin.l;
rm = fm->margin.r;
}
}
if (ln2->items)
{
Evas_Object_Textblock_Format *fm = ln2->items->format;
if (fm)
{
if (fm->margin.l < lm) lm = fm->margin.l;
if (fm->margin.r < rm) rm = fm->margin.r;
}
}
/* Append the rectangles by visual order (top, middle, bottom). Keep
* it like that so it is also easier to test and debug. */
/* Top line */
rects = _evas_textblock_cursor_range_in_line_geometry_get(ln1, cur1, NULL);
/* Fill-in the top line */
tr = _line_fill_rect_get(ln1, w, lm, rm, EINA_FALSE);
if (tr)
{
rects = eina_list_append(rects, tr);
}
/* Middle rect (lines) */
if ((ln1->par->y + ln1->y + ln1->h) != (ln2->par->y + ln2->y))
{
tr = calloc(1, sizeof(Evas_Textblock_Rectangle));
tr->x = lm;
tr->y = ln1->par->y + ln1->y + ln1->h;
tr->w = w - tr->x - rm;
tr->h = ln2->par->y + ln2->y - tr->y;
rects = eina_list_append(rects, tr);
}
/* Bottom line */
rects2 = _evas_textblock_cursor_range_in_line_geometry_get(ln2, NULL, cur2);
/* Fill-in the bottom line */
tr = _line_fill_rect_get(ln2, w, lm, rm, EINA_TRUE);
if (tr)
{
rects2 = eina_list_append(rects2, tr);
}
rects = eina_list_merge(rects, rects2);
}
itr = _evas_textblock_selection_iterator_new(rects);
return itr;
}
static Eina_List *
_efl_canvas_text_range_geometry_list_get(Eo *eo_obj EINA_UNUSED,
Efl_Canvas_Text_Data *o, const Efl_Text_Cursor_Cursor *cur1, const
Evas_Textblock_Cursor *cur2)
{
Evas_Object_Textblock_Line *ln1, *ln2;
Evas_Object_Textblock_Item *it1, *it2;
Eina_List *rects = NULL;
Evas_Textblock_Rectangle *tr;
if (!cur1 || !cur1->node) return NULL;
if (!cur2 || !cur2->node) return NULL;
if (cur1->obj != cur2->obj) return NULL;
Evas_Object_Protected_Data *obj = efl_data_scope_get(cur1->obj, EFL_CANVAS_OBJECT_CLASS);
evas_object_async_block(obj);
_relayout_if_needed(cur1->obj, o);
if (evas_textblock_cursor_compare(cur1, cur2) > 0)
{
const Efl_Text_Cursor_Cursor *tc;
tc = cur1;
cur1 = cur2;
cur2 = tc;
}
ln1 = ln2 = NULL;
it1 = it2 = NULL;
_find_layout_item_match(cur1, &ln1, &it1);
if (!ln1 || !it1) return NULL;
_find_layout_item_match(cur2, &ln2, &it2);
if (!ln2 || !it2) return NULL;
if (ln1 == ln2)
{
rects = _evas_textblock_cursor_range_in_line_geometry_get(ln1,
cur1, cur2);
}
else
{
Evas_Object_Textblock_Line *plni, *lni;
Eina_List *rects2 = NULL;
/* Handle the first line */
rects = _evas_textblock_cursor_range_in_line_geometry_get(ln1,
cur1, NULL);
/* Handle the lines between the first and the last line */
lni = (Evas_Object_Textblock_Line *) EINA_INLIST_GET(ln1)->next;
if (!lni && (ln1->par != ln2->par))
{
lni = ((Evas_Object_Textblock_Paragraph *)
EINA_INLIST_GET(ln1->par)->next)->lines;
}
while (lni && (lni != ln2))
{
tr = calloc(1, sizeof(Evas_Textblock_Rectangle));
rects = eina_list_append(rects, tr);
tr->x = lni->x;
tr->y = lni->par->y + lni->y;
tr->h = lni->h;
tr->w = lni->w;
plni = lni;
lni = (Evas_Object_Textblock_Line *) EINA_INLIST_GET(lni)->next;
if (!lni && (plni->par != ln2->par))
{
lni = ((Evas_Object_Textblock_Paragraph *)
EINA_INLIST_GET(plni->par)->next)->lines;
}
}
rects2 = _evas_textblock_cursor_range_in_line_geometry_get(ln2,
NULL, cur2);
rects = eina_list_merge(rects, rects2);
}
return rects;
}
EAPI Eina_List *
evas_textblock_cursor_range_geometry_get(const Efl_Text_Cursor_Cursor *cur1, const Evas_Textblock_Cursor *cur2_obj)
{
Efl_Canvas_Text_Data *o;
if (!cur1) return NULL;
o = efl_data_scope_get(cur1->obj, MY_CLASS);
return _efl_canvas_text_range_geometry_list_get(cur1->obj, o, cur1, cur2_obj);
}
EOLIAN static Eina_Iterator *
_efl_canvas_text_range_geometry_get(Eo *eo_obj EINA_UNUSED,
Efl_Canvas_Text_Data *o, const Efl_Text_Cursor_Cursor *cur1, const
Evas_Textblock_Cursor *cur2)
{
Eina_List *rects = _efl_canvas_text_range_geometry_list_get(eo_obj,
o, cur1, cur2);
return _evas_textblock_selection_iterator_new(rects);
}
static Eina_Bool
_evas_textblock_cursor_format_item_geometry_get(const Efl_Text_Cursor_Cursor *cur, Evas_Coord *cx, Evas_Coord *cy, Evas_Coord *cw, Evas_Coord *ch)
{
Evas_Object_Textblock_Line *ln = NULL;
Evas_Object_Textblock_Format_Item *fi;
Evas_Object_Textblock_Item *it = NULL;
Evas_Coord x, y, w, h;
if (!cur) return EINA_FALSE;
Evas_Object_Protected_Data *obj = efl_data_scope_get(cur->obj, EFL_CANVAS_OBJECT_CLASS);
evas_object_async_block(obj);
Efl_Canvas_Text_Data *o = efl_data_scope_get(cur->obj, MY_CLASS);
_relayout_if_needed(cur->obj, o);
if (!_evas_textblock_cursor_format_is_visible_get(cur)) return EINA_FALSE;
_find_layout_item_line_match(cur->obj, cur->node, cur->pos, &ln, &it);
if (it && (it->type != EVAS_TEXTBLOCK_ITEM_FORMAT)) return EINA_FALSE;
fi = _ITEM_FORMAT(it);
if ((!ln) || (!fi)) return EINA_FALSE;
x = ln->x + fi->parent.x;
y = ln->par->y + ln->y + ln->baseline + fi->y;
w = fi->parent.w;
h = fi->parent.h;
if (cx) *cx = x;
if (cy) *cy = y;
if (cw) *cw = w;
if (ch) *ch = h;
return EINA_TRUE;
}
EAPI Eina_Bool
evas_textblock_cursor_format_item_geometry_get(const Evas_Textblock_Cursor *cur, Evas_Coord *cx, Evas_Coord *cy, Evas_Coord *cw, Evas_Coord *ch)
{
return _evas_textblock_cursor_format_item_geometry_get(cur, cx, cy, cw, ch);
}
EAPI Eina_Bool
evas_textblock_cursor_eol_get(const Evas_Textblock_Cursor *cur)
{
Eina_Bool ret = EINA_FALSE;
Efl_Text_Cursor_Cursor cur2;
if (!cur) return EINA_FALSE;
Evas_Object_Protected_Data *obj = efl_data_scope_get(cur->obj, EFL_CANVAS_OBJECT_CLASS);
evas_object_async_block(obj);
_evas_textblock_cursor_init(&cur2, cur->obj);
_evas_textblock_cursor_copy(&cur2, cur);
evas_textblock_cursor_line_char_last(&cur2);
if (cur2.pos == cur->pos)
{
ret = EINA_TRUE;
}
return ret;
}
/* general controls */
EAPI Eina_Bool
evas_object_textblock_line_number_geometry_get(const Eo *eo_obj, int line, Evas_Coord *cx, Evas_Coord *cy, Evas_Coord *cw, Evas_Coord *ch)
{
Evas_Object_Textblock_Line *ln;
Evas_Object_Protected_Data *obj = efl_data_scope_get(eo_obj, EFL_CANVAS_OBJECT_CLASS);
evas_object_async_block(obj);
Efl_Canvas_Text_Data *o = efl_data_scope_get(eo_obj, MY_CLASS);
_relayout_if_needed((Evas_Object *)eo_obj, o);
ln = _find_layout_line_num(eo_obj, line);
if (!ln) return EINA_FALSE;
if (cx) *cx = ln->x;
if (cy) *cy = ln->par->y + ln->y;
if (cw) *cw = ln->w;
if (ch) *ch = ln->h;
return EINA_TRUE;
}
static void
_evas_object_textblock_clear(Evas_Object *eo_obj)
{
Eina_List *l;
Efl_Text_Cursor_Cursor *cur;
Efl_Text_Cursor_Cursor *co;
Evas *eo_e;
Evas_Public_Data *evas;
Evas_Object_Protected_Data *obj = efl_data_scope_get(eo_obj, EFL_CANVAS_OBJECT_CLASS);
eo_e = evas_object_evas_get(eo_obj);
evas = efl_data_scope_get(eo_e, EVAS_CANVAS_CLASS);
evas_object_async_block(obj);
Efl_Canvas_Text_Data *o = efl_data_scope_get(eo_obj, MY_CLASS);
if (o->paragraphs)
{
_paragraphs_free(evas, o, obj, o->paragraphs);
o->paragraphs = NULL;
}
_nodes_clear(eo_obj);
co = o->cursor;
co->node = NULL;
co->pos = 0;
co->changed = EINA_TRUE;
EINA_LIST_FOREACH(o->cursors, l, cur)
{
cur->node = NULL;
cur->pos = 0;
cur->changed = EINA_TRUE;
}
_evas_textblock_changed(o, eo_obj);
}
EAPI void
evas_object_textblock_clear(Evas_Object *eo_obj)
{
TB_HEAD();
_evas_object_textblock_clear(eo_obj);
/* Force recreation of everything for textblock.
* FIXME: We have the same thing in other places, merge it... */
evas_textblock_cursor_paragraph_first(o->cursor);
evas_textblock_cursor_text_append(o->cursor, "");
}
EOLIAN static void
_efl_canvas_text_size_formatted_get(Eo *eo_obj, Efl_Canvas_Text_Data *o, Evas_Coord *w, Evas_Coord *h)
{
Evas_Object_Protected_Data *obj = efl_data_scope_get(eo_obj, EFL_CANVAS_OBJECT_CLASS);
evas_object_async_block(obj);
_relayout_if_needed(eo_obj, o);
if (w) *w = o->formatted.w;
if (h) *h = o->formatted.h;
}
#ifdef BIDI_SUPPORT
/**
* @internal
* Returns last item in the visual order of a given native line.
* Similar to the code of _layout_line_reorder, but does only the
* required work to get the last item in the visual order. There is
* no need to actually reorder the items in the native line.
* @param line the native line to
* @param bidi_props bidi-props used for visual reorder
*/
static Evas_Object_Textblock_Item *
_line_native_last_visual_get(const Eina_List *line,
Evas_BiDi_Paragraph_Props *bidi_props)
{
Evas_Object_Textblock_Item *it, *last_it = NULL;
EvasBiDiStrIndex *v_to_l = NULL;
size_t len;
Evas_Object_Textblock_Item *items = NULL;
const Eina_List *i;
size_t max_vpos = 0;
if (line)
items = (Evas_Object_Textblock_Item *)eina_list_data_get(line);
if (items && bidi_props)
{
size_t start, end;
start = _ITEM(eina_list_data_get(line))->text_pos;
it = _ITEM(eina_list_data_get(eina_list_last(line)));
end = it->text_pos + GET_ITEM_LEN(it);
len = end - start;
evas_bidi_props_reorder_line(NULL, start, len, bidi_props, &v_to_l);
/* Get the last visual item in this line */
EINA_LIST_FOREACH(line, i, it)
{
size_t vpos = evas_bidi_position_logical_to_visual(
v_to_l, len, it->text_pos - start);
if ((it->w > 0) && (!last_it || (vpos >= max_vpos)))
{
last_it = it;
max_vpos = vpos;
}
}
if (v_to_l) free(v_to_l);
}
return last_it;
}
#endif
static inline void
_size_native_calc_line_finalize(const Evas_Object *eo_obj,
const Evas_Object_Textblock_Paragraph *par, Eina_List *items,
Evas_Coord *ascent, Evas_Coord *descent,
Evas_Coord *w, Textblock_Position position)
{
Evas_Object_Textblock_Item *it, *last_it = NULL;
Eina_List *i;
Eina_Bool is_bidi = EINA_FALSE;
Evas_Object_Protected_Data *obj =
efl_data_scope_get(eo_obj, EFL_CANVAS_OBJECT_CLASS);
it = eina_list_data_get(items);
*w = 0;
if (it)
{
Evas_Coord asc = 0, desc = 0;
/* If there are no text items yet, calc ascent/descent
* according to the current format. */
if (it->format)
{
_layout_item_ascent_descent_adjust(obj, &asc, &desc,
it, it->format);
}
if (asc > *ascent)
*ascent = asc;
if (desc > *descent)
*descent = desc;
/* Add margins. */
if (it->format)
*w = it->format->margin.l + it->format->margin.r;
}
#ifdef BIDI_SUPPORT
/* Get last item by visual order, because this paragraph is bidi */
if (par->is_bidi)
{
/* bidi_props has already been updated in calling function */
last_it = _line_native_last_visual_get(items, par->bidi_props);
is_bidi = EINA_TRUE;
}
#else
(void) par;
#endif
/* Adjust all the item sizes according to the final line size,
* and update the x positions of all the items of the line. */
EINA_LIST_FOREACH(items, i, it)
{
if (it->type == EVAS_TEXTBLOCK_ITEM_FORMAT)
{
Evas_Coord fw, fh, fy;
Evas_Object_Textblock_Format_Item *fi = _ITEM_FORMAT(it);
if (!fi->formatme) goto loop_advance;
_layout_calculate_format_item_size(obj, fi, ascent,
descent, &fy, &fw, &fh);
}
else
{
Evas_Coord maxasc = 0, maxdesc = 0;
_layout_item_ascent_descent_adjust(obj, ascent, descent,
it, it->format);
_layout_item_max_ascent_descent_calc(obj, &maxasc, &maxdesc,
it, position);
if (maxasc > *ascent)
*ascent = maxasc;
if (maxdesc > *descent)
*descent = maxdesc;
}
loop_advance:
*w += it->adv;
/* Update visible last item in the logical order */
if (!is_bidi && (it->w > 0))
last_it = it;
}
/* rectify width of line using the last item */
if (last_it)
*w += last_it->w - last_it->adv;
}
/* FIXME: doc */
static void
_size_native_calc_paragraph_size(const Evas_Object *eo_obj,
const Efl_Canvas_Text_Data *o,
Evas_Object_Textblock_Paragraph *par,
Textblock_Position *position,
Evas_Coord *_w, Evas_Coord *_h)
{
Eina_List *i;
Evas_Object_Textblock_Item *it;
Eina_List *line_items = NULL;
Evas_Coord w = 0, y = 0, wmax = 0, h = 0, ascent = 0, descent = 0;
Evas_Object_Protected_Data *obj =
efl_data_scope_get(eo_obj, EFL_CANVAS_OBJECT_CLASS);
#ifdef BIDI_SUPPORT
if (par->is_bidi)
_layout_update_bidi_props(o, par);
#endif
EINA_LIST_FOREACH(par->logical_items, i, it)
{
line_items = eina_list_append(line_items, it);
if (it->type == EVAS_TEXTBLOCK_ITEM_FORMAT)
{
Evas_Object_Textblock_Format_Item *fi = _ITEM_FORMAT(it);
if (fi->item && (_IS_LINE_SEPARATOR(fi->item) ||
_IS_PARAGRAPH_SEPARATOR(o, fi->item)))
{
_size_native_calc_line_finalize(eo_obj, par, line_items, &ascent,
&descent, &w, *position);
if (ascent + descent > h)
h = ascent + descent;
y += h;
if (w > wmax)
wmax = w;
h = 0;
ascent = descent = 0;
*position = TEXTBLOCK_POSITION_ELSE;
line_items = eina_list_free(line_items);
}
else
{
Evas_Coord fw, fh, fy;
/* If there are no text items yet, calc ascent/descent
* according to the current format. */
if ((ascent + descent) == 0)
_layout_item_ascent_descent_adjust(obj, &ascent,
&descent, it, it->format);
_layout_calculate_format_item_size(obj, fi, &ascent,
&descent, &fy, &fw, &fh);
}
}
else
{
_layout_item_ascent_descent_adjust(obj, &ascent,
&descent, it, it->format);
}
}
if (!EINA_INLIST_GET(par)->next)
{
*position = (*position == TEXTBLOCK_POSITION_START) ?
TEXTBLOCK_POSITION_SINGLE : TEXTBLOCK_POSITION_END;
}
_size_native_calc_line_finalize(eo_obj, par, line_items, &ascent, &descent, &w, *position);
#ifdef BIDI_SUPPORT
/* Clear the bidi props because we don't need them anymore. */
if (par->bidi_props)
{
evas_bidi_paragraph_props_unref(par->bidi_props);
par->bidi_props = NULL;
}
#endif
if (*position == TEXTBLOCK_POSITION_START)
*position = TEXTBLOCK_POSITION_ELSE;
eina_list_free(line_items);
/* Do the last addition */
if (ascent + descent > h)
h = ascent + descent;
if (w > wmax)
wmax = w;
*_h = y + h;
*_w = wmax;
}
EOLIAN static void
_efl_canvas_text_size_native_get(Eo *eo_obj, Efl_Canvas_Text_Data *o, Evas_Coord *w, Evas_Coord *h)
{
Evas_Object_Protected_Data *obj = efl_data_scope_get(eo_obj, EFL_CANVAS_OBJECT_CLASS);
evas_object_async_block(obj);
if (!o->native.valid)
{
Evas_Coord wmax = 0, hmax = 0;
Evas_Object_Textblock_Paragraph *par;
Textblock_Position position = TEXTBLOCK_POSITION_START;
/* We just want the layout objects to update, should probably
* split that. */
_relayout_if_needed(eo_obj, o);
EINA_INLIST_FOREACH(o->paragraphs, par)
{
Evas_Coord tw, th;
_size_native_calc_paragraph_size(eo_obj, o, par, &position, &tw, &th);
if (tw > wmax)
wmax = tw;
hmax += th;
}
o->native.w = wmax;
o->native.h = hmax;
o->native.valid = 1;
o->content_changed = 0;
o->format_changed = EINA_FALSE;
}
if (w) *w = o->native.w;
if (h) *h = o->native.h;
}
EOLIAN static void
_efl_canvas_text_style_insets_get(Eo *eo_obj, Efl_Canvas_Text_Data *o, Evas_Coord *l, Evas_Coord *r, Evas_Coord *t, Evas_Coord *b)
{
Evas_Object_Protected_Data *obj = efl_data_scope_get(eo_obj, EFL_CANVAS_OBJECT_CLASS);
evas_object_async_block(obj);
_relayout_if_needed(eo_obj, o);
if (l) *l = o->style_pad.l;
if (r) *r = o->style_pad.r;
if (t) *t = o->style_pad.t;
if (b) *b = o->style_pad.b;
}
EOLIAN static void
_efl_canvas_text_efl_object_dbg_info_get(Eo *eo_obj, Efl_Canvas_Text_Data *o EINA_UNUSED, Efl_Dbg_Info *root)
{
efl_dbg_info_get(efl_super(eo_obj, MY_CLASS), root);
if (!root) return;
Efl_Dbg_Info *group = EFL_DBG_INFO_LIST_APPEND(root, MY_CLASS_NAME);
Efl_Dbg_Info *node;
const char *style;
const char *text = NULL;
char shorttext[48];
const Evas_Textblock_Style *ts = NULL;
ts = evas_object_textblock_style_get(eo_obj);
style = evas_textblock_style_get(ts);
text = evas_object_textblock_text_markup_get(eo_obj);
strncpy(shorttext, text, 38);
if (shorttext[37])
strcpy(shorttext + 37, "\xe2\x80\xa6"); /* HORIZONTAL ELLIPSIS */
EFL_DBG_INFO_APPEND(group, "Style", EINA_VALUE_TYPE_STRING, style);
EFL_DBG_INFO_APPEND(group, "Text", EINA_VALUE_TYPE_STRING, shorttext);
{
int w, h;
efl_canvas_text_size_formatted_get(eo_obj, &w, &h);
node = EFL_DBG_INFO_LIST_APPEND(group, "Formatted size");
EFL_DBG_INFO_APPEND(node, "w", EINA_VALUE_TYPE_INT, w);
EFL_DBG_INFO_APPEND(node, "h", EINA_VALUE_TYPE_INT, h);
}
{
int w, h;
efl_canvas_text_size_native_get(eo_obj, &w, &h);
node = EFL_DBG_INFO_LIST_APPEND(group, "Native size");
EFL_DBG_INFO_APPEND(node, "w", EINA_VALUE_TYPE_INT, w);
EFL_DBG_INFO_APPEND(node, "h", EINA_VALUE_TYPE_INT, h);
}
}
/* all nice and private */
static void
evas_object_textblock_init(Evas_Object *eo_obj)
{
Evas_Object_Protected_Data *obj = efl_data_scope_get(eo_obj, EFL_CANVAS_OBJECT_CLASS);
Efl_Canvas_Text_Data *o;
static Eina_Bool linebreak_init = EINA_FALSE;
if (!linebreak_init)
{
linebreak_init = EINA_TRUE;
init_linebreak();
init_wordbreak();
}
o = obj->private_data;
Efl_Text_Cursor_Cursor *co = o->cursor;
co->obj = eo_obj;
evas_object_textblock_text_markup_set(eo_obj, "");
o->multiline = EINA_FALSE;
#ifdef BIDI_SUPPORT
o->inherit_paragraph_direction = EINA_TRUE;
#endif
}
EOLIAN static void
_efl_canvas_text_efl_object_destructor(Eo *eo_obj, Efl_Canvas_Text_Data *o EINA_UNUSED)
{
evas_object_textblock_free(eo_obj);
efl_destructor(efl_super(eo_obj, MY_CLASS));
}
static void
evas_object_textblock_free(Evas_Object *eo_obj)
{
Efl_Canvas_Text_Data *o = efl_data_scope_get(eo_obj, MY_CLASS);
Evas_Object_Protected_Data *obj = efl_data_scope_get(eo_obj, EFL_CANVAS_OBJECT_CLASS);
Efl_Canvas_Text_Filter_Program *prg;
Evas_Filter_Data_Binding *db;
_evas_object_textblock_clear(eo_obj);
evas_object_textblock_style_set(eo_obj, NULL);
EINA_INLIST_FREE(o->gfx_filter.programs, prg)
{
EINA_INLIST_REMOVE(o->gfx_filter.programs, prg);
evas_filter_program_del(prg->pgm);
eina_stringshare_del(prg->name);
eina_stringshare_del(prg->code);
free(prg);
}
EINA_INLIST_FREE(o->gfx_filter.data_bindings, db)
{
EINA_INLIST_REMOVE(o->gfx_filter.data_bindings, db);
eina_stringshare_del(db->name);
eina_stringshare_del(db->value);
free(db);
}
eina_hash_free(o->gfx_filter.sources);
while (evas_object_textblock_style_user_peek(eo_obj))
{
evas_object_textblock_style_user_pop(eo_obj);
}
free(o->cursor);
while (o->cursors)
{
Efl_Text_Cursor_Cursor *cur;
cur = (Efl_Text_Cursor_Cursor *)o->cursors->data;
o->cursors = eina_list_remove_list(o->cursors, o->cursors);
free(cur);
}
if (o->repch) eina_stringshare_del(o->repch);
if (o->ellip_ti)
{
Evas *eo_e;
Evas_Public_Data *evas;
eo_e = evas_object_evas_get(eo_obj);
evas = efl_data_scope_get(eo_e, EVAS_CANVAS_CLASS);
_item_free(evas, o, obj, NULL, _ITEM(o->ellip_ti));
}
if (o->bidi_delimiters) eina_stringshare_del(o->bidi_delimiters);
_format_command_shutdown();
/* remove obstacles */
_obstacles_free(eo_obj, o);
#ifdef HAVE_HYPHEN
/* Hyphenation */
if (o->hyphenating)
{
_dicts_hyphen_detach(eo_obj);
}
#endif
free(o->utf8);
}
static inline Evas_Filter_Context *
_filter_context_get(Evas_Object_Textblock_Text_Item *ti)
{
if (!ti || !ti->gfx_filter) return NULL;
return ti->gfx_filter->ctx;
}
static void
_filter_sync_end(Evas_Filter_Context *ctx, Eina_Bool success)
{
Text_Item_Filter *filter;
Eina_Bool async;
filter = evas_filter_context_data_get(ctx);
EINA_SAFETY_ON_NULL_RETURN(filter);
async = evas_filter_context_async_get(ctx);
_image_safe_unref(filter->evas, filter->output, async);
if (filter->ti)
{
// FIXME: LEAK HERE!
filter->output = evas_filter_buffer_backing_get(ctx, EVAS_FILTER_BUFFER_OUTPUT_ID, EINA_FALSE);
if (filter->ti->parent.format->gfx_filter)
filter->ti->parent.format->gfx_filter->invalid = !success;
// else just avoid sigsegv
if (filter->ctx == ctx)
{
// release local ref
evas_filter_context_unref(ctx);
filter->ctx = NULL;
}
}
else
{
free(filter);
}
// release run ref
evas_filter_context_unref(ctx);
}
static void
_filter_post_render_cb(void *data)
{
Efl_Canvas_Text_Filter_Post_Render *post_data = data;
_filter_sync_end(post_data->ctx, post_data->success);
free(post_data);
}
static void
_filter_cb(Evas_Filter_Context *ctx, void *data, Eina_Bool success)
{
Efl_Canvas_Text_Filter_Post_Render *post_data;
Evas_Public_Data *evas = data;
if (!evas_filter_context_async_get(ctx))
{
_filter_sync_end(ctx, success);
return;
}
post_data = calloc(1, sizeof(*post_data));
post_data->success = success;
post_data->ctx = ctx;
evas_post_render_job_add(evas, _filter_post_render_cb, post_data);
}
static inline Eina_Rectangle
_filter_relative_bounding_box_get(const Text_Item_Filter *tif)
{
int x_offset, y_offset, l, t, b;
Eina_Rectangle rect;
x_offset = tif->ti->parent.ln->x + tif->ti->parent.x;
y_offset = tif->ti->parent.ln->par->y + tif->ti->parent.ln->y;
l = tif->ti->parent.format->gfx_filter->pad.l;
/* r = tif->ti->parent.format->gfx_filter->pad.r; */
t = tif->ti->parent.format->gfx_filter->pad.t;
b = tif->ti->parent.format->gfx_filter->pad.b;
rect.x = x_offset - l;
rect.y = y_offset - t;
rect.w = tif->ti->parent.w;
rect.h = tif->ti->parent.h + t + b;
return rect;
}
static void
_filter_output_cache_prune(Evas_Object_Protected_Data *obj, Efl_Canvas_Text_Data *o)
{
Text_Item_Filter *tif;
Eina_Inlist *il;
Eina_Rectangle obj_rect;
// proxy surfaces contain the entire object, nothing to prune
if (obj->proxy->proxies)
return;
obj_rect.x = obj->cur->cache.clip.x;
obj_rect.y = obj->cur->cache.clip.y;
obj_rect.w = obj->cur->cache.clip.w;
obj_rect.h = obj->cur->cache.clip.h;
EINA_INLIST_FOREACH_SAFE(o->gfx_filter.text_items, il, tif)
{
Eina_Rectangle it_rect;
if (!tif->ti)
{
if (tif->ctx) continue;
}
else
{
if (!tif->ti->parent.ln || !tif->ti->parent.ln->par) continue;
it_rect = _filter_relative_bounding_box_get(tif);
it_rect.x += obj->cur->geometry.x;
it_rect.y += obj->cur->geometry.y;
if (eina_rectangles_intersect(&obj_rect, &it_rect)) continue;
}
_image_safe_unref(obj->layer->evas, tif->output, tif->do_async);
tif->output = NULL;
}
}
static inline Evas_Coord_Point
_filter_target_position_calc(Evas_Object_Protected_Data *obj,
Evas_Object_Textblock_Text_Item *ti, int x, int y)
{
Efl_Canvas_Text_Filter *filter = ti->parent.format->gfx_filter;
Evas_Object_Textblock_Line *ln = ti->parent.ln;
Evas_Coord_Point pt;
pt.x = obj->cur->geometry.x + ln->x + ti->parent.x + x - filter->pad.l;
pt.y = obj->cur->geometry.y + ln->par->y + ln->y + y - filter->pad.t - ti->parent.h + ln->h;
return pt;
}
static void
evas_object_textblock_render(Evas_Object *eo_obj EINA_UNUSED,
Evas_Object_Protected_Data *obj,
void *type_private_data,
void *engine, void *output, void *context, void *surface,
int x, int y, Eina_Bool do_async)
{
Evas_Object_Textblock_Paragraph *par, *start = NULL;
Evas_Object_Textblock_Item *itr;
Evas_Object_Textblock_Line *ln, *cur_ln = NULL;
Efl_Canvas_Text_Data *o = type_private_data;
ASYNC_BLOCK;
Eina_List *shadows = NULL;
Eina_List *glows = NULL;
Eina_List *outlines = NULL;
Eina_List *gfx_filters = NULL;
void *context_save = context;
int strikethrough_thickness, underline_thickness, underline_position;
int i, j;
int cx, cy, cw, ch, clip;
int ca, cr, cg, cb;
int na, nr, ng, nb;
const char vals[5][5] =
{
{0, 1, 2, 1, 0},
{1, 3, 4, 3, 1},
{2, 4, 5, 4, 2},
{1, 3, 4, 3, 1},
{0, 1, 2, 1, 0}
};
/* FIXME: rare case when relayout was not called: cache.clip made
the object not visible (eg. clipped out), but it is actually visible
in this context (eg. inside a proxy).
Plus, one more scenario is that the object isn't visible but actually is visible
by evas_map. */
if (o->changed || o->content_changed || o->format_changed || o->obstacle_changed)
{
_relayout_if_needed(eo_obj, o);
}
/* If there are no paragraphs and thus there are no lines,
* there's nothing left to do. */
if (!o->paragraphs)
{
return;
}
/* render object to surface with context, and offxet by x,y */
ENFN->context_multiplier_unset(engine, context);
ENFN->context_multiplier_set(engine, context, 0, 0, 0, 0);
ENFN->context_render_op_set(engine, context, obj->cur->render_op);
/* FIXME: This clipping is just until we fix inset handling correctly. */
ENFN->context_clip_clip(engine, context,
obj->cur->geometry.x + x,
obj->cur->geometry.y + y,
obj->cur->geometry.w,
obj->cur->geometry.h);
clip = ENFN->context_clip_get(engine, context, &cx, &cy, &cw, &ch);
ENFN->context_color_set(engine, context, 0, 0, 0, 0);
ca = cr = cg = cb = 0;
#define ITEM_WALK() \
EINA_INLIST_FOREACH(start, par) \
{ \
if (!par->visible) continue; \
if (clip) \
{ \
if ((obj->cur->geometry.y + y + par->y + par->h) < (cy - 20)) \
continue; \
if ((obj->cur->geometry.y + y + par->y) > (cy + ch + 20)) \
break; \
} \
_layout_paragraph_render(o, par); \
EINA_INLIST_FOREACH(par->lines, ln) \
{ \
if (clip) \
{ \
if ((obj->cur->geometry.y + y + par->y + ln->y + ln->h) < (cy - 20)) \
continue; \
if ((obj->cur->geometry.y + y + par->y + ln->y) > (cy + ch + 20)) \
break; \
} \
EINA_INLIST_FOREACH(ln->items, itr) \
{ \
Evas_Coord yoff; \
yoff = ln->baseline; \
if (!EINA_DBL_EQ(itr->format->valign, -1.0)) \
{ \
if (itr->type == EVAS_TEXTBLOCK_ITEM_TEXT) \
{ \
Evas_Object_Textblock_Text_Item *titr = \
(Evas_Object_Textblock_Text_Item *)itr; \
int ascent = 0; \
int descent = 0; \
if (titr->text_props.font_instance) \
{ \
ascent = evas_common_font_instance_ascent_get(titr->text_props.font_instance); \
descent = evas_common_font_instance_descent_get(titr->text_props.font_instance); \
} \
yoff = ascent + \
(itr->format->valign * (ln->h - (ascent + descent))); \
} \
else yoff = itr->format->valign * (ln->h - itr->h); \
} \
itr->yoff = yoff; \
if (clip) \
{ \
if ((obj->cur->geometry.x + x + ln->x + itr->x + itr->w) < (cx - 20)) \
continue; \
if ((obj->cur->geometry.x + x + ln->x + itr->x) > (cx + cw + 20)) \
break; \
} \
if ((ln->x + itr->x + itr->w) <= 0) continue; \
if (ln->x + itr->x > obj->cur->geometry.w) break; \
do
#define ITEM_WALK_END() \
while (0); \
} \
} \
} \
do {} while(0)
#define COLOR_SET(col) \
nr = obj->cur->cache.clip.r * ti->parent.format->color.col.r; \
ng = obj->cur->cache.clip.g * ti->parent.format->color.col.g; \
nb = obj->cur->cache.clip.b * ti->parent.format->color.col.b; \
na = obj->cur->cache.clip.a * ti->parent.format->color.col.a; \
if (na != ca || nb != cb || ng != cg || nr != cr) \
{ \
ENFN->context_color_set(engine, context, \
nr / 255, ng / 255, nb / 255, na / 255); \
cr = nr; cg = ng; cb = nb; ca = na; \
}
#define COLOR_SET_AMUL(col, amul) \
nr = obj->cur->cache.clip.r * ti->parent.format->color.col.r * (amul); \
ng = obj->cur->cache.clip.g * ti->parent.format->color.col.g * (amul); \
nb = obj->cur->cache.clip.b * ti->parent.format->color.col.b * (amul); \
na = obj->cur->cache.clip.a * ti->parent.format->color.col.a * (amul); \
if (na != ca || nb != cb || ng != cg || nr != cr) \
{ \
ENFN->context_color_set(engine, context, \
nr / 65025, ng / 65025, nb / 65025, na / 65025); \
cr = nr; cg = ng; cb = nb; ca = na; \
}
#define DRAW_TEXT_FILTER(gf, ox, oy) do { \
evas_filter_input_render(eo_obj, ti->gfx_filter->ctx, engine, output, gf->dc, ti, \
gf->pad.l, gf->pad.r, gf->pad.t, gf->pad.b, \
(ox), (oy), do_async); \
} while (0)
#define DRAW_TEXT_NOFILTER(ox, oy) do { \
ENFN->context_cutout_target(engine, context, \
obj->cur->geometry.x + ln->x - (ln->h * 4) + ti->parent.x + x + (ox) - 100, \
obj->cur->geometry.y + ln->par->y + ln->y - ln->h + y + (oy), \
ti->parent.w + (ln->h * 8), ln->h * 3); \
evas_font_draw_async_check(obj, engine, output, context, surface, \
ti->parent.format->font.font, \
obj->cur->geometry.x + ln->x + ti->parent.x + x + (ox), \
obj->cur->geometry.y + ln->par->y + ln->y + yoff + y + (oy), \
ti->parent.w, ti->parent.h, ti->parent.w, ti->parent.h, \
&ti->text_props, do_async); \
} while (0)
#define DRAW_TEXT(ox, oy) do { \
if (ti->parent.format->font.font) \
{ \
if (EINA_LIKELY(!ti->gfx_filter || (!ti->gfx_filter->ctx && !ti->gfx_filter->output))) \
DRAW_TEXT_NOFILTER(ox, oy); \
else if (ti->gfx_filter->ctx != NULL) \
DRAW_TEXT_FILTER(ti->parent.format->gfx_filter, ox, oy); \
} } while(0)
/* backing */
#define DRAW_RECT(ox, oy, ow, oh, or, og, ob, oa) \
do \
{ \
nr = obj->cur->cache.clip.r * or; \
ng = obj->cur->cache.clip.g * og; \
nb = obj->cur->cache.clip.b * ob; \
na = obj->cur->cache.clip.a * oa; \
if (na != ca || nb != cb || ng != cg || nr != cr) \
{ \
ENFN->context_color_set(engine, context, \
nr / 255, ng / 255, nb / 255, na / 255); \
cr = nr; cg = ng; cb = nb; ca = na; \
} \
ENFN->rectangle_draw(engine, \
output, \
context, \
surface, \
obj->cur->geometry.x + ln->x + x + (ox), \
obj->cur->geometry.y + ln->par->y + ln->y + y + (oy), \
(ow), \
(oh), \
do_async); \
} \
while (0)
#define DRAW_FORMAT_DASHED(oname, oy, oh, dw, dp) \
do \
{ \
if (itr->format->oname) \
{ \
unsigned char _or, _og, _ob, _oa; \
int _ind, _dx = 0, _dn, _dr; \
_or = itr->format->color.oname.r; \
_og = itr->format->color.oname.g; \
_ob = itr->format->color.oname.b; \
_oa = itr->format->color.oname.a; \
if (!EINA_INLIST_GET(itr)->next) \
{ \
_dn = itr->w / (dw + dp); \
_dr = itr->w % (dw + dp); \
} \
else \
{ \
_dn = itr->adv / (dw + dp); \
_dr = itr->adv % (dw + dp); \
} \
if (_dr > dw) _dr = dw; \
for (_ind = 0 ; _ind < _dn ; _ind++) \
{ \
DRAW_RECT(itr->x + _dx, oy, dw, oh, _or, _og, _ob, _oa); \
_dx += dw + dp; \
} \
DRAW_RECT(itr->x + _dx, oy, _dr, oh, _or, _og, _ob, _oa); \
} \
} \
while (0)
#define DRAW_FORMAT(oname, oy, oh) \
do \
{ \
if (itr->format->oname) \
{ \
unsigned char _or, _og, _ob, _oa; \
_or = itr->format->color.oname.r; \
_og = itr->format->color.oname.g; \
_ob = itr->format->color.oname.b; \
_oa = itr->format->color.oname.a; \
DRAW_RECT(itr->x, oy, itr->adv, oh, _or, _og, _ob, _oa); \
} \
} \
while (0)
{
Evas_Coord look_for_y = 0 - (obj->cur->geometry.y + y);
if (clip)
{
Evas_Coord tmp_lfy = cy - (obj->cur->geometry.y + y);
if (tmp_lfy > look_for_y)
look_for_y = tmp_lfy;
}
if (look_for_y >= 0)
start = _layout_find_paragraph_by_y(o, look_for_y);
if (!start)
start = o->paragraphs;
}
ITEM_WALK()
{
/* Check which other pass are necessary to avoid useless WALK */
Evas_Object_Textblock_Text_Item *ti;
ti = (itr->type == EVAS_TEXTBLOCK_ITEM_TEXT) ? _ITEM_TEXT(itr) : NULL;
if (ti)
{
if (ti->parent.format->style & (EVAS_TEXT_STYLE_SHADOW |
EVAS_TEXT_STYLE_OUTLINE_SOFT_SHADOW |
EVAS_TEXT_STYLE_OUTLINE_SHADOW |
EVAS_TEXT_STYLE_FAR_SHADOW |
EVAS_TEXT_STYLE_FAR_SOFT_SHADOW |
EVAS_TEXT_STYLE_SOFT_SHADOW))
{
shadows = eina_list_append(shadows, itr);
}
if ((ti->parent.format->style & EVAS_TEXT_STYLE_MASK_BASIC) ==
EVAS_TEXT_STYLE_GLOW)
{
glows = eina_list_append(glows, itr);
}
if (((ti->parent.format->style & EVAS_TEXT_STYLE_MASK_BASIC) == EVAS_TEXT_STYLE_OUTLINE) ||
((ti->parent.format->style & EVAS_TEXT_STYLE_MASK_BASIC) == EVAS_TEXT_STYLE_OUTLINE_SHADOW) ||
((ti->parent.format->style & EVAS_TEXT_STYLE_MASK_BASIC) == EVAS_TEXT_STYLE_OUTLINE_SOFT_SHADOW) ||
(ti->parent.format->style == EVAS_TEXT_STYLE_SOFT_OUTLINE))
{
outlines = eina_list_append(outlines, itr);
}
if (ti->parent.format->gfx_filter)
{
gfx_filters = eina_list_append(gfx_filters, itr);
}
}
/* Draw background */
DRAW_FORMAT(backing, 0, ln->h);
}
ITEM_WALK_END();
/* There are size adjustments that depend on the styles drawn here back
* in "_text_item_update_sizes" should not modify one without the other. */
/* gfx filters preparation */
EINA_LIST_FREE(gfx_filters, itr)
{
Efl_Canvas_Filter_State state = EFL_CANVAS_FILTER_STATE_DEFAULT;
Evas_Object_Textblock_Text_Item *ti = _ITEM_TEXT(itr);
Efl_Canvas_Text_Filter *filter;
Evas_Filter_Program *pgm;
Evas_Filter_Context *ctx;
Evas_Coord_Point target;
Eina_Bool ok;
ln = ti->parent.ln;
filter = ti->parent.format->gfx_filter;
pgm = _format_filter_program_get(o, ti->parent.format);
if (!pgm)
{
WRN("Filter '%s' not found on this object", filter->name);
continue;
}
if (!ti->gfx_filter)
{
ti->gfx_filter = calloc(1, sizeof(*ti->gfx_filter));
ti->gfx_filter->evas = obj->layer->evas;
ti->gfx_filter->ti = ti;
EINA_INLIST_APPEND(o->gfx_filter.text_items, ti->gfx_filter);
}
else if (ti->gfx_filter->output)
{
if (!filter->redraw)
{
if (obj->changed)
{
Evas_Filter_Proxy_Binding *pb;
Evas_Object_Protected_Data *source;
Eina_Iterator *iter;
iter = eina_hash_iterator_data_new(o->gfx_filter.sources);
EINA_ITERATOR_FOREACH(iter, pb)
{
source = efl_data_scope_get(pb->eo_source, EFL_CANVAS_OBJECT_CLASS);
if (source->changed)
{
filter->redraw = EINA_TRUE;
break;
}
}
eina_iterator_free(iter);
}
if (!filter->redraw) continue;
}
ENFN->image_free(engine, ti->gfx_filter->output);
ti->gfx_filter->output = NULL;
}
ctx = evas_filter_context_new(obj->layer->evas, do_async, ti->gfx_filter);
evas_filter_state_prepare(eo_obj, &state, ti);
evas_filter_program_state_set(pgm, &state);
ok = evas_filter_context_program_use(engine, output, ctx, pgm, EINA_FALSE, 0, 0);
if (!ok)
{
evas_filter_context_unref(ctx);
filter->invalid = EINA_TRUE;
continue;
}
// target position
evas_filter_program_padding_get(pgm, &filter->pad, NULL);
target = _filter_target_position_calc(obj, ti, x, y);
ENFN->context_color_set(engine, context, 255, 255, 255, 255);
ENFN->context_multiplier_set(engine, context,
obj->cur->cache.clip.r, obj->cur->cache.clip.g,
obj->cur->cache.clip.b, obj->cur->cache.clip.a);
evas_filter_context_proxy_render_all(ctx, eo_obj, output, EINA_FALSE);
evas_filter_context_buffers_allocate_all(ctx);
evas_filter_target_set(ctx, context, surface, target.x, target.y, NULL);
if (ti->gfx_filter->ctx)
evas_filter_context_unref(ti->gfx_filter->ctx);
ti->gfx_filter->ctx = ctx;
ti->gfx_filter->do_async = do_async;
// common data for all items (FIXME: should be common to object)
if (!filter->dc)
{
filter->dc = ENFN->context_new(engine);
ENFN->context_color_set(engine, filter->dc, 255, 255, 255, 255);
}
filter->eo_obj = eo_obj;
filter->evas = obj->layer->evas;
ENFN->context_multiplier_unset(engine, context);
}
/* shadows */
EINA_LIST_FREE(shadows, itr)
{
int shad_dst, shad_sz, dx, dy, haveshad;
Evas_Object_Textblock_Text_Item *ti;
Evas_Coord yoff;
ti = (itr->type == EVAS_TEXTBLOCK_ITEM_TEXT) ? _ITEM_TEXT(itr) : NULL;
if (!ti) continue;
yoff = itr->yoff;
ln = itr->ln;
if (EINA_UNLIKELY(_filter_context_get(ti) != NULL))
context = ti->parent.format->gfx_filter->dc;
shad_dst = shad_sz = dx = dy = haveshad = 0;
switch (ti->parent.format->style & EVAS_TEXT_STYLE_MASK_BASIC)
{
case EVAS_TEXT_STYLE_SHADOW:
shad_dst = 1;
haveshad = 1;
break;
case EVAS_TEXT_STYLE_OUTLINE_SOFT_SHADOW:
shad_dst = 1;
shad_sz = 2;
haveshad = 1;
break;
case EVAS_TEXT_STYLE_OUTLINE_SHADOW:
case EVAS_TEXT_STYLE_FAR_SHADOW:
shad_dst = 2;
haveshad = 1;
break;
case EVAS_TEXT_STYLE_FAR_SOFT_SHADOW:
shad_dst = 2;
shad_sz = 2;
haveshad = 1;
break;
case EVAS_TEXT_STYLE_SOFT_SHADOW:
shad_dst = 1;
shad_sz = 2;
haveshad = 1;
break;
default:
break;
}
if (haveshad)
{
if (shad_dst > 0)
{
switch (ti->parent.format->style & EVAS_TEXT_STYLE_MASK_SHADOW_DIRECTION)
{
case EVAS_TEXT_STYLE_SHADOW_DIRECTION_BOTTOM_RIGHT:
dx = 1;
dy = 1;
break;
case EVAS_TEXT_STYLE_SHADOW_DIRECTION_BOTTOM:
dx = 0;
dy = 1;
break;
case EVAS_TEXT_STYLE_SHADOW_DIRECTION_BOTTOM_LEFT:
dx = -1;
dy = 1;
break;
case EVAS_TEXT_STYLE_SHADOW_DIRECTION_LEFT:
dx = -1;
dy = 0;
break;
case EVAS_TEXT_STYLE_SHADOW_DIRECTION_TOP_LEFT:
dx = -1;
dy = -1;
break;
case EVAS_TEXT_STYLE_SHADOW_DIRECTION_TOP:
dx = 0;
dy = -1;
break;
case EVAS_TEXT_STYLE_SHADOW_DIRECTION_TOP_RIGHT:
dx = 1;
dy = -1;
break;
case EVAS_TEXT_STYLE_SHADOW_DIRECTION_RIGHT:
dx = 1;
dy = 0;
default:
break;
}
dx *= shad_dst;
dy *= shad_dst;
}
switch (shad_sz)
{
case 0:
COLOR_SET(shadow);
DRAW_TEXT(dx, dy);
break;
case 2:
for (j = 0; j < 5; j++)
{
for (i = 0; i < 5; i++)
{
if (vals[i][j] != 0)
{
COLOR_SET_AMUL(shadow, vals[i][j] * 50);
DRAW_TEXT(i - 2 + dx, j - 2 + dy);
}
}
}
break;
default:
break;
}
}
context = context_save;
}
/* glows */
EINA_LIST_FREE(glows, itr)
{
Evas_Object_Textblock_Text_Item *ti;
Evas_Coord yoff;
ti = (itr->type == EVAS_TEXTBLOCK_ITEM_TEXT) ? _ITEM_TEXT(itr) : NULL;
if (!ti) continue;
yoff = itr->yoff;
ln = itr->ln;
if (EINA_UNLIKELY(_filter_context_get(ti) != NULL))
context = ti->parent.format->gfx_filter->dc;
if ((ti->parent.format->style & EVAS_TEXT_STYLE_MASK_BASIC) == EVAS_TEXT_STYLE_GLOW)
{
for (j = 0; j < 5; j++)
{
for (i = 0; i < 5; i++)
{
if (vals[i][j] != 0)
{
COLOR_SET_AMUL(glow, vals[i][j] * 50);
DRAW_TEXT(i - 2, j - 2);
}
}
}
COLOR_SET(glow2);
DRAW_TEXT(-1, 0);
DRAW_TEXT(1, 0);
DRAW_TEXT(0, -1);
DRAW_TEXT(0, 1);
}
context = context_save;
}
/* outlines */
EINA_LIST_FREE(outlines, itr)
{
Evas_Object_Textblock_Text_Item *ti;
Evas_Coord yoff;
ti = (itr->type == EVAS_TEXTBLOCK_ITEM_TEXT) ? _ITEM_TEXT(itr) : NULL;
if (!ti) continue;
yoff = itr->yoff;
ln = itr->ln;
if (EINA_UNLIKELY(_filter_context_get(ti) != NULL))
context = ti->parent.format->gfx_filter->dc;
if (((ti->parent.format->style & EVAS_TEXT_STYLE_MASK_BASIC) == EVAS_TEXT_STYLE_OUTLINE) ||
((ti->parent.format->style & EVAS_TEXT_STYLE_MASK_BASIC) == EVAS_TEXT_STYLE_OUTLINE_SHADOW) ||
((ti->parent.format->style & EVAS_TEXT_STYLE_MASK_BASIC) == EVAS_TEXT_STYLE_OUTLINE_SOFT_SHADOW))
{
COLOR_SET(outline);
DRAW_TEXT(-1, 0);
DRAW_TEXT(1, 0);
DRAW_TEXT(0, -1);
DRAW_TEXT(0, 1);
}
else if (ti->parent.format->style == EVAS_TEXT_STYLE_SOFT_OUTLINE)
{
for (j = 0; j < 5; j++)
{
for (i = 0; i < 5; i++)
{
if (((i != 2) || (j != 2)) && (vals[i][j] != 0))
{
COLOR_SET_AMUL(outline, vals[i][j] * 50);
DRAW_TEXT(i - 2, j - 2);
}
}
}
}
context = context_save;
}
/* normal text and lines */
/* Get the thickness, and save it for strikethrough of non-text items. */
strikethrough_thickness = underline_thickness = evas_common_font_instance_underline_thickness_get(NULL);
underline_position = evas_common_font_instance_underline_position_get(NULL);
ENFN->context_multiplier_unset(engine, context);
if (obj->cur->clipper)
ENFN->context_multiplier_set(engine, context,
obj->cur->clipper->cur->cache.clip.r,
obj->cur->clipper->cur->cache.clip.g,
obj->cur->clipper->cur->cache.clip.b,
obj->cur->clipper->cur->cache.clip.a);
ITEM_WALK()
{
Evas_Object_Textblock_Text_Item *ti;
if (cur_ln != ln)
{
Evas_Object_Textblock_Item *itrr;
cur_ln = ln;
underline_thickness =
evas_common_font_instance_underline_thickness_get(NULL);
underline_position =
evas_common_font_instance_underline_position_get(NULL);
EINA_INLIST_FOREACH(ln->items, itrr)
{
if (itrr->type == EVAS_TEXTBLOCK_ITEM_TEXT)
{
int fi_underline_thickness, fi_underline_position;
void *fi = _ITEM_TEXT(itrr)->text_props.font_instance;
fi_underline_thickness =
evas_common_font_instance_underline_thickness_get(fi);
fi_underline_position =
evas_common_font_instance_underline_position_get(fi);
if (fi_underline_thickness > underline_thickness)
underline_thickness = fi_underline_thickness;
if (fi_underline_position > underline_position)
underline_position = fi_underline_position;
}
}
}
ti = (itr->type == EVAS_TEXTBLOCK_ITEM_TEXT) ? _ITEM_TEXT(itr) : NULL;
/* NORMAL TEXT */
if (ti)
{
void *fi = _ITEM_TEXT(itr)->text_props.font_instance;
if (EINA_UNLIKELY(_filter_context_get(ti) != NULL))
context = ti->parent.format->gfx_filter->dc;
COLOR_SET(normal);
DRAW_TEXT(0, 0);
strikethrough_thickness =
evas_common_font_instance_underline_thickness_get(fi);
context = context_save;
if (EINA_UNLIKELY(ti->parent.format->gfx_filter != NULL))
{
Evas_Filter_Context *ctx = _filter_context_get(ti);
void *buffer = ti->gfx_filter ? ti->gfx_filter->output : NULL;
if (buffer)
{
Evas_Coord_Point target;
int W = 0, H = 0;
target = _filter_target_position_calc(obj, ti, x, y);
ca = cr = cb = cg = 255;
ENFN->context_color_set(engine, context, 255, 255, 255, 255);
ENFN->image_size_get(engine, buffer, &W, &H);
ENFN->image_draw(engine, output, context, surface, buffer,
0, 0, W, H, target.x, target.y, W, H, 0, do_async);
}
else if (ctx)
{
evas_filter_context_post_run_callback_set(ctx, _filter_cb, obj->layer->evas);
evas_filter_context_run(engine, output, ctx);
}
}
}
/* STRIKETHROUGH */
DRAW_FORMAT(strikethrough, (ln->h / 2), strikethrough_thickness);
/* UNDERLINE */
DRAW_FORMAT(underline, ln->baseline + underline_position,
underline_thickness * itr->format->underline_height);
/* UNDERLINE DASHED */
DRAW_FORMAT_DASHED(underline_dash, ln->baseline + underline_position,
underline_thickness,
itr->format->underline_dash_width,
itr->format->underline_dash_gap);
/* UNDERLINE2 */
DRAW_FORMAT(underline2, ln->baseline + underline_position + underline_thickness +
underline_position, underline_thickness);
}
ITEM_WALK_END();
ENFN->context_multiplier_unset(engine, context);
}
EOLIAN static void
_efl_canvas_text_efl_canvas_filter_internal_filter_state_prepare(
Eo *eo_obj, Efl_Canvas_Text_Data *pd EINA_UNUSED, Efl_Canvas_Filter_State *state, void *data)
{
Evas_Object_Protected_Data *obj = efl_data_scope_get(eo_obj, EFL_CANVAS_OBJECT_CLASS);
Efl_Canvas_Text_Data *o = efl_data_scope_get(eo_obj, EFL_CANVAS_TEXT_CLASS);
Evas_Object_Textblock_Text_Item *ti = data;
Efl_Canvas_Text_Filter_Program *program;
Evas_Filter_Padding pad = {};
#define STATE_COLOR(dst, src) dst.r = src.r; dst.g = src.g; dst.b = src.b; dst.a = src.a
STATE_COLOR(state->color, ti->parent.format->color.normal);
STATE_COLOR(state->text.glow, ti->parent.format->color.glow);
STATE_COLOR(state->text.glow2, ti->parent.format->color.glow2);
STATE_COLOR(state->text.shadow, ti->parent.format->color.shadow);
STATE_COLOR(state->text.outline, ti->parent.format->color.outline);
#undef STATE_COLOR
program = _filter_program_find(o, ti->parent.format->gfx_filter->name);
if (program) evas_filter_program_padding_get(program->pgm, &pad, NULL);
state->w = ti->parent.w; // + l + r; (already included)
state->h = ti->parent.h + pad.t + pad.b;
state->scale = obj->cur->scale;
}
EOLIAN static Eina_Bool
_efl_canvas_text_efl_canvas_filter_internal_filter_input_render(
Eo *obj EINA_UNUSED, Efl_Canvas_Text_Data *pd EINA_UNUSED, void *filter,
void *engine, void *output, void *drawctx, void *data,
int l, int r EINA_UNUSED, int t, int b EINA_UNUSED,
int x, int y, Eina_Bool do_async)
{
Evas_Object_Textblock_Text_Item *ti = data;
return evas_filter_font_draw(filter, engine, output, drawctx,
EVAS_FILTER_BUFFER_INPUT_ID,
ti->parent.format->font.font,
x + l,
y + t + ti->parent.yoff + ti->parent.h - ti->parent.ln->h,
&ti->text_props, do_async);
}
EOLIAN static void
_efl_canvas_text_efl_canvas_filter_internal_filter_dirty(
Eo *obj EINA_UNUSED, Efl_Canvas_Text_Data *pd EINA_UNUSED)
{
WRN("Filter marked as dirty. NOT IMPLEMENTED!");
}
EOLIAN static void
_efl_canvas_text_efl_gfx_filter_filter_program_set(Eo *eo_obj, Efl_Canvas_Text_Data *pd, const char *code, const char *name)
{
Evas_Object_Protected_Data *obj = efl_data_scope_get(eo_obj, EFL_CANVAS_OBJECT_CLASS);
Efl_Canvas_Text_Filter_Program *prg;
prg = _filter_program_find(pd, name);
if (prg)
{
if (eina_streq(prg->code, code)) return;
}
else
{
prg = calloc(1, sizeof(*prg));
prg->name = eina_stringshare_add(name);
pd->gfx_filter.programs = (Efl_Canvas_Text_Filter_Program *)
eina_inlist_append(EINA_INLIST_GET(pd->gfx_filter.programs), EINA_INLIST_GET(prg));
}
eina_stringshare_replace(&prg->code, code);
prg->changed = EINA_TRUE;
pd->format_changed = EINA_TRUE;
_evas_textblock_invalidate_all(pd);
_evas_textblock_changed(pd, eo_obj);
evas_object_change(eo_obj, obj);
}
EOLIAN static void
_efl_canvas_text_efl_gfx_filter_filter_program_get(Eo *obj EINA_UNUSED, Efl_Canvas_Text_Data *pd EINA_UNUSED,
const char **code EINA_UNUSED, const char **name EINA_UNUSED)
{
// FIXME FIXME FIXME FIXME FIXME FIXME FIXME FIXME FIXME FIXME FIXME FIXME
ERR("Invalid API definition for this object! 'name' needs to be an @in or @inout value!");
}
static Evas_Filter_Data_Binding *
_filter_data_binding_find(Efl_Canvas_Text_Data *pd, const char *name)
{
Evas_Filter_Data_Binding *db;
if (!name) return NULL;
EINA_INLIST_FOREACH(pd->gfx_filter.data_bindings, db)
if (!strcmp(db->name, name))
return db;
return NULL;
}
EOLIAN static void
_efl_canvas_text_efl_gfx_filter_filter_data_set(Eo *obj, Efl_Canvas_Text_Data *pd, const char *name, const char *value, Eina_Bool execute)
{
Efl_Canvas_Text_Filter_Program *prg;
Evas_Filter_Data_Binding *db;
if (!name) return;
db = _filter_data_binding_find(pd, name);
if (db)
{
if (eina_streq(db->value, value) && (db->execute == execute))
return;
if (!value)
{
EINA_INLIST_REMOVE(pd->gfx_filter.data_bindings, db);
eina_stringshare_del(db->name);
eina_stringshare_del(db->value);
free(db);
return;
}
}
else if (!value)
{
return;
}
else
{
db = calloc(1, sizeof(*db));
pd->gfx_filter.data_bindings = (Evas_Filter_Data_Binding *)
eina_inlist_append(EINA_INLIST_GET(pd->gfx_filter.data_bindings), EINA_INLIST_GET(db));
db->name = eina_stringshare_add(name);
}
eina_stringshare_replace(&db->value, value);
db->execute = execute;
EINA_INLIST_FOREACH(pd->gfx_filter.programs, prg)
{
if (!prg->code) continue;
if (strstr(prg->code, name))
prg->changed = EINA_TRUE;
}
pd->format_changed = EINA_TRUE;
_evas_textblock_invalidate_all(pd);
_evas_textblock_changed(pd, obj);
evas_object_change(obj, efl_data_scope_get(obj, EFL_CANVAS_OBJECT_CLASS));
}
EOLIAN static void
_efl_canvas_text_efl_gfx_filter_filter_data_get(Eo *obj EINA_UNUSED, Efl_Canvas_Text_Data *pd, const char *name, const char **value, Eina_Bool *execute)
{
Evas_Filter_Data_Binding *db;
db = _filter_data_binding_find(pd, name);
if (!db)
{
if (value) *value = NULL;
if (execute) *execute = EINA_FALSE;
return;
}
if (value) *value = db->value;
if (execute) *execute = db->execute;
}
EOLIAN static void
_efl_canvas_text_efl_gfx_filter_filter_source_set(Eo *eo_obj, Efl_Canvas_Text_Data *pd, const char *name, Efl_Gfx *eo_source)
{
Evas_Object_Protected_Data *obj, *source;
Evas_Filter_Proxy_Binding *pb;
if (!name) return;
obj = efl_data_scope_get(eo_obj, EFL_CANVAS_OBJECT_CLASS);
source = efl_data_scope_get(eo_source, EFL_CANVAS_OBJECT_CLASS);
evas_object_async_block(obj);
pb = eina_hash_find(pd->gfx_filter.sources, name);
if (pb)
{
if (pb->eo_source == eo_source) return;
eina_hash_del(pd->gfx_filter.sources, name, pb);
}
else if (!eo_source)
{
return;
}
else
{
pb = calloc(1, sizeof(*pb));
pb->eo_proxy = eo_obj;
pb->eo_source = eo_source;
pb->name = eina_stringshare_add(name);
}
if (!pd->gfx_filter.sources)
pd->gfx_filter.sources = eina_hash_string_small_new(_evas_filter_source_hash_free_cb);
eina_hash_set(pd->gfx_filter.sources, name, pb);
if (!eina_list_data_find(source->proxy->proxies, eo_obj))
{
EINA_COW_WRITE_BEGIN(evas_object_proxy_cow, source->proxy, Evas_Object_Proxy_Data, source_write)
source_write->proxies = eina_list_append(source_write->proxies, eo_obj);
EINA_COW_WRITE_END(evas_object_proxy_cow, source->proxy, source_write)
}
if (!obj->proxy->is_proxy)
{
EINA_COW_WRITE_BEGIN(evas_object_proxy_cow, obj->proxy, Evas_Object_Proxy_Data, proxy_write)
proxy_write->is_proxy = EINA_TRUE;
EINA_COW_WRITE_END(evas_object_proxy_cow, obj->proxy, proxy_write)
}
pd->format_changed = EINA_TRUE;
_evas_textblock_invalidate_all(pd);
_evas_textblock_changed(pd, eo_obj);
evas_object_change(eo_obj, obj);
}
EOLIAN static Efl_Gfx *
_efl_canvas_text_efl_gfx_filter_filter_source_get(Eo *obj EINA_UNUSED, Efl_Canvas_Text_Data *pd, const char *name)
{
return eina_hash_find(pd->gfx_filter.sources, name);
}
static void
evas_object_textblock_coords_recalc(Evas_Object *eo_obj,
Evas_Object_Protected_Data *obj,
void *type_private_data)
{
Efl_Canvas_Text_Data *o = type_private_data;
#ifdef BIDI_SUPPORT
if (o->inherit_paragraph_direction)
{
Evas_BiDi_Direction parent_dir = EVAS_BIDI_DIRECTION_NEUTRAL;
if (obj->smart.parent)
{
parent_dir = evas_object_paragraph_direction_get(obj->smart.parent);
}
if (parent_dir != o->paragraph_direction)
{
o->paragraph_direction = parent_dir;
o->changed_paragraph_direction = EINA_TRUE;
}
}
#endif
if (
// width changed thus we may have to re-wrap or change centering etc.
(obj->cur->geometry.w != o->last_w) ||
// if valign not top OR we have ellipsis, then if height changed we need to re-eval valign or ... spot
(((!EINA_DBL_EQ(o->valign, 0.0)) || (o->have_ellipsis)) &&
(
((o->formatted.oneline_h == 0) &&
(obj->cur->geometry.h != o->last_h)) ||
((o->formatted.oneline_h != 0) &&
(((obj->cur->geometry.h != o->last_h) &&
(o->formatted.oneline_h < obj->cur->geometry.h))))
)
) ||
// obviously if content text changed we need to reformat it
(o->content_changed) ||
// if format changed (eg styles) we need to re-format/match tags etc.
(o->format_changed) ||
(o->obstacle_changed) ||
(o->changed_paragraph_direction)
)
{
LYDBG("ZZ: invalidate 2 %p ## %i != %i || %3.3f || %i && %i != %i | %i %i || %d\n", eo_obj, obj->cur->geometry.w, o->last_w, o->valign, o->have_ellipsis, obj->cur->geometry.h, o->last_h, o->content_changed, o->format_changed, o->changed_paragraph_direction);
if (o->changed_paragraph_direction)
{
_evas_textblock_invalidate_all(o);
_evas_textblock_changed(o, eo_obj);
}
o->formatted.valid = 0;
o->changed = 1;
}
}
static void
evas_object_textblock_render_pre(Evas_Object *eo_obj,
Evas_Object_Protected_Data *obj,
void *type_private_data)
{
Efl_Canvas_Text_Data *o = type_private_data;
ASYNC_BLOCK;
int is_v, was_v;
/* dont pre-render the obj twice! */
if (obj->pre_render_done) return;
obj->pre_render_done = EINA_TRUE;
/* pre-render phase. this does anything an object needs to do just before */
/* rendering. this could mean loading the image data, retrieving it from */
/* elsewhere, decoding video etc. */
/* then when this is done the object needs to figure if it changed and */
/* if so what and where and add the appropriate redraw textblocks */
//evas_object_textblock_coords_recalc(eo_obj, obj, obj->private_data);
if (!_relayout_if_needed(eo_obj, o))
{
o->redraw = 0;
evas_object_render_pre_prev_cur_add(&obj->layer->evas->clip_changes,
eo_obj, obj);
is_v = evas_object_is_visible(eo_obj, obj);
was_v = evas_object_was_visible(eo_obj, obj);
goto done;
}
if (o->changed)
{
LYDBG("ZZ: relayout 16\n");
o->redraw = 0;
evas_object_render_pre_prev_cur_add(&obj->layer->evas->clip_changes,
eo_obj, obj);
is_v = evas_object_is_visible(eo_obj, obj);
was_v = evas_object_was_visible(eo_obj, obj);
goto done;
}
if (o->redraw)
{
o->redraw = 0;
evas_object_render_pre_prev_cur_add(&obj->layer->evas->clip_changes,
eo_obj, obj);
is_v = evas_object_is_visible(eo_obj, obj);
was_v = evas_object_was_visible(eo_obj, obj);
goto done;
}
/* if someone is clipping this obj - go calculate the clipper */
if (obj->cur->clipper)
{
if (obj->cur->cache.clip.dirty)
evas_object_clip_recalc(obj->cur->clipper);
obj->cur->clipper->func->render_pre(obj->cur->clipper->object,
obj->cur->clipper,
obj->cur->clipper->private_data);
}
/* now figure what changed and add draw rects */
/* if it just became visible or invisible */
is_v = evas_object_is_visible(eo_obj, obj);
was_v = evas_object_was_visible(eo_obj, obj);
if (is_v != was_v)
{
evas_object_render_pre_visible_change(&obj->layer->evas->clip_changes,
eo_obj, is_v, was_v);
goto done;
}
if (obj->changed_map || obj->changed_src_visible)
{
evas_object_render_pre_prev_cur_add(&obj->layer->evas->clip_changes,
eo_obj, obj);
goto done;
}
/* it's not visible - we accounted for it appearing or not so just abort */
if (!is_v) goto done;
/* clipper changed this is in addition to anything else for obj */
evas_object_render_pre_clipper_change(&obj->layer->evas->clip_changes,
eo_obj);
/* if we restacked (layer or just within a layer) and don't clip anyone */
if (obj->restack)
{
evas_object_render_pre_prev_cur_add(&obj->layer->evas->clip_changes,
eo_obj, obj);
goto done;
}
/* if it changed color */
if ((obj->cur->color.r != obj->prev->color.r) ||
(obj->cur->color.g != obj->prev->color.g) ||
(obj->cur->color.b != obj->prev->color.b) ||
(obj->cur->color.a != obj->prev->color.a))
{
evas_object_render_pre_prev_cur_add(&obj->layer->evas->clip_changes,
eo_obj, obj);
goto done;
}
/* if it changed geometry - and obviously not visibility or color */
/* calculate differences since we have a constant color fill */
/* we really only need to update the differences */
if ((obj->cur->geometry.x != obj->prev->geometry.x) ||
(obj->cur->geometry.y != obj->prev->geometry.y) ||
(obj->cur->geometry.w != obj->prev->geometry.w) ||
(obj->cur->geometry.h != obj->prev->geometry.h))
{
evas_object_render_pre_prev_cur_add(&obj->layer->evas->clip_changes,
eo_obj, obj);
goto done;
}
if (obj->cur->render_op != obj->prev->render_op)
{
evas_object_render_pre_prev_cur_add(&obj->layer->evas->clip_changes,
eo_obj, obj);
goto done;
}
done:
evas_object_render_pre_effect_updates(&obj->layer->evas->clip_changes,
eo_obj, is_v, was_v);
}
static void
evas_object_textblock_render_post(Evas_Object *eo_obj EINA_UNUSED,
Evas_Object_Protected_Data *obj,
void *type_private_data)
{
Efl_Canvas_Text_Data *o = type_private_data;
ASYNC_BLOCK;
/* this moves the current data to the previous state parts of the object */
/* in whatever way is safest for the object. also if we don't need object */
/* data anymore we can free it if the object deems this is a good idea */
/* o = (Efl_Canvas_Text_Data *)(obj->object_data); */
/* remove those pesky changes */
evas_object_clip_changes_clean(obj);
/* move cur to prev safely for object data */
evas_object_cur_prev(obj);
/* o->prev = o->cur; */
EINA_SAFETY_ON_NULL_RETURN(o);
_filter_output_cache_prune(obj, o);
}
static unsigned int evas_object_textblock_id_get(Evas_Object *eo_obj)
{
Efl_Canvas_Text_Data *o = efl_data_scope_get(eo_obj, MY_CLASS);
if (!o) return 0;
return MAGIC_OBJ_TEXTBLOCK;
}
static unsigned int evas_object_textblock_visual_id_get(Evas_Object *eo_obj)
{
Efl_Canvas_Text_Data *o = efl_data_scope_get(eo_obj, MY_CLASS);
if (!o) return 0;
return MAGIC_OBJ_CUSTOM;
}
static void *evas_object_textblock_engine_data_get(Evas_Object *eo_obj)
{
Efl_Canvas_Text_Data *o = efl_data_scope_get(eo_obj, MY_CLASS);
if (!o) return NULL;
return o->engine_data;
}
static int
evas_object_textblock_is_opaque(Evas_Object *eo_obj EINA_UNUSED,
Evas_Object_Protected_Data *obj EINA_UNUSED,
void *type_private_data EINA_UNUSED)
{
/* this returns 1 if the internal object data implies that the object is */
/* currently fulyl opque over the entire gradient it occupies */
return 0;
}
static int
evas_object_textblock_was_opaque(Evas_Object *eo_obj EINA_UNUSED,
Evas_Object_Protected_Data *obj EINA_UNUSED,
void *type_private_data EINA_UNUSED)
{
/* this returns 1 if the internal object data implies that the object was */
/* currently fulyl opque over the entire gradient it occupies */
return 0;
}
static void
evas_object_textblock_scale_update(Evas_Object *eo_obj EINA_UNUSED,
Evas_Object_Protected_Data *obj EINA_UNUSED,
void *type_private_data)
{
Efl_Canvas_Text_Data *o = type_private_data;
_evas_textblock_invalidate_all(o);
_evas_textblock_changed(o, eo_obj);
o->last_w = -1;
o->last_h = -1;
}
void
_evas_object_textblock_rehint(Evas_Object *eo_obj)
{
Evas_Object_Protected_Data *obj = efl_data_scope_get(eo_obj, EFL_CANVAS_OBJECT_CLASS);
Efl_Canvas_Text_Data *o = efl_data_scope_get(eo_obj, MY_CLASS);
Evas_Object_Textblock_Paragraph *par;
Evas_Object_Textblock_Line *ln;
EINA_INLIST_FOREACH(o->paragraphs, par)
{
EINA_INLIST_FOREACH(par->lines, ln)
{
Evas_Object_Textblock_Item *it;
EINA_INLIST_FOREACH(ln->items, it)
{
if (it->type == EVAS_TEXTBLOCK_ITEM_TEXT)
{
Evas_Object_Textblock_Text_Item *ti = _ITEM_TEXT(it);
if (ti->parent.format->font.font)
{
evas_font_load_hinting_set(obj->layer->evas->evas,
ti->parent.format->font.font,
obj->layer->evas->hinting);
}
}
}
}
}
_evas_textblock_invalidate_all(o);
_evas_textblock_changed(o, eo_obj);
}
EOLIAN static void
_efl_canvas_text_efl_canvas_object_paragraph_direction_set(Eo *eo_obj,
Efl_Canvas_Text_Data *o,
Evas_BiDi_Direction dir)
{
#ifdef BIDI_SUPPORT
Evas_Object_Protected_Data *obj = efl_data_scope_get(eo_obj, EFL_CANVAS_OBJECT_CLASS);
if ((!(o->inherit_paragraph_direction) && (o->paragraph_direction == dir)) ||
(o->inherit_paragraph_direction && (dir == EVAS_BIDI_DIRECTION_INHERIT)))
return;
if (dir == EVAS_BIDI_DIRECTION_INHERIT)
{
o->inherit_paragraph_direction = EINA_TRUE;
Evas_BiDi_Direction parent_dir = EVAS_BIDI_DIRECTION_NEUTRAL;
if (obj->smart.parent)
parent_dir = evas_object_paragraph_direction_get(obj->smart.parent);
if (parent_dir != o->paragraph_direction)
{
o->paragraph_direction = parent_dir;
o->changed_paragraph_direction = EINA_TRUE;
_evas_textblock_invalidate_all(o);
_evas_textblock_changed(o, eo_obj);
}
}
else
{
o->inherit_paragraph_direction = EINA_FALSE;
o->paragraph_direction = dir;
o->changed_paragraph_direction = EINA_TRUE;
_evas_textblock_invalidate_all(o);
_evas_textblock_changed(o, eo_obj);
}
#else
(void) eo_obj;
(void) o;
(void) dir;
#endif
}
EOLIAN static Evas_BiDi_Direction
_efl_canvas_text_efl_canvas_object_paragraph_direction_get(Eo *eo_obj EINA_UNUSED,
Efl_Canvas_Text_Data *o)
{
return o->paragraph_direction;
}
static int
_prepend_text_run2(Efl_Text_Cursor_Cursor *cur, const char *s, const char *p)
{
if ((s) && (p > s))
{
char *ts;
ts = alloca(p - s + 1);
strncpy(ts, s, p - s);
ts[p - s] = 0;
return _evas_textblock_cursor_text_prepend(cur, ts);
}
return 0;
}
static int
_efl_canvas_text_cursor_text_append(Efl_Text_Cursor_Cursor *cur,
const char *text)
{
if (!text) return 0;
const char *off = text;
int len = 0;
Evas_Object_Protected_Data *obj = efl_data_scope_get(cur->obj, EFL_CANVAS_OBJECT_CLASS);
evas_object_async_block(obj);
while (*off)
{
char *format = NULL;
int n = 1;
if (!strncmp(_PARAGRAPH_SEPARATOR_UTF8, off,
strlen(_PARAGRAPH_SEPARATOR_UTF8)))
{
format = "ps";
n = strlen(_PARAGRAPH_SEPARATOR_UTF8);
}
else if (!strncmp(_NEWLINE_UTF8, off, strlen(_NEWLINE_UTF8)))
{
format = "br";
n = strlen(_NEWLINE_UTF8);
}
else if (!strncmp(_TAB_UTF8, off, strlen(_TAB_UTF8)))
{
format = "tab";
n = strlen(_TAB_UTF8);
}
if (format)
{
len += _prepend_text_run2(cur, text, off);
if (_evas_textblock_cursor_format_prepend(cur, format))
{
len++;
}
text = off + n; /* sync text with next segment */
}
off += n;
}
len += _prepend_text_run2(cur, text, off);
return len;
}
EOLIAN static void
_efl_canvas_text_efl_text_text_set(Eo *eo_obj, Efl_Canvas_Text_Data *o,
const char *text)
{
ASYNC_BLOCK;
evas_object_textblock_text_markup_set(eo_obj, "");
efl_text_cursor_text_insert(eo_obj, o->cursor, text);
//efl_event_callback_call(eo_obj, EFL_CANVAS_TEXT_EVENT_CHANGED, NULL);
}
static char *
_canvas_text_get_all(Eo *eo_obj, Efl_Canvas_Text_Data *o EINA_UNUSED)
{
Efl_Text_Cursor_Cursor start, end;
_evas_textblock_cursor_init(&start, eo_obj);
_evas_textblock_cursor_init(&end, eo_obj);
evas_textblock_cursor_paragraph_first(&start);
evas_textblock_cursor_paragraph_last(&end);
return _evas_textblock_cursor_range_text_get(&start, &end, EVAS_TEXTBLOCK_TEXT_PLAIN);
}
EOLIAN static const char *
_efl_canvas_text_efl_text_text_get(Eo *eo_obj, Efl_Canvas_Text_Data *o)
{
Evas_Object_Protected_Data *obj = efl_data_scope_get(eo_obj, EFL_CANVAS_OBJECT_CLASS);
evas_object_async_block(obj);
free(o->utf8);
o->utf8 = _canvas_text_get_all(eo_obj, o);
return o->utf8;
}
/**
* @internal
* Returns the value of the current data of list node,
* and goes to the next list node.
*
* @param it the iterator.
* @param data the data of the current list node.
* @return EINA_FALSE if unsuccessful. Otherwise, returns EINA_TRUE.
*/
static Eina_Bool
_evas_textblock_annotation_iterator_next(Efl_Text_Annotate_Annotation_Iterator *it, void **data)
{
if (!it->current)
return EINA_FALSE;
*data = eina_list_data_get(it->current);
it->current = eina_list_next(it->current);
return EINA_TRUE;
}
/**
* @internal
* Frees the annotation iterator.
* @param it the iterator to free
* @return EINA_FALSE if unsuccessful. Otherwise, returns EINA_TRUE.
*/
static Eina_Bool
_evas_textblock_annotation_iterator_free(Efl_Text_Annotate_Annotation_Iterator *it)
{
EINA_MAGIC_SET(&it->iterator, 0);
it->current = NULL;
eina_list_free(it->list);
free(it);
return EINA_TRUE;
}
/**
* @internal
* Creates newly allocated iterator associated to a list.
* @param list The list.
* @return If the memory cannot be allocated, NULL is returned.
* Otherwise, a valid iterator is returned.
*/
Eina_Iterator *
_evas_textblock_annotation_iterator_new(Eina_List *list)
{
Evas_Textblock_Selection_Iterator *it;
it = calloc(1, sizeof(Efl_Text_Annotate_Annotation_Iterator));
if (!it) return NULL;
EINA_MAGIC_SET(&it->iterator, EINA_MAGIC_ITERATOR);
it->list = list;
it->current = list;
it->iterator.version = EINA_ITERATOR_VERSION;
it->iterator.next = FUNC_ITERATOR_NEXT(
_evas_textblock_annotation_iterator_next);
it->iterator.free = FUNC_ITERATOR_FREE(
_evas_textblock_annotation_iterator_free);
return &it->iterator;
}
static void
_textblock_cursor_pos_at_fnode_set(Eo *eo_obj EINA_UNUSED,
Efl_Text_Cursor_Cursor *cur,
Evas_Object_Textblock_Node_Format *fnode)
{
cur->node = fnode->text_node;
cur->pos = _evas_textblock_node_format_pos_get(fnode);
}
static Eina_Bool
_textblock_annotation_set(Eo *eo_obj EINA_UNUSED, Efl_Canvas_Text_Data *o,
Efl_Text_Annotate_Annotation *an,
Efl_Text_Cursor_Cursor *start, Efl_Text_Cursor_Cursor *end,
const char *format, Eina_Bool is_item)
{
int len;
char *buf;
Evas_Textblock_Node_Format *fnode;
if (an->is_item)
{
ERR("Cannot reset format of \"item\" annotations. This is a special"
"annotation that should not be modified using this function");
return EINA_FALSE;
}
/* Add opening format at 'start' */
len = strlen(format);
buf = malloc(len + 3);
sprintf(buf, "<%s>", format);
_evas_textblock_cursor_format_append(start, buf, &fnode, is_item);
free(buf);
an->start_node = fnode;
fnode->annotation = an;
/* Add a closing format at end (i.e. format does not apply at end) */
len = strlen(format);
buf = malloc(len + 4);
sprintf(buf, "</%s>", format);
if (is_item) evas_textblock_cursor_char_next(end);
_evas_textblock_cursor_format_append(end, buf, &fnode, is_item);
free(buf);
an->end_node = fnode;
fnode->annotation = an;
o->format_changed = EINA_TRUE;
return EINA_TRUE;
}
EOLIAN static const char *
_efl_canvas_text_efl_text_annotate_annotation_get(Eo *eo_obj EINA_UNUSED, Efl_Canvas_Text_Data *o EINA_UNUSED,
Efl_Text_Annotate_Annotation *annotation)
{
if (!annotation || (annotation->obj != eo_obj))
{
ERR("Used invalid handle or of a different object");
return NULL;
}
return (annotation->start_node ? annotation->start_node->format : NULL);
}
EOLIAN static Eina_Bool
_efl_canvas_text_efl_text_annotate_annotation_set(Eo *eo_obj,
Efl_Canvas_Text_Data *o, Efl_Text_Annotate_Annotation *annotation,
const char *format)
{
ASYNC_BLOCK;
Efl_Text_Cursor_Cursor start, end;
Eina_Bool ret = EINA_TRUE;
if (!annotation || (annotation->obj != eo_obj))
{
ERR("Used invalid handle or of a different object");
return EINA_FALSE;
}
if (!annotation->start_node || !annotation->end_node) return EINA_FALSE;
if (!format || (format[0] == '\0')) return EINA_FALSE;
_evas_textblock_cursor_init(&start, eo_obj);
_evas_textblock_cursor_init(&end, eo_obj);
/* XXX: Not efficient but works and saves code */
_textblock_cursor_pos_at_fnode_set(eo_obj, &start, annotation->start_node);
_textblock_cursor_pos_at_fnode_set(eo_obj, &end, annotation->end_node);
_evas_textblock_node_format_remove(o, annotation->start_node, 0);
_evas_textblock_node_format_remove(o, annotation->end_node, 0);
if (!_textblock_annotation_set(eo_obj, o, annotation, &start, &end, format,
EINA_FALSE))
{
ret = EINA_FALSE;
}
return ret;
}
static void
_evas_textblock_annotation_remove(Efl_Canvas_Text_Data *o,
Efl_Text_Annotate_Annotation *an, Eina_Bool remove_nodes)
{
if (remove_nodes)
{
if (an->is_item)
{
/* Remove the OBJ character along with the cursor. */
Efl_Text_Cursor_Cursor cur;
_evas_textblock_cursor_init(&cur, an->obj);
_textblock_cursor_pos_at_fnode_set(an->obj, &cur, an->start_node);
evas_textblock_cursor_char_delete(&cur);
return; // 'an' should be deleted after char deletion.
}
_evas_textblock_node_format_remove(o, an->start_node, 0);
_evas_textblock_node_format_remove(o, an->end_node, 0);
}
o->annotations = (Efl_Text_Annotate_Annotation *)
eina_inlist_remove(EINA_INLIST_GET(o->annotations),
EINA_INLIST_GET(an));
free(an);
}
static void
_evas_textblock_annotations_clear(Efl_Canvas_Text_Data *o)
{
Efl_Text_Annotate_Annotation *an;
EINA_INLIST_FREE(o->annotations, an)
{
_evas_textblock_annotation_remove(o, an, EINA_TRUE);
}
}
EOLIAN static Eina_Bool
_efl_canvas_text_efl_text_annotate_annotation_del(Eo *eo_obj EINA_UNUSED,
Efl_Canvas_Text_Data *o, Efl_Text_Annotate_Annotation *annotation)
{
ASYNC_BLOCK;
if (!annotation || (annotation->obj != eo_obj))
{
ERR("Used invalid handle or of a different object");
return EINA_FALSE;
}
_evas_textblock_annotation_remove(o, annotation, EINA_TRUE);
o->format_changed = EINA_TRUE;
//XXX: It's a workaround. The underlying problem is that only new format
// nodes are checks when their respective text nodes are invalidated (see
// _format_changes_invalidate_text_nodes). Complete removal of the format
// nodes was not handled properly (as formats could only be removed via
// text changes e.g. deleting characters).
_evas_textblock_invalidate_all(o);
_evas_textblock_changed(o, eo_obj);
return EINA_TRUE;
}
static Efl_Text_Annotate_Annotation *
_textblock_annotation_insert(Eo *eo_obj, Efl_Canvas_Text_Data *o,
Efl_Text_Cursor_Cursor *start, Efl_Text_Cursor_Cursor *end,
const char *format, Eina_Bool is_item)
{
Efl_Text_Annotate_Annotation *ret = NULL;
Eina_Strbuf *buf;
Eina_Bool first = EINA_TRUE;
const char *item;
if (!format || (format[0] == '\0') ||
evas_textblock_cursor_compare(start, end) > 0)
{
return NULL;
}
/* Sanitize the string and reject format items, closing '/' marks. */
buf = eina_strbuf_new();
while ((item = _format_parse(&format)))
{
int itlen = format - item;
/* We care about all of the formats even after a - except for
* item which we don't care after a - because it's just a standard
* closing */
if ((!strncmp(item, "\n", itlen) || !strncmp(item, "\\n", itlen)) ||
(!strncmp(item, "\t", itlen) || !strncmp(item, "\\t", itlen)) ||
(!strncmp(item, "br", itlen) && (itlen >= 2)) ||
(!strncmp(item, "tab", itlen) && (itlen >= 3)) ||
(!strncmp(item, "ps", itlen) && (itlen >= 2)) ||
(!strncmp(item, "item", itlen) && (itlen >= 4)))
{
continue;
}
if (first)
{
first = EINA_FALSE;
}
else
{
eina_strbuf_append_length(buf, " ", 1);
}
eina_strbuf_append_length(buf, item, itlen);
}
format = eina_strbuf_string_get(buf);
if (format && (format[0] != '\0'))
{
ret = calloc(1, sizeof(Efl_Text_Annotate_Annotation));
ret->obj = eo_obj;
o->annotations = (Efl_Text_Annotate_Annotation *)
eina_inlist_append(EINA_INLIST_GET(o->annotations),
EINA_INLIST_GET(ret));
_textblock_annotation_set(eo_obj, o, ret, start, end, format, is_item);
ret->is_item = is_item;
_evas_textblock_changed(o, eo_obj);
}
eina_strbuf_free(buf);
return ret;
}
EOLIAN static Efl_Text_Annotate_Annotation *
_efl_canvas_text_efl_text_annotate_annotation_insert(Eo *eo_obj, Efl_Canvas_Text_Data *o,
Efl_Text_Cursor_Cursor *start, Efl_Text_Cursor_Cursor *end,
const char *format)
{
ASYNC_BLOCK;
Efl_Text_Annotate_Annotation *ret;
ret = _textblock_annotation_insert(eo_obj, o, start, end, format,
EINA_FALSE);
efl_event_callback_legacy_call(eo_obj, EFL_CANVAS_TEXT_EVENT_CHANGED, NULL);
return ret;
}
EOLIAN static Eina_Iterator *
_efl_canvas_text_efl_text_annotate_range_annotations_get(Eo *eo_obj EINA_UNUSED, Efl_Canvas_Text_Data *o EINA_UNUSED,
const Evas_Textblock_Cursor *start, const Evas_Textblock_Cursor *end)
{
Eina_List *lst = NULL;
Efl_Text_Annotate_Annotation *it;
EINA_INLIST_FOREACH(o->annotations, it)
{
Efl_Text_Cursor_Cursor start2, end2;
_evas_textblock_cursor_init(&start2, eo_obj);
_evas_textblock_cursor_init(&end2, eo_obj);
if (!it->start_node || !it->end_node) continue;
_textblock_cursor_pos_at_fnode_set(eo_obj, &start2, it->start_node);
_textblock_cursor_pos_at_fnode_set(eo_obj, &end2, it->end_node);
_evas_textblock_cursor_char_prev(&end2);
if (!((evas_textblock_cursor_compare(&start2, end) > 0) ||
(evas_textblock_cursor_compare(&end2, start) < 0)))
{
lst = eina_list_append(lst, it);
}
}
return _evas_textblock_annotation_iterator_new(lst);
}
EOLIAN static Efl_Text_Annotate_Annotation *
_efl_canvas_text_efl_text_annotate_cursor_object_item_insert(Eo *eo_obj, Efl_Canvas_Text_Data *o EINA_UNUSED, Efl_Text_Cursor_Cursor *cur, const char *format)
{
Efl_Text_Annotate_Annotation *ret =
_textblock_annotation_insert(cur->obj, o, cur, cur, format, EINA_TRUE);
efl_event_callback_legacy_call(eo_obj, EFL_CANVAS_TEXT_EVENT_CHANGED, NULL);
return ret;
}
EOLIAN static Efl_Text_Annotate_Annotation *
_efl_canvas_text_efl_text_annotate_cursor_object_item_annotation_get(Eo *eo_obj EINA_UNUSED,
Efl_Canvas_Text_Data *o EINA_UNUSED, Efl_Text_Cursor_Cursor *cur)
{
Eina_Iterator *it;
Efl_Text_Annotate_Annotation *data, *ret = NULL;
it = efl_text_range_annotations_get(cur->obj,
cur, cur);
EINA_ITERATOR_FOREACH(it, data)
{
if (data->is_item)
{
ret = data;
break;
}
}
eina_iterator_free(it);
return ret;
}
EOLIAN static Eina_Bool
_efl_canvas_text_efl_text_annotate_object_item_geometry_get(Eo *eo_obj, Efl_Canvas_Text_Data *o EINA_UNUSED,
const Efl_Text_Annotate_Annotation *an, Evas_Coord *cx, Evas_Coord *cy, Evas_Coord *cw, Evas_Coord *ch)
{
Efl_Text_Cursor_Cursor cur;
Evas_Object_Protected_Data *obj = efl_data_scope_get(eo_obj, EFL_CANVAS_OBJECT_CLASS);
evas_object_async_block(obj);
_relayout_if_needed(eo_obj, o);
_evas_textblock_cursor_init(&cur, eo_obj);
_textblock_cursor_pos_at_fnode_set(eo_obj, &cur, an->start_node);
return _evas_textblock_cursor_format_item_geometry_get(&cur, cx, cy, cw, ch);
}
EOLIAN static void
_efl_canvas_text_efl_text_annotate_annotation_positions_get(Eo *eo_obj,
Efl_Canvas_Text_Data *o EINA_UNUSED,
const Efl_Text_Annotate_Annotation *annotation,
Efl_Text_Cursor_Cursor *start, Efl_Text_Cursor_Cursor *end)
{
_textblock_cursor_pos_at_fnode_set(eo_obj, start, annotation->start_node);
_textblock_cursor_pos_at_fnode_set(eo_obj, end, annotation->end_node);
}
static void
_canvas_text_format_changed(Eo *eo_obj, Efl_Canvas_Text_Data *o)
{
o->format_changed = EINA_TRUE;
_evas_textblock_invalidate_all(o);
_evas_textblock_changed(o, eo_obj);
efl_event_callback_call(eo_obj, EFL_CANVAS_TEXT_EVENT_CHANGED, NULL);
}
/* Efl.Text.Font interface implementation */
static void
_efl_canvas_text_efl_text_font_font_set(Eo *obj EINA_UNUSED, Efl_Canvas_Text_Data *o EINA_UNUSED, const char *font EINA_UNUSED, int size EINA_UNUSED)
{
ASYNC_BLOCK;
Eina_Bool changed = EINA_FALSE;
Eina_Stringshare *nfont;
if (o->default_format.info.size != size)
{
o->default_format.info.size = size;
changed = EINA_TRUE;
}
if (o->default_format.info.font != font)
{
nfont = eina_stringshare_add(font);
if (nfont == _FMT_INFO(font))
{
/* Already stringshared here, unref */
eina_stringshare_del(nfont);
}
else
{
// Set immediately, load font later
_FMT_INFO(font) = nfont;
changed = EINA_TRUE;
}
}
if (changed)
{
_canvas_text_format_changed(obj, o);
}
}
static void
_efl_canvas_text_efl_text_font_font_get(Eo *obj EINA_UNUSED, Efl_Canvas_Text_Data *o EINA_UNUSED, const char **font EINA_UNUSED, int *size EINA_UNUSED)
{
if (font) *font = o->default_format.info.font;
if (size) *size = o->default_format.info.size;
}
static void
_efl_canvas_text_efl_text_font_font_source_set(Eo *obj EINA_UNUSED, Efl_Canvas_Text_Data *o EINA_UNUSED, const char *font_source EINA_UNUSED)
{
Eina_Stringshare *nfont_source;
if (o->default_format.info.font_source != font_source)
{
nfont_source = eina_stringshare_add(font_source);
if (nfont_source == _FMT_INFO(font_source))
{
/* Already stringshared here, unref */
eina_stringshare_del(nfont_source);
}
else
{
// Set immediately, load font_source later
_FMT_INFO(font_source) = nfont_source;
_canvas_text_format_changed(obj, o);
}
}
}
static const char*
_efl_canvas_text_efl_text_font_font_source_get(Eo *obj EINA_UNUSED, Efl_Canvas_Text_Data *o EINA_UNUSED)
{
return _FMT_INFO(font_source);
}
static void
_efl_canvas_text_efl_text_font_font_fallbacks_set(Eo *obj EINA_UNUSED, Efl_Canvas_Text_Data *o EINA_UNUSED, const char *font_fallbacks EINA_UNUSED)
{
Eina_Stringshare *nfont_fallbacks;
if (o->default_format.info.font_fallbacks != font_fallbacks)
{
nfont_fallbacks = eina_stringshare_add(font_fallbacks);
if (nfont_fallbacks == _FMT_INFO(font_fallbacks))
{
/* Already stringshared here, unref */
eina_stringshare_del(nfont_fallbacks);
}
else
{
// Set immediately, load font_fallbacks later
_FMT_INFO(font_fallbacks) = nfont_fallbacks;
_canvas_text_format_changed(obj, o);
}
}
}
static const char*
_efl_canvas_text_efl_text_font_font_fallbacks_get(Eo *obj EINA_UNUSED, Efl_Canvas_Text_Data *o EINA_UNUSED)
{
return _FMT_INFO(font_fallbacks);
}
static void
_efl_canvas_text_efl_text_font_font_lang_set(Eo *obj EINA_UNUSED, Efl_Canvas_Text_Data *o EINA_UNUSED, const char *font_lang EINA_UNUSED)
{
Eina_Stringshare *nfont_lang;
if (o->default_format.info.font_lang != font_lang)
{
nfont_lang = eina_stringshare_add(font_lang);
if (nfont_lang == _FMT_INFO(font_lang))
{
/* Already stringshared here, unref */
eina_stringshare_del(nfont_lang);
}
else
{
// Set immediately, load font_lang later
_FMT_INFO(font_lang) = nfont_lang;
_canvas_text_format_changed(obj, o);
}
}
}
static const char*
_efl_canvas_text_efl_text_font_font_lang_get(Eo *obj EINA_UNUSED, Efl_Canvas_Text_Data *o EINA_UNUSED)
{
return _FMT_INFO(font_lang);
}
static void
_efl_canvas_text_efl_text_font_font_weight_set(Eo *obj EINA_UNUSED, Efl_Canvas_Text_Data *o EINA_UNUSED, Efl_Text_Font_Weight font_weight EINA_UNUSED)
{
if (_FMT_INFO(font_weight) == font_weight) return;
_FMT_INFO(font_weight) = font_weight;
_canvas_text_format_changed(obj, o);
}
static Efl_Text_Font_Weight
_efl_canvas_text_efl_text_font_font_weight_get(Eo *obj EINA_UNUSED, Efl_Canvas_Text_Data *o EINA_UNUSED)
{
return _FMT_INFO(font_weight);
}
static void
_efl_canvas_text_efl_text_font_font_slant_set(Eo *obj EINA_UNUSED, Efl_Canvas_Text_Data *o EINA_UNUSED, Efl_Text_Font_Slant font_slant EINA_UNUSED)
{
ASYNC_BLOCK;
if (_FMT_INFO(font_slant) == font_slant) return;
_FMT_INFO(font_slant) = font_slant;
_canvas_text_format_changed(obj, o);
}
static Efl_Text_Font_Slant
_efl_canvas_text_efl_text_font_font_slant_get(Eo *obj EINA_UNUSED, Efl_Canvas_Text_Data *o EINA_UNUSED)
{
return _FMT_INFO(font_slant);
}
static void
_efl_canvas_text_efl_text_font_font_width_set(Eo *obj EINA_UNUSED, Efl_Canvas_Text_Data *o EINA_UNUSED, Efl_Text_Font_Width font_width EINA_UNUSED)
{
ASYNC_BLOCK;
if (_FMT_INFO(font_width) == font_width) return;
_FMT_INFO(font_width) = font_width;
_canvas_text_format_changed(obj, o);
}
static Efl_Text_Font_Width
_efl_canvas_text_efl_text_font_font_width_get(Eo *obj EINA_UNUSED, Efl_Canvas_Text_Data *o EINA_UNUSED)
{
return _FMT_INFO(font_width);
}
EOLIAN static void
_efl_canvas_text_efl_text_font_font_bitmap_scalable_set(Eo *obj, Efl_Canvas_Text_Data *o, Efl_Text_Font_Bitmap_Scalable bitmap_scalable)
{
if (_FMT_INFO(bitmap_scalable) == bitmap_scalable) return;
_FMT_INFO(bitmap_scalable) = bitmap_scalable;
_canvas_text_format_changed(obj, o);
}
EOLIAN static Efl_Text_Font_Bitmap_Scalable
_efl_canvas_text_efl_text_font_font_bitmap_scalable_get(Eo *obj EINA_UNUSED, Efl_Canvas_Text_Data *o)
{
return _FMT_INFO(bitmap_scalable);
}
/* Efl.Text.Style interface implementation */
/* Helper: sets color fields of style 'x' and informs if any are changed. */
#define _FMT_COLOR_SET(x) \
if ((_FMT(color.x).r == r) && (_FMT(color.x).g == g) \
&& (_FMT(color.x).b == b) && (_FMT(color.x).a == a)) return; \
_FMT(color.x).r = r; \
_FMT(color.x).g = g; \
_FMT(color.x).b = b; \
_FMT(color.x).a = a; \
_canvas_text_format_changed(obj, o);
/* Helper: returns color fields of style 'x'. */
#define _FMT_COLOR_RET(x) \
if (r) *r = _FMT(color.x).r; \
if (g) *g = _FMT(color.x).g; \
if (b) *b = _FMT(color.x).b; \
if (a) *a = _FMT(color.x).a;
/* Helper: updates format field, and informs if changed. */
#define _FMT_SET(x, v) \
if (_FMT(x) == v) return; \
_FMT(x) = v; \
_canvas_text_format_changed(obj, o);
/* Helper: updates format field of extended format information, and informs if changed. */
#define _FMT_INFO_SET_START(x, v) \
Eina_Bool changed = EINA_FALSE; \
if (_FMT_INFO(x) == v) return; \
changed = EINA_TRUE; \
_FMT_INFO(x) = v; \
#define _FMT_INFO_SET_END() \
if (changed) _canvas_text_format_changed(obj, o);
static void
_efl_canvas_text_efl_text_style_normal_color_set(Eo *obj EINA_UNUSED, Efl_Canvas_Text_Data *o EINA_UNUSED, unsigned char r EINA_UNUSED, unsigned char g EINA_UNUSED, unsigned char b EINA_UNUSED, unsigned char a EINA_UNUSED)
{
ASYNC_BLOCK;
_FMT_COLOR_SET(normal);
}
static void
_efl_canvas_text_efl_text_style_normal_color_get(Eo *obj EINA_UNUSED, Efl_Canvas_Text_Data *o EINA_UNUSED, unsigned char *r EINA_UNUSED, unsigned char *g EINA_UNUSED, unsigned char *b EINA_UNUSED, unsigned char *a EINA_UNUSED)
{
_FMT_COLOR_RET(normal);
}
static void
_efl_canvas_text_efl_text_style_backing_type_set(Eo *obj EINA_UNUSED, Efl_Canvas_Text_Data *o EINA_UNUSED, Efl_Text_Style_Backing_Type type EINA_UNUSED)
{
ASYNC_BLOCK;
_FMT_SET(backing, type);
}
static Efl_Text_Style_Backing_Type
_efl_canvas_text_efl_text_style_backing_type_get(Eo *obj EINA_UNUSED, Efl_Canvas_Text_Data *o EINA_UNUSED)
{
return _FMT(backing);
}
static void
_efl_canvas_text_efl_text_style_backing_color_set(Eo *obj EINA_UNUSED, Efl_Canvas_Text_Data *o EINA_UNUSED, unsigned char r EINA_UNUSED, unsigned char g EINA_UNUSED, unsigned char b EINA_UNUSED, unsigned char a EINA_UNUSED)
{
ASYNC_BLOCK;
_FMT_COLOR_SET(backing);
}
static void
_efl_canvas_text_efl_text_style_backing_color_get(Eo *obj EINA_UNUSED, Efl_Canvas_Text_Data *o EINA_UNUSED, unsigned char *r EINA_UNUSED, unsigned char *g EINA_UNUSED, unsigned char *b EINA_UNUSED, unsigned char *a EINA_UNUSED)
{
_FMT_COLOR_RET(backing);
}
static void
_efl_canvas_text_efl_text_style_underline_type_set(Eo *obj EINA_UNUSED, Efl_Canvas_Text_Data *o EINA_UNUSED, Efl_Text_Style_Underline_Type type EINA_UNUSED)
{
ASYNC_BLOCK;
_FMT_SET(underline, type);
}
static Efl_Text_Style_Underline_Type
_efl_canvas_text_efl_text_style_underline_type_get(Eo *obj EINA_UNUSED, Efl_Canvas_Text_Data *o EINA_UNUSED)
{
return _FMT(underline);
}
static void
_efl_canvas_text_efl_text_style_underline_color_set(Eo *obj EINA_UNUSED, Efl_Canvas_Text_Data *o EINA_UNUSED, unsigned char r EINA_UNUSED, unsigned char g EINA_UNUSED, unsigned char b EINA_UNUSED, unsigned char a EINA_UNUSED)
{
ASYNC_BLOCK;
_FMT_COLOR_SET(underline);
}
static void
_efl_canvas_text_efl_text_style_underline_color_get(Eo *obj EINA_UNUSED, Efl_Canvas_Text_Data *o EINA_UNUSED, unsigned char *r EINA_UNUSED, unsigned char *g EINA_UNUSED, unsigned char *b EINA_UNUSED, unsigned char *a EINA_UNUSED)
{
_FMT_COLOR_RET(underline);
}
static void
_efl_canvas_text_efl_text_style_underline_height_set(Eo *obj EINA_UNUSED, Efl_Canvas_Text_Data *o EINA_UNUSED, double height EINA_UNUSED)
{
ASYNC_BLOCK;
_FMT_SET(underline_height, height);
}
static double
_efl_canvas_text_efl_text_style_underline_height_get(Eo *obj EINA_UNUSED, Efl_Canvas_Text_Data *o EINA_UNUSED)
{
return _FMT(underline_height);
}
static void
_efl_canvas_text_efl_text_style_underline_dashed_color_set(Eo *obj EINA_UNUSED, Efl_Canvas_Text_Data *o EINA_UNUSED, unsigned char r EINA_UNUSED, unsigned char g EINA_UNUSED, unsigned char b EINA_UNUSED, unsigned char a EINA_UNUSED)
{
ASYNC_BLOCK;
_FMT_COLOR_SET(underline_dash);
}
static void
_efl_canvas_text_efl_text_style_underline_dashed_color_get(Eo *obj EINA_UNUSED, Efl_Canvas_Text_Data *o EINA_UNUSED, unsigned char *r EINA_UNUSED, unsigned char *g EINA_UNUSED, unsigned char *b EINA_UNUSED, unsigned char *a EINA_UNUSED)
{
_FMT_COLOR_RET(underline_dash);
}
static void
_efl_canvas_text_efl_text_style_underline_dashed_width_set(Eo *obj EINA_UNUSED, Efl_Canvas_Text_Data *o EINA_UNUSED, int width EINA_UNUSED)
{
ASYNC_BLOCK;
_FMT_SET(underline_dash_width, width);
}
static int
_efl_canvas_text_efl_text_style_underline_dashed_width_get(Eo *obj EINA_UNUSED, Efl_Canvas_Text_Data *o EINA_UNUSED)
{
return _FMT(underline_dash_width);
}
static void
_efl_canvas_text_efl_text_style_underline_dashed_gap_set(Eo *obj EINA_UNUSED, Efl_Canvas_Text_Data *o EINA_UNUSED, int gap EINA_UNUSED)
{
ASYNC_BLOCK;
_FMT_SET(underline_dash_gap, gap);
}
static int
_efl_canvas_text_efl_text_style_underline_dashed_gap_get(Eo *obj EINA_UNUSED, Efl_Canvas_Text_Data *o EINA_UNUSED)
{
return _FMT(underline_dash_width);
}
static void
_efl_canvas_text_efl_text_style_underline2_type_set(Eo *obj EINA_UNUSED, Efl_Canvas_Text_Data *o EINA_UNUSED, Efl_Text_Style_Underline_Type type EINA_UNUSED)
{
ASYNC_BLOCK;
_FMT_SET(underline2, type);
}
static Efl_Text_Style_Underline_Type
_efl_canvas_text_efl_text_style_underline2_type_get(Eo *obj EINA_UNUSED, Efl_Canvas_Text_Data *o EINA_UNUSED)
{
return _FMT(underline2);
}
static void
_efl_canvas_text_efl_text_style_underline2_color_set(Eo *obj EINA_UNUSED, Efl_Canvas_Text_Data *o EINA_UNUSED, unsigned char r EINA_UNUSED, unsigned char g EINA_UNUSED, unsigned char b EINA_UNUSED, unsigned char a EINA_UNUSED)
{
ASYNC_BLOCK;
_FMT_COLOR_SET(underline2);
}
static void
_efl_canvas_text_efl_text_style_underline2_color_get(Eo *obj EINA_UNUSED, Efl_Canvas_Text_Data *o EINA_UNUSED, unsigned char *r EINA_UNUSED, unsigned char *g EINA_UNUSED, unsigned char *b EINA_UNUSED, unsigned char *a EINA_UNUSED)
{
_FMT_COLOR_RET(underline2);
}
static void
_efl_canvas_text_efl_text_style_strikethrough_type_set(Eo *obj EINA_UNUSED, Efl_Canvas_Text_Data *o EINA_UNUSED, Efl_Text_Style_Strikethrough_Type type EINA_UNUSED)
{
ASYNC_BLOCK;
_FMT_SET(strikethrough, type);
}
static Efl_Text_Style_Strikethrough_Type
_efl_canvas_text_efl_text_style_strikethrough_type_get(Eo *obj EINA_UNUSED, Efl_Canvas_Text_Data *o EINA_UNUSED)
{
return _FMT(strikethrough);
}
static void
_efl_canvas_text_efl_text_style_strikethrough_color_set(Eo *obj EINA_UNUSED, Efl_Canvas_Text_Data *o EINA_UNUSED, unsigned char r EINA_UNUSED, unsigned char g EINA_UNUSED, unsigned char b EINA_UNUSED, unsigned char a EINA_UNUSED)
{
ASYNC_BLOCK;
_FMT_COLOR_SET(strikethrough);
}
static void
_efl_canvas_text_efl_text_style_strikethrough_color_get(Eo *obj EINA_UNUSED, Efl_Canvas_Text_Data *o EINA_UNUSED, unsigned char *r EINA_UNUSED, unsigned char *g EINA_UNUSED, unsigned char *b EINA_UNUSED, unsigned char *a EINA_UNUSED)
{
_FMT_COLOR_RET(strikethrough);
}
static const struct
{
Efl_Text_Style_Effect_Type x;
Evas_Text_Style_Type y;
} _map_style_effect[] = {
{ EFL_TEXT_STYLE_EFFECT_TYPE_NONE, EVAS_TEXT_STYLE_PLAIN },
{ EFL_TEXT_STYLE_EFFECT_TYPE_SHADOW, EVAS_TEXT_STYLE_SHADOW },
{ EFL_TEXT_STYLE_EFFECT_TYPE_OUTLINE, EVAS_TEXT_STYLE_OUTLINE },
{ EFL_TEXT_STYLE_EFFECT_TYPE_SOFT_OUTLINE, EVAS_TEXT_STYLE_SOFT_OUTLINE },
{ EFL_TEXT_STYLE_EFFECT_TYPE_OUTLINE_SHADOW, EVAS_TEXT_STYLE_OUTLINE_SHADOW },
{ EFL_TEXT_STYLE_EFFECT_TYPE_OUTLINE_SOFT_SHADOW, EVAS_TEXT_STYLE_OUTLINE_SOFT_SHADOW },
{ EFL_TEXT_STYLE_EFFECT_TYPE_GLOW, EVAS_TEXT_STYLE_GLOW },
{ EFL_TEXT_STYLE_EFFECT_TYPE_FAR_SHADOW, EVAS_TEXT_STYLE_FAR_SHADOW },
{ EFL_TEXT_STYLE_EFFECT_TYPE_SOFT_SHADOW, EVAS_TEXT_STYLE_SOFT_SHADOW },
{ EFL_TEXT_STYLE_EFFECT_TYPE_FAR_SOFT_SHADOW, EVAS_TEXT_STYLE_FAR_SOFT_SHADOW },
};
static const struct
{
Efl_Text_Style_Shadow_Direction x;
Evas_Text_Style_Type y;
} _map_shadow_dir[] = {
{ EFL_TEXT_STYLE_SHADOW_DIRECTION_BOTTOM_RIGHT, EVAS_TEXT_STYLE_SHADOW_DIRECTION_BOTTOM_RIGHT },
{ EFL_TEXT_STYLE_SHADOW_DIRECTION_BOTTOM, EVAS_TEXT_STYLE_SHADOW_DIRECTION_BOTTOM },
{ EFL_TEXT_STYLE_SHADOW_DIRECTION_BOTTOM_LEFT, EVAS_TEXT_STYLE_SHADOW_DIRECTION_BOTTOM_LEFT },
{ EFL_TEXT_STYLE_SHADOW_DIRECTION_LEFT, EVAS_TEXT_STYLE_SHADOW_DIRECTION_LEFT },
{ EFL_TEXT_STYLE_SHADOW_DIRECTION_TOP_LEFT, EVAS_TEXT_STYLE_SHADOW_DIRECTION_TOP_LEFT },
{ EFL_TEXT_STYLE_SHADOW_DIRECTION_TOP, EVAS_TEXT_STYLE_SHADOW_DIRECTION_TOP },
{ EFL_TEXT_STYLE_SHADOW_DIRECTION_TOP_RIGHT, EVAS_TEXT_STYLE_SHADOW_DIRECTION_TOP_RIGHT },
{ EFL_TEXT_STYLE_SHADOW_DIRECTION_RIGHT, EVAS_TEXT_STYLE_SHADOW_DIRECTION_RIGHT },
};
static void
_efl_canvas_text_efl_text_style_effect_type_set(Eo *obj EINA_UNUSED, Efl_Canvas_Text_Data *o EINA_UNUSED, Efl_Text_Style_Effect_Type type EINA_UNUSED)
{
ASYNC_BLOCK;
_FMT_INFO_SET_START(effect, type);
_FMT(style) = _map_style_effect[type].y;
// Re-apply shadow direction
EVAS_TEXT_STYLE_SHADOW_DIRECTION_SET(_FMT(style), _map_shadow_dir[type].y);
_FMT_INFO_SET_END();
}
static Efl_Text_Style_Effect_Type
_efl_canvas_text_efl_text_style_effect_type_get(Eo *obj EINA_UNUSED, Efl_Canvas_Text_Data *o EINA_UNUSED)
{
return _FMT_INFO(effect);
}
static void
_efl_canvas_text_efl_text_style_outline_color_set(Eo *obj EINA_UNUSED, Efl_Canvas_Text_Data *o EINA_UNUSED, unsigned char r EINA_UNUSED, unsigned char g EINA_UNUSED, unsigned char b EINA_UNUSED, unsigned char a EINA_UNUSED)
{
ASYNC_BLOCK;
_FMT_COLOR_SET(outline);
}
static void
_efl_canvas_text_efl_text_style_outline_color_get(Eo *obj EINA_UNUSED, Efl_Canvas_Text_Data *o EINA_UNUSED, unsigned char *r EINA_UNUSED, unsigned char *g EINA_UNUSED, unsigned char *b EINA_UNUSED, unsigned char *a EINA_UNUSED)
{
_FMT_COLOR_RET(outline);
}
static void
_efl_canvas_text_efl_text_style_shadow_direction_set(Eo *obj EINA_UNUSED, Efl_Canvas_Text_Data *o EINA_UNUSED, Efl_Text_Style_Shadow_Direction type EINA_UNUSED)
{
ASYNC_BLOCK;
_FMT_INFO_SET_START(shadow_direction, type);
EVAS_TEXT_STYLE_SHADOW_DIRECTION_SET(_FMT(style), _map_shadow_dir[type].y);
_FMT_INFO_SET_END();
}
static Efl_Text_Style_Shadow_Direction
_efl_canvas_text_efl_text_style_shadow_direction_get(Eo *obj EINA_UNUSED, Efl_Canvas_Text_Data *o EINA_UNUSED)
{
return _FMT_INFO(shadow_direction);
}
static void
_efl_canvas_text_efl_text_style_shadow_color_set(Eo *obj EINA_UNUSED, Efl_Canvas_Text_Data *o EINA_UNUSED, unsigned char r EINA_UNUSED, unsigned char g EINA_UNUSED, unsigned char b EINA_UNUSED, unsigned char a EINA_UNUSED)
{
ASYNC_BLOCK;
_FMT_COLOR_SET(shadow);
}
static void
_efl_canvas_text_efl_text_style_shadow_color_get(Eo *obj EINA_UNUSED, Efl_Canvas_Text_Data *o EINA_UNUSED, unsigned char *r EINA_UNUSED, unsigned char *g EINA_UNUSED, unsigned char *b EINA_UNUSED, unsigned char *a EINA_UNUSED)
{
_FMT_COLOR_RET(shadow);
}
static void
_efl_canvas_text_efl_text_style_glow_color_set(Eo *obj EINA_UNUSED, Efl_Canvas_Text_Data *o EINA_UNUSED, unsigned char r EINA_UNUSED, unsigned char g EINA_UNUSED, unsigned char b EINA_UNUSED, unsigned char a EINA_UNUSED)
{
ASYNC_BLOCK;
_FMT_COLOR_SET(glow);
}
static void
_efl_canvas_text_efl_text_style_glow_color_get(Eo *obj EINA_UNUSED, Efl_Canvas_Text_Data *o EINA_UNUSED, unsigned char *r EINA_UNUSED, unsigned char *g EINA_UNUSED, unsigned char *b EINA_UNUSED, unsigned char *a EINA_UNUSED)
{
_FMT_COLOR_RET(glow);
}
static void
_efl_canvas_text_efl_text_style_glow2_color_set(Eo *obj EINA_UNUSED, Efl_Canvas_Text_Data *o EINA_UNUSED, unsigned char r EINA_UNUSED, unsigned char g EINA_UNUSED, unsigned char b EINA_UNUSED, unsigned char a EINA_UNUSED)
{
ASYNC_BLOCK;
_FMT_COLOR_SET(glow2);
}
static void
_efl_canvas_text_efl_text_style_glow2_color_get(Eo *obj EINA_UNUSED, Efl_Canvas_Text_Data *o EINA_UNUSED, unsigned char *r EINA_UNUSED, unsigned char *g EINA_UNUSED, unsigned char *b EINA_UNUSED, unsigned char *a EINA_UNUSED)
{
_FMT_COLOR_RET(glow2);
}
static void
_efl_canvas_text_efl_text_style_gfx_filter_set(Eo *obj EINA_UNUSED, Efl_Canvas_Text_Data *o EINA_UNUSED,
const char *gfx_filter_name)
{
ASYNC_BLOCK;
Eina_Stringshare *ngfx_filter_name;
if (_FMT_INFO(gfx_filter_name) != gfx_filter_name)
{
ngfx_filter_name = eina_stringshare_add(gfx_filter_name);
if (_FMT_INFO(gfx_filter_name) == ngfx_filter_name)
{
/* Already stringshared here, unref */
eina_stringshare_del(ngfx_filter_name);
}
else
{
// Set immediately, load style_gfx_filter_name later
_FMT_INFO(gfx_filter_name) = ngfx_filter_name;
_canvas_text_format_changed(obj, o);
}
}
}
static const char *
_efl_canvas_text_efl_text_style_gfx_filter_get(Eo *obj EINA_UNUSED, Efl_Canvas_Text_Data *o EINA_UNUSED)
{
return _FMT(gfx_filter)?_FMT(gfx_filter->name):NULL;
}
static void
_efl_canvas_text_efl_text_format_ellipsis_set(Eo *obj EINA_UNUSED, Efl_Canvas_Text_Data *o EINA_UNUSED, double value EINA_UNUSED)
{
ASYNC_BLOCK;
_FMT_SET(ellipsis, value);
}
static double
_efl_canvas_text_efl_text_format_ellipsis_get(Eo *obj EINA_UNUSED, Efl_Canvas_Text_Data *o EINA_UNUSED)
{
return _FMT(ellipsis);
}
static void
_efl_canvas_text_efl_text_format_wrap_set(Eo *obj EINA_UNUSED, Efl_Canvas_Text_Data *o EINA_UNUSED, Efl_Text_Format_Wrap wrap EINA_UNUSED)
{
ASYNC_BLOCK;
_FMT_INFO_SET_START(wrap, wrap);
_FMT(wrap_word) = (wrap == EFL_TEXT_FORMAT_WRAP_WORD);
_FMT(wrap_char) = (wrap == EFL_TEXT_FORMAT_WRAP_CHAR);
_FMT(wrap_mixed) = (wrap == EFL_TEXT_FORMAT_WRAP_MIXED);
_FMT(wrap_hyphenation) = (wrap == EFL_TEXT_FORMAT_WRAP_HYPHENATION);
_FMT_INFO_SET_END();
}
static Efl_Text_Format_Wrap
_efl_canvas_text_efl_text_format_wrap_get(Eo *obj EINA_UNUSED, Efl_Canvas_Text_Data *o EINA_UNUSED)
{
return _FMT_INFO(wrap);
}
static void
_efl_canvas_text_efl_text_format_multiline_set(Eo *obj EINA_UNUSED, Efl_Canvas_Text_Data *o EINA_UNUSED, Eina_Bool enabled EINA_UNUSED)
{
ASYNC_BLOCK;
if (o->multiline == enabled) return;
o->multiline = enabled;
_canvas_text_format_changed(obj, o);
}
static Eina_Bool
_efl_canvas_text_efl_text_format_multiline_get(Eo *obj EINA_UNUSED, Efl_Canvas_Text_Data *o EINA_UNUSED)
{
return o->multiline;
}
static void
_efl_canvas_text_efl_text_format_halign_set(Eo *obj, Efl_Canvas_Text_Data *o, Efl_Text_Format_Horizontal_Alignment_Type type)
{
ASYNC_BLOCK;
if (type == EFL_TEXT_HORIZONTAL_ALIGNMENT_AUTO)
{
_FMT_SET(halign_auto, EVAS_TEXTBLOCK_ALIGN_AUTO_NORMAL);
}
else if (type == EFL_TEXT_HORIZONTAL_ALIGNMENT_LOCALE)
{
_FMT_SET(halign_auto, EVAS_TEXTBLOCK_ALIGN_AUTO_LOCALE);
}
else
{
double value = 0.0; // EFL_TEXT_HORIZONTAL_ALIGNMENT_LEFT
_FMT(halign_auto) = EINA_FALSE;
if (type == EFL_TEXT_HORIZONTAL_ALIGNMENT_CENTER)
{
value = 0.5;
}
else if (type == EFL_TEXT_HORIZONTAL_ALIGNMENT_RIGHT)
{
value = 1.0;
}
_FMT_SET(halign, value);
}
}
static Efl_Text_Format_Horizontal_Alignment_Type
_efl_canvas_text_efl_text_format_halign_get(Eo *obj EINA_UNUSED, Efl_Canvas_Text_Data *o)
{
Efl_Text_Format_Horizontal_Alignment_Type ret =
EFL_TEXT_HORIZONTAL_ALIGNMENT_LEFT;
if (_FMT(halign_auto) == EVAS_TEXTBLOCK_ALIGN_AUTO_NORMAL)
{
ret = EFL_TEXT_HORIZONTAL_ALIGNMENT_AUTO;
}
else if (_FMT(halign_auto) == EVAS_TEXTBLOCK_ALIGN_AUTO_LOCALE)
{
ret = EFL_TEXT_HORIZONTAL_ALIGNMENT_LOCALE;
}
else if (EINA_DBL_EQ(_FMT(halign), 0.5))
{
ret = EFL_TEXT_HORIZONTAL_ALIGNMENT_CENTER;
}
else if (EINA_DBL_EQ(_FMT(halign), 1.0))
{
ret = EFL_TEXT_HORIZONTAL_ALIGNMENT_RIGHT;
}
return ret;
}
static void
_efl_canvas_text_efl_text_format_valign_set(Eo *obj, Efl_Canvas_Text_Data *o,
Efl_Text_Format_Vertical_Alignment_Type type)
{
ASYNC_BLOCK;
double value = 0.0; // EFL_TEXT_VERTICAL_ALIGNMENT_TOP
if (type == EFL_TEXT_VERTICAL_ALIGNMENT_CENTER)
{
value = 0.5;
}
else if (type == EFL_TEXT_VERTICAL_ALIGNMENT_BOTTOM)
{
value = 1.0;
}
if (!EINA_DBL_EQ(o->valign, value))
{
o->valign = value;
_canvas_text_format_changed(obj, o);
}
}
static Efl_Text_Format_Vertical_Alignment_Type
_efl_canvas_text_efl_text_format_valign_get(Eo *obj EINA_UNUSED, Efl_Canvas_Text_Data *o EINA_UNUSED)
{
return o->valign;
}
static void
_efl_canvas_text_efl_text_format_linegap_set(Eo *obj EINA_UNUSED, Efl_Canvas_Text_Data *o EINA_UNUSED, double value EINA_UNUSED)
{
ASYNC_BLOCK;
double linerelgap = _FMT(linerelgap);
_FMT(linerelgap) = 0.0;
if (EINA_DBL_EQ(linerelgap, 0.0))
{
_FMT_SET(linegap, value);
}
else
{
_FMT(linegap) = value;
_FMT(linerelgap) = 0.0;
_canvas_text_format_changed(obj, o);
}
}
static double
_efl_canvas_text_efl_text_format_linegap_get(Eo *obj EINA_UNUSED, Efl_Canvas_Text_Data *o EINA_UNUSED)
{
return _FMT(linegap);
}
static void
_efl_canvas_text_efl_text_format_linerelgap_set(Eo *obj EINA_UNUSED, Efl_Canvas_Text_Data *o EINA_UNUSED, double value EINA_UNUSED)
{
ASYNC_BLOCK;
double linegap = _FMT(linegap);
_FMT(linegap) = 0.0;
if (EINA_DBL_EQ(linegap, 0.0))
{
_FMT_SET(linerelgap, value);
}
else
{
_FMT(linerelgap) = value;
_canvas_text_format_changed(obj, o);
}
}
static double
_efl_canvas_text_efl_text_format_linerelgap_get(Eo *obj EINA_UNUSED, Efl_Canvas_Text_Data *o EINA_UNUSED)
{
return _FMT(linerelgap);
}
static void
_efl_canvas_text_efl_text_format_tabstops_set(Eo *obj EINA_UNUSED, Efl_Canvas_Text_Data *o EINA_UNUSED, int value EINA_UNUSED)
{
ASYNC_BLOCK;
_FMT_SET(tabstops, value);
}
static int
_efl_canvas_text_efl_text_format_tabstops_get(Eo *obj EINA_UNUSED, Efl_Canvas_Text_Data *o EINA_UNUSED)
{
return _FMT(tabstops);
}
static void
_efl_canvas_text_efl_text_format_password_set(Eo *obj EINA_UNUSED, Efl_Canvas_Text_Data *o EINA_UNUSED, Eina_Bool enabled EINA_UNUSED)
{
ASYNC_BLOCK;
_FMT_SET(password, enabled);
}
static Eina_Bool
_efl_canvas_text_efl_text_format_password_get(Eo *obj EINA_UNUSED, Efl_Canvas_Text_Data *o EINA_UNUSED)
{
return _FMT(password);
}
static void
_efl_canvas_text_efl_text_format_replacement_char_set(Eo *obj EINA_UNUSED, Efl_Canvas_Text_Data *o EINA_UNUSED, const char *repch EINA_UNUSED)
{
ASYNC_BLOCK;
Eina_Stringshare *nrepch;
if (o->repch != repch)
{
nrepch = eina_stringshare_add(repch);
if (nrepch == _FMT_INFO(font_fallbacks))
{
/* Already stringshared here, unref */
eina_stringshare_del(nrepch);
}
else
{
// Set immediately, load repch later
o->repch = nrepch;
_canvas_text_format_changed(obj, o);
}
}
}
static const char *
_efl_canvas_text_efl_text_format_replacement_char_get(Eo *obj EINA_UNUSED, Efl_Canvas_Text_Data *o EINA_UNUSED)
{
return o->repch;
}
/**
* @}
*/
#ifdef HAVE_TESTS
/* return EINA_FALSE on error, used in unit_testing */
EAPI Eina_Bool
_evas_textblock_check_item_node_link(Evas_Object *eo_obj)
{
Efl_Canvas_Text_Data *o = efl_data_scope_get(eo_obj, MY_CLASS);
Evas_Object_Textblock_Paragraph *par;
Evas_Object_Textblock_Line *ln;
Evas_Object_Textblock_Item *it;
if (!o) return EINA_FALSE;
_relayout_if_needed(eo_obj, o);
EINA_INLIST_FOREACH(o->paragraphs, par)
{
EINA_INLIST_FOREACH(par->lines, ln)
{
EINA_INLIST_FOREACH(ln->items, it)
{
if (it->text_node != par->text_node)
return EINA_FALSE;
}
}
}
return EINA_TRUE;
}
EAPI int
_evas_textblock_format_offset_get(const Evas_Object_Textblock_Node_Format *n)
{
return n->offset;
}
#endif
#if 0
/* Good for debugging */
EAPI void
pfnode(Evas_Object_Textblock_Node_Format *n)
{
printf("Format Node: %p\n", n);
printf("next = %p, prev = %p, last = %p\n", EINA_INLIST_GET(n)->next, EINA_INLIST_GET(n)->prev, EINA_INLIST_GET(n)->last);
printf("text_node = %p, offset = %u, visible = %d\n", n->text_node, (unsigned int) n->offset, n->visible);
printf("'%s'\n", n->format);
}
EAPI void
ptnode(Evas_Object_Textblock_Node_Text *n)
{
printf("Text Node: %p\n", n);
printf("next = %p, prev = %p, last = %p\n", EINA_INLIST_GET(n)->next, EINA_INLIST_GET(n)->prev, EINA_INLIST_GET(n)->last);
printf("format_node = %p\n", n->format_node);
printf("'%ls'\n", eina_ustrbuf_string_get(n->unicode));
}
EAPI void
pitem(Evas_Object_Textblock_Item *it)
{
Evas_Object_Textblock_Text_Item *ti;
Evas_Object_Textblock_Format_Item *fi;
printf("Item: %p %s\n", it, (it->visually_deleted) ? "(visually deleted)" : "");
printf("Type: %s (%d)\n", (it->type == EVAS_TEXTBLOCK_ITEM_TEXT) ?
"TEXT" : "FORMAT", it->type);
printf("Text pos: %u Visual pos: %u\n", (unsigned int) it->text_pos, (unsigned int)
#ifdef BIDI_SUPPORT
it->visual_pos
#else
it->text_pos
#endif
);
printf("Coords: x = %d w = %d adv = %d\n", (int) it->x, (int) it->w,
(int) it->adv);
if (it->type == EVAS_TEXTBLOCK_ITEM_TEXT)
{
Eina_Unicode *tmp;
ti = _ITEM_TEXT(it);
tmp = eina_unicode_strdup(GET_ITEM_TEXT(ti));
tmp[ti->text_props.text_len] = '\0';
printf("Text: '%ls'\n", tmp);
free(tmp);
}
else
{
fi = _ITEM_FORMAT(it);
printf("Format: '%s'\n", fi->item);
}
}
EAPI void
ppar(Evas_Object_Textblock_Paragraph *par)
{
Evas_Object_Textblock_Item *it;
Eina_List *i;
EINA_LIST_FOREACH(par->logical_items, i, it)
{
printf("***********************\n");
pitem(it);
}
}
#endif
#define EFL_CANVAS_TEXT_EXTRA_OPS \
EFL_OBJECT_OP_FUNC(efl_dbg_info_get, _efl_canvas_text_efl_object_dbg_info_get)
EOLIAN static Efl_Text_Cursor_Cursor *
_efl_canvas_text_efl_text_cursor_cursor_get(Eo *eo_obj EINA_UNUSED, Efl_Canvas_Text_Data *o, Efl_Text_Cursor_Cursor_Get_Type get_type)
{
if (get_type > EFL_TEXT_CURSOR_GET_MAIN)
{
ERR("Unsupported cursor types other than main!");
}
return o->cursor;
}
EAPI Efl_Text_Cursor_Cursor *
evas_object_textblock_cursor_get(const Evas_Object *eo_obj EINA_UNUSED)
{
return efl_text_cursor_get(eo_obj, EFL_TEXT_CURSOR_GET_MAIN);
}
EOLIAN static Efl_Text_Cursor_Cursor *
_efl_canvas_text_efl_text_cursor_cursor_new(Eo *eo_obj EINA_UNUSED, Efl_Canvas_Text_Data *o)
{
Efl_Text_Cursor_Cursor *cur;
Evas_Object_Protected_Data *obj = efl_data_scope_get(eo_obj, EFL_CANVAS_OBJECT_CLASS);
evas_object_async_block(obj);
cur = calloc(1, sizeof(Efl_Text_Cursor_Cursor));
if (!cur) return NULL;
_evas_textblock_cursor_init(cur, eo_obj);
o->cursors = eina_list_append(o->cursors, cur);
return cur;
}
EOLIAN static void
_efl_canvas_text_efl_text_cursor_cursor_free(Eo *eo_obj EINA_UNUSED, Efl_Canvas_Text_Data *o EINA_UNUSED,
Efl_Text_Cursor_Cursor *cur)
{
evas_textblock_cursor_free(cur);
}
/* Async Layout */
typedef struct _Text_Promise_Ctx Text_Promise_Ctx;
struct _Text_Promise_Ctx
{
int ret;
Ctxt *c;
Evas_Coord style_pad_l, style_pad_r, style_pad_t, style_pad_b;
Evas_Coord *w_ret, *h_ret;
Eina_Promise *p;
Eina_Value *v;
};
static void
_text_layout_async_do(void *todo, Ecore_Thread *thread EINA_UNUSED)
{
Text_Promise_Ctx *td = todo;
_layout_visual(td->c);
}
static void
_resolve_async(Text_Promise_Ctx *td, Evas_Coord w, Evas_Coord h)
{
Eina_Value v;
Eina_Rectangle r = { 0, 0, w, h };
eina_value_setup(&v, EINA_VALUE_TYPE_RECTANGLE);
eina_value_set(&v, r);
eina_promise_resolve(td->p, v);
free(td);
}
static void
_text_layout_async_done(void *todo, Ecore_Thread *thread EINA_UNUSED)
{
Text_Promise_Ctx *td = todo;
Ctxt *c = td->c;
Eo *obj = c->obj;
Efl_Canvas_Text_Data *o = c->o;
Evas_Coord w_ret, h_ret;
_layout_done(c, &w_ret, &h_ret);
c->o->formatted.valid = 1;
c->o->formatted.oneline_h = 0;
c->o->last_w = c->evas_o->cur->geometry.w;
c->o->wrap_changed = EINA_FALSE;
c->o->last_h = c->evas_o->cur->geometry.h;
if ((c->o->paragraphs) && (!EINA_INLIST_GET(c->o->paragraphs)->next) &&
(c->o->paragraphs->lines) && (!EINA_INLIST_GET(c->o->paragraphs->lines)->next))
{
if (c->evas_o->cur->geometry.h < c->o->formatted.h)
{
c->o->formatted.oneline_h = c->o->formatted.h;
}
}
c->o->changed = 0;
c->o->content_changed = 0;
c->o->format_changed = EINA_FALSE;
c->o->redraw = 1;
#ifdef BIDI_SUPPORT
c->o->changed_paragraph_direction = EINA_FALSE;
#endif
o->formatted.w = c->wmax;
o->formatted.h = c->hmax;
c->o->changed = EINA_TRUE;
evas_object_change(c->obj, c->evas_o);
free(c);
_resolve_async(td, o->formatted.w, o->formatted.h);
o->layout_th = NULL;
o->layout_jobs--;
if (o->layout_jobs > 0)
{
efl_canvas_text_async_layout(obj);
}
}
static void
_dummy_cancel(void *data EINA_UNUSED, const Eina_Promise *dead EINA_UNUSED)
{
}
static Eina_Future_Scheduler *
_future_scheduler_get(void)
{
return efl_loop_future_scheduler_get(ecore_main_loop_get());
}
EOLIAN static Eina_Future *
_efl_canvas_text_async_layout(Eo *eo_obj EINA_UNUSED, Efl_Canvas_Text_Data *o)
{
Ctxt *c;
Eina_Promise *p;
Eina_Future *f;
Evas_Object_Protected_Data *obj = efl_data_scope_get(eo_obj, EFL_CANVAS_OBJECT_CLASS);
Text_Promise_Ctx *ctx = calloc(1, sizeof(*ctx));
p = eina_promise_new(_future_scheduler_get(), _dummy_cancel, ctx);
if (!p)
{
CRI("Failed to allocate a promise");
return NULL;
}
ctx->p = p;
f = eina_future_new(p);
if (o->layout_th)
{
o->layout_jobs++;
return f;
}
evas_object_textblock_coords_recalc(eo_obj, obj, obj->private_data);
if (o->formatted.valid)
{
_resolve_async(ctx, o->formatted.w, o->formatted.w);
return f;
}
c = calloc(1, sizeof(*c));
ctx->c = c;
if (!_layout_setup(c, eo_obj,
obj->cur->geometry.w, obj->cur->geometry.h))
{
_resolve_async(ctx, 0, 0);
return f;
}
_layout_pre(c);
o->layout_th = ecore_thread_run(_text_layout_async_do, _text_layout_async_done,
NULL, ctx);
return f;
}
#include "canvas/efl_canvas_text.eo.c"
Reference in New Issue View Git Blame Copy Permalink