Blame


1 4cd67caa 2022-02-09 op /*
2 4cd67caa 2022-02-09 op * Copyright (c) 2021 Omar Polo <op@omarpolo.com>
3 4cd67caa 2022-02-09 op *
4 4cd67caa 2022-02-09 op * Permission to use, copy, modify, and distribute this software for any
5 4cd67caa 2022-02-09 op * purpose with or without fee is hereby granted, provided that the above
6 4cd67caa 2022-02-09 op * copyright notice and this permission notice appear in all copies.
7 4cd67caa 2022-02-09 op *
8 4cd67caa 2022-02-09 op * THE SOFTWARE IS PROVIDED "AS IS" AND THE AUTHOR DISCLAIMS ALL WARRANTIES
9 4cd67caa 2022-02-09 op * WITH REGARD TO THIS SOFTWARE INCLUDING ALL IMPLIED WARRANTIES OF
10 4cd67caa 2022-02-09 op * MERCHANTABILITY AND FITNESS. IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR
11 4cd67caa 2022-02-09 op * ANY SPECIAL, DIRECT, INDIRECT, OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES
12 4cd67caa 2022-02-09 op * WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS, WHETHER IN AN
13 4cd67caa 2022-02-09 op * ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING OUT OF
14 4cd67caa 2022-02-09 op * OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE.
15 4cd67caa 2022-02-09 op */
16 4cd67caa 2022-02-09 op
17 4cd67caa 2022-02-09 op #include "compat.h"
18 4cd67caa 2022-02-09 op
19 4cd67caa 2022-02-09 op #include <ctype.h>
20 4cd67caa 2022-02-09 op #include <stdlib.h>
21 4cd67caa 2022-02-09 op #include <string.h>
22 4cd67caa 2022-02-09 op
23 4cd67caa 2022-02-09 op #include "defaults.h"
24 4cd67caa 2022-02-09 op #include "telescope.h"
25 4cd67caa 2022-02-09 op #include "utf8.h"
26 4cd67caa 2022-02-09 op
27 4cd67caa 2022-02-09 op /*
28 4cd67caa 2022-02-09 op * Text wrapping
29 4cd67caa 2022-02-09 op * =============
30 4cd67caa 2022-02-09 op *
31 4cd67caa 2022-02-09 op * There's a simple text wrapping algorithm.
32 4cd67caa 2022-02-09 op *
33 4cd67caa 2022-02-09 op * 1. if it's a line in a pre-formatted block:
34 4cd67caa 2022-02-09 op * a. hard wrap.
35 4cd67caa 2022-02-09 op * b. repeat
36 4cd67caa 2022-02-09 op * 2. otherwise advance the line char by char.
37 4cd67caa 2022-02-09 op * 3. when ending the space, split the line at the last occurrence of
38 4cd67caa 2022-02-09 op * a "word separator" (i.e. " \t-") or at point if none.
39 4cd67caa 2022-02-09 op * 4. repeat
40 4cd67caa 2022-02-09 op *
41 4cd67caa 2022-02-09 op */
42 4cd67caa 2022-02-09 op
43 4cd67caa 2022-02-09 op void
44 4cd67caa 2022-02-09 op erase_buffer(struct buffer *buffer)
45 4cd67caa 2022-02-09 op {
46 4cd67caa 2022-02-09 op empty_vlist(buffer);
47 4cd67caa 2022-02-09 op empty_linelist(buffer);
48 4cd67caa 2022-02-09 op }
49 4cd67caa 2022-02-09 op
50 4cd67caa 2022-02-09 op void
51 4cd67caa 2022-02-09 op empty_linelist(struct buffer *buffer)
52 4cd67caa 2022-02-09 op {
53 4cd67caa 2022-02-09 op struct line *l, *lt;
54 4cd67caa 2022-02-09 op
55 4cd67caa 2022-02-09 op TAILQ_FOREACH_SAFE(l, &buffer->page.head, lines, lt) {
56 4cd67caa 2022-02-09 op TAILQ_REMOVE(&buffer->page.head, l, lines);
57 4cd67caa 2022-02-09 op free(l->line);
58 4cd67caa 2022-02-09 op
59 4cd67caa 2022-02-09 op if (l->type != LINE_COMPL &&
60 4cd67caa 2022-02-09 op l->type != LINE_COMPL_CURRENT &&
61 4cd67caa 2022-02-09 op l->type != LINE_HELP)
62 4cd67caa 2022-02-09 op free(l->alt);
63 4cd67caa 2022-02-09 op
64 4cd67caa 2022-02-09 op free(l);
65 4cd67caa 2022-02-09 op }
66 4cd67caa 2022-02-09 op }
67 4cd67caa 2022-02-09 op
68 4cd67caa 2022-02-09 op void
69 4cd67caa 2022-02-09 op empty_vlist(struct buffer *buffer)
70 4cd67caa 2022-02-09 op {
71 4cd67caa 2022-02-09 op struct vline *vl, *t;
72 4cd67caa 2022-02-09 op
73 4cd67caa 2022-02-09 op buffer->top_line = NULL;
74 4cd67caa 2022-02-09 op buffer->line_off = 0;
75 4cd67caa 2022-02-09 op buffer->current_line = NULL;
76 4cd67caa 2022-02-09 op buffer->line_max = 0;
77 4cd67caa 2022-02-09 op
78 4cd67caa 2022-02-09 op TAILQ_FOREACH_SAFE(vl, &buffer->head, vlines, t) {
79 4cd67caa 2022-02-09 op TAILQ_REMOVE(&buffer->head, vl, vlines);
80 4cd67caa 2022-02-09 op free(vl->line);
81 4cd67caa 2022-02-09 op free(vl);
82 4cd67caa 2022-02-09 op }
83 4cd67caa 2022-02-09 op }
84 4cd67caa 2022-02-09 op
85 4cd67caa 2022-02-09 op static int
86 4cd67caa 2022-02-09 op push_line(struct buffer *buffer, struct line *l, const char *buf, size_t len, int flags)
87 4cd67caa 2022-02-09 op {
88 4cd67caa 2022-02-09 op struct vline *vl;
89 4cd67caa 2022-02-09 op const char *end;
90 4cd67caa 2022-02-09 op
91 4cd67caa 2022-02-09 op /* omit trailing spaces */
92 4cd67caa 2022-02-09 op if (len != 0) {
93 4cd67caa 2022-02-09 op for (end = buf + len - 1;
94 4cd67caa 2022-02-09 op end > buf && isspace(*end);
95 4cd67caa 2022-02-09 op end--, len--)
96 4cd67caa 2022-02-09 op ; /* nop */
97 4cd67caa 2022-02-09 op }
98 4cd67caa 2022-02-09 op
99 4cd67caa 2022-02-09 op if (!(l->flags & L_HIDDEN))
100 4cd67caa 2022-02-09 op buffer->line_max++;
101 4cd67caa 2022-02-09 op
102 4cd67caa 2022-02-09 op if ((vl = calloc(1, sizeof(*vl))) == NULL)
103 4cd67caa 2022-02-09 op return 0;
104 4cd67caa 2022-02-09 op
105 4cd67caa 2022-02-09 op if (len != 0 && (vl->line = calloc(1, len+1)) == NULL) {
106 4cd67caa 2022-02-09 op free(vl);
107 4cd67caa 2022-02-09 op return 0;
108 4cd67caa 2022-02-09 op }
109 4cd67caa 2022-02-09 op
110 4cd67caa 2022-02-09 op vl->parent = l;
111 4cd67caa 2022-02-09 op if (len != 0)
112 4cd67caa 2022-02-09 op memcpy(vl->line, buf, len);
113 4cd67caa 2022-02-09 op vl->flags = flags;
114 4cd67caa 2022-02-09 op
115 4cd67caa 2022-02-09 op TAILQ_INSERT_TAIL(&buffer->head, vl, vlines);
116 4cd67caa 2022-02-09 op return 1;
117 4cd67caa 2022-02-09 op }
118 4cd67caa 2022-02-09 op
119 4cd67caa 2022-02-09 op /*
120 4cd67caa 2022-02-09 op * Similar to wrap_text, but emit only o vline.
121 4cd67caa 2022-02-09 op */
122 4cd67caa 2022-02-09 op int
123 4cd67caa 2022-02-09 op wrap_one(struct buffer *buffer, const char *prfx, struct line *l, size_t width)
124 4cd67caa 2022-02-09 op {
125 4cd67caa 2022-02-09 op struct vline *vl, *t;
126 4cd67caa 2022-02-09 op
127 4cd67caa 2022-02-09 op /*
128 4cd67caa 2022-02-09 op * be lazy: call wrap_text and then discard the continuations.
129 4cd67caa 2022-02-09 op */
130 4cd67caa 2022-02-09 op
131 4cd67caa 2022-02-09 op if (!wrap_text(buffer, prfx, l, width))
132 4cd67caa 2022-02-09 op return 0;
133 4cd67caa 2022-02-09 op
134 4cd67caa 2022-02-09 op TAILQ_FOREACH_SAFE(vl, &buffer->head, vlines, t) {
135 4cd67caa 2022-02-09 op if (vl->flags & L_CONTINUATION) {
136 4cd67caa 2022-02-09 op TAILQ_REMOVE(&buffer->head, vl, vlines);
137 4cd67caa 2022-02-09 op free(vl->line);
138 4cd67caa 2022-02-09 op free(vl);
139 4cd67caa 2022-02-09 op buffer->line_max--;
140 4cd67caa 2022-02-09 op }
141 4cd67caa 2022-02-09 op }
142 4cd67caa 2022-02-09 op
143 4cd67caa 2022-02-09 op return 1;
144 4cd67caa 2022-02-09 op }
145 4cd67caa 2022-02-09 op
146 4cd67caa 2022-02-09 op /*
147 4cd67caa 2022-02-09 op * Build a list of visual line by wrapping the given line, assuming
148 4cd67caa 2022-02-09 op * that when printed will have a leading prefix prfx.
149 4cd67caa 2022-02-09 op */
150 4cd67caa 2022-02-09 op int
151 4cd67caa 2022-02-09 op wrap_text(struct buffer *buffer, const char *prfx, struct line *l, size_t width)
152 4cd67caa 2022-02-09 op {
153 4cd67caa 2022-02-09 op const char *separators = " \t-";
154 4cd67caa 2022-02-09 op const char *start, *end, *line, *lastsep, *lastchar, *space;
155 4cd67caa 2022-02-09 op uint32_t cp = 0, state = 0;
156 4cd67caa 2022-02-09 op size_t cur, prfxwidth, w;
157 4cd67caa 2022-02-09 op int flags;
158 4cd67caa 2022-02-09 op
159 4cd67caa 2022-02-09 op if ((line = l->line) == NULL)
160 4cd67caa 2022-02-09 op return push_line(buffer, l, NULL, 0, 0);
161 4cd67caa 2022-02-09 op
162 4cd67caa 2022-02-09 op prfxwidth = utf8_swidth(prfx);
163 4cd67caa 2022-02-09 op cur = prfxwidth;
164 4cd67caa 2022-02-09 op start = line;
165 4cd67caa 2022-02-09 op lastsep = NULL;
166 4cd67caa 2022-02-09 op lastchar = line;
167 4cd67caa 2022-02-09 op flags = 0;
168 4cd67caa 2022-02-09 op
169 4cd67caa 2022-02-09 op if (l->type == LINE_LINK && emojify_link &&
170 4cd67caa 2022-02-09 op emojied_line(l->line, &space)) {
171 4cd67caa 2022-02-09 op prfxwidth = utf8_swidth_between(l->line, space);
172 4cd67caa 2022-02-09 op cur = prfxwidth;
173 4cd67caa 2022-02-09 op line = space + 1;
174 4cd67caa 2022-02-09 op }
175 4cd67caa 2022-02-09 op
176 4cd67caa 2022-02-09 op for (; *line; line++) {
177 4cd67caa 2022-02-09 op if (utf8_decode(&state, &cp, *line))
178 4cd67caa 2022-02-09 op continue;
179 4cd67caa 2022-02-09 op w = utf8_chwidth(cp);
180 4cd67caa 2022-02-09 op if (cur + w > width) {
181 4cd67caa 2022-02-09 op end = lastsep == NULL
182 4cd67caa 2022-02-09 op ? utf8_next_cp((char*)lastchar)
183 4cd67caa 2022-02-09 op : utf8_next_cp((char*)lastsep);
184 4cd67caa 2022-02-09 op if (!push_line(buffer, l, start, end - start, flags))
185 4cd67caa 2022-02-09 op return 0;
186 4cd67caa 2022-02-09 op flags = L_CONTINUATION;
187 4cd67caa 2022-02-09 op start = end;
188 4cd67caa 2022-02-09 op cur = prfxwidth + utf8_swidth_between(start, lastchar);
189 4cd67caa 2022-02-09 op } else if (strchr(separators, *line) != NULL) {
190 4cd67caa 2022-02-09 op lastsep = line;
191 4cd67caa 2022-02-09 op }
192 4cd67caa 2022-02-09 op
193 4cd67caa 2022-02-09 op lastchar = utf8_prev_cp(line, l->line);
194 4cd67caa 2022-02-09 op cur += w;
195 4cd67caa 2022-02-09 op }
196 4cd67caa 2022-02-09 op
197 4cd67caa 2022-02-09 op return push_line(buffer, l, start, line - start, flags);
198 4cd67caa 2022-02-09 op }
199 4cd67caa 2022-02-09 op
200 4cd67caa 2022-02-09 op int
201 4cd67caa 2022-02-09 op hardwrap_text(struct buffer *buffer, struct line *l, size_t width)
202 4cd67caa 2022-02-09 op {
203 4cd67caa 2022-02-09 op const char *line, *start, *lastchar;
204 4cd67caa 2022-02-09 op int cont;
205 4cd67caa 2022-02-09 op uint32_t state = 0, cp = 0;
206 4cd67caa 2022-02-09 op size_t cur, w;
207 4cd67caa 2022-02-09 op
208 4cd67caa 2022-02-09 op if ((line = l->line) == NULL)
209 4cd67caa 2022-02-09 op return push_line(buffer, l, NULL, 0, 0);
210 4cd67caa 2022-02-09 op
211 4cd67caa 2022-02-09 op start = line;
212 4cd67caa 2022-02-09 op lastchar = line;
213 4cd67caa 2022-02-09 op cont = 0;
214 4cd67caa 2022-02-09 op cur = 0;
215 4cd67caa 2022-02-09 op for (; *line; line++) {
216 4cd67caa 2022-02-09 op if (utf8_decode(&state, &cp, *line))
217 4cd67caa 2022-02-09 op continue;
218 4cd67caa 2022-02-09 op w = utf8_chwidth(cp);
219 4cd67caa 2022-02-09 op if (cur + w > width) {
220 4cd67caa 2022-02-09 op if (!push_line(buffer, l, start, lastchar-start, cont))
221 4cd67caa 2022-02-09 op return 0;
222 4cd67caa 2022-02-09 op cont = L_CONTINUATION;
223 4cd67caa 2022-02-09 op if (dont_wrap_pre)
224 4cd67caa 2022-02-09 op return 1;
225 4cd67caa 2022-02-09 op cur = 0;
226 4cd67caa 2022-02-09 op start = lastchar;
227 4cd67caa 2022-02-09 op }
228 4cd67caa 2022-02-09 op
229 4cd67caa 2022-02-09 op lastchar = utf8_prev_cp(line, l->line);
230 4cd67caa 2022-02-09 op cur += w;
231 4cd67caa 2022-02-09 op }
232 4cd67caa 2022-02-09 op
233 4cd67caa 2022-02-09 op return push_line(buffer, l, start, line - start, cont);
234 4cd67caa 2022-02-09 op }
235 4cd67caa 2022-02-09 op
236 4cd67caa 2022-02-09 op int
237 4cd67caa 2022-02-09 op wrap_page(struct buffer *buffer, int width)
238 4cd67caa 2022-02-09 op {
239 4cd67caa 2022-02-09 op struct line *l;
240 4cd67caa 2022-02-09 op const struct line *top_orig, *orig;
241 4cd67caa 2022-02-09 op struct vline *vl;
242 4cd67caa 2022-02-09 op const char *prfx;
243 4cd67caa 2022-02-09 op
244 4cd67caa 2022-02-09 op top_orig = buffer->top_line == NULL ? NULL : buffer->top_line->parent;
245 4cd67caa 2022-02-09 op orig = buffer->current_line == NULL ? NULL : buffer->current_line->parent;
246 4cd67caa 2022-02-09 op
247 4cd67caa 2022-02-09 op buffer->top_line = NULL;
248 4cd67caa 2022-02-09 op buffer->current_line = NULL;
249 4cd67caa 2022-02-09 op
250 4cd67caa 2022-02-09 op buffer->force_redraw = 1;
251 4cd67caa 2022-02-09 op buffer->curs_y = 0;
252 4cd67caa 2022-02-09 op buffer->line_off = 0;
253 4cd67caa 2022-02-09 op
254 4cd67caa 2022-02-09 op empty_vlist(buffer);
255 4cd67caa 2022-02-09 op
256 4cd67caa 2022-02-09 op TAILQ_FOREACH(l, &buffer->page.head, lines) {
257 4cd67caa 2022-02-09 op prfx = line_prefixes[l->type].prfx1;
258 4cd67caa 2022-02-09 op switch (l->type) {
259 4cd67caa 2022-02-09 op case LINE_TEXT:
260 4cd67caa 2022-02-09 op case LINE_LINK:
261 4cd67caa 2022-02-09 op case LINE_TITLE_1:
262 4cd67caa 2022-02-09 op case LINE_TITLE_2:
263 4cd67caa 2022-02-09 op case LINE_TITLE_3:
264 4cd67caa 2022-02-09 op case LINE_ITEM:
265 4cd67caa 2022-02-09 op case LINE_QUOTE:
266 4cd67caa 2022-02-09 op case LINE_PRE_START:
267 4cd67caa 2022-02-09 op case LINE_PRE_END:
268 4cd67caa 2022-02-09 op wrap_text(buffer, prfx, l, MIN(fill_column, width));
269 4cd67caa 2022-02-09 op break;
270 4cd67caa 2022-02-09 op case LINE_PRE_CONTENT:
271 4cd67caa 2022-02-09 op case LINE_PATCH:
272 4cd67caa 2022-02-09 op case LINE_PATCH_HDR:
273 4cd67caa 2022-02-09 op case LINE_PATCH_HUNK_HDR:
274 4cd67caa 2022-02-09 op case LINE_PATCH_ADD:
275 4cd67caa 2022-02-09 op case LINE_PATCH_DEL:
276 4cd67caa 2022-02-09 op hardwrap_text(buffer, l, MIN(fill_column, width));
277 4cd67caa 2022-02-09 op break;
278 4cd67caa 2022-02-09 op case LINE_COMPL:
279 4cd67caa 2022-02-09 op case LINE_COMPL_CURRENT:
280 4cd67caa 2022-02-09 op case LINE_HELP:
281 4cd67caa 2022-02-09 op case LINE_DOWNLOAD:
282 4cd67caa 2022-02-09 op case LINE_DOWNLOAD_DONE:
283 4cd67caa 2022-02-09 op case LINE_DOWNLOAD_INFO:
284 4cd67caa 2022-02-09 op wrap_one(buffer, prfx, l, width);
285 4cd67caa 2022-02-09 op break;
286 4cd67caa 2022-02-09 op case LINE_FRINGE:
287 4cd67caa 2022-02-09 op /* never, ever wrapped */
288 4cd67caa 2022-02-09 op break;
289 4cd67caa 2022-02-09 op }
290 4cd67caa 2022-02-09 op
291 4cd67caa 2022-02-09 op if (top_orig == l && buffer->top_line == NULL) {
292 4cd67caa 2022-02-09 op buffer->line_off = buffer->line_max-1;
293 4cd67caa 2022-02-09 op buffer->top_line = TAILQ_LAST(&buffer->head, vhead);
294 4cd67caa 2022-02-09 op
295 4cd67caa 2022-02-09 op while (1) {
296 4cd67caa 2022-02-09 op vl = TAILQ_PREV(buffer->top_line, vhead, vlines);
297 4cd67caa 2022-02-09 op if (vl == NULL || vl->parent != orig)
298 4cd67caa 2022-02-09 op break;
299 4cd67caa 2022-02-09 op buffer->top_line = vl;
300 4cd67caa 2022-02-09 op buffer->line_off--;
301 4cd67caa 2022-02-09 op }
302 4cd67caa 2022-02-09 op }
303 4cd67caa 2022-02-09 op
304 4cd67caa 2022-02-09 op if (orig == l && buffer->current_line == NULL) {
305 4cd67caa 2022-02-09 op buffer->current_line = TAILQ_LAST(&buffer->head, vhead);
306 4cd67caa 2022-02-09 op
307 4cd67caa 2022-02-09 op while (1) {
308 4cd67caa 2022-02-09 op vl = TAILQ_PREV(buffer->current_line, vhead, vlines);
309 4cd67caa 2022-02-09 op if (vl == NULL || vl->parent != orig)
310 4cd67caa 2022-02-09 op break;
311 4cd67caa 2022-02-09 op buffer->current_line = vl;
312 4cd67caa 2022-02-09 op }
313 4cd67caa 2022-02-09 op }
314 4cd67caa 2022-02-09 op }
315 4cd67caa 2022-02-09 op
316 4cd67caa 2022-02-09 op if (buffer->current_line == NULL)
317 4cd67caa 2022-02-09 op buffer->current_line = TAILQ_FIRST(&buffer->head);
318 4cd67caa 2022-02-09 op
319 4cd67caa 2022-02-09 op if (buffer->top_line == NULL)
320 4cd67caa 2022-02-09 op buffer->top_line = buffer->current_line;
321 4cd67caa 2022-02-09 op
322 4cd67caa 2022-02-09 op return 1;
323 4cd67caa 2022-02-09 op }