edit/editmenu.c

   1 /* editor menu definitions and initialisation
   2
   3    Copyright (C) 1996 the Free Software Foundation
   4
   5    Authors: 1996, 1997 Paul Sheer
   6
   7    This program is free software; you can redistribute it and/or modify
   8    it under the terms of the GNU General Public License as published by
   9    the Free Software Foundation; either version 2 of the License, or
  10    (at your option) any later version.
  11
  12    This program is distributed in the hope that it will be useful,
  13    but WITHOUT ANY WARRANTY; without even the implied warranty of
  14    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  15    GNU General Public License for more details.
  16
  17    You should have received a copy of the GNU General Public License
  18    along with this program; if not, write to the Free Software
  19    Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA
  20    02110-1301, USA.
  21 */
  22
  23 #include <config.h>
  24
  25 #include <stdio.h>
  26 #include <stdarg.h>
  27 #include <sys/types.h>
  28 #ifdef HAVE_UNISTD_H
  29 #    include <unistd.h>
  30 #endif
  31 #include <string.h>
  32 #include <ctype.h>
  33 #include <errno.h>
  34 #include <sys/stat.h>
  35
  36 #include <stdlib.h>
  37
  38 #include "../src/global.h"
  39
  40 #include "edit.h"
  41 #include "../src/wtools.h"      /* query_dialog() */
  42 #include "../src/menu.h"        /* menu_entry */
  43 #include "../src/tty.h"         /* KEY_F */
  44 #include "../src/key.h"         /* XCTRL */
  45 #include "../src/main.h"        /* drop_menus */
  46 #include "../src/learn.h"       /* learn_keys */
  47
  48 #include "edit-widget.h"
  49 #include "editcmddef.h"
  50
  51 static void
  52 menu_cmd (int command)
  53 {
  54     edit_execute_key_command (wedit, command, -1);
  55     edit_update_screen (wedit);
  56 }
  57
  58 static void menu_key (int i)
  59 {
  60     send_message ((Widget *) wedit, WIDGET_KEY, i);
  61 }
  62
  63 static void
  64 edit_about_cmd (void)
  65 {
  66     query_dialog (_(" About "),
  67                   _("\n                Cooledit  v3.11.5\n\n"
  68                     " Copyright (C) 1996 the Free Software Foundation\n\n"
  69                     "       A user friendly text editor written\n"
  70                     "           for the Midnight Commander.\n"), D_NORMAL,
  71                   1, _("&OK"));
  72 }
  73
  74 static void
  75 menu_mail_cmd (void)
  76 {
  77     menu_cmd (CK_Mail);
  78 }
  79
  80 static void
  81 menu_load_cmd (void)
  82 {
  83     menu_cmd (CK_Load);
  84 }
  85
  86 static void
  87 menu_new_cmd (void)
  88 {
  89     menu_cmd (CK_New);
  90 }
  91
  92 static void
  93 menu_save_cmd (void)
  94 {
  95     menu_cmd (CK_Save);
  96 }
  97
  98 static void
  99 menu_save_as_cmd (void)
 100 {
 101     menu_cmd (CK_Save_As);
 102 }
 103
 104 static void
 105 menu_insert_file_cmd (void)
 106 {
 107     menu_cmd (CK_Insert_File);
 108 }
 109
 110 static void
 111 menu_quit_cmd (void)
 112 {
 113     menu_cmd (CK_Exit);
 114 }
 115
 116 static void
 117 menu_mark_cmd (void)
 118 {
 119     menu_cmd (CK_Mark);
 120 }
 121
 122 static void
 123 menu_markcol_cmd (void)
 124 {
 125     menu_cmd (CK_Column_Mark);
 126 }
 127
 128 static void
 129 menu_ins_cmd (void)
 130 {
 131     menu_cmd (CK_Toggle_Insert);
 132 }
 133
 134 static void
 135 menu_copy_cmd (void)
 136 {
 137     menu_cmd (CK_Copy);
 138 }
 139
 140 static void
 141 menu_move_cmd (void)
 142 {
 143     menu_cmd (CK_Move);
 144 }
 145
 146 static void
 147 menu_delete_cmd (void)
 148 {
 149     menu_cmd (CK_Remove);
 150 }
 151
 152 static void
 153 menu_cut_cmd (void)
 154 {
 155     menu_cmd (CK_Save_Block);
 156 }
 157
 158 static void
 159 menu_search_cmd (void)
 160 {
 161     menu_cmd (CK_Find);
 162 }
 163
 164 static void
 165 menu_search_again_cmd (void)
 166 {
 167     menu_cmd (CK_Find_Again);
 168 }
 169
 170 static void
 171 menu_replace_cmd (void)
 172 {
 173     menu_cmd (CK_Replace);
 174 }
 175
 176 static void
 177 menu_begin_record_cmd (void)
 178 {
 179     menu_cmd (CK_Begin_Record_Macro);
 180 }
 181
 182 static void
 183 menu_end_record_cmd (void)
 184 {
 185     menu_cmd (CK_End_Record_Macro);
 186 }
 187
 188 static void
 189 menu_exec_macro_cmd (void)
 190 {
 191     menu_key (XCTRL ('a'));
 192 }
 193
 194 static void
 195 menu_exec_macro_delete_cmd (void)
 196 {
 197     menu_cmd (CK_Delete_Macro);
 198 }
 199
 200 static void
 201 menu_c_form_cmd (void)
 202 {
 203     menu_key (KEY_F (19));
 204 }
 205
 206 static void
 207 menu_ispell_cmd (void)
 208 {
 209     menu_cmd (CK_Pipe_Block (1));
 210 }
 211
 212 static void
 213 menu_sort_cmd (void)
 214 {
 215     menu_cmd (CK_Sort);
 216 }
 217
 218 static void
 219 menu_ext_cmd (void)
 220 {
 221     menu_cmd (CK_ExtCmd);
 222 }
 223
 224 static void
 225 menu_date_cmd (void)
 226 {
 227     menu_cmd (CK_Date);
 228 }
 229
 230 static void
 231 menu_undo_cmd (void)
 232 {
 233     menu_cmd (CK_Undo);
 234 }
 235
 236 static void
 237 menu_beginning_cmd (void)
 238 {
 239     menu_cmd (CK_Beginning_Of_Text);
 240 }
 241
 242 static void
 243 menu_end_cmd (void)
 244 {
 245     menu_cmd (CK_End_Of_Text);
 246 }
 247
 248 static void
 249 menu_refresh_cmd (void)
 250 {
 251     menu_cmd (CK_Refresh);
 252 }
 253
 254 static void
 255 menu_goto_line (void)
 256 {
 257     menu_cmd (CK_Goto);
 258 }
 259
 260 static void
 261 menu_goto_bracket (void)
 262 {
 263     menu_cmd (CK_Match_Bracket);
 264 }
 265
 266 static void
 267 menu_lit_cmd (void)
 268 {
 269     menu_key (XCTRL ('q'));
 270 }
 271
 272 static void
 273 menu_format_paragraph (void)
 274 {
 275     menu_cmd (CK_Paragraph_Format);
 276 }
 277
 278 static void
 279 menu_options (void)
 280 {
 281     edit_options_dialog ();
 282 }
 283
 284 static void
 285 menu_syntax (void)
 286 {
 287     edit_syntax_dialog ();
 288 }
 289
 290 static void
 291 menu_user_menu_cmd (void)
 292 {
 293     menu_key (KEY_F (11));
 294 }
 295
 296 static menu_entry FileMenu[] =
 297 {
 298     {' ', N_("&Open file..."),         'O', menu_load_cmd},
 299     {' ', N_("&New              C-n"), 'N', menu_new_cmd},
 300     {' ', "", ' ', 0},
 301     {' ', N_("&Save              F2"), 'S', menu_save_cmd},
 302     {' ', N_("Save &as...       F12"), 'A', menu_save_as_cmd},
 303     {' ', "", ' ', 0},
 304     {' ', N_("&Insert file...   F15"), 'I', menu_insert_file_cmd},
 305     {' ', N_("Copy to &file...  C-f"), 'F', menu_cut_cmd},
 306     {' ', "", ' ', 0},
 307     {' ', N_("&User menu...     F11"), 'U', menu_user_menu_cmd},
 308     {' ', "", ' ', 0},
 309     {' ', N_("A&bout...            "), 'B', edit_about_cmd},
 310     {' ', "", ' ', 0},
 311     {' ', N_("&Quit             F10"), 'Q', menu_quit_cmd}
 312  };
 313
 314 static menu_entry FileMenuEmacs[] =
 315 {
 316     {' ', N_("&Open file..."),         'O', menu_load_cmd},
 317     {' ', N_("&New            C-x k"), 'N', menu_new_cmd},
 318     {' ', "", ' ', 0},
 319     {' ', N_("&Save              F2"), 'S', menu_save_cmd},
 320     {' ', N_("Save &as...       F12"), 'A', menu_save_as_cmd},
 321     {' ', "", ' ', 0},
 322     {' ', N_("&Insert file...   F15"), 'I', menu_insert_file_cmd},
 323     {' ', N_("Copy to &file...     "), 'F', menu_cut_cmd},
 324     {' ', "", ' ', 0},
 325     {' ', N_("&User menu...     F11"), 'U', menu_user_menu_cmd},
 326     {' ', "", ' ', 0},
 327     {' ', N_("A&bout...            "), 'B', edit_about_cmd},
 328     {' ', "", ' ', 0},
 329     {' ', N_("&Quit             F10"), 'Q', menu_quit_cmd}
 330 };
 331
 332 static menu_entry EditMenu[] =
 333 {
 334     {' ', N_("&Toggle Mark       F3"), 'T', menu_mark_cmd},
 335     {' ', N_("&Mark Columns    S-F3"), 'T', menu_markcol_cmd},
 336     {' ', "", ' ', 0},
 337     {' ', N_("Toggle &ins/overw Ins"), 'I', menu_ins_cmd},
 338     {' ', "", ' ', 0},
 339     {' ', N_("&Copy              F5"), 'C', menu_copy_cmd},
 340     {' ', N_("&Move              F6"), 'M', menu_move_cmd},
 341     {' ', N_("&Delete            F8"), 'D', menu_delete_cmd},
 342     {' ', "", ' ', 0},
 343     {' ', N_("&Undo             C-u"), 'U', menu_undo_cmd},
 344     {' ', "", ' ', 0},
 345     {' ', N_("&Beginning     C-PgUp"), 'B', menu_beginning_cmd},
 346     {' ', N_("&End           C-PgDn"), 'E', menu_end_cmd}
 347 };
 348
 349 #define EditMenuEmacs EditMenu
 350
 351 static menu_entry SearReplMenu[] =
 352 {
 353     {' ', N_("&Search...         F7"), 'S', menu_search_cmd},
 354     {' ', N_("Search &again     F17"), 'A', menu_search_again_cmd},
 355     {' ', N_("&Replace...        F4"), 'R', menu_replace_cmd}
 356 };
 357
 358 #define SearReplMenuEmacs SearReplMenu
 359
 360 static menu_entry CmdMenu[] =
 361 {
 362     {' ', N_("&Go to line...            M-l"), 'G', menu_goto_line},
 363     {' ', N_("Go to matching &bracket   M-b"), 'B', menu_goto_bracket},
 364     {' ', "", ' ', 0},
 365     {' ', N_("Insert &literal...       C-q"), 'L', menu_lit_cmd},
 366     {' ', "", ' ', 0},
 367     {' ', N_("&Refresh screen          C-l"), 'R', menu_refresh_cmd},
 368     {' ', "", ' ', 0},
 369     {' ', N_("&Start record macro      C-r"), 'S', menu_begin_record_cmd},
 370     {' ', N_("&Finish record macro...  C-r"), 'F', menu_end_record_cmd},
 371     {' ', N_("&Execute macro...   C-a, KEY"), 'E', menu_exec_macro_cmd},
 372     {' ', N_("Delete macr&o...            "), 'O', menu_exec_macro_delete_cmd},
 373     {' ', "", ' ', 0},
 374     {' ', N_("Insert &date/time           "), 'D', menu_date_cmd},
 375     {' ', "", ' ', 0},
 376     {' ', N_("Format p&aragraph        M-p"), 'A', menu_format_paragraph},
 377     {' ', N_("'ispell' s&pell check    C-p"), 'P', menu_ispell_cmd},
 378     {' ', N_("Sor&t...                 M-t"), 'T', menu_sort_cmd},
 379     {' ', N_("Paste o&utput of...      M-u"), 'U', menu_ext_cmd},
 380     {' ', N_("E&xternal Formatter      F19"), 'C', menu_c_form_cmd},
 381     {' ', N_("&Mail...                    "), 'M', menu_mail_cmd}
 382 };
 383
 384 static menu_entry CmdMenuEmacs[] =
 385 {
 386     {' ', N_("&Go to line...            M-l"), 'G', menu_goto_line},
 387     {' ', N_("Go to matching &bracket   M-b"), 'B', menu_goto_bracket},
 388     {' ', "", ' ', 0},
 389     {' ', N_("Insert &literal...       C-q"), 'L', menu_lit_cmd},
 390     {' ', "", ' ', 0},
 391     {' ', N_("&Refresh screen          C-l"), 'R', menu_refresh_cmd},
 392     {' ', "", ' ', 0},
 393     {' ', N_("&Start record macro      C-r"), 'S', menu_begin_record_cmd},
 394     {' ', N_("&Finish record macro...  C-r"), 'F', menu_end_record_cmd},
 395     {' ', N_("&Execute macro... C-x e, KEY"), 'E', menu_exec_macro_cmd},
 396     {' ', N_("Delete macr&o...            "), 'o', menu_exec_macro_delete_cmd},
 397     {' ', "", ' ', 0},
 398     {' ', N_("Insert &date/time           "), 'D', menu_date_cmd},
 399     {' ', "", ' ', 0},
 400     {' ', N_("Format p&aragraph        M-p"), 'a', menu_format_paragraph},
 401     {' ', N_("'ispell' s&pell check    M-$"), 'P', menu_ispell_cmd},
 402     {' ', N_("Sor&t...                 M-t"), 'T', menu_sort_cmd},
 403     {' ', N_("Paste o&utput of...      M-u"), 'U', menu_ext_cmd},
 404     {' ', N_("E&xternal Formatter      F19"), 'C', menu_c_form_cmd},
 405     {' ', N_("&Mail...                    "), 'M', menu_mail_cmd}
 406 };
 407
 408 static menu_entry OptMenu[] =
 409 {
 410     {' ', N_("&General...  "), 'G', menu_options},
 411     {' ', N_("&Save mode..."), 'S', menu_save_mode_cmd},
 412     {' ', N_("Learn &Keys..."), 'K', learn_keys},
 413     {' ', N_("Syntax &Highlighting..."), 'H', menu_syntax}
 414 };
 415
 416 #define OptMenuEmacs OptMenu
 417
 418 #define menu_entries(x) sizeof(x)/sizeof(menu_entry)
 419
 420 void edit_init_menu_normal (struct Menu *EditMenuBar[])
 421 {
 422     EditMenuBar[0] = create_menu (_(" File "), FileMenu, menu_entries (FileMenu),
 423                                     "[Internal File Editor]");
 424     EditMenuBar[1] = create_menu (_(" Edit "), EditMenu, menu_entries (EditMenu),
 425                                     "[Internal File Editor]");
 426     EditMenuBar[2] = create_menu (_(" Sear/Repl "), SearReplMenu, menu_entries (SearReplMenu),
 427                                     "[Internal File Editor]");
 428     EditMenuBar[3] = create_menu (_(" Command "), CmdMenu, menu_entries (CmdMenu),
 429                                     "[Internal File Editor]");
 430     EditMenuBar[4] = create_menu (_(" Options "), OptMenu, menu_entries (OptMenu),
 431                                     "[Internal File Editor]");
 432 }
 433
 434 void edit_init_menu_emacs (struct Menu *EditMenuBar[])
 435 {
 436     EditMenuBar[0] = create_menu (_(" File "), FileMenuEmacs, menu_entries (FileMenuEmacs),
 437                                     "[Internal File Editor]");
 438     EditMenuBar[1] = create_menu (_(" Edit "), EditMenuEmacs, menu_entries (EditMenuEmacs),
 439                                     "[Internal File Editor]");
 440     EditMenuBar[2] = create_menu (_(" Sear/Repl "), SearReplMenuEmacs, menu_entries (SearReplMenuEmacs),
 441                                     "[Internal File Editor]");
 442     EditMenuBar[3] = create_menu (_(" Command "), CmdMenuEmacs, menu_entries (CmdMenuEmacs),
 443                                     "[Internal File Editor]");
 444     EditMenuBar[4] = create_menu (_(" Options "), OptMenuEmacs, menu_entries (OptMenuEmacs),
 445                                     "[Internal File Editor]");
 446 }
 447
 448 struct WMenu *
 449 edit_init_menu (void)
 450 {
 451     struct Menu **EditMenuBar = g_new(struct Menu *, N_menus);
 452
 453     switch (edit_key_emulation) {
 454     default:
 455     case EDIT_KEY_EMULATION_NORMAL:
 456         edit_init_menu_normal (EditMenuBar);
 457         break;
 458     case EDIT_KEY_EMULATION_EMACS:
 459         edit_init_menu_emacs (EditMenuBar);
 460         break;
 461     }
 462     return menubar_new (0, 0, COLS, EditMenuBar, N_menus);
 463 }
 464
 465 void
 466 edit_done_menu (struct WMenu *wmenu)
 467 {
 468     int i;
 469     for (i = 0; i < N_menus; i++)
 470         destroy_menu (wmenu->menu[i]);
 471
 472     g_free(wmenu->menu);
 473 }
 474
 475
 476 void
 477 edit_reload_menu (void)
 478 {
 479     struct WMenu *new_edit_menubar;
 480
 481     new_edit_menubar = edit_init_menu ();
 482     dlg_replace_widget (&edit_menubar->widget, &new_edit_menubar->widget);
 483     edit_done_menu (edit_menubar);
 484     edit_menubar = new_edit_menubar;
 485 }
 486
 487
 488 static void
 489 edit_drop_menu_cmd (WEdit *e, int which)
 490 {
 491     if (edit_menubar->active)
 492         return;
 493     edit_menubar->active = 1;
 494     edit_menubar->dropped = drop_menus;
 495     if (which >= 0) {
 496         edit_menubar->selected = which;
 497     }
 498
 499     edit_menubar->previous_widget = e->widget.parent->current->dlg_id;
 500     dlg_select_widget (edit_menubar);
 501 }
 502
 503
 504 void edit_menu_cmd (WEdit * e)
 505 {
 506     edit_drop_menu_cmd (e, -1);
 507 }
 508
 509
 510 int edit_drop_hotkey_menu (WEdit * e, int key)
 511 {
 512     int m = 0;
 513     switch (key) {
 514     case ALT ('f'):
 515         if (edit_key_emulation == EDIT_KEY_EMULATION_EMACS)
 516             return 0;
 517         m = 0;
 518         break;
 519     case ALT ('e'):
 520         m = 1;
 521         break;
 522     case ALT ('s'):
 523         m = 2;
 524         break;
 525     case ALT ('c'):
 526         m = 3;
 527         break;
 528     case ALT ('o'):
 529         m = 4;
 530         break;
 531     default:
 532         return 0;
 533     }
 534
 535     edit_drop_menu_cmd (e, m);
 536     return 1;
 537 }