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