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_entry_create (_("&Redo"), CK_Redo));
  97     entries = g_list_append (entries, menu_separator_create ());
  98     entries = g_list_append (entries, menu_entry_create (_("&Toggle ins/overw"), CK_Toggle_Insert));
  99     entries = g_list_append (entries, menu_separator_create ());
 100     entries = g_list_append (entries, menu_entry_create (_("To&ggle mark"), CK_Mark));
 101     entries = g_list_append (entries, menu_entry_create (_("&Mark columns"), CK_Column_Mark));
 102     entries = g_list_append (entries, menu_entry_create (_("Mark &all"), CK_Mark_All));
 103     entries = g_list_append (entries, menu_entry_create (_("Unmar&k"), CK_Unmark));
 104     entries = g_list_append (entries, menu_separator_create ());
 105     entries = g_list_append (entries, menu_entry_create (_("Cop&y"), CK_Copy));
 106     entries = g_list_append (entries, menu_entry_create (_("Mo&ve"), CK_Move));
 107     entries = g_list_append (entries, menu_entry_create (_("&Delete"), CK_Remove));
 108     entries = g_list_append (entries, menu_separator_create ());
 109     entries = g_list_append (entries, menu_entry_create (_("Co&py to clipfile"), CK_XStore));
 110     entries = g_list_append (entries, menu_entry_create (_("&Cut to clipfile"), CK_XCut));
 111     entries = g_list_append (entries, menu_entry_create (_("Pa&ste from clipfile"), CK_XPaste));
 112     entries = g_list_append (entries, menu_separator_create ());
 113     entries = g_list_append (entries, menu_entry_create (_("&Beginning"), CK_Beginning_Of_Text));
 114     entries = g_list_append (entries, menu_entry_create (_("&End"), CK_End_Of_Text));
 115
 116     return entries;
 117 }
 118
 119 /* --------------------------------------------------------------------------------------------- */
 120
 121 static GList *
 122 create_search_replace_menu (void)
 123 {
 124     GList *entries = NULL;
 125
 126     entries = g_list_append (entries, menu_entry_create (_("&Search..."), CK_Find));
 127     entries = g_list_append (entries, menu_entry_create (_("Search &again"), CK_Find_Again));
 128     entries = g_list_append (entries, menu_entry_create (_("&Replace..."), CK_Replace));
 129     entries = g_list_append (entries, menu_separator_create ());
 130     entries =
 131         g_list_append (entries, menu_entry_create (_("&Toggle bookmark"), CK_Toggle_Bookmark));
 132     entries = g_list_append (entries, menu_entry_create (_("&Next bookmark"), CK_Next_Bookmark));
 133     entries = g_list_append (entries, menu_entry_create (_("&Prev bookmark"), CK_Prev_Bookmark));
 134     entries = g_list_append (entries, menu_entry_create (_("&Flush bookmark"), CK_Flush_Bookmarks));
 135
 136     return entries;
 137 }
 138
 139 /* --------------------------------------------------------------------------------------------- */
 140
 141 static GList *
 142 create_command_menu (void)
 143 {
 144     GList *entries = NULL;
 145
 146     entries = g_list_append (entries, menu_entry_create (_("&Go to line..."), CK_Goto));
 147     entries =
 148         g_list_append (entries, menu_entry_create (_("&Toggle line state"), CK_Toggle_Line_State));
 149     entries =
 150         g_list_append (entries, menu_entry_create (_("Go to matching &bracket"), CK_Match_Bracket));
 151     entries =
 152         g_list_append (entries,
 153                        menu_entry_create (_("Toggle s&yntax highlighting"), CK_Toggle_Syntax));
 154     entries = g_list_append (entries, menu_separator_create ());
 155     entries =
 156         g_list_append (entries, menu_entry_create (_("&Find declaration"), CK_Find_Definition));
 157     entries =
 158         g_list_append (entries, menu_entry_create (_("Back from &declaration"), CK_Load_Prev_File));
 159     entries =
 160         g_list_append (entries,
 161                        menu_entry_create (_("For&ward to declaration"), CK_Load_Next_File));
 162 #ifdef HAVE_CHARSET
 163     entries = g_list_append (entries, menu_separator_create ());
 164     entries = g_list_append (entries, menu_entry_create (_("Encod&ing..."), CK_SelectCodepage));
 165 #endif
 166     entries = g_list_append (entries, menu_separator_create ());
 167     entries = g_list_append (entries, menu_entry_create (_("&Refresh screen"), CK_Refresh));
 168     entries = g_list_append (entries, menu_separator_create ());
 169     entries =
 170         g_list_append (entries,
 171                        menu_entry_create (_("&Start/Stop record macro"), CK_Begin_End_Macro));
 172     entries = g_list_append (entries, menu_entry_create (_("Delete macr&o..."), CK_Delete_Macro));
 173     entries = g_list_append (entries, menu_separator_create ());
 174     entries =
 175         g_list_append (entries, menu_entry_create (_("'ispell' s&pell check"), CK_Pipe_Block (1)));
 176     entries = g_list_append (entries, menu_entry_create (_("&Mail..."), CK_Mail));
 177
 178     return entries;
 179 }
 180
 181 /* --------------------------------------------------------------------------------------------- */
 182
 183 static GList *
 184 create_format_menu (void)
 185 {
 186     GList *entries = NULL;
 187
 188     entries =
 189         g_list_append (entries, menu_entry_create (_("Insert &literal..."), CK_Insert_Literal));
 190     entries = g_list_append (entries, menu_entry_create (_("Insert &date/time"), CK_Date));
 191     entries = g_list_append (entries, menu_separator_create ());
 192     entries =
 193         g_list_append (entries, menu_entry_create (_("&Format paragraph"), CK_Paragraph_Format));
 194     entries = g_list_append (entries, menu_entry_create (_("&Sort..."), CK_Sort));
 195     entries = g_list_append (entries, menu_entry_create (_("&Paste output of..."), CK_ExtCmd));
 196     entries =
 197         g_list_append (entries, menu_entry_create (_("&External formatter"), CK_Pipe_Block (0)));
 198
 199     return entries;
 200 }
 201
 202 /* --------------------------------------------------------------------------------------------- */
 203
 204 static GList *
 205 create_options_menu (void)
 206 {
 207     GList *entries = NULL;
 208
 209     entries = g_list_append (entries, menu_entry_create (_("&General..."), CK_Edit_Options));
 210     entries = g_list_append (entries, menu_entry_create (_("Save &mode..."), CK_Edit_Save_Mode));
 211     entries = g_list_append (entries, menu_entry_create (_("Learn &keys..."), CK_LearnKeys));
 212     entries =
 213         g_list_append (entries, menu_entry_create (_("Syntax &highlighting..."), CK_Choose_Syntax));
 214     entries = g_list_append (entries, menu_separator_create ());
 215     entries = g_list_append (entries, menu_entry_create (_("S&yntax file"), CK_Load_Syntax_File));
 216     entries = g_list_append (entries, menu_entry_create (_("&Menu file"), CK_Load_Menu_File));
 217     entries = g_list_append (entries, menu_separator_create ());
 218     entries = g_list_append (entries, menu_entry_create (_("&Save setup"), CK_SaveSetupCmd));
 219
 220     return entries;
 221 }
 222
 223 /* --------------------------------------------------------------------------------------------- */
 224
 225 static void
 226 edit_drop_menu_cmd (WEdit * e, int which)
 227 {
 228     WMenuBar *menubar;
 229
 230     menubar = find_menubar (e->widget.owner);
 231
 232     if (!menubar->is_active)
 233     {
 234         menubar->is_active = TRUE;
 235         menubar->is_dropped = (drop_menus != 0);
 236         if (which >= 0)
 237             menubar->selected = which;
 238
 239         menubar->previous_widget = dlg_get_current_widget_id (e->widget.owner);
 240         dlg_select_widget (menubar);
 241     }
 242 }
 243
 244 /* --------------------------------------------------------------------------------------------- */
 245 /*** public functions ****************************************************************************/
 246 /* --------------------------------------------------------------------------------------------- */
 247
 248 void
 249 edit_init_menu (struct WMenuBar *menubar)
 250 {
 251     menubar_add_menu (menubar,
 252                       create_menu (_("&File"), create_file_menu (), "[Internal File Editor]"));
 253     menubar_add_menu (menubar,
 254                       create_menu (_("&Edit"), create_edit_menu (), "[Internal File Editor]"));
 255     menubar_add_menu (menubar,
 256                       create_menu (_("&Search"), create_search_replace_menu (),
 257                                    "[Internal File Editor]"));
 258     menubar_add_menu (menubar,
 259                       create_menu (_("&Command"), create_command_menu (),
 260                                    "[Internal File Editor]"));
 261     menubar_add_menu (menubar,
 262                       create_menu (_("For&mat"), create_format_menu (), "[Internal File Editor]"));
 263     menubar_add_menu (menubar,
 264                       create_menu (_("&Options"), create_options_menu (),
 265                                    "[Internal File Editor]"));
 266 }
 267
 268 /* --------------------------------------------------------------------------------------------- */
 269
 270 void
 271 edit_menu_cmd (WEdit * e)
 272 {
 273     edit_drop_menu_cmd (e, -1);
 274 }
 275
 276 /* --------------------------------------------------------------------------------------------- */
 277
 278 int
 279 edit_drop_hotkey_menu (WEdit * e, int key)
 280 {
 281     int m = 0;
 282     switch (key)
 283     {
 284     case ALT ('f'):
 285         m = 0;
 286         break;
 287     case ALT ('e'):
 288         m = 1;
 289         break;
 290     case ALT ('s'):
 291         m = 2;
 292         break;
 293     case ALT ('c'):
 294         m = 3;
 295         break;
 296     case ALT ('m'):
 297         m = 4;
 298         break;
 299     case ALT ('o'):
 300         m = 5;
 301         break;
 302     default:
 303         return 0;
 304     }
 305
 306     edit_drop_menu_cmd (e, m);
 307     return 1;
 308 }
 309
 310 /* --------------------------------------------------------------------------------------------- */