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 5e11c00c 2021-03-02 op static void handle_resize(int, short, void*);
92 eb259e66 2021-03-02 op static int word_bourdaries(const char*, const char*, const char**, const char**);
93 1d08c280 2021-03-06 op static void wrap_text(struct tab*, const char*, struct line*);
94 1d08c280 2021-03-06 op static int hardwrap_text(struct tab*, struct line*);
95 1d08c280 2021-03-06 op static int wrap_page(struct tab*);
96 48e9d457 2021-03-06 op static void print_line(struct line*);
97 5e11c00c 2021-03-02 op static void redraw_tab(struct tab*);
98 5e11c00c 2021-03-02 op
99 1d08c280 2021-03-06 op typedef void (*interactivefn)(int);
100 1d08c280 2021-03-06 op
101 1d08c280 2021-03-06 op static void cmd_unbound(int);
102 1d08c280 2021-03-06 op
103 48e9d457 2021-03-06 op static WINDOW *tabline, *body, *modeline, *minibuf;
104 48e9d457 2021-03-06 op static int body_lines, body_cols;
105 48e9d457 2021-03-06 op
106 48e9d457 2021-03-06 op static struct event clminibufev;
107 48e9d457 2021-03-06 op static int clminibufev_set;
108 48e9d457 2021-03-06 op
109 1d08c280 2021-03-06 op struct ui_state {
110 1d08c280 2021-03-06 op int curs_x;
111 1d08c280 2021-03-06 op int curs_y;
112 48e9d457 2021-03-06 op size_t line_off;
113 48e9d457 2021-03-06 op size_t line_max;
114 1d08c280 2021-03-06 op
115 1d08c280 2021-03-06 op TAILQ_HEAD(, line) head;
116 1d08c280 2021-03-06 op };
117 1d08c280 2021-03-06 op
118 48e9d457 2021-03-06 op struct binding {
119 48e9d457 2021-03-06 op int key;
120 48e9d457 2021-03-06 op interactivefn fn;
121 48e9d457 2021-03-06 op } bindings[] = {
122 48e9d457 2021-03-06 op { CTRL('p'), cmd_previous_line, },
123 48e9d457 2021-03-06 op { CTRL('n'), cmd_next_line, },
124 48e9d457 2021-03-06 op { CTRL('f'), cmd_forward_char, },
125 48e9d457 2021-03-06 op { CTRL('b'), cmd_backward_char, },
126 48e9d457 2021-03-06 op
127 48e9d457 2021-03-06 op { CTRL('L'), cmd_redraw, },
128 48e9d457 2021-03-06 op
129 48e9d457 2021-03-06 op { 'J', cmd_scroll_down, },
130 48e9d457 2021-03-06 op { 'K', cmd_scroll_up, },
131 48e9d457 2021-03-06 op
132 48e9d457 2021-03-06 op { 'q', cmd_kill_telescope, },
133 48e9d457 2021-03-06 op
134 48e9d457 2021-03-06 op { 0, NULL, },
135 48e9d457 2021-03-06 op };
136 48e9d457 2021-03-06 op
137 1d08c280 2021-03-06 op static int
138 1d08c280 2021-03-06 op push_line(struct tab *tab, const struct line *l, const char *buf, size_t len)
139 1d08c280 2021-03-06 op {
140 1d08c280 2021-03-06 op struct line *vl;
141 1d08c280 2021-03-06 op
142 48e9d457 2021-03-06 op tab->s->line_max++;
143 48e9d457 2021-03-06 op
144 1d08c280 2021-03-06 op if ((vl = calloc(1, sizeof(*vl))) == NULL)
145 1d08c280 2021-03-06 op return 0;
146 1d08c280 2021-03-06 op
147 1d08c280 2021-03-06 op if (len != 0 && (vl->line = calloc(1, len+1)) == NULL) {
148 1d08c280 2021-03-06 op free(vl);
149 1d08c280 2021-03-06 op return 0;
150 1d08c280 2021-03-06 op }
151 1d08c280 2021-03-06 op
152 1d08c280 2021-03-06 op vl->type = l->type;
153 1d08c280 2021-03-06 op if (len != 0)
154 1d08c280 2021-03-06 op memcpy(vl->line, buf, len);
155 1d08c280 2021-03-06 op vl->alt = l->alt;
156 1d08c280 2021-03-06 op
157 1d08c280 2021-03-06 op if (TAILQ_EMPTY(&tab->s->head))
158 1d08c280 2021-03-06 op TAILQ_INSERT_HEAD(&tab->s->head, vl, lines);
159 1d08c280 2021-03-06 op else
160 1d08c280 2021-03-06 op TAILQ_INSERT_TAIL(&tab->s->head, vl, lines);
161 1d08c280 2021-03-06 op return 1;
162 1d08c280 2021-03-06 op }
163 1d08c280 2021-03-06 op
164 1d08c280 2021-03-06 op static void
165 1d08c280 2021-03-06 op empty_vlist(struct tab *tab)
166 1d08c280 2021-03-06 op {
167 1d08c280 2021-03-06 op struct line *l, *t;
168 1d08c280 2021-03-06 op
169 48e9d457 2021-03-06 op tab->s->line_max = 0;
170 48e9d457 2021-03-06 op
171 1d08c280 2021-03-06 op TAILQ_FOREACH_SAFE(l, &tab->s->head, lines, t) {
172 1d08c280 2021-03-06 op TAILQ_REMOVE(&tab->s->head, l, lines);
173 1d08c280 2021-03-06 op free(l->line);
174 1d08c280 2021-03-06 op /* l->alt references the original line! */
175 1d08c280 2021-03-06 op free(l);
176 1d08c280 2021-03-06 op }
177 1d08c280 2021-03-06 op }
178 1d08c280 2021-03-06 op
179 48e9d457 2021-03-06 op static void
180 48e9d457 2021-03-06 op restore_cursor(struct tab *tab)
181 48e9d457 2021-03-06 op {
182 48e9d457 2021-03-06 op wmove(body, tab->s->curs_y, tab->s->curs_x);
183 48e9d457 2021-03-06 op }
184 1d08c280 2021-03-06 op
185 1d08c280 2021-03-06 op static void
186 1d08c280 2021-03-06 op cmd_previous_line(int k)
187 1d08c280 2021-03-06 op {
188 1d08c280 2021-03-06 op struct tab *tab;
189 1d08c280 2021-03-06 op
190 1d08c280 2021-03-06 op tab = current_tab();
191 1d08c280 2021-03-06 op tab->s->curs_y = MAX(0, tab->s->curs_y-1);
192 48e9d457 2021-03-06 op restore_cursor(tab);
193 1d08c280 2021-03-06 op }
194 1d08c280 2021-03-06 op
195 1d08c280 2021-03-06 op static void
196 1d08c280 2021-03-06 op cmd_next_line(int k)
197 1d08c280 2021-03-06 op {
198 1d08c280 2021-03-06 op struct tab *tab;
199 1d08c280 2021-03-06 op
200 1d08c280 2021-03-06 op tab = current_tab();
201 b2cd5e06 2021-03-06 op tab->s->curs_y = MIN(LINES-1, tab->s->curs_y+1);
202 48e9d457 2021-03-06 op restore_cursor(tab);
203 1d08c280 2021-03-06 op }
204 1d08c280 2021-03-06 op
205 1d08c280 2021-03-06 op static void
206 1d08c280 2021-03-06 op cmd_forward_char(int k)
207 1d08c280 2021-03-06 op {
208 b2cd5e06 2021-03-06 op struct tab *tab;
209 b2cd5e06 2021-03-06 op
210 b2cd5e06 2021-03-06 op tab = current_tab();
211 b2cd5e06 2021-03-06 op tab->s->curs_x = MIN(COLS-1, tab->s->curs_x+1);
212 48e9d457 2021-03-06 op restore_cursor(tab);
213 1d08c280 2021-03-06 op }
214 1d08c280 2021-03-06 op
215 1d08c280 2021-03-06 op static void
216 1d08c280 2021-03-06 op cmd_backward_char(int k)
217 1d08c280 2021-03-06 op {
218 b2cd5e06 2021-03-06 op struct tab *tab;
219 b2cd5e06 2021-03-06 op
220 b2cd5e06 2021-03-06 op tab = current_tab();
221 b2cd5e06 2021-03-06 op tab->s->curs_x = MAX(0, tab->s->curs_x-1);
222 48e9d457 2021-03-06 op restore_cursor(tab);
223 1d08c280 2021-03-06 op }
224 1d08c280 2021-03-06 op
225 1d08c280 2021-03-06 op static void
226 1d08c280 2021-03-06 op cmd_redraw(int k)
227 1d08c280 2021-03-06 op {
228 1d08c280 2021-03-06 op clear();
229 1d08c280 2021-03-06 op redraw_tab(current_tab());
230 1d08c280 2021-03-06 op }
231 1d08c280 2021-03-06 op
232 1d08c280 2021-03-06 op static void
233 48e9d457 2021-03-06 op cmd_scroll_up(int k)
234 1d08c280 2021-03-06 op {
235 48e9d457 2021-03-06 op struct tab *tab;
236 48e9d457 2021-03-06 op struct line *l;
237 48e9d457 2021-03-06 op
238 48e9d457 2021-03-06 op tab = current_tab();
239 48e9d457 2021-03-06 op if (tab->s->line_off == 0)
240 48e9d457 2021-03-06 op return;
241 48e9d457 2021-03-06 op
242 48e9d457 2021-03-06 op l = nth_line(tab, --tab->s->line_off);
243 48e9d457 2021-03-06 op wscrl(body, -1);
244 48e9d457 2021-03-06 op wmove(body, 0, 0);
245 48e9d457 2021-03-06 op print_line(l);
246 1d08c280 2021-03-06 op }
247 1d08c280 2021-03-06 op
248 1d08c280 2021-03-06 op static void
249 48e9d457 2021-03-06 op cmd_scroll_down(int k)
250 1d08c280 2021-03-06 op {
251 48e9d457 2021-03-06 op struct tab *tab;
252 48e9d457 2021-03-06 op struct line *l;
253 48e9d457 2021-03-06 op size_t n;
254 48e9d457 2021-03-06 op
255 48e9d457 2021-03-06 op tab = current_tab();
256 48e9d457 2021-03-06 op
257 48e9d457 2021-03-06 op if (tab->s->line_max == 0 || tab->s->line_off == tab->s->line_max-1)
258 48e9d457 2021-03-06 op return;
259 48e9d457 2021-03-06 op
260 48e9d457 2021-03-06 op tab->s->line_off++;
261 48e9d457 2021-03-06 op wscrl(body, 1);
262 48e9d457 2021-03-06 op
263 48e9d457 2021-03-06 op if (tab->s->line_max - tab->s->line_off < body_lines)
264 48e9d457 2021-03-06 op return;
265 48e9d457 2021-03-06 op
266 48e9d457 2021-03-06 op l = nth_line(tab, tab->s->line_off + body_lines-1);
267 48e9d457 2021-03-06 op wmove(body, body_lines-1, 0);
268 48e9d457 2021-03-06 op print_line(l);
269 1d08c280 2021-03-06 op }
270 1d08c280 2021-03-06 op
271 1d08c280 2021-03-06 op static void
272 1d08c280 2021-03-06 op cmd_kill_telescope(int k)
273 1d08c280 2021-03-06 op {
274 1d08c280 2021-03-06 op event_loopbreak();
275 1d08c280 2021-03-06 op }
276 1d08c280 2021-03-06 op
277 1d08c280 2021-03-06 op static void
278 1d08c280 2021-03-06 op cmd_unbound(int k)
279 1d08c280 2021-03-06 op {
280 48e9d457 2021-03-06 op wclear(minibuf);
281 48e9d457 2021-03-06 op wprintw(minibuf, "Unknown key %c", k);
282 48e9d457 2021-03-06 op restore_cursor(current_tab());
283 1d08c280 2021-03-06 op }
284 1d08c280 2021-03-06 op
285 48e9d457 2021-03-06 op static struct line *
286 48e9d457 2021-03-06 op nth_line(struct tab *tab, size_t n)
287 48e9d457 2021-03-06 op {
288 48e9d457 2021-03-06 op struct line *l;
289 48e9d457 2021-03-06 op size_t i;
290 48e9d457 2021-03-06 op
291 48e9d457 2021-03-06 op i = 0;
292 48e9d457 2021-03-06 op TAILQ_FOREACH(l, &tab->s->head, lines) {
293 48e9d457 2021-03-06 op if (i == n)
294 48e9d457 2021-03-06 op return l;
295 48e9d457 2021-03-06 op i++;
296 48e9d457 2021-03-06 op }
297 48e9d457 2021-03-06 op
298 48e9d457 2021-03-06 op /* unreachable */
299 48e9d457 2021-03-06 op abort();
300 48e9d457 2021-03-06 op }
301 48e9d457 2021-03-06 op
302 5e11c00c 2021-03-02 op static struct tab *
303 5e11c00c 2021-03-02 op current_tab(void)
304 5e11c00c 2021-03-02 op {
305 5e11c00c 2021-03-02 op struct tab *t;
306 5e11c00c 2021-03-02 op
307 5e11c00c 2021-03-02 op TAILQ_FOREACH(t, &tabshead, tabs) {
308 5e11c00c 2021-03-02 op if (t->flags & TAB_CURRENT)
309 5e11c00c 2021-03-02 op return t;
310 5e11c00c 2021-03-02 op }
311 5e11c00c 2021-03-02 op
312 5e11c00c 2021-03-02 op /* unreachable */
313 5e11c00c 2021-03-02 op abort();
314 5e11c00c 2021-03-02 op }
315 5e11c00c 2021-03-02 op
316 5e11c00c 2021-03-02 op static void
317 5e11c00c 2021-03-02 op dispatch_stdio(int fd, short ev, void *d)
318 5e11c00c 2021-03-02 op {
319 1d08c280 2021-03-06 op struct binding *b;
320 1d08c280 2021-03-06 op int k;
321 5e11c00c 2021-03-02 op
322 48e9d457 2021-03-06 op k = wgetch(body);
323 5e11c00c 2021-03-02 op
324 1d08c280 2021-03-06 op if (k == ERR)
325 5e11c00c 2021-03-02 op return;
326 5e11c00c 2021-03-02 op
327 1d08c280 2021-03-06 op for (b = bindings; b->fn != NULL; ++b) {
328 1d08c280 2021-03-06 op if (k == b->key) {
329 1d08c280 2021-03-06 op b->fn(k);
330 1d08c280 2021-03-06 op goto done;
331 1d08c280 2021-03-06 op }
332 eb259e66 2021-03-02 op }
333 eb259e66 2021-03-02 op
334 1d08c280 2021-03-06 op cmd_unbound(k);
335 1d08c280 2021-03-06 op
336 1d08c280 2021-03-06 op done:
337 48e9d457 2021-03-06 op restore_cursor(current_tab());
338 48e9d457 2021-03-06 op wrefresh(tabline);
339 48e9d457 2021-03-06 op wrefresh(modeline);
340 48e9d457 2021-03-06 op wrefresh(minibuf);
341 48e9d457 2021-03-06 op
342 48e9d457 2021-03-06 op wrefresh(body);
343 5e11c00c 2021-03-02 op }
344 5e11c00c 2021-03-02 op
345 5e11c00c 2021-03-02 op static void
346 5e11c00c 2021-03-02 op handle_resize(int sig, short ev, void *d)
347 5e11c00c 2021-03-02 op {
348 1d08c280 2021-03-06 op struct tab *tab;
349 1d08c280 2021-03-06 op
350 5e11c00c 2021-03-02 op endwin();
351 5e11c00c 2021-03-02 op refresh();
352 5e11c00c 2021-03-02 op clear();
353 5e11c00c 2021-03-02 op
354 48e9d457 2021-03-06 op /* move and resize the windows, in reverse order! */
355 48e9d457 2021-03-06 op
356 48e9d457 2021-03-06 op mvwin(minibuf, LINES-2, 0);
357 48e9d457 2021-03-06 op wresize(minibuf, 1, COLS);
358 48e9d457 2021-03-06 op
359 48e9d457 2021-03-06 op mvwin(modeline, LINES-2, 0);
360 48e9d457 2021-03-06 op wresize(modeline, 1, COLS);
361 48e9d457 2021-03-06 op
362 48e9d457 2021-03-06 op wresize(body, LINES-3, COLS);
363 48e9d457 2021-03-06 op body_lines = LINES-3;
364 48e9d457 2021-03-06 op body_cols = COLS-1;
365 48e9d457 2021-03-06 op
366 48e9d457 2021-03-06 op wresize(tabline, 1, COLS);
367 48e9d457 2021-03-06 op
368 1d08c280 2021-03-06 op tab = current_tab();
369 1d08c280 2021-03-06 op
370 1d08c280 2021-03-06 op wrap_page(tab);
371 1d08c280 2021-03-06 op redraw_tab(tab);
372 5e11c00c 2021-03-02 op }
373 5e11c00c 2021-03-02 op
374 eb259e66 2021-03-02 op /*
375 eb259e66 2021-03-02 op * Helper function for wrap_text. Find the end of the current word
376 eb259e66 2021-03-02 op * and the end of the separator after the word.
377 eb259e66 2021-03-02 op */
378 eb259e66 2021-03-02 op static int
379 eb259e66 2021-03-02 op word_boundaries(const char *s, const char *sep, const char **endword, const char **endspc)
380 eb259e66 2021-03-02 op {
381 eb259e66 2021-03-02 op *endword = s;
382 eb259e66 2021-03-02 op *endword = s;
383 eb259e66 2021-03-02 op
384 eb259e66 2021-03-02 op if (*s == '\0')
385 eb259e66 2021-03-02 op return 0;
386 eb259e66 2021-03-02 op
387 eb259e66 2021-03-02 op /* find the end of the current world */
388 eb259e66 2021-03-02 op for (; *s != '\0'; ++s) {
389 eb259e66 2021-03-02 op if (strchr(sep, *s) != NULL)
390 eb259e66 2021-03-02 op break;
391 eb259e66 2021-03-02 op }
392 eb259e66 2021-03-02 op
393 eb259e66 2021-03-02 op *endword = s;
394 eb259e66 2021-03-02 op
395 eb259e66 2021-03-02 op /* find the end of the separator */
396 eb259e66 2021-03-02 op for (; *s != '\0'; ++s) {
397 eb259e66 2021-03-02 op if (strchr(sep, *s) == NULL)
398 eb259e66 2021-03-02 op break;
399 eb259e66 2021-03-02 op }
400 eb259e66 2021-03-02 op
401 eb259e66 2021-03-02 op *endspc = s;
402 eb259e66 2021-03-02 op
403 eb259e66 2021-03-02 op return 1;
404 eb259e66 2021-03-02 op }
405 eb259e66 2021-03-02 op
406 1d08c280 2021-03-06 op static inline int
407 1d08c280 2021-03-06 op emitline(struct tab *tab, size_t zero, size_t *off, const struct line *l,
408 1d08c280 2021-03-06 op const char **line)
409 eb259e66 2021-03-02 op {
410 1d08c280 2021-03-06 op if (!push_line(tab, l, *line, *off - zero))
411 1d08c280 2021-03-06 op return 0;
412 1d08c280 2021-03-06 op *line += *off - zero;
413 eb259e66 2021-03-02 op *off = zero;
414 1d08c280 2021-03-06 op return 1;
415 eb259e66 2021-03-02 op }
416 eb259e66 2021-03-02 op
417 eb259e66 2021-03-02 op static inline void
418 eb259e66 2021-03-02 op emitstr(const char **s, size_t len, size_t *off)
419 eb259e66 2021-03-02 op {
420 eb259e66 2021-03-02 op size_t i;
421 eb259e66 2021-03-02 op
422 eb259e66 2021-03-02 op /* printw("%*s", ...) doesn't seem to respect the precision, so... */
423 eb259e66 2021-03-02 op for (i = 0; i < len; ++i)
424 eb259e66 2021-03-02 op addch((*s)[i]);
425 eb259e66 2021-03-02 op *off += len;
426 eb259e66 2021-03-02 op *s += len;
427 eb259e66 2021-03-02 op }
428 eb259e66 2021-03-02 op
429 eb259e66 2021-03-02 op /*
430 1d08c280 2021-03-06 op * Build a list of visual line by wrapping the given line, assuming
431 1d08c280 2021-03-06 op * that when printed will have a leading prefix prfx.
432 eb259e66 2021-03-02 op *
433 eb259e66 2021-03-02 op * TODO: it considers each byte one cell on the screen!
434 eb259e66 2021-03-02 op */
435 5e11c00c 2021-03-02 op static void
436 1d08c280 2021-03-06 op wrap_text(struct tab *tab, const char *prfx, struct line *l)
437 eb259e66 2021-03-02 op {
438 eb259e66 2021-03-02 op size_t zero, off, len, split;
439 1d08c280 2021-03-06 op const char *endword, *endspc, *line, *linestart;
440 eb259e66 2021-03-02 op
441 1d08c280 2021-03-06 op zero = strlen(prfx);
442 eb259e66 2021-03-02 op off = zero;
443 1d08c280 2021-03-06 op line = l->line;
444 1d08c280 2021-03-06 op linestart = l->line;
445 eb259e66 2021-03-02 op
446 1d08c280 2021-03-06 op while (word_boundaries(line, " \t-", &endword, &endspc)) {
447 eb259e66 2021-03-02 op len = endword - line;
448 48e9d457 2021-03-06 op if (off + len >= body_cols) {
449 1d08c280 2021-03-06 op emitline(tab, zero, &off, l, &linestart);
450 48e9d457 2021-03-06 op while (len >= body_cols) {
451 eb259e66 2021-03-02 op /* hard wrap */
452 1d08c280 2021-03-06 op emitline(tab, zero, &off, l, &linestart);
453 48e9d457 2021-03-06 op len -= body_cols-1;
454 48e9d457 2021-03-06 op line += body_cols-1;
455 eb259e66 2021-03-02 op }
456 eb259e66 2021-03-02 op
457 eb259e66 2021-03-02 op if (len != 0)
458 1d08c280 2021-03-06 op off += len;
459 1d08c280 2021-03-06 op } else
460 1d08c280 2021-03-06 op off += len;
461 eb259e66 2021-03-02 op
462 eb259e66 2021-03-02 op /* print the spaces iff not at bol */
463 eb259e66 2021-03-02 op len = endspc - endword;
464 eb259e66 2021-03-02 op /* line = endspc; */
465 eb259e66 2021-03-02 op if (off != zero) {
466 48e9d457 2021-03-06 op if (off + len >= body_cols) {
467 1d08c280 2021-03-06 op emitline(tab, zero, &off, l, &linestart);
468 1d08c280 2021-03-06 op linestart = endspc;
469 1d08c280 2021-03-06 op } else
470 1d08c280 2021-03-06 op off += len;
471 eb259e66 2021-03-02 op }
472 eb259e66 2021-03-02 op
473 eb259e66 2021-03-02 op line = endspc;
474 eb259e66 2021-03-02 op }
475 eb259e66 2021-03-02 op
476 1d08c280 2021-03-06 op emitline(tab, zero, &off, l, &linestart);
477 eb259e66 2021-03-02 op }
478 eb259e66 2021-03-02 op
479 1d08c280 2021-03-06 op static int
480 1d08c280 2021-03-06 op hardwrap_text(struct tab *tab, struct line *l)
481 5e11c00c 2021-03-02 op {
482 1d08c280 2021-03-06 op size_t off, len;
483 1d08c280 2021-03-06 op const char *linestart;
484 5e11c00c 2021-03-02 op
485 1d08c280 2021-03-06 op len = strlen(l->line);
486 1d08c280 2021-03-06 op off = 0;
487 1d08c280 2021-03-06 op linestart = l->line;
488 1d08c280 2021-03-06 op
489 1d08c280 2021-03-06 op while (len >= COLS) {
490 1d08c280 2021-03-06 op len -= COLS-1;
491 1d08c280 2021-03-06 op off = COLS-1;
492 1d08c280 2021-03-06 op if (!emitline(tab, 0, &off, l, &linestart))
493 1d08c280 2021-03-06 op return 0;
494 1d08c280 2021-03-06 op }
495 1d08c280 2021-03-06 op
496 1d08c280 2021-03-06 op return 1;
497 1d08c280 2021-03-06 op }
498 5e11c00c 2021-03-02 op
499 1d08c280 2021-03-06 op static int
500 1d08c280 2021-03-06 op wrap_page(struct tab *tab)
501 1d08c280 2021-03-06 op {
502 1d08c280 2021-03-06 op struct line *l;
503 1d08c280 2021-03-06 op
504 1d08c280 2021-03-06 op empty_vlist(tab);
505 1d08c280 2021-03-06 op
506 5e11c00c 2021-03-02 op TAILQ_FOREACH(l, &tab->page.head, lines) {
507 5e11c00c 2021-03-02 op switch (l->type) {
508 5e11c00c 2021-03-02 op case LINE_TEXT:
509 1d08c280 2021-03-06 op wrap_text(tab, "", l);
510 5e11c00c 2021-03-02 op break;
511 5e11c00c 2021-03-02 op case LINE_LINK:
512 1d08c280 2021-03-06 op wrap_text(tab, "=> ", l);
513 5e11c00c 2021-03-02 op break;
514 5e11c00c 2021-03-02 op case LINE_TITLE_1:
515 1d08c280 2021-03-06 op wrap_text(tab, "# ", l);
516 5e11c00c 2021-03-02 op break;
517 5e11c00c 2021-03-02 op case LINE_TITLE_2:
518 1d08c280 2021-03-06 op wrap_text(tab, "## ", l);
519 5e11c00c 2021-03-02 op break;
520 5e11c00c 2021-03-02 op case LINE_TITLE_3:
521 1d08c280 2021-03-06 op wrap_text(tab, "### ", l);
522 5e11c00c 2021-03-02 op break;
523 5e11c00c 2021-03-02 op case LINE_ITEM:
524 1d08c280 2021-03-06 op wrap_text(tab, "* ", l);
525 5e11c00c 2021-03-02 op break;
526 5e11c00c 2021-03-02 op case LINE_QUOTE:
527 1d08c280 2021-03-06 op wrap_text(tab, "> ", l);
528 5e11c00c 2021-03-02 op break;
529 5e11c00c 2021-03-02 op case LINE_PRE_START:
530 5e11c00c 2021-03-02 op case LINE_PRE_END:
531 1d08c280 2021-03-06 op push_line(tab, l, NULL, 0);
532 5e11c00c 2021-03-02 op break;
533 5e11c00c 2021-03-02 op case LINE_PRE_CONTENT:
534 1d08c280 2021-03-06 op hardwrap_text(tab, l);
535 5e11c00c 2021-03-02 op break;
536 5e11c00c 2021-03-02 op }
537 5e11c00c 2021-03-02 op }
538 1d08c280 2021-03-06 op return 1;
539 1d08c280 2021-03-06 op }
540 5e11c00c 2021-03-02 op
541 1d08c280 2021-03-06 op static inline void
542 1d08c280 2021-03-06 op print_line(struct line *l)
543 1d08c280 2021-03-06 op {
544 1d08c280 2021-03-06 op switch (l->type) {
545 1d08c280 2021-03-06 op case LINE_TEXT:
546 1d08c280 2021-03-06 op break;
547 1d08c280 2021-03-06 op case LINE_LINK:
548 48e9d457 2021-03-06 op wprintw(body, "=> ");
549 1d08c280 2021-03-06 op break;
550 1d08c280 2021-03-06 op case LINE_TITLE_1:
551 48e9d457 2021-03-06 op wprintw(body, "# ");
552 1d08c280 2021-03-06 op break;
553 1d08c280 2021-03-06 op case LINE_TITLE_2:
554 48e9d457 2021-03-06 op wprintw(body, "## ");
555 1d08c280 2021-03-06 op break;
556 1d08c280 2021-03-06 op case LINE_TITLE_3:
557 48e9d457 2021-03-06 op wprintw(body, "### ");
558 1d08c280 2021-03-06 op break;
559 1d08c280 2021-03-06 op case LINE_ITEM:
560 48e9d457 2021-03-06 op wprintw(body, "* ");
561 1d08c280 2021-03-06 op break;
562 1d08c280 2021-03-06 op case LINE_QUOTE:
563 48e9d457 2021-03-06 op wprintw(body, "> ");
564 1d08c280 2021-03-06 op break;
565 1d08c280 2021-03-06 op case LINE_PRE_START:
566 1d08c280 2021-03-06 op case LINE_PRE_END:
567 48e9d457 2021-03-06 op wprintw(body, "```");
568 1d08c280 2021-03-06 op break;
569 1d08c280 2021-03-06 op case LINE_PRE_CONTENT:
570 1d08c280 2021-03-06 op break;
571 1d08c280 2021-03-06 op }
572 1d08c280 2021-03-06 op
573 1d08c280 2021-03-06 op if (l->line != NULL)
574 48e9d457 2021-03-06 op wprintw(body, "%s", l->line);
575 1d08c280 2021-03-06 op }
576 1d08c280 2021-03-06 op
577 1d08c280 2021-03-06 op static void
578 48e9d457 2021-03-06 op redraw_modeline(struct tab *tab)
579 1d08c280 2021-03-06 op {
580 48e9d457 2021-03-06 op int x, y, max_x, max_y;
581 48e9d457 2021-03-06 op const char *url = "TODO:url";
582 48e9d457 2021-03-06 op const char *mode = "text/gemini-mode";
583 1d08c280 2021-03-06 op
584 48e9d457 2021-03-06 op wclear(modeline);
585 48e9d457 2021-03-06 op wattron(modeline, A_REVERSE);
586 48e9d457 2021-03-06 op wmove(modeline, 0, 0);
587 1d08c280 2021-03-06 op
588 48e9d457 2021-03-06 op wprintw(modeline, "-- %s %s ", mode, url);
589 48e9d457 2021-03-06 op getyx(modeline, y, x);
590 48e9d457 2021-03-06 op getmaxyx(modeline, max_y, max_x);
591 48e9d457 2021-03-06 op
592 48e9d457 2021-03-06 op (void)y;
593 48e9d457 2021-03-06 op (void)max_y;
594 48e9d457 2021-03-06 op
595 48e9d457 2021-03-06 op for (; x < max_x; ++x)
596 48e9d457 2021-03-06 op waddstr(modeline, "-");
597 48e9d457 2021-03-06 op }
598 48e9d457 2021-03-06 op
599 48e9d457 2021-03-06 op static void
600 48e9d457 2021-03-06 op redraw_tab(struct tab *tab)
601 48e9d457 2021-03-06 op {
602 48e9d457 2021-03-06 op struct line *l;
603 48e9d457 2021-03-06 op int line;
604 48e9d457 2021-03-06 op
605 48e9d457 2021-03-06 op werase(body);
606 48e9d457 2021-03-06 op
607 48e9d457 2021-03-06 op tab->s->line_off = MIN(tab->s->line_max, tab->s->line_off);
608 48e9d457 2021-03-06 op if (TAILQ_EMPTY(&tab->s->head))
609 48e9d457 2021-03-06 op return;
610 48e9d457 2021-03-06 op
611 48e9d457 2021-03-06 op line = 0;
612 48e9d457 2021-03-06 op l = nth_line(tab, tab->s->line_off);
613 48e9d457 2021-03-06 op for (; l != NULL; l = TAILQ_NEXT(l, lines)) {
614 48e9d457 2021-03-06 op wmove(body, line, 0);
615 1d08c280 2021-03-06 op print_line(l);
616 48e9d457 2021-03-06 op line++;
617 48e9d457 2021-03-06 op if (line == body_lines)
618 48e9d457 2021-03-06 op break;
619 1d08c280 2021-03-06 op }
620 1d08c280 2021-03-06 op
621 48e9d457 2021-03-06 op redraw_modeline(tab);
622 48e9d457 2021-03-06 op
623 48e9d457 2021-03-06 op restore_cursor(tab);
624 48e9d457 2021-03-06 op wrefresh(tabline);
625 48e9d457 2021-03-06 op wrefresh(modeline);
626 48e9d457 2021-03-06 op wrefresh(minibuf);
627 48e9d457 2021-03-06 op
628 48e9d457 2021-03-06 op wrefresh(body);
629 5e11c00c 2021-03-02 op }
630 5e11c00c 2021-03-02 op
631 5e11c00c 2021-03-02 op int
632 5e11c00c 2021-03-02 op ui_init(void)
633 5e11c00c 2021-03-02 op {
634 5e11c00c 2021-03-02 op setlocale(LC_ALL, "");
635 5e11c00c 2021-03-02 op
636 5e11c00c 2021-03-02 op initscr();
637 15e1b108 2021-03-02 op raw();
638 5e11c00c 2021-03-02 op noecho();
639 5e11c00c 2021-03-02 op
640 5e11c00c 2021-03-02 op nonl();
641 5e11c00c 2021-03-02 op intrflush(stdscr, FALSE);
642 5e11c00c 2021-03-02 op keypad(stdscr, TRUE);
643 5e11c00c 2021-03-02 op
644 48e9d457 2021-03-06 op if ((tabline = newwin(1, COLS, 0, 0)) == NULL)
645 48e9d457 2021-03-06 op return 0;
646 48e9d457 2021-03-06 op if ((body = newwin(LINES - 3, COLS, 1, 0)) == NULL)
647 48e9d457 2021-03-06 op return 0;
648 48e9d457 2021-03-06 op if ((modeline = newwin(1, COLS, LINES-2, 0)) == NULL)
649 48e9d457 2021-03-06 op return 0;
650 48e9d457 2021-03-06 op if ((minibuf = newwin(1, COLS, LINES-1, 0)) == NULL)
651 48e9d457 2021-03-06 op return 0;
652 1d08c280 2021-03-06 op
653 48e9d457 2021-03-06 op body_lines = LINES-3;
654 48e9d457 2021-03-06 op body_cols = COLS;
655 48e9d457 2021-03-06 op
656 48e9d457 2021-03-06 op scrollok(body, TRUE);
657 48e9d457 2021-03-06 op
658 5e11c00c 2021-03-02 op /* non-blocking input */
659 48e9d457 2021-03-06 op wtimeout(body, 0);
660 5e11c00c 2021-03-02 op
661 48e9d457 2021-03-06 op mvwprintw(body, 0, 0, "");
662 5e11c00c 2021-03-02 op
663 5e11c00c 2021-03-02 op event_set(&stdioev, 0, EV_READ | EV_PERSIST, dispatch_stdio, NULL);
664 5e11c00c 2021-03-02 op event_add(&stdioev, NULL);
665 5e11c00c 2021-03-02 op
666 5e11c00c 2021-03-02 op signal_set(&winchev, SIGWINCH, handle_resize, NULL);
667 5e11c00c 2021-03-02 op signal_add(&winchev, NULL);
668 5e11c00c 2021-03-02 op
669 5e11c00c 2021-03-02 op return 1;
670 5e11c00c 2021-03-02 op }
671 5e11c00c 2021-03-02 op
672 1d08c280 2021-03-06 op int
673 5e11c00c 2021-03-02 op ui_on_new_tab(struct tab *tab)
674 5e11c00c 2021-03-02 op {
675 5e11c00c 2021-03-02 op struct tab *t;
676 5e11c00c 2021-03-02 op
677 1d08c280 2021-03-06 op if ((tab->s = calloc(1, sizeof(*t->s))) == NULL)
678 1d08c280 2021-03-06 op return 0;
679 1d08c280 2021-03-06 op
680 1d08c280 2021-03-06 op TAILQ_INIT(&tab->s->head);
681 1d08c280 2021-03-06 op
682 5e11c00c 2021-03-02 op TAILQ_FOREACH(t, &tabshead, tabs) {
683 5e11c00c 2021-03-02 op t->flags &= ~TAB_CURRENT;
684 5e11c00c 2021-03-02 op }
685 5e11c00c 2021-03-02 op tab->flags = TAB_CURRENT;
686 5e11c00c 2021-03-02 op
687 5e11c00c 2021-03-02 op /* TODO: redraw the tab list */
688 1d08c280 2021-03-06 op /* TODO: switch to the new tab */
689 1d08c280 2021-03-06 op
690 48e9d457 2021-03-06 op wmove(body, 0, 0);
691 1d08c280 2021-03-06 op
692 1d08c280 2021-03-06 op return 1;
693 5e11c00c 2021-03-02 op }
694 5e11c00c 2021-03-02 op
695 5e11c00c 2021-03-02 op void
696 5e11c00c 2021-03-02 op ui_on_tab_refresh(struct tab *tab)
697 5e11c00c 2021-03-02 op {
698 5e11c00c 2021-03-02 op if (!(tab->flags & TAB_CURRENT))
699 5e11c00c 2021-03-02 op return;
700 5e11c00c 2021-03-02 op
701 1d08c280 2021-03-06 op wrap_page(tab);
702 5e11c00c 2021-03-02 op redraw_tab(tab);
703 5e11c00c 2021-03-02 op }
704 5e11c00c 2021-03-02 op
705 5e11c00c 2021-03-02 op void
706 5e11c00c 2021-03-02 op ui_end(void)
707 5e11c00c 2021-03-02 op {
708 5e11c00c 2021-03-02 op endwin();
709 5e11c00c 2021-03-02 op }