src/editor/editwidget.c

   1 /*
   2    Editor initialisation and callback handler.
   3
   4    Copyright (C) 1996, 1997, 1998, 2001, 2002, 2003, 2004, 2005, 2006,
   5    2007, 2011, 2012
   6    The Free Software Foundation, Inc.
   7
   8    Written by:
   9    Paul Sheer, 1996, 1997
  10    Andrew Borodin <aborodin@vmail.ru> 2012
  11
  12    This file is part of the Midnight Commander.
  13
  14    The Midnight Commander is free software: you can redistribute it
  15    and/or modify it under the terms of the GNU General Public License as
  16    published by the Free Software Foundation, either version 3 of the License,
  17    or (at your option) any later version.
  18
  19    The Midnight Commander is distributed in the hope that it will be useful,
  20    but WITHOUT ANY WARRANTY; without even the implied warranty of
  21    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  22    GNU General Public License for more details.
  23
  24    You should have received a copy of the GNU General Public License
  25    along with this program.  If not, see <http://www.gnu.org/licenses/>.
  26  */
  27
  28 /** \file
  29  *  \brief Source: editor initialisation and callback handler
  30  *  \author Paul Sheer
  31  *  \date 1996, 1997
  32  */
  33
  34 #include <config.h>
  35
  36 #include <stdio.h>
  37 #include <stdarg.h>
  38 #include <sys/types.h>
  39 #include <unistd.h>
  40 #include <string.h>
  41 #include <ctype.h>
  42 #include <errno.h>
  43 #include <sys/stat.h>
  44 #include <stdlib.h>
  45
  46 #include "lib/global.h"
  47
  48 #include "lib/tty/tty.h"        /* LINES, COLS */
  49 #include "lib/tty/key.h"        /* is_idle() */
  50 #include "lib/tty/color.h"      /* tty_setcolor() */
  51 #include "lib/skin.h"
  52 #include "lib/strutil.h"        /* str_term_trim() */
  53 #include "lib/util.h"           /* mc_build_filename() */
  54 #include "lib/widget.h"
  55 #include "lib/mcconfig.h"
  56 #include "lib/event.h"          /* mc_event_raise() */
  57
  58 #include "src/keybind-defaults.h"
  59 #include "src/setup.h"          /* home_dir */
  60 #include "src/filemanager/cmd.h"        /* view_other_cmd(), save_setup_cmd()  */
  61 #include "src/learn.h"          /* learn_keys() */
  62 #include "src/args.h"           /* mcedit_arg_t */
  63
  64 #include "edit-impl.h"
  65 #include "editwidget.h"
  66 #ifdef HAVE_ASPELL
  67 #include "spell.h"
  68 #endif
  69
  70 /*** global variables ****************************************************************************/
  71
  72 char *edit_window_state_char = NULL;
  73 char *edit_window_close_char = NULL;
  74
  75 /*** file scope macro definitions ****************************************************************/
  76
  77 #define WINDOW_MIN_LINES (2 + 2)
  78 #define WINDOW_MIN_COLS (2 + LINE_STATE_WIDTH + 2)
  79
  80 /*** file scope type declarations ****************************************************************/
  81
  82 /*** file scope variables ************************************************************************/
  83 static unsigned int edit_dlg_init_refcounter = 0;
  84
  85 /*** file scope functions ************************************************************************/
  86
  87 static cb_ret_t edit_dialog_callback (Widget * w, Widget * sender, widget_msg_t msg, int parm,
  88                                       void *data);
  89
  90 /* --------------------------------------------------------------------------------------------- */
  91 /**
  92  * Init the 'edit' subsystem
  93  */
  94
  95 static void
  96 edit_dlg_init (void)
  97 {
  98     if (edit_dlg_init_refcounter == 0)
  99     {
 100         edit_window_state_char = mc_skin_get ("editor", "window-state-char", "*");
 101         edit_window_close_char = mc_skin_get ("editor", "window-close-char", "X");
 102
 103 #ifdef HAVE_ASPELL
 104         aspell_init ();
 105 #endif
 106     }
 107
 108     edit_dlg_init_refcounter++;
 109 }
 110
 111 /* --------------------------------------------------------------------------------------------- */
 112 /**
 113  * Deinit the 'edit' subsystem
 114  */
 115
 116 static void
 117 edit_dlg_deinit (void)
 118 {
 119     if (edit_dlg_init_refcounter != 0)
 120         edit_dlg_init_refcounter--;
 121
 122     if (edit_dlg_init_refcounter == 0)
 123     {
 124         g_free (edit_window_state_char);
 125         g_free (edit_window_close_char);
 126
 127 #ifdef HAVE_ASPELL
 128         aspell_clean ();
 129 #endif
 130     }
 131 }
 132
 133 /* --------------------------------------------------------------------------------------------- */
 134 /**
 135  * Show info about editor
 136  */
 137
 138 static void
 139 edit_about (void)
 140 {
 141     quick_widget_t quick_widgets[] = {
 142         /* *INDENT-OFF* */
 143         QUICK_LABEL ("MCEdit " VERSION, NULL),
 144         QUICK_SEPARATOR (TRUE),
 145         QUICK_LABEL (N_("A user friendly text editor\n"
 146                         "written for the Midnight Commander."), NULL),
 147         QUICK_SEPARATOR (FALSE),
 148         QUICK_LABEL (N_("Copyright (C) 1996-2012 the Free Software Foundation"), NULL),
 149         QUICK_START_BUTTONS (TRUE, TRUE),
 150             QUICK_BUTTON (N_("&OK"), B_ENTER, NULL, NULL),
 151         QUICK_END
 152         /* *INDENT-ON* */
 153     };
 154
 155     quick_dialog_t qdlg = {
 156         -1, -1, 40,
 157         N_("About"), "[Internal File Editor]",
 158         quick_widgets, NULL, NULL
 159     };
 160
 161     quick_widgets[0].pos_flags = WPOS_KEEP_TOP | WPOS_CENTER_HORZ;
 162     quick_widgets[2].pos_flags = WPOS_KEEP_TOP | WPOS_CENTER_HORZ;
 163     quick_widgets[4].pos_flags = WPOS_KEEP_TOP | WPOS_CENTER_HORZ;
 164
 165     (void) quick_dialog (&qdlg);
 166 }
 167
 168 /* --------------------------------------------------------------------------------------------- */
 169 /**
 170  * Show a help window
 171  */
 172
 173 static void
 174 edit_help (void)
 175 {
 176     ev_help_t event_data = { NULL, "[Internal File Editor]" };
 177     mc_event_raise (MCEVENT_GROUP_CORE, "help", &event_data);
 178 }
 179
 180 /* --------------------------------------------------------------------------------------------- */
 181 /**
 182  * Callback for the iteration of objects in the 'editors' array.
 183  * Resize the editor window.
 184  *
 185  * @param data      probably WEdit object
 186  * @param user_data unused
 187  */
 188
 189 static void
 190 edit_dialog_resize_cb (void *data, void *user_data)
 191 {
 192     Widget *w = WIDGET (data);
 193
 194     (void) user_data;
 195
 196     if (edit_widget_is_editor (w) && ((WEdit *) w)->fullscreen)
 197     {
 198         Widget *wh = WIDGET (w->owner);
 199
 200         w->lines = wh->lines - 2;
 201         w->cols = wh->cols;
 202     }
 203 }
 204
 205 /* --------------------------------------------------------------------------------------------- */
 206 /**
 207  * Restore saved window size.
 208  *
 209  * @param edit editor object
 210  */
 211
 212 static void
 213 edit_restore_size (WEdit * edit)
 214 {
 215     edit->drag_state = MCEDIT_DRAG_NORMAL;
 216     widget_set_size (WIDGET (edit), edit->y_prev, edit->x_prev, edit->lines_prev, edit->cols_prev);
 217     dlg_redraw (WIDGET (edit)->owner);
 218 }
 219
 220 /* --------------------------------------------------------------------------------------------- */
 221 /**
 222  * Move window by one row or column in any direction.
 223  *
 224  * @param edit    editor object
 225  * @param command direction (CK_Up, CK_Down, CK_Left, CK_Right)
 226  */
 227
 228 static void
 229 edit_window_move (WEdit * edit, unsigned long command)
 230 {
 231     Widget *w = WIDGET (edit);
 232     Widget *wh = WIDGET (w->owner);
 233
 234     switch (command)
 235     {
 236     case CK_Up:
 237         if (w->y > wh->y + 1)   /* menubar */
 238             w->y--;
 239         break;
 240     case CK_Down:
 241         if (w->y < wh->y + wh->lines - 2)       /* buttonbar */
 242             w->y++;
 243         break;
 244     case CK_Left:
 245         if (w->x + w->cols > wh->x)
 246             w->x--;
 247         break;
 248     case CK_Right:
 249         if (w->x < wh->x + wh->cols)
 250             w->x++;
 251         break;
 252     default:
 253         return;
 254     }
 255
 256     edit->force |= REDRAW_PAGE;
 257     dlg_redraw (w->owner);
 258 }
 259
 260 /* --------------------------------------------------------------------------------------------- */
 261 /**
 262  * Resize window by one row or column in any direction.
 263  *
 264  * @param edit    editor object
 265  * @param command direction (CK_Up, CK_Down, CK_Left, CK_Right)
 266  */
 267
 268 static void
 269 edit_window_resize (WEdit * edit, unsigned long command)
 270 {
 271     Widget *w = WIDGET (edit);
 272     Widget *wh = WIDGET (w->owner);
 273
 274     switch (command)
 275     {
 276     case CK_Up:
 277         if (w->lines > WINDOW_MIN_LINES)
 278             w->lines--;
 279         break;
 280     case CK_Down:
 281         if (w->y + w->lines < wh->y + wh->lines - 1)    /* buttonbar */
 282             w->lines++;
 283         break;
 284     case CK_Left:
 285         if (w->cols > WINDOW_MIN_COLS)
 286             w->cols--;
 287         break;
 288     case CK_Right:
 289         if (w->x + w->cols < wh->x + wh->cols)
 290             w->cols++;
 291         break;
 292     default:
 293         return;
 294     }
 295
 296     edit->force |= REDRAW_COMPLETELY;
 297     dlg_redraw (w->owner);
 298 }
 299
 300 /* --------------------------------------------------------------------------------------------- */
 301 /**
 302  * Get hotkey by number.
 303  *
 304  * @param n number
 305  * @return hotkey
 306  */
 307
 308 static unsigned char
 309 get_hotkey (int n)
 310 {
 311     return (n <= 9) ? '0' + n : 'a' + n - 10;
 312 }
 313
 314 /* --------------------------------------------------------------------------------------------- */
 315
 316 static void
 317 edit_window_list (const WDialog * h)
 318 {
 319     const size_t offset = 2;    /* skip menu and buttonbar */
 320     const size_t dlg_num = g_list_length (h->widgets) - offset;
 321     int lines, cols;
 322     Listbox *listbox;
 323     GList *w;
 324     int i = 0;
 325     int rv;
 326
 327     lines = min ((size_t) (LINES * 2 / 3), dlg_num);
 328     cols = COLS * 2 / 3;
 329
 330     listbox = create_listbox_window (lines, cols, _("Open files"), "[Open files]");
 331
 332     for (w = h->widgets; w != NULL; w = g_list_next (w))
 333         if (edit_widget_is_editor (WIDGET (w->data)))
 334         {
 335             WEdit *e = (WEdit *) w->data;
 336             char *fname;
 337
 338             if (e->filename_vpath == NULL)
 339                 fname = g_strdup_printf ("%c [%s]", e->modified ? '*' : ' ', _("NoName"));
 340             else
 341             {
 342                 char *fname2;
 343
 344                 fname2 = vfs_path_to_str (e->filename_vpath);
 345                 fname = g_strdup_printf ("%c%s", e->modified ? '*' : ' ', fname2);
 346                 g_free (fname2);
 347             }
 348
 349             listbox_add_item (listbox->list, LISTBOX_APPEND_AT_END, get_hotkey (i++),
 350                               str_term_trim (fname, WIDGET (listbox->list)->cols - 2), NULL);
 351             g_free (fname);
 352         }
 353
 354     rv = g_list_position (h->widgets, h->current) - offset;
 355     listbox_select_entry (listbox->list, rv);
 356     rv = run_listbox (listbox);
 357     if (rv >= 0)
 358     {
 359         w = g_list_nth (h->widgets, rv + offset);
 360         dlg_set_top_widget (w->data);
 361     }
 362 }
 363
 364 /* --------------------------------------------------------------------------------------------- */
 365
 366 static char *
 367 edit_get_shortcut (unsigned long command)
 368 {
 369     const char *ext_map;
 370     const char *shortcut = NULL;
 371
 372     shortcut = keybind_lookup_keymap_shortcut (editor_map, command);
 373     if (shortcut != NULL)
 374         return g_strdup (shortcut);
 375
 376     ext_map = keybind_lookup_keymap_shortcut (editor_map, CK_ExtendedKeyMap);
 377     if (ext_map != NULL)
 378         shortcut = keybind_lookup_keymap_shortcut (editor_x_map, command);
 379     if (shortcut != NULL)
 380         return g_strdup_printf ("%s %s", ext_map, shortcut);
 381
 382     return NULL;
 383 }
 384
 385 /* --------------------------------------------------------------------------------------------- */
 386
 387 static char *
 388 edit_get_title (const WDialog * h, size_t len)
 389 {
 390     const WEdit *edit = find_editor (h);
 391     const char *modified = edit->modified ? "(*) " : "    ";
 392     const char *file_label;
 393     char *filename;
 394
 395     len -= 4;
 396
 397     filename = vfs_path_to_str (edit->filename_vpath);
 398     if (filename == NULL)
 399         filename = g_strdup (_("[NoName]"));
 400     file_label = str_term_trim (filename, len - str_term_width1 (_("Edit: ")));
 401     g_free (filename);
 402
 403     return g_strconcat (_("Edit: "), modified, file_label, (char *) NULL);
 404 }
 405
 406 /* --------------------------------------------------------------------------------------------- */
 407 /**
 408  * Handle mouse events of editor window
 409  *
 410  * @param event mouse event
 411  * @param data editor window
 412  * @return MOU_NORMAL if event was handled, MOU_UNHANDLED otherwise
 413  */
 414
 415 static int
 416 edit_event (Gpm_Event * event, void *data)
 417 {
 418     WEdit *edit = (WEdit *) data;
 419     Widget *w = WIDGET (data);
 420     Gpm_Event local;
 421
 422     if (!mouse_global_in_widget (event, w))
 423         return MOU_UNHANDLED;
 424
 425     local = mouse_get_local (event, w);
 426
 427     /* Unknown event type */
 428     if ((event->type & (GPM_DOWN | GPM_DRAG | GPM_UP)) == 0)
 429         return MOU_NORMAL;
 430
 431     dlg_set_top_widget (w);
 432
 433     edit_update_curs_row (edit);
 434     edit_update_curs_col (edit);
 435
 436     if (edit->fullscreen || (local.buttons & GPM_B_LEFT) == 0 || (local.type & GPM_UP) != 0)
 437         edit->drag_state = MCEDIT_DRAG_NORMAL;
 438     else if (local.y == 1 && edit->drag_state != MCEDIT_DRAG_RESIZE)
 439     {
 440         /* click on the top line (move) */
 441         int dx = edit->fullscreen ? 0 : 2;
 442
 443         if (local.x == w->cols - dx - 1)
 444         {
 445             send_message (w->owner, NULL, MSG_ACTION, CK_Close, NULL);
 446             return MOU_NORMAL;
 447         }
 448
 449         if (local.x == w->cols - dx - 4)
 450         {
 451             edit_toggle_fullscreen (edit);
 452             return MOU_NORMAL;
 453         }
 454
 455         if ((local.type & (GPM_DOWN | GPM_DRAG)) != 0)
 456         {
 457             /* move if not fullscreen */
 458             edit->drag_state_start = local.x;
 459             edit->drag_state = MCEDIT_DRAG_MOVE;
 460             edit->force |= REDRAW_COMPLETELY;
 461             edit_update_screen (edit);
 462         }
 463     }
 464     else if (!edit->fullscreen && local.y == w->lines && local.x == w->cols)
 465     {
 466         /* click on bottom-right corner (resize) */
 467         if ((local.type & (GPM_DOWN | GPM_DRAG)) != 0)
 468         {
 469             edit->drag_state = MCEDIT_DRAG_RESIZE;
 470             edit->force |= REDRAW_COMPLETELY;
 471             edit_update_screen (edit);
 472         }
 473     }
 474
 475     if (edit->drag_state == MCEDIT_DRAG_NORMAL)
 476     {
 477         gboolean done = TRUE;
 478
 479         /* Double click */
 480         if ((local.type & (GPM_DOUBLE | GPM_UP)) == (GPM_UP | GPM_DOUBLE))
 481         {
 482             edit_mark_current_word_cmd (edit);
 483             goto update;
 484         }
 485 #if 0
 486         /* Triple click */
 487         if ((local.type & (GPM_TRIPLE | GPM_UP)) == (GPM_UP | GPM_TRIPLE))
 488         {
 489             edit_mark_current_line_cmd (edit);
 490             goto update;
 491         }
 492 #endif
 493         /* Wheel events */
 494         if ((local.buttons & GPM_B_UP) != 0 && (local.type & GPM_DOWN) != 0)
 495         {
 496             edit_move_up (edit, 2, 1);
 497             goto update;
 498         }
 499         if ((local.buttons & GPM_B_DOWN) != 0 && (local.type & GPM_DOWN) != 0)
 500         {
 501             edit_move_down (edit, 2, 1);
 502             goto update;
 503         }
 504
 505         /* continue handle current event */
 506         goto cont;
 507
 508         /* handle DRAG mouse event, don't use standard way to continue
 509          * event handling outside of widget */
 510         do
 511         {
 512             int c;
 513
 514             c = tty_get_event (event, FALSE, TRUE);
 515             if (c == EV_NONE || c != EV_MOUSE)
 516                 break;
 517
 518             local = mouse_get_local (event, w);
 519
 520           cont:
 521             /* A lone up mustn't do anything */
 522             if (edit->mark2 != -1 && (local.type & (GPM_UP | GPM_DRAG)) != 0)
 523                 return MOU_NORMAL;
 524
 525             if ((local.type & (GPM_DOWN | GPM_UP)) != 0)
 526                 edit_push_key_press (edit);
 527
 528             if (!edit->fullscreen)
 529                 local.x--;
 530             if (!option_cursor_beyond_eol)
 531                 edit->prev_col = local.x - edit->start_col - option_line_state_width - 1;
 532             else
 533             {
 534                 long line_len = edit_move_forward3 (edit, edit_bol (edit, edit->curs1), 0,
 535                                                     edit_eol (edit, edit->curs1));
 536
 537                 if (local.x > line_len)
 538                 {
 539                     edit->over_col =
 540                         local.x - line_len - edit->start_col - option_line_state_width - 1;
 541                     edit->prev_col = line_len;
 542                 }
 543                 else
 544                 {
 545                     edit->over_col = 0;
 546                     edit->prev_col = local.x - option_line_state_width - edit->start_col - 1;
 547                 }
 548             }
 549
 550             if (!edit->fullscreen)
 551                 local.y--;
 552             if (local.y > (edit->curs_row + 1))
 553                 edit_move_down (edit, local.y - (edit->curs_row + 1), 0);
 554             else if (local.y < (edit->curs_row + 1))
 555                 edit_move_up (edit, (edit->curs_row + 1) - local.y, 0);
 556             else
 557                 edit_move_to_prev_col (edit, edit_bol (edit, edit->curs1));
 558
 559             if ((local.type & GPM_DOWN) != 0)
 560             {
 561                 edit_mark_cmd (edit, TRUE);     /* reset */
 562                 edit->highlight = 0;
 563             }
 564
 565             done = (local.type & GPM_DRAG) == 0;
 566             if (done)
 567                 edit_mark_cmd (edit, FALSE);
 568
 569           update:
 570             edit_find_bracket (edit);
 571             edit->force |= REDRAW_COMPLETELY;
 572             edit_update_curs_row (edit);
 573             edit_update_curs_col (edit);
 574             edit_update_screen (edit);
 575         }
 576         while (!edit->fullscreen && !done);
 577     }
 578     else
 579         while (edit->drag_state != MCEDIT_DRAG_NORMAL)
 580         {
 581             int c;
 582             int y;
 583
 584             c = tty_get_event (event, FALSE, TRUE);
 585             y = event->y - 1;
 586
 587             if (c == EV_NONE || c != EV_MOUSE)
 588             {
 589                 /* redraw frame */
 590                 edit->drag_state = MCEDIT_DRAG_NORMAL;
 591                 edit->force |= REDRAW_COMPLETELY;
 592                 edit_update_screen (edit);
 593             }
 594             else if (y == w->y && (event->type & (GPM_DOUBLE | GPM_UP)) == (GPM_DOUBLE | GPM_UP))
 595             {
 596                 /* double click on top line (toggle fullscreen) */
 597                 edit_toggle_fullscreen (edit);
 598                 edit->drag_state = MCEDIT_DRAG_NORMAL;
 599                 edit->force |= REDRAW_COMPLETELY;
 600                 edit_update_screen (edit);
 601             }
 602             else if ((event->type & (GPM_DRAG | GPM_DOWN)) == 0)
 603             {
 604                 /* redraw frame */
 605                 edit->drag_state = MCEDIT_DRAG_NORMAL;
 606                 edit->force |= REDRAW_COMPLETELY;
 607                 edit_update_screen (edit);
 608             }
 609             else if (!edit->fullscreen)
 610             {
 611                 Widget *h = WIDGET (w->owner);
 612
 613                 if (edit->drag_state == MCEDIT_DRAG_MOVE)
 614                 {
 615                     int x = event->x - 1;
 616
 617                     y = max (y, h->y + 1);      /* status line */
 618                     y = min (y, h->y + h->lines - 2);   /* buttonbar */
 619                     x = max (x, h->x);
 620                     x = min (x, h->x + h->cols - 1);
 621                     /* don't use widget_set_size() here to avoid double draw  */
 622                     w->y = y;
 623                     w->x = x - edit->drag_state_start;
 624                     edit->force |= REDRAW_COMPLETELY;
 625                 }
 626                 else if (edit->drag_state == MCEDIT_DRAG_RESIZE)
 627                 {
 628                     event->y = min (event->y, h->y + h->lines - 1);     /* buttonbar */
 629                     event->x = min (event->x, h->x + h->cols);
 630                     local = mouse_get_local (event, w);
 631
 632                     /* don't use widget_set_size() here to avoid double draw  */
 633                     w->lines = max (WINDOW_MIN_LINES, local.y);
 634                     w->cols = max (WINDOW_MIN_COLS, local.x);
 635                     edit->force |= REDRAW_COMPLETELY;
 636                 }
 637
 638                 dlg_redraw (w->owner);
 639             }
 640         }
 641
 642     return MOU_NORMAL;
 643 }
 644
 645 /* --------------------------------------------------------------------------------------------- */
 646 /**
 647  * Handle mouse events of editor screen.
 648  *
 649  * @param event mouse event
 650  * @param data editor screen
 651  * @return MOU_NORMAL if event was handled, MOU_UNHANDLED otherwise
 652  */
 653
 654 static int
 655 edit_dialog_event (Gpm_Event * event, void *data)
 656 {
 657     WDialog *h = DIALOG (data);
 658     Widget *w;
 659     Widget *wh = WIDGET (h);
 660     int ret = MOU_UNHANDLED;
 661
 662     w = WIDGET (find_menubar (h));
 663
 664     if (event->y == wh->y + 1 && (event->type & GPM_DOWN) != 0 && !MENUBAR (w)->is_active)
 665     {
 666         /* menubar */
 667
 668         GList *l;
 669         GList *top = NULL;
 670         int x;
 671
 672         /* Try find top fullscreen window */
 673         for (l = h->widgets; l != NULL; l = g_list_next (l))
 674             if (edit_widget_is_editor (WIDGET (l->data)) && ((WEdit *) l->data)->fullscreen)
 675                 top = l;
 676
 677         /* Handle fullscreen/close buttons in the top line */
 678         x = wh->x + wh->cols + 1 - 6;
 679
 680         if (top != NULL && event->x >= x)
 681         {
 682             WEdit *e;
 683
 684             e = (WEdit *) top->data;
 685             x = event->x - x;
 686
 687             if (top != h->current)
 688             {
 689                 /* Window is not active. Activate it */
 690                 dlg_set_top_widget (e);
 691             }
 692
 693             /* Handle buttons */
 694             if (x <= 2)
 695                 edit_toggle_fullscreen (e);
 696             else
 697                 send_message (h, NULL, MSG_ACTION, CK_Close, NULL);
 698
 699             ret = MOU_NORMAL;
 700         }
 701
 702         if (ret == MOU_UNHANDLED)
 703             dlg_select_widget (w);
 704     }
 705
 706     return ret;
 707 }
 708
 709 /* --------------------------------------------------------------------------------------------- */
 710
 711 static cb_ret_t
 712 edit_dialog_command_execute (WDialog * h, unsigned long command)
 713 {
 714     Widget *wh = WIDGET (h);
 715     gboolean ret = MSG_HANDLED;
 716
 717     switch (command)
 718     {
 719     case CK_EditNew:
 720         edit_add_window (h, wh->y + 1, wh->x, wh->lines - 2, wh->cols, NULL, 0);
 721         break;
 722     case CK_EditFile:
 723         edit_load_cmd (h);
 724         break;
 725     case CK_EditSyntaxFile:
 726         edit_load_syntax_file (h);
 727         break;
 728     case CK_EditUserMenu:
 729         edit_load_menu_file (h);
 730         break;
 731     case CK_Close:
 732         /* if there are no opened files anymore, close MC editor */
 733         if (edit_widget_is_editor (WIDGET (h->current->data)) &&
 734             edit_close_cmd ((WEdit *) h->current->data) && find_editor (h) == NULL)
 735             dlg_stop (h);
 736         break;
 737     case CK_Help:
 738         edit_help ();
 739         /* edit->force |= REDRAW_COMPLETELY; */
 740         break;
 741     case CK_Menu:
 742         edit_menu_cmd (h);
 743         break;
 744     case CK_Quit:
 745     case CK_Cancel:
 746         {
 747             Widget *w = WIDGET (h->current->data);
 748
 749             if (!edit_widget_is_editor (w) || ((WEdit *) w)->drag_state == MCEDIT_DRAG_NORMAL)
 750                 dlg_stop (h);
 751             else
 752                 edit_restore_size ((WEdit *) w);
 753         }
 754         break;
 755     case CK_About:
 756         edit_about ();
 757         break;
 758     case CK_SyntaxOnOff:
 759         edit_syntax_onoff_cmd (h);
 760         break;
 761     case CK_ShowTabTws:
 762         edit_show_tabs_tws_cmd (h);
 763         break;
 764     case CK_ShowMargin:
 765         edit_show_margin_cmd (h);
 766         break;
 767     case CK_ShowNumbers:
 768         edit_show_numbers_cmd (h);
 769         break;
 770     case CK_Refresh:
 771         edit_refresh_cmd ();
 772         break;
 773     case CK_Shell:
 774         view_other_cmd ();
 775         break;
 776     case CK_LearnKeys:
 777         learn_keys ();
 778         break;
 779     case CK_WindowMove:
 780     case CK_WindowResize:
 781         if (edit_widget_is_editor (WIDGET (h->current->data)))
 782             edit_handle_move_resize ((WEdit *) h->current->data, command);
 783         break;
 784     case CK_WindowList:
 785         edit_window_list (h);
 786         break;
 787     case CK_WindowNext:
 788         dlg_one_down (h);
 789         dlg_set_top_widget (h->current->data);
 790         break;
 791     case CK_WindowPrev:
 792         dlg_one_up (h);
 793         dlg_set_top_widget (h->current->data);
 794         break;
 795     case CK_Options:
 796         edit_options_dialog (h);
 797         break;
 798     case CK_OptionsSaveMode:
 799         edit_save_mode_cmd ();
 800         break;
 801     case CK_SaveSetup:
 802         save_setup_cmd ();
 803         break;
 804     default:
 805         ret = MSG_NOT_HANDLED;
 806         break;
 807     }
 808
 809     return ret;
 810 }
 811
 812 /* --------------------------------------------------------------------------------------------- */
 813
 814 static inline void
 815 edit_quit (WDialog * h)
 816 {
 817     GList *l;
 818     WEdit *e = NULL;
 819
 820     h->state = DLG_ACTIVE;      /* don't stop the dialog before final decision */
 821
 822     for (l = h->widgets; l != NULL; l = g_list_next (l))
 823         if (edit_widget_is_editor (WIDGET (l->data)))
 824         {
 825             e = (WEdit *) l->data;
 826
 827             if (e->drag_state != MCEDIT_DRAG_NORMAL)
 828             {
 829                 edit_restore_size (e);
 830                 return;
 831             }
 832
 833             if (e->modified)
 834             {
 835                 dlg_select_widget (e);
 836
 837                 if (!edit_ok_to_exit (e))
 838                     return;
 839             }
 840         }
 841
 842     /* no editors in dialog at all or no any file required to be saved */
 843     if (e == NULL || l == NULL)
 844         h->state = DLG_CLOSED;
 845 }
 846
 847 /* --------------------------------------------------------------------------------------------- */
 848
 849 static inline void
 850 edit_set_buttonbar (WEdit * edit, WButtonBar * bb)
 851 {
 852     buttonbar_set_label (bb, 1, Q_ ("ButtonBar|Help"), editor_map, NULL);
 853     buttonbar_set_label (bb, 2, Q_ ("ButtonBar|Save"), editor_map, WIDGET (edit));
 854     buttonbar_set_label (bb, 3, Q_ ("ButtonBar|Mark"), editor_map, WIDGET (edit));
 855     buttonbar_set_label (bb, 4, Q_ ("ButtonBar|Replac"), editor_map, WIDGET (edit));
 856     buttonbar_set_label (bb, 5, Q_ ("ButtonBar|Copy"), editor_map, WIDGET (edit));
 857     buttonbar_set_label (bb, 6, Q_ ("ButtonBar|Move"), editor_map, WIDGET (edit));
 858     buttonbar_set_label (bb, 7, Q_ ("ButtonBar|Search"), editor_map, WIDGET (edit));
 859     buttonbar_set_label (bb, 8, Q_ ("ButtonBar|Delete"), editor_map, WIDGET (edit));
 860     buttonbar_set_label (bb, 9, Q_ ("ButtonBar|PullDn"), editor_map, NULL);
 861     buttonbar_set_label (bb, 10, Q_ ("ButtonBar|Quit"), editor_map, NULL);
 862 }
 863
 864 /* --------------------------------------------------------------------------------------------- */
 865 /** Callback for the edit dialog */
 866
 867 static cb_ret_t
 868 edit_dialog_callback (Widget * w, Widget * sender, widget_msg_t msg, int parm, void *data)
 869 {
 870     WMenuBar *menubar;
 871     WButtonBar *buttonbar;
 872     WDialog *h = DIALOG (w);
 873
 874     switch (msg)
 875     {
 876     case MSG_INIT:
 877         edit_dlg_init ();
 878         return MSG_HANDLED;
 879
 880     case MSG_DRAW:
 881         /* don't use dlg_default_repaint() -- we don't need a frame */
 882         tty_setcolor (EDITOR_BACKGROUND);
 883         dlg_erase (h);
 884         return MSG_HANDLED;
 885
 886     case MSG_RESIZE:
 887         menubar = find_menubar (h);
 888         buttonbar = find_buttonbar (h);
 889         /* dlg_set_size() is surplus for this case */
 890         w->lines = LINES;
 891         w->cols = COLS;
 892         widget_set_size (WIDGET (buttonbar), w->lines - 1, w->x, 1, w->cols);
 893         widget_set_size (WIDGET (menubar), w->y, w->x, 1, w->cols);
 894         menubar_arrange (menubar);
 895         g_list_foreach (h->widgets, (GFunc) edit_dialog_resize_cb, NULL);
 896         return MSG_HANDLED;
 897
 898     case MSG_ACTION:
 899         /* shortcut */
 900         if (sender == NULL)
 901             return edit_dialog_command_execute (h, parm);
 902         /* message from menu */
 903         menubar = find_menubar (h);
 904         if (sender == WIDGET (menubar))
 905         {
 906             if (edit_dialog_command_execute (h, parm) == MSG_HANDLED)
 907                 return MSG_HANDLED;
 908             /* try send command to the current window */
 909             return send_message (h->current->data, NULL, MSG_ACTION, parm, NULL);
 910         }
 911         /* message from buttonbar */
 912         buttonbar = find_buttonbar (h);
 913         if (sender == WIDGET (buttonbar))
 914         {
 915             if (data != NULL)
 916                 return send_message (data, NULL, MSG_ACTION, parm, NULL);
 917             return edit_dialog_command_execute (h, parm);
 918         }
 919         return MSG_NOT_HANDLED;
 920
 921     case MSG_KEY:
 922         {
 923             Widget *we = WIDGET (h->current->data);
 924             cb_ret_t ret = MSG_NOT_HANDLED;
 925
 926             if (edit_widget_is_editor (we))
 927             {
 928                 WEdit *e = (WEdit *) we;
 929                 unsigned long command;
 930
 931                 if (!e->extmod)
 932                     command = keybind_lookup_keymap_command (editor_map, parm);
 933                 else
 934                 {
 935                     e->extmod = FALSE;
 936                     command = keybind_lookup_keymap_command (editor_x_map, parm);
 937                 }
 938
 939                 if (command != CK_IgnoreKey)
 940                     ret = edit_dialog_command_execute (h, command);
 941             }
 942
 943             return ret;
 944         }
 945
 946         /* hardcoded menu hotkeys (see edit_drop_hotkey_menu) */
 947     case MSG_UNHANDLED_KEY:
 948         return edit_drop_hotkey_menu (h, parm) ? MSG_HANDLED : MSG_NOT_HANDLED;
 949
 950     case MSG_VALIDATE:
 951         edit_quit (h);
 952         return MSG_HANDLED;
 953
 954     case MSG_END:
 955         edit_dlg_deinit ();
 956         return MSG_HANDLED;
 957
 958     default:
 959         return dlg_default_callback (w, sender, msg, parm, data);
 960     }
 961 }
 962
 963 /* --------------------------------------------------------------------------------------------- */
 964
 965 static cb_ret_t
 966 edit_callback (Widget * w, Widget * sender, widget_msg_t msg, int parm, void *data)
 967 {
 968     WEdit *e = (WEdit *) w;
 969
 970     switch (msg)
 971     {
 972     case MSG_FOCUS:
 973         edit_set_buttonbar (e, find_buttonbar (w->owner));
 974         /* fall through */
 975
 976     case MSG_DRAW:
 977         e->force |= REDRAW_COMPLETELY;
 978         edit_update_screen (e);
 979         return MSG_HANDLED;
 980
 981     case MSG_UNFOCUS:
 982         /* redraw frame and status */
 983         edit_status (e, FALSE);
 984         return MSG_HANDLED;
 985
 986     case MSG_KEY:
 987         {
 988             int cmd, ch;
 989             cb_ret_t ret = MSG_NOT_HANDLED;
 990
 991             /* The user may override the access-keys for the menu bar. */
 992             if (macro_index == -1 && edit_execute_macro (e, parm))
 993             {
 994                 edit_update_screen (e);
 995                 ret = MSG_HANDLED;
 996             }
 997             else if (edit_translate_key (e, parm, &cmd, &ch))
 998             {
 999                 edit_execute_key_command (e, cmd, ch);
1000                 edit_update_screen (e);
1001                 ret = MSG_HANDLED;
1002             }
1003
1004             return ret;
1005         }
1006
1007     case MSG_ACTION:
1008         /* command from menubar or buttonbar */
1009         edit_execute_key_command (e, parm, -1);
1010         edit_update_screen (e);
1011         return MSG_HANDLED;
1012
1013     case MSG_CURSOR:
1014         {
1015             int y, x;
1016
1017             y = (e->fullscreen ? 0 : 1) + EDIT_TEXT_VERTICAL_OFFSET + e->curs_row;
1018             x = (e->fullscreen ? 0 : 1) + EDIT_TEXT_HORIZONTAL_OFFSET + option_line_state_width +
1019                 e->curs_col + e->start_col + e->over_col;
1020
1021             widget_move (w, y, x);
1022             return MSG_HANDLED;
1023         }
1024
1025     case MSG_DESTROY:
1026         edit_clean (e);
1027         return MSG_HANDLED;
1028
1029     default:
1030         return widget_default_callback (w, sender, msg, parm, data);
1031     }
1032 }
1033
1034 /* --------------------------------------------------------------------------------------------- */
1035 /*** public functions ****************************************************************************/
1036 /* --------------------------------------------------------------------------------------------- */
1037 /**
1038  * Edit one file.
1039  *
1040  * @param file_vpath file object
1041  * @param line       line number
1042  * @return TRUE if no errors was occured, FALSE otherwise
1043  */
1044
1045 gboolean
1046 edit_file (const vfs_path_t * file_vpath, long line)
1047 {
1048     mcedit_arg_t arg = { (vfs_path_t *) file_vpath, line };
1049     GList *files;
1050     gboolean ok;
1051
1052     files = g_list_prepend (NULL, &arg);
1053     ok = edit_files (files);
1054     g_list_free (files);
1055
1056     return ok;
1057 }
1058
1059 /* --------------------------------------------------------------------------------------------- */
1060
1061 gboolean
1062 edit_files (const GList * files)
1063 {
1064     static gboolean made_directory = FALSE;
1065     WDialog *edit_dlg;
1066     WMenuBar *menubar;
1067     const GList *file;
1068     gboolean ok = FALSE;
1069
1070     if (!made_directory)
1071     {
1072         char *dir;
1073
1074         dir = mc_build_filename (mc_config_get_cache_path (), EDIT_DIR, NULL);
1075         made_directory = (mkdir (dir, 0700) != -1 || errno == EEXIST);
1076         g_free (dir);
1077
1078         dir = mc_build_filename (mc_config_get_path (), EDIT_DIR, NULL);
1079         made_directory = (mkdir (dir, 0700) != -1 || errno == EEXIST);
1080         g_free (dir);
1081
1082         dir = mc_build_filename (mc_config_get_data_path (), EDIT_DIR, NULL);
1083         made_directory = (mkdir (dir, 0700) != -1 || errno == EEXIST);
1084         g_free (dir);
1085     }
1086
1087     /* Create a new dialog and add it widgets to it */
1088     edit_dlg =
1089         create_dlg (FALSE, 0, 0, LINES, COLS, NULL, edit_dialog_callback, edit_dialog_event,
1090                     "[Internal File Editor]", NULL, DLG_WANT_TAB);
1091
1092     edit_dlg->get_shortcut = edit_get_shortcut;
1093     edit_dlg->get_title = edit_get_title;
1094
1095     menubar = menubar_new (0, 0, COLS, NULL);
1096     add_widget (edit_dlg, menubar);
1097     edit_init_menu (menubar);
1098
1099     add_widget (edit_dlg, buttonbar_new (TRUE));
1100
1101     for (file = files; file != NULL; file = g_list_next (file))
1102     {
1103         Widget *w = WIDGET (edit_dlg);
1104         mcedit_arg_t *f = (mcedit_arg_t *) file->data;
1105         gboolean f_ok;
1106
1107         f_ok = edit_add_window (edit_dlg, w->y + 1, w->x, w->lines - 2, w->cols, f->file_vpath,
1108                                 f->line_number);
1109         /* at least one file has been opened succefully */
1110         ok = ok || f_ok;
1111     }
1112
1113     if (ok)
1114         run_dlg (edit_dlg);
1115
1116     if (!ok || edit_dlg->state == DLG_CLOSED)
1117         destroy_dlg (edit_dlg);
1118
1119     return ok;
1120 }
1121
1122 /* --------------------------------------------------------------------------------------------- */
1123
1124 char *
1125 edit_get_file_name (const WEdit * edit)
1126 {
1127     return vfs_path_to_str (edit->filename_vpath);
1128 }
1129
1130 /* --------------------------------------------------------------------------------------------- */
1131
1132 WEdit *
1133 find_editor (const WDialog * h)
1134 {
1135     if (edit_widget_is_editor (WIDGET (h->current->data)))
1136         return (WEdit *) h->current->data;
1137     return (WEdit *) find_widget_type (h, edit_callback);
1138 }
1139
1140 /* --------------------------------------------------------------------------------------------- */
1141 /**
1142  * Check if widget is an WEdit class.
1143  *
1144  * @param w probably editor object
1145  * @return TRUE if widget is an WEdit class, FALSE otherwise
1146  */
1147
1148 gboolean
1149 edit_widget_is_editor (const Widget * w)
1150 {
1151     return (w != NULL && w->callback == edit_callback);
1152 }
1153
1154 /* --------------------------------------------------------------------------------------------- */
1155
1156 void
1157 edit_update_screen (WEdit * e)
1158 {
1159     WDialog *h = WIDGET (e)->owner;
1160
1161     edit_scroll_screen_over_cursor (e);
1162     edit_update_curs_col (e);
1163
1164     edit_status (e, (e->force & REDRAW_COMPLETELY) != 0 && (void *) e == h->current->data);
1165
1166     /* pop all events for this window for internal handling */
1167     if (!is_idle ())
1168         e->force |= REDRAW_PAGE;
1169     else
1170     {
1171         if ((e->force & REDRAW_COMPLETELY) != 0)
1172             e->force |= REDRAW_PAGE;
1173         edit_render_keypress (e);
1174     }
1175
1176     buttonbar_redraw (find_buttonbar (h));
1177 }
1178
1179 /* --------------------------------------------------------------------------------------------- */
1180 /**
1181  * Save current window size.
1182  *
1183  * @param edit editor object
1184  */
1185
1186 void
1187 edit_save_size (WEdit * edit)
1188 {
1189     Widget *w = WIDGET (edit);
1190
1191     edit->y_prev = w->y;
1192     edit->x_prev = w->x;
1193     edit->lines_prev = w->lines;
1194     edit->cols_prev = w->cols;
1195 }
1196
1197 /* --------------------------------------------------------------------------------------------- */
1198 /**
1199  * Create new editor window and insert it into editor screen.
1200  *
1201  * @param h     editor dialog (screen)
1202  * @param y     y coordinate
1203  * @param x     x coordinate
1204  * @param lines window height
1205  * @param cols  window width
1206  * @param f     file object
1207  * @param fline line number in file
1208  * @return TRUE if new window was successfully created and inserted into editor screen,
1209  *         FALSE otherwise
1210  */
1211
1212 gboolean
1213 edit_add_window (WDialog * h, int y, int x, int lines, int cols, const vfs_path_t * f, long fline)
1214 {
1215     WEdit *edit;
1216     Widget *w;
1217
1218     edit = edit_init (NULL, y, x, lines, cols, f, fline);
1219     if (edit == NULL)
1220         return FALSE;
1221
1222     w = WIDGET (edit);
1223     w->callback = edit_callback;
1224     w->mouse = edit_event;
1225
1226     add_widget (h, w);
1227     dlg_redraw (h);
1228
1229     return TRUE;
1230 }
1231
1232 /* --------------------------------------------------------------------------------------------- */
1233 /**
1234  * Handle move/resize events.
1235  *
1236  * @param edit    editor object
1237  * @param command action id
1238  * @return TRUE if mouse actions was handled, FALSE otherwise
1239  */
1240
1241 gboolean
1242 edit_handle_move_resize (WEdit * edit, unsigned long command)
1243 {
1244     gboolean ret = FALSE;
1245
1246     if (edit->fullscreen)
1247     {
1248         edit->drag_state = MCEDIT_DRAG_NORMAL;
1249         return ret;
1250     }
1251
1252     switch (edit->drag_state)
1253     {
1254     case MCEDIT_DRAG_NORMAL:
1255         /* possible start move/resize */
1256         switch (command)
1257         {
1258         case CK_WindowMove:
1259             edit->drag_state = MCEDIT_DRAG_MOVE;
1260             edit_save_size (edit);
1261             ret = TRUE;
1262             break;
1263         case CK_WindowResize:
1264             edit->drag_state = MCEDIT_DRAG_RESIZE;
1265             edit_save_size (edit);
1266             ret = TRUE;
1267             break;
1268         default:
1269             break;
1270         }
1271         break;
1272
1273     case MCEDIT_DRAG_MOVE:
1274         switch (command)
1275         {
1276         case CK_WindowResize:
1277             edit->drag_state = MCEDIT_DRAG_RESIZE;
1278             ret = TRUE;
1279             break;
1280         case CK_Up:
1281         case CK_Down:
1282         case CK_Left:
1283         case CK_Right:
1284             edit_window_move (edit, command);
1285             ret = TRUE;
1286             break;
1287         case CK_Enter:
1288         case CK_WindowMove:
1289             edit->drag_state = MCEDIT_DRAG_NORMAL;
1290             /* redraw frame and status */
1291             edit_status (edit, TRUE);
1292         default:
1293             ret = TRUE;
1294             break;
1295         }
1296         break;
1297
1298     case MCEDIT_DRAG_RESIZE:
1299         switch (command)
1300         {
1301         case CK_WindowMove:
1302             edit->drag_state = MCEDIT_DRAG_MOVE;
1303             ret = TRUE;
1304             break;
1305         case CK_Up:
1306         case CK_Down:
1307         case CK_Left:
1308         case CK_Right:
1309             edit_window_resize (edit, command);
1310             ret = TRUE;
1311             break;
1312         case CK_Enter:
1313         case CK_WindowResize:
1314             edit->drag_state = MCEDIT_DRAG_NORMAL;
1315             /* redraw frame and status */
1316             edit_status (edit, TRUE);
1317         default:
1318             ret = TRUE;
1319             break;
1320         }
1321         break;
1322     }
1323
1324     return ret;
1325 }
1326
1327 /* --------------------------------------------------------------------------------------------- */
1328 /**
1329  * Toggle window fuulscreen mode.
1330  *
1331  * @param edit editor object
1332  */
1333
1334 void
1335 edit_toggle_fullscreen (WEdit * edit)
1336 {
1337     edit->fullscreen = !edit->fullscreen;
1338     edit->force = REDRAW_COMPLETELY;
1339
1340     if (!edit->fullscreen)
1341         edit_restore_size (edit);
1342     else
1343     {
1344         Widget *w = WIDGET (edit);
1345         Widget *h = WIDGET (w->owner);
1346
1347         edit_save_size (edit);
1348         widget_set_size (w, h->y + 1, h->x, h->lines - 2, h->cols);
1349         edit->force |= REDRAW_PAGE;
1350         edit_update_screen (edit);
1351     }
1352 }
1353
1354 /* --------------------------------------------------------------------------------------------- */