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