+ attroff(attr_modeline);
+
+ // 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 raw_line[buffer_size];
+
+ FILE *file = fopen(input_filename, "r");
+
+ if(!file) {
+ fprintf(stderr, "Can not open `%s'.\n", input_filename);
+ exit(1);
+ }
+
+ int start = 0, end = 0;
+
+ while(*nb_lines < nb_lines_max && (end > start || !feof(file))) {
+ int eol = start;
+ while(eol < end && raw_line[eol] != '\n') eol++;
+
+ if(eol == end) {
+ for(int k = 0; k < end - start; k++) {
+ raw_line[k] = raw_line[k + start];
+ }
+ end -= start;
+ eol -= start;
+ start = 0;
+ end += fread(raw_line + end, sizeof(char), buffer_size - end, file);
+ while(eol < end && raw_line[eol] != '\n') eol++;
+ }
+
+ if(eol == buffer_size) {
+ raw_line[buffer_size - 1] = '\0';
+ fprintf(stderr, "Line too long:\n");
+ fprintf(stderr, raw_line);
+ fprintf(stderr, "\n");
+ exit(1);
+ }
+
+ raw_line[eol] = '\0';
+
+ char *t = raw_line + start;
+
+ // Remove the zsh history prefix
+
+ if(zsh_history && *t == ':') {
+ while(*t && *t != ';') t++;
+ if(*t == ';') t++;
+ }
+
+ // Remove the bash history prefix
+
+ if(bash_history) {
+ while(*t == ' ') t++;
+ while(*t >= '0' && *t <= '9') t++;
+ while(*t == ' ') t++;
+ }
+
+ // Check for duplicates with the hash table and insert the line
+ // in the list if necessary
+
+ int dup;
+
+ if(hash_table) {
+ dup = test_and_add(t, *nb_lines, lines, hash_table, hash_table_size);
+ } else {
+ dup = -1;
+ }
+
+ if(dup < 0) {
+ lines[*nb_lines] = new char[strlen(t) + 1];
+ strcpy(lines[*nb_lines], t);
+ } 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)++;
+
+ start = eol + 1;
+ }
+}
+
+//////////////////////////////////////////////////////////////////////
+
+int main(int argc, char **argv) {
+
+ if(!ttyname(STDIN_FILENO)) {
+ fprintf(stderr, "The standard input is not a tty.\n");
+ 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, "<output filename>");
+ 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>");
+ pattern_separator = argv[i+1][0];
+ i += 2;
+ }
+
+ else if(strcmp(argv[i], "-x") == 0) {
+ check_opt(argc, argv, i, 1, "<label separator>");
+ label_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], "-w") == 0) {
+ add_control_qs = 1;
+ i++;
+ }
+
+ else if(strcmp(argv[i], "-m") == 0) {
+ with_colors = 0;
+ i++;
+ }
+
+ else if(strcmp(argv[i], "-q") == 0) {
+ error_flash = 1;
+ i++;
+ }
+
+ else if(strcmp(argv[i], "-f") == 0) {
+ check_opt(argc, argv, i, 1, "<input filename>");
+ 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, "<title>");
+ 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 {
+ fprintf(stderr, "Unknown option %s.\n", argv[i]);
+ error = 1;
+ }
+ }
+
+ if(show_help || error) {
+ fprintf(stderr, "Selector version %s-R%s\n", VERSION, REVISION_NUMBER);
+ fprintf(stderr, "Written by Francois Fleuret <francois@fleuret.org>.\n");
+ fprintf(stderr, "Usage: %s [options] [<filename1> [<filename2> ...]]\n", argv[0]);
+ fprintf(stderr, "\n");
+ fprintf(stderr, " -h show this help\n");
+ fprintf(stderr, " -v inject the selected line in the tty\n");
+ fprintf(stderr, " -w quote control characters with ^Qs when using -v\n");
+ fprintf(stderr, " -d remove duplicated lines\n");
+ fprintf(stderr, " -b remove the bash history line prefix\n");
+ fprintf(stderr, " -z remove the zsh history line prefix\n");
+ fprintf(stderr, " -i invert the order of lines\n");
+ fprintf(stderr, " -e start in regexp mode\n");
+ fprintf(stderr, " -a start in case sensitive mode\n");
+ fprintf(stderr, " -m monochrome mode\n");
+ fprintf(stderr, " -q make a flash instead of a beep on an edition error\n");
+ fprintf(stderr, " -- all following arguments are filenames\n");
+ fprintf(stderr, " -t <title>\n");
+ fprintf(stderr, " add a title in the modeline\n");
+ fprintf(stderr, " -c <fg modeline> <bg modeline> <fg highlight> <bg highlight>\n");
+ fprintf(stderr, " set the display colors\n");
+ fprintf(stderr, " -o <output filename>\n");
+ fprintf(stderr, " set a file to write the selected line to\n");
+ fprintf(stderr, " -s <pattern separator>\n");
+ fprintf(stderr, " set the symbol to separate substrings in the pattern\n");
+ fprintf(stderr, " -x <label separator>\n");
+ fprintf(stderr, " set the symbol to terminate the label\n");
+ fprintf(stderr, " -l <max number of lines>\n");
+ fprintf(stderr, " set the maximum number of lines to take into account\n");
+ fprintf(stderr, "\n");
+ exit(error);
+ }
+
+ char **lines = new char *[nb_lines_max];
+
+ int nb_lines = 0;
+ int hash_table_size = nb_lines_max * 10;
+ int *hash_table = 0;
+
+ if(remove_duplicates) {
+ hash_table = new_hash_table(hash_table_size);
+ }
+
+ if(input_filename[0]) {
+ read_file(input_filename,
+ nb_lines_max, &nb_lines, lines,
+ hash_table_size, hash_table);
+ }
+
+ 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;
+ }
+ }
+
+ // Build the labels from the strings, take only the part before the
+ // label_separator and transform control characters to printable
+ // ones
+
+ char **labels = new char *[nb_lines];
+ for(int l = 0; l < nb_lines; l++) {
+ char *s, *t;
+ const char *u;
+ t = lines[l];
+ int e = 0;
+ while(*t && *t != label_separator) {
+ u = unctrl(*t++);
+ e += strlen(u);
+ }
+ labels[l] = new char[e + 1];
+ t = lines[l];
+ s = labels[l];
+ while(*t && *t != label_separator) {
+ u = unctrl(*t++);
+ while(*u) { *s++ = *u++; }
+ }
+ *s = '\0';
+ }
+
+ char pattern[buffer_size];
+ pattern[0] = '\0';
+
+ int cursor_position;
+ cursor_position = 0;
+
+ //////////////////////////////////////////////////////////////////////
+ // Here we start to display with curse
+
+ initscr();
+ cbreak();
+ noecho();
+ // nonl();
+ intrflush(stdscr, FALSE);
+
+ // So that the arrow keys work
+ keypad(stdscr, TRUE);
+
+ attr_error = A_STANDOUT;
+ attr_modeline = A_REVERSE;
+ attr_focus_line = A_STANDOUT;
+
+ if(with_colors && 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();
+ endwin();
+ fprintf(stderr, "Color numbers have to be between 0 and %d.\n", COLORS - 1);
+ exit(1);
+ }
+
+ init_pair(1, color_fg_modeline, color_bg_modeline);
+ attr_modeline = COLOR_PAIR(1);
+
+ init_pair(2, color_fg_highlight, color_bg_highlight);
+ attr_focus_line = COLOR_PAIR(2);
+
+ init_pair(3, COLOR_WHITE, COLOR_RED);
+ attr_error = COLOR_PAIR(3);
+
+ }