2 * Copyright (c) 2021 Omar Polo <op@omarpolo.com>
4 * Permission to use, copy, modify, and distribute this software for any
5 * purpose with or without fee is hereby granted, provided that the above
6 * copyright notice and this permission notice appear in all copies.
8 * THE SOFTWARE IS PROVIDED "AS IS" AND THE AUTHOR DISCLAIMS ALL WARRANTIES
9 * WITH REGARD TO THIS SOFTWARE INCLUDING ALL IMPLIED WARRANTIES OF
10 * MERCHANTABILITY AND FITNESS. IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR
11 * ANY SPECIAL, DIRECT, INDIRECT, OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES
12 * WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS, WHETHER IN AN
13 * ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING OUT OF
14 * OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE.
24 #include "telescope.h"
31 * There's a simple text wrapping algorithm.
33 * 1. if it's a line in a pre-formatted block:
36 * 2. otherwise advance the line char by char.
37 * 3. when ending the space, split the line at the last occurrence of
38 * a "word separator" (i.e. " \t-") or at point if none.
44 erase_buffer(struct buffer *buffer)
47 empty_linelist(buffer);
51 empty_linelist(struct buffer *buffer)
55 TAILQ_FOREACH_SAFE(l, &buffer->page.head, lines, lt) {
56 TAILQ_REMOVE(&buffer->page.head, l, lines);
59 if (l->type != LINE_COMPL &&
60 l->type != LINE_COMPL_CURRENT &&
69 empty_vlist(struct buffer *buffer)
73 buffer->top_line = NULL;
75 buffer->current_line = NULL;
78 TAILQ_FOREACH_SAFE(vl, &buffer->head, vlines, t) {
79 TAILQ_REMOVE(&buffer->head, vl, vlines);
86 push_line(struct buffer *buffer, struct line *l, const char *buf, size_t len, int flags)
91 /* omit trailing spaces */
93 for (end = buf + len - 1;
94 end > buf && isspace(*end);
99 if (!(l->flags & L_HIDDEN))
102 if ((vl = calloc(1, sizeof(*vl))) == NULL)
105 if (len != 0 && (vl->line = calloc(1, len+1)) == NULL) {
112 memcpy(vl->line, buf, len);
115 if (TAILQ_EMPTY(&buffer->head))
116 TAILQ_INSERT_HEAD(&buffer->head, vl, vlines);
118 TAILQ_INSERT_TAIL(&buffer->head, vl, vlines);
123 * Similar to wrap_text, but emit only o vline.
126 wrap_one(struct buffer *buffer, const char *prfx, struct line *l, size_t width)
128 struct vline *vl, *t;
131 * be lazy: call wrap_text and then discard the continuations.
134 if (!wrap_text(buffer, prfx, l, width))
137 TAILQ_FOREACH_SAFE(vl, &buffer->head, vlines, t) {
138 if (vl->flags & L_CONTINUATION) {
139 TAILQ_REMOVE(&buffer->head, vl, vlines);
150 * Build a list of visual line by wrapping the given line, assuming
151 * that when printed will have a leading prefix prfx.
154 wrap_text(struct buffer *buffer, const char *prfx, struct line *l, size_t width)
156 const char *separators = " \t-";
157 const char *start, *end, *line, *lastsep, *lastchar, *space;
158 uint32_t cp = 0, state = 0;
159 size_t cur, prfxwidth, w;
162 if ((line = l->line) == NULL)
163 return push_line(buffer, l, NULL, 0, 0);
165 prfxwidth = utf8_swidth(prfx);
172 if (l->type == LINE_LINK && emojify_link &&
173 emojied_line(l->line, &space)) {
174 prfxwidth = utf8_swidth_between(l->line, space);
179 for (; *line; line++) {
180 if (utf8_decode(&state, &cp, *line))
182 w = utf8_chwidth(cp);
183 if (cur + w > width) {
184 end = lastsep == NULL
185 ? utf8_next_cp((char*)lastchar)
186 : utf8_next_cp((char*)lastsep);
187 if (!push_line(buffer, l, start, end - start, flags))
189 flags = L_CONTINUATION;
191 cur = prfxwidth + utf8_swidth_between(start, lastchar);
192 } else if (strchr(separators, *line) != NULL) {
196 lastchar = utf8_prev_cp(line, l->line);
200 return push_line(buffer, l, start, line - start, flags);
204 hardwrap_text(struct buffer *buffer, struct line *l, size_t width)
206 const char *line, *start, *lastchar;
208 uint32_t state = 0, cp = 0;
211 if ((line = l->line) == NULL)
212 return push_line(buffer, l, NULL, 0, 0);
218 for (; *line; line++) {
219 if (utf8_decode(&state, &cp, *line))
221 w = utf8_chwidth(cp);
222 if (cur + w >= width) {
223 if (!push_line(buffer, l, start, lastchar - start, cont))
225 cont = L_CONTINUATION;
232 lastchar = utf8_prev_cp(line, l->line);
236 return push_line(buffer, l, start, line - start, cont);
240 wrap_page(struct buffer *buffer, int width)
243 const struct line *top_orig, *orig;
248 top_orig = buffer->top_line == NULL ? NULL : buffer->top_line->parent;
249 orig = buffer->current_line == NULL ? NULL : buffer->current_line->parent;
251 buffer->top_line = NULL;
252 buffer->current_line = NULL;
254 buffer->force_redraw = 1;
256 buffer->line_off = 0;
260 TAILQ_FOREACH(l, &buffer->page.head, lines) {
261 prfx = line_prefixes[l->type].prfx1;
272 wrap_text(buffer, prfx, l, MIN(fill_column, width));
274 case LINE_PRE_CONTENT:
276 pre_width = MIN(fill_column, width);
279 hardwrap_text(buffer, l, pre_width);
282 case LINE_COMPL_CURRENT:
284 wrap_one(buffer, prfx, l, width);
288 if (top_orig == l && buffer->top_line == NULL) {
289 buffer->line_off = buffer->line_max-1;
290 buffer->top_line = TAILQ_LAST(&buffer->head, vhead);
293 vl = TAILQ_PREV(buffer->top_line, vhead, vlines);
294 if (vl == NULL || vl->parent != orig)
296 buffer->top_line = vl;
301 if (orig == l && buffer->current_line == NULL) {
302 buffer->current_line = TAILQ_LAST(&buffer->head, vhead);
305 vl = TAILQ_PREV(buffer->current_line, vhead, vlines);
306 if (vl == NULL || vl->parent != orig)
308 buffer->current_line = vl;
313 if (buffer->current_line == NULL)
314 buffer->current_line = TAILQ_FIRST(&buffer->head);
316 if (buffer->top_line == NULL)
317 buffer->top_line = buffer->current_line;