X-Git-Url: https://fleuret.org/cgi-bin/gitweb/gitweb.cgi?a=blobdiff_plain;f=selector.cc;h=e1ecf98ad080ff2f80589342dba30202e7be32ce;hb=287c4f215525607851ea65c0c5887cabac16b43f;hp=a6eec4717aebe07437ce6ffbeab5477ebeb99074;hpb=46c2d7bcdb9e4ca9ca803f9255606c11f4441ea1;p=selector.git diff --git a/selector.cc b/selector.cc index a6eec47..e1ecf98 100644 --- a/selector.cc +++ b/selector.cc @@ -1,235 +1,859 @@ -/////////////////////////////////////////////////////////////////////////// -// START_IP_HEADER // -// // -// This program is free software: you can redistribute it and/or modify // -// it under the terms of the version 3 of the GNU General Public License // -// as published by the Free Software Foundation. // -// // -// This program is distributed in the hope that it will be useful, but // -// WITHOUT ANY WARRANTY; without even the implied warranty of // -// MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU // -// General Public License for more details. // -// // -// You should have received a copy of the GNU General Public License // -// along with this program. If not, see . // -// // -// Written by and Copyright (C) Francois Fleuret // -// Contact for comments & bug reports // -// // -// END_IP_HEADER // -/////////////////////////////////////////////////////////////////////////// +/* + * selector is a simple command line utility for selection of strings + * with a dynamic pattern-matching. + * + * Copyright (c) 2009 Francois Fleuret + * Written by Francois Fleuret + * + * This file is part of selector. + * + * selector is free software: you can redistribute it and/or modify + * it under the terms of the GNU General Public License version 3 as + * published by the Free Software Foundation. + * + * selector is distributed in the hope that it will be useful, but + * WITHOUT ANY WARRANTY; without even the implied warranty of + * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU + * General Public License for more details. + * + * You should have received a copy of the GNU General Public License + * along with selector. If not, see . + * + */ + +// To use it as a super-history-search for bash: +// alias h='selector -d -i -b -v -f <(history)' -#include -#include -#include #include +#include + +#include +#include #include +#include +#include +#include +#include +#include using namespace std; -ostream *log; +#define VERSION "1.0" + +const int buffer_size = 4096; + +// Yeah, global variables! + +int nb_lines_max = 1000; +char pattern_separator = ';'; +int output_to_vt_buffer = 0; +int with_colors = 1; +int zsh_history = 0, bash_history = 0; +int inverse_order = 0; +int remove_duplicates = 0; +int use_regexp = 0; +int case_sensitive = 0; +char *title = 0; + +#define COLOR_MODELINE 1 +#define COLOR_HIGHLIGHTED_LINE 2 + +////////////////////////////////////////////////////////////////////// + +void inject_into_tty_buffer(char *string) { + struct termios oldtio, newtio; + tcgetattr(STDIN_FILENO, &oldtio); + memset(&newtio, 0, sizeof(newtio)); + // Set input mode (non-canonical, *no echo*,...) + tcsetattr(STDIN_FILENO, TCSANOW, &newtio); + // Put the selected string in the tty input buffer + for(char *k = string; *k; k++) { + ioctl(STDIN_FILENO, TIOCSTI, k); + } + // Restore the old settings + tcsetattr(STDIN_FILENO, TCSANOW, &oldtio); +} -const int buffer_size = 1024; -const int nb_lines_max = 100000; +////////////////////////////////////////////////////////////////////// -int match(char *string, char *regexp) { - return strstr(string, regexp) != 0; +void check_opt(int argc, char **argv, int n_opt, int n, const char *help) { + if(n_opt + n >= argc) { + cerr << "Missing argument for " << argv[n_opt] << "." + << " " + << "Expecting " << help << "." + << endl; + exit(1); + } } -void update_screen(int *current_line, int motion, - int nb_lines, char **lines, - char *regexp, int noblink) { +int string_to_positive_integer(char *string) { + int error = 0; + int result = 0; - char buffer[buffer_size]; + if(*string) { + for(char *s = string; *s; s++) { + if(*s >= '0' && *s <= '9') { + result = result * 10 + int(*s - '0'); + } else error = 1; + } + } else error = 1; - int console_width = getmaxx(stdscr); - int console_height = getmaxy(stdscr); + if(error) { + cerr << "Value `" << string << "' is not a positive integer." << endl; + exit(1); + } + + return result; +} - if(!noblink) { - clear(); +////////////////////////////////////////////////////////////////////// +// A quick and dirty hash table + +// The table itself stores index of the strings in a char +// **table. When a string is added, if it was already in the table, +// the new index replaces the previous one. + +int *new_hash_table(int hash_table_size) { + int *result; + result = new int[hash_table_size]; + for(int k = 0; k < hash_table_size; k++) { + result[k] = -1; } + return result; +} - use_default_colors(); +// Adds new_string in the table, associated to new_index. If this +// string was not already in the table, returns -1. Otherwise, returns +// the previous index it had. - printw("\n"); +int test_and_add(char *new_string, int new_index, + char **strings, int *hash_table, int hash_table_size) { + unsigned int code = 0; - int nb_printed_lines = 1, last_printer_line = -1; + // This is my recipe. I checked, it seems to work (as long as + // hash_table_size is not a multiple of 387433 that should be okay) - int new_line; - if(motion >= 0) { - new_line = *current_line + motion; - while(new_line < nb_lines && !match(lines[new_line], regexp)) { - new_line++; + for(int k = 0; new_string[k]; k++) { + code = code * 387433 + (unsigned int) (new_string[k]); + } + + code = code % hash_table_size; + + while(hash_table[code] >= 0) { + // There is a string with that code + if(strcmp(new_string, strings[hash_table[code]]) == 0) { + // It is the same string, we keep a copy of the stored index + int result = hash_table[code]; + // Put the new one + hash_table[code] = new_index; + // And return the previous one + return result; } - if(new_line == nb_lines) { - new_line = *current_line; - while(new_line >= 0 && ! match(lines[new_line], regexp)) { - new_line--; + // This collision was not the same string, let's move to the next + // in the table + code = (code + 1) % hash_table_size; + } + + // This string was not already in there, store the index in the + // table and return -1 + hash_table[code] = new_index; + return -1; +} + +////////////////////////////////////////////////////////////////////// +// A matcher matches either with a collection of substrings, or with a +// regexp + +struct matcher_t { + regex_t preg; + int regexp_error; + int nb_patterns; + int case_sensitive; + char *splitted_patterns, **patterns; +}; + +int match(char *string, matcher_t *matcher) { + if(matcher->nb_patterns >= 0) { + if(matcher->case_sensitive) { + for(int n = 0; n < matcher->nb_patterns; n++) { + if(strstr(string, matcher->patterns[n]) == 0) return 0; + } + } else { + for(int n = 0; n < matcher->nb_patterns; n++) { + if(strcasestr(string, matcher->patterns[n]) == 0) return 0; } } + return 1; } else { + return regexec(&matcher->preg, string, 0, 0, 0) == 0; + } +} - new_line = *current_line - 1; - while(new_line >= 0 && ! match(lines[new_line], regexp)) { - new_line--; +void free_matcher(matcher_t *matcher) { + if(matcher->nb_patterns >= 0) { + delete[] matcher->splitted_patterns; + delete[] matcher->patterns; + } else { + if(!matcher->regexp_error) regfree(&matcher->preg); + } +} + +void initialize_matcher(int use_regexp, int case_sensitive, + matcher_t *matcher, const char *pattern) { + + if(use_regexp) { + matcher->nb_patterns = -1; + matcher->regexp_error = regcomp(&matcher->preg, pattern, case_sensitive ? 0 : REG_ICASE); + } else { + matcher->regexp_error = 0; + matcher->nb_patterns = 1; + matcher->case_sensitive = case_sensitive; + + for(const char *s = pattern; *s; s++) { + if(*s == pattern_separator) { + matcher->nb_patterns++; + } } - if(new_line < 0) { - new_line = *current_line; - while(new_line < nb_lines && !match(lines[new_line], regexp)) { - new_line++; + matcher->splitted_patterns = new char[strlen(pattern) + 1]; + matcher->patterns = new char*[matcher->nb_patterns]; + + strcpy(matcher->splitted_patterns, pattern); + + int n = 0; + char *last_pattern_start = matcher->splitted_patterns; + for(char *s = matcher->splitted_patterns; n < matcher->nb_patterns; s++) { + if(*s == pattern_separator || *s == '\0') { + *s = '\0'; + matcher->patterns[n++] = last_pattern_start; + last_pattern_start = s + 1; } - if(new_line == nb_lines) { - new_line = -1; + } + } +} + +////////////////////////////////////////////////////////////////////// +// Buffer edition + +void delete_char(char *buffer, int *position) { + if(buffer[*position]) { + int c = *position; + while(c < buffer_size && buffer[c]) { + buffer[c] = buffer[c+1]; + c++; + } + } +} + +void backspace_char(char *buffer, int *position) { + if(*position > 0) { + if(buffer[*position]) { + int c = *position - 1; + while(buffer[c]) { + buffer[c] = buffer[c+1]; + c++; } + } else { + buffer[*position - 1] = '\0'; } + + (*position)--; } +} - // Here new_line is either a line number matching the regexp, or -1 +void insert_char(char *buffer, int *position, char character) { + if(strlen(buffer) < buffer_size - 1) { + int c = *position; + char t = buffer[c], u; + while(t) { + c++; + u = buffer[c]; + buffer[c] = t; + t = u; + } + c++; + buffer[c] = '\0'; + buffer[(*position)++] = character; + } +} - if(new_line >= 0) { - int first_line = new_line, last_line = new_line, nb_match = 1; +void kill_before_cursor(char *buffer, int *position) { + int s = 0; + while(buffer[*position + s]) { + buffer[s] = buffer[*position + s]; + s++; + } + buffer[s] = '\0'; + *position = 0; +} - while(nb_match < console_height && (first_line > 0 || last_line < nb_lines - 1)) { +void kill_after_cursor(char *buffer, int *position) { + buffer[*position] = '\0'; +} - if(first_line > 0) { - first_line--; - while(first_line > 0 && !match(lines[first_line], regexp)) { - first_line--; - } - if(match(lines[first_line], regexp)) { - nb_match++; - } +////////////////////////////////////////////////////////////////////// + +int previous_visible(int current_line, int nb_lines, char **lines, matcher_t *matcher) { + int line = current_line - 1; + while(line >= 0 && !match(lines[line], matcher)) line--; + return line; +} + +int next_visible(int current_line, int nb_lines, char **lines, matcher_t *matcher) { + int line = current_line + 1; + while(line < nb_lines && !match(lines[line], matcher)) line++; + + if(line < nb_lines) + return line; + else + return -1; +} + +////////////////////////////////////////////////////////////////////// + +void update_screen(int *current_line, int *temporary_line, int motion, + int nb_lines, char **lines, + int cursor_position, + char *pattern) { + + char buffer[buffer_size]; + matcher_t matcher; + + initialize_matcher(use_regexp, case_sensitive, &matcher, pattern); + + // We now take care of printing the lines per se + + int console_width = getmaxx(stdscr); + int console_height = getmaxy(stdscr); + + // First, we find a visible line. In priority: The current, or the + // first visible after it, or the first visible before it. + + int nb_printed_lines = 0; + + clear(); + use_default_colors(); + addstr("\n"); + + if(matcher.regexp_error) { + addstr("[regexp error]"); + } else if(nb_lines > 0) { + int new_line; + if(match(lines[*current_line], &matcher)) { + new_line = *current_line; + } else { + new_line = next_visible(*current_line, nb_lines, lines, &matcher); + if(new_line < 0) { + new_line = previous_visible(*current_line, nb_lines, lines, &matcher); } + } - if(last_line < nb_lines - 1) { - last_line++; - while(last_line < nb_lines - 1 && !match(lines[last_line], regexp)) { - last_line++; - } + // If we found a visible line and we should move, let's move - if(match(lines[last_line], regexp)) { - nb_match++; + if(new_line >= 0 && motion != 0) { + int l = new_line; + if(motion > 0) { + // We want to go down, let's find the first visible line below + for(int m = 0; l >= 0 && m < motion; m++) { + l = next_visible(l, nb_lines, lines, &matcher); + if(l >= 0) { + new_line = l; + } + } + } else { + // We want to go up, let's find the first visible line above + for(int m = 0; l >= 0 && m < -motion; m++) { + l = previous_visible(l, nb_lines, lines, &matcher); + if(l >= 0) { + new_line = l; + } } } } - for(int l = first_line; l <= last_line; l++) { - if(match(lines[l], regexp)) { - int k = 0; + // Here new_line is either a line number matching the patterns, or -1 + + if(new_line >= 0) { + + int first_line = new_line, last_line = new_line, nb_match = 1; + + // We find the first and last line to show, so that the total of + // visible lines between them (them include) is console_height - 1 - while(lines[l][k] && k < buffer_size - 2 && k < console_width - 1) { - buffer[k] = lines[l][k]; - k++; + while(nb_match < console_height-1 && (first_line > 0 || last_line < nb_lines - 1)) { + + if(first_line > 0) { + first_line--; + while(first_line > 0 && !match(lines[first_line], &matcher)) { + first_line--; + } + if(match(lines[first_line], &matcher)) { + nb_match++; + } } - if(noblink) { - while(k < console_width - 1) { - buffer[k++] = ' '; + if(nb_match < console_height - 1 && last_line < nb_lines - 1) { + last_line++; + while(last_line < nb_lines - 1 && !match(lines[last_line], &matcher)) { + last_line++; + } + + if(match(lines[last_line], &matcher)) { + nb_match++; } } - buffer[k++] = '\n'; - buffer[k++] = '\0'; + } - if(l == new_line) { - attron(COLOR_PAIR(2)); - printw(buffer); - attroff(COLOR_PAIR(2)); - } else { - printw(buffer); + // Now we display them + + for(int l = first_line; l <= last_line; l++) { + if(match(lines[l], &matcher)) { + int k = 0; + + while(lines[l][k] && k < buffer_size - 2 && k < console_width - 2) { + buffer[k] = lines[l][k]; + k++; + } + + // We fill the rest of the line with blanks if either we did + // not clear() or if this is the highlighted line + + if(l == new_line) { + while(k < console_width) { + buffer[k++] = ' '; + } + } + + buffer[k++] = '\n'; + buffer[k++] = '\0'; + + // Highlight the highlighted line ... + + if(l == new_line) { + if(with_colors) { + attron(COLOR_PAIR(COLOR_HIGHLIGHTED_LINE)); + addnstr(buffer, console_width); + attroff(COLOR_PAIR(COLOR_HIGHLIGHTED_LINE)); + } else { + attron(A_STANDOUT); + addnstr(buffer, console_width); + attroff(A_STANDOUT); + } + } else { + addnstr(buffer, console_width); + } + + nb_printed_lines++; } + } - last_printer_line = l; - nb_printed_lines++; + if(motion != 0) { + *current_line = new_line; } } - *current_line = new_line; - } + *temporary_line = new_line; - if(noblink) { // Erase the rest of the window. That's slightly ugly. - int k = 0; - while(k < console_width - 1) { - buffer[k++] = ' '; - } - buffer[k++] = '\n'; - buffer[k++] = '\0'; - for(int l = nb_printed_lines; l < console_height; l++) { - printw(buffer); + if(nb_printed_lines == 0) { + addnstr("[no selection]\n", console_width); } + } else { + addnstr("[empty choice]\n", console_width); } // Draw the modeline move(0, 0); - attron(COLOR_PAIR(1)); - sprintf(buffer, "%d/%d pattern: %s", nb_printed_lines - 1, nb_lines, regexp); - for(int k = strlen(buffer); k < console_width - 1; k++) buffer[k] = ' '; - buffer[console_width-1] = '\0'; - printw(buffer); - attroff(COLOR_PAIR(1)); - - refresh(); // After doing something on the display, we refresh it -} -int main(int argc, char **argv) { - char buffer[buffer_size]; - char *lines[nb_lines_max]; - int noblink = 0; + if(with_colors) { + attron(COLOR_PAIR(COLOR_MODELINE)); + } else { + attron(A_REVERSE); + } - log = new fstream("/tmp/selector.log"); + for(int k = 0; k < console_width; k++) buffer[k] = ' '; + buffer[console_width] = '\0'; + addnstr(buffer, console_width); - char *file_name; - char stdin_name[] = "/dev/stdin"; + move(0, 0); + + // There must be a more elegant way of moving the cursor at a + // location met during display - if(argc == 2 && strcmp(argv[1], "-")) { - file_name = argv[1]; + int cursor_x = 0; + + if(title) { + addstr(title); + addstr(" "); + cursor_x += strlen(title) + 1; + } + + sprintf(buffer, "%d/%d ", nb_printed_lines, nb_lines); + addstr(buffer); + cursor_x += strlen(buffer); + + addnstr(pattern, cursor_position); + cursor_x += cursor_position; + + if(pattern[cursor_position]) { + addstr(pattern + cursor_position); } else { - file_name = stdin_name; + addstr(" "); + } + + if(use_regexp || case_sensitive) { + addstr("["); + if(use_regexp) { + addstr("regexp"); + } + + if(case_sensitive) { + if(use_regexp) { + addstr(","); + } + addstr("case"); + } + addstr("]"); } - ifstream file(file_name); + move(0, cursor_x); + + if(with_colors) { + attroff(COLOR_PAIR(COLOR_MODELINE)); + } else { + attroff(A_REVERSE); + } + + // We are done + + refresh(); + free_matcher(&matcher); +} + +////////////////////////////////////////////////////////////////////// + +void read_file(const char *input_filename, + int nb_lines_max, int *nb_lines, char **lines, + int hash_table_size, int *hash_table) { + + char buffer[buffer_size], raw_line[buffer_size];; + + ifstream file(input_filename); if(file.fail()) { - cerr << "Can not open \"" << file_name << "\"" << endl; - return 1; + cerr << "Can not open " << input_filename << endl; + exit(1); + } + + while(*nb_lines < nb_lines_max && !file.eof()) { + + file.getline(raw_line, buffer_size); + + if(raw_line[0]) { + + if(file.fail()) { + cerr << "Line too long:" << endl; + cerr << raw_line << endl; + exit(1); + } + + char *s, *t; + const char *u; + + s = buffer; + t = raw_line; + while(*t) { + u = unctrl(*t++); + while(*u) { *s++ = *u++; } + } + *s = '\0'; + + s = buffer; + + if(zsh_history && *s == ':') { + while(*s && *s != ';') s++; + if(*s == ';') s++; + } + + if(bash_history && (*s == ' ' || (*s >= '0' && *s <= '9'))) { + while(*s == ' ' || (*s >= '0' && *s <= '9')) s++; + } + + int dup; + + if(hash_table) { + dup = test_and_add(s, *nb_lines, lines, hash_table, hash_table_size); + } else { + dup = -1; + } + + if(dup < 0) { + lines[*nb_lines] = new char[strlen(s) + 1]; + strcpy(lines[*nb_lines], s); + } else { + // The string was already in there, so we do not allocate a + // new string but use the pointer to the first occurence of it + lines[*nb_lines] = lines[dup]; + lines[dup] = 0; + } + + (*nb_lines)++; + } + } +} + +////////////////////////////////////////////////////////////////////// + +int main(int argc, char **argv) { + + if(!ttyname(STDIN_FILENO)) { + cerr << "The standard input is not a tty." << endl; + exit(1); } + int color_fg_modeline, color_bg_modeline; + int color_fg_highlight, color_bg_highlight; + + color_fg_modeline = COLOR_WHITE; + color_bg_modeline = COLOR_BLACK; + color_fg_highlight = COLOR_BLACK; + color_bg_highlight = COLOR_YELLOW; + + setlocale(LC_ALL, ""); + + char input_filename[buffer_size], output_filename[buffer_size]; + + strcpy(input_filename, ""); + strcpy(output_filename, ""); + + int i = 1; + int error = 0, show_help = 0; + int rest_are_files = 0; + + while(!error && !show_help && i < argc && argv[i][0] == '-' && !rest_are_files) { + + if(strcmp(argv[i], "-o") == 0) { + check_opt(argc, argv, i, 1, ""); + strncpy(output_filename, argv[i+1], buffer_size); + i += 2; + } + + else if(strcmp(argv[i], "-s") == 0) { + check_opt(argc, argv, i, 1, ""); + pattern_separator = argv[i+1][0]; + i += 2; + } + + else if(strcmp(argv[i], "-v") == 0) { + output_to_vt_buffer = 1; + i++; + } + + else if(strcmp(argv[i], "-m") == 0) { + with_colors = 0; + i++; + } + + else if(strcmp(argv[i], "-f") == 0) { + check_opt(argc, argv, i, 1, ""); + strncpy(input_filename, argv[i+1], buffer_size); + i += 2; + } + + else if(strcmp(argv[i], "-i") == 0) { + inverse_order = 1; + i++; + } + + else if(strcmp(argv[i], "-b") == 0) { + bash_history = 1; + i++; + } + + else if(strcmp(argv[i], "-z") == 0) { + zsh_history = 1; + i++; + } + + else if(strcmp(argv[i], "-d") == 0) { + remove_duplicates = 1; + i++; + } + + else if(strcmp(argv[i], "-e") == 0) { + use_regexp = 1; + i++; + } + + else if(strcmp(argv[i], "-a") == 0) { + case_sensitive = 1; + i++; + } + + else if(strcmp(argv[i], "-t") == 0) { + check_opt(argc, argv, i, 1, ""); + delete[] title; + title = new char[strlen(argv[i+1]) + 1]; + strcpy(title, argv[i+1]); + i += 2; + } + + else if(strcmp(argv[i], "-l") == 0) { + check_opt(argc, argv, i, 1, "<maximum number of lines>"); + nb_lines_max = string_to_positive_integer(argv[i+1]); + i += 2; + } + + else if(strcmp(argv[i], "-c") == 0) { + check_opt(argc, argv, i, 4, "<fg modeline> <bg modeline> <fg highlight> <bg highlight>"); + color_fg_modeline = string_to_positive_integer(argv[i + 1]); + color_bg_modeline = string_to_positive_integer(argv[i + 2]); + color_fg_highlight = string_to_positive_integer(argv[i + 3]); + color_bg_highlight = string_to_positive_integer(argv[i + 4]); + i += 5; + } + + else if(strcmp(argv[i], "--") == 0) { + rest_are_files = 1; + i++; + } + + else if(strcmp(argv[i], "-h") == 0) { + show_help = 1; + i++; + } + + else { + cerr << "Unknown option " << argv[i] << "." << endl; + error = 1; + } + } + + if(show_help || error) { + cerr << "Selector version " << VERSION << "-R" << REVISION_NUMBER + << endl + << "Written by Francois Fleuret <francois@fleuret.org>." + << endl + << endl + << "Usage: " << argv[0] << " [options] [<filename1> [<filename2> ...]]" << endl + << endl + << " -h show this help" << endl + << " -v inject the selected line in the tty" << endl + << " -d remove duplicated lines" << endl + << " -b remove the bash history line prefix" << endl + << " -z remove the zsh history line prefix" << endl + << " -i invert the order of lines" << endl + << " -e start in regexp mode" << endl + << " -a case sensitive" << endl + << " -m monochrome mode" << endl + << " -- rest of the arguments are filenames" << endl + << " -t <title>" << endl + << " add a title in the modeline" << endl + << " -c <fg modeline> <bg modeline> <fg highlight> <bg highlight>" << endl + << " set the display colors" << endl + << " -o <output filename>" << endl + << " set a file to write the selected line to" << endl + << " -s <pattern separator>" << endl + << " set the symbol to separate substrings in the pattern" << endl + << " -l <max number of lines>" << endl + << " set the maximum number of lines to take into account" << endl + << endl; + + exit(error); + } + + char **lines = new char *[nb_lines_max]; + int nb_lines = 0; - while(nb_lines < nb_lines_max && !file.eof()) { - file.getline(buffer, buffer_size); - lines[nb_lines] = new char[strlen(buffer) + 1]; - strcpy(lines[nb_lines], buffer); - nb_lines++; + int hash_table_size = nb_lines_max * 10; + int *hash_table = 0; + + if(remove_duplicates) { + hash_table = new_hash_table(hash_table_size); } - char regexp[buffer_size]=""; - int regexp_point; - regexp_point = 0; + // if(i == argc && !input_filename[0]) { + // cerr << "You must provide a filename." << endl; + // exit(1); + // } - initscr(); + if(input_filename[0]) { + read_file(input_filename, + nb_lines_max, &nb_lines, lines, + hash_table_size, hash_table); + } - if(!has_colors()) { - cerr << "No colors." << endl; - return 1; + while(i < argc) { + read_file(argv[i], + nb_lines_max, &nb_lines, lines, + hash_table_size, hash_table); + i++; + } + + delete[] hash_table; + + // Now remove the null strings + + int n = 0; + for(int k = 0; k < nb_lines; k++) { + if(lines[k]) { + lines[n++] = lines[k]; + } + } + + nb_lines = n; + + if(inverse_order) { + for(int i = 0; i < nb_lines / 2; i++) { + char *s = lines[nb_lines - 1 - i]; + lines[nb_lines - 1 - i] = lines[i]; + lines[i] = s; + } } + char pattern[buffer_size]; + pattern[0] = '\0'; + int cursor_position; + cursor_position = 0; + + ////////////////////////////////////////////////////////////////////// + // Here we start to display with curse + + initscr(); + noecho(); - curs_set(0); + + // Hide the cursor + // curs_set(0); + + // So that the arrow keys work keypad(stdscr, TRUE); - start_color(); - init_pair(1, COLOR_WHITE, COLOR_BLACK); - init_pair(2, COLOR_BLACK, COLOR_YELLOW); + if(with_colors) { + if(has_colors()) { + start_color(); + if(color_fg_modeline < 0 || color_fg_modeline >= COLORS || + color_bg_modeline < 0 || color_bg_modeline >= COLORS || + color_fg_highlight < 0 || color_bg_highlight >= COLORS || + color_bg_highlight < 0 || color_bg_highlight >= COLORS) { + echo(); + // curs_set(1); + endwin(); + cerr << "Color numbers have to be between 0 and " << COLORS - 1 << "." << endl; + exit(1); + } + init_pair(COLOR_MODELINE , color_fg_modeline, color_bg_modeline); + init_pair(COLOR_HIGHLIGHTED_LINE, color_fg_highlight, color_bg_highlight); + } else { + with_colors = 0; + } + } int key; + int current_line = 0, temporary_line = 0; - int line = 0; - - update_screen(&line, 0, - nb_lines, lines, - regexp, noblink); + update_screen(¤t_line, &temporary_line, 0, nb_lines, lines, cursor_position, pattern); do { @@ -237,47 +861,125 @@ int main(int argc, char **argv) { int motion = 0; - if(key >= ' ' && key <= 'z') { - regexp[regexp_point++] = key; - regexp[regexp_point] = '\0'; + if(key >= ' ' && key <= '~') { // Insert character + insert_char(pattern, &cursor_position, key); } - else if(key == KEY_BACKSPACE || key == KEY_DC) { - if(regexp_point > 0) { - regexp_point--; - regexp[regexp_point] = '\0'; - } + else if(key == KEY_BACKSPACE || + key == '\010' || // ^H + key == '\177') { // ^? + backspace_char(pattern, &cursor_position); } - else if(key == KEY_UP || key == '') { - motion = -1; + else if(key == KEY_DC || + key == '\004') { // ^D + delete_char(pattern, &cursor_position); + } + + else if(key == KEY_HOME) { + current_line = 0; + } + + else if(key == KEY_END) { + current_line = nb_lines - 1; + } + + else if(key == KEY_NPAGE) { + motion = 10; + } + + else if(key == KEY_PPAGE) { + motion = -10; } - else if(key == KEY_DOWN || key == '') { + else if(key == KEY_DOWN || + key == '\016') { // ^N motion = 1; } - update_screen(&line, motion, nb_lines, lines, regexp, noblink); - } while(key != '\n' && key != KEY_ENTER && key != ''); + else if(key == KEY_UP || + key == '\020') { // ^P + motion = -1; + } + + else if(key == KEY_LEFT || + key == '\002') { // ^B + if(cursor_position > 0) cursor_position--; + } + + else if(key == KEY_RIGHT || + key == '\006') { // ^F + if(pattern[cursor_position]) cursor_position++; + } + + else if(key == '\001') { // ^A + cursor_position = 0; + } + + else if(key == '\005') { // ^E + cursor_position = strlen(pattern); + } + + else if(key == '\022') { // ^R + use_regexp = !use_regexp; + } + + else if(key == '\011') { // ^I + case_sensitive = !case_sensitive; + } + + else if(key == '\025') { // ^U + kill_before_cursor(pattern, &cursor_position); + } + + else if(key == '\013') { // ^K + kill_after_cursor(pattern, &cursor_position); + } + + update_screen(¤t_line, &temporary_line, motion, + nb_lines, lines, cursor_position, pattern); + + } while(key != '\n' && key != KEY_ENTER && key != '\007'); // ^G echo(); - curs_set(1); + // curs_set(1); endwin(); - // ofstream out("/tmp/selector.out"); - // if(key == KEY_ENTER || key == '\n') { - // out << lines[highlighted_line] << endl; - // } else { - // out << endl; - // } - // out.flush(); + ////////////////////////////////////////////////////////////////////// + // Here we come back to standard display + + if((key == KEY_ENTER || key == '\n')) { + + if(output_to_vt_buffer) { + if(temporary_line >= 0 && temporary_line < nb_lines) { + inject_into_tty_buffer(lines[temporary_line]); + } + } + + if(output_filename[0]) { + ofstream out(output_filename); + if(out.fail()) { + cerr << "Can not open " << output_filename << " for writing." << endl; + exit(1); + } else { + if(temporary_line >= 0 && temporary_line < nb_lines) { + out << lines[temporary_line] << endl; + } else { + out << endl; + } + } + out.flush(); + } + } else { + cout << "Aborted." << endl; + } for(int l = 0; l < nb_lines; l++) { delete[] lines[l]; } - log->flush(); - delete log; + delete[] lines; + delete[] title; - return 0; + exit(0); }