edit/editwidget.c

   1 /* editor initialisation and callback handler.
   2
   3    Copyright (C) 1996, 1997 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 "edit-widget.h"
  42
  43 #include "../src/tty.h"         /* LINES */
  44 #include "../src/widget.h"      /* buttonbar_redraw() */
  45 #include "../src/menu.h"        /* menubar_new() */
  46 #include "../src/key.h"         /* is_idle() */
  47
  48 WEdit *wedit;
  49 struct WMenu *edit_menubar;
  50
  51 int column_highlighting = 0;
  52
  53 static cb_ret_t edit_callback (Widget *, widget_msg_t msg, int parm);
  54
  55 static int
  56 edit_event (WEdit * edit, Gpm_Event * event, int *result)
  57 {
  58     *result = MOU_NORMAL;
  59     edit_update_curs_row (edit);
  60     edit_update_curs_col (edit);
  61
  62     /* Unknown event type */
  63     if (!(event->type & (GPM_DOWN | GPM_DRAG | GPM_UP)))
  64         return 0;
  65
  66     /* Wheel events */
  67     if ((event->buttons & GPM_B_UP) && (event->type & GPM_DOWN)) {
  68         edit_move_up (edit, 2, 1);
  69         goto update;
  70     }
  71     if ((event->buttons & GPM_B_DOWN) && (event->type & GPM_DOWN)) {
  72         edit_move_down (edit, 2, 1);
  73         goto update;
  74     }
  75
  76     /* Outside editor window */
  77     if (event->y <= 1 || event->x <= 0
  78         || event->x > edit->num_widget_columns
  79         || event->y > edit->num_widget_lines + 1)
  80         return 0;
  81
  82     /* A lone up mustn't do anything */
  83     if (edit->mark2 != -1 && event->type & (GPM_UP | GPM_DRAG))
  84         return 1;
  85
  86     if (event->type & (GPM_DOWN | GPM_UP))
  87         edit_push_key_press (edit);
  88
  89     edit_cursor_move (edit, edit_bol (edit, edit->curs1) - edit->curs1);
  90
  91     if (--event->y > (edit->curs_row + 1))
  92         edit_cursor_move (edit,
  93                           edit_move_forward (edit, edit->curs1,
  94                                              event->y - (edit->curs_row +
  95                                                          1), 0)
  96                           - edit->curs1);
  97
  98     if (event->y < (edit->curs_row + 1))
  99         edit_cursor_move (edit,
 100                           edit_move_backward (edit, edit->curs1,
 101                                               (edit->curs_row + 1) -
 102                                               event->y) - edit->curs1);
 103
 104     edit_cursor_move (edit,
 105                       (int) edit_move_forward3 (edit, edit->curs1,
 106                                                 event->x -
 107                                                 edit->start_col - 1,
 108                                                 0) - edit->curs1);
 109
 110     edit->prev_col = edit_get_col (edit);
 111
 112     if (event->type & GPM_DOWN) {
 113         edit_mark_cmd (edit, 1);        /* reset */
 114         edit->highlight = 0;
 115     }
 116
 117     if (!(event->type & GPM_DRAG))
 118         edit_mark_cmd (edit, 0);
 119
 120   update:
 121     edit->force |= REDRAW_COMPLETELY;
 122     edit_update_curs_row (edit);
 123     edit_update_curs_col (edit);
 124     edit_update_screen (edit);
 125
 126     return 1;
 127 }
 128
 129
 130 static int
 131 edit_mouse_event (Gpm_Event *event, void *x)
 132 {
 133     int result;
 134     if (edit_event ((WEdit *) x, event, &result))
 135         return result;
 136     else
 137         return (*edit_menubar->widget.mouse) (event, edit_menubar);
 138 }
 139
 140 static void
 141 edit_adjust_size (Dlg_head *h)
 142 {
 143     WEdit *edit;
 144     WButtonBar *edit_bar;
 145
 146     edit = (WEdit *) find_widget_type (h, edit_callback);
 147     edit_bar = find_buttonbar (h);
 148
 149     widget_set_size (&edit->widget, 0, 0, LINES - 1, COLS);
 150     widget_set_size ((Widget *) edit_bar, LINES - 1, 0, 1, COLS);
 151     widget_set_size (&edit_menubar->widget, 0, 0, 1, COLS);
 152
 153 #ifdef RESIZABLE_MENUBAR
 154     menubar_arrange (edit_menubar);
 155 #endif
 156 }
 157
 158 /* Callback for the edit dialog */
 159 static cb_ret_t
 160 edit_dialog_callback (Dlg_head *h, dlg_msg_t msg, int parm)
 161 {
 162     WEdit *edit;
 163
 164     switch (msg) {
 165     case DLG_RESIZE:
 166         edit_adjust_size (h);
 167         return MSG_HANDLED;
 168
 169     case DLG_VALIDATE:
 170         edit = (WEdit *) find_widget_type (h, edit_callback);
 171         if (!edit_ok_to_exit (edit)) {
 172             h->running = 1;
 173         }
 174         return MSG_HANDLED;
 175
 176     default:
 177         return default_dlg_callback (h, msg, parm);
 178     }
 179 }
 180
 181 int
 182 edit_file (const char *_file, int line)
 183 {
 184     static int made_directory = 0;
 185     Dlg_head *edit_dlg;
 186     WButtonBar *edit_bar;
 187
 188     if (!made_directory) {
 189         char *dir = concat_dir_and_file (home_dir, EDIT_DIR);
 190         made_directory = (mkdir (dir, 0700) != -1 || errno == EEXIST);
 191         g_free (dir);
 192     }
 193
 194     if (!(wedit = edit_init (NULL, LINES - 2, COLS, _file, line))) {
 195         return 0;
 196     }
 197
 198     /* Create a new dialog and add it widgets to it */
 199     edit_dlg =
 200         create_dlg (0, 0, LINES, COLS, NULL, edit_dialog_callback,
 201                     "[Internal File Editor]", NULL, DLG_WANT_TAB);
 202
 203     init_widget (&(wedit->widget), 0, 0, LINES - 1, COLS,
 204                  edit_callback,
 205                  edit_mouse_event);
 206
 207     widget_want_cursor (wedit->widget, 1);
 208
 209     edit_bar = buttonbar_new (1);
 210
 211     edit_menubar = edit_init_menu ();
 212
 213     add_widget (edit_dlg, edit_bar);
 214     add_widget (edit_dlg, wedit);
 215     add_widget (edit_dlg, edit_menubar);
 216
 217     run_dlg (edit_dlg);
 218
 219     edit_done_menu (edit_menubar);              /* editmenu.c */
 220
 221     destroy_dlg (edit_dlg);
 222
 223     return 1;
 224 }
 225
 226 static void edit_my_define (Dlg_head * h, int idx, const char *text,
 227                             void (*fn) (WEdit *), WEdit * edit)
 228 {
 229     text = edit->labels[idx - 1]? edit->labels[idx - 1] : text;
 230     /* function-cast ok */
 231     buttonbar_set_label_data (h, idx, text, (buttonbarfn) fn, edit);
 232 }
 233
 234
 235 static void cmd_F1 (WEdit * edit)
 236 {
 237     send_message ((Widget *) edit, WIDGET_KEY, KEY_F (1));
 238 }
 239
 240 static void cmd_F2 (WEdit * edit)
 241 {
 242     send_message ((Widget *) edit, WIDGET_KEY, KEY_F (2));
 243 }
 244
 245 static void cmd_F3 (WEdit * edit)
 246 {
 247     send_message ((Widget *) edit, WIDGET_KEY, KEY_F (3));
 248 }
 249
 250 static void cmd_F4 (WEdit * edit)
 251 {
 252     send_message ((Widget *) edit, WIDGET_KEY, KEY_F (4));
 253 }
 254
 255 static void cmd_F5 (WEdit * edit)
 256 {
 257     send_message ((Widget *) edit, WIDGET_KEY, KEY_F (5));
 258 }
 259
 260 static void cmd_F6 (WEdit * edit)
 261 {
 262     send_message ((Widget *) edit, WIDGET_KEY, KEY_F (6));
 263 }
 264
 265 static void cmd_F7 (WEdit * edit)
 266 {
 267     send_message ((Widget *) edit, WIDGET_KEY, KEY_F (7));
 268 }
 269
 270 static void cmd_F8 (WEdit * edit)
 271 {
 272     send_message ((Widget *) edit, WIDGET_KEY, KEY_F (8));
 273 }
 274
 275 #if 0
 276 static void cmd_F9 (WEdit * edit)
 277 {
 278     send_message ((Widget *) edit, WIDGET_KEY, KEY_F (9));
 279 }
 280 #endif
 281
 282 static void cmd_F10 (WEdit * edit)
 283 {
 284     send_message ((Widget *) edit, WIDGET_KEY, KEY_F (10));
 285 }
 286
 287 static void
 288 edit_labels (WEdit *edit)
 289 {
 290     Dlg_head *h = edit->widget.parent;
 291
 292     edit_my_define (h, 1, _("Help"), cmd_F1, edit);
 293     edit_my_define (h, 2, _("Save"), cmd_F2, edit);
 294     edit_my_define (h, 3, _("Mark"), cmd_F3, edit);
 295     edit_my_define (h, 4, _("Replac"), cmd_F4, edit);
 296     edit_my_define (h, 5, _("Copy"), cmd_F5, edit);
 297     edit_my_define (h, 6, _("Move"), cmd_F6, edit);
 298     edit_my_define (h, 7, _("Search"), cmd_F7, edit);
 299     edit_my_define (h, 8, _("Delete"), cmd_F8, edit);
 300     edit_my_define (h, 9, _("PullDn"), edit_menu_cmd, edit);
 301     edit_my_define (h, 10, _("Quit"), cmd_F10, edit);
 302
 303     buttonbar_redraw (h);
 304 }
 305
 306 void edit_update_screen (WEdit * e)
 307 {
 308     edit_scroll_screen_over_cursor (e);
 309
 310     edit_update_curs_col (e);
 311     edit_status (e);
 312
 313 /* pop all events for this window for internal handling */
 314
 315     if (!is_idle ()) {
 316         e->force |= REDRAW_PAGE;
 317         return;
 318     }
 319     if (e->force & REDRAW_COMPLETELY)
 320         e->force |= REDRAW_PAGE;
 321     edit_render_keypress (e);
 322 }
 323
 324 static cb_ret_t
 325 edit_callback (Widget *w, widget_msg_t msg, int parm)
 326 {
 327     WEdit *e = (WEdit *) w;
 328
 329     switch (msg) {
 330     case WIDGET_INIT:
 331         e->force |= REDRAW_COMPLETELY;
 332         edit_labels (e);
 333         return MSG_HANDLED;
 334
 335     case WIDGET_DRAW:
 336         e->force |= REDRAW_COMPLETELY;
 337         e->num_widget_lines = LINES - 2;
 338         e->num_widget_columns = COLS;
 339         /* fallthrough */
 340
 341     case WIDGET_FOCUS:
 342         edit_update_screen (e);
 343         return MSG_HANDLED;
 344
 345     case WIDGET_KEY:
 346         {
 347             int cmd, ch;
 348
 349             /* The user may override the access-keys for the menu bar. */
 350             if (edit_translate_key (e, parm, &cmd, &ch)) {
 351                 edit_execute_key_command (e, cmd, ch);
 352                 edit_update_screen (e);
 353                 return MSG_HANDLED;
 354             } else  if (edit_drop_hotkey_menu (e, parm)) {
 355                 return MSG_HANDLED;
 356             } else {
 357                 return MSG_NOT_HANDLED;
 358             }
 359         }
 360
 361     case WIDGET_CURSOR:
 362         widget_move (&e->widget, e->curs_row + EDIT_TEXT_VERTICAL_OFFSET,
 363                      e->curs_col + e->start_col);
 364         return MSG_HANDLED;
 365
 366     case WIDGET_DESTROY:
 367         edit_clean (e);
 368         return MSG_HANDLED;
 369
 370     default:
 371         return default_proc (msg, parm);
 372     }
 373 }