src/panelize.c

   1 /* External panelize
   2    Copyright (C) 1995 The Free Software Foundation
   3
   4    Written by: 1995 Janne Kukonlehto
   5                1995 Jakub Jelinek
   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., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
  20  */
  21
  22 #include <config.h>
  23 #ifdef HAVE_UNISTD_H
  24 #   include <unistd.h>
  25 #endif
  26 #include <string.h>
  27 #include <stdio.h>
  28 #include <errno.h>
  29 #include <sys/types.h>
  30 #include <sys/stat.h>
  31
  32 /* Needed for the extern declarations of integer parameters */
  33 #define DIR_H_INCLUDE_HANDLE_DIRENT
  34 #include "global.h"
  35 #include "tty.h"
  36 #include "win.h"
  37 #include "color.h"
  38 #include "dlg.h"
  39 #include "widget.h"
  40 #include "dialog.h"             /* For do_refresh() */
  41 #include "setup.h"              /* For profile_bname */
  42 #include "profile.h"            /* Load/save directories panelize */
  43 #include "dir.h"
  44 #include "panel.h"              /* Needed for the externs */
  45 #include "file.h"
  46 #include "main.h"
  47 #include "../vfs/vfs.h"
  48 #include "panelize.h"
  49
  50 void do_external_panelize (char *command);
  51
  52 #define UX              5
  53 #define UY              2
  54
  55 #define BX              5
  56 #define BY              18
  57
  58 #define BUTTONS         4
  59 #define LABELS          3
  60 #define B_ADD           B_USER
  61 #define B_REMOVE        B_USER + 1
  62
  63 static WListbox *l_panelize;
  64 static Dlg_head *panelize_dlg;
  65 static int last_listitem;
  66 static WInput *pname;
  67
  68 static struct {
  69     int ret_cmd, flags, y, x;
  70     char *text;
  71     char *tkname;
  72 } panelize_but [BUTTONS] = {
  73     { B_CANCEL, NORMAL_BUTTON, 0, 53, N_("&Cancel"),  "c"},
  74     { B_ADD, NORMAL_BUTTON,    0, 28, N_("&Add new"), "a"},
  75     { B_REMOVE, NORMAL_BUTTON, 0, 16, N_("&Remove"),  "r"},
  76     { B_ENTER, DEFPUSH_BUTTON, 0,  0, N_("Pane&lize"),"l"},
  77 };
  78
  79 static char *panelize_section = "Panelize";
  80
  81 /* Directory panelize */
  82 static struct panelize {
  83     char *command;
  84     char *label;
  85     struct panelize *next;
  86 } *panelize = NULL;
  87
  88 static char* panelize_title = N_(" External panelize ");
  89
  90 static void
  91 panelize_refresh (void)
  92 {
  93     attrset (COLOR_NORMAL);
  94     dlg_erase (panelize_dlg);
  95
  96     draw_box (panelize_dlg, 1, 2, panelize_dlg->lines-2, panelize_dlg->cols-4);
  97     draw_box (panelize_dlg, UY, UX, panelize_dlg->lines-10, panelize_dlg->cols-10);
  98
  99     attrset (COLOR_HOT_NORMAL);
 100     dlg_move (panelize_dlg, 1, (panelize_dlg->cols - strlen(panelize_title)) / 2);
 101     addstr (panelize_title);
 102 }
 103
 104 static void
 105 update_command (void)
 106 {
 107     if (l_panelize->pos != last_listitem) {
 108         last_listitem = l_panelize->pos;
 109         assign_text (pname,
 110             ((struct panelize *) l_panelize->current->data)->command);
 111         pname->point = 0;
 112         update_input (pname, 1);
 113     }
 114 }
 115
 116 static int
 117 panelize_callback (Dlg_head * h, int Par, int Msg)
 118 {
 119     switch (Msg) {
 120     case DLG_DRAW:
 121         panelize_refresh ();
 122         break;
 123
 124     case DLG_POST_KEY:
 125         /* fall */
 126     case DLG_INIT:
 127         attrset (MENU_ENTRY_COLOR);
 128         update_command ();
 129         break;
 130     }
 131     return 0;
 132 }
 133
 134 static int l_call (void *data)
 135 {
 136         return listbox_nothing;
 137 }
 138
 139 static void init_panelize (void)
 140 {
 141     int i, panelize_cols = COLS - 6;
 142     struct panelize *current = panelize;
 143
 144 #ifdef ENABLE_NLS
 145         static int i18n_flag = 0;
 146         static int maxlen = 0;
 147
 148         if (!i18n_flag)
 149         {
 150                 i = sizeof(panelize_but) / sizeof(panelize_but[0]);
 151                 while (i--)
 152                 {
 153                         panelize_but [i].text = _(panelize_but [i].text);
 154                         maxlen += strlen (panelize_but [i].text) + 5;
 155                 }
 156                 maxlen += 10;
 157                 panelize_title = _(panelize_title);
 158
 159                 i18n_flag = 1;
 160         }
 161         panelize_cols = max(panelize_cols, maxlen);
 162
 163         panelize_but [2].x = panelize_but [3].x
 164                 + strlen (panelize_but [3].text) + 7;
 165         panelize_but [1].x = panelize_but [2].x
 166                 + strlen (panelize_but [2].text) + 5;
 167         panelize_but [0].x = panelize_cols
 168                 - strlen (panelize_but[0].text) - 8 - BX;
 169
 170 #endif /* ENABLE_NLS */
 171
 172     last_listitem = 0;
 173
 174     do_refresh ();
 175
 176     panelize_dlg = create_dlg (0, 0, 22, panelize_cols, dialog_colors,
 177                               panelize_callback, "[External panelize]", "panelize",
 178                               DLG_CENTER);
 179     x_set_dialog_title (panelize_dlg, _("External panelize"));
 180
 181 #define XTRACT(i) BY+panelize_but[i].y, BX+panelize_but[i].x, panelize_but[i].ret_cmd, panelize_but[i].flags, panelize_but[i].text, 0, 0, panelize_but[i].tkname
 182
 183     for (i = 0; i < BUTTONS; i++)
 184         add_widget(panelize_dlg, button_new (XTRACT (i)));
 185
 186     pname = input_new (UY+14, UX, INPUT_COLOR, panelize_dlg->cols-10, "", "in");
 187     add_widget (panelize_dlg, pname);
 188
 189     add_widget (panelize_dlg, label_new (UY+13, UX, _("Command"), "label-command"));
 190
 191     /* get new listbox */
 192     l_panelize = listbox_new (UY + 1, UX + 1, panelize_dlg->cols-12, 10, 0, l_call, "li");
 193
 194     while (current){
 195         listbox_add_item (l_panelize, 0, 0, current->label, current);
 196         current = current->next;
 197     }
 198
 199     /* add listbox to the dialogs */
 200     add_widget (panelize_dlg, l_panelize);
 201
 202     listbox_select_entry (l_panelize,
 203         listbox_search_text (l_panelize, _("Other command")));
 204 }
 205
 206 static void panelize_done (void)
 207 {
 208     destroy_dlg (panelize_dlg);
 209     repaint_screen ();
 210 }
 211
 212 static void add2panelize (char *label, char *command)
 213 {
 214     struct panelize *current, *old;
 215
 216     old = NULL;
 217     current = panelize;
 218     while (current && strcmp (current->label, label) <= 0){
 219         old = current;
 220         current = current->next;
 221     }
 222
 223     if (old == NULL){
 224         panelize = g_new (struct panelize, 1);
 225         panelize->label = label;
 226         panelize->command = command;
 227         panelize->next = current;
 228     } else {
 229         struct panelize *new;
 230         new = g_new (struct panelize, 1);
 231         new->label = label;
 232         new->command = command;
 233         old->next = new;
 234         new->next = current;
 235     }
 236 }
 237
 238 void
 239 add2panelize_cmd (void)
 240 {
 241     char *label;
 242
 243     if (pname->buffer && (*pname->buffer)) {
 244         label = input_dialog (_(" Add to external panelize "),
 245                 _(" Enter command label: "),
 246                               "");
 247         if (!label)
 248             return;
 249         if (!*label) {
 250             g_free (label);
 251             return;
 252         }
 253
 254         add2panelize (label, g_strdup (pname->buffer));
 255     }
 256 }
 257
 258 static void remove_from_panelize (struct panelize *entry)
 259 {
 260     if (strcmp (entry->label, _("Other command")) != 0) {
 261         if (entry == panelize) {
 262             panelize = panelize->next;
 263         } else {
 264             struct panelize *current = panelize;
 265             while (current && current->next != entry)
 266                 current = current->next;
 267             if (current) {
 268                 current->next = entry->next;
 269             }
 270         }
 271
 272         g_free (entry->label);
 273         g_free (entry->command);
 274         g_free (entry);
 275     }
 276 }
 277
 278 void
 279 external_panelize (void)
 280 {
 281     char *target = NULL;
 282
 283     if (!vfs_current_is_local ()){
 284         message (1, _(" Oops... "),
 285                  _(" I can't run external panelize while logged on a non local directory "));
 286         return;
 287     }
 288
 289     init_panelize ();
 290
 291     /* display file info */
 292     attrset (SELECTED_COLOR);
 293
 294     run_dlg (panelize_dlg);
 295
 296     switch (panelize_dlg->ret_value) {
 297     case B_CANCEL:
 298         break;
 299
 300     case B_ADD:
 301         add2panelize_cmd ();
 302         break;
 303
 304     case B_REMOVE:
 305         remove_from_panelize (l_panelize->current->data);
 306         break;
 307
 308     case B_ENTER:
 309         target = pname->buffer;
 310         if (target != NULL && *target) {
 311             char *cmd = g_strdup (target);
 312             destroy_dlg (panelize_dlg);
 313             do_external_panelize (cmd);
 314             g_free (cmd);
 315             repaint_screen ();
 316             return;
 317         }
 318         break;
 319     }
 320
 321     panelize_done ();
 322 }
 323
 324 void load_panelize (void)
 325 {
 326     void *profile_keys;
 327     char *key, *value;
 328
 329     profile_keys = profile_init_iterator (panelize_section, profile_name);
 330
 331     add2panelize (g_strdup (_("Other command")), g_strdup (""));
 332
 333     if (!profile_keys){
 334         add2panelize (g_strdup (_("Find rejects after patching")), g_strdup ("find . -name \\*.rej -print"));
 335         add2panelize (g_strdup (_("Find *.orig after patching")), g_strdup ("find . -name \\*.orig -print"));
 336         add2panelize (g_strdup (_("Find SUID and SGID programs")), g_strdup ("find . \\( \\( -perm -04000 -a -perm +011 \\) -o \\( -perm -02000 -a -perm +01 \\) \\) -print"));
 337         return;
 338     }
 339
 340     while (profile_keys){
 341         profile_keys = profile_iterator_next (profile_keys, &key, &value);
 342         add2panelize (g_strdup (key), g_strdup (value));
 343     }
 344 }
 345
 346 void save_panelize (void)
 347 {
 348     struct panelize *current = panelize;
 349
 350     profile_clean_section (panelize_section, profile_name);
 351     for (;current; current = current->next){
 352         if (strcmp (current->label, _("Other command")))
 353             WritePrivateProfileString (panelize_section,
 354                                        current->label,
 355                                        current->command,
 356                                        profile_name);
 357     }
 358     sync_profiles ();
 359 }
 360
 361 void done_panelize (void)
 362 {
 363     struct panelize *current = panelize;
 364     struct panelize *next;
 365
 366     for (; current; current = next){
 367         next = current->next;
 368         g_free (current->label);
 369         g_free (current->command);
 370         g_free (current);
 371     }
 372 }
 373
 374 void do_external_panelize (char *command)
 375 {
 376     int status, link_to_dir, stalled_link;
 377     int next_free = 0;
 378     struct stat buf;
 379     dir_list *list = &cpanel->dir;
 380     char line [MC_MAXPATHLEN];
 381     char *name;
 382     FILE *external;
 383
 384     open_error_pipe ();
 385     external = popen (command, "r");
 386     if (!external){
 387         close_error_pipe (1, _("Cannot invoke command."));
 388         return;
 389     }
 390     /* Clear the counters and the directory list */
 391     panel_clean_dir (cpanel);
 392
 393     while (1) {
 394         clearerr(external);
 395         if (fgets (line, MC_MAXPATHLEN, external) == NULL) {
 396             if (ferror(external) && errno == EINTR)
 397                 continue;
 398             else
 399                 break;
 400         }
 401         if (line[strlen(line)-1] == '\n')
 402             line[strlen(line)-1] = 0;
 403         if (strlen(line) < 1)
 404             continue;
 405         if (line [0] == '.' && line[1] == PATH_SEP)
 406             name = line + 2;
 407         else
 408             name = line;
 409         status = handle_path (list, name, &buf, next_free, &link_to_dir,
 410             &stalled_link);
 411         if (status == 0)
 412             continue;
 413         if (status == -1)
 414             break;
 415         list->list [next_free].fnamelen = strlen (name);
 416         list->list [next_free].fname = g_strdup (name);
 417         file_mark (cpanel, next_free, 0);
 418         list->list [next_free].f.link_to_dir = link_to_dir;
 419         list->list [next_free].f.stalled_link = stalled_link;
 420         list->list [next_free].f.dir_size_computed = 0;
 421         list->list [next_free].buf = buf;
 422         next_free++;
 423         if (!(next_free & 32))
 424             rotate_dash ();
 425     }
 426
 427     cpanel->is_panelized = 1;
 428     if (next_free){
 429         cpanel->count = next_free;
 430         if (list->list [0].fname [0] == PATH_SEP){
 431             strcpy (cpanel->cwd, PATH_SEP_STR);
 432             chdir (PATH_SEP_STR);
 433         }
 434     } else {
 435         cpanel->count = set_zero_dir (list);
 436     }
 437 #ifndef SCO_FLAVOR
 438     if (pclose (external) < 0)
 439 #else /* SCO_FLAVOR */
 440     if (WEXITSTATUS(pclose (external)) < 0)
 441 #endif /* SCO_FLAVOR */
 442         message (0, _("External panelize"), _("Pipe close failed"));
 443     close_error_pipe (0, 0);
 444     try_to_select (cpanel, NULL);
 445     panel_re_sort (cpanel);
 446     paint_panel (cpanel);
 447 }