src/filemanager/panelize.c

   1 /*
   2    External panelize
   3
   4    Copyright (C) 1995, 1998, 1999, 2000, 2001, 2002, 2003, 2004, 2005,
   5    2007, 2009, 2011
   6    The Free Software Foundation, Inc.
   7
   8    Written by:
   9    Janne Kukonlehto, 1995
  10    Jakub Jelinek, 1995
  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 panelize.c
  29  *  \brief Source: External panelization module
  30  */
  31
  32 #include <config.h>
  33
  34 #include <errno.h>
  35 #include <stdio.h>
  36 #include <string.h>
  37 #include <sys/types.h>
  38 #include <sys/stat.h>
  39 #include <unistd.h>
  40
  41 #include "lib/global.h"
  42
  43 #include "lib/skin.h"
  44 #include "lib/vfs/vfs.h"
  45 #include "lib/mcconfig.h"       /* Load/save directories panelize */
  46 #include "lib/strutil.h"
  47 #include "lib/util.h"
  48 #include "lib/widget.h"
  49
  50 #include "src/setup.h"          /* For profile_bname */
  51 #include "src/history.h"
  52
  53 #include "dir.h"
  54 #include "midnight.h"           /* current_panel */
  55 #include "panel.h"              /* WPanel */
  56
  57 #include "panelize.h"
  58 #include "panel.h"
  59
  60 /*** global variables ****************************************************************************/
  61
  62 /*** file scope macro definitions ****************************************************************/
  63
  64 #define UX 5
  65 #define UY 2
  66
  67 #define BX 5
  68 #define BY 18
  69
  70 #define BUTTONS  4
  71 #define LABELS   3
  72 #define B_ADD    B_USER
  73 #define B_REMOVE (B_USER + 1)
  74
  75 /*** file scope type declarations ****************************************************************/
  76
  77 /*** file scope variables ************************************************************************/
  78
  79 static WListbox *l_panelize;
  80 static Dlg_head *panelize_dlg;
  81 static int last_listitem;
  82 static WInput *pname;
  83
  84 static struct
  85 {
  86     int ret_cmd;
  87     button_flags_t flags;
  88     int y, x;
  89     const char *text;
  90 } panelize_but[BUTTONS] =
  91 {
  92     /* *INDENT-OFF* */
  93     { B_CANCEL, NORMAL_BUTTON, 0, 53, N_("&Cancel") },
  94     { B_ADD, NORMAL_BUTTON, 0, 28, N_("&Add new") },
  95     { B_REMOVE, NORMAL_BUTTON, 0, 16, N_("&Remove") },
  96     { B_ENTER, DEFPUSH_BUTTON, 0, 0, N_("Pane&lize") }
  97     /* *INDENT-ON* */
  98 };
  99
 100 static const char *panelize_section = "Panelize";
 101
 102 /* Directory panelize */
 103 static struct panelize
 104 {
 105     char *command;
 106     char *label;
 107     struct panelize *next;
 108 } *panelize = NULL;
 109
 110 /*** file scope functions ************************************************************************/
 111 /* --------------------------------------------------------------------------------------------- */
 112
 113 static void do_external_panelize (char *command);
 114
 115 /* --------------------------------------------------------------------------------------------- */
 116
 117 static void
 118 update_command (void)
 119 {
 120     if (l_panelize->pos != last_listitem)
 121     {
 122         struct panelize *data = NULL;
 123
 124         last_listitem = l_panelize->pos;
 125         listbox_get_current (l_panelize, NULL, (void **) &data);
 126         input_assign_text (pname, data->command);
 127         pname->point = 0;
 128         input_update (pname, TRUE);
 129     }
 130 }
 131
 132 /* --------------------------------------------------------------------------------------------- */
 133
 134 static cb_ret_t
 135 panelize_callback (Dlg_head * h, Widget * sender, dlg_msg_t msg, int parm, void *data)
 136 {
 137     switch (msg)
 138     {
 139     case DLG_INIT:
 140     case DLG_POST_KEY:
 141         tty_setcolor (MENU_ENTRY_COLOR);
 142         update_command ();
 143         return MSG_HANDLED;
 144
 145     case DLG_DRAW:
 146         common_dialog_repaint (h);
 147         tty_setcolor (COLOR_NORMAL);
 148         draw_box (h, UY, UX, h->lines - 10, h->cols - 10, TRUE);
 149         return MSG_HANDLED;
 150
 151     default:
 152         return default_dlg_callback (h, sender, msg, parm, data);
 153     }
 154 }
 155
 156 /* --------------------------------------------------------------------------------------------- */
 157
 158 static void
 159 init_panelize (void)
 160 {
 161     int i, panelize_cols = COLS - 6;
 162     struct panelize *current = panelize;
 163
 164 #ifdef ENABLE_NLS
 165     static int i18n_flag = 0;
 166     static int maxlen = 0;
 167
 168     if (!i18n_flag)
 169     {
 170         i = sizeof (panelize_but) / sizeof (panelize_but[0]);
 171         while (i--)
 172         {
 173             panelize_but[i].text = _(panelize_but[i].text);
 174             maxlen += str_term_width1 (panelize_but[i].text) + 5;
 175         }
 176         maxlen += 10;
 177
 178         i18n_flag = 1;
 179     }
 180     panelize_cols = max (panelize_cols, maxlen);
 181
 182     panelize_but[2].x = panelize_but[3].x + str_term_width1 (panelize_but[3].text) + 7;
 183     panelize_but[1].x = panelize_but[2].x + str_term_width1 (panelize_but[2].text) + 5;
 184     panelize_but[0].x = panelize_cols - str_term_width1 (panelize_but[0].text) - 8 - BX;
 185
 186 #endif /* ENABLE_NLS */
 187
 188     last_listitem = 0;
 189
 190     do_refresh ();
 191
 192     panelize_dlg =
 193         create_dlg (TRUE, 0, 0, 22, panelize_cols, dialog_colors,
 194                     panelize_callback, "[External panelize]",
 195                     _("External panelize"), DLG_CENTER | DLG_REVERSE);
 196
 197     for (i = 0; i < BUTTONS; i++)
 198         add_widget (panelize_dlg,
 199                     button_new (BY + panelize_but[i].y,
 200                                 BX + panelize_but[i].x,
 201                                 panelize_but[i].ret_cmd,
 202                                 panelize_but[i].flags, panelize_but[i].text, 0));
 203
 204     pname =
 205         input_new (UY + 14, UX, input_get_default_colors (),
 206                    panelize_dlg->cols - 10, "", "in", INPUT_COMPLETE_DEFAULT);
 207     add_widget (panelize_dlg, pname);
 208
 209     add_widget (panelize_dlg, label_new (UY + 13, UX, _("Command")));
 210
 211     /* get new listbox */
 212     l_panelize = listbox_new (UY + 1, UX + 1, 10, panelize_dlg->cols - 12, FALSE, NULL);
 213
 214     while (current)
 215     {
 216         listbox_add_item (l_panelize, LISTBOX_APPEND_AT_END, 0, current->label, current);
 217         current = current->next;
 218     }
 219
 220     /* add listbox to the dialogs */
 221     add_widget (panelize_dlg, l_panelize);
 222
 223     listbox_select_entry (l_panelize, listbox_search_text (l_panelize, _("Other command")));
 224 }
 225
 226 /* --------------------------------------------------------------------------------------------- */
 227
 228 static void
 229 panelize_done (void)
 230 {
 231     destroy_dlg (panelize_dlg);
 232     repaint_screen ();
 233 }
 234
 235 /* --------------------------------------------------------------------------------------------- */
 236
 237 static void
 238 add2panelize (char *label, char *command)
 239 {
 240     struct panelize *current, *old;
 241
 242     old = NULL;
 243     current = panelize;
 244     while (current && strcmp (current->label, label) <= 0)
 245     {
 246         old = current;
 247         current = current->next;
 248     }
 249
 250     if (old == NULL)
 251     {
 252         panelize = g_new (struct panelize, 1);
 253         panelize->label = label;
 254         panelize->command = command;
 255         panelize->next = current;
 256     }
 257     else
 258     {
 259         struct panelize *new;
 260         new = g_new (struct panelize, 1);
 261         new->label = label;
 262         new->command = command;
 263         old->next = new;
 264         new->next = current;
 265     }
 266 }
 267
 268 /* --------------------------------------------------------------------------------------------- */
 269
 270 static void
 271 add2panelize_cmd (void)
 272 {
 273     char *label;
 274
 275     if (pname->buffer && (*pname->buffer))
 276     {
 277         label = input_dialog (_("Add to external panelize"),
 278                               _("Enter command label:"), MC_HISTORY_FM_PANELIZE_ADD, "");
 279         if (!label)
 280             return;
 281         if (!*label)
 282         {
 283             g_free (label);
 284             return;
 285         }
 286
 287         add2panelize (label, g_strdup (pname->buffer));
 288     }
 289 }
 290
 291 /* --------------------------------------------------------------------------------------------- */
 292
 293 static void
 294 remove_from_panelize (struct panelize *entry)
 295 {
 296     if (strcmp (entry->label, _("Other command")) != 0)
 297     {
 298         if (entry == panelize)
 299         {
 300             panelize = panelize->next;
 301         }
 302         else
 303         {
 304             struct panelize *current = panelize;
 305             while (current && current->next != entry)
 306                 current = current->next;
 307             if (current)
 308             {
 309                 current->next = entry->next;
 310             }
 311         }
 312
 313         g_free (entry->label);
 314         g_free (entry->command);
 315         g_free (entry);
 316     }
 317 }
 318
 319 /* --------------------------------------------------------------------------------------------- */
 320
 321 static void
 322 panelize_strlcpy (char *buffer, const vfs_path_t * vpath, size_t max_len)
 323 {
 324     char *str_path;
 325
 326     str_path = vfs_path_to_str (vpath);
 327     g_strlcpy (buffer, str_path, max_len);
 328     g_free (str_path);
 329 }
 330
 331 /* --------------------------------------------------------------------------------------------- */
 332
 333 static void
 334 do_external_panelize (char *command)
 335 {
 336     int status, link_to_dir, stale_link;
 337     int next_free = 0;
 338     struct stat st;
 339     dir_list *list = &current_panel->dir;
 340     char line[MC_MAXPATHLEN];
 341     char *name;
 342     FILE *external;
 343
 344     open_error_pipe ();
 345     external = popen (command, "r");
 346     if (!external)
 347     {
 348         close_error_pipe (D_ERROR, _("Cannot invoke command."));
 349         return;
 350     }
 351     /* Clear the counters and the directory list */
 352     panel_clean_dir (current_panel);
 353
 354     panelize_strlcpy (panelized_panel.root, current_panel->cwd_vpath, MC_MAXPATHLEN);
 355
 356     if (set_zero_dir (list))
 357         next_free++;
 358
 359     while (1)
 360     {
 361         clearerr (external);
 362         if (fgets (line, MC_MAXPATHLEN, external) == NULL)
 363         {
 364             if (ferror (external) && errno == EINTR)
 365                 continue;
 366             else
 367                 break;
 368         }
 369         if (line[strlen (line) - 1] == '\n')
 370             line[strlen (line) - 1] = 0;
 371         if (strlen (line) < 1)
 372             continue;
 373         if (line[0] == '.' && line[1] == PATH_SEP)
 374             name = line + 2;
 375         else
 376             name = line;
 377         status = handle_path (list, name, &st, next_free, &link_to_dir, &stale_link);
 378         if (status == 0)
 379             continue;
 380         if (status == -1)
 381             break;
 382         list->list[next_free].fnamelen = strlen (name);
 383         list->list[next_free].fname = g_strndup (name, list->list[next_free].fnamelen);
 384         file_mark (current_panel, next_free, 0);
 385         list->list[next_free].f.link_to_dir = link_to_dir;
 386         list->list[next_free].f.stale_link = stale_link;
 387         list->list[next_free].f.dir_size_computed = 0;
 388         list->list[next_free].st = st;
 389         list->list[next_free].sort_key = NULL;
 390         list->list[next_free].second_sort_key = NULL;
 391         next_free++;
 392         if (!(next_free & 32))
 393             rotate_dash ();
 394     }
 395
 396     current_panel->is_panelized = TRUE;
 397     if (next_free)
 398     {
 399         current_panel->count = next_free;
 400         if (list->list[0].fname[0] == PATH_SEP)
 401         {
 402             int ret;
 403             panel_set_cwd (current_panel, PATH_SEP_STR);
 404             ret = chdir (PATH_SEP_STR);
 405         }
 406     }
 407     else
 408     {
 409         current_panel->count = set_zero_dir (list) ? 1 : 0;
 410     }
 411     if (pclose (external) < 0)
 412         message (D_NORMAL, _("External panelize"), _("Pipe close failed"));
 413     close_error_pipe (D_NORMAL, NULL);
 414     try_to_select (current_panel, NULL);
 415     panel_re_sort (current_panel);
 416 }
 417
 418 /* --------------------------------------------------------------------------------------------- */
 419
 420 static void
 421 do_panelize_cd (struct WPanel *panel)
 422 {
 423     int i;
 424     dir_list *list = &panel->dir;
 425     gboolean panelized_same;
 426
 427     clean_dir (list, panel->count);
 428     if (panelized_panel.root[0] == '\0')
 429         panelize_strlcpy (panelized_panel.root, panel->cwd_vpath, MC_MAXPATHLEN);
 430
 431     if (panelized_panel.count < 1)
 432     {
 433         if (set_zero_dir (&panelized_panel.list))
 434             panelized_panel.count = 1;
 435     }
 436     else if (panelized_panel.count >= list->size)
 437     {
 438         list->list = g_try_realloc (list->list, sizeof (file_entry) * panelized_panel.count);
 439         list->size = panelized_panel.count;
 440     }
 441     panel->count = panelized_panel.count;
 442     panel->is_panelized = TRUE;
 443
 444     {
 445         char *cwd_str;
 446
 447         cwd_str = vfs_path_to_str (panel->cwd_vpath);
 448         panelized_same = (strcmp (panelized_panel.root, cwd_str) == 0);
 449         g_free (cwd_str);
 450     }
 451
 452     for (i = 0; i < panelized_panel.count; i++)
 453     {
 454         if (panelized_same
 455             || (panelized_panel.list.list[i].fname[0] == '.'
 456                 && panelized_panel.list.list[i].fname[1] == '.'
 457                 && panelized_panel.list.list[i].fname[2] == '\0'))
 458         {
 459             list->list[i].fnamelen = panelized_panel.list.list[i].fnamelen;
 460             list->list[i].fname = g_strndup (panelized_panel.list.list[i].fname,
 461                                              panelized_panel.list.list[i].fnamelen);
 462         }
 463         else
 464         {
 465             list->list[i].fname = mc_build_filename (panelized_panel.root,
 466                                                      panelized_panel.list.list[i].fname,
 467                                                      (char *) NULL);
 468             list->list[i].fnamelen = strlen (list->list[i].fname);
 469         }
 470         list->list[i].f.link_to_dir = panelized_panel.list.list[i].f.link_to_dir;
 471         list->list[i].f.stale_link = panelized_panel.list.list[i].f.stale_link;
 472         list->list[i].f.dir_size_computed = panelized_panel.list.list[i].f.dir_size_computed;
 473         list->list[i].f.marked = panelized_panel.list.list[i].f.marked;
 474         list->list[i].st = panelized_panel.list.list[i].st;
 475         list->list[i].sort_key = panelized_panel.list.list[i].sort_key;
 476         list->list[i].second_sort_key = panelized_panel.list.list[i].second_sort_key;
 477     }
 478     try_to_select (panel, NULL);
 479 }
 480
 481 /* --------------------------------------------------------------------------------------------- */
 482 /*** public functions ****************************************************************************/
 483 /* --------------------------------------------------------------------------------------------- */
 484
 485 void
 486 panelize_save_panel (struct WPanel *panel)
 487 {
 488     int i;
 489     dir_list *list = &panel->dir;
 490
 491     panelize_strlcpy (panelized_panel.root, panel->cwd_vpath, MC_MAXPATHLEN);
 492
 493     if (panelized_panel.count > 0)
 494         clean_dir (&panelized_panel.list, panelized_panel.count);
 495     if (panel->count < 1)
 496         return;
 497
 498     panelized_panel.count = panel->count;
 499     if (panel->count >= panelized_panel.list.size)
 500     {
 501         panelized_panel.list.list = g_try_realloc (panelized_panel.list.list,
 502                                                    sizeof (file_entry) * panel->count);
 503         panelized_panel.list.size = panel->count;
 504     }
 505     for (i = 0; i < panel->count; i++)
 506     {
 507         panelized_panel.list.list[i].fnamelen = list->list[i].fnamelen;
 508         panelized_panel.list.list[i].fname =
 509             g_strndup (list->list[i].fname, list->list[i].fnamelen);
 510         panelized_panel.list.list[i].f.link_to_dir = list->list[i].f.link_to_dir;
 511         panelized_panel.list.list[i].f.stale_link = list->list[i].f.stale_link;
 512         panelized_panel.list.list[i].f.dir_size_computed = list->list[i].f.dir_size_computed;
 513         panelized_panel.list.list[i].f.marked = list->list[i].f.marked;
 514         panelized_panel.list.list[i].st = list->list[i].st;
 515         panelized_panel.list.list[i].sort_key = list->list[i].sort_key;
 516         panelized_panel.list.list[i].second_sort_key = list->list[i].second_sort_key;
 517     }
 518 }
 519
 520 /* --------------------------------------------------------------------------------------------- */
 521
 522 void
 523 cd_panelize_cmd (void)
 524 {
 525     if (get_display_type (MENU_PANEL_IDX) != view_listing)
 526         set_display_type (MENU_PANEL_IDX, view_listing);
 527
 528     do_panelize_cd ((struct WPanel *) get_panel_widget (MENU_PANEL_IDX));
 529 }
 530
 531 /* --------------------------------------------------------------------------------------------- */
 532
 533 void
 534 external_panelize (void)
 535 {
 536     char *target = NULL;
 537
 538     if (!vfs_current_is_local ())
 539     {
 540         message (D_ERROR, MSG_ERROR, _("Cannot run external panelize in a non-local directory"));
 541         return;
 542     }
 543
 544     init_panelize ();
 545
 546     /* display file info */
 547     tty_setcolor (SELECTED_COLOR);
 548
 549     run_dlg (panelize_dlg);
 550
 551     switch (panelize_dlg->ret_value)
 552     {
 553     case B_CANCEL:
 554         break;
 555
 556     case B_ADD:
 557         add2panelize_cmd ();
 558         break;
 559
 560     case B_REMOVE:
 561         {
 562             struct panelize *entry;
 563
 564             listbox_get_current (l_panelize, NULL, (void **) &entry);
 565             remove_from_panelize (entry);
 566             break;
 567         }
 568
 569     case B_ENTER:
 570         target = pname->buffer;
 571         if (target != NULL && *target)
 572         {
 573             char *cmd = g_strdup (target);
 574             destroy_dlg (panelize_dlg);
 575             do_external_panelize (cmd);
 576             g_free (cmd);
 577             repaint_screen ();
 578             return;
 579         }
 580         break;
 581     }
 582
 583     panelize_done ();
 584 }
 585
 586 /* --------------------------------------------------------------------------------------------- */
 587
 588 void
 589 load_panelize (void)
 590 {
 591     gchar **profile_keys, **keys;
 592     gsize len;
 593     GIConv conv;
 594
 595     conv = str_crt_conv_from ("UTF-8");
 596
 597     profile_keys = keys = mc_config_get_keys (mc_main_config, panelize_section, &len);
 598
 599     add2panelize (g_strdup (_("Other command")), g_strdup (""));
 600
 601     if (!profile_keys || *profile_keys == NULL)
 602     {
 603         add2panelize (g_strdup (_("Find rejects after patching")),
 604                       g_strdup ("find . -name \\*.rej -print"));
 605         add2panelize (g_strdup (_("Find *.orig after patching")),
 606                       g_strdup ("find . -name \\*.orig -print"));
 607         add2panelize (g_strdup (_("Find SUID and SGID programs")),
 608                       g_strdup
 609                       ("find . \\( \\( -perm -04000 -a -perm +011 \\) -o \\( -perm -02000 -a -perm +01 \\) \\) -print"));
 610         return;
 611     }
 612
 613     while (*profile_keys)
 614     {
 615         GString *buffer;
 616
 617         if (mc_global.utf8_display || conv == INVALID_CONV)
 618             buffer = g_string_new (*profile_keys);
 619         else
 620         {
 621             buffer = g_string_new ("");
 622             if (str_convert (conv, *profile_keys, buffer) == ESTR_FAILURE)
 623                 g_string_assign (buffer, *profile_keys);
 624         }
 625
 626         add2panelize (g_string_free (buffer, FALSE),
 627                       mc_config_get_string (mc_main_config, panelize_section, *profile_keys, ""));
 628         profile_keys++;
 629     }
 630
 631     g_strfreev (keys);
 632     str_close_conv (conv);
 633 }
 634
 635 /* --------------------------------------------------------------------------------------------- */
 636
 637 void
 638 save_panelize (void)
 639 {
 640     struct panelize *current = panelize;
 641
 642     mc_config_del_group (mc_main_config, panelize_section);
 643     for (; current; current = current->next)
 644     {
 645         if (strcmp (current->label, _("Other command")))
 646             mc_config_set_string (mc_main_config,
 647                                   panelize_section, current->label, current->command);
 648     }
 649 }
 650
 651 /* --------------------------------------------------------------------------------------------- */
 652
 653 void
 654 done_panelize (void)
 655 {
 656     struct panelize *current = panelize;
 657     struct panelize *next;
 658
 659     for (; current; current = next)
 660     {
 661         next = current->next;
 662         g_free (current->label);
 663         g_free (current->command);
 664         g_free (current);
 665     }
 666 }
 667
 668 /* --------------------------------------------------------------------------------------------- */