Blob


1 /*
2 * Copyright (c) 2021 Omar Polo <op@omarpolo.com>
3 *
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.
7 *
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.
15 */
17 #include <string.h>
18 #include <stdlib.h>
20 #include "telescope.h"
22 void
23 cmd_previous_line(struct buffer *buffer)
24 {
25 struct vline *vl;
27 if (buffer->current_line == NULL
28 || (vl = TAILQ_PREV(buffer->current_line, vhead, vlines)) == NULL)
29 return;
31 if (--buffer->curs_y < 0) {
32 buffer->curs_y = 0;
33 cmd_scroll_line_up(buffer);
34 return;
35 }
37 buffer->current_line = vl;
38 restore_cursor(buffer);
39 }
41 void
42 cmd_next_line(struct buffer *buffer)
43 {
44 struct vline *vl;
46 if (buffer->current_line == NULL
47 || (vl = TAILQ_NEXT(buffer->current_line, vlines)) == NULL)
48 return;
50 if (++buffer->curs_y > body_lines-1) {
51 buffer->curs_y = body_lines-1;
52 cmd_scroll_line_down(buffer);
53 return;
54 }
56 buffer->current_line = vl;
57 restore_cursor(buffer);
58 }
60 void
61 cmd_backward_char(struct buffer *buffer)
62 {
63 if (buffer->cpoff != 0)
64 buffer->cpoff--;
65 restore_cursor(buffer);
66 }
68 void
69 cmd_forward_char(struct buffer *buffer)
70 {
71 size_t len = 0;
73 if (buffer->current_line->line != NULL)
74 len = utf8_cplen(buffer->current_line->line);
75 if (++buffer->cpoff > len)
76 buffer->cpoff = len;
77 restore_cursor(buffer);
78 }
80 void
81 cmd_backward_paragraph(struct buffer *buffer)
82 {
83 do {
84 if (buffer->current_line == NULL ||
85 buffer->current_line == TAILQ_FIRST(&buffer->head)) {
86 message("No previous paragraph");
87 return;
88 }
89 cmd_previous_line(buffer);
90 } while (buffer->current_line->line != NULL ||
91 buffer->current_line->parent->type != LINE_TEXT);
92 }
94 void
95 cmd_forward_paragraph(struct buffer *buffer)
96 {
97 do {
98 if (buffer->current_line == NULL ||
99 buffer->current_line == TAILQ_LAST(&buffer->head, vhead)) {
100 message("No next paragraph");
101 return;
103 cmd_next_line(buffer);
104 } while (buffer->current_line->line != NULL ||
105 buffer->current_line->parent->type != LINE_TEXT);
108 void
109 cmd_move_beginning_of_line(struct buffer *buffer)
111 buffer->cpoff = 0;
112 restore_cursor(buffer);
115 void
116 cmd_move_end_of_line(struct buffer *buffer)
118 struct vline *vl;
120 vl = buffer->current_line;
121 if (vl->line == NULL)
122 return;
123 buffer->cpoff = utf8_cplen(vl->line);
124 restore_cursor(buffer);
127 void
128 cmd_redraw(struct buffer *buffer)
130 ui_schedule_redraw();
133 void
134 cmd_scroll_line_up(struct buffer *buffer)
136 if (buffer->current_line == NULL)
137 return;
139 if (buffer->line_off == 0)
140 return;
142 buffer->line_off--;
143 buffer->current_line = TAILQ_PREV(buffer->current_line, vhead, vlines);
144 restore_cursor(buffer);
147 void
148 cmd_scroll_line_down(struct buffer *buffer)
150 struct vline *vl;
152 if (buffer->current_line == NULL)
153 return;
155 if ((vl = TAILQ_NEXT(buffer->current_line, vlines)) == NULL)
156 return;
158 buffer->current_line = vl;
159 buffer->line_off++;
160 restore_cursor(buffer);
163 void
164 cmd_scroll_up(struct buffer *buffer)
166 size_t off;
168 off = body_lines-1;
170 for (; off > 0; --off)
171 cmd_scroll_line_up(buffer);
174 void
175 cmd_scroll_down(struct buffer *buffer)
177 size_t off;
179 off = body_lines-1;
181 for (; off > 0; --off)
182 cmd_scroll_line_down(buffer);
185 void
186 cmd_beginning_of_buffer(struct buffer *buffer)
188 buffer->current_line = TAILQ_FIRST(&buffer->head);
189 buffer->line_off = 0;
190 buffer->curs_y = 0;
191 buffer->cpoff = 0;
192 restore_cursor(buffer);
195 void
196 cmd_end_of_buffer(struct buffer *buffer)
198 ssize_t off;
200 off = buffer->line_max - body_lines;
201 off = MAX(0, off);
203 buffer->line_off = off;
204 buffer->curs_y = MIN((size_t)body_lines-1, buffer->line_max-1);
206 buffer->current_line = TAILQ_LAST(&buffer->head, vhead);
207 buffer->cpoff = body_cols;
208 restore_cursor(buffer);
211 void
212 cmd_kill_telescope(struct buffer *buffer)
214 save_session();
215 event_loopbreak();
218 void
219 cmd_push_button(struct buffer *buffer)
221 struct vline *vl;
223 vl = buffer->current_line;
224 if (vl->parent->type != LINE_LINK)
225 return;
227 load_url_in_tab(current_tab(), vl->parent->alt);
230 void
231 cmd_push_button_new_tab(struct buffer *buffer)
233 struct vline *vl;
235 vl = buffer->current_line;
236 if (vl->parent->type != LINE_LINK)
237 return;
239 new_tab(vl->parent->alt);
242 void
243 cmd_previous_button(struct buffer *buffer)
245 struct excursion place;
247 save_excursion(&place, buffer);
249 do {
250 if (buffer->current_line == NULL ||
251 buffer->current_line == TAILQ_FIRST(&buffer->head)) {
252 restore_excursion(&place, buffer);
253 message("No previous link");
254 return;
256 cmd_previous_line(buffer);
257 } while (buffer->current_line->parent->type != LINE_LINK);
260 void
261 cmd_next_button(struct buffer *buffer)
263 struct excursion place;
265 save_excursion(&place, buffer);
267 do {
268 if (buffer->current_line == NULL ||
269 buffer->current_line == TAILQ_LAST(&buffer->head, vhead)) {
270 restore_excursion(&place, buffer);
271 message("No next link");
272 return;
274 cmd_next_line(buffer);
275 } while (buffer->current_line->parent->type != LINE_LINK);
278 static inline int
279 is_heading(const struct line *l)
281 return l->type == LINE_TITLE_1 ||
282 l->type == LINE_TITLE_2 ||
283 l->type == LINE_TITLE_3;
286 void
287 cmd_previous_heading(struct buffer *buffer)
289 struct excursion place;
291 save_excursion(&place, buffer);
293 do {
294 if (buffer->current_line == NULL ||
295 buffer->current_line == TAILQ_FIRST(&buffer->head)) {
296 restore_excursion(&place, buffer);
297 message("No previous heading");
298 return;
300 cmd_previous_line(buffer);
301 } while (!is_heading(buffer->current_line->parent));
304 void
305 cmd_next_heading(struct buffer *buffer)
307 struct excursion place;
309 save_excursion(&place, buffer);
311 do {
312 if (buffer->current_line == NULL ||
313 buffer->current_line == TAILQ_LAST(&buffer->head, vhead)) {
314 restore_excursion(&place, buffer);
315 message("No next heading");
316 return;
318 cmd_next_line(buffer);
319 } while (!is_heading(buffer->current_line->parent));
322 void
323 cmd_previous_page(struct buffer *buffer)
325 struct tab *tab = current_tab();
327 if (!load_previous_page(tab))
328 message("No previous page");
329 else
330 start_loading_anim(tab);
333 void
334 cmd_next_page(struct buffer *buffer)
336 struct tab *tab = current_tab();
338 if (!load_next_page(tab))
339 message("No next page");
340 else
341 start_loading_anim(tab);
344 void
345 cmd_clear_minibuf(struct buffer *buffer)
347 message(NULL);
350 void
351 cmd_execute_extended_command(struct buffer *buffer)
353 size_t len;
355 if (in_minibuffer) {
356 message("We don't have enable-recursive-minibuffers");
357 return;
360 enter_minibuffer(eecmd_self_insert, eecmd_select, exit_minibuffer,
361 &eecmd_history);
363 len = sizeof(ministate.prompt);
364 strlcpy(ministate.prompt, "", len);
366 if (thiskey.meta)
367 strlcat(ministate.prompt, "M-", len);
369 strlcat(ministate.prompt, ui_keyname(thiskey.key), len);
371 if (thiskey.meta)
372 strlcat(ministate.prompt, " ", len);
375 void
376 cmd_tab_close(struct buffer *buffer)
378 struct tab *tab, *t;
380 tab = current_tab();
381 if (TAILQ_PREV(tab, tabshead, tabs) == NULL &&
382 TAILQ_NEXT(tab, tabs) == NULL) {
383 message("Can't close the only tab.");
384 return;
387 if (evtimer_pending(&tab->loadingev, NULL))
388 evtimer_del(&tab->loadingev);
390 stop_tab(tab);
392 if ((t = TAILQ_PREV(tab, tabshead, tabs)) == NULL)
393 t = TAILQ_NEXT(tab, tabs);
394 TAILQ_REMOVE(&tabshead, tab, tabs);
395 free(tab);
397 switch_to_tab(t);
400 void
401 cmd_tab_close_other(struct buffer *buffer)
403 struct tab *t, *i;
405 TAILQ_FOREACH_SAFE(t, &tabshead, tabs, i) {
406 if (t->flags & TAB_CURRENT)
407 continue;
409 stop_tab(t);
410 TAILQ_REMOVE(&tabshead, t, tabs);
411 free(t);
415 void
416 cmd_tab_new(struct buffer *buffer)
418 const char *url;
420 if ((url = new_tab_url) == NULL)
421 url = NEW_TAB_URL;
423 new_tab(url);
426 void
427 cmd_tab_next(struct buffer *buffer)
429 struct tab *tab, *t;
431 tab = current_tab();
432 tab->flags &= ~TAB_CURRENT;
434 if ((t = TAILQ_NEXT(tab, tabs)) == NULL)
435 t = TAILQ_FIRST(&tabshead);
436 t->flags |= TAB_CURRENT;
437 t->flags &= ~TAB_URGENT;
440 void
441 cmd_tab_previous(struct buffer *buffer)
443 struct tab *tab, *t;
445 tab = current_tab();
446 tab->flags &= ~TAB_CURRENT;
448 if ((t = TAILQ_PREV(tab, tabshead, tabs)) == NULL)
449 t = TAILQ_LAST(&tabshead, tabshead);
450 t->flags |= TAB_CURRENT;
451 t->flags &= ~TAB_URGENT;
454 void
455 cmd_tab_move(struct buffer *buffer)
457 struct tab *tab, *t;
459 tab = current_tab();
460 t = TAILQ_NEXT(tab, tabs);
461 TAILQ_REMOVE(&tabshead, tab, tabs);
463 if (t == NULL)
464 TAILQ_INSERT_HEAD(&tabshead, tab, tabs);
465 else
466 TAILQ_INSERT_AFTER(&tabshead, t, tab, tabs);
469 void
470 cmd_tab_move_to(struct buffer *buffer)
472 struct tab *tab, *t;
474 tab = current_tab();
475 t = TAILQ_PREV(tab, tabshead, tabs);
476 TAILQ_REMOVE(&tabshead, tab, tabs);
478 if (t == NULL) {
479 if (TAILQ_EMPTY(&tabshead))
480 TAILQ_INSERT_HEAD(&tabshead, tab, tabs);
481 else
482 TAILQ_INSERT_TAIL(&tabshead, tab, tabs);
483 } else
484 TAILQ_INSERT_BEFORE(t, tab, tabs);
487 void
488 cmd_load_url(struct buffer *buffer)
490 if (in_minibuffer) {
491 message("We don't have enable-recursive-minibuffers");
492 return;
495 enter_minibuffer(lu_self_insert, lu_select, exit_minibuffer,
496 &lu_history);
497 strlcpy(ministate.prompt, "Load URL: ", sizeof(ministate.prompt));
498 strlcpy(ministate.buf, "gemini://", sizeof(ministate.buf));
499 cmd_move_end_of_line(&ministate.buffer);
502 void
503 cmd_load_current_url(struct buffer *buffer)
505 struct tab *tab = current_tab();
507 if (in_minibuffer) {
508 message("We don't have enable-recursive-minibuffers");
509 return;
512 enter_minibuffer(lu_self_insert, lu_select, exit_minibuffer,
513 &lu_history);
514 strlcpy(ministate.prompt, "Load URL: ", sizeof(ministate.prompt));
515 strlcpy(ministate.buf, tab->hist_cur->h, sizeof(ministate.buf));
516 ministate.buffer.cpoff = utf8_cplen(ministate.buf);
519 void
520 cmd_bookmark_page(struct buffer *buffer)
522 struct tab *tab = current_tab();
524 enter_minibuffer(lu_self_insert, bp_select, exit_minibuffer, NULL);
525 strlcpy(ministate.prompt, "Bookmark URL: ", sizeof(ministate.prompt));
526 strlcpy(ministate.buf, tab->hist_cur->h, sizeof(ministate.buf));
527 ministate.buffer.cpoff = utf8_cplen(ministate.buf);
530 void
531 cmd_list_bookmarks(struct buffer *buffer)
533 load_url_in_tab(current_tab(), "about:bookmarks");
536 void
537 cmd_toggle_help(struct buffer *buffer)
539 ui_toggle_side_window();
542 void
543 cmd_olivetti_mode(struct buffer *buffer)
545 olivetti_mode = !olivetti_mode;
546 if (olivetti_mode)
547 message("olivetti-mode enabled");
548 else
549 message("olivetti-mode disabled");
551 ui_schedule_redraw();
554 void
555 cmd_mini_delete_char(struct buffer *buffer)
557 char *c, *n;
559 if (!in_minibuffer) {
560 message("text is read-only");
561 return;
564 minibuffer_taint_hist();
566 c = utf8_nth(buffer->current_line->line, buffer->cpoff);
567 if (*c == '\0')
568 return;
569 n = utf8_next_cp(c);
571 memmove(c, n, strlen(n)+1);
574 void
575 cmd_mini_delete_backward_char(struct buffer *buffer)
577 char *c, *p, *start;
579 if (!in_minibuffer) {
580 message("text is read-only");
581 return;
584 minibuffer_taint_hist();
586 c = utf8_nth(buffer->current_line->line, buffer->cpoff);
587 start = buffer->current_line->line;
588 if (c == start)
589 return;
590 p = utf8_prev_cp(c-1, start);
592 memmove(p, c, strlen(c)+1);
593 buffer->cpoff--;
596 void
597 cmd_mini_kill_line(struct buffer *buffer)
599 char *c;
601 if (!in_minibuffer) {
602 message("text is read-only");
603 return;
606 minibuffer_taint_hist();
607 c = utf8_nth(buffer->current_line->line, buffer->cpoff);
608 *c = '\0';
611 void
612 cmd_mini_abort(struct buffer *buffer)
614 if (!in_minibuffer)
615 return;
617 ministate.abortfn();
620 void
621 cmd_mini_complete_and_exit(struct buffer *buffer)
623 if (!in_minibuffer)
624 return;
626 minibuffer_taint_hist();
627 ministate.donefn();
630 void
631 cmd_mini_previous_history_element(struct buffer *buffer)
633 if (ministate.history == NULL) {
634 message("No history");
635 return;
638 if (ministate.hist_cur == NULL ||
639 (ministate.hist_cur = TAILQ_PREV(ministate.hist_cur, mhisthead, entries)) == NULL) {
640 ministate.hist_cur = TAILQ_LAST(&ministate.history->head, mhisthead);
641 ministate.hist_off = ministate.history->len - 1;
642 if (ministate.hist_cur == NULL)
643 message("No prev item");
644 } else {
645 ministate.hist_off--;
648 if (ministate.hist_cur != NULL)
649 buffer->current_line->line = ministate.hist_cur->h;
652 void
653 cmd_mini_next_history_element(struct buffer *buffer)
655 if (ministate.history == NULL) {
656 message("No history");
657 return;
660 if (ministate.hist_cur == NULL ||
661 (ministate.hist_cur = TAILQ_NEXT(ministate.hist_cur, entries)) == NULL) {
662 ministate.hist_cur = TAILQ_FIRST(&ministate.history->head);
663 ministate.hist_off = 0;
664 if (ministate.hist_cur == NULL)
665 message("No next item");
666 } else {
667 ministate.hist_off++;
670 if (ministate.hist_cur != NULL)
671 buffer->current_line->line = ministate.hist_cur->h;