summaryrefslogtreecommitdiff
path: root/find.c
blob: 5bddd0e8caf42a7396831c1d25a9a6f6683afdac (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
static void find_open(Ted *ted) {
	if (ted->active_buffer) {
		ted->prev_active_buffer = ted->active_buffer;
		ted->active_buffer = &ted->find_buffer;
		ted->find = true;
	}
}

static void find_close(Ted *ted) {
	ted->find = false;
	ted->active_buffer = ted->prev_active_buffer;
}

static float find_menu_height(Ted *ted) {
	Font *font = ted->font, *font_bold = ted->font_bold;
	float char_height = text_font_char_height(font),
		char_height_bold = text_font_char_height(font_bold);
	Settings const *settings = &ted->settings;
	float padding = settings->padding;

	return char_height_bold + char_height + 2 * padding;
}

#define FIND_MAX_GROUPS 50

static void find_menu_frame(Ted *ted) {
	Font *font = ted->font, *font_bold = ted->font_bold;
	float const char_height = text_font_char_height(font),
		char_height_bold = text_font_char_height(font_bold);

	Settings const *settings = &ted->settings;
	float const padding = settings->padding;
	float const menu_height = find_menu_height(ted);
	float const window_width = ted->window_width, window_height = ted->window_height;
	u32 const *colors = settings->colors;

	bool invalid_search_term = false;
	TextBuffer *buffer = ted->prev_active_buffer;
	assert(buffer);

	String32 term = buffer_get_line(&ted->find_buffer, 0);
	if (term.len) {
		pcre2_match_data *match_data = pcre2_match_data_create(FIND_MAX_GROUPS, NULL);
		if (match_data) {
			PCRE2_SIZE *groups = pcre2_get_ovector_pointer(match_data);
			// compile search term
			int error = 0; PCRE2_SIZE error_pos = 0;
			pcre2_code *code = pcre2_compile(term.str, term.len, PCRE2_LITERAL, &error, &error_pos, NULL);

			// @TODO: scroll to first match
			if (code) {
				for (u32 line_idx = 0, nlines = buffer->nlines; line_idx < nlines; ++line_idx) {
					Line *line = &buffer->lines[line_idx];
					char32_t *str = line->str;
					u32 len = line->len;
					u32 start_index = 0;
					while (start_index < len) {
						int ret = pcre2_match(code, str, len, start_index, 0, match_data, NULL);
						if (ret > 0) {
							u32 match_start = (u32)groups[0];
							u32 match_end = (u32)groups[1];
							BufferPos p1 = {.line = line_idx, .index = match_start};
							BufferPos p2 = {.line = line_idx, .index = match_end};
							v2 pos1 = buffer_pos_to_pixels(buffer, p1);
							v2 pos2 = buffer_pos_to_pixels(buffer, p2);
							pos2.y += char_height;
							gl_geometry_rect(rect4(pos1.x, pos1.y, pos2.x, pos2.y), colors[COLOR_FIND_HL]);
							start_index = match_end;
						} else break;
					}
				}
				pcre2_code_free(code);
			} else {
				invalid_search_term = true;
			}
			pcre2_match_data_free(match_data);
		}
	}

	float x1 = padding, y1 = window_height - menu_height, x2 = window_width - padding, y2 = window_height - padding;
	Rect menu_bounds = rect4(x1, y1, x2, y2);

	gl_geometry_rect_border(menu_bounds, 1, colors[COLOR_BORDER]);


	text_utf8(font_bold, "Find...", x1 + padding, y1, colors[COLOR_TEXT]);
	text_render(font_bold);

	y1 += char_height_bold;

	Rect find_buffer_bounds = rect4(x1 + padding, y1, x2 - padding, y1 + char_height);
	buffer_render(&ted->find_buffer, find_buffer_bounds);

	if (invalid_search_term) {
		gl_geometry_rect(find_buffer_bounds, colors[COLOR_ERROR_BG] & 0xFFFFFF7F);
	}

	gl_geometry_draw();
}


// go to next find result
static void find_next(Ted *ted) {
	TextBuffer *buffer = ted->prev_active_buffer;
	// create match data
	pcre2_match_data *match_data = pcre2_match_data_create(FIND_MAX_GROUPS, NULL);
	if (match_data) {
		String32 term = buffer_get_line(&ted->find_buffer, 0);
		int error = 0;
		PCRE2_SIZE error_pos = 0;
		// compile the search term
		pcre2_code *code = pcre2_compile(term.str, term.len, PCRE2_LITERAL, &error, &error_pos, NULL);
		if (code) {
			// do the searching
			BufferPos pos = buffer->cursor_pos;
			size_t nsearches = 0;
			u32 nlines = buffer->nlines;

			// we need to search the starting line twice, because we might start at a non-zero index
			while (nsearches < nlines + 1) {
				Line *line = &buffer->lines[pos.line];
				char32_t *str = line->str;
				size_t len = line->len;
				int ret = pcre2_match(code, str, len, pos.index, 0, match_data, NULL);
				if (ret > 0) {
					PCRE2_SIZE *groups = pcre2_get_ovector_pointer(match_data);
					u32 match_start = (u32)groups[0];
					u32 match_end = (u32)groups[1];
					BufferPos pos_start = {.line = pos.line, .index = match_start};
					BufferPos pos_end = {.line = pos.line, .index = match_end};
					buffer_cursor_move_to_pos(buffer, pos_start);
					buffer_select_to_pos(buffer, pos_end);
					break;
				}

				++nsearches;
				pos.index = 0;
				pos.line += 1;
				pos.line %= nlines;
			}
			pcre2_code_free(code);
		} else {
			char32_t buf[256] = {0};
			size_t len = (size_t)pcre2_get_error_message(error, buf, sizeof buf - 1);
			char *error_cstr = str32_to_utf8_cstr(str32(buf, len));
			if (error_cstr) {
				ted_seterr(ted, "Invalid search term (position %zu): %s.", (size_t)error_pos, error_cstr);
				free(error_cstr);
			}
		}
		pcre2_match_data_free(match_data);
	} else {
		ted_seterr(ted, "Out of memory.");
	}
}