console_ops.c

Go to the documentation of this file.

/*
 * $Id: console_ops.c 37650 2011-06-20 03:10:02Z campbellbarton $
 *
 * ***** BEGIN GPL LICENSE BLOCK *****
 *
 * This program is free software; you can redistribute it and/or
 * modify it under the terms of the GNU General Public License
 * as published by the Free Software Foundation; either version 2
 * of the License, or (at your option) any later version.
 *
 * 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, write to the Free Software Foundation,
 * Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301, USA.
 *
 * Contributor(s): Campbell Barton
 *
 * ***** END GPL LICENSE BLOCK *****
 */

#include <stdlib.h>
#include <string.h>
#include <ctype.h> /* ispunct */
#include <sys/stat.h>

#include "MEM_guardedalloc.h"

#include "DNA_userdef_types.h"

#include "BLI_blenlib.h"
#include "BLI_dynstr.h"
#include "BLI_utildefines.h"

#include "BKE_context.h"
#include "BKE_text.h" /* only for character utility funcs */

#include "WM_api.h"
#include "WM_types.h"

#include "UI_view2d.h"
#include "ED_screen.h"

#include "RNA_access.h"
#include "RNA_define.h"

#include "console_intern.h"

static void console_textview_update_rect(SpaceConsole *sc, ARegion *ar)
{
        View2D *v2d= &ar->v2d;

        UI_view2d_totRect_set(v2d, ar->winx-1, console_textview_height(sc, ar));
}

static void console_select_offset(SpaceConsole *sc, const int offset)
{
        sc->sel_start += offset;
        sc->sel_end += offset;
}

void console_history_free(SpaceConsole *sc, ConsoleLine *cl)
{
        BLI_remlink(&sc->history, cl);
        MEM_freeN(cl->line);
        MEM_freeN(cl);
}
void console_scrollback_free(SpaceConsole *sc, ConsoleLine *cl)
{
        BLI_remlink(&sc->scrollback, cl);
        MEM_freeN(cl->line);
        MEM_freeN(cl);
}

static void console_scrollback_limit(SpaceConsole *sc)
{
        int tot;
        
        if (U.scrollback < 32) U.scrollback= 256; // XXX - save in user defaults
        
        for(tot= BLI_countlist(&sc->scrollback); tot > U.scrollback; tot--)
                console_scrollback_free(sc, sc->scrollback.first);
}

static ConsoleLine * console_history_find(SpaceConsole *sc, const char *str, ConsoleLine *cl_ignore)
{
        ConsoleLine *cl;

        for(cl= sc->history.last; cl; cl= cl->prev) {
                if (cl==cl_ignore)
                        continue;

                if(strcmp(str, cl->line)==0)
                        return cl;
        }

        return NULL;
}

/* return 0 if no change made, clamps the range */
static int console_line_cursor_set(ConsoleLine *cl, int cursor)
{
        int cursor_new;
        
        if(cursor < 0)                          cursor_new= 0;
        else if(cursor > cl->len)       cursor_new= cl->len;
        else                                            cursor_new= cursor;
        
        if(cursor_new == cl->cursor)
                return 0;
        
        cl->cursor= cursor_new;
        return 1;
}

static char cursor_char(ConsoleLine *cl)
{
        /* assume cursor is clamped */
        return cl->line[cl->cursor];
}

static char cursor_char_prev(ConsoleLine *cl)
{
        /* assume cursor is clamped */
        if(cl->cursor <= 0)
                return '\0';

        return cl->line[cl->cursor-1];
}

#if 0 // XXX unused 
static char cursor_char_next(ConsoleLine *cl)
{
        /* assume cursor is clamped */
        if(cl->cursor + 1 >= cl->len)
                return '\0';

        return cl->line[cl->cursor+1];
}

static void console_lb_debug__internal(ListBase *lb)
{
        ConsoleLine *cl;

        printf("%d: ", BLI_countlist(lb));
        for(cl= lb->first; cl; cl= cl->next)
                printf("<%s> ", cl->line);
        printf("\n");

}

static void console_history_debug(const bContext *C)
{
        SpaceConsole *sc= CTX_wm_space_console(C);

        
        console_lb_debug__internal(&sc->history);
}
#endif

static ConsoleLine *console_lb_add__internal(ListBase *lb, ConsoleLine *from)
{
        ConsoleLine *ci= MEM_callocN(sizeof(ConsoleLine), "ConsoleLine Add");
        
        if(from) {
                ci->line= BLI_strdup(from->line);
                ci->len= strlen(ci->line);
                ci->len_alloc= ci->len;
                
                ci->cursor= from->cursor;
                ci->type= from->type;
        } else {
                ci->line= MEM_callocN(64, "console-in-line");
                ci->len_alloc= 64;
                ci->len= 0;
        }
        
        BLI_addtail(lb, ci);
        return ci;
}

static ConsoleLine *console_history_add(const bContext *C, ConsoleLine *from)
{
        SpaceConsole *sc= CTX_wm_space_console(C);
        
        return console_lb_add__internal(&sc->history, from);
}

#if 0 /* may use later ? */
static ConsoleLine *console_scrollback_add(const bContext *C, ConsoleLine *from)
{
        SpaceConsole *sc= CTX_wm_space_console(C);
        
        return console_lb_add__internal(&sc->scrollback, from);
}
#endif

static ConsoleLine *console_lb_add_str__internal(ListBase *lb, char *str, int own)
{
        ConsoleLine *ci= MEM_callocN(sizeof(ConsoleLine), "ConsoleLine Add");
        if(own)         ci->line= str;
        else            ci->line= BLI_strdup(str);
        
        ci->len = ci->len_alloc = strlen(str);
        
        BLI_addtail(lb, ci);
        return ci;
}
ConsoleLine *console_history_add_str(SpaceConsole *sc, char *str, int own)
{
        return console_lb_add_str__internal(&sc->history, str, own);
}
ConsoleLine *console_scrollback_add_str(SpaceConsole *sc, char *str, int own)
{
        ConsoleLine *ci= console_lb_add_str__internal(&sc->scrollback, str, own);
        console_select_offset(sc, ci->len + 1);
        return ci;
}

ConsoleLine *console_history_verify(const bContext *C)
{
        SpaceConsole *sc= CTX_wm_space_console(C);
        ConsoleLine *ci= sc->history.last;
        if(ci==NULL)
                ci= console_history_add(C, NULL);
        
        return ci;
}


static void console_line_verify_length(ConsoleLine *ci, int len)
{
        /* resize the buffer if needed */
        if(len >= ci->len_alloc) {
                int new_len= len * 2; /* new length */
                char *new_line= MEM_callocN(new_len, "console line");
                memcpy(new_line, ci->line, ci->len);
                MEM_freeN(ci->line);
                
                ci->line= new_line;
                ci->len_alloc= new_len;
        }
}

static int console_line_insert(ConsoleLine *ci, char *str)
{
        int len = strlen(str);
        
        if(len>0 && str[len-1]=='\n') {/* stop new lines being pasted at the end of lines */
                str[len-1]= '\0';
                len--;
        }

        if(len==0)
                return 0;
        
        console_line_verify_length(ci, len + ci->len);
        
        memmove(ci->line+ci->cursor+len, ci->line+ci->cursor, (ci->len - ci->cursor)+1);
        memcpy(ci->line+ci->cursor, str, len);
        
        ci->len += len;
        ci->cursor += len;
        
        return len;
}

/* static funcs for text editing */

/* similar to the text editor, with some not used. keep compatible */
static EnumPropertyItem move_type_items[]= {
        {LINE_BEGIN, "LINE_BEGIN", 0, "Line Begin", ""},
        {LINE_END, "LINE_END", 0, "Line End", ""},
        {PREV_CHAR, "PREVIOUS_CHARACTER", 0, "Previous Character", ""},
        {NEXT_CHAR, "NEXT_CHARACTER", 0, "Next Character", ""},
        {PREV_WORD, "PREVIOUS_WORD", 0, "Previous Word", ""},
        {NEXT_WORD, "NEXT_WORD", 0, "Next Word", ""},
        {0, NULL, 0, NULL, NULL}};

static int move_exec(bContext *C, wmOperator *op)
{
        ConsoleLine *ci= console_history_verify(C);
        
        int type= RNA_enum_get(op->ptr, "type");
        int done= 0;
        
        switch(type) {
        case LINE_BEGIN:
                done= console_line_cursor_set(ci, 0);
                break;
        case LINE_END:
                done= console_line_cursor_set(ci, INT_MAX);
                break;
        case PREV_CHAR:
                done= console_line_cursor_set(ci, ci->cursor-1);
                break;
        case NEXT_CHAR:
                done= console_line_cursor_set(ci, ci->cursor+1);
                break;

        /* - if the character is a delimiter then skip delimiters (including white space)
         * - when jump over the word */
        case PREV_WORD:
                while(text_check_delim(cursor_char_prev(ci)))
                        if(console_line_cursor_set(ci, ci->cursor-1)==FALSE)
                                break;

                while(text_check_delim(cursor_char_prev(ci))==FALSE)
                        if(console_line_cursor_set(ci, ci->cursor-1)==FALSE)
                                break;

                /* This isnt used for NEXT_WORD because when going back
                 * its more useful to have the cursor directly after a word then whitespace */
                while(text_check_whitespace(cursor_char_prev(ci))==TRUE)
                        if(console_line_cursor_set(ci, ci->cursor-1)==FALSE)
                                break;

                done= 1; /* assume changed */
                break;
        case NEXT_WORD:
                while(text_check_delim(cursor_char(ci))==TRUE)
                        if (console_line_cursor_set(ci, ci->cursor+1)==FALSE)
                                break;

                while(text_check_delim(cursor_char(ci))==FALSE)
                        if (console_line_cursor_set(ci, ci->cursor+1)==FALSE)
                                break;

                done= 1; /* assume changed */
                break;
        }
        
        if(done) {
                ED_area_tag_redraw(CTX_wm_area(C));
        }
        
        return OPERATOR_FINISHED;
}

void CONSOLE_OT_move(wmOperatorType *ot)
{
        /* identifiers */
        ot->name= "Move Cursor";
        ot->description= "Move cursor position";
        ot->idname= "CONSOLE_OT_move";
        
        /* api callbacks */
        ot->exec= move_exec;
        ot->poll= ED_operator_console_active;

        /* properties */
        RNA_def_enum(ot->srna, "type", move_type_items, LINE_BEGIN, "Type", "Where to move cursor to.");
}

#define TAB_LENGTH 4
static int insert_exec(bContext *C, wmOperator *op)
{
        SpaceConsole *sc= CTX_wm_space_console(C);
        ARegion *ar= CTX_wm_region(C);
        ConsoleLine *ci= console_history_verify(C);
        char *str= RNA_string_get_alloc(op->ptr, "text", NULL, 0);
        int len;

        // XXX, alligned tab key hack
        if(str[0]=='\t' && str[1]=='\0') {
                len= TAB_LENGTH - (ci->cursor % TAB_LENGTH);
                MEM_freeN(str);
                str= MEM_mallocN(len + 1, "insert_exec");
                memset(str, ' ', len);
                str[len]= '\0';
        }

        len= console_line_insert(ci, str);
        
        MEM_freeN(str);
        
        if(len==0) {
                return OPERATOR_CANCELLED;
        }
        else {
                console_select_offset(sc, len);
        }

        console_textview_update_rect(sc, ar);
        ED_area_tag_redraw(CTX_wm_area(C));
        
        return OPERATOR_FINISHED;
}

static int insert_invoke(bContext *C, wmOperator *op, wmEvent *event)
{
        // if(!RNA_property_is_set(op->ptr, "text")) { /* always set from keymap XXX */
        if(!RNA_string_length(op->ptr, "text")) {
                /* if alt/ctrl/super are pressed pass through */
                if(event->ctrl || event->oskey) {
                        return OPERATOR_PASS_THROUGH;
                }
                else {
                        char str[2];
                        str[0]= event->ascii;
                        str[1]= '\0';

                        RNA_string_set(op->ptr, "text", str);
                }
        }
        return insert_exec(C, op);
}

void CONSOLE_OT_insert(wmOperatorType *ot)
{
        /* identifiers */
        ot->name= "Insert";
        ot->description= "Insert text at cursor position";
        ot->idname= "CONSOLE_OT_insert";
        
        /* api callbacks */
        ot->exec= insert_exec;
        ot->invoke= insert_invoke;
        ot->poll= ED_operator_console_active;

        /* properties */
        RNA_def_string(ot->srna, "text", "", 0, "Text", "Text to insert at the cursor position.");
}


static EnumPropertyItem delete_type_items[]= {
        {DEL_NEXT_CHAR, "NEXT_CHARACTER", 0, "Next Character", ""},
        {DEL_PREV_CHAR, "PREVIOUS_CHARACTER", 0, "Previous Character", ""},
//      {DEL_NEXT_WORD, "NEXT_WORD", 0, "Next Word", ""},
//      {DEL_PREV_WORD, "PREVIOUS_WORD", 0, "Previous Word", ""},
        {0, NULL, 0, NULL, NULL}};

static int delete_exec(bContext *C, wmOperator *op)
{
        SpaceConsole *sc= CTX_wm_space_console(C);
        ARegion *ar= CTX_wm_region(C);
        ConsoleLine *ci= console_history_verify(C);

        const short type= RNA_enum_get(op->ptr, "type");
        int done = 0;
        
        if(ci->len==0) {
                return OPERATOR_CANCELLED;
        }
        
        switch(type) {
        case DEL_NEXT_CHAR:
                if(ci->cursor < ci->len) {
                        memmove(ci->line + ci->cursor, ci->line + ci->cursor+1, (ci->len - ci->cursor)+1);
                        ci->len--;
                        done= 1;
                }
                break;
        case DEL_PREV_CHAR:
                if(ci->cursor > 0) {
                        ci->cursor--; /* same as above */
                        memmove(ci->line + ci->cursor, ci->line + ci->cursor+1, (ci->len - ci->cursor)+1);
                        ci->len--;
                        done= 1;
                }
                break;
        }
        
        if(!done) {
                return OPERATOR_CANCELLED;
        }
        else {
                console_select_offset(sc, -1);
        }

        console_textview_update_rect(sc, ar);
        ED_area_tag_redraw(CTX_wm_area(C));
        
        return OPERATOR_FINISHED;
}


void CONSOLE_OT_delete(wmOperatorType *ot)
{
        /* identifiers */
        ot->name= "Delete";
        ot->description= "Delete text by cursor position";
        ot->idname= "CONSOLE_OT_delete";
        
        /* api callbacks */
        ot->exec= delete_exec;
        ot->poll= ED_operator_console_active;

        /* properties */
        RNA_def_enum(ot->srna, "type", delete_type_items, DEL_NEXT_CHAR, "Type", "Which part of the text to delete.");
}


/* the python exec operator uses this */
static int clear_exec(bContext *C, wmOperator *op)
{
        SpaceConsole *sc= CTX_wm_space_console(C);
        ARegion *ar= CTX_wm_region(C);
        
        short scrollback= RNA_boolean_get(op->ptr, "scrollback");
        short history= RNA_boolean_get(op->ptr, "history");
        
        /*ConsoleLine *ci= */ console_history_verify(C);
        
        if(scrollback) { /* last item in mistory */
                while(sc->scrollback.first)
                        console_scrollback_free(sc, sc->scrollback.first);
        }
        
        if(history) {
                while(sc->history.first)
                        console_history_free(sc, sc->history.first);
        }

        console_textview_update_rect(sc, ar);
        ED_area_tag_redraw(CTX_wm_area(C));

        return OPERATOR_FINISHED;
}

void CONSOLE_OT_clear(wmOperatorType *ot)
{
        /* identifiers */
        ot->name= "Clear";
        ot->description= "Clear text by type";
        ot->idname= "CONSOLE_OT_clear";
        
        /* api callbacks */
        ot->exec= clear_exec;
        ot->poll= ED_operator_console_active;
        
        /* properties */
        RNA_def_boolean(ot->srna, "scrollback", 1, "Scrollback", "Clear the scrollback history");
        RNA_def_boolean(ot->srna, "history", 0, "History", "Clear the command history");
}



/* the python exec operator uses this */
static int history_cycle_exec(bContext *C, wmOperator *op)
{
        SpaceConsole *sc= CTX_wm_space_console(C);
        ARegion *ar= CTX_wm_region(C);

        ConsoleLine *ci= console_history_verify(C); /* TODO - stupid, just prevernts crashes when no command line */
        short reverse= RNA_boolean_get(op->ptr, "reverse"); /* assumes down, reverse is up */
        int prev_len= ci->len;

        /* keep a copy of the line above so when history is cycled
         * this is the only function that needs to know about the double-up */
        if(ci->prev) {
                ConsoleLine *ci_prev= (ConsoleLine *)ci->prev;

                if(strcmp(ci->line, ci_prev->line)==0)
                        console_history_free(sc, ci_prev);
        }

        if(reverse) { /* last item in mistory */
                ci= sc->history.last;
                BLI_remlink(&sc->history, ci);
                BLI_addhead(&sc->history, ci);
        }
        else {
                ci= sc->history.first;
                BLI_remlink(&sc->history, ci);
                BLI_addtail(&sc->history, ci);
        }

        {       /* add a duplicate of the new arg and remove all other instances */
                ConsoleLine *cl;
                while((cl= console_history_find(sc, ci->line, ci)))
                        console_history_free(sc, cl);

                console_history_add(C, (ConsoleLine *)sc->history.last);
        }
        
        ci= sc->history.last;
        console_select_offset(sc, ci->len - prev_len);

        /* could be wrapped so update scroll rect */
        console_textview_update_rect(sc, ar);
        ED_area_tag_redraw(CTX_wm_area(C));

        return OPERATOR_FINISHED;
}

void CONSOLE_OT_history_cycle(wmOperatorType *ot)
{
        /* identifiers */
        ot->name= "History Cycle";
        ot->description= "Cycle through history";
        ot->idname= "CONSOLE_OT_history_cycle";
        
        /* api callbacks */
        ot->exec= history_cycle_exec;
        ot->poll= ED_operator_console_active;
        
        /* properties */
        RNA_def_boolean(ot->srna, "reverse", 0, "Reverse", "reverse cycle history");
}


/* the python exec operator uses this */
static int history_append_exec(bContext *C, wmOperator *op)
{
        SpaceConsole *sc= CTX_wm_space_console(C);
        ScrArea *sa= CTX_wm_area(C);
        ConsoleLine *ci= console_history_verify(C);
        char *str= RNA_string_get_alloc(op->ptr, "text", NULL, 0); /* own this text in the new line, dont free */
        int cursor= RNA_int_get(op->ptr, "current_character");
        short rem_dupes= RNA_boolean_get(op->ptr, "remove_duplicates");
        int prev_len= ci->len;

        if(rem_dupes) {
                ConsoleLine *cl;

                while((cl= console_history_find(sc, ci->line, ci)))
                        console_history_free(sc, cl);

                if(strcmp(str, ci->line)==0) {
                        MEM_freeN(str);
                        return OPERATOR_FINISHED;
                }
        }

        ci= console_history_add_str(sc, str, 1); /* own the string */
        console_select_offset(sc, ci->len - prev_len);
        console_line_cursor_set(ci, cursor);

        ED_area_tag_redraw(sa);

        return OPERATOR_FINISHED;
}

void CONSOLE_OT_history_append(wmOperatorType *ot)
{
        /* identifiers */
        ot->name= "History Append";
        ot->description= "Append history at cursor position";
        ot->idname= "CONSOLE_OT_history_append";
        
        /* api callbacks */
        ot->exec= history_append_exec;
        ot->poll= ED_operator_console_active;
        
        /* properties */
        RNA_def_string(ot->srna, "text", "", 0, "Text", "Text to insert at the cursor position.");      
        RNA_def_int(ot->srna, "current_character", 0, 0, INT_MAX, "Cursor", "The index of the cursor.", 0, 10000);
        RNA_def_boolean(ot->srna, "remove_duplicates", 0, "Remove Duplicates", "Remove duplicate items in the history");
}


/* the python exec operator uses this */
static int scrollback_append_exec(bContext *C, wmOperator *op)
{
        SpaceConsole *sc= CTX_wm_space_console(C);
        ARegion *ar= CTX_wm_region(C);
        ConsoleLine *ci;
        
        char *str= RNA_string_get_alloc(op->ptr, "text", NULL, 0); /* own this text in the new line, dont free */
        int type= RNA_enum_get(op->ptr, "type");

        console_history_verify(C);
        
        ci= console_scrollback_add_str(sc, str, 1); /* own the string */
        ci->type= type;
        
        console_scrollback_limit(sc);

        console_textview_update_rect(sc, ar);
        ED_area_tag_redraw(CTX_wm_area(C));
        
        return OPERATOR_FINISHED;
}

void CONSOLE_OT_scrollback_append(wmOperatorType *ot)
{
        /* defined in DNA_space_types.h */
        static EnumPropertyItem console_line_type_items[] = {
                {CONSOLE_LINE_OUTPUT,   "OUTPUT", 0, "Output", ""},
                {CONSOLE_LINE_INPUT,    "INPUT", 0, "Input", ""},
                {CONSOLE_LINE_INFO,             "INFO", 0, "Information", ""},
                {CONSOLE_LINE_ERROR,    "ERROR", 0, "Error", ""},
                {0, NULL, 0, NULL, NULL}};

        /* identifiers */
        ot->name= "Scrollback Append";
        ot->description= "Append scrollback text by type";
        ot->idname= "CONSOLE_OT_scrollback_append";
        
        /* api callbacks */
        ot->exec= scrollback_append_exec;
        ot->poll= ED_operator_console_active;
        
        /* properties */
        RNA_def_string(ot->srna, "text", "", 0, "Text", "Text to insert at the cursor position.");      
        RNA_def_enum(ot->srna, "type", console_line_type_items, CONSOLE_LINE_OUTPUT, "Type", "Console output type.");
}


static int copy_exec(bContext *C, wmOperator *UNUSED(op))
{
        SpaceConsole *sc= CTX_wm_space_console(C);

        DynStr *buf_dyn= BLI_dynstr_new();
        char *buf_str;
        
        ConsoleLine *cl;
        int sel[2];
        int offset= 0;

        ConsoleLine cl_dummy= {NULL};

#if 0
        /* copy whole file */
        for(cl= sc->scrollback.first; cl; cl= cl->next) {
                BLI_dynstr_append(buf_dyn, cl->line);
                BLI_dynstr_append(buf_dyn, "\n");
        }
#endif

        if(sc->sel_start == sc->sel_end)
                return OPERATOR_CANCELLED;

        console_scrollback_prompt_begin(sc, &cl_dummy);

        for(cl= sc->scrollback.first; cl; cl= cl->next) {
                offset += cl->len + 1;
        }

        if(offset==0) {
                console_scrollback_prompt_end(sc, &cl_dummy);
                return OPERATOR_CANCELLED;
        }

        offset -= 1;
        sel[0]= offset - sc->sel_end;
        sel[1]= offset - sc->sel_start;

        for(cl= sc->scrollback.first; cl; cl= cl->next) {
                if(sel[0] <= cl->len && sel[1] >= 0) {
                        int sta= MAX2(sel[0], 0);
                        int end= MIN2(sel[1], cl->len);

                        if(BLI_dynstr_get_len(buf_dyn))
                                BLI_dynstr_append(buf_dyn, "\n");

                        BLI_dynstr_nappend(buf_dyn, cl->line + sta, end - sta);
                }

                sel[0] -= cl->len + 1;
                sel[1] -= cl->len + 1;
        }

        buf_str= BLI_dynstr_get_cstring(buf_dyn);

        BLI_dynstr_free(buf_dyn);
        WM_clipboard_text_set(buf_str, 0);

        MEM_freeN(buf_str);

        console_scrollback_prompt_end(sc, &cl_dummy);

        return OPERATOR_FINISHED;
}

void CONSOLE_OT_copy(wmOperatorType *ot)
{
        /* identifiers */
        ot->name= "Copy to Clipboard";
        ot->description= "Copy selected text to clipboard";
        ot->idname= "CONSOLE_OT_copy";

        /* api callbacks */
        ot->poll= ED_operator_console_active;
        ot->exec= copy_exec;

        /* properties */
}

static int paste_exec(bContext *C, wmOperator *UNUSED(op))
{
        SpaceConsole *sc= CTX_wm_space_console(C);
        ARegion *ar= CTX_wm_region(C);
        ConsoleLine *ci= console_history_verify(C);

        char *buf_str= WM_clipboard_text_get(0);
        char *buf_step, *buf_next;

        if(buf_str==NULL)
                return OPERATOR_CANCELLED;

        buf_step= buf_str;

        while((buf_next=buf_step) && buf_next[0] != '\0') {
                buf_step= strchr(buf_next, '\n');
                if(buf_step) {
                        *buf_step= '\0';
                        buf_step++;
                }

                if(buf_next != buf_str) {
                        WM_operator_name_call(C, "CONSOLE_OT_execute", WM_OP_EXEC_DEFAULT, NULL);
                        ci= console_history_verify(C);
                }

                console_select_offset(sc, console_line_insert(ci, buf_next));
        }

        MEM_freeN(buf_str);

        console_textview_update_rect(sc, ar);
        ED_area_tag_redraw(CTX_wm_area(C));

        return OPERATOR_FINISHED;
}

void CONSOLE_OT_paste(wmOperatorType *ot)
{
        /* identifiers */
        ot->name= "Paste from Clipboard";
        ot->description= "Paste text from clipboard";
        ot->idname= "CONSOLE_OT_paste";

        /* api callbacks */
        ot->poll= ED_operator_console_active;
        ot->exec= paste_exec;

        /* properties */
}

typedef struct SetConsoleCursor {
        int sel_old[2];
        int sel_init;
} SetConsoleCursor;

// TODO, cursor placement without selection
static void set_cursor_to_pos(SpaceConsole *sc, ARegion *ar, SetConsoleCursor *scu, int mval[2], int UNUSED(sel))
{
        int pos;
        pos= console_char_pick(sc, ar, mval);

        if(scu->sel_init == INT_MAX) {
                scu->sel_init= pos;
                sc->sel_start = sc->sel_end = pos;
                return;
        }

        if (pos < scu->sel_init) {
                sc->sel_start = pos;
                sc->sel_end = scu->sel_init;
        }
        else if (pos > sc->sel_start) {
                sc->sel_start = scu->sel_init;
                sc->sel_end = pos;
        }
        else {
                sc->sel_start = sc->sel_end = pos;
        }
}

static void console_modal_select_apply(bContext *C, wmOperator *op, wmEvent *event)
{
        SpaceConsole *sc= CTX_wm_space_console(C);
        ARegion *ar= CTX_wm_region(C);
        SetConsoleCursor *scu= op->customdata;
        int mval[2];
        int sel_prev[2];

        mval[0]= event->mval[0];
        mval[1]= event->mval[1];

        sel_prev[0]= sc->sel_start;
        sel_prev[1]= sc->sel_end;
        
        set_cursor_to_pos(sc, ar, scu, mval, TRUE);

        /* only redraw if the selection changed */
        if(sel_prev[0] != sc->sel_start || sel_prev[1] != sc->sel_end) {
                ED_area_tag_redraw(CTX_wm_area(C));
        }
}

static void set_cursor_exit(bContext *UNUSED(C), wmOperator *op)
{
//      SpaceConsole *sc= CTX_wm_space_console(C);
        SetConsoleCursor *scu= op->customdata;

        /*
        if(txt_has_sel(text)) {
                buffer = txt_sel_to_buf(text);
                WM_clipboard_text_set(buffer, 1);
                MEM_freeN(buffer);
        }*/

        MEM_freeN(scu);
}

static int console_modal_select_invoke(bContext *C, wmOperator *op, wmEvent *event)
{
        SpaceConsole *sc= CTX_wm_space_console(C);
//      ARegion *ar= CTX_wm_region(C);
        SetConsoleCursor *scu;

        op->customdata= MEM_callocN(sizeof(SetConsoleCursor), "SetConsoleCursor");
        scu= op->customdata;

        scu->sel_old[0]= sc->sel_start;
        scu->sel_old[1]= sc->sel_end;

        scu->sel_init = INT_MAX;

        WM_event_add_modal_handler(C, op);

        console_modal_select_apply(C, op, event);

        return OPERATOR_RUNNING_MODAL;
}

static int console_modal_select(bContext *C, wmOperator *op, wmEvent *event)
{
        switch(event->type) {
                case LEFTMOUSE:
                case MIDDLEMOUSE:
                case RIGHTMOUSE:
                        set_cursor_exit(C, op);
                        return OPERATOR_FINISHED;
                case MOUSEMOVE:
                        console_modal_select_apply(C, op, event);
                        break;
        }

        return OPERATOR_RUNNING_MODAL;
}

static int console_modal_select_cancel(bContext *C, wmOperator *op)
{
        set_cursor_exit(C, op);
        return OPERATOR_FINISHED;
}

void CONSOLE_OT_select_set(wmOperatorType *ot)
{
        /* identifiers */
        ot->name= "Set Selection";
        ot->idname= "CONSOLE_OT_select_set";
        ot->description= "Set the console selection";

        /* api callbacks */
        ot->invoke= console_modal_select_invoke;
        ot->modal= console_modal_select;
        ot->cancel= console_modal_select_cancel;
        ot->poll= ED_operator_console_active;
}