2 Internal file viewer for the Midnight Commander
5 Copyright (C) 1994, 1995, 1996, 1998, 1999, 2000, 2001, 2002, 2003,
6 2004, 2005, 2006, 2007, 2009 Free Software Foundation, Inc.
8 Written by: 1994, 1995, 1998 Miguel de Icaza
9 1994, 1995 Janne Kukonlehto
14 2004 Roland Illig <roland.illig@gmx.de>
15 2005 Roland Illig <roland.illig@gmx.de>
16 2009 Slava Zanko <slavazanko@google.com>
17 2009 Andrew Borodin <aborodin@vmail.ru>
18 2009 Ilia Maslakov <il.smind@gmail.com>
20 This file is part of the Midnight Commander.
22 The Midnight Commander is free software; you can redistribute it
23 and/or modify it under the terms of the GNU General Public License as
24 published by the Free Software Foundation; either version 2 of the
25 License, or (at your option) any later version.
27 The Midnight Commander is distributed in the hope that it will be
28 useful, but WITHOUT ANY WARRANTY; without even the implied warranty
29 of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
30 General Public License for more details.
32 You should have received a copy of the GNU General Public License
33 along with this program; if not, write to the Free Software
34 Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston,
42 #include <inttypes.h> /* uintmax_t */
44 #include "lib/global.h"
45 #include "lib/tty/tty.h"
47 #include "lib/vfs/mc-vfs/vfs.h"
49 #include "lib/widget.h"
50 #include "lib/charsets.h"
56 /*** global variables ****************************************************************************/
58 /*** file scope macro definitions ****************************************************************/
60 /*** file scope type declarations ****************************************************************/
70 /*** file scope variables ************************************************************************/
72 static const char hex_char
[] = "0123456789ABCDEF";
74 /*** file scope functions ************************************************************************/
75 /* --------------------------------------------------------------------------------------------- */
78 utf8_to_int (char *str
, int *char_width
, gboolean
* result
)
82 gchar
*next_ch
= NULL
;
94 res
= g_utf8_get_char_validated (str
, -1);
104 /* Calculate UTF-8 char width */
105 next_ch
= g_utf8_next_char (str
);
108 width
= next_ch
- str
;
120 /* --------------------------------------------------------------------------------------------- */
121 /*** public functions ****************************************************************************/
122 /* --------------------------------------------------------------------------------------------- */
125 mcview_display_hex (mcview_t
* view
)
127 const screen_dimen top
= view
->data_area
.top
;
128 const screen_dimen left
= view
->data_area
.left
;
129 const screen_dimen height
= view
->data_area
.height
;
130 const screen_dimen width
= view
->data_area
.width
;
131 const int ngroups
= view
->bytes_per_line
/ 4;
132 const screen_dimen text_start
= 8 + 13 * ngroups
+ ((width
< 80) ? 0 : (ngroups
- 1 + 1));
133 /* 8 characters are used for the file offset, and every hex group
134 * takes 13 characters. On ``big'' screens, the groups are separated
135 * by an extra vertical line, and there is an extra space before the
139 screen_dimen row
, col
;
142 mark_t boldflag
= MARK_NORMAL
;
143 struct hexedit_change_node
*curr
= view
->change_list
;
146 char hex_buff
[10]; /* A temporary buffer for sprintf and mvwaddstr */
147 int bytes
; /* Number of bytes already printed on the line */
149 mcview_display_clean (view
);
151 /* Find the first displayable changed byte */
152 from
= view
->dpy_start
;
153 while (curr
&& (curr
->offset
< from
))
158 for (row
= 0; mcview_get_byte (view
, from
, NULL
) == TRUE
&& row
< height
; row
++)
163 /* Print the hex offset */
164 g_snprintf (hex_buff
, sizeof (hex_buff
), "%08" PRIXMAX
" ", (uintmax_t) from
);
165 widget_move (view
, top
+ row
, left
);
166 tty_setcolor (VIEW_BOLD_COLOR
);
167 for (i
= 0; col
< width
&& hex_buff
[i
] != '\0'; i
++)
169 tty_print_char (hex_buff
[i
]);
170 /* tty_print_char(hex_buff[i]); */
173 tty_setcolor (NORMAL_COLOR
);
175 for (bytes
= 0; bytes
< view
->bytes_per_line
; bytes
++, from
++)
181 char corr_buf
[6 + 1];
183 gboolean read_res
= TRUE
;
184 ch
= mcview_get_utf (view
, from
, &cw
, &read_res
);
187 /* char width is greater 0 bytes */
190 struct hexedit_change_node
*corr
= curr
;
191 int res
= g_unichar_to_utf8 (ch
, (char *) corr_buf
);
192 for (cnt
= 0; cnt
< cw
; cnt
++)
194 if (curr
!= NULL
&& from
+ cnt
== curr
->offset
)
196 /* replace only changed bytes in array of multibyte char */
197 corr_buf
[cnt
] = curr
->value
;
201 corr_buf
[res
] = '\0';
202 /* Determine the state of the current multibyte char */
203 ch
= utf8_to_int ((char *) corr_buf
, &cw
, &read_res
);
208 if (!mcview_get_byte (view
, from
, &c
))
211 /* Save the cursor position for mcview_place_cursor() */
212 if (from
== view
->hex_cursor
&& !view
->hexview_in_text
)
214 view
->cursor_row
= row
;
215 view
->cursor_col
= col
;
218 /* Determine the state of the current byte */
220 (from
== view
->hex_cursor
) ? MARK_CURSOR
221 : (curr
!= NULL
&& from
== curr
->offset
) ? MARK_CHANGED
222 : (view
->search_start
<= from
&&
223 from
< view
->search_end
) ? MARK_SELECTED
: MARK_NORMAL
;
225 /* Determine the value of the current byte */
226 if (curr
!= NULL
&& from
== curr
->offset
)
232 /* Select the color for the hex number */
233 tty_setcolor (boldflag
== MARK_NORMAL
? NORMAL_COLOR
:
234 boldflag
== MARK_SELECTED
? VIEW_BOLD_COLOR
:
235 boldflag
== MARK_CHANGED
? VIEW_UNDERLINED_COLOR
:
236 /* boldflag == MARK_CURSOR */
237 view
->hexview_in_text
? VIEW_SELECTED_COLOR
: VIEW_UNDERLINED_COLOR
);
239 /* Print the hex number */
240 widget_move (view
, top
+ row
, left
+ col
);
243 tty_print_char (hex_char
[c
/ 16]);
248 tty_print_char (hex_char
[c
% 16]);
252 /* Print the separator */
253 tty_setcolor (NORMAL_COLOR
);
254 if (bytes
!= view
->bytes_per_line
- 1)
258 tty_print_char (' ');
262 /* After every four bytes, print a group separator */
265 if (view
->data_area
.width
>= 80 && col
< width
)
267 tty_print_one_vline (TRUE
);
272 tty_print_char (' ');
278 /* Select the color for the character; this differs from the
279 * hex color when boldflag == MARK_CURSOR */
280 tty_setcolor (boldflag
== MARK_NORMAL
? NORMAL_COLOR
:
281 boldflag
== MARK_SELECTED
? VIEW_BOLD_COLOR
:
282 boldflag
== MARK_CHANGED
? VIEW_UNDERLINED_COLOR
:
283 /* boldflag == MARK_CURSOR */
284 view
->hexview_in_text
? VIEW_SELECTED_COLOR
: MARKED_SELECTED_COLOR
);
292 c
= convert_from_8bit_to_utf_c ((unsigned char) c
, view
->converter
);
294 if (!g_unichar_isprint (c
))
298 ch
= convert_from_utf_to_current_c (ch
, view
->converter
);
302 c
= convert_to_display_c (c
);
304 if (!is_printable (c
))
308 /* Print corresponding character on the text side */
309 if (text_start
+ bytes
< width
)
311 widget_move (view
, top
+ row
, left
+ text_start
+ bytes
);
314 tty_print_anychar (ch
);
322 /* Save the cursor position for mcview_place_cursor() */
323 if (from
== view
->hex_cursor
&& view
->hexview_in_text
)
325 view
->cursor_row
= row
;
326 view
->cursor_col
= text_start
+ bytes
;
331 /* Be polite to the other functions */
332 tty_setcolor (NORMAL_COLOR
);
334 mcview_place_cursor (view
);
335 view
->dpy_end
= from
;
338 /* --------------------------------------------------------------------------------------------- */
341 mcview_hexedit_save_changes (mcview_t
* view
)
345 if (view
->change_list
== NULL
)
352 struct hexedit_change_node
*curr
, *next
;
354 assert (view
->filename
!= NULL
);
356 fp
= mc_open (view
->filename
, O_WRONLY
);
359 for (curr
= view
->change_list
; curr
!= NULL
; curr
= next
)
363 if (mc_lseek (fp
, curr
->offset
, SEEK_SET
) == -1
364 || mc_write (fp
, &(curr
->value
), 1) != 1)
367 /* delete the saved item from the change list */
368 view
->change_list
= next
;
370 mcview_set_byte (view
, curr
->offset
, curr
->value
);
374 view
->change_list
= NULL
;
377 view
->locked
= mcview_unlock_file (view
);
379 if (mc_close (fp
) == -1)
380 message (D_ERROR
, _("Save file"),
381 _("Error while closing the file:\n%s\n"
382 "Data may have been written or not"), unix_error_string (errno
));
389 text
= g_strdup_printf (_("Cannot save file:\n%s"), unix_error_string (errno
));
390 (void) mc_close (fp
);
392 answer
= query_dialog (_("Save file"), text
, D_ERROR
, 2, _("&Retry"), _("&Cancel"));
399 /* --------------------------------------------------------------------------------------------- */
402 mcview_toggle_hexedit_mode (mcview_t
* view
)
404 view
->hexedit_mode
= !view
->hexedit_mode
;
405 view
->dpy_bbar_dirty
= TRUE
;
409 /* --------------------------------------------------------------------------------------------- */
412 mcview_hexedit_free_change_list (mcview_t
* view
)
414 struct hexedit_change_node
*curr
, *next
;
416 for (curr
= view
->change_list
; curr
!= NULL
; curr
= next
)
421 view
->change_list
= NULL
;
424 view
->locked
= mcview_unlock_file (view
);
429 /* --------------------------------------------------------------------------------------------- */
432 mcview_enqueue_change (struct hexedit_change_node
**head
, struct hexedit_change_node
*node
)
434 /* chnode always either points to the head of the list or
435 * to one of the ->next fields in the list. The value at
436 * this location will be overwritten with the new node. */
437 struct hexedit_change_node
**chnode
= head
;
439 while (*chnode
!= NULL
&& (*chnode
)->offset
< node
->offset
)
440 chnode
= &((*chnode
)->next
);
442 node
->next
= *chnode
;
446 /* --------------------------------------------------------------------------------------------- */