src/editor/editmenu.c

   1 /* editor menu definitions and initialisation
   2
   3    Copyright (C) 1996, 1998, 2001, 2002, 2003, 2005, 2007
   4    Free Software Foundation, Inc.
   5
   6    Authors: 1996, 1997 Paul Sheer
   7
   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.
  12
  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.
  17
  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.
  22  */
  23
  24 /** \file
  25  *  \brief Source: editor menu definitions and initialisation
  26  *  \author Paul Sheer
  27  *  \date 1996, 1997
  28  */
  29
  30 #include <config.h>
  31
  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>
  41
  42 #include "lib/global.h"
  43
  44 #include "lib/tty/tty.h"        /* KEY_F */
  45 #include "lib/tty/key.h"        /* XCTRL */
  46 #include "lib/widget.h"
  47
  48 #include "src/setup.h"          /* drop_menus */
  49 #include "src/keybind-defaults.h"
  50
  51 #include "edit-impl.h"
  52 #include "edit-widget.h"
  53
  54 /*** global variables ****************************************************************************/
  55
  56 /*** file scope macro definitions ****************************************************************/
  57
  58 /*** file scope type declarations ****************************************************************/
  59
  60 /*** file scope variables ************************************************************************/
  61
  62 /*** file scope functions ************************************************************************/
  63 /* --------------------------------------------------------------------------------------------- */
  64
  65 static GList *
  66 create_file_menu (void)
  67 {
  68     GList *entries = NULL;
  69
  70     entries = g_list_append (entries, menu_entry_create (_("&Open file..."), CK_Load));
  71     entries = g_list_append (entries, menu_entry_create (_("&New"), CK_New));
  72     entries = g_list_append (entries, menu_separator_create ());
  73     entries = g_list_append (entries, menu_entry_create (_("&Save"), CK_Save));
  74     entries = g_list_append (entries, menu_entry_create (_("Save &as..."), CK_Save_As));
  75     entries = g_list_append (entries, menu_separator_create ());
  76     entries = g_list_append (entries, menu_entry_create (_("&Insert file..."), CK_Insert_File));
  77     entries = g_list_append (entries, menu_entry_create (_("Cop&y to file..."), CK_Save_Block));
  78     entries = g_list_append (entries, menu_separator_create ());
  79     entries = g_list_append (entries, menu_entry_create (_("&User menu..."), CK_User_Menu));
  80     entries = g_list_append (entries, menu_separator_create ());
  81     entries = g_list_append (entries, menu_entry_create (_("A&bout..."), CK_About));
  82     entries = g_list_append (entries, menu_separator_create ());
  83     entries = g_list_append (entries, menu_entry_create (_("&Quit"), CK_Quit));
  84
  85     return entries;
  86 }
  87
  88 /* --------------------------------------------------------------------------------------------- */
  89
  90 static GList *
  91 create_edit_menu (void)
  92 {
  93     GList *entries = NULL;
  94
  95     entries = g_list_append (entries, menu_entry_create (_("&Undo"), CK_Undo));
  96     entries = g_list_append (entries, menu_separator_create ());
  97     entries = g_list_append (entries, menu_entry_create (_("&Toggle ins/overw"), CK_Toggle_Insert));
  98     entries = g_list_append (entries, menu_separator_create ());
  99     entries = g_list_append (entries, menu_entry_create (_("To&ggle mark"), CK_Mark));
 100     entries = g_list_append (entries, menu_entry_create (_("&Mark columns"), CK_Column_Mark));
 101     entries = g_list_append (entries, menu_entry_create (_("Mark &all"), CK_Mark_All));
 102     entries = g_list_append (entries, menu_entry_create (_("Unmar&k"), CK_Unmark));
 103     entries = g_list_append (entries, menu_separator_create ());
 104     entries = g_list_append (entries, menu_entry_create (_("Cop&y"), CK_Copy));
 105     entries = g_list_append (entries, menu_entry_create (_("Mo&ve"), CK_Move));
 106     entries = g_list_append (entries, menu_entry_create (_("&Delete"), CK_Remove));
 107     entries = g_list_append (entries, menu_separator_create ());
 108     entries = g_list_append (entries, menu_entry_create (_("Co&py to clipfile"), CK_XStore));
 109     entries = g_list_append (entries, menu_entry_create (_("&Cut to clipfile"), CK_XCut));
 110     entries = g_list_append (entries, menu_entry_create (_("Pa&ste from clipfile"), CK_XPaste));
 111     entries = g_list_append (entries, menu_separator_create ());
 112     entries = g_list_append (entries, menu_entry_create (_("&Beginning"), CK_Beginning_Of_Text));
 113     entries = g_list_append (entries, menu_entry_create (_("&End"), CK_End_Of_Text));
 114
 115     return entries;
 116 }
 117
 118 /* --------------------------------------------------------------------------------------------- */
 119
 120 static GList *
 121 create_search_replace_menu (void)
 122 {
 123     GList *entries = NULL;
 124
 125     entries = g_list_append (entries, menu_entry_create (_("&Search..."), CK_Find));
 126     entries = g_list_append (entries, menu_entry_create (_("Search &again"), CK_Find_Again));
 127     entries = g_list_append (entries, menu_entry_create (_("&Replace..."), CK_Replace));
 128     entries = g_list_append (entries, menu_separator_create ());
 129     entries =
 130         g_list_append (entries, menu_entry_create (_("&Toggle bookmark"), CK_Toggle_Bookmark));
 131     entries = g_list_append (entries, menu_entry_create (_("&Next bookmark"), CK_Next_Bookmark));
 132     entries = g_list_append (entries, menu_entry_create (_("&Prev bookmark"), CK_Prev_Bookmark));
 133     entries = g_list_append (entries, menu_entry_create (_("&Flush bookmark"), CK_Flush_Bookmarks));
 134
 135     return entries;
 136 }
 137
 138 /* --------------------------------------------------------------------------------------------- */
 139
 140 static GList *
 141 create_command_menu (void)
 142 {
 143     GList *entries = NULL;
 144
 145     entries = g_list_append (entries, menu_entry_create (_("&Go to line..."), CK_Goto));
 146     entries =
 147         g_list_append (entries, menu_entry_create (_("&Toggle line state"), CK_Toggle_Line_State));
 148     entries =
 149         g_list_append (entries, menu_entry_create (_("Go to matching &bracket"), CK_Match_Bracket));
 150     entries =
 151         g_list_append (entries,
 152                        menu_entry_create (_("Toggle s&yntax highlighting"), CK_Toggle_Syntax));
 153     entries = g_list_append (entries, menu_separator_create ());
 154     entries =
 155         g_list_append (entries, menu_entry_create (_("&Find declaration"), CK_Find_Definition));
 156     entries =
 157         g_list_append (entries, menu_entry_create (_("Back from &declaration"), CK_Load_Prev_File));
 158     entries =
 159         g_list_append (entries,
 160                        menu_entry_create (_("For&ward to declaration"), CK_Load_Next_File));
 161 #ifdef HAVE_CHARSET
 162     entries = g_list_append (entries, menu_separator_create ());
 163     entries = g_list_append (entries, menu_entry_create (_("Encod&ing..."), CK_SelectCodepage));
 164 #endif
 165     entries = g_list_append (entries, menu_separator_create ());
 166     entries = g_list_append (entries, menu_entry_create (_("&Refresh screen"), CK_Refresh));
 167     entries = g_list_append (entries, menu_separator_create ());
 168     entries =
 169         g_list_append (entries,
 170                        menu_entry_create (_("&Start record macro"), CK_Begin_Record_Macro));
 171     entries =
 172         g_list_append (entries,
 173                        menu_entry_create (_("Finis&h record macro..."), CK_End_Record_Macro));
 174     entries = g_list_append (entries, menu_entry_create (_("&Execute macro..."), CK_Execute_Macro));
 175     entries = g_list_append (entries, menu_entry_create (_("Delete macr&o..."), CK_Delete_Macro));
 176     entries = g_list_append (entries, menu_separator_create ());
 177     entries =
 178         g_list_append (entries, menu_entry_create (_("'ispell' s&pell check"), CK_Pipe_Block (1)));
 179     entries = g_list_append (entries, menu_entry_create (_("&Mail..."), CK_Mail));
 180
 181     return entries;
 182 }
 183
 184 /* --------------------------------------------------------------------------------------------- */
 185
 186 static GList *
 187 create_format_menu (void)
 188 {
 189     GList *entries = NULL;
 190
 191     entries =
 192         g_list_append (entries, menu_entry_create (_("Insert &literal..."), CK_Insert_Literal));
 193     entries = g_list_append (entries, menu_entry_create (_("Insert &date/time"), CK_Date));
 194     entries = g_list_append (entries, menu_separator_create ());
 195     entries =
 196         g_list_append (entries, menu_entry_create (_("&Format paragraph"), CK_Paragraph_Format));
 197     entries = g_list_append (entries, menu_entry_create (_("&Sort..."), CK_Sort));
 198     entries = g_list_append (entries, menu_entry_create (_("&Paste output of..."), CK_ExtCmd));
 199     entries =
 200         g_list_append (entries, menu_entry_create (_("&External formatter"), CK_Pipe_Block (0)));
 201
 202     return entries;
 203 }
 204
 205 /* --------------------------------------------------------------------------------------------- */
 206
 207 static GList *
 208 create_options_menu (void)
 209 {
 210     GList *entries = NULL;
 211
 212     entries = g_list_append (entries, menu_entry_create (_("&General..."), CK_Edit_Options));
 213     entries = g_list_append (entries, menu_entry_create (_("Save &mode..."), CK_Edit_Save_Mode));
 214     entries = g_list_append (entries, menu_entry_create (_("Learn &keys..."), CK_LearnKeys));
 215     entries =
 216         g_list_append (entries, menu_entry_create (_("Syntax &highlighting..."), CK_Choose_Syntax));
 217     entries = g_list_append (entries, menu_separator_create ());
 218     entries = g_list_append (entries, menu_entry_create (_("S&yntax file"), CK_Load_Syntax_File));
 219     entries = g_list_append (entries, menu_entry_create (_("&Menu file"), CK_Load_Menu_File));
 220     entries = g_list_append (entries, menu_separator_create ());
 221     entries = g_list_append (entries, menu_entry_create (_("&Save setup"), CK_SaveSetupCmd));
 222
 223     return entries;
 224 }
 225
 226 /* --------------------------------------------------------------------------------------------- */
 227
 228 static void
 229 edit_drop_menu_cmd (WEdit * e, int which)
 230 {
 231     WMenuBar *menubar;
 232
 233     menubar = find_menubar (e->widget.owner);
 234
 235     if (!menubar->is_active)
 236     {
 237         menubar->is_active = TRUE;
 238         menubar->is_dropped = (drop_menus != 0);
 239         if (which >= 0)
 240             menubar->selected = which;
 241
 242         menubar->previous_widget = dlg_get_current_widget_id (e->widget.owner);
 243         dlg_select_widget (menubar);
 244     }
 245 }
 246
 247 /* --------------------------------------------------------------------------------------------- */
 248 /*** public functions ****************************************************************************/
 249 /* --------------------------------------------------------------------------------------------- */
 250
 251 void
 252 edit_init_menu (struct WMenuBar *menubar)
 253 {
 254     menubar_add_menu (menubar,
 255                       create_menu (_("&File"), create_file_menu (), "[Internal File Editor]"));
 256     menubar_add_menu (menubar,
 257                       create_menu (_("&Edit"), create_edit_menu (), "[Internal File Editor]"));
 258     menubar_add_menu (menubar,
 259                       create_menu (_("&Search"), create_search_replace_menu (),
 260                                    "[Internal File Editor]"));
 261     menubar_add_menu (menubar,
 262                       create_menu (_("&Command"), create_command_menu (),
 263                                    "[Internal File Editor]"));
 264     menubar_add_menu (menubar,
 265                       create_menu (_("For&mat"), create_format_menu (), "[Internal File Editor]"));
 266     menubar_add_menu (menubar,
 267                       create_menu (_("&Options"), create_options_menu (),
 268                                    "[Internal File Editor]"));
 269 }
 270
 271 /* --------------------------------------------------------------------------------------------- */
 272
 273 void
 274 edit_menu_cmd (WEdit * e)
 275 {
 276     edit_drop_menu_cmd (e, -1);
 277 }
 278
 279 /* --------------------------------------------------------------------------------------------- */
 280
 281 int
 282 edit_drop_hotkey_menu (WEdit * e, int key)
 283 {
 284     int m = 0;
 285     switch (key)
 286     {
 287     case ALT ('f'):
 288         m = 0;
 289         break;
 290     case ALT ('e'):
 291         m = 1;
 292         break;
 293     case ALT ('s'):
 294         m = 2;
 295         break;
 296     case ALT ('c'):
 297         m = 3;
 298         break;
 299     case ALT ('m'):
 300         m = 4;
 301         break;
 302     case ALT ('o'):
 303         m = 5;
 304         break;
 305     default:
 306         return 0;
 307     }
 308
 309     edit_drop_menu_cmd (e, m);
 310     return 1;
 311 }
 312
 313 /* --------------------------------------------------------------------------------------------- */