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, 2011
7 The Free Software Foundation, Inc.
10 Miguel de Icaza, 1994, 1995, 1998
11 Janne Kukonlehto, 1994, 1995
13 Joseph M. Hinkle, 1996
16 Roland Illig <roland.illig@gmx.de>, 2004, 2005
17 Slava Zanko <slavazanko@google.com>, 2009
18 Andrew Borodin <aborodin@vmail.ru>, 2009
19 Ilia Maslakov <il.smind@gmail.com>, 2009
21 This file is part of the Midnight Commander.
23 The Midnight Commander is free software: you can redistribute it
24 and/or modify it under the terms of the GNU General Public License as
25 published by the Free Software Foundation, either version 3 of the License,
26 or (at your option) any later version.
28 The Midnight Commander is distributed in the hope that it will be useful,
29 but WITHOUT ANY WARRANTY; without even the implied warranty of
30 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
31 GNU General Public License for more details.
33 You should have received a copy of the GNU General Public License
34 along with this program. If not, see <http://www.gnu.org/licenses/>.
41 #include <inttypes.h> /* uintmax_t */
43 #include "lib/global.h"
44 #include "lib/tty/tty.h"
46 #include "lib/vfs/vfs.h"
47 #include "lib/lock.h" /* lock_file() and unlock_file() */
49 #include "lib/widget.h"
50 #include "lib/charsets.h"
54 /*** global variables ****************************************************************************/
56 /*** file scope macro definitions ****************************************************************/
58 /*** file scope type declarations ****************************************************************/
68 /*** file scope variables ************************************************************************/
70 static const char hex_char
[] = "0123456789ABCDEF";
72 /*** file scope functions ************************************************************************/
73 /* --------------------------------------------------------------------------------------------- */
76 utf8_to_int (char *str
, int *char_width
, gboolean
* result
)
80 gchar
*next_ch
= NULL
;
92 res
= g_utf8_get_char_validated (str
, -1);
102 /* Calculate UTF-8 char width */
103 next_ch
= g_utf8_next_char (str
);
106 width
= next_ch
- str
;
118 /* --------------------------------------------------------------------------------------------- */
119 /*** public functions ****************************************************************************/
120 /* --------------------------------------------------------------------------------------------- */
123 mcview_display_hex (mcview_t
* view
)
125 const screen_dimen top
= view
->data_area
.top
;
126 const screen_dimen left
= view
->data_area
.left
;
127 const screen_dimen height
= view
->data_area
.height
;
128 const screen_dimen width
= view
->data_area
.width
;
129 const int ngroups
= view
->bytes_per_line
/ 4;
130 const screen_dimen text_start
= 8 + 13 * ngroups
+ ((width
< 80) ? 0 : (ngroups
- 1 + 1));
131 /* 8 characters are used for the file offset, and every hex group
132 * takes 13 characters. On ``big'' screens, the groups are separated
133 * by an extra vertical line, and there is an extra space before the
137 screen_dimen row
, col
;
140 mark_t boldflag
= MARK_NORMAL
;
141 struct hexedit_change_node
*curr
= view
->change_list
;
144 char hex_buff
[10]; /* A temporary buffer for sprintf and mvwaddstr */
145 int bytes
; /* Number of bytes already printed on the line */
147 mcview_display_clean (view
);
149 /* Find the first displayable changed byte */
150 from
= view
->dpy_start
;
151 while (curr
&& (curr
->offset
< from
))
156 for (row
= 0; mcview_get_byte (view
, from
, NULL
) == TRUE
&& row
< height
; row
++)
161 /* Print the hex offset */
162 g_snprintf (hex_buff
, sizeof (hex_buff
), "%08" PRIXMAX
" ", (uintmax_t) from
);
163 widget_move (view
, top
+ row
, left
);
164 tty_setcolor (VIEW_BOLD_COLOR
);
165 for (i
= 0; col
< width
&& hex_buff
[i
] != '\0'; i
++)
167 tty_print_char (hex_buff
[i
]);
168 /* tty_print_char(hex_buff[i]); */
171 tty_setcolor (NORMAL_COLOR
);
173 for (bytes
= 0; bytes
< view
->bytes_per_line
; bytes
++, from
++)
179 char corr_buf
[6 + 1];
181 gboolean read_res
= TRUE
;
182 ch
= mcview_get_utf (view
, from
, &cw
, &read_res
);
185 /* char width is greater 0 bytes */
188 struct hexedit_change_node
*corr
= curr
;
189 int res
= g_unichar_to_utf8 (ch
, (char *) corr_buf
);
190 for (cnt
= 0; cnt
< cw
; cnt
++)
192 if (curr
!= NULL
&& from
+ cnt
== curr
->offset
)
194 /* replace only changed bytes in array of multibyte char */
195 corr_buf
[cnt
] = curr
->value
;
199 corr_buf
[res
] = '\0';
200 /* Determine the state of the current multibyte char */
201 ch
= utf8_to_int ((char *) corr_buf
, &cw
, &read_res
);
206 if (!mcview_get_byte (view
, from
, &c
))
209 /* Save the cursor position for mcview_place_cursor() */
210 if (from
== view
->hex_cursor
&& !view
->hexview_in_text
)
212 view
->cursor_row
= row
;
213 view
->cursor_col
= col
;
216 /* Determine the state of the current byte */
218 (from
== view
->hex_cursor
) ? MARK_CURSOR
219 : (curr
!= NULL
&& from
== curr
->offset
) ? MARK_CHANGED
220 : (view
->search_start
<= from
&&
221 from
< view
->search_end
) ? MARK_SELECTED
: MARK_NORMAL
;
223 /* Determine the value of the current byte */
224 if (curr
!= NULL
&& from
== curr
->offset
)
230 /* Select the color for the hex number */
231 tty_setcolor (boldflag
== MARK_NORMAL
? NORMAL_COLOR
:
232 boldflag
== MARK_SELECTED
? VIEW_BOLD_COLOR
:
233 boldflag
== MARK_CHANGED
? VIEW_UNDERLINED_COLOR
:
234 /* boldflag == MARK_CURSOR */
235 view
->hexview_in_text
? VIEW_SELECTED_COLOR
: VIEW_UNDERLINED_COLOR
);
237 /* Print the hex number */
238 widget_move (view
, top
+ row
, left
+ col
);
241 tty_print_char (hex_char
[c
/ 16]);
246 tty_print_char (hex_char
[c
% 16]);
250 /* Print the separator */
251 tty_setcolor (NORMAL_COLOR
);
252 if (bytes
!= view
->bytes_per_line
- 1)
256 tty_print_char (' ');
260 /* After every four bytes, print a group separator */
263 if (view
->data_area
.width
>= 80 && col
< width
)
265 tty_print_one_vline (TRUE
);
270 tty_print_char (' ');
276 /* Select the color for the character; this differs from the
277 * hex color when boldflag == MARK_CURSOR */
278 tty_setcolor (boldflag
== MARK_NORMAL
? NORMAL_COLOR
:
279 boldflag
== MARK_SELECTED
? VIEW_BOLD_COLOR
:
280 boldflag
== MARK_CHANGED
? VIEW_UNDERLINED_COLOR
:
281 /* boldflag == MARK_CURSOR */
282 view
->hexview_in_text
? VIEW_SELECTED_COLOR
: MARKED_SELECTED_COLOR
);
286 if (mc_global
.utf8_display
)
290 c
= convert_from_8bit_to_utf_c ((unsigned char) c
, view
->converter
);
292 if (!g_unichar_isprint (c
))
296 ch
= convert_from_utf_to_current_c (ch
, view
->converter
);
300 c
= convert_to_display_c (c
);
302 if (!is_printable (c
))
306 /* Print corresponding character on the text side */
307 if (text_start
+ bytes
< width
)
309 widget_move (view
, top
+ row
, left
+ text_start
+ bytes
);
312 tty_print_anychar (ch
);
320 /* Save the cursor position for mcview_place_cursor() */
321 if (from
== view
->hex_cursor
&& view
->hexview_in_text
)
323 view
->cursor_row
= row
;
324 view
->cursor_col
= text_start
+ bytes
;
329 /* Be polite to the other functions */
330 tty_setcolor (NORMAL_COLOR
);
332 mcview_place_cursor (view
);
333 view
->dpy_end
= from
;
336 /* --------------------------------------------------------------------------------------------- */
339 mcview_hexedit_save_changes (mcview_t
* view
)
343 if (view
->change_list
== NULL
)
350 struct hexedit_change_node
*curr
, *next
;
353 assert (view
->filename_vpath
!= NULL
);
356 fp
= mc_open (view
->filename_vpath
, 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
= unlock_file (view
->filename_vpath
);
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
= unlock_file (view
->filename_vpath
);
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 /* --------------------------------------------------------------------------------------------- */