void enclose_text_action (guint key_id)
{
gint selection_end;
gchar insert_chars [2] = {0, 0};
ScintillaObject *sci_obj;
if (!enclose_enabled)
return;
sci_obj = document_get_current ()->editor->sci;
if (sci_get_selected_text_length (sci_obj) < 2)
return;
key_id -= 4;
selection_end = sci_get_selection_end (sci_obj);
sci_start_undo_action (sci_obj);
insert_chars [0] = *enclose_chars [key_id];
sci_insert_text (sci_obj, sci_get_selection_start (sci_obj), insert_chars);
insert_chars [0] = *(enclose_chars [key_id] + 1);
sci_insert_text (sci_obj, selection_end + 1, insert_chars);
sci_set_current_position (sci_obj, selection_end + 2, TRUE);
sci_end_undo_action (sci_obj);
}
static gboolean tooltip_launch(gpointer gdata)
{
GeanyDocument *doc = document_get_current();
if (doc && utils_source_document(doc) && doc->editor == gdata &&
(debug_state() & DS_SENDABLE))
{
ScintillaObject *sci = doc->editor->sci;
gchar *expr = sci_get_selection_mode(sci) == SC_SEL_STREAM &&
peek_pos >= sci_get_selection_start(sci) &&
peek_pos < sci_get_selection_end(sci) ?
editor_get_default_selection(doc->editor, FALSE, NULL) :
editor_get_word_at_pos(doc->editor, peek_pos, NULL);
if ((expr = utils_verify_selection(expr)) != NULL)
{
g_free(input);
input = debug_send_evaluate('3', scid_gen, expr);
g_free(expr);
}
else
tooltip_set(NULL);
}
else
tooltip_set(NULL);
query_id = 0;
return FALSE;
}
static void
reindent (GeanyDocument *doc,
GrindIndenter *indenter)
{
if (DOC_VALID (doc)) {
int start;
int end;
ScintillaObject *sci = doc->editor->sci;
if (sci_has_selection (sci)) {
start = sci_get_line_from_position (sci, sci_get_selection_start (sci));
end = sci_get_line_from_position (sci, sci_get_selection_end (sci));
} else {
start = 0;
end = sci_get_line_count (sci);
}
if (start != end) {
g_debug ("Using indenter \"%s\" by \"%s\"",
grind_indenter_get_name (indenter),
grind_indenter_get_author (indenter));
sci_start_undo_action (sci);
if (grind_indenter_indent (indenter, doc,
sci_get_position_from_line (sci, start),
sci_get_line_end_position (sci, end))) {
msgwin_status_add ("Reindented \"%s\"", DOC_FILENAME (doc));
}
sci_end_undo_action (sci);
}
}
}
/**
* This function is based on Geany's source but has different meaning: check
* ability to enclose selection. Calls only for selected text so using
* sci_get_selection_start/end is ok here.
* */
static gboolean
lexer_has_braces(ScintillaObject *sci, gint lexer)
{
gint sel_start;
switch (lexer)
{
case SCLEX_CPP:
case SCLEX_D:
case SCLEX_PASCAL:
case SCLEX_TCL:
case SCLEX_CSS:
return TRUE;
case SCLEX_HTML: /* for PHP & JS */
case SCLEX_PERL:
case SCLEX_BASH:
/* PHP, Perl, bash has vars like ${var} */
if (get_lines_selected(sci) > 1)
return TRUE;
sel_start = sci_get_selection_start(sci);
if ('$' == char_at(sci, sel_start - 1))
return FALSE;
return TRUE;
default:
return FALSE;
}
}
static PyObject *
Scintilla_get_selection_start(Scintilla *self)
{
gint pos;
SCI_RET_IF_FAIL(self);
pos = sci_get_selection_start(self->sci);
return Py_BuildValue("i", pos);
}
void sc_speller_check_document(GeanyDocument *doc)
{
gint i;
gint first_line, last_line;
gchar *dict_string = NULL;
gint suggestions_found = 0;
g_return_if_fail(sc_speller_dict != NULL);
g_return_if_fail(doc != NULL);
ui_progress_bar_start(_("Checking"));
enchant_dict_describe(sc_speller_dict, dict_describe, &dict_string);
if (sci_has_selection(doc->editor->sci))
{
first_line = sci_get_line_from_position(
doc->editor->sci, sci_get_selection_start(doc->editor->sci));
last_line = sci_get_line_from_position(
doc->editor->sci, sci_get_selection_end(doc->editor->sci));
if (sc_info->use_msgwin)
msgwin_msg_add(COLOR_BLUE, -1, NULL,
_("Checking file \"%s\" (lines %d to %d using %s):"),
DOC_FILENAME(doc), first_line + 1, last_line + 1, dict_string);
g_message("Checking file \"%s\" (lines %d to %d using %s):",
DOC_FILENAME(doc), first_line + 1, last_line + 1, dict_string);
}
else
{
first_line = 0;
last_line = sci_get_line_count(doc->editor->sci);
if (sc_info->use_msgwin)
msgwin_msg_add(COLOR_BLUE, -1, NULL, _("Checking file \"%s\" (using %s):"),
DOC_FILENAME(doc), dict_string);
g_message("Checking file \"%s\" (using %s):", DOC_FILENAME(doc), dict_string);
}
g_free(dict_string);
if (first_line == last_line)
{
suggestions_found += sc_speller_process_line(doc, first_line);
}
else
{
for (i = first_line; i < last_line; i++)
{
suggestions_found += sc_speller_process_line(doc, i);
/* process other GTK events to keep the GUI being responsive */
while (g_main_context_iteration(NULL, FALSE));
}
}
if (suggestions_found == 0 && sc_info->use_msgwin)
msgwin_msg_add(COLOR_BLUE, -1, NULL, _("The checked text is spelled correctly."));
ui_progress_bar_stop();
}
gboolean on_key_press (GtkWidget *widget, GdkEventKey *event, gpointer user_data)
{
gint selection_end;
gchar insert_chars [4] = {0, 0, 0, 0};
ScintillaObject *sci_obj;
if (!auto_enabled)
return FALSE;
sci_obj = document_get_current ()->editor->sci;
if (sci_get_selected_text_length (sci_obj) < 2)
return FALSE;
switch (event->keyval)
{
case '(':
insert_chars [0] = '(';
insert_chars [2] = ')';
break;
case '[':
insert_chars [0] = '[';
insert_chars [2] = ']';
break;
case '{':
insert_chars [0] = '{';
insert_chars [2] = '}';
break;
case '\'':
insert_chars [0] = '\'';
insert_chars [2] = '\'';
break;
case '\"':
insert_chars [0] = '\"';
insert_chars [2] = '\"';
break;
case '`':
insert_chars [0] = '`';
insert_chars [2] = '`';
break;
default:
return FALSE;
}
selection_end = sci_get_selection_end (sci_obj);
sci_start_undo_action (sci_obj);
sci_insert_text (sci_obj, sci_get_selection_start (sci_obj), insert_chars);
sci_insert_text (sci_obj, selection_end + 1, insert_chars+2);
sci_set_current_position (sci_obj, selection_end + 2, TRUE);
sci_end_undo_action (sci_obj);
return TRUE;
}
static PyObject *
ZenEditor_get_selection_range(ZenEditor *self, PyObject *args)
{
PyObject *result;
ScintillaObject *sci;
print_called();
py_return_none_if_null(sci = ZenEditor_get_scintilla(self));
result = Py_BuildValue("(ii)",
sci_get_selection_start(sci),
sci_get_selection_end(sci));
py_return_none_if_null(result);
return result;
}
static gboolean can_insert_numbers(void)
{
GeanyDocument *doc = document_get_current();
if (doc && !doc->readonly)
{
ScintillaObject *sci = doc->editor->sci;
if (sci_has_selection(sci) && (sci_get_selection_mode(sci) == SC_SEL_RECTANGLE ||
sci_get_selection_mode(sci) == SC_SEL_THIN))
{
start_pos = sci_get_selection_start(sci);
start_line = sci_get_line_from_position(sci, start_pos);
end_pos = sci_get_selection_end(sci);
end_line = sci_get_line_from_position(sci, end_pos);
return end_line - start_line < MAX_LINES;
}
}
return FALSE;
}
static void shift_left_cb(G_GNUC_UNUSED GtkMenuItem *menuitem,
G_GNUC_UNUSED gpointer gdata){
gchar *txt;
gchar *txt_i;
gchar char_before;
gint txt_len;
gint startpos;
gint endpos;
gint startline;
gint endline;
gint line_iter;
gint linepos;
gint linelen;
gint startcol;
gint endcol;
gint i;
gint n_spaces;
gchar *spaces;
ScintillaObject *sci;
/* get a pointer to the scintilla object */
sci = document_get_current()->editor->sci;
if (sci_has_selection(sci)){
startpos = sci_get_selection_start(sci);
endpos = sci_get_selection_end(sci);
/* sanity check -- we dont care which way the block was selected */
if(startpos > endpos){
i = endpos;
endpos = startpos;
startpos = i;
}
startline = sci_get_line_from_position(sci, startpos);
/* Setting also start point for 1st line */
linepos = sci_get_position_from_line(sci, startline);
endline = sci_get_line_from_position(sci, endpos);
/* normal mode */
if(startline == endline){
/* get the text in question */
txt_len = endpos - startpos;
txt_i = g_malloc(txt_len + 1);
txt = g_malloc(txt_len + 2);
sci_get_selected_text(sci, txt_i);
char_before = sci_get_char_at(sci, startpos - 1);
/* set up new text buf */
(void) g_sprintf(txt, "%s%c", txt_i, char_before);
/* start undo */
sci_start_undo_action(sci);
/* put the new text in */
sci_set_selection_start(sci, startpos - 1);
sci_replace_sel(sci, txt);
/* select the right bit again */
sci_set_selection_start(sci, startpos - 1);
sci_set_selection_end(sci, endpos - 1);
/* end undo */
sci_end_undo_action(sci);
g_free(txt);
g_free(txt_i);
}
/* rectangle mode (we hope!) */
else{
startcol = sci_get_col_from_position(sci, startpos);
endcol = sci_get_col_from_position(sci, endpos);
/* return early for the trivial case */
if(startcol == 0 || startcol == endcol){
return;
}
/* start undo */
sci_start_undo_action(sci);
for(line_iter = startline; line_iter <= endline; line_iter++){
linepos = sci_get_position_from_line(sci, line_iter);
linelen = sci_get_line_length(sci, line_iter);
/* do we need to do something */
if(linelen >= startcol - 1 ){
/* if between the two columns */
/* pad to the end first */
if(linelen <= endcol){
/* bung in some spaces -- sorry, I dont like tabs */
n_spaces = endcol - linelen + 1;
spaces = g_malloc(sizeof(gchar) * (n_spaces + 1));
for(i = 0; i < n_spaces; i++){
spaces[i] = ' ';
}
spaces[i] = '\0';
sci_insert_text(sci, linepos + linelen - 1, spaces);
g_free(spaces);
}
/* now move the text itself */
sci_set_selection_mode(sci, 0);
sci_set_selection_start(sci, linepos + startcol);
sci_set_selection_end(sci, linepos + endcol);
txt_len = sci_get_selected_text_length(sci);
txt_i = g_malloc(txt_len + 1);
txt = g_malloc(txt_len + 2);
sci_get_selected_text(sci, txt_i);
char_before = sci_get_char_at(sci, linepos + startcol - 1);
/* set up new text buf */
(void) g_sprintf(txt, "%s%c", txt_i, char_before);
/* put the new text in */
sci_set_selection_start(sci, linepos + startcol - 1);
sci_replace_sel(sci, txt);
g_free(txt);
g_free(txt_i);
}
}
/* put the selection box back */
/* here we rely upon the last result of linepos */
sci_set_selection_mode(sci, 1);
sci_set_selection_start(sci, startpos - 1);
sci_set_selection_end(sci, linepos + endcol - 1);
/* end undo action */
sci_end_undo_action(sci);
}
}
}
static void shift_right_cb(G_GNUC_UNUSED GtkMenuItem *menuitem,
G_GNUC_UNUSED gpointer gdata){
gchar *txt;
gchar *txt_i;
gchar char_after;
gint txt_len;
gint startpos;
gint endpos;
gint startline;
gint endline;
gint line_iter;
gint linepos;
gint linelen;
gint startcol;
gint endcol;
gint i;
ScintillaObject *sci;
/* get a pointer to the scintilla object */
sci = document_get_current()->editor->sci;
if (sci_has_selection(sci)){
startpos = sci_get_selection_start(sci);
endpos = sci_get_selection_end(sci);
/* sanity check -- we dont care which way the block was selected */
if(startpos > endpos){
i = endpos;
endpos = startpos;
startpos = i;
}
startline = sci_get_line_from_position(sci, startpos);
linepos = sci_get_position_from_line(sci, startline);
endline = sci_get_line_from_position(sci, endpos);
/* normal mode */
if(startline == endline){
/* get the text in question */
txt_len = endpos - startpos;
txt_i = g_malloc(txt_len + 1);
txt = g_malloc(txt_len + 2);
sci_get_selected_text(sci, txt_i);
char_after = sci_get_char_at(sci, endpos);
/* set up new text buf */
(void) g_sprintf(txt, "%c%s", char_after, txt_i);
/* start undo */
sci_start_undo_action(sci);
/* put the new text in */
sci_set_selection_end(sci, endpos + 1);
sci_replace_sel(sci, txt);
/* select the right bit again */
sci_set_selection_start(sci, startpos + 1);
sci_set_selection_end(sci, endpos + 1);
/* end undo */
sci_end_undo_action(sci);
g_free(txt);
g_free(txt_i);
}
/* rectangle mode (we hope!) */
else{
startcol = sci_get_col_from_position(sci, startpos);
endcol = sci_get_col_from_position(sci, endpos);
/* start undo */
sci_start_undo_action(sci);
for(line_iter = startline; line_iter <= endline; line_iter++){
linepos = sci_get_position_from_line(sci, line_iter);
linelen = sci_get_line_length(sci, line_iter);
/* do we need to do something */
if(linelen >= startcol - 1 ){
/* if between the two columns or at the end */
/* add in a space */
if(linelen <= endcol || linelen - 1 == endcol){
txt = g_malloc(sizeof(gchar) * 2);
sprintf(txt, " ");
sci_insert_text(sci, linepos + startcol, txt);
g_free(txt);
}
else{
/* move the text itself */
sci_set_selection_mode(sci, 0);
sci_set_selection_start(sci, linepos + startcol);
sci_set_selection_end(sci, linepos + endcol);
txt_len = sci_get_selected_text_length(sci);
txt_i = g_malloc(txt_len + 1);
txt = g_malloc(txt_len + 2);
sci_get_selected_text(sci, txt_i);
char_after = sci_get_char_at(sci, linepos + endcol);
/* set up new text buf */
(void) g_sprintf(txt, "%c%s", char_after, txt_i);
/* put the new text in */
sci_set_selection_end(sci, linepos + endcol + 1);
sci_replace_sel(sci, txt);
g_free(txt);
g_free(txt_i);
}
}
}
/* put the selection box back */
/* here we rely upon the last result of linepos */
sci_set_selection_mode(sci, 1);
sci_set_selection_start(sci, startpos + 1);
sci_set_selection_end(sci, linepos + endcol + 1);
/* end undo action */
sci_end_undo_action(sci);
}
}
}
static void do_format(GeanyDocument *doc, bool entire_doc, bool autof)
{
GString *formatted;
ScintillaObject *sci;
size_t offset = 0, length = 0, sci_len;
size_t cursor_pos, old_first_line, new_first_line, line_delta;
const char *sci_buf;
bool changed = true;
bool was_changed;
if (doc == NULL)
doc = document_get_current();
if (!DOC_VALID(doc))
{
g_warning("Cannot format with no documents open");
return;
}
sci = doc->editor->sci;
was_changed = doc->changed;
// FIXME: instead of failing, ask user to save the document once
if (!doc->real_path)
{
g_warning("Cannot format document that's never been saved");
return;
}
if (!entire_doc)
{
if (sci_has_selection(sci))
{ // format selection
offset = sci_get_selection_start(sci);
length = sci_get_selection_end(sci) - offset;
}
else
{ // format current line
size_t cur_line = sci_get_current_line(sci);
offset = sci_get_position_from_line(sci, cur_line);
length = sci_get_line_end_position(sci, cur_line) - offset;
}
}
else
{ // format entire document
offset = 0;
length = sci_get_length(sci);
}
cursor_pos = sci_get_current_position(sci);
sci_len = sci_get_length(sci);
sci_buf =
(const char *)scintilla_send_message(sci, SCI_GETCHARACTERPOINTER, 0, 0);
formatted = fmt_clang_format(doc->file_name, sci_buf, sci_len, &cursor_pos,
offset, length, false);
// FIXME: handle better
if (formatted == NULL)
return;
if (!autof)
{
changed = (formatted->len != sci_len) ||
(g_strcmp0(formatted->str, sci_buf) != 0);
}
old_first_line = scintilla_send_message(sci, SCI_GETFIRSTVISIBLELINE, 0, 0);
// Replace document text and move cursor to new position
scintilla_send_message(sci, SCI_BEGINUNDOACTION, 0, 0);
scintilla_send_message(sci, SCI_CLEARALL, 0, 0);
scintilla_send_message(sci, SCI_ADDTEXT, formatted->len,
(sptr_t)formatted->str);
scintilla_send_message(sci, SCI_GOTOPOS, cursor_pos, 0);
new_first_line = scintilla_send_message(sci, SCI_GETFIRSTVISIBLELINE, 0, 0);
line_delta = new_first_line - old_first_line;
scintilla_send_message(sci, SCI_LINESCROLL, 0, -line_delta);
scintilla_send_message(sci, SCI_ENDUNDOACTION, 0, 0);
document_set_text_changed(doc, (was_changed || changed));
g_string_free(formatted, true);
}
