Blame


1 5e11c00c 2021-03-02 op /*
2 5e11c00c 2021-03-02 op * Copyright (c) 2021 Omar Polo <op@omarpolo.com>
3 5e11c00c 2021-03-02 op *
4 5e11c00c 2021-03-02 op * Permission to use, copy, modify, and distribute this software for any
5 5e11c00c 2021-03-02 op * purpose with or without fee is hereby granted, provided that the above
6 5e11c00c 2021-03-02 op * copyright notice and this permission notice appear in all copies.
7 5e11c00c 2021-03-02 op *
8 5e11c00c 2021-03-02 op * THE SOFTWARE IS PROVIDED "AS IS" AND THE AUTHOR DISCLAIMS ALL WARRANTIES
9 5e11c00c 2021-03-02 op * WITH REGARD TO THIS SOFTWARE INCLUDING ALL IMPLIED WARRANTIES OF
10 5e11c00c 2021-03-02 op * MERCHANTABILITY AND FITNESS. IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR
11 5e11c00c 2021-03-02 op * ANY SPECIAL, DIRECT, INDIRECT, OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES
12 5e11c00c 2021-03-02 op * WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS, WHETHER IN AN
13 5e11c00c 2021-03-02 op * ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING OUT OF
14 5e11c00c 2021-03-02 op * OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE.
15 5e11c00c 2021-03-02 op */
16 5e11c00c 2021-03-02 op
17 1d08c280 2021-03-06 op /*
18 1d08c280 2021-03-06 op * Ncurses UI for telescope.
19 1d08c280 2021-03-06 op *
20 1d08c280 2021-03-06 op *
21 1d08c280 2021-03-06 op * Text wrapping
22 1d08c280 2021-03-06 op * =============
23 1d08c280 2021-03-06 op *
24 1d08c280 2021-03-06 op * There's a simple text wrapping algorithm.
25 1d08c280 2021-03-06 op *
26 1d08c280 2021-03-06 op * 1. if it's a line in a pre-formatted block:
27 1d08c280 2021-03-06 op * a. hard wrap.
28 1d08c280 2021-03-06 op * b. repeat
29 1d08c280 2021-03-06 op * 2. there is enough room for the next word?
30 1d08c280 2021-03-06 op * a. yes: render it
31 1d08c280 2021-03-06 op * b. no: break the current line.
32 1d08c280 2021-03-06 op * i. while there isn't enough space to draw the current
33 1d08c280 2021-03-06 op * word, hard-wrap it
34 1d08c280 2021-03-06 op * ii. draw the remainder of the current word (can be the
35 1d08c280 2021-03-06 op * the entirely)
36 1d08c280 2021-03-06 op * 3. render the spaces after the word
37 1d08c280 2021-03-06 op * a. but if there is not enough room break the line and
38 1d08c280 2021-03-06 op * forget them
39 1d08c280 2021-03-06 op * 4. repeat
40 1d08c280 2021-03-06 op *
41 1d08c280 2021-03-06 op *
42 1d08c280 2021-03-06 op * Text scrolling
43 1d08c280 2021-03-06 op * ==============
44 1d08c280 2021-03-06 op *
45 1d08c280 2021-03-06 op * ncurses allows you to scroll a window, but when a line goes out of
46 1d08c280 2021-03-06 op * the visible area it's forgotten. We keep a list of formatted lines
47 1d08c280 2021-03-06 op * (``visual lines'') that we know fits in the window, and draw them.
48 1d08c280 2021-03-06 op * This way is easy to scroll: just call wscrl and then render the
49 1d08c280 2021-03-06 op * first/last line!
50 1d08c280 2021-03-06 op *
51 1d08c280 2021-03-06 op * This means that on every resize we have to clear our list of lines
52 1d08c280 2021-03-06 op * and re-render everything. A clever approach would be to do this
53 1d08c280 2021-03-06 op * ``on-demand''.
54 1d08c280 2021-03-06 op *
55 1d08c280 2021-03-06 op * TODO: make the text formatting on-demand.
56 1d08c280 2021-03-06 op *
57 1d08c280 2021-03-06 op */
58 1d08c280 2021-03-06 op
59 5e11c00c 2021-03-02 op #include <telescope.h>
60 5e11c00c 2021-03-02 op
61 5e11c00c 2021-03-02 op #include <curses.h>
62 5e11c00c 2021-03-02 op #include <event.h>
63 5e11c00c 2021-03-02 op #include <locale.h>
64 5e11c00c 2021-03-02 op #include <signal.h>
65 eb259e66 2021-03-02 op #include <stdlib.h>
66 eb259e66 2021-03-02 op #include <string.h>
67 5e11c00c 2021-03-02 op
68 5e11c00c 2021-03-02 op #define TAB_CURRENT 0x1
69 5e11c00c 2021-03-02 op
70 eb259e66 2021-03-02 op #define CTRL(x) ((x)&0x1F)
71 eb259e66 2021-03-02 op
72 1d08c280 2021-03-06 op #define MIN(a, b) ((a) < (b) ? (a) : (b))
73 1d08c280 2021-03-06 op #define MAX(a, b) ((a) > (b) ? (a) : (b))
74 1d08c280 2021-03-06 op
75 5e11c00c 2021-03-02 op static struct event stdioev, winchev;
76 5e11c00c 2021-03-02 op
77 1d08c280 2021-03-06 op static int push_line(struct tab*, const struct line*, const char*, size_t);
78 1d08c280 2021-03-06 op static void empty_vlist(struct tab*);
79 48e9d457 2021-03-06 op static void restore_cursor(struct tab *);
80 48e9d457 2021-03-06 op static void cmd_previous_line(int);
81 48e9d457 2021-03-06 op static void cmd_next_line(int);
82 48e9d457 2021-03-06 op static void cmd_forward_char(int);
83 48e9d457 2021-03-06 op static void cmd_backward_char(int);
84 48e9d457 2021-03-06 op static void cmd_redraw(int);
85 48e9d457 2021-03-06 op static void cmd_scroll_down(int);
86 48e9d457 2021-03-06 op static void cmd_scroll_up(int);
87 48e9d457 2021-03-06 op static void cmd_kill_telescope(int);
88 48e9d457 2021-03-06 op static struct line *nth_line(struct tab*, size_t);
89 5e11c00c 2021-03-02 op static struct tab *current_tab(void);
90 5e11c00c 2021-03-02 op static void dispatch_stdio(int, short, void*);
91 a6d450c1 2021-03-06 op static void handle_clear_minibuf(int, short, void*);
92 5e11c00c 2021-03-02 op static void handle_resize(int, short, void*);
93 eb259e66 2021-03-02 op static int word_bourdaries(const char*, const char*, const char**, const char**);
94 1d08c280 2021-03-06 op static void wrap_text(struct tab*, const char*, struct line*);
95 1d08c280 2021-03-06 op static int hardwrap_text(struct tab*, struct line*);
96 1d08c280 2021-03-06 op static int wrap_page(struct tab*);
97 48e9d457 2021-03-06 op static void print_line(struct line*);
98 5e11c00c 2021-03-02 op static void redraw_tab(struct tab*);
99 5e11c00c 2021-03-02 op
100 1d08c280 2021-03-06 op typedef void (*interactivefn)(int);
101 1d08c280 2021-03-06 op
102 1d08c280 2021-03-06 op static void cmd_unbound(int);
103 1d08c280 2021-03-06 op
104 48e9d457 2021-03-06 op static WINDOW *tabline, *body, *modeline, *minibuf;
105 48e9d457 2021-03-06 op static int body_lines, body_cols;
106 48e9d457 2021-03-06 op
107 48e9d457 2021-03-06 op static struct event clminibufev;
108 48e9d457 2021-03-06 op static int clminibufev_set;
109 a6d450c1 2021-03-06 op static struct timeval clminibufev_timer = { 5, 0 };
110 48e9d457 2021-03-06 op
111 1d08c280 2021-03-06 op struct ui_state {
112 1d08c280 2021-03-06 op int curs_x;
113 1d08c280 2021-03-06 op int curs_y;
114 48e9d457 2021-03-06 op size_t line_off;
115 48e9d457 2021-03-06 op size_t line_max;
116 1d08c280 2021-03-06 op
117 1d08c280 2021-03-06 op TAILQ_HEAD(, line) head;
118 1d08c280 2021-03-06 op };
119 1d08c280 2021-03-06 op
120 48e9d457 2021-03-06 op struct binding {
121 48e9d457 2021-03-06 op int key;
122 48e9d457 2021-03-06 op interactivefn fn;
123 48e9d457 2021-03-06 op } bindings[] = {
124 48e9d457 2021-03-06 op { CTRL('p'), cmd_previous_line, },
125 48e9d457 2021-03-06 op { CTRL('n'), cmd_next_line, },
126 48e9d457 2021-03-06 op { CTRL('f'), cmd_forward_char, },
127 48e9d457 2021-03-06 op { CTRL('b'), cmd_backward_char, },
128 48e9d457 2021-03-06 op
129 48e9d457 2021-03-06 op { CTRL('L'), cmd_redraw, },
130 48e9d457 2021-03-06 op
131 48e9d457 2021-03-06 op { 'J', cmd_scroll_down, },
132 48e9d457 2021-03-06 op { 'K', cmd_scroll_up, },
133 48e9d457 2021-03-06 op
134 48e9d457 2021-03-06 op { 'q', cmd_kill_telescope, },
135 48e9d457 2021-03-06 op
136 48e9d457 2021-03-06 op { 0, NULL, },
137 48e9d457 2021-03-06 op };
138 48e9d457 2021-03-06 op
139 1d08c280 2021-03-06 op static int
140 1d08c280 2021-03-06 op push_line(struct tab *tab, const struct line *l, const char *buf, size_t len)
141 1d08c280 2021-03-06 op {
142 1d08c280 2021-03-06 op struct line *vl;
143 1d08c280 2021-03-06 op
144 48e9d457 2021-03-06 op tab->s->line_max++;
145 48e9d457 2021-03-06 op
146 1d08c280 2021-03-06 op if ((vl = calloc(1, sizeof(*vl))) == NULL)
147 1d08c280 2021-03-06 op return 0;
148 1d08c280 2021-03-06 op
149 1d08c280 2021-03-06 op if (len != 0 && (vl->line = calloc(1, len+1)) == NULL) {
150 1d08c280 2021-03-06 op free(vl);
151 1d08c280 2021-03-06 op return 0;
152 1d08c280 2021-03-06 op }
153 1d08c280 2021-03-06 op
154 1d08c280 2021-03-06 op vl->type = l->type;
155 1d08c280 2021-03-06 op if (len != 0)
156 1d08c280 2021-03-06 op memcpy(vl->line, buf, len);
157 1d08c280 2021-03-06 op vl->alt = l->alt;
158 1d08c280 2021-03-06 op
159 1d08c280 2021-03-06 op if (TAILQ_EMPTY(&tab->s->head))
160 1d08c280 2021-03-06 op TAILQ_INSERT_HEAD(&tab->s->head, vl, lines);
161 1d08c280 2021-03-06 op else
162 1d08c280 2021-03-06 op TAILQ_INSERT_TAIL(&tab->s->head, vl, lines);
163 1d08c280 2021-03-06 op return 1;
164 1d08c280 2021-03-06 op }
165 1d08c280 2021-03-06 op
166 1d08c280 2021-03-06 op static void
167 1d08c280 2021-03-06 op empty_vlist(struct tab *tab)
168 1d08c280 2021-03-06 op {
169 1d08c280 2021-03-06 op struct line *l, *t;
170 1d08c280 2021-03-06 op
171 48e9d457 2021-03-06 op tab->s->line_max = 0;
172 48e9d457 2021-03-06 op
173 1d08c280 2021-03-06 op TAILQ_FOREACH_SAFE(l, &tab->s->head, lines, t) {
174 1d08c280 2021-03-06 op TAILQ_REMOVE(&tab->s->head, l, lines);
175 1d08c280 2021-03-06 op free(l->line);
176 1d08c280 2021-03-06 op /* l->alt references the original line! */
177 1d08c280 2021-03-06 op free(l);
178 1d08c280 2021-03-06 op }
179 1d08c280 2021-03-06 op }
180 1d08c280 2021-03-06 op
181 48e9d457 2021-03-06 op static void
182 48e9d457 2021-03-06 op restore_cursor(struct tab *tab)
183 48e9d457 2021-03-06 op {
184 48e9d457 2021-03-06 op wmove(body, tab->s->curs_y, tab->s->curs_x);
185 48e9d457 2021-03-06 op }
186 1d08c280 2021-03-06 op
187 1d08c280 2021-03-06 op static void
188 1d08c280 2021-03-06 op cmd_previous_line(int k)
189 1d08c280 2021-03-06 op {
190 1d08c280 2021-03-06 op struct tab *tab;
191 1d08c280 2021-03-06 op
192 1d08c280 2021-03-06 op tab = current_tab();
193 4dd664ce 2021-03-06 op
194 4dd664ce 2021-03-06 op if (--tab->s->curs_y < 0) {
195 4dd664ce 2021-03-06 op tab->s->curs_y = 0;
196 4dd664ce 2021-03-06 op cmd_scroll_up(k);
197 4dd664ce 2021-03-06 op }
198 4dd664ce 2021-03-06 op
199 48e9d457 2021-03-06 op restore_cursor(tab);
200 1d08c280 2021-03-06 op }
201 1d08c280 2021-03-06 op
202 1d08c280 2021-03-06 op static void
203 1d08c280 2021-03-06 op cmd_next_line(int k)
204 1d08c280 2021-03-06 op {
205 1d08c280 2021-03-06 op struct tab *tab;
206 1d08c280 2021-03-06 op
207 1d08c280 2021-03-06 op tab = current_tab();
208 4dd664ce 2021-03-06 op
209 4dd664ce 2021-03-06 op if (++tab->s->curs_y > body_lines-1) {
210 4dd664ce 2021-03-06 op tab->s->curs_y = body_lines-1;
211 4dd664ce 2021-03-06 op cmd_scroll_down(k);
212 4dd664ce 2021-03-06 op }
213 4dd664ce 2021-03-06 op
214 48e9d457 2021-03-06 op restore_cursor(tab);
215 1d08c280 2021-03-06 op }
216 1d08c280 2021-03-06 op
217 1d08c280 2021-03-06 op static void
218 1d08c280 2021-03-06 op cmd_forward_char(int k)
219 1d08c280 2021-03-06 op {
220 b2cd5e06 2021-03-06 op struct tab *tab;
221 b2cd5e06 2021-03-06 op
222 b2cd5e06 2021-03-06 op tab = current_tab();
223 4dd664ce 2021-03-06 op tab->s->curs_x = MIN(body_cols-1, tab->s->curs_x+1);
224 48e9d457 2021-03-06 op restore_cursor(tab);
225 1d08c280 2021-03-06 op }
226 1d08c280 2021-03-06 op
227 1d08c280 2021-03-06 op static void
228 1d08c280 2021-03-06 op cmd_backward_char(int k)
229 1d08c280 2021-03-06 op {
230 b2cd5e06 2021-03-06 op struct tab *tab;
231 b2cd5e06 2021-03-06 op
232 b2cd5e06 2021-03-06 op tab = current_tab();
233 b2cd5e06 2021-03-06 op tab->s->curs_x = MAX(0, tab->s->curs_x-1);
234 48e9d457 2021-03-06 op restore_cursor(tab);
235 1d08c280 2021-03-06 op }
236 1d08c280 2021-03-06 op
237 1d08c280 2021-03-06 op static void
238 1d08c280 2021-03-06 op cmd_redraw(int k)
239 1d08c280 2021-03-06 op {
240 b1738d2e 2021-03-06 op handle_resize(0, 0, NULL);
241 1d08c280 2021-03-06 op }
242 1d08c280 2021-03-06 op
243 1d08c280 2021-03-06 op static void
244 48e9d457 2021-03-06 op cmd_scroll_up(int k)
245 1d08c280 2021-03-06 op {
246 48e9d457 2021-03-06 op struct tab *tab;
247 48e9d457 2021-03-06 op struct line *l;
248 48e9d457 2021-03-06 op
249 48e9d457 2021-03-06 op tab = current_tab();
250 48e9d457 2021-03-06 op if (tab->s->line_off == 0)
251 48e9d457 2021-03-06 op return;
252 48e9d457 2021-03-06 op
253 48e9d457 2021-03-06 op l = nth_line(tab, --tab->s->line_off);
254 48e9d457 2021-03-06 op wscrl(body, -1);
255 48e9d457 2021-03-06 op wmove(body, 0, 0);
256 48e9d457 2021-03-06 op print_line(l);
257 1d08c280 2021-03-06 op }
258 1d08c280 2021-03-06 op
259 1d08c280 2021-03-06 op static void
260 48e9d457 2021-03-06 op cmd_scroll_down(int k)
261 1d08c280 2021-03-06 op {
262 48e9d457 2021-03-06 op struct tab *tab;
263 48e9d457 2021-03-06 op struct line *l;
264 48e9d457 2021-03-06 op size_t n;
265 48e9d457 2021-03-06 op
266 48e9d457 2021-03-06 op tab = current_tab();
267 48e9d457 2021-03-06 op
268 48e9d457 2021-03-06 op if (tab->s->line_max == 0 || tab->s->line_off == tab->s->line_max-1)
269 48e9d457 2021-03-06 op return;
270 48e9d457 2021-03-06 op
271 48e9d457 2021-03-06 op tab->s->line_off++;
272 48e9d457 2021-03-06 op wscrl(body, 1);
273 48e9d457 2021-03-06 op
274 48e9d457 2021-03-06 op if (tab->s->line_max - tab->s->line_off < body_lines)
275 48e9d457 2021-03-06 op return;
276 48e9d457 2021-03-06 op
277 48e9d457 2021-03-06 op l = nth_line(tab, tab->s->line_off + body_lines-1);
278 48e9d457 2021-03-06 op wmove(body, body_lines-1, 0);
279 48e9d457 2021-03-06 op print_line(l);
280 1d08c280 2021-03-06 op }
281 1d08c280 2021-03-06 op
282 1d08c280 2021-03-06 op static void
283 1d08c280 2021-03-06 op cmd_kill_telescope(int k)
284 1d08c280 2021-03-06 op {
285 1d08c280 2021-03-06 op event_loopbreak();
286 1d08c280 2021-03-06 op }
287 1d08c280 2021-03-06 op
288 1d08c280 2021-03-06 op static void
289 1d08c280 2021-03-06 op cmd_unbound(int k)
290 1d08c280 2021-03-06 op {
291 a6d450c1 2021-03-06 op if (clminibufev_set)
292 a6d450c1 2021-03-06 op evtimer_del(&clminibufev);
293 a6d450c1 2021-03-06 op evtimer_set(&clminibufev, handle_clear_minibuf, NULL);
294 a6d450c1 2021-03-06 op evtimer_add(&clminibufev, &clminibufev_timer);
295 bef915e1 2021-03-06 op clminibufev_set = 1;
296 a6d450c1 2021-03-06 op
297 b1738d2e 2021-03-06 op werase(minibuf);
298 bef915e1 2021-03-06 op wprintw(minibuf, "%c is undefined", k);
299 48e9d457 2021-03-06 op restore_cursor(current_tab());
300 1d08c280 2021-03-06 op }
301 1d08c280 2021-03-06 op
302 48e9d457 2021-03-06 op static struct line *
303 48e9d457 2021-03-06 op nth_line(struct tab *tab, size_t n)
304 48e9d457 2021-03-06 op {
305 48e9d457 2021-03-06 op struct line *l;
306 48e9d457 2021-03-06 op size_t i;
307 48e9d457 2021-03-06 op
308 48e9d457 2021-03-06 op i = 0;
309 48e9d457 2021-03-06 op TAILQ_FOREACH(l, &tab->s->head, lines) {
310 48e9d457 2021-03-06 op if (i == n)
311 48e9d457 2021-03-06 op return l;
312 48e9d457 2021-03-06 op i++;
313 48e9d457 2021-03-06 op }
314 48e9d457 2021-03-06 op
315 48e9d457 2021-03-06 op /* unreachable */
316 48e9d457 2021-03-06 op abort();
317 48e9d457 2021-03-06 op }
318 48e9d457 2021-03-06 op
319 5e11c00c 2021-03-02 op static struct tab *
320 5e11c00c 2021-03-02 op current_tab(void)
321 5e11c00c 2021-03-02 op {
322 5e11c00c 2021-03-02 op struct tab *t;
323 5e11c00c 2021-03-02 op
324 5e11c00c 2021-03-02 op TAILQ_FOREACH(t, &tabshead, tabs) {
325 5e11c00c 2021-03-02 op if (t->flags & TAB_CURRENT)
326 5e11c00c 2021-03-02 op return t;
327 5e11c00c 2021-03-02 op }
328 5e11c00c 2021-03-02 op
329 5e11c00c 2021-03-02 op /* unreachable */
330 5e11c00c 2021-03-02 op abort();
331 5e11c00c 2021-03-02 op }
332 5e11c00c 2021-03-02 op
333 5e11c00c 2021-03-02 op static void
334 5e11c00c 2021-03-02 op dispatch_stdio(int fd, short ev, void *d)
335 5e11c00c 2021-03-02 op {
336 1d08c280 2021-03-06 op struct binding *b;
337 1d08c280 2021-03-06 op int k;
338 5e11c00c 2021-03-02 op
339 48e9d457 2021-03-06 op k = wgetch(body);
340 5e11c00c 2021-03-02 op
341 1d08c280 2021-03-06 op if (k == ERR)
342 5e11c00c 2021-03-02 op return;
343 5e11c00c 2021-03-02 op
344 1d08c280 2021-03-06 op for (b = bindings; b->fn != NULL; ++b) {
345 1d08c280 2021-03-06 op if (k == b->key) {
346 1d08c280 2021-03-06 op b->fn(k);
347 1d08c280 2021-03-06 op goto done;
348 1d08c280 2021-03-06 op }
349 eb259e66 2021-03-02 op }
350 eb259e66 2021-03-02 op
351 1d08c280 2021-03-06 op cmd_unbound(k);
352 1d08c280 2021-03-06 op
353 1d08c280 2021-03-06 op done:
354 48e9d457 2021-03-06 op restore_cursor(current_tab());
355 48e9d457 2021-03-06 op wrefresh(tabline);
356 48e9d457 2021-03-06 op wrefresh(modeline);
357 48e9d457 2021-03-06 op wrefresh(minibuf);
358 a6d450c1 2021-03-06 op
359 a6d450c1 2021-03-06 op wrefresh(body);
360 a6d450c1 2021-03-06 op }
361 48e9d457 2021-03-06 op
362 a6d450c1 2021-03-06 op static void
363 a6d450c1 2021-03-06 op handle_clear_minibuf(int fd, short ev, void *d)
364 a6d450c1 2021-03-06 op {
365 a6d450c1 2021-03-06 op clminibufev_set = 0;
366 a6d450c1 2021-03-06 op werase(minibuf);
367 a6d450c1 2021-03-06 op wrefresh(minibuf);
368 48e9d457 2021-03-06 op wrefresh(body);
369 5e11c00c 2021-03-02 op }
370 5e11c00c 2021-03-02 op
371 5e11c00c 2021-03-02 op static void
372 5e11c00c 2021-03-02 op handle_resize(int sig, short ev, void *d)
373 5e11c00c 2021-03-02 op {
374 1d08c280 2021-03-06 op struct tab *tab;
375 1d08c280 2021-03-06 op
376 5e11c00c 2021-03-02 op endwin();
377 5e11c00c 2021-03-02 op refresh();
378 5e11c00c 2021-03-02 op clear();
379 5e11c00c 2021-03-02 op
380 48e9d457 2021-03-06 op /* move and resize the windows, in reverse order! */
381 48e9d457 2021-03-06 op
382 b1738d2e 2021-03-06 op mvwin(minibuf, LINES-1, 0);
383 48e9d457 2021-03-06 op wresize(minibuf, 1, COLS);
384 48e9d457 2021-03-06 op
385 48e9d457 2021-03-06 op mvwin(modeline, LINES-2, 0);
386 48e9d457 2021-03-06 op wresize(modeline, 1, COLS);
387 48e9d457 2021-03-06 op
388 48e9d457 2021-03-06 op wresize(body, LINES-3, COLS);
389 48e9d457 2021-03-06 op body_lines = LINES-3;
390 bd9637e9 2021-03-06 op body_cols = COLS;
391 48e9d457 2021-03-06 op
392 48e9d457 2021-03-06 op wresize(tabline, 1, COLS);
393 48e9d457 2021-03-06 op
394 1d08c280 2021-03-06 op tab = current_tab();
395 1d08c280 2021-03-06 op
396 1d08c280 2021-03-06 op wrap_page(tab);
397 1d08c280 2021-03-06 op redraw_tab(tab);
398 5e11c00c 2021-03-02 op }
399 5e11c00c 2021-03-02 op
400 eb259e66 2021-03-02 op /*
401 eb259e66 2021-03-02 op * Helper function for wrap_text. Find the end of the current word
402 eb259e66 2021-03-02 op * and the end of the separator after the word.
403 eb259e66 2021-03-02 op */
404 eb259e66 2021-03-02 op static int
405 eb259e66 2021-03-02 op word_boundaries(const char *s, const char *sep, const char **endword, const char **endspc)
406 eb259e66 2021-03-02 op {
407 eb259e66 2021-03-02 op *endword = s;
408 eb259e66 2021-03-02 op *endword = s;
409 eb259e66 2021-03-02 op
410 eb259e66 2021-03-02 op if (*s == '\0')
411 eb259e66 2021-03-02 op return 0;
412 eb259e66 2021-03-02 op
413 eb259e66 2021-03-02 op /* find the end of the current world */
414 eb259e66 2021-03-02 op for (; *s != '\0'; ++s) {
415 eb259e66 2021-03-02 op if (strchr(sep, *s) != NULL)
416 eb259e66 2021-03-02 op break;
417 eb259e66 2021-03-02 op }
418 eb259e66 2021-03-02 op
419 eb259e66 2021-03-02 op *endword = s;
420 eb259e66 2021-03-02 op
421 eb259e66 2021-03-02 op /* find the end of the separator */
422 eb259e66 2021-03-02 op for (; *s != '\0'; ++s) {
423 eb259e66 2021-03-02 op if (strchr(sep, *s) == NULL)
424 eb259e66 2021-03-02 op break;
425 eb259e66 2021-03-02 op }
426 eb259e66 2021-03-02 op
427 eb259e66 2021-03-02 op *endspc = s;
428 eb259e66 2021-03-02 op
429 eb259e66 2021-03-02 op return 1;
430 eb259e66 2021-03-02 op }
431 eb259e66 2021-03-02 op
432 1d08c280 2021-03-06 op static inline int
433 1d08c280 2021-03-06 op emitline(struct tab *tab, size_t zero, size_t *off, const struct line *l,
434 1d08c280 2021-03-06 op const char **line)
435 eb259e66 2021-03-02 op {
436 1d08c280 2021-03-06 op if (!push_line(tab, l, *line, *off - zero))
437 1d08c280 2021-03-06 op return 0;
438 1d08c280 2021-03-06 op *line += *off - zero;
439 eb259e66 2021-03-02 op *off = zero;
440 1d08c280 2021-03-06 op return 1;
441 eb259e66 2021-03-02 op }
442 eb259e66 2021-03-02 op
443 eb259e66 2021-03-02 op static inline void
444 eb259e66 2021-03-02 op emitstr(const char **s, size_t len, size_t *off)
445 eb259e66 2021-03-02 op {
446 eb259e66 2021-03-02 op size_t i;
447 eb259e66 2021-03-02 op
448 eb259e66 2021-03-02 op /* printw("%*s", ...) doesn't seem to respect the precision, so... */
449 eb259e66 2021-03-02 op for (i = 0; i < len; ++i)
450 eb259e66 2021-03-02 op addch((*s)[i]);
451 eb259e66 2021-03-02 op *off += len;
452 eb259e66 2021-03-02 op *s += len;
453 eb259e66 2021-03-02 op }
454 eb259e66 2021-03-02 op
455 eb259e66 2021-03-02 op /*
456 1d08c280 2021-03-06 op * Build a list of visual line by wrapping the given line, assuming
457 1d08c280 2021-03-06 op * that when printed will have a leading prefix prfx.
458 eb259e66 2021-03-02 op *
459 eb259e66 2021-03-02 op * TODO: it considers each byte one cell on the screen!
460 eb259e66 2021-03-02 op */
461 5e11c00c 2021-03-02 op static void
462 1d08c280 2021-03-06 op wrap_text(struct tab *tab, const char *prfx, struct line *l)
463 eb259e66 2021-03-02 op {
464 eb259e66 2021-03-02 op size_t zero, off, len, split;
465 1d08c280 2021-03-06 op const char *endword, *endspc, *line, *linestart;
466 eb259e66 2021-03-02 op
467 1d08c280 2021-03-06 op zero = strlen(prfx);
468 eb259e66 2021-03-02 op off = zero;
469 1d08c280 2021-03-06 op line = l->line;
470 1d08c280 2021-03-06 op linestart = l->line;
471 eb259e66 2021-03-02 op
472 1d08c280 2021-03-06 op while (word_boundaries(line, " \t-", &endword, &endspc)) {
473 eb259e66 2021-03-02 op len = endword - line;
474 48e9d457 2021-03-06 op if (off + len >= body_cols) {
475 1d08c280 2021-03-06 op emitline(tab, zero, &off, l, &linestart);
476 48e9d457 2021-03-06 op while (len >= body_cols) {
477 eb259e66 2021-03-02 op /* hard wrap */
478 1d08c280 2021-03-06 op emitline(tab, zero, &off, l, &linestart);
479 48e9d457 2021-03-06 op len -= body_cols-1;
480 48e9d457 2021-03-06 op line += body_cols-1;
481 eb259e66 2021-03-02 op }
482 eb259e66 2021-03-02 op
483 eb259e66 2021-03-02 op if (len != 0)
484 1d08c280 2021-03-06 op off += len;
485 1d08c280 2021-03-06 op } else
486 1d08c280 2021-03-06 op off += len;
487 eb259e66 2021-03-02 op
488 eb259e66 2021-03-02 op /* print the spaces iff not at bol */
489 eb259e66 2021-03-02 op len = endspc - endword;
490 eb259e66 2021-03-02 op /* line = endspc; */
491 eb259e66 2021-03-02 op if (off != zero) {
492 48e9d457 2021-03-06 op if (off + len >= body_cols) {
493 1d08c280 2021-03-06 op emitline(tab, zero, &off, l, &linestart);
494 1d08c280 2021-03-06 op linestart = endspc;
495 1d08c280 2021-03-06 op } else
496 1d08c280 2021-03-06 op off += len;
497 eb259e66 2021-03-02 op }
498 eb259e66 2021-03-02 op
499 eb259e66 2021-03-02 op line = endspc;
500 eb259e66 2021-03-02 op }
501 eb259e66 2021-03-02 op
502 1d08c280 2021-03-06 op emitline(tab, zero, &off, l, &linestart);
503 eb259e66 2021-03-02 op }
504 eb259e66 2021-03-02 op
505 1d08c280 2021-03-06 op static int
506 1d08c280 2021-03-06 op hardwrap_text(struct tab *tab, struct line *l)
507 5e11c00c 2021-03-02 op {
508 1d08c280 2021-03-06 op size_t off, len;
509 1d08c280 2021-03-06 op const char *linestart;
510 5e11c00c 2021-03-02 op
511 1d08c280 2021-03-06 op len = strlen(l->line);
512 1d08c280 2021-03-06 op off = 0;
513 1d08c280 2021-03-06 op linestart = l->line;
514 1d08c280 2021-03-06 op
515 1d08c280 2021-03-06 op while (len >= COLS) {
516 1d08c280 2021-03-06 op len -= COLS-1;
517 1d08c280 2021-03-06 op off = COLS-1;
518 1d08c280 2021-03-06 op if (!emitline(tab, 0, &off, l, &linestart))
519 1d08c280 2021-03-06 op return 0;
520 1d08c280 2021-03-06 op }
521 1d08c280 2021-03-06 op
522 1d08c280 2021-03-06 op return 1;
523 1d08c280 2021-03-06 op }
524 5e11c00c 2021-03-02 op
525 1d08c280 2021-03-06 op static int
526 1d08c280 2021-03-06 op wrap_page(struct tab *tab)
527 1d08c280 2021-03-06 op {
528 1d08c280 2021-03-06 op struct line *l;
529 1d08c280 2021-03-06 op
530 1d08c280 2021-03-06 op empty_vlist(tab);
531 1d08c280 2021-03-06 op
532 5e11c00c 2021-03-02 op TAILQ_FOREACH(l, &tab->page.head, lines) {
533 5e11c00c 2021-03-02 op switch (l->type) {
534 5e11c00c 2021-03-02 op case LINE_TEXT:
535 1d08c280 2021-03-06 op wrap_text(tab, "", l);
536 5e11c00c 2021-03-02 op break;
537 5e11c00c 2021-03-02 op case LINE_LINK:
538 1d08c280 2021-03-06 op wrap_text(tab, "=> ", l);
539 5e11c00c 2021-03-02 op break;
540 5e11c00c 2021-03-02 op case LINE_TITLE_1:
541 1d08c280 2021-03-06 op wrap_text(tab, "# ", l);
542 5e11c00c 2021-03-02 op break;
543 5e11c00c 2021-03-02 op case LINE_TITLE_2:
544 1d08c280 2021-03-06 op wrap_text(tab, "## ", l);
545 5e11c00c 2021-03-02 op break;
546 5e11c00c 2021-03-02 op case LINE_TITLE_3:
547 1d08c280 2021-03-06 op wrap_text(tab, "### ", l);
548 5e11c00c 2021-03-02 op break;
549 5e11c00c 2021-03-02 op case LINE_ITEM:
550 1d08c280 2021-03-06 op wrap_text(tab, "* ", l);
551 5e11c00c 2021-03-02 op break;
552 5e11c00c 2021-03-02 op case LINE_QUOTE:
553 1d08c280 2021-03-06 op wrap_text(tab, "> ", l);
554 5e11c00c 2021-03-02 op break;
555 5e11c00c 2021-03-02 op case LINE_PRE_START:
556 5e11c00c 2021-03-02 op case LINE_PRE_END:
557 1d08c280 2021-03-06 op push_line(tab, l, NULL, 0);
558 5e11c00c 2021-03-02 op break;
559 5e11c00c 2021-03-02 op case LINE_PRE_CONTENT:
560 1d08c280 2021-03-06 op hardwrap_text(tab, l);
561 5e11c00c 2021-03-02 op break;
562 5e11c00c 2021-03-02 op }
563 5e11c00c 2021-03-02 op }
564 1d08c280 2021-03-06 op return 1;
565 1d08c280 2021-03-06 op }
566 5e11c00c 2021-03-02 op
567 1d08c280 2021-03-06 op static inline void
568 1d08c280 2021-03-06 op print_line(struct line *l)
569 1d08c280 2021-03-06 op {
570 bd9637e9 2021-03-06 op const char *text = l->line;
571 bd9637e9 2021-03-06 op
572 bd9637e9 2021-03-06 op if (text == NULL)
573 bd9637e9 2021-03-06 op text = "";
574 bd9637e9 2021-03-06 op
575 1d08c280 2021-03-06 op switch (l->type) {
576 1d08c280 2021-03-06 op case LINE_TEXT:
577 bd9637e9 2021-03-06 op wprintw(body, "%s", text);
578 1d08c280 2021-03-06 op break;
579 1d08c280 2021-03-06 op case LINE_LINK:
580 bd9637e9 2021-03-06 op wattron(body, A_UNDERLINE);
581 bd9637e9 2021-03-06 op wprintw(body, "=> %s", text);
582 bd9637e9 2021-03-06 op wattroff(body, A_UNDERLINE);
583 bd9637e9 2021-03-06 op return;
584 1d08c280 2021-03-06 op case LINE_TITLE_1:
585 bd9637e9 2021-03-06 op wattron(body, A_BOLD);
586 bd9637e9 2021-03-06 op wprintw(body, "# %s", text);
587 bd9637e9 2021-03-06 op wattroff(body, A_BOLD);
588 bd9637e9 2021-03-06 op return;
589 1d08c280 2021-03-06 op case LINE_TITLE_2:
590 bd9637e9 2021-03-06 op wattron(body, A_BOLD);
591 bd9637e9 2021-03-06 op wprintw(body, "## %s", text);
592 bd9637e9 2021-03-06 op wattroff(body, A_BOLD);
593 bd9637e9 2021-03-06 op return;
594 bd9637e9 2021-03-06 op case LINE_TITLE_3:
595 bd9637e9 2021-03-06 op wattron(body, A_BOLD);
596 bd9637e9 2021-03-06 op wprintw(body, "### %s", text);
597 bd9637e9 2021-03-06 op wattroff(body, A_BOLD);
598 bd9637e9 2021-03-06 op return;
599 bd9637e9 2021-03-06 op case LINE_ITEM:
600 bd9637e9 2021-03-06 op wprintw(body, "* %s", text);
601 bd9637e9 2021-03-06 op return;
602 1d08c280 2021-03-06 op case LINE_QUOTE:
603 bd9637e9 2021-03-06 op wattron(body, A_DIM);
604 bd9637e9 2021-03-06 op wprintw(body, "> %s", text);
605 bd9637e9 2021-03-06 op wattroff(body, A_DIM);
606 bd9637e9 2021-03-06 op return;
607 1d08c280 2021-03-06 op case LINE_PRE_START:
608 1d08c280 2021-03-06 op case LINE_PRE_END:
609 48e9d457 2021-03-06 op wprintw(body, "```");
610 bd9637e9 2021-03-06 op return;
611 1d08c280 2021-03-06 op case LINE_PRE_CONTENT:
612 bd9637e9 2021-03-06 op wprintw(body, "%s", text);
613 bd9637e9 2021-03-06 op return;
614 1d08c280 2021-03-06 op }
615 1d08c280 2021-03-06 op }
616 1d08c280 2021-03-06 op
617 1d08c280 2021-03-06 op static void
618 48e9d457 2021-03-06 op redraw_modeline(struct tab *tab)
619 1d08c280 2021-03-06 op {
620 48e9d457 2021-03-06 op int x, y, max_x, max_y;
621 48e9d457 2021-03-06 op const char *url = "TODO:url";
622 48e9d457 2021-03-06 op const char *mode = "text/gemini-mode";
623 1d08c280 2021-03-06 op
624 48e9d457 2021-03-06 op wclear(modeline);
625 48e9d457 2021-03-06 op wattron(modeline, A_REVERSE);
626 48e9d457 2021-03-06 op wmove(modeline, 0, 0);
627 1d08c280 2021-03-06 op
628 48e9d457 2021-03-06 op wprintw(modeline, "-- %s %s ", mode, url);
629 48e9d457 2021-03-06 op getyx(modeline, y, x);
630 48e9d457 2021-03-06 op getmaxyx(modeline, max_y, max_x);
631 48e9d457 2021-03-06 op
632 48e9d457 2021-03-06 op (void)y;
633 48e9d457 2021-03-06 op (void)max_y;
634 48e9d457 2021-03-06 op
635 48e9d457 2021-03-06 op for (; x < max_x; ++x)
636 48e9d457 2021-03-06 op waddstr(modeline, "-");
637 48e9d457 2021-03-06 op }
638 48e9d457 2021-03-06 op
639 48e9d457 2021-03-06 op static void
640 48e9d457 2021-03-06 op redraw_tab(struct tab *tab)
641 48e9d457 2021-03-06 op {
642 48e9d457 2021-03-06 op struct line *l;
643 48e9d457 2021-03-06 op int line;
644 48e9d457 2021-03-06 op
645 48e9d457 2021-03-06 op werase(body);
646 48e9d457 2021-03-06 op
647 48e9d457 2021-03-06 op tab->s->line_off = MIN(tab->s->line_max, tab->s->line_off);
648 48e9d457 2021-03-06 op if (TAILQ_EMPTY(&tab->s->head))
649 48e9d457 2021-03-06 op return;
650 48e9d457 2021-03-06 op
651 48e9d457 2021-03-06 op line = 0;
652 48e9d457 2021-03-06 op l = nth_line(tab, tab->s->line_off);
653 48e9d457 2021-03-06 op for (; l != NULL; l = TAILQ_NEXT(l, lines)) {
654 48e9d457 2021-03-06 op wmove(body, line, 0);
655 1d08c280 2021-03-06 op print_line(l);
656 48e9d457 2021-03-06 op line++;
657 48e9d457 2021-03-06 op if (line == body_lines)
658 48e9d457 2021-03-06 op break;
659 1d08c280 2021-03-06 op }
660 1d08c280 2021-03-06 op
661 48e9d457 2021-03-06 op redraw_modeline(tab);
662 48e9d457 2021-03-06 op
663 48e9d457 2021-03-06 op restore_cursor(tab);
664 48e9d457 2021-03-06 op wrefresh(tabline);
665 48e9d457 2021-03-06 op wrefresh(modeline);
666 48e9d457 2021-03-06 op wrefresh(minibuf);
667 48e9d457 2021-03-06 op
668 48e9d457 2021-03-06 op wrefresh(body);
669 5e11c00c 2021-03-02 op }
670 5e11c00c 2021-03-02 op
671 5e11c00c 2021-03-02 op int
672 5e11c00c 2021-03-02 op ui_init(void)
673 5e11c00c 2021-03-02 op {
674 5e11c00c 2021-03-02 op setlocale(LC_ALL, "");
675 5e11c00c 2021-03-02 op
676 5e11c00c 2021-03-02 op initscr();
677 15e1b108 2021-03-02 op raw();
678 5e11c00c 2021-03-02 op noecho();
679 5e11c00c 2021-03-02 op
680 5e11c00c 2021-03-02 op nonl();
681 5e11c00c 2021-03-02 op intrflush(stdscr, FALSE);
682 5e11c00c 2021-03-02 op keypad(stdscr, TRUE);
683 5e11c00c 2021-03-02 op
684 48e9d457 2021-03-06 op if ((tabline = newwin(1, COLS, 0, 0)) == NULL)
685 48e9d457 2021-03-06 op return 0;
686 48e9d457 2021-03-06 op if ((body = newwin(LINES - 3, COLS, 1, 0)) == NULL)
687 48e9d457 2021-03-06 op return 0;
688 48e9d457 2021-03-06 op if ((modeline = newwin(1, COLS, LINES-2, 0)) == NULL)
689 48e9d457 2021-03-06 op return 0;
690 48e9d457 2021-03-06 op if ((minibuf = newwin(1, COLS, LINES-1, 0)) == NULL)
691 48e9d457 2021-03-06 op return 0;
692 1d08c280 2021-03-06 op
693 48e9d457 2021-03-06 op body_lines = LINES-3;
694 48e9d457 2021-03-06 op body_cols = COLS;
695 48e9d457 2021-03-06 op
696 48e9d457 2021-03-06 op scrollok(body, TRUE);
697 48e9d457 2021-03-06 op
698 5e11c00c 2021-03-02 op /* non-blocking input */
699 48e9d457 2021-03-06 op wtimeout(body, 0);
700 5e11c00c 2021-03-02 op
701 48e9d457 2021-03-06 op mvwprintw(body, 0, 0, "");
702 5e11c00c 2021-03-02 op
703 5e11c00c 2021-03-02 op event_set(&stdioev, 0, EV_READ | EV_PERSIST, dispatch_stdio, NULL);
704 5e11c00c 2021-03-02 op event_add(&stdioev, NULL);
705 5e11c00c 2021-03-02 op
706 5e11c00c 2021-03-02 op signal_set(&winchev, SIGWINCH, handle_resize, NULL);
707 5e11c00c 2021-03-02 op signal_add(&winchev, NULL);
708 5e11c00c 2021-03-02 op
709 5e11c00c 2021-03-02 op return 1;
710 5e11c00c 2021-03-02 op }
711 5e11c00c 2021-03-02 op
712 1d08c280 2021-03-06 op int
713 5e11c00c 2021-03-02 op ui_on_new_tab(struct tab *tab)
714 5e11c00c 2021-03-02 op {
715 5e11c00c 2021-03-02 op struct tab *t;
716 5e11c00c 2021-03-02 op
717 1d08c280 2021-03-06 op if ((tab->s = calloc(1, sizeof(*t->s))) == NULL)
718 1d08c280 2021-03-06 op return 0;
719 1d08c280 2021-03-06 op
720 1d08c280 2021-03-06 op TAILQ_INIT(&tab->s->head);
721 1d08c280 2021-03-06 op
722 5e11c00c 2021-03-02 op TAILQ_FOREACH(t, &tabshead, tabs) {
723 5e11c00c 2021-03-02 op t->flags &= ~TAB_CURRENT;
724 5e11c00c 2021-03-02 op }
725 5e11c00c 2021-03-02 op tab->flags = TAB_CURRENT;
726 5e11c00c 2021-03-02 op
727 5e11c00c 2021-03-02 op /* TODO: redraw the tab list */
728 1d08c280 2021-03-06 op /* TODO: switch to the new tab */
729 1d08c280 2021-03-06 op
730 48e9d457 2021-03-06 op wmove(body, 0, 0);
731 1d08c280 2021-03-06 op
732 1d08c280 2021-03-06 op return 1;
733 5e11c00c 2021-03-02 op }
734 5e11c00c 2021-03-02 op
735 5e11c00c 2021-03-02 op void
736 5e11c00c 2021-03-02 op ui_on_tab_refresh(struct tab *tab)
737 5e11c00c 2021-03-02 op {
738 5e11c00c 2021-03-02 op if (!(tab->flags & TAB_CURRENT))
739 5e11c00c 2021-03-02 op return;
740 5e11c00c 2021-03-02 op
741 1d08c280 2021-03-06 op wrap_page(tab);
742 5e11c00c 2021-03-02 op redraw_tab(tab);
743 5e11c00c 2021-03-02 op }
744 5e11c00c 2021-03-02 op
745 5e11c00c 2021-03-02 op void
746 5e11c00c 2021-03-02 op ui_end(void)
747 5e11c00c 2021-03-02 op {
748 5e11c00c 2021-03-02 op endwin();
749 5e11c00c 2021-03-02 op }