diff options
Diffstat (limited to 'handlers.ha')
| -rw-r--r-- | handlers.ha | 200 |
1 files changed, 200 insertions, 0 deletions
diff --git a/handlers.ha b/handlers.ha new file mode 100644 index 0000000..ef374ef --- /dev/null +++ b/handlers.ha @@ -0,0 +1,200 @@ +use libui; +use libui::widget; +use libui::widget::list; +use sort; +use slices; +use encoding::utf8; +use fmt; +use bufio; +use os; +use regex; +use io; +use strings; +use unix::tty; + +let itemscopy: []str = []; + +fn globalrunehandler(ui: *libui::ttyui, r: rune) bool = { + if (r == 'q') { + return true; + }; + return false; +}; + +fn runehandler(l: *widget::widget, r: rune) bool = { + const l = l: *list::listwidget; + switch (r) { + case 'j' => + list::down(l); + case 'k' => + list::up(l); + case 'd' => + list::pagedown(l); + case 'u' => + list::pageup(l); + case 'l' => + // to print properly suspend the ui, print, then resume + libui::suspend(&l.ui); + //fmt::println(l.items[l.cursor])!; + match (list::selected(*l)) { + case let s: str => + fmt::println(s)!; + case let s: []str => + defer free(s); + const out = strings::join("\n", s...); + defer free(out); + fmt::println(out)!; + }; + libui::resume(&l.ui); + return true; + case 'g' => + list::top(l); + case 'G' => + list::bottom(l); + case 'n' => + if (searchforward) { + list::search(l, searchterm); + } else { + list::rsearch(l, searchterm); + }; + case 'N' => + if (searchforward) { + list::rsearch(l, searchterm); + } else { + list::search(l, searchterm); + }; + case '?' => + // TODO add commandline support maybe + libui::suspend(&l.ui); + fmt::fprint(l.ui.f, '?')!; + let line = match (bufio::scanline(l.ui.f)) { + case let s: []u8 => + yield s; + case io::EOF => + fmt::fprintln(os::stderr, "EOF")!; + return true; + case let e: io::error => + fmt::fprintln(os::stderr, io::strerror(e))!; + return true; + }; + //defer free(line); + searchterm = strings::fromutf8(line); + searchforward = false; + let c = l.cursor; + list::rsearch(l, searchterm); + libui::resume(&l.ui); + case '/' => + // TODO add commandline support maybe + libui::suspend(&l.ui); + fmt::fprint(l.ui.f, '/')!; + let line = match (bufio::scanline(l.ui.f)) { + case let s: []u8 => + yield s; + case io::EOF => + fmt::fprintln(os::stderr, "EOF")!; + return true; + case let e: io::error => + fmt::fprintln(os::stderr, io::strerror(e))!; + return true; + }; + //defer free(line); + searchterm = strings::fromutf8(line); + searchforward = true; + let c = l.cursor; + list::search(l, searchterm); + libui::resume(&l.ui); + case 'o' => + // order + sort::strings(l.items); + case 'O' => + // reverse order + sort::strings(l.items); + slices::reverse(l.items: []void, size(str)); + case 'p' => + list::setitems(l, itemscopy...); + case 's' => + // TODO add commandline support maybe + libui::suspend(&l.ui); + fmt::fprint(l.ui.f, "s: ")!; + let line = match (bufio::scanline(l.ui.f)) { + case let s: []u8 => + yield s; + case io::EOF => + fmt::fprintln(os::stderr, "EOF")!; + return true; + case let e: io::error => + fmt::fprintln(os::stderr, io::strerror(e))!; + return true; + }; + defer free(line); + list::containsmark(l, strings::fromutf8(line)); + libui::resume(&l.ui); + case 'S' => + // TODO add commandline support maybe + libui::suspend(&l.ui); + fmt::fprint(l.ui.f, "S: ")!; + let line = match (bufio::scanline(l.ui.f)) { + case let s: []u8 => + yield s; + case io::EOF => + fmt::fprintln(os::stderr, "EOF")!; + return true; + case let e: io::error => + fmt::fprintln(os::stderr, io::strerror(e))!; + return true; + }; + defer free(line); + list::fnmatchmark(l, strings::fromutf8(line)); + libui::resume(&l.ui); + case 'r' => + // TODO add commandline support maybe + libui::suspend(&l.ui); + fmt::fprint(l.ui.f, "r: ")!; + let line = match (bufio::scanline(l.ui.f)) { + case let s: []u8 => + yield s; + case io::EOF => + fmt::fprintln(os::stderr, "EOF")!; + return true; + case let e: io::error => + fmt::fprintln(os::stderr, io::strerror(e))!; + return true; + }; + defer free(line); + match (regex::compile(strings::fromutf8(line))) { + case let re: regex::regex => + list::regexmark(l, &re); + regex::finish(&re); + case let e: regex::error => + fmt::fprintln(os::stderr, regex::strerror(e))!; + }; + libui::resume(&l.ui); + case ' ' => + list::tmark(l); + list::down(l); + case 'c' => + list::clearmarked(l); + case '\n' => + // For some reason enter doesn't send r == '\n' + fmt::fprintln(os::stderr, "This is not detected")!; + yield; + case => + let us = utf8::encoderune(r); + if (len(us) > 0 && us[0] == 13u8) { + fmt::fprintln(os::stderr, "newline")!; + }; + yield; + }; + libui::clear(l.ui); + match (list::print(l)) { + case void => + yield; + case let e: io::error => + fmt::fprintln(os::stderr, io::strerror(e))!; + return true; + case let e: tty::error => + fmt::fprintln(os::stderr, tty::strerror(e))!; + return true; + }; + return false; +}; |