4 Copyright (C) 1996, 1997, 1998, 2001, 2002, 2003, 2004, 2005, 2006,
6 The Free Software Foundation, Inc.
11 This file is part of the Midnight Commander.
13 The Midnight Commander is free software: you can redistribute it
14 and/or modify it under the terms of the GNU General Public License as
15 published by the Free Software Foundation, either version 3 of the License,
16 or (at your option) any later version.
18 The Midnight Commander is distributed in the hope that it will be useful,
19 but WITHOUT ANY WARRANTY; without even the implied warranty of
20 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
21 GNU General Public License for more details.
23 You should have received a copy of the GNU General Public License
24 along with this program. If not, see <http://www.gnu.org/licenses/>.
28 * \brief Source: editor text drawing
37 #include <sys/types.h>
44 #include "lib/global.h"
45 #include "lib/tty/tty.h" /* tty_printf() */
46 #include "lib/tty/key.h" /* is_idle() */
48 #include "lib/strutil.h" /* utf string functions */
49 #include "lib/util.h" /* is_printable() */
50 #include "lib/widget.h" /* buttonbar_redraw() */
52 #include "lib/charsets.h"
55 #include "src/setup.h" /* edit_tab_spacing */
56 #include "src/main.h" /* macro_index */
58 #include "edit-impl.h"
59 #include "editwidget.h"
61 /*** global variables ****************************************************************************/
63 /* Toggles statusbar draw style */
64 int simple_statusbar
= 0;
66 int visible_tabs
= 1, visible_tws
= 1;
68 /*** file scope macro definitions ****************************************************************/
70 #define MAX_LINE_LEN 1024
73 #define MOD_ABNORMAL (1 << 8)
74 #define MOD_BOLD (1 << 9)
75 #define MOD_MARKED (1 << 10)
76 #define MOD_CURSOR (1 << 11)
77 #define MOD_WHITESPACE (1 << 12)
79 #define edit_move(x,y) widget_move(edit, y, x);
81 #define key_pending(x) (!is_idle())
83 #define EDITOR_MINIMUM_TERMINAL_WIDTH 30
85 /*** file scope type declarations ****************************************************************/
93 /*** file scope variables ************************************************************************/
95 /*** file scope functions ************************************************************************/
96 /* --------------------------------------------------------------------------------------------- */
99 status_string (WEdit
* edit
, char *s
, int w
)
104 * If we are at the end of file, print <EOF>,
105 * otherwise print the current character as is (if printable),
106 * as decimal and as hex.
108 if (edit
->curs1
< edit
->last_byte
)
110 unsigned char cur_byte
= 0;
117 cur_byte
= edit_get_byte (edit
, edit
->curs1
);
119 g_snprintf (byte_str
, sizeof (byte_str
), "%4d 0x%03X",
120 (int) cur_byte
, (unsigned) cur_byte
);
124 unsigned int cur_utf
= 0;
126 cur_utf
= edit_get_utf (edit
, edit
->curs1
, &cw
);
129 g_snprintf (byte_str
, sizeof (byte_str
), "%04d 0x%03X",
130 (unsigned) cur_utf
, (unsigned) cur_utf
);
135 cur_byte
= edit_get_byte (edit
, edit
->curs1
);
136 g_snprintf (byte_str
, sizeof (byte_str
), "%04d 0x%03X",
137 (int) cur_byte
, (unsigned) cur_utf
);
143 strcpy (byte_str
, "<EOF> ");
146 /* The field lengths just prevent the status line from shortening too much */
147 if (simple_statusbar
)
149 "%c%c%c%c %3ld %5ld/%ld %6ld/%ld %s %s",
150 edit
->mark1
!= edit
->mark2
? (edit
->column_highlight
? 'C' : 'B') : '-',
151 edit
->modified
? 'M' : '-',
152 macro_index
< 0 ? '-' : 'R',
153 edit
->overwrite
== 0 ? '-' : 'O',
154 edit
->curs_col
+ edit
->over_col
,
156 edit
->total_lines
+ 1, (long) edit
->curs1
, (long) edit
->last_byte
, byte_str
,
158 mc_global
.source_codepage
>=
159 0 ? get_codepage_id (mc_global
.source_codepage
) :
165 "[%c%c%c%c] %2ld L:[%3ld+%2ld %3ld/%3ld] *(%-4ld/%4ldb) %s %s",
166 edit
->mark1
!= edit
->mark2
? (edit
->column_highlight
? 'C' : 'B') : '-',
167 edit
->modified
? 'M' : '-',
168 macro_index
< 0 ? '-' : 'R',
169 edit
->overwrite
== 0 ? '-' : 'O',
170 edit
->curs_col
+ edit
->over_col
,
171 edit
->start_line
+ 1,
174 edit
->total_lines
+ 1, (long) edit
->curs1
, (long) edit
->last_byte
, byte_str
,
176 mc_global
.source_codepage
>=
177 0 ? get_codepage_id (mc_global
.source_codepage
) :
183 /* --------------------------------------------------------------------------------------------- */
186 printwstr (const char *s
, int len
)
189 tty_printf ("%-*.*s", len
, len
, s
);
192 /* --------------------------------------------------------------------------------------------- */
195 print_to_widget (WEdit
* edit
, long row
, int start_col
, int start_col_real
,
196 long end_col
, struct line_s line
[], char *status
, int bookmarked
)
200 int x
= start_col_real
;
201 int x1
= start_col
+ EDIT_TEXT_HORIZONTAL_OFFSET
+ option_line_state_width
;
202 int y
= row
+ EDIT_TEXT_VERTICAL_OFFSET
;
203 int cols_to_skip
= abs (x
);
208 tty_setcolor (EDITOR_NORMAL_COLOR
);
210 tty_setcolor (bookmarked
);
212 len
= end_col
+ 1 - start_col
;
213 wrap_start
= option_word_wrap_line_length
+ edit
->start_col
;
215 if (len
> 0 && edit
->widget
.y
+ y
>= 0)
217 if (!show_right_margin
|| wrap_start
> end_col
)
218 tty_draw_hline (edit
->widget
.y
+ y
, edit
->widget
.x
+ x1
, ' ', len
);
219 else if (wrap_start
< 0)
221 tty_setcolor (EDITOR_RIGHT_MARGIN_COLOR
);
222 tty_draw_hline (edit
->widget
.y
+ y
, edit
->widget
.x
+ x1
, ' ', len
);
227 tty_draw_hline (edit
->widget
.y
+ y
, edit
->widget
.x
+ x1
, ' ', wrap_start
);
232 tty_setcolor (EDITOR_RIGHT_MARGIN_COLOR
);
233 tty_draw_hline (edit
->widget
.y
+ y
, edit
->widget
.x
+ x1
+ wrap_start
, ' ', len
);
238 if (option_line_state
)
240 tty_setcolor (LINE_STATE_COLOR
);
241 for (i
= 0; i
< LINE_STATE_WIDTH
; i
++)
243 edit_move (x1
+ i
- option_line_state_width
, y
);
244 if (status
[i
] == '\0')
246 tty_print_char (status
[i
]);
252 for (p
= line
; p
->ch
!= 0; p
++)
255 unsigned int textchar
;
258 if (cols_to_skip
!= 0)
264 style
= p
->style
& 0xFF00;
266 color
= p
->style
>> 16;
268 if (style
& MOD_ABNORMAL
)
270 /* Non-printable - use black background */
274 if (style
& MOD_WHITESPACE
)
276 if (style
& MOD_MARKED
)
279 tty_setcolor (EDITOR_MARKED_COLOR
);
282 tty_setcolor (EDITOR_WHITESPACE_COLOR
);
284 else if (style
& MOD_BOLD
)
285 tty_setcolor (EDITOR_BOLD_COLOR
);
286 else if (style
& MOD_MARKED
)
287 tty_setcolor (EDITOR_MARKED_COLOR
);
289 tty_lowlevel_setcolor (color
);
291 if (show_right_margin
)
293 if (i
> option_word_wrap_line_length
+ edit
->start_col
)
294 tty_setcolor (EDITOR_RIGHT_MARGIN_COLOR
);
298 tty_print_anychar (textchar
);
302 /* --------------------------------------------------------------------------------------------- */
303 /** b is a pointer to the beginning of the line */
306 edit_draw_this_line (WEdit
* edit
, off_t b
, long row
, long start_col
, long end_col
)
308 struct line_s line
[MAX_LINE_LEN
];
309 struct line_s
*p
= line
;
311 off_t m1
= 0, m2
= 0, q
;
313 int col
, start_col_real
;
318 unsigned int cur_line
= 0;
320 char line_stat
[LINE_STATE_WIDTH
+ 1] = "\0";
322 if (row
> edit
->widget
.lines
- 1 - EDIT_TEXT_VERTICAL_OFFSET
)
325 if (book_mark_query_color (edit
, edit
->start_line
+ row
, BOOK_MARK_COLOR
))
326 book_mark
= BOOK_MARK_COLOR
;
327 else if (book_mark_query_color (edit
, edit
->start_line
+ row
, BOOK_MARK_FOUND_COLOR
))
328 book_mark
= BOOK_MARK_FOUND_COLOR
;
331 abn_style
= book_mark
<< 16;
333 abn_style
= MOD_ABNORMAL
;
335 end_col
-= EDIT_TEXT_HORIZONTAL_OFFSET
+ option_line_state_width
;
337 edit_get_syntax_color (edit
, b
- 1, &color
);
338 q
= edit_move_forward3 (edit
, b
, start_col
- edit
->start_col
, 0);
339 start_col_real
= (col
= (int) edit_move_forward3 (edit
, b
, 0, q
)) + edit
->start_col
;
341 if (option_line_state
)
343 cur_line
= edit
->start_line
+ row
;
344 if (cur_line
<= (unsigned int) edit
->total_lines
)
346 g_snprintf (line_stat
, LINE_STATE_WIDTH
+ 1, "%7i ", cur_line
+ 1);
350 memset (line_stat
, ' ', LINE_STATE_WIDTH
);
351 line_stat
[LINE_STATE_WIDTH
] = '\0';
353 if (book_mark_query_color (edit
, cur_line
, BOOK_MARK_COLOR
))
355 g_snprintf (line_stat
, 2, "*");
359 if (col
+ 16 > -edit
->start_col
)
361 eval_marks (edit
, &m1
, &m2
);
363 if (row
<= edit
->total_lines
- edit
->start_line
)
366 if (tty_use_colors () && visible_tws
)
368 tws
= edit_eol (edit
, b
);
369 while (tws
> b
&& ((c
= edit_get_byte (edit
, tws
- 1)) == ' ' || c
== '\t'))
373 while (col
<= end_col
- edit
->start_col
)
377 gboolean wide_width_char
= FALSE
;
378 gboolean control_char
= FALSE
;
382 if (q
== edit
->curs1
)
383 p
->style
|= MOD_CURSOR
;
384 if (q
>= m1
&& q
< m2
)
386 if (edit
->column_highlight
)
390 x
= (long) edit_move_forward3 (edit
, b
, 0, q
);
391 c1
= min (edit
->column1
, edit
->column2
);
392 c2
= max (edit
->column1
, edit
->column2
);
393 if (x
>= c1
&& x
< c2
)
394 p
->style
|= MOD_MARKED
;
397 p
->style
|= MOD_MARKED
;
399 if (q
== edit
->bracket
)
400 p
->style
|= MOD_BOLD
;
401 if (q
>= edit
->found_start
&& q
< (off_t
) (edit
->found_start
+ edit
->found_len
))
402 p
->style
|= MOD_BOLD
;
406 c
= edit_get_utf (edit
, q
, &cw
);
409 c
= edit_get_byte (edit
, q
);
410 /* we don't use bg for mc - fg contains both */
413 p
->style
|= book_mark
<< 16;
417 edit_get_syntax_color (edit
, q
, &color
);
418 p
->style
|= color
<< 16;
423 col
= end_col
- edit
->start_col
+ 1; /* quit */
426 i
= TAB_SIZE
- ((int) col
% TAB_SIZE
);
427 tab_over
= (end_col
- edit
->start_col
) - (col
+ i
- 1);
431 if (tty_use_colors () &&
432 ((visible_tabs
|| (visible_tws
&& q
>= tws
)) && enable_show_tabs_tws
))
434 if (p
->style
& MOD_MARKED
)
437 c
|= book_mark
<< 16;
439 c
= p
->style
| MOD_WHITESPACE
;
471 else if (tty_use_colors () && visible_tws
&& q
>= tws
&& enable_show_tabs_tws
)
474 p
->style
|= MOD_WHITESPACE
;
475 c
= p
->style
& ~MOD_CURSOR
;
487 c
= p
->style
& ~MOD_CURSOR
;
498 if (tty_use_colors () && visible_tws
&& q
>= tws
&& enable_show_tabs_tws
)
501 p
->style
|= MOD_WHITESPACE
;
509 if (mc_global
.utf8_display
)
513 c
= convert_from_8bit_to_utf_c ((unsigned char) c
, edit
->converter
);
517 if (g_unichar_iswide (c
))
519 wide_width_char
= TRUE
;
525 c
= convert_from_utf_to_current_c (c
, edit
->converter
);
527 c
= convert_to_display_c (c
);
530 /* Caret notation for control characters */
534 p
->style
= abn_style
;
537 p
->style
= abn_style
;
546 p
->style
= abn_style
;
549 p
->style
= abn_style
;
558 if (g_unichar_isprint (c
))
563 p
->style
= abn_style
;
570 if ((mc_global
.utf8_display
&& g_unichar_isprint (c
)) ||
571 (!mc_global
.utf8_display
&& is_printable (c
)))
579 p
->style
= abn_style
;
593 if (col
> (end_col
- edit
->start_col
+ 1))
611 start_col_real
= start_col
= 0;
616 print_to_widget (edit
, row
, start_col
, start_col_real
, end_col
, line
, line_stat
, book_mark
);
619 /* --------------------------------------------------------------------------------------------- */
622 edit_draw_this_char (WEdit
* edit
, off_t curs
, long row
, long start_column
, long end_column
)
624 off_t b
= edit_bol (edit
, curs
);
626 edit_draw_this_line (edit
, b
, row
, start_column
, end_column
);
629 /* --------------------------------------------------------------------------------------------- */
630 /** cursor must be in screen for other than REDRAW_PAGE passed in force */
633 render_edit_text (WEdit
* edit
, long start_row
, long start_column
, long end_row
, long end_column
)
635 static long prev_curs_row
= 0;
636 static off_t prev_curs
= 0;
638 Widget
*w
= (Widget
*) edit
;
639 Dlg_head
*h
= w
->owner
;
641 long row
= 0, curs_row
;
642 int force
= edit
->force
;
649 /* draw only visible region */
651 last_line
= h
->y
+ h
->lines
- 1;
654 if (y1
> last_line
- 1 /* buttonbar */ )
657 last_column
= h
->x
+ h
->cols
- 1;
660 if (x1
> last_column
)
663 y2
= w
->y
+ w
->lines
- 1;
664 if (y2
< h
->y
+ 1 /* menubar */ )
667 x2
= w
->x
+ w
->cols
- 1;
671 if ((force
& REDRAW_IN_BOUNDS
) == 0)
673 /* !REDRAW_IN_BOUNDS means to ignore bounds and redraw whole rows */
674 /* draw only visible region */
676 if (y2
<= last_line
- 1 /* buttonbar */ )
677 end_row
= w
->lines
- 1;
678 else if (y1
>= h
->y
+ 1 /* menubar */ )
679 end_row
= h
->lines
- 1 - y1
- 1;
681 end_row
= start_row
+ h
->lines
- 1 - 1;
683 if (x2
<= last_column
)
684 end_column
= w
->cols
- 1;
686 end_column
= h
->cols
- 1 - x1
;
688 end_column
= start_column
+ h
->cols
- 1;
692 * If the position of the page has not moved then we can draw the cursor
693 * character only. This will prevent line flicker when using arrow keys.
695 if ((force
& REDRAW_CHAR_ONLY
) == 0 || (force
& REDRAW_PAGE
) != 0)
697 if ((force
& REDRAW_PAGE
) != 0)
700 b
= edit_move_forward (edit
, edit
->start_display
, start_row
, 0);
701 while (row
<= end_row
)
703 if (key_pending (edit
))
705 edit_draw_this_line (edit
, b
, row
, start_column
, end_column
);
706 b
= edit_move_forward (edit
, b
, 1, 0);
712 curs_row
= edit
->curs_row
;
714 if ((force
& REDRAW_BEFORE_CURSOR
) != 0 && start_row
< curs_row
)
716 long upto
= curs_row
- 1 <= end_row
? curs_row
- 1 : end_row
;
719 b
= edit
->start_display
;
722 if (key_pending (edit
))
724 edit_draw_this_line (edit
, b
, row
, start_column
, end_column
);
725 b
= edit_move_forward (edit
, b
, 1, 0);
729 /* if (force & REDRAW_LINE) ---> default */
730 b
= edit_bol (edit
, edit
->curs1
);
731 if (curs_row
>= start_row
&& curs_row
<= end_row
)
733 if (key_pending (edit
))
735 edit_draw_this_line (edit
, b
, curs_row
, start_column
, end_column
);
738 if ((force
& REDRAW_AFTER_CURSOR
) != 0 && end_row
> curs_row
)
740 row
= curs_row
+ 1 < start_row
? start_row
: curs_row
+ 1;
741 b
= edit_move_forward (edit
, b
, 1, 0);
742 while (row
<= end_row
)
744 if (key_pending (edit
))
746 edit_draw_this_line (edit
, b
, row
, start_column
, end_column
);
747 b
= edit_move_forward (edit
, b
, 1, 0);
752 if ((force
& REDRAW_LINE_ABOVE
) != 0 && curs_row
>= 1)
755 b
= edit_move_backward (edit
, edit_bol (edit
, edit
->curs1
), 1);
756 if (row
>= start_row
&& row
<= end_row
)
758 if (key_pending (edit
))
760 edit_draw_this_line (edit
, b
, row
, start_column
, end_column
);
764 if ((force
& REDRAW_LINE_BELOW
) != 0 && row
< edit
->widget
.lines
- 1)
767 b
= edit_bol (edit
, edit
->curs1
);
768 b
= edit_move_forward (edit
, b
, 1, 0);
769 if (row
>= start_row
&& row
<= end_row
)
771 if (key_pending (edit
))
773 edit_draw_this_line (edit
, b
, row
, start_column
, end_column
);
778 else if (prev_curs_row
< edit
->curs_row
)
780 /* with the new text highlighting, we must draw from the top down */
781 edit_draw_this_char (edit
, prev_curs
, prev_curs_row
, start_column
, end_column
);
782 edit_draw_this_char (edit
, edit
->curs1
, edit
->curs_row
, start_column
, end_column
);
786 edit_draw_this_char (edit
, edit
->curs1
, edit
->curs_row
, start_column
, end_column
);
787 edit_draw_this_char (edit
, prev_curs
, prev_curs_row
, start_column
, end_column
);
792 prev_curs_row
= edit
->curs_row
;
793 prev_curs
= edit
->curs1
;
796 /* --------------------------------------------------------------------------------------------- */
799 edit_render (WEdit
* edit
, int page
, int row_start
, int col_start
, int row_end
, int col_end
)
801 if (page
) /* if it was an expose event, 'page' would be set */
802 edit
->force
|= REDRAW_PAGE
| REDRAW_IN_BOUNDS
;
804 if (edit
->force
& REDRAW_COMPLETELY
)
805 buttonbar_redraw (find_buttonbar (edit
->widget
.owner
));
806 render_edit_text (edit
, row_start
, col_start
, row_end
, col_end
);
808 * edit->force != 0 means a key was pending and the redraw
809 * was halted, so next time we must redraw everything in case stuff
810 * was left undrawn from a previous key press.
813 edit
->force
|= REDRAW_PAGE
;
816 /* --------------------------------------------------------------------------------------------- */
817 /*** public functions ****************************************************************************/
818 /* --------------------------------------------------------------------------------------------- */
820 /** Draw the status line at the top of the screen. The size of the filename
821 * field varies depending on the width of the screen and the length of
824 edit_status (WEdit
* edit
)
826 const int w
= edit
->widget
.owner
->cols
;
827 const size_t status_size
= w
+ 1;
828 char *const status
= g_malloc (status_size
);
830 const char *fname
= "";
832 const int gap
= 3; /* between the filename and the status */
833 const int right_gap
= 5; /* at the right end of the screen */
834 const int preferred_fname_len
= 16;
836 status_string (edit
, status
, status_size
);
837 status_len
= (int) str_term_width1 (status
);
839 if (edit
->filename_vpath
!= NULL
)
840 fname
= vfs_path_get_last_path_str (edit
->filename_vpath
);
842 fname_len
= str_term_width1 (fname
);
843 if (fname_len
< preferred_fname_len
)
844 fname_len
= preferred_fname_len
;
846 if (fname_len
+ gap
+ status_len
+ right_gap
>= w
)
848 if (preferred_fname_len
+ gap
+ status_len
+ right_gap
>= w
)
849 fname_len
= preferred_fname_len
;
851 fname_len
= w
- (gap
+ status_len
+ right_gap
);
852 fname
= str_trunc (fname
, fname_len
);
855 dlg_move (edit
->widget
.owner
, 0, 0);
856 tty_setcolor (STATUSBAR_COLOR
);
857 printwstr (fname
, fname_len
+ gap
);
858 printwstr (status
, w
- (fname_len
+ gap
));
860 if (simple_statusbar
&& w
> EDITOR_MINIMUM_TERMINAL_WIDTH
)
862 size_t percent
= 100;
864 if (edit
->total_lines
+ 1 != 0)
865 percent
= (edit
->curs_line
+ 1) * 100 / (edit
->total_lines
+ 1);
866 dlg_move (edit
->widget
.owner
, 0, w
- 5);
867 tty_printf (" %3d%%", percent
);
873 /* --------------------------------------------------------------------------------------------- */
874 /** this scrolls the text so that cursor is on the screen */
876 edit_scroll_screen_over_cursor (WEdit
* edit
)
880 int b_extreme
, t_extreme
, l_extreme
, r_extreme
;
882 if (edit
->widget
.lines
<= 0 || edit
->widget
.cols
<= 0)
885 edit
->widget
.cols
-= EDIT_TEXT_HORIZONTAL_OFFSET
+ option_line_state_width
;
886 edit
->widget
.lines
-= EDIT_TEXT_VERTICAL_OFFSET
;
888 r_extreme
= EDIT_RIGHT_EXTREME
;
889 l_extreme
= EDIT_LEFT_EXTREME
;
890 b_extreme
= EDIT_BOTTOM_EXTREME
;
891 t_extreme
= EDIT_TOP_EXTREME
;
892 if (edit
->found_len
!= 0)
894 b_extreme
= max (edit
->widget
.lines
/ 4, b_extreme
);
895 t_extreme
= max (edit
->widget
.lines
/ 4, t_extreme
);
897 if (b_extreme
+ t_extreme
+ 1 > edit
->widget
.lines
)
901 n
= b_extreme
+ t_extreme
;
904 b_extreme
= (b_extreme
* (edit
->widget
.lines
- 1)) / n
;
905 t_extreme
= (t_extreme
* (edit
->widget
.lines
- 1)) / n
;
907 if (l_extreme
+ r_extreme
+ 1 > edit
->widget
.cols
)
911 n
= l_extreme
+ t_extreme
;
914 l_extreme
= (l_extreme
* (edit
->widget
.cols
- 1)) / n
;
915 r_extreme
= (r_extreme
* (edit
->widget
.cols
- 1)) / n
;
917 p
= edit_get_col (edit
) + edit
->over_col
;
918 edit_update_curs_row (edit
);
919 outby
= p
+ edit
->start_col
- edit
->widget
.cols
+ 1 + (r_extreme
+ edit
->found_len
);
921 edit_scroll_right (edit
, outby
);
922 outby
= l_extreme
- p
- edit
->start_col
;
924 edit_scroll_left (edit
, outby
);
926 outby
= p
- edit
->widget
.lines
+ 1 + b_extreme
;
928 edit_scroll_downward (edit
, outby
);
929 outby
= t_extreme
- p
;
931 edit_scroll_upward (edit
, outby
);
932 edit_update_curs_row (edit
);
934 edit
->widget
.lines
+= EDIT_TEXT_VERTICAL_OFFSET
;
935 edit
->widget
.cols
+= EDIT_TEXT_HORIZONTAL_OFFSET
+ option_line_state_width
;
938 /* --------------------------------------------------------------------------------------------- */
941 edit_render_keypress (WEdit
* edit
)
943 edit_render (edit
, 0, 0, 0, 0, 0);
946 /* --------------------------------------------------------------------------------------------- */