Ticket #1649: Prepare for prerelease mc-4.7.0-pre3 (code cleanup)
[midnight-commander/osp/navarfil.git] / edit / editmenu.c
blob344b232fc487c0fdc7f9bad56a3bd220ec1baa5b
1 /* editor menu definitions and initialisation
3 Copyright (C) 1996, 1998, 2001, 2002, 2003, 2005, 2007
4 Free Software Foundation, Inc.
6 Authors: 1996, 1997 Paul Sheer
8 This program is free software; you can redistribute it and/or modify
9 it under the terms of the GNU General Public License as published by
10 the Free Software Foundation; either version 2 of the License, or
11 (at your option) any later version.
13 This program is distributed in the hope that it will be useful,
14 but WITHOUT ANY WARRANTY; without even the implied warranty of
15 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
16 GNU General Public License for more details.
18 You should have received a copy of the GNU General Public License
19 along with this program; if not, write to the Free Software
20 Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA
21 02110-1301, USA.
24 /** \file
25 * \brief Source: editor menu definitions and initialisation
26 * \author Paul Sheer
27 * \date 1996, 1997
30 #include <config.h>
32 #include <stdio.h>
33 #include <stdarg.h>
34 #include <sys/types.h>
35 #include <unistd.h>
36 #include <string.h>
37 #include <ctype.h>
38 #include <errno.h>
39 #include <sys/stat.h>
40 #include <stdlib.h>
42 #include "../src/global.h"
44 #include "edit-impl.h"
45 #include "edit-widget.h"
47 #include "../src/tty/tty.h" /* KEY_F */
48 #include "../src/tty/key.h" /* XCTRL */
50 #include "../src/cmd.h" /* save_setup_cmd() */
51 #include "../src/wtools.h" /* query_dialog() */
52 #include "../src/menu.h" /* menu_entry */
53 #include "../src/main.h" /* drop_menus */
54 #include "../src/learn.h" /* learn_keys */
56 #include "edit-widget.h"
57 #include "../src/cmddef.h"
59 static void
60 menu_cmd (int command)
62 edit_execute_key_command (wedit, command, -1);
63 edit_update_screen (wedit);
66 static void menu_key (int i)
68 send_message ((Widget *) wedit, WIDGET_KEY, i);
71 static void
72 edit_about_cmd (void)
74 query_dialog (_(" About "),
75 _("\n Cooledit v3.11.5\n\n"
76 " Copyright (C) 1996 the Free Software Foundation\n\n"
77 " A user friendly text editor written\n"
78 " for the Midnight Commander.\n"), D_NORMAL,
79 1, _("&OK"));
82 static void
83 menu_mail_cmd (void)
85 menu_cmd (CK_Mail);
88 static void
89 menu_load_cmd (void)
91 menu_cmd (CK_Load);
94 static void
95 menu_new_cmd (void)
97 menu_cmd (CK_New);
100 static void
101 menu_save_cmd (void)
103 menu_cmd (CK_Save);
106 static void
107 menu_save_as_cmd (void)
109 menu_cmd (CK_Save_As);
112 static void
113 menu_insert_file_cmd (void)
115 menu_cmd (CK_Insert_File);
118 static void
119 menu_quit_cmd (void)
121 menu_cmd (CK_Exit);
124 static void
125 menu_mark_cmd (void)
127 menu_cmd (CK_Mark);
130 static void
131 menu_markcol_cmd (void)
133 menu_cmd (CK_Column_Mark);
136 static void
137 menu_ins_cmd (void)
139 menu_cmd (CK_Toggle_Insert);
142 static void
143 menu_copy_cmd (void)
145 menu_cmd (CK_Copy);
148 static void
149 menu_move_cmd (void)
151 menu_cmd (CK_Move);
154 static void
155 menu_delete_cmd (void)
157 menu_cmd (CK_Remove);
160 static void
161 menu_xstore_cmd (void)
163 menu_cmd (CK_XStore);
166 static void
167 menu_xcut_cmd (void)
169 menu_cmd (CK_XCut);
172 static void
173 menu_xpaste_cmd (void)
175 menu_cmd (CK_XPaste);
178 static void
179 menu_toggle_bookmark_cmd (void)
181 menu_cmd (CK_Toggle_Bookmark);
184 static void
185 menu_flush_bookmark_cmd (void)
187 menu_cmd (CK_Flush_Bookmarks);
190 static void
191 menu_next_bookmark_cmd (void)
193 menu_cmd (CK_Next_Bookmark);
196 static void
197 menu_prev_bookmark_cmd (void)
199 menu_cmd (CK_Prev_Bookmark);
202 static void
203 menu_cut_cmd (void)
205 menu_cmd (CK_Save_Block);
208 static void
209 menu_search_cmd (void)
211 menu_cmd (CK_Find);
214 static void
215 menu_search_again_cmd (void)
217 menu_cmd (CK_Find_Again);
220 static void
221 menu_replace_cmd (void)
223 menu_cmd (CK_Replace);
226 static void
227 menu_select_codepage_cmd (void)
229 menu_cmd (CK_SelectCodepage);
232 static void
233 menu_begin_record_cmd (void)
235 menu_cmd (CK_Begin_Record_Macro);
238 static void
239 menu_end_record_cmd (void)
241 menu_cmd (CK_End_Record_Macro);
244 static void
245 menu_exec_macro_cmd (void)
247 menu_key (XCTRL ('a'));
250 static void
251 menu_exec_macro_delete_cmd (void)
253 menu_cmd (CK_Delete_Macro);
256 static void
257 menu_c_form_cmd (void)
259 menu_key (KEY_F (19));
262 static void
263 menu_ispell_cmd (void)
265 menu_cmd (CK_Pipe_Block (1));
268 static void
269 menu_sort_cmd (void)
271 menu_cmd (CK_Sort);
274 static void
275 menu_ext_cmd (void)
277 menu_cmd (CK_ExtCmd);
280 static void
281 menu_date_cmd (void)
283 menu_cmd (CK_Date);
286 static void
287 menu_undo_cmd (void)
289 menu_cmd (CK_Undo);
292 static void
293 menu_beginning_cmd (void)
295 menu_cmd (CK_Beginning_Of_Text);
298 static void
299 menu_end_cmd (void)
301 menu_cmd (CK_End_Of_Text);
304 static void
305 menu_refresh_cmd (void)
307 menu_cmd (CK_Refresh);
310 static void
311 menu_goto_line (void)
313 menu_cmd (CK_Goto);
316 static void
317 menu_toggle_line_state (void)
319 menu_cmd (CK_Toggle_Line_State);
322 static void
323 menu_goto_bracket (void)
325 menu_cmd (CK_Match_Bracket);
328 static void
329 menu_lit_cmd (void)
331 menu_key (XCTRL ('q'));
334 static void
335 menu_format_paragraph (void)
337 menu_cmd (CK_Paragraph_Format);
340 static void
341 menu_edit_syntax_file_cmd (void)
343 menu_cmd (CK_Load_Syntax_File);
346 static void
347 menu_edit_menu_file_cmd (void)
349 menu_cmd (CK_Load_Menu_File);
352 static void
353 menu_user_menu_cmd (void)
355 menu_key (KEY_F (11));
358 static void
359 menu_find_declare (void)
361 menu_cmd (CK_Find_Definition);
364 static void
365 menu_declare_back (void)
367 menu_cmd (CK_Load_Prev_File);
370 static void
371 menu_declare_forward (void)
373 menu_cmd (CK_Load_Next_File);
376 static menu_entry FileMenu[] =
378 {' ', N_("&Open file..."), NULL_HOTKEY, menu_load_cmd},
379 {' ', N_("&New C-n"), NULL_HOTKEY, menu_new_cmd},
380 {' ', "", NULL_HOTKEY, 0},
381 {' ', N_("&Save F2"), NULL_HOTKEY, menu_save_cmd},
382 {' ', N_("Save &as... F12"), NULL_HOTKEY, menu_save_as_cmd},
383 {' ', "", NULL_HOTKEY, 0},
384 {' ', N_("&Insert file... F15"), NULL_HOTKEY, menu_insert_file_cmd},
385 {' ', N_("Copy to &file... C-f"), NULL_HOTKEY, menu_cut_cmd},
386 {' ', "", NULL_HOTKEY, 0},
387 {' ', N_("&User menu... F11"), NULL_HOTKEY, menu_user_menu_cmd},
388 {' ', "", NULL_HOTKEY, 0},
389 {' ', N_("A&bout... "), NULL_HOTKEY, edit_about_cmd},
390 {' ', "", NULL_HOTKEY, 0},
391 {' ', N_("&Quit F10"), NULL_HOTKEY, menu_quit_cmd}
394 static menu_entry FileMenuEmacs[] =
396 {' ', N_("&Open file..."), NULL_HOTKEY, menu_load_cmd},
397 {' ', N_("&New C-x k"), NULL_HOTKEY, menu_new_cmd},
398 {' ', "", NULL_HOTKEY, 0},
399 {' ', N_("&Save F2"), NULL_HOTKEY, menu_save_cmd},
400 {' ', N_("Save &as... F12"), NULL_HOTKEY, menu_save_as_cmd},
401 {' ', "", NULL_HOTKEY, 0},
402 {' ', N_("&Insert file... F15"), NULL_HOTKEY, menu_insert_file_cmd},
403 {' ', N_("Copy to &file... "), NULL_HOTKEY, menu_cut_cmd},
404 {' ', "", NULL_HOTKEY, 0},
405 {' ', N_("&User menu... F11"), NULL_HOTKEY, menu_user_menu_cmd},
406 {' ', "", NULL_HOTKEY, 0},
407 {' ', N_("A&bout... "), NULL_HOTKEY, edit_about_cmd},
408 {' ', "", NULL_HOTKEY, 0},
409 {' ', N_("&Quit F10"), NULL_HOTKEY, menu_quit_cmd}
412 static menu_entry EditMenu[] =
414 {' ', N_("&Toggle mark F3"), NULL_HOTKEY, menu_mark_cmd},
415 {' ', N_("Mar&k columns S-F3"), NULL_HOTKEY, menu_markcol_cmd},
416 {' ', "", NULL_HOTKEY, 0},
417 {' ', N_("Toggle &ins/overw Ins"), NULL_HOTKEY, menu_ins_cmd},
418 {' ', "", NULL_HOTKEY, 0},
419 {' ', N_("&Copy F5"), NULL_HOTKEY, menu_copy_cmd},
420 {' ', N_("&Move F6"), NULL_HOTKEY, menu_move_cmd},
421 {' ', N_("&Delete F8"), NULL_HOTKEY, menu_delete_cmd},
422 {' ', "", NULL_HOTKEY, 0},
423 {' ', N_("C&opy to clipfile C-Ins"), NULL_HOTKEY, menu_xstore_cmd},
424 {' ', N_("C&ut to clipfile S-Del"), NULL_HOTKEY, menu_xcut_cmd},
425 {' ', N_("&Paste from clipfile S-Ins"), NULL_HOTKEY, menu_xpaste_cmd},
426 {' ', "", NULL_HOTKEY, 0},
427 {' ', N_("Toggle bookmar&k M-k"), NULL_HOTKEY, menu_toggle_bookmark_cmd},
428 {' ', N_("&Next bookmark M-j"), NULL_HOTKEY, menu_next_bookmark_cmd},
429 {' ', N_("Pre&v bookmark M-i"), NULL_HOTKEY, menu_prev_bookmark_cmd},
430 {' ', N_("&Flush bookmark M-o"), NULL_HOTKEY, menu_flush_bookmark_cmd},
431 {' ', "", NULL_HOTKEY, 0},
432 {' ', N_("&Undo C-u"), NULL_HOTKEY, menu_undo_cmd},
433 {' ', "", NULL_HOTKEY, 0},
434 {' ', N_("&Beginning C-PgUp"), NULL_HOTKEY, menu_beginning_cmd},
435 {' ', N_("&End C-PgDn"), NULL_HOTKEY, menu_end_cmd}
438 static menu_entry EditMenuEmacs[] =
440 {' ', N_("&Toggle mark F3"), NULL_HOTKEY, menu_mark_cmd},
441 {' ', N_("Mar&k columns S-F3"), NULL_HOTKEY, menu_markcol_cmd},
442 {' ', "", NULL_HOTKEY, 0},
443 {' ', N_("Toggle &ins/overw Ins"), NULL_HOTKEY, menu_ins_cmd},
444 {' ', "", NULL_HOTKEY, 0},
445 {' ', N_("&Copy F5"), NULL_HOTKEY, menu_copy_cmd},
446 {' ', N_("&Move F6"), NULL_HOTKEY, menu_move_cmd},
447 {' ', N_("&Delete F8"), NULL_HOTKEY, menu_delete_cmd},
448 {' ', "", NULL_HOTKEY, 0},
449 {' ', N_("C&opy to clipfile M-w"), NULL_HOTKEY, menu_xstore_cmd},
450 {' ', N_("C&ut to clipfile C-w"), NULL_HOTKEY, menu_xcut_cmd},
451 {' ', N_("&Paste from clipfile C-y"), NULL_HOTKEY, menu_xpaste_cmd},
452 {' ', "", NULL_HOTKEY, 0},
453 {' ', N_("Toggle bookmar&k "), NULL_HOTKEY, menu_toggle_bookmark_cmd},
454 {' ', N_("&Next bookmark "), NULL_HOTKEY, menu_next_bookmark_cmd},
455 {' ', N_("Pre&v bookmark "), NULL_HOTKEY, menu_prev_bookmark_cmd},
456 {' ', N_("&Flush bookmark "), NULL_HOTKEY, menu_flush_bookmark_cmd},
457 {' ', "", NULL_HOTKEY, 0},
458 {' ', N_("&Undo C-u"), NULL_HOTKEY, menu_undo_cmd},
459 {' ', "", NULL_HOTKEY, 0},
460 {' ', N_("&Beginning C-PgUp"), NULL_HOTKEY, menu_beginning_cmd},
461 {' ', N_("&End C-PgDn"), NULL_HOTKEY, menu_end_cmd}
464 static menu_entry SearReplMenu[] =
466 {' ', N_("&Search... F7"), NULL_HOTKEY, menu_search_cmd},
467 {' ', N_("Search &again F17"), NULL_HOTKEY, menu_search_again_cmd},
468 {' ', N_("&Replace... F4"), NULL_HOTKEY, menu_replace_cmd}
471 #define SearReplMenuEmacs SearReplMenu
473 static menu_entry CmdMenu[] =
475 {' ', N_("&Go to line... M-l"), NULL_HOTKEY, menu_goto_line},
476 {' ', N_("Toggle li&ne state M-n"), NULL_HOTKEY, menu_toggle_line_state},
477 {' ', N_("Go to matching &bracket M-b"), NULL_HOTKEY, menu_goto_bracket},
478 {' ', "", NULL_HOTKEY, 0},
479 {' ', N_("Find declaration A-Enter"), NULL_HOTKEY, menu_find_declare},
480 {' ', N_("Back from declaration M--"), NULL_HOTKEY, menu_declare_back},
481 {' ', N_("Forward to declaration M-+"), NULL_HOTKEY, menu_declare_forward},
482 #ifdef HAVE_CHARSET
483 {' ', "", NULL_HOTKEY, 0},
484 {' ', N_("Encod&ing... C-t"), NULL_HOTKEY, menu_select_codepage_cmd},
485 #endif
486 {' ', "", NULL_HOTKEY, 0},
487 {' ', N_("Insert &literal... C-q"), NULL_HOTKEY, menu_lit_cmd},
488 {' ', "", NULL_HOTKEY, 0},
489 {' ', N_("&Refresh screen C-l"), NULL_HOTKEY, menu_refresh_cmd},
490 {' ', "", NULL_HOTKEY, 0},
491 {' ', N_("&Start record macro C-r"), NULL_HOTKEY, menu_begin_record_cmd},
492 {' ', N_("&Finish record macro... C-r"), NULL_HOTKEY, menu_end_record_cmd},
493 {' ', N_("&Execute macro... C-a, KEY"), NULL_HOTKEY, menu_exec_macro_cmd},
494 {' ', N_("Delete macr&o... "), NULL_HOTKEY, menu_exec_macro_delete_cmd},
495 {' ', "", NULL_HOTKEY, 0},
496 {' ', N_("Insert &date/time "), NULL_HOTKEY, menu_date_cmd},
497 {' ', "", NULL_HOTKEY, 0},
498 {' ', N_("Format p&aragraph M-p"), NULL_HOTKEY, menu_format_paragraph},
499 {' ', N_("'ispell' s&pell check C-p"), NULL_HOTKEY, menu_ispell_cmd},
500 {' ', N_("Sor&t... M-t"), NULL_HOTKEY, menu_sort_cmd},
501 {' ', N_("Paste o&utput of... M-u"), NULL_HOTKEY, menu_ext_cmd},
502 {' ', N_("E&xternal Formatter F19"), NULL_HOTKEY, menu_c_form_cmd},
503 {' ', N_("&Mail... "), NULL_HOTKEY, menu_mail_cmd}
506 static menu_entry CmdMenuEmacs[] =
508 {' ', N_("&Go to line... M-l"), NULL_HOTKEY, menu_goto_line},
509 {' ', N_("Toggle li&ne state M-n"), NULL_HOTKEY, menu_toggle_line_state},
510 {' ', N_("Go to matching &bracket M-b"), NULL_HOTKEY, menu_goto_bracket},
511 {' ', "", NULL_HOTKEY, 0},
512 {' ', N_("Insert &literal... C-q"), NULL_HOTKEY, menu_lit_cmd},
513 {' ', "", NULL_HOTKEY, 0},
514 {' ', N_("&Refresh screen C-l"), NULL_HOTKEY, menu_refresh_cmd},
515 {' ', "", NULL_HOTKEY, 0},
516 {' ', N_("&Start record macro C-r"), NULL_HOTKEY, menu_begin_record_cmd},
517 {' ', N_("&Finish record macro... C-r"), NULL_HOTKEY, menu_end_record_cmd},
518 {' ', N_("&Execute macro... C-x e, KEY"), NULL_HOTKEY, menu_exec_macro_cmd},
519 {' ', N_("Delete macr&o... "), NULL_HOTKEY, menu_exec_macro_delete_cmd},
520 {' ', "", NULL_HOTKEY, 0},
521 {' ', N_("Insert &date/time "), NULL_HOTKEY, menu_date_cmd},
522 {' ', "", NULL_HOTKEY, 0},
523 {' ', N_("Format p&aragraph M-p"), NULL_HOTKEY, menu_format_paragraph},
524 {' ', N_("'ispell' s&pell check M-$"), NULL_HOTKEY, menu_ispell_cmd},
525 {' ', N_("Sor&t... M-t"), NULL_HOTKEY, menu_sort_cmd},
526 {' ', N_("Paste o&utput of... M-u"), NULL_HOTKEY, menu_ext_cmd},
527 {' ', N_("E&xternal Formatter F19"), NULL_HOTKEY, menu_c_form_cmd},
528 {' ', N_("&Mail... "), NULL_HOTKEY, menu_mail_cmd}
531 static menu_entry OptMenu[] =
533 {' ', N_("&General... "), NULL_HOTKEY, edit_options_dialog},
534 {' ', N_("&Save mode..."), NULL_HOTKEY, menu_save_mode_cmd},
535 {' ', N_("Learn &Keys..."), NULL_HOTKEY, learn_keys},
536 {' ', N_("Syntax &Highlighting..."), NULL_HOTKEY, edit_syntax_dialog},
537 {' ', "", NULL_HOTKEY, 0},
538 {' ', N_("S&yntax file"), NULL_HOTKEY, menu_edit_syntax_file_cmd},
539 {' ', N_("&Menu file"), NULL_HOTKEY, menu_edit_menu_file_cmd},
540 {' ', "", NULL_HOTKEY, 0},
541 {' ', N_("Save setu&p"), NULL_HOTKEY, save_setup_cmd}
544 #define OptMenuEmacs OptMenu
546 #define menu_entries(x) sizeof(x)/sizeof(menu_entry)
548 #define N_menus 5
550 static Menu *EditMenuBar [N_menus];
552 static void
553 edit_init_menu_normal (void)
555 EditMenuBar[0] = create_menu (_(" File "), FileMenu, menu_entries (FileMenu),
556 "[Internal File Editor]");
557 EditMenuBar[1] = create_menu (_(" Edit "), EditMenu, menu_entries (EditMenu),
558 "[Internal File Editor]");
559 EditMenuBar[2] = create_menu (_(" Sear/Repl "), SearReplMenu, menu_entries (SearReplMenu),
560 "[Internal File Editor]");
561 EditMenuBar[3] = create_menu (_(" Command "), CmdMenu, menu_entries (CmdMenu),
562 "[Internal File Editor]");
563 EditMenuBar[4] = create_menu (_(" Options "), OptMenu, menu_entries (OptMenu),
564 "[Internal File Editor]");
567 static void
568 edit_init_menu_emacs (void)
570 EditMenuBar[0] = create_menu (_(" File "), FileMenuEmacs, menu_entries (FileMenuEmacs),
571 "[Internal File Editor]");
572 EditMenuBar[1] = create_menu (_(" Edit "), EditMenuEmacs, menu_entries (EditMenuEmacs),
573 "[Internal File Editor]");
574 EditMenuBar[2] = create_menu (_(" Sear/Repl "), SearReplMenuEmacs, menu_entries (SearReplMenuEmacs),
575 "[Internal File Editor]");
576 EditMenuBar[3] = create_menu (_(" Command "), CmdMenuEmacs, menu_entries (CmdMenuEmacs),
577 "[Internal File Editor]");
578 EditMenuBar[4] = create_menu (_(" Options "), OptMenuEmacs, menu_entries (OptMenuEmacs),
579 "[Internal File Editor]");
582 static void
583 edit_init_menu (void)
585 switch (edit_key_emulation) {
586 default:
587 case EDIT_KEY_EMULATION_NORMAL:
588 edit_init_menu_normal ();
589 break;
590 case EDIT_KEY_EMULATION_EMACS:
591 edit_init_menu_emacs ();
592 break;
596 struct WMenu *
597 edit_create_menu (void)
599 edit_init_menu ();
600 return menubar_new (0, 0, COLS, EditMenuBar, N_menus);
603 void
604 edit_done_menu (struct WMenu *wmenu)
606 int i;
607 for (i = 0; i < N_menus; i++)
608 destroy_menu (wmenu->menu[i]);
612 void
613 edit_reload_menu (void)
615 edit_done_menu (edit_menubar);
616 edit_init_menu ();
617 menubar_arrange (edit_menubar);
621 static void
622 edit_drop_menu_cmd (WEdit *e, int which)
624 if (edit_menubar->active)
625 return;
626 edit_menubar->active = 1;
627 edit_menubar->dropped = drop_menus;
628 if (which >= 0) {
629 edit_menubar->selected = which;
632 edit_menubar->previous_widget = e->widget.parent->current->dlg_id;
633 dlg_select_widget (edit_menubar);
637 void edit_menu_cmd (WEdit * e)
639 edit_drop_menu_cmd (e, -1);
643 int edit_drop_hotkey_menu (WEdit * e, int key)
645 int m = 0;
646 switch (key) {
647 case ALT ('f'):
648 if (edit_key_emulation == EDIT_KEY_EMULATION_EMACS)
649 return 0;
650 m = 0;
651 break;
652 case ALT ('e'):
653 m = 1;
654 break;
655 case ALT ('s'):
656 m = 2;
657 break;
658 case ALT ('c'):
659 m = 3;
660 break;
661 case ALT ('o'):
662 m = 4;
663 break;
664 default:
665 return 0;
668 edit_drop_menu_cmd (e, m);
669 return 1;