2 Editor high level editing commands
4 Copyright (C) 1996-2023
5 Free Software Foundation, Inc.
9 Andrew Borodin <aborodin@vmail.ru>, 2012-2022
10 Ilia Maslakov <il.smind@gmail.com>, 2012
12 This file is part of the Midnight Commander.
14 The Midnight Commander is free software: you can redistribute it
15 and/or modify it under the terms of the GNU General Public License as
16 published by the Free Software Foundation, either version 3 of the License,
17 or (at your option) any later version.
19 The Midnight Commander is distributed in the hope that it will be useful,
20 but WITHOUT ANY WARRANTY; without even the implied warranty of
21 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
22 GNU General Public License for more details.
24 You should have received a copy of the GNU General Public License
25 along with this program. If not, see <http://www.gnu.org/licenses/>.
29 * \brief Source: editor high level editing commands
34 /* #define PIPE_BLOCKS_SO_READ_BYTE_BY_BYTE */
41 #include <sys/types.h>
47 #include "lib/global.h"
48 #include "lib/tty/tty.h"
49 #include "lib/tty/key.h" /* XCTRL */
50 #include "lib/strutil.h" /* utf string functions */
51 #include "lib/fileloc.h"
53 #include "lib/util.h" /* tilde_expand() */
54 #include "lib/vfs/vfs.h"
55 #include "lib/widget.h"
56 #include "lib/event.h" /* mc_event_raise() */
58 #include "lib/charsets.h"
61 #include "src/history.h"
62 #include "src/file_history.h" /* show_file_history() */
64 #include "src/selcodepage.h"
66 #include "src/util.h" /* check_for_default() */
68 #include "edit-impl.h"
69 #include "editwidget.h"
70 #include "editsearch.h"
73 /*** global variables ****************************************************************************/
75 /* search and replace: */
76 int search_create_bookmark
= FALSE
;
78 /*** file scope macro definitions ****************************************************************/
82 #define TEMP_BUF_LEN 1024
84 /*** file scope type declarations ****************************************************************/
86 /*** forward declarations (file scope functions) *************************************************/
88 /*** file scope variables ************************************************************************/
90 static unsigned long edit_save_mode_radio_id
, edit_save_mode_input_id
;
92 /* --------------------------------------------------------------------------------------------- */
93 /*** file scope functions ************************************************************************/
94 /* --------------------------------------------------------------------------------------------- */
97 edit_save_mode_callback (Widget
* w
, Widget
* sender
, widget_msg_t msg
, int parm
, void *data
)
101 case MSG_CHANGED_FOCUS
:
102 if (sender
!= NULL
&& sender
->id
== edit_save_mode_radio_id
)
106 ww
= widget_find_by_id (w
, edit_save_mode_input_id
);
107 widget_disable (ww
, RADIO (sender
)->sel
!= 2);
110 return MSG_NOT_HANDLED
;
113 return dlg_default_callback (w
, sender
, msg
, parm
, data
);
117 /* --------------------------------------------------------------------------------------------- */
119 /* If 0 (quick save) then a) create/truncate <filename> file,
120 b) save to <filename>;
121 if 1 (safe save) then a) save to <tempnam>,
122 b) rename <tempnam> to <filename>;
123 if 2 (do backups) then a) save to <tempnam>,
124 b) rename <filename> to <filename.backup_ext>,
125 c) rename <tempnam> to <filename>. */
127 /* returns 0 on error, -1 on abort */
130 edit_save_file (WEdit
* edit
, const vfs_path_t
* filename_vpath
)
135 int this_save_mode
, rv
, fd
= -1;
136 vfs_path_t
*real_filename_vpath
;
137 vfs_path_t
*savename_vpath
= NULL
;
138 const char *start_filename
;
139 const vfs_path_element_t
*vpath_element
;
142 vpath_element
= vfs_path_get_by_index (filename_vpath
, 0);
143 if (vpath_element
== NULL
)
146 start_filename
= vpath_element
->path
;
147 if (*start_filename
== '\0')
150 if (!IS_PATH_SEP (*start_filename
) && edit
->dir_vpath
!= NULL
)
151 real_filename_vpath
= vfs_path_append_vpath_new (edit
->dir_vpath
, filename_vpath
, NULL
);
153 real_filename_vpath
= vfs_path_clone (filename_vpath
);
155 this_save_mode
= edit_options
.save_mode
;
156 if (this_save_mode
!= EDIT_QUICK_SAVE
)
158 if (!vfs_file_is_local (real_filename_vpath
))
159 /* The file does not exists yet, so no safe save or backup are necessary. */
160 this_save_mode
= EDIT_QUICK_SAVE
;
163 fd
= mc_open (real_filename_vpath
, O_RDONLY
| O_BINARY
);
165 /* The file does not exists yet, so no safe save or backup are necessary. */
166 this_save_mode
= EDIT_QUICK_SAVE
;
173 rv
= mc_stat (real_filename_vpath
, &sb
);
176 if (this_save_mode
== EDIT_QUICK_SAVE
&& !edit
->skip_detach_prompt
&& sb
.st_nlink
> 1)
178 rv
= edit_query_dialog3 (_("Warning"),
179 _("File has hard-links. Detach before saving?"),
180 _("&Yes"), _("&No"), _("&Cancel"));
184 this_save_mode
= EDIT_SAFE_SAVE
;
187 edit
->skip_detach_prompt
= 1;
190 vfs_path_free (real_filename_vpath
, TRUE
);
195 /* Prevent overwriting changes from other editor sessions. */
196 if (edit
->stat1
.st_mtime
!= 0 && edit
->stat1
.st_mtime
!= sb
.st_mtime
)
198 /* The default action is "Cancel". */
201 rv
= edit_query_dialog2 (_("Warning"),
202 _("The file has been modified in the meantime. Save anyway?"),
203 _("&Yes"), _("&Cancel"));
206 vfs_path_free (real_filename_vpath
, TRUE
);
212 if (this_save_mode
== EDIT_QUICK_SAVE
)
213 savename_vpath
= vfs_path_clone (real_filename_vpath
);
216 char *savedir
, *saveprefix
;
218 savedir
= vfs_path_tokens_get (real_filename_vpath
, 0, -1);
220 savedir
= g_strdup (".");
222 /* Token-related function never return leading slash, so we need add it manually */
223 saveprefix
= mc_build_filename (PATH_SEP_STR
, savedir
, "cooledit", (char *) NULL
);
225 fd
= mc_mkstemps (&savename_vpath
, saveprefix
, NULL
);
227 if (savename_vpath
== NULL
)
229 vfs_path_free (real_filename_vpath
, TRUE
);
233 * Close for now because mc_mkstemps use pure open system call
234 * to create temporary file and it needs to be reopened by
235 * VFS-aware mc_open().
240 (void) mc_chown (savename_vpath
, edit
->stat1
.st_uid
, edit
->stat1
.st_gid
);
241 (void) mc_chmod (savename_vpath
, edit
->stat1
.st_mode
);
243 fd
= mc_open (savename_vpath
, O_CREAT
| O_WRONLY
| O_TRUNC
| O_BINARY
, edit
->stat1
.st_mode
);
248 p
= edit_get_write_filter (savename_vpath
, real_filename_vpath
);
254 file
= (FILE *) popen (p
, "w");
258 filelen
= edit_write_stream (edit
, file
);
262 if (pclose (file
) != 0)
264 tmp
= g_strdup_printf (_("Error writing to pipe: %s"), p
);
265 edit_error_dialog (_("Error"), tmp
);
274 tmp
= g_strdup_printf (_("Cannot open pipe for writing: %s"), p
);
275 edit_error_dialog (_("Error"), get_sys_error (tmp
));
282 else if (edit
->lb
== LB_ASIS
)
283 { /* do not change line breaks */
284 filelen
= edit_buffer_write_file (&edit
->buffer
, fd
);
286 if (filelen
!= edit
->buffer
.size
)
292 if (mc_close (fd
) != 0)
295 /* Update the file information, especially the mtime. */
296 if (mc_stat (savename_vpath
, &edit
->stat1
) == -1)
300 { /* change line breaks */
302 const char *savename
;
306 savename
= vfs_path_get_last_path_str (savename_vpath
);
307 file
= (FILE *) fopen (savename
, "w");
310 filelen
= edit_write_stream (edit
, file
);
317 msg
= g_strdup_printf (_("Cannot open file for writing: %s"), savename
);
318 edit_error_dialog (_("Error"), msg
);
324 if (filelen
!= edit
->buffer
.size
)
327 if (this_save_mode
== EDIT_DO_BACKUP
)
329 char *tmp_store_filename
;
330 vfs_path_element_t
*last_vpath_element
;
331 vfs_path_t
*tmp_vpath
;
334 g_assert (edit_options
.backup_ext
!= NULL
);
336 /* add backup extension to the path */
337 tmp_vpath
= vfs_path_clone (real_filename_vpath
);
338 last_vpath_element
= (vfs_path_element_t
*) vfs_path_get_by_index (tmp_vpath
, -1);
339 tmp_store_filename
= last_vpath_element
->path
;
340 last_vpath_element
->path
=
341 g_strdup_printf ("%s%s", tmp_store_filename
, edit_options
.backup_ext
);
342 g_free (tmp_store_filename
);
344 ok
= (mc_rename (real_filename_vpath
, tmp_vpath
) != -1);
345 vfs_path_free (tmp_vpath
, TRUE
);
350 if (this_save_mode
!= EDIT_QUICK_SAVE
&& mc_rename (savename_vpath
, real_filename_vpath
) == -1)
353 vfs_path_free (real_filename_vpath
, TRUE
);
354 vfs_path_free (savename_vpath
, TRUE
);
357 /* FIXME: Is this safe ?
358 * if (this_save_mode != EDIT_QUICK_SAVE)
359 * mc_unlink (savename);
361 vfs_path_free (real_filename_vpath
, TRUE
);
362 vfs_path_free (savename_vpath
, TRUE
);
366 /* --------------------------------------------------------------------------------------------- */
369 edit_check_newline (const edit_buffer_t
* buf
)
371 return !(edit_options
.check_nl_at_eof
&& buf
->size
> 0
372 && edit_buffer_get_byte (buf
, buf
->size
- 1) != '\n'
373 && edit_query_dialog2 (_("Warning"),
374 _("The file you are saving does not end with a newline."),
375 _("C&ontinue"), _("&Cancel")) != 0);
378 /* --------------------------------------------------------------------------------------------- */
381 edit_get_save_file_as (WEdit
* edit
)
383 static LineBreaks cur_lb
= LB_ASIS
;
385 vfs_path_t
*ret_vpath
= NULL
;
387 const char *lb_names
[LB_NAMES
] = {
388 N_("&Do not change"),
389 N_("&Unix format (LF)"),
390 N_("&Windows/DOS format (CR LF)"),
391 N_("&Macintosh format (CR)")
394 quick_widget_t quick_widgets
[] = {
396 QUICK_LABELED_INPUT (N_("Enter file name:"), input_label_above
,
397 vfs_path_as_str (edit
->filename_vpath
), "save-as",
398 &filename_res
, NULL
, FALSE
, FALSE
, INPUT_COMPLETE_FILENAMES
),
399 QUICK_SEPARATOR (TRUE
),
400 QUICK_LABEL (N_("Change line breaks to:"), NULL
),
401 QUICK_RADIO (LB_NAMES
, lb_names
, (int *) &cur_lb
, NULL
),
402 QUICK_BUTTONS_OK_CANCEL
,
407 WRect r
= { -1, -1, 0, 64 };
409 quick_dialog_t qdlg
= {
410 r
, N_("Save As"), "[Save File As]",
411 quick_widgets
, NULL
, NULL
414 if (quick_dialog (&qdlg
) != B_CANCEL
)
419 fname
= tilde_expand (filename_res
);
420 g_free (filename_res
);
421 ret_vpath
= vfs_path_from_str (fname
);
428 /* --------------------------------------------------------------------------------------------- */
430 /** returns TRUE on success */
433 edit_save_cmd (WEdit
* edit
)
435 int res
, save_lock
= 0;
437 if (!edit
->locked
&& !edit
->delete_file
)
438 save_lock
= lock_file (edit
->filename_vpath
);
439 res
= edit_save_file (edit
, edit
->filename_vpath
);
441 /* Maintain modify (not save) lock on failure */
442 if ((res
> 0 && edit
->locked
) || save_lock
)
443 edit
->locked
= unlock_file (edit
->filename_vpath
);
445 /* On failure try 'save as', it does locking on its own */
447 return edit_save_as_cmd (edit
);
451 edit
->delete_file
= 0;
455 edit
->force
|= REDRAW_COMPLETELY
;
460 /* --------------------------------------------------------------------------------------------- */
463 edit_delete_column_of_text (WEdit
* edit
, off_t m1
, off_t m2
)
469 n
= edit_buffer_get_forward_offset (&edit
->buffer
, m1
, 0, m2
) + 1;
470 r
= edit_buffer_get_bol (&edit
->buffer
, m1
);
471 c
= (long) edit_move_forward3 (edit
, r
, 0, m1
);
472 r
= edit_buffer_get_bol (&edit
->buffer
, m2
);
473 d
= (long) edit_move_forward3 (edit
, r
, 0, m2
);
474 b
= MAX (MIN (c
, d
), MIN (edit
->column1
, edit
->column2
));
475 c
= MAX (c
, MAX (edit
->column1
, edit
->column2
));
481 r
= edit_buffer_get_current_bol (&edit
->buffer
);
482 p
= edit_move_forward3 (edit
, r
, b
, 0);
483 q
= edit_move_forward3 (edit
, r
, c
, 0);
486 edit_cursor_move (edit
, p
- edit
->buffer
.curs1
);
487 /* delete line between margins */
489 if (edit_buffer_get_current_byte (&edit
->buffer
) != '\n')
490 edit_delete (edit
, TRUE
);
492 /* move to next line except on the last delete */
495 r
= edit_buffer_get_forward_offset (&edit
->buffer
, edit
->buffer
.curs1
, 1, 0);
496 edit_cursor_move (edit
, r
- edit
->buffer
.curs1
);
501 /* --------------------------------------------------------------------------------------------- */
502 /** if success return TRUE */
505 edit_block_delete (WEdit
* edit
, off_t start_mark
, off_t end_mark
)
508 long curs_line
, c1
, c2
;
510 if (edit
->column_highlight
&& edit
->mark2
< 0)
511 edit_mark_cmd (edit
, FALSE
);
513 /* Warning message with a query to continue or cancel the operation */
514 if ((end_mark
- start_mark
) > max_undo
/ 2 &&
515 edit_query_dialog2 (_("Warning"),
516 ("Block is large, you may not be able to undo this action"),
517 _("C&ontinue"), _("&Cancel")) != 0)
520 c1
= MIN (edit
->column1
, edit
->column2
);
521 c2
= MAX (edit
->column1
, edit
->column2
);
525 edit_push_markers (edit
);
527 curs_line
= edit
->buffer
.curs_line
;
529 curs_pos
= edit
->curs_col
+ edit
->over_col
;
531 /* move cursor to start of selection */
532 edit_cursor_move (edit
, start_mark
- edit
->buffer
.curs1
);
533 edit_scroll_screen_over_cursor (edit
);
535 if (start_mark
< end_mark
)
537 if (edit
->column_highlight
)
543 edit_mark_cmd (edit
, FALSE
);
544 edit_delete_column_of_text (edit
, start_mark
, end_mark
);
545 /* move cursor to the saved position */
546 edit_move_to_line (edit
, curs_line
);
547 /* calculate line width and cursor position before cut */
548 b
= edit_buffer_get_current_bol (&edit
->buffer
);
549 e
= edit_buffer_get_current_eol (&edit
->buffer
);
550 line_width
= edit_move_forward3 (edit
, b
, 0, e
);
551 if (edit_options
.cursor_beyond_eol
&& curs_pos
> line_width
)
552 edit
->over_col
= curs_pos
- line_width
;
558 for (count
= start_mark
; count
< end_mark
; count
++)
559 edit_delete (edit
, TRUE
);
563 edit_set_markers (edit
, 0, 0, 0, 0);
564 edit
->force
|= REDRAW_PAGE
;
569 /* --------------------------------------------------------------------------------------------- */
570 /** Return a null terminated length of text. Result must be g_free'd */
572 static unsigned char *
573 edit_get_block (WEdit
* edit
, off_t start
, off_t finish
, off_t
* l
)
575 unsigned char *s
, *r
;
577 r
= s
= g_malloc0 (finish
- start
+ 1);
579 if (edit
->column_highlight
)
583 /* copy from buffer, excluding chars that are out of the column 'margins' */
584 for (; start
< finish
; start
++)
589 x
= edit_buffer_get_bol (&edit
->buffer
, start
);
590 x
= edit_move_forward3 (edit
, x
, 0, start
);
591 c
= edit_buffer_get_byte (&edit
->buffer
, start
);
592 if ((x
>= edit
->column1
&& x
< edit
->column2
)
593 || (x
>= edit
->column2
&& x
< edit
->column1
) || c
== '\n')
604 for (; start
< finish
; start
++)
605 *s
++ = edit_buffer_get_byte (&edit
->buffer
, start
);
613 /* --------------------------------------------------------------------------------------------- */
614 /** copies a block to clipboard file */
617 edit_save_block_to_clip_file (WEdit
* edit
, off_t start
, off_t finish
)
622 tmp
= mc_config_get_full_path (EDIT_HOME_CLIP_FILE
);
623 ret
= edit_save_block (edit
, tmp
, start
, finish
);
629 /* --------------------------------------------------------------------------------------------- */
632 pipe_mail (const edit_buffer_t
* buf
, char *to
, char *subject
, char *cc
)
637 to
= name_quote (to
, FALSE
);
640 subject
= name_quote (subject
, FALSE
);
643 cc
= name_quote (cc
, FALSE
);
645 s
= g_strdup_printf ("mail -s %s %s", subject
, to
);
648 s
= g_strdup_printf ("mail -s %s -c %s %s", subject
, cc
, to
);
668 for (i
= 0; i
< buf
->size
; i
++)
669 if (fputc (edit_buffer_get_byte (buf
, i
), p
) < 0)
675 /* --------------------------------------------------------------------------------------------- */
678 edit_insert_column_of_text (WEdit
* edit
, unsigned char *data
, off_t size
, long width
,
679 off_t
* start_pos
, off_t
* end_pos
, long *col1
, long *col2
)
684 cursor
= edit
->buffer
.curs1
;
685 col
= edit_get_col (edit
);
687 for (i
= 0; i
< size
; i
++)
690 edit_insert (edit
, data
[i
]);
692 { /* fill in and move to next line */
696 if (edit_buffer_get_current_byte (&edit
->buffer
) != '\n')
698 for (l
= width
- (edit_get_col (edit
) - col
); l
> 0; l
-= space_width
)
699 edit_insert (edit
, ' ');
701 for (p
= edit
->buffer
.curs1
;; p
++)
703 if (p
== edit
->buffer
.size
)
705 edit_cursor_move (edit
, edit
->buffer
.size
- edit
->buffer
.curs1
);
706 edit_insert_ahead (edit
, '\n');
710 if (edit_buffer_get_byte (&edit
->buffer
, p
) == '\n')
716 edit_cursor_move (edit
, edit_move_forward3 (edit
, p
, col
, 0) - edit
->buffer
.curs1
);
718 for (l
= col
- edit_get_col (edit
); l
>= space_width
; l
-= space_width
)
719 edit_insert (edit
, ' ');
726 *end_pos
= edit
->buffer
.curs1
;
727 edit_cursor_move (edit
, cursor
- edit
->buffer
.curs1
);
730 /* --------------------------------------------------------------------------------------------- */
732 * Callback for the iteration of objects in the 'editors' array.
733 * Toggle syntax highlighting in editor object.
735 * @param data probably WEdit object
736 * @param user_data unused
740 edit_syntax_onoff_cb (void *data
, void *user_data
)
744 if (edit_widget_is_editor (CONST_WIDGET (data
)))
746 WEdit
*edit
= EDIT (data
);
748 if (edit_options
.syntax_highlighting
)
749 edit_load_syntax (edit
, NULL
, edit
->syntax_type
);
750 edit
->force
|= REDRAW_PAGE
;
754 /* --------------------------------------------------------------------------------------------- */
757 editcmd_dialog_raw_key_query_cb (Widget
* w
, Widget
* sender
, widget_msg_t msg
, int parm
,
760 WDialog
*h
= DIALOG (w
);
769 return dlg_default_callback (w
, sender
, msg
, parm
, data
);
773 /* --------------------------------------------------------------------------------------------- */
774 /*** public functions ****************************************************************************/
775 /* --------------------------------------------------------------------------------------------- */
778 edit_refresh_cmd (void)
785 /* --------------------------------------------------------------------------------------------- */
787 * Toggle syntax highlighting in all editor windows.
789 * @param h root widget for all windows
793 edit_syntax_onoff_cmd (WDialog
* h
)
795 edit_options
.syntax_highlighting
= !edit_options
.syntax_highlighting
;
796 g_list_foreach (GROUP (h
)->widgets
, edit_syntax_onoff_cb
, NULL
);
797 widget_draw (WIDGET (h
));
800 /* --------------------------------------------------------------------------------------------- */
802 * Toggle tabs showing in all editor windows.
804 * @param h root widget for all windows
808 edit_show_tabs_tws_cmd (WDialog
* h
)
810 enable_show_tabs_tws
= !enable_show_tabs_tws
;
811 widget_draw (WIDGET (h
));
814 /* --------------------------------------------------------------------------------------------- */
816 * Toggle right margin showing in all editor windows.
818 * @param h root widget for all windows
822 edit_show_margin_cmd (WDialog
* h
)
824 edit_options
.show_right_margin
= !edit_options
.show_right_margin
;
825 widget_draw (WIDGET (h
));
828 /* --------------------------------------------------------------------------------------------- */
830 * Toggle line numbers showing in all editor windows.
832 * @param h root widget for all windows
836 edit_show_numbers_cmd (WDialog
* h
)
838 edit_options
.line_state
= !edit_options
.line_state
;
839 edit_options
.line_state_width
= edit_options
.line_state
? LINE_STATE_WIDTH
: 0;
840 widget_draw (WIDGET (h
));
843 /* --------------------------------------------------------------------------------------------- */
846 edit_save_mode_cmd (void)
848 char *str_result
= NULL
;
850 const char *str
[] = {
853 N_("&Do backups with following extension:")
859 for (i
= 0; i
< 3; i
++)
863 g_assert (edit_options
.backup_ext
!= NULL
);
866 quick_widget_t quick_widgets
[] = {
868 QUICK_RADIO (3, str
, &edit_options
.save_mode
, &edit_save_mode_radio_id
),
869 QUICK_INPUT (edit_options
.backup_ext
, "edit-backup-ext", &str_result
,
870 &edit_save_mode_input_id
, FALSE
, FALSE
, INPUT_COMPLETE_NONE
),
871 QUICK_SEPARATOR (TRUE
),
872 QUICK_CHECKBOX (N_("Check &POSIX new line"), &edit_options
.check_nl_at_eof
, NULL
),
873 QUICK_BUTTONS_OK_CANCEL
,
878 WRect r
= { -1, -1, 0, 38 };
880 quick_dialog_t qdlg
= {
881 r
, N_("Edit Save Mode"), "[Edit Save Mode]",
882 quick_widgets
, edit_save_mode_callback
, NULL
885 if (quick_dialog (&qdlg
) != B_CANCEL
)
887 g_free (edit_options
.backup_ext
);
888 edit_options
.backup_ext
= str_result
;
893 /* --------------------------------------------------------------------------------------------- */
896 edit_set_filename (WEdit
* edit
, const vfs_path_t
* name_vpath
)
898 vfs_path_free (edit
->filename_vpath
, TRUE
);
899 edit
->filename_vpath
= vfs_path_clone (name_vpath
);
901 if (edit
->dir_vpath
== NULL
)
902 edit
->dir_vpath
= vfs_path_clone (vfs_get_raw_current_dir ());
905 /* --------------------------------------------------------------------------------------------- */
906 /* Here we want to warn the users of overwriting an existing file,
907 but only if they have made a change to the filename */
908 /* returns TRUE on success */
910 edit_save_as_cmd (WEdit
* edit
)
912 /* This heads the 'Save As' dialog box */
913 vfs_path_t
*exp_vpath
;
915 gboolean different_filename
= FALSE
;
916 gboolean ret
= FALSE
;
918 if (!edit_check_newline (&edit
->buffer
))
921 exp_vpath
= edit_get_save_file_as (edit
);
922 edit_push_undo_action (edit
, KEY_PRESS
+ edit
->start_display
);
924 if (exp_vpath
!= NULL
&& vfs_path_len (exp_vpath
) != 0)
928 if (!vfs_path_equal (edit
->filename_vpath
, exp_vpath
))
933 if (mc_stat (exp_vpath
, &sb
) == 0 && !S_ISREG (sb
.st_mode
))
935 edit_error_dialog (_("Save as"),
937 ("Cannot save: destination is not a regular file")));
941 different_filename
= TRUE
;
942 file
= mc_open (exp_vpath
, O_RDONLY
| O_BINARY
);
945 edit
->stat1
.st_mode
|= S_IWUSR
;
948 /* the file exists */
950 /* Overwrite the current file or cancel the operation */
951 if (edit_query_dialog2
953 _("A file already exists with this name"), _("&Overwrite"), _("&Cancel")))
957 save_lock
= lock_file (exp_vpath
);
959 else if (!edit
->locked
&& !edit
->delete_file
)
960 /* filenames equal, check if already locked */
961 save_lock
= lock_file (exp_vpath
);
963 if (different_filename
)
964 /* Allow user to write into saved (under another name) file
965 * even if original file had r/o user permissions. */
966 edit
->stat1
.st_mode
|= S_IWUSR
;
968 rv
= edit_save_file (edit
, exp_vpath
);
972 /* Successful, so unlock both files */
973 if (different_filename
)
976 unlock_file (exp_vpath
);
978 edit
->locked
= unlock_file (edit
->filename_vpath
);
980 else if (edit
->locked
|| save_lock
)
981 edit
->locked
= unlock_file (edit
->filename_vpath
);
983 edit_set_filename (edit
, exp_vpath
);
984 if (edit
->lb
!= LB_ASIS
)
985 edit_reload (edit
, exp_vpath
);
987 edit
->delete_file
= 0;
988 if (different_filename
)
989 edit_load_syntax (edit
, NULL
, edit
->syntax_type
);
994 edit_error_dialog (_("Save as"), get_sys_error (_("Cannot save file")));
998 /* Failed, so maintain modify (not save) lock */
1000 unlock_file (exp_vpath
);
1006 vfs_path_free (exp_vpath
, TRUE
);
1007 edit
->force
|= REDRAW_COMPLETELY
;
1011 /* --------------------------------------------------------------------------------------------- */
1012 /** returns TRUE on success */
1015 edit_save_confirm_cmd (WEdit
* edit
)
1017 if (edit
->filename_vpath
== NULL
)
1018 return edit_save_as_cmd (edit
);
1020 if (!edit_check_newline (&edit
->buffer
))
1023 if (edit_options
.confirm_save
)
1028 f
= g_strdup_printf (_("Confirm save file: \"%s\""),
1029 vfs_path_as_str (edit
->filename_vpath
));
1030 ok
= (edit_query_dialog2 (_("Save file"), f
, _("&Save"), _("&Cancel")) == 0);
1036 return edit_save_cmd (edit
);
1039 /* --------------------------------------------------------------------------------------------- */
1041 * Ask file to edit and load it.
1043 * @return TRUE on success or cancel of ask.
1047 edit_load_cmd (WDialog
* h
)
1050 gboolean ret
= TRUE
; /* possible cancel */
1052 exp
= input_expand_dialog (_("Load"), _("Enter file name:"),
1053 MC_HISTORY_EDIT_LOAD
, INPUT_LAST_TEXT
,
1054 INPUT_COMPLETE_FILENAMES
| INPUT_COMPLETE_CD
);
1056 if (exp
!= NULL
&& *exp
!= '\0')
1058 vfs_path_t
*exp_vpath
;
1060 exp_vpath
= vfs_path_from_str (exp
);
1061 ret
= edit_load_file_from_filename (h
, exp_vpath
, 0);
1062 vfs_path_free (exp_vpath
, TRUE
);
1070 /* --------------------------------------------------------------------------------------------- */
1074 * @param h screen the owner of editor window
1075 * @param vpath vfs file path
1076 * @param line line number
1078 * @return TRUE if file content was successfully loaded, FALSE otherwise
1082 edit_load_file_from_filename (WDialog
* h
, const vfs_path_t
* vpath
, long line
)
1084 WRect r
= WIDGET (h
)->rect
;
1086 rect_grow (&r
, -1, 0);
1088 return edit_add_window (h
, &r
, vpath
, line
);
1091 /* --------------------------------------------------------------------------------------------- */
1093 * Show history od edited or viewed files and open selected file.
1095 * @return TRUE on success, FALSE otherwise.
1099 edit_load_file_from_history (WDialog
* h
)
1103 gboolean ret
= TRUE
; /* possible cancel */
1105 exp
= show_file_history (CONST_WIDGET (h
), &action
);
1106 if (exp
!= NULL
&& (action
== CK_Edit
|| action
== CK_Enter
))
1108 vfs_path_t
*exp_vpath
;
1110 exp_vpath
= vfs_path_from_str (exp
);
1111 ret
= edit_load_file_from_filename (h
, exp_vpath
, 0);
1112 vfs_path_free (exp_vpath
, TRUE
);
1120 /* --------------------------------------------------------------------------------------------- */
1122 * Load syntax file to edit.
1124 * @return TRUE on success
1128 edit_load_syntax_file (WDialog
* h
)
1130 vfs_path_t
*extdir_vpath
;
1132 gboolean ret
= FALSE
;
1134 if (geteuid () == 0)
1135 dir
= query_dialog (_("Syntax file edit"),
1136 _("Which syntax file you want to edit?"), D_NORMAL
, 2,
1137 _("&User"), _("&System wide"));
1140 vfs_path_build_filename (mc_global
.sysconfig_dir
, EDIT_SYNTAX_FILE
, (char *) NULL
);
1141 if (!exist_file (vfs_path_get_last_path_str (extdir_vpath
)))
1143 vfs_path_free (extdir_vpath
, TRUE
);
1145 vfs_path_build_filename (mc_global
.share_data_dir
, EDIT_SYNTAX_FILE
, (char *) NULL
);
1150 vfs_path_t
*user_syntax_file_vpath
;
1152 user_syntax_file_vpath
= mc_config_get_full_vpath (EDIT_SYNTAX_FILE
);
1153 check_for_default (extdir_vpath
, user_syntax_file_vpath
);
1154 ret
= edit_load_file_from_filename (h
, user_syntax_file_vpath
, 0);
1155 vfs_path_free (user_syntax_file_vpath
, TRUE
);
1158 ret
= edit_load_file_from_filename (h
, extdir_vpath
, 0);
1160 vfs_path_free (extdir_vpath
, TRUE
);
1165 /* --------------------------------------------------------------------------------------------- */
1167 * Load menu file to edit.
1169 * @return TRUE on success
1173 edit_load_menu_file (WDialog
* h
)
1175 vfs_path_t
*buffer_vpath
;
1176 vfs_path_t
*menufile_vpath
;
1181 dir
= query_dialog (_("Menu edit"),
1182 _("Which menu file do you want to edit?"), D_NORMAL
,
1183 geteuid () != 0 ? 2 : 3, _("&Local"), _("&User"), _("&System wide"));
1186 vfs_path_build_filename (mc_global
.sysconfig_dir
, EDIT_GLOBAL_MENU
, (char *) NULL
);
1187 if (!exist_file (vfs_path_get_last_path_str (menufile_vpath
)))
1189 vfs_path_free (menufile_vpath
, TRUE
);
1191 vfs_path_build_filename (mc_global
.share_data_dir
, EDIT_GLOBAL_MENU
, (char *) NULL
);
1197 buffer_vpath
= vfs_path_from_str (EDIT_LOCAL_MENU
);
1198 check_for_default (menufile_vpath
, buffer_vpath
);
1199 chmod (vfs_path_get_last_path_str (buffer_vpath
), 0600);
1203 buffer_vpath
= mc_config_get_full_vpath (EDIT_HOME_MENU
);
1204 check_for_default (menufile_vpath
, buffer_vpath
);
1209 vfs_path_build_filename (mc_global
.sysconfig_dir
, EDIT_GLOBAL_MENU
, (char *) NULL
);
1210 if (!exist_file (vfs_path_get_last_path_str (buffer_vpath
)))
1212 vfs_path_free (buffer_vpath
, TRUE
);
1214 vfs_path_build_filename (mc_global
.share_data_dir
, EDIT_GLOBAL_MENU
, (char *) NULL
);
1219 vfs_path_free (menufile_vpath
, TRUE
);
1223 ret
= edit_load_file_from_filename (h
, buffer_vpath
, 0);
1225 vfs_path_free (buffer_vpath
, TRUE
);
1226 vfs_path_free (menufile_vpath
, TRUE
);
1231 /* --------------------------------------------------------------------------------------------- */
1233 * Close window with opened file.
1235 * @return TRUE if file was closed.
1239 edit_close_cmd (WEdit
* edit
)
1243 ret
= (edit
!= NULL
) && edit_ok_to_exit (edit
);
1247 Widget
*w
= WIDGET (edit
);
1248 WGroup
*g
= w
->owner
;
1250 if (edit
->locked
!= 0)
1251 unlock_file (edit
->filename_vpath
);
1253 group_remove_widget (w
);
1256 if (edit_widget_is_editor (CONST_WIDGET (g
->current
->data
)))
1257 edit
= EDIT (g
->current
->data
);
1260 edit
= edit_find_editor (DIALOG (g
));
1262 widget_select (WIDGET (edit
));
1267 edit
->force
|= REDRAW_COMPLETELY
;
1272 /* --------------------------------------------------------------------------------------------- */
1275 edit_block_copy_cmd (WEdit
* edit
)
1277 off_t start_mark
, end_mark
, current
= edit
->buffer
.curs1
;
1278 off_t mark1
= 0, mark2
= 0;
1279 long c1
= 0, c2
= 0;
1281 unsigned char *copy_buf
;
1283 edit_update_curs_col (edit
);
1284 if (!eval_marks (edit
, &start_mark
, &end_mark
))
1287 copy_buf
= edit_get_block (edit
, start_mark
, end_mark
, &size
);
1289 /* all that gets pushed are deletes hence little space is used on the stack */
1291 edit_push_markers (edit
);
1293 if (edit
->column_highlight
)
1297 col_delta
= labs (edit
->column2
- edit
->column1
);
1298 edit_insert_column_of_text (edit
, copy_buf
, size
, col_delta
, &mark1
, &mark2
, &c1
, &c2
);
1302 int size_orig
= size
;
1305 edit_insert_ahead (edit
, copy_buf
[size
]);
1307 /* Place cursor at the end of text selection */
1308 if (edit_options
.cursor_after_inserted_block
)
1309 edit_cursor_move (edit
, size_orig
);
1313 edit_scroll_screen_over_cursor (edit
);
1315 if (edit
->column_highlight
)
1316 edit_set_markers (edit
, edit
->buffer
.curs1
, mark2
, c1
, c2
);
1317 else if (start_mark
< current
&& end_mark
> current
)
1318 edit_set_markers (edit
, start_mark
, end_mark
+ end_mark
- start_mark
, 0, 0);
1320 edit
->force
|= REDRAW_PAGE
;
1324 /* --------------------------------------------------------------------------------------------- */
1327 edit_block_move_cmd (WEdit
* edit
)
1330 unsigned char *copy_buf
= NULL
;
1331 off_t start_mark
, end_mark
;
1333 if (!eval_marks (edit
, &start_mark
, &end_mark
))
1336 if (!edit
->column_highlight
&& edit
->buffer
.curs1
> start_mark
&& edit
->buffer
.curs1
< end_mark
)
1339 if (edit
->mark2
< 0)
1340 edit_mark_cmd (edit
, FALSE
);
1341 edit_push_markers (edit
);
1343 if (edit
->column_highlight
)
1347 long c1
, c2
, b_width
;
1351 c1
= MIN (edit
->column1
, edit
->column2
);
1352 c2
= MAX (edit
->column1
, edit
->column2
);
1355 edit_update_curs_col (edit
);
1358 x2
= x
+ edit
->over_col
;
1360 /* do nothing when cursor inside first line of selected area */
1361 b1
= edit_buffer_get_eol (&edit
->buffer
, edit
->buffer
.curs1
);
1362 b2
= edit_buffer_get_eol (&edit
->buffer
, start_mark
);
1363 if (b1
== b2
&& x2
> c1
&& x2
<= c2
)
1366 if (edit
->buffer
.curs1
> start_mark
1367 && edit
->buffer
.curs1
< edit_buffer_get_eol (&edit
->buffer
, end_mark
))
1371 else if (x
> c1
&& x
<= c2
)
1374 /* save current selection into buffer */
1375 copy_buf
= edit_get_block (edit
, start_mark
, end_mark
, &size
);
1377 /* remove current selection */
1378 edit_block_delete_cmd (edit
);
1380 edit
->over_col
= MAX (0, edit
->over_col
- b_width
);
1381 /* calculate the cursor pos after delete block */
1382 b1
= edit_buffer_get_current_bol (&edit
->buffer
);
1383 current
= edit_move_forward3 (edit
, b1
, x
, 0);
1384 edit_cursor_move (edit
, current
- edit
->buffer
.curs1
);
1385 edit_scroll_screen_over_cursor (edit
);
1387 /* add TWS if need before block insertion */
1388 if (edit_options
.cursor_beyond_eol
&& edit
->over_col
> 0)
1389 edit_insert_over (edit
);
1391 edit_insert_column_of_text (edit
, copy_buf
, size
, b_width
, &mark1
, &mark2
, &c1
, &c2
);
1392 edit_set_markers (edit
, mark1
, mark2
, c1
, c2
);
1396 off_t count
, count_orig
;
1399 current
= edit
->buffer
.curs1
;
1400 copy_buf
= g_malloc0 (end_mark
- start_mark
);
1401 edit_cursor_move (edit
, start_mark
- edit
->buffer
.curs1
);
1402 edit_scroll_screen_over_cursor (edit
);
1404 for (count
= start_mark
; count
< end_mark
; count
++)
1405 copy_buf
[end_mark
- count
- 1] = edit_delete (edit
, TRUE
);
1407 edit_scroll_screen_over_cursor (edit
);
1408 x
= current
> edit
->buffer
.curs1
? end_mark
- start_mark
: 0;
1409 edit_cursor_move (edit
, current
- edit
->buffer
.curs1
- x
);
1410 edit_scroll_screen_over_cursor (edit
);
1412 while (count
-- > start_mark
)
1413 edit_insert_ahead (edit
, copy_buf
[end_mark
- count
- 1]);
1415 edit_set_markers (edit
, edit
->buffer
.curs1
, edit
->buffer
.curs1
+ end_mark
- start_mark
, 0,
1418 /* Place cursor at the end of text selection */
1419 if (edit_options
.cursor_after_inserted_block
)
1420 edit_cursor_move (edit
, count_orig
- start_mark
);
1423 edit_scroll_screen_over_cursor (edit
);
1425 edit
->force
|= REDRAW_PAGE
;
1428 /* --------------------------------------------------------------------------------------------- */
1429 /** returns FALSE if canceelled by user */
1432 edit_block_delete_cmd (WEdit
* edit
)
1434 off_t start_mark
, end_mark
;
1436 if (eval_marks (edit
, &start_mark
, &end_mark
))
1437 return edit_block_delete (edit
, start_mark
, end_mark
);
1439 edit_delete_line (edit
);
1444 /* --------------------------------------------------------------------------------------------- */
1446 * Check if it's OK to close the file. If there are unsaved changes, ask user.
1448 * @return TRUE if it's OK to exit, FALSE to continue editing.
1452 edit_ok_to_exit (WEdit
* edit
)
1454 const char *fname
= N_("[NoName]");
1458 if (!edit
->modified
)
1461 if (edit
->filename_vpath
!= NULL
)
1462 fname
= vfs_path_as_str (edit
->filename_vpath
);
1468 if (!mc_global
.midnight_shutdown
)
1472 msg
= g_strdup_printf (_("File %s was modified.\nSave before close?"), fname
);
1473 act
= edit_query_dialog3 (_("Close file"), msg
, _("&Yes"), _("&No"), _("&Cancel"));
1477 msg
= g_strdup_printf (_("Midnight Commander is being shut down.\nSave modified file %s?"),
1479 act
= edit_query_dialog2 (_("Quit"), msg
, _("&Yes"), _("&No"));
1491 if (!mc_global
.midnight_shutdown
&& !edit_check_newline (&edit
->buffer
))
1493 edit_push_markers (edit
);
1494 edit_set_markers (edit
, 0, 0, 0, 0);
1495 if (!edit_save_cmd (edit
) || mc_global
.midnight_shutdown
)
1496 return mc_global
.midnight_shutdown
;
1501 case 2: /* Cancel quit */
1509 /* --------------------------------------------------------------------------------------------- */
1510 /** save block, returns TRUE on success */
1513 edit_save_block (WEdit
* edit
, const char *filename
, off_t start
, off_t finish
)
1519 vpath
= vfs_path_from_str (filename
);
1520 file
= mc_open (vpath
, O_CREAT
| O_WRONLY
| O_TRUNC
,
1521 S_IRUSR
| S_IWUSR
| S_IRGRP
| S_IROTH
| O_BINARY
);
1522 vfs_path_free (vpath
, TRUE
);
1526 if (edit
->column_highlight
)
1530 r
= mc_write (file
, VERTICAL_MAGIC
, sizeof (VERTICAL_MAGIC
));
1533 unsigned char *block
, *p
;
1535 p
= block
= edit_get_block (edit
, start
, finish
, &len
);
1538 r
= mc_write (file
, p
, len
);
1552 len
= finish
- start
;
1553 buf
= g_malloc0 (TEMP_BUF_LEN
);
1554 while (start
!= finish
)
1558 end
= MIN (finish
, start
+ TEMP_BUF_LEN
);
1559 for (; i
< end
; i
++)
1560 buf
[i
- start
] = edit_buffer_get_byte (&edit
->buffer
, i
);
1561 len
-= mc_write (file
, (char *) buf
, end
- start
);
1571 /* --------------------------------------------------------------------------------------------- */
1574 edit_paste_from_history (WEdit
* edit
)
1577 edit_error_dialog (_("Error"), _("This function is not implemented"));
1580 /* --------------------------------------------------------------------------------------------- */
1583 edit_copy_to_X_buf_cmd (WEdit
* edit
)
1585 off_t start_mark
, end_mark
;
1587 if (!eval_marks (edit
, &start_mark
, &end_mark
))
1590 if (!edit_save_block_to_clip_file (edit
, start_mark
, end_mark
))
1592 edit_error_dialog (_("Copy to clipboard"), get_sys_error (_("Unable to save to file")));
1595 /* try use external clipboard utility */
1596 mc_event_raise (MCEVENT_GROUP_CORE
, "clipboard_file_to_ext_clip", NULL
);
1598 if (edit_options
.drop_selection_on_copy
)
1599 edit_mark_cmd (edit
, TRUE
);
1604 /* --------------------------------------------------------------------------------------------- */
1607 edit_cut_to_X_buf_cmd (WEdit
* edit
)
1609 off_t start_mark
, end_mark
;
1611 if (!eval_marks (edit
, &start_mark
, &end_mark
))
1614 if (!edit_save_block_to_clip_file (edit
, start_mark
, end_mark
))
1616 edit_error_dialog (_("Cut to clipboard"), _("Unable to save to file"));
1619 /* try use external clipboard utility */
1620 mc_event_raise (MCEVENT_GROUP_CORE
, "clipboard_file_to_ext_clip", NULL
);
1622 edit_block_delete_cmd (edit
);
1623 edit_mark_cmd (edit
, TRUE
);
1628 /* --------------------------------------------------------------------------------------------- */
1631 edit_paste_from_X_buf_cmd (WEdit
* edit
)
1636 /* try use external clipboard utility */
1637 mc_event_raise (MCEVENT_GROUP_CORE
, "clipboard_file_from_ext_clip", NULL
);
1638 tmp
= mc_config_get_full_vpath (EDIT_HOME_CLIP_FILE
);
1639 ret
= (edit_insert_file (edit
, tmp
) >= 0);
1640 vfs_path_free (tmp
, TRUE
);
1645 /* --------------------------------------------------------------------------------------------- */
1647 * Ask user for the line and go to that line.
1648 * Negative numbers mean line from the end (i.e. -1 is the last line).
1652 edit_goto_cmd (WEdit
* edit
)
1654 static gboolean first_run
= TRUE
;
1660 f
= input_dialog (_("Goto line"), _("Enter line:"), MC_HISTORY_EDIT_GOTO_LINE
,
1661 first_run
? NULL
: INPUT_LAST_TEXT
, INPUT_COMPLETE_NONE
);
1662 if (f
== NULL
|| *f
== '\0')
1668 l
= strtol (f
, &error
, 0);
1676 l
= edit
->buffer
.lines
+ l
+ 2;
1678 edit_move_display (edit
, l
- WIDGET (edit
)->rect
.lines
/ 2 - 1);
1679 edit_move_to_line (edit
, l
- 1);
1680 edit
->force
|= REDRAW_COMPLETELY
;
1686 /* --------------------------------------------------------------------------------------------- */
1687 /** Return TRUE on success */
1690 edit_save_block_cmd (WEdit
* edit
)
1692 off_t start_mark
, end_mark
;
1694 gboolean ret
= FALSE
;
1696 if (!eval_marks (edit
, &start_mark
, &end_mark
))
1699 tmp
= mc_config_get_full_path (EDIT_HOME_CLIP_FILE
);
1701 input_expand_dialog (_("Save block"), _("Enter file name:"),
1702 MC_HISTORY_EDIT_SAVE_BLOCK
, tmp
, INPUT_COMPLETE_FILENAMES
);
1704 edit_push_undo_action (edit
, KEY_PRESS
+ edit
->start_display
);
1706 if (exp
!= NULL
&& *exp
!= '\0')
1708 if (edit_save_block (edit
, exp
, start_mark
, end_mark
))
1711 edit_error_dialog (_("Save block"), get_sys_error (_("Cannot save file")));
1713 edit
->force
|= REDRAW_COMPLETELY
;
1721 /* --------------------------------------------------------------------------------------------- */
1723 /** returns TRUE on success */
1725 edit_insert_file_cmd (WEdit
* edit
)
1729 gboolean ret
= FALSE
;
1731 tmp
= mc_config_get_full_path (EDIT_HOME_CLIP_FILE
);
1732 exp
= input_expand_dialog (_("Insert file"), _("Enter file name:"),
1733 MC_HISTORY_EDIT_INSERT_FILE
, tmp
, INPUT_COMPLETE_FILENAMES
);
1736 edit_push_undo_action (edit
, KEY_PRESS
+ edit
->start_display
);
1738 if (exp
!= NULL
&& *exp
!= '\0')
1740 vfs_path_t
*exp_vpath
;
1742 exp_vpath
= vfs_path_from_str (exp
);
1743 ret
= (edit_insert_file (edit
, exp_vpath
) >= 0);
1744 vfs_path_free (exp_vpath
, TRUE
);
1747 edit_error_dialog (_("Insert file"), get_sys_error (_("Cannot insert file")));
1752 edit
->force
|= REDRAW_COMPLETELY
;
1756 /* --------------------------------------------------------------------------------------------- */
1757 /** sorts a block, returns -1 on system fail, 1 on cancel and 0 on success */
1760 edit_sort_cmd (WEdit
* edit
)
1762 char *exp
, *tmp
, *tmp_edit_block_name
, *tmp_edit_temp_name
;
1763 off_t start_mark
, end_mark
;
1766 if (!eval_marks (edit
, &start_mark
, &end_mark
))
1768 edit_error_dialog (_("Sort block"), _("You must first highlight a block of text"));
1772 tmp
= mc_config_get_full_path (EDIT_HOME_BLOCK_FILE
);
1773 edit_save_block (edit
, tmp
, start_mark
, end_mark
);
1776 exp
= input_dialog (_("Run sort"),
1777 _("Enter sort options (see sort(1) manpage) separated by whitespace:"),
1778 MC_HISTORY_EDIT_SORT
, INPUT_LAST_TEXT
, INPUT_COMPLETE_NONE
);
1783 tmp_edit_block_name
= mc_config_get_full_path (EDIT_HOME_BLOCK_FILE
);
1784 tmp_edit_temp_name
= mc_config_get_full_path (EDIT_HOME_TEMP_FILE
);
1786 g_strconcat (" sort ", exp
, " ", tmp_edit_block_name
,
1787 " > ", tmp_edit_temp_name
, (char *) NULL
);
1788 g_free (tmp_edit_temp_name
);
1789 g_free (tmp_edit_block_name
);
1796 if (e
== -1 || e
== 127)
1797 edit_error_dialog (_("Sort"), get_sys_error (_("Cannot execute sort command")));
1802 sprintf (q
, "%d ", e
);
1803 tmp
= g_strdup_printf (_("Sort returned non-zero: %s"), q
);
1804 edit_error_dialog (_("Sort"), tmp
);
1811 edit
->force
|= REDRAW_COMPLETELY
;
1813 if (!edit_block_delete_cmd (edit
))
1817 vfs_path_t
*tmp_vpath
;
1819 tmp_vpath
= mc_config_get_full_vpath (EDIT_HOME_TEMP_FILE
);
1820 edit_insert_file (edit
, tmp_vpath
);
1821 vfs_path_free (tmp_vpath
, TRUE
);
1827 /* --------------------------------------------------------------------------------------------- */
1829 * Ask user for a command, execute it and paste its output back to the
1834 edit_ext_cmd (WEdit
* edit
)
1836 char *exp
, *tmp
, *tmp_edit_temp_file
;
1840 input_dialog (_("Paste output of external command"),
1841 _("Enter shell command(s):"), MC_HISTORY_EDIT_PASTE_EXTCMD
, INPUT_LAST_TEXT
,
1842 INPUT_COMPLETE_FILENAMES
| INPUT_COMPLETE_VARIABLES
| INPUT_COMPLETE_USERNAMES
1843 | INPUT_COMPLETE_HOSTNAMES
| INPUT_COMPLETE_CD
| INPUT_COMPLETE_COMMANDS
|
1844 INPUT_COMPLETE_SHELL_ESC
);
1849 tmp_edit_temp_file
= mc_config_get_full_path (EDIT_HOME_TEMP_FILE
);
1850 tmp
= g_strconcat (exp
, " > ", tmp_edit_temp_file
, (char *) NULL
);
1851 g_free (tmp_edit_temp_file
);
1858 edit_error_dialog (_("External command"), get_sys_error (_("Cannot execute command")));
1862 edit
->force
|= REDRAW_COMPLETELY
;
1865 vfs_path_t
*tmp_vpath
;
1867 tmp_vpath
= mc_config_get_full_vpath (EDIT_HOME_TEMP_FILE
);
1868 edit_insert_file (edit
, tmp_vpath
);
1869 vfs_path_free (tmp_vpath
, TRUE
);
1875 /* --------------------------------------------------------------------------------------------- */
1876 /** if block is 1, a block must be highlighted and the shell command
1877 processes it. If block is 0 the shell command is a straight system
1878 command, that just produces some output which is to be inserted */
1881 edit_block_process_cmd (WEdit
* edit
, int macro_number
)
1884 char *macros_fname
= NULL
;
1886 fname
= g_strdup_printf ("%s.%i.sh", EDIT_HOME_MACRO_FILE
, macro_number
);
1887 macros_fname
= g_build_filename (mc_config_get_data_path (), fname
, (char *) NULL
);
1888 edit_user_menu (edit
, macros_fname
, 0);
1890 g_free (macros_fname
);
1891 edit
->force
|= REDRAW_COMPLETELY
;
1894 /* --------------------------------------------------------------------------------------------- */
1897 edit_mail_dialog (WEdit
* edit
)
1899 char *mail_to
, *mail_subject
, *mail_cc
;
1901 quick_widget_t quick_widgets
[] = {
1903 QUICK_LABEL (N_("mail -s <subject> -c <cc> <to>"), NULL
),
1904 QUICK_LABELED_INPUT (N_("To"), input_label_above
,
1905 INPUT_LAST_TEXT
, "mail-dlg-input-3",
1906 &mail_to
, NULL
, FALSE
, FALSE
, INPUT_COMPLETE_USERNAMES
),
1907 QUICK_LABELED_INPUT (N_("Subject"), input_label_above
,
1908 INPUT_LAST_TEXT
, "mail-dlg-input-2",
1909 &mail_subject
, NULL
, FALSE
, FALSE
, INPUT_COMPLETE_NONE
),
1910 QUICK_LABELED_INPUT (N_("Copies to"), input_label_above
,
1911 INPUT_LAST_TEXT
, "mail-dlg-input",
1912 &mail_cc
, NULL
, FALSE
, FALSE
, INPUT_COMPLETE_USERNAMES
),
1913 QUICK_BUTTONS_OK_CANCEL
,
1918 WRect r
= { -1, -1, 0, 50 };
1920 quick_dialog_t qdlg
= {
1921 r
, N_("Mail"), "[Input Line Keys]",
1922 quick_widgets
, NULL
, NULL
1925 if (quick_dialog (&qdlg
) != B_CANCEL
)
1927 pipe_mail (&edit
->buffer
, mail_to
, mail_subject
, mail_cc
);
1929 g_free (mail_subject
);
1934 /* --------------------------------------------------------------------------------------------- */
1938 edit_select_codepage_cmd (WEdit
* edit
)
1940 if (do_select_codepage ())
1941 edit_set_codeset (edit
);
1943 edit
->force
= REDRAW_PAGE
;
1944 widget_draw (WIDGET (edit
));
1948 /* --------------------------------------------------------------------------------------------- */
1951 edit_insert_literal_cmd (WEdit
* edit
)
1953 int char_for_insertion
;
1955 char_for_insertion
= editcmd_dialog_raw_key_query (_("Insert literal"),
1956 _("Press any key:"), FALSE
);
1957 edit_execute_key_command (edit
, -1, ascii_alpha_to_cntrl (char_for_insertion
));
1960 /* --------------------------------------------------------------------------------------------- */
1963 edit_load_forward_cmd (WEdit
* edit
)
1966 && edit_query_dialog2 (_("Warning"),
1967 _("Current text was modified without a file save.\n"
1968 "Continue discards these changes."), _("C&ontinue"),
1971 edit
->force
|= REDRAW_COMPLETELY
;
1975 if (edit_stack_iterator
+ 1 >= MAX_HISTORY_MOVETO
)
1978 if (edit_history_moveto
[edit_stack_iterator
+ 1].line
< 1)
1981 edit_stack_iterator
++;
1982 if (edit_history_moveto
[edit_stack_iterator
].filename_vpath
!= NULL
)
1983 return edit_reload_line (edit
, edit_history_moveto
[edit_stack_iterator
].filename_vpath
,
1984 edit_history_moveto
[edit_stack_iterator
].line
);
1989 /* --------------------------------------------------------------------------------------------- */
1992 edit_load_back_cmd (WEdit
* edit
)
1995 && edit_query_dialog2 (_("Warning"),
1996 _("Current text was modified without a file save.\n"
1997 "Continue discards these changes."), _("C&ontinue"),
2000 edit
->force
|= REDRAW_COMPLETELY
;
2004 /* we are in the bottom of the stack, NO WAY! */
2005 if (edit_stack_iterator
== 0)
2008 edit_stack_iterator
--;
2009 if (edit_history_moveto
[edit_stack_iterator
].filename_vpath
!= NULL
)
2010 return edit_reload_line (edit
, edit_history_moveto
[edit_stack_iterator
].filename_vpath
,
2011 edit_history_moveto
[edit_stack_iterator
].line
);
2016 /* --------------------------------------------------------------------------------------------- */
2018 /* gets a raw key from the keyboard. Passing cancel = 1 draws
2019 a cancel button thus allowing c-c etc. Alternatively, cancel = 0
2020 will return the next key pressed. ctrl-a (=B_CANCEL), ctrl-g, ctrl-c,
2021 and Esc are cannot returned */
2024 editcmd_dialog_raw_key_query (const char *heading
, const char *query
, gboolean cancel
)
2031 w
= str_term_width1 (heading
) + 6;
2032 wq
= str_term_width1 (query
);
2033 w
= MAX (w
, wq
+ 3 * 2 + 1 + 2);
2036 dlg_create (TRUE
, 0, 0, cancel
? 7 : 5, w
, WPOS_CENTER
| WPOS_TRYUP
, FALSE
, dialog_colors
,
2037 editcmd_dialog_raw_key_query_cb
, NULL
, NULL
, heading
);
2038 g
= GROUP (raw_dlg
);
2039 widget_want_tab (WIDGET (raw_dlg
), TRUE
);
2041 group_add_widget (g
, label_new (y
, 3, query
));
2042 group_add_widget (g
,
2043 input_new (y
++, 3 + wq
+ 1, input_colors
, w
- (6 + wq
+ 1), "", 0,
2044 INPUT_COMPLETE_NONE
));
2047 group_add_widget (g
, hline_new (y
++, -1, -1));
2048 /* Button w/o hotkey to allow use any key as raw or macro one */
2049 group_add_widget_autopos (g
, button_new (y
, 1, B_CANCEL
, NORMAL_BUTTON
, _("Cancel"), NULL
),
2050 WPOS_KEEP_TOP
| WPOS_CENTER_HORZ
, NULL
);
2053 w
= dlg_run (raw_dlg
);
2054 widget_destroy (WIDGET (raw_dlg
));
2056 return (cancel
&& (w
== ESC_CHAR
|| w
== B_CANCEL
)) ? 0 : w
;
2059 /* --------------------------------------------------------------------------------------------- */