4 Copyright (C) 1995, 1998, 1999, 2000, 2001, 2002, 2003, 2004, 2005,
6 The Free Software Foundation, Inc.
12 This file is part of the Midnight Commander.
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.
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.
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/>.
29 * \brief Source: External panelization module
37 #include <sys/types.h>
41 #include "lib/global.h"
44 #include "lib/vfs/vfs.h"
45 #include "lib/mcconfig.h" /* Load/save directories panelize */
46 #include "lib/strutil.h"
48 #include "lib/widget.h"
50 #include "src/setup.h" /* For profile_bname */
51 #include "src/history.h"
54 #include "midnight.h" /* current_panel */
55 #include "panel.h" /* WPanel */
60 /*** global variables ****************************************************************************/
62 /*** file scope macro definitions ****************************************************************/
73 #define B_REMOVE (B_USER + 1)
75 /*** file scope type declarations ****************************************************************/
77 /*** file scope variables ************************************************************************/
79 static WListbox
*l_panelize
;
80 static Dlg_head
*panelize_dlg
;
81 static int last_listitem
;
90 } panelize_but
[BUTTONS
] =
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") }
100 static const char *panelize_section
= "Panelize";
102 /* Directory panelize */
103 static struct panelize
107 struct panelize
*next
;
110 /*** file scope functions ************************************************************************/
111 /* --------------------------------------------------------------------------------------------- */
113 static void do_external_panelize (char *command
);
115 /* --------------------------------------------------------------------------------------------- */
118 update_command (void)
120 if (l_panelize
->pos
!= last_listitem
)
122 struct panelize
*data
= NULL
;
124 last_listitem
= l_panelize
->pos
;
125 listbox_get_current (l_panelize
, NULL
, (void **) &data
);
126 input_assign_text (pname
, data
->command
);
128 input_update (pname
, TRUE
);
132 /* --------------------------------------------------------------------------------------------- */
135 panelize_callback (Dlg_head
* h
, Widget
* sender
, dlg_msg_t msg
, int parm
, void *data
)
142 tty_setcolor (MENU_ENTRY_COLOR
);
147 common_dialog_repaint (h
);
148 tty_setcolor (COLOR_NORMAL
);
149 draw_box (h
, UY
, UX
, h
->lines
- 10, h
->cols
- 10, TRUE
);
153 return default_dlg_callback (h
, sender
, msg
, parm
, data
);
157 /* --------------------------------------------------------------------------------------------- */
162 int i
, panelize_cols
= COLS
- 6;
163 struct panelize
*current
= panelize
;
166 static int i18n_flag
= 0;
167 static int maxlen
= 0;
171 i
= sizeof (panelize_but
) / sizeof (panelize_but
[0]);
174 panelize_but
[i
].text
= _(panelize_but
[i
].text
);
175 maxlen
+= str_term_width1 (panelize_but
[i
].text
) + 5;
181 panelize_cols
= max (panelize_cols
, maxlen
);
183 panelize_but
[2].x
= panelize_but
[3].x
+ str_term_width1 (panelize_but
[3].text
) + 7;
184 panelize_but
[1].x
= panelize_but
[2].x
+ str_term_width1 (panelize_but
[2].text
) + 5;
185 panelize_but
[0].x
= panelize_cols
- str_term_width1 (panelize_but
[0].text
) - 8 - BX
;
187 #endif /* ENABLE_NLS */
194 create_dlg (TRUE
, 0, 0, 22, panelize_cols
, dialog_colors
,
195 panelize_callback
, NULL
, "[External panelize]",
196 _("External panelize"), DLG_CENTER
| DLG_REVERSE
);
198 for (i
= 0; i
< BUTTONS
; i
++)
199 add_widget (panelize_dlg
,
200 button_new (BY
+ panelize_but
[i
].y
,
201 BX
+ panelize_but
[i
].x
,
202 panelize_but
[i
].ret_cmd
,
203 panelize_but
[i
].flags
, panelize_but
[i
].text
, 0));
206 input_new (UY
+ 14, UX
, input_get_default_colors (),
207 panelize_dlg
->cols
- 10, "", "in", INPUT_COMPLETE_DEFAULT
);
208 add_widget (panelize_dlg
, pname
);
210 add_widget (panelize_dlg
, label_new (UY
+ 13, UX
, _("Command")));
212 /* get new listbox */
213 l_panelize
= listbox_new (UY
+ 1, UX
+ 1, 10, panelize_dlg
->cols
- 12, FALSE
, NULL
);
217 listbox_add_item (l_panelize
, LISTBOX_APPEND_AT_END
, 0, current
->label
, current
);
218 current
= current
->next
;
221 /* add listbox to the dialogs */
222 add_widget (panelize_dlg
, l_panelize
);
224 listbox_select_entry (l_panelize
, listbox_search_text (l_panelize
, _("Other command")));
227 /* --------------------------------------------------------------------------------------------- */
232 destroy_dlg (panelize_dlg
);
236 /* --------------------------------------------------------------------------------------------- */
239 add2panelize (char *label
, char *command
)
241 struct panelize
*current
, *old
;
245 while (current
&& strcmp (current
->label
, label
) <= 0)
248 current
= current
->next
;
253 panelize
= g_new (struct panelize
, 1);
254 panelize
->label
= label
;
255 panelize
->command
= command
;
256 panelize
->next
= current
;
260 struct panelize
*new;
261 new = g_new (struct panelize
, 1);
263 new->command
= command
;
269 /* --------------------------------------------------------------------------------------------- */
272 add2panelize_cmd (void)
276 if (pname
->buffer
&& (*pname
->buffer
))
278 label
= input_dialog (_("Add to external panelize"),
279 _("Enter command label:"), MC_HISTORY_FM_PANELIZE_ADD
, "");
288 add2panelize (label
, g_strdup (pname
->buffer
));
292 /* --------------------------------------------------------------------------------------------- */
295 remove_from_panelize (struct panelize
*entry
)
297 if (strcmp (entry
->label
, _("Other command")) != 0)
299 if (entry
== panelize
)
301 panelize
= panelize
->next
;
305 struct panelize
*current
= panelize
;
306 while (current
&& current
->next
!= entry
)
307 current
= current
->next
;
310 current
->next
= entry
->next
;
314 g_free (entry
->label
);
315 g_free (entry
->command
);
320 /* --------------------------------------------------------------------------------------------- */
323 do_external_panelize (char *command
)
325 int status
, link_to_dir
, stale_link
;
328 dir_list
*list
= ¤t_panel
->dir
;
329 char line
[MC_MAXPATHLEN
];
334 external
= popen (command
, "r");
337 close_error_pipe (D_ERROR
, _("Cannot invoke command."));
340 /* Clear the counters and the directory list */
341 panel_clean_dir (current_panel
);
343 panelize_change_root (current_panel
->cwd_vpath
);
345 if (set_zero_dir (list
))
351 if (fgets (line
, MC_MAXPATHLEN
, external
) == NULL
)
353 if (ferror (external
) && errno
== EINTR
)
358 if (line
[strlen (line
) - 1] == '\n')
359 line
[strlen (line
) - 1] = 0;
360 if (strlen (line
) < 1)
362 if (line
[0] == '.' && line
[1] == PATH_SEP
)
366 status
= handle_path (list
, name
, &st
, next_free
, &link_to_dir
, &stale_link
);
371 list
->list
[next_free
].fnamelen
= strlen (name
);
372 list
->list
[next_free
].fname
= g_strndup (name
, list
->list
[next_free
].fnamelen
);
373 file_mark (current_panel
, next_free
, 0);
374 list
->list
[next_free
].f
.link_to_dir
= link_to_dir
;
375 list
->list
[next_free
].f
.stale_link
= stale_link
;
376 list
->list
[next_free
].f
.dir_size_computed
= 0;
377 list
->list
[next_free
].st
= st
;
378 list
->list
[next_free
].sort_key
= NULL
;
379 list
->list
[next_free
].second_sort_key
= NULL
;
381 if (!(next_free
& 32))
385 current_panel
->is_panelized
= TRUE
;
388 current_panel
->count
= next_free
;
389 if (list
->list
[0].fname
[0] == PATH_SEP
)
392 panel_set_cwd (current_panel
, PATH_SEP_STR
);
393 ret
= chdir (PATH_SEP_STR
);
398 current_panel
->count
= set_zero_dir (list
) ? 1 : 0;
400 if (pclose (external
) < 0)
401 message (D_NORMAL
, _("External panelize"), _("Pipe close failed"));
402 close_error_pipe (D_NORMAL
, NULL
);
403 try_to_select (current_panel
, NULL
);
404 panel_re_sort (current_panel
);
407 /* --------------------------------------------------------------------------------------------- */
410 do_panelize_cd (struct WPanel
*panel
)
413 dir_list
*list
= &panel
->dir
;
414 gboolean panelized_same
;
416 clean_dir (list
, panel
->count
);
417 if (panelized_panel
.root_vpath
== NULL
)
418 panelize_change_root (current_panel
->cwd_vpath
);
420 if (panelized_panel
.count
< 1)
422 if (set_zero_dir (&panelized_panel
.list
))
423 panelized_panel
.count
= 1;
425 else if (panelized_panel
.count
>= list
->size
)
427 list
->list
= g_try_realloc (list
->list
, sizeof (file_entry
) * panelized_panel
.count
);
428 list
->size
= panelized_panel
.count
;
430 panel
->count
= panelized_panel
.count
;
431 panel
->is_panelized
= TRUE
;
433 panelized_same
= (vfs_path_cmp (panelized_panel
.root_vpath
, panel
->cwd_vpath
) == 0);
435 for (i
= 0; i
< panelized_panel
.count
; i
++)
438 || (panelized_panel
.list
.list
[i
].fname
[0] == '.'
439 && panelized_panel
.list
.list
[i
].fname
[1] == '.'
440 && panelized_panel
.list
.list
[i
].fname
[2] == '\0'))
442 list
->list
[i
].fnamelen
= panelized_panel
.list
.list
[i
].fnamelen
;
443 list
->list
[i
].fname
= g_strndup (panelized_panel
.list
.list
[i
].fname
,
444 panelized_panel
.list
.list
[i
].fnamelen
);
448 vfs_path_t
*tmp_vpath
;
451 vfs_path_append_new (panelized_panel
.root_vpath
, panelized_panel
.list
.list
[i
].fname
,
453 list
->list
[i
].fname
= vfs_path_to_str (tmp_vpath
);
454 vfs_path_free (tmp_vpath
);
455 list
->list
[i
].fnamelen
= strlen (list
->list
[i
].fname
);
457 list
->list
[i
].f
.link_to_dir
= panelized_panel
.list
.list
[i
].f
.link_to_dir
;
458 list
->list
[i
].f
.stale_link
= panelized_panel
.list
.list
[i
].f
.stale_link
;
459 list
->list
[i
].f
.dir_size_computed
= panelized_panel
.list
.list
[i
].f
.dir_size_computed
;
460 list
->list
[i
].f
.marked
= panelized_panel
.list
.list
[i
].f
.marked
;
461 list
->list
[i
].st
= panelized_panel
.list
.list
[i
].st
;
462 list
->list
[i
].sort_key
= panelized_panel
.list
.list
[i
].sort_key
;
463 list
->list
[i
].second_sort_key
= panelized_panel
.list
.list
[i
].second_sort_key
;
465 try_to_select (panel
, NULL
);
468 /* --------------------------------------------------------------------------------------------- */
469 /*** public functions ****************************************************************************/
470 /* --------------------------------------------------------------------------------------------- */
473 * Change root directory of panelized content.
474 * @param new_root - object with new path.
477 panelize_change_root (const vfs_path_t
* new_root
)
479 vfs_path_free (panelized_panel
.root_vpath
);
480 panelized_panel
.root_vpath
= vfs_path_clone (new_root
);
483 /* --------------------------------------------------------------------------------------------- */
486 panelize_save_panel (struct WPanel
*panel
)
489 dir_list
*list
= &panel
->dir
;
491 panelize_change_root (current_panel
->cwd_vpath
);
493 if (panelized_panel
.count
> 0)
494 clean_dir (&panelized_panel
.list
, panelized_panel
.count
);
495 if (panel
->count
< 1)
498 panelized_panel
.count
= panel
->count
;
499 if (panel
->count
>= panelized_panel
.list
.size
)
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
;
505 for (i
= 0; i
< panel
->count
; i
++)
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
;
520 /* --------------------------------------------------------------------------------------------- */
523 cd_panelize_cmd (void)
525 if (get_display_type (MENU_PANEL_IDX
) != view_listing
)
526 set_display_type (MENU_PANEL_IDX
, view_listing
);
528 do_panelize_cd ((struct WPanel
*) get_panel_widget (MENU_PANEL_IDX
));
531 /* --------------------------------------------------------------------------------------------- */
534 external_panelize (void)
538 if (!vfs_current_is_local ())
540 message (D_ERROR
, MSG_ERROR
, _("Cannot run external panelize in a non-local directory"));
546 /* display file info */
547 tty_setcolor (SELECTED_COLOR
);
549 run_dlg (panelize_dlg
);
551 switch (panelize_dlg
->ret_value
)
562 struct panelize
*entry
;
564 listbox_get_current (l_panelize
, NULL
, (void **) &entry
);
565 remove_from_panelize (entry
);
570 target
= pname
->buffer
;
571 if (target
!= NULL
&& *target
)
573 char *cmd
= g_strdup (target
);
574 destroy_dlg (panelize_dlg
);
575 do_external_panelize (cmd
);
586 /* --------------------------------------------------------------------------------------------- */
591 gchar
**profile_keys
, **keys
;
595 conv
= str_crt_conv_from ("UTF-8");
597 profile_keys
= keys
= mc_config_get_keys (mc_main_config
, panelize_section
, &len
);
599 add2panelize (g_strdup (_("Other command")), g_strdup (""));
601 if (!profile_keys
|| *profile_keys
== NULL
)
603 add2panelize (g_strdup (_("Modified git files")), g_strdup ("git ls-files --modified"));
604 add2panelize (g_strdup (_("Find rejects after patching")),
605 g_strdup ("find . -name \\*.rej -print"));
606 add2panelize (g_strdup (_("Find *.orig after patching")),
607 g_strdup ("find . -name \\*.orig -print"));
608 add2panelize (g_strdup (_("Find SUID and SGID programs")),
610 ("find . \\( \\( -perm -04000 -a -perm +011 \\) -o \\( -perm -02000 -a -perm +01 \\) \\) -print"));
614 while (*profile_keys
)
618 if (mc_global
.utf8_display
|| conv
== INVALID_CONV
)
619 buffer
= g_string_new (*profile_keys
);
622 buffer
= g_string_new ("");
623 if (str_convert (conv
, *profile_keys
, buffer
) == ESTR_FAILURE
)
624 g_string_assign (buffer
, *profile_keys
);
627 add2panelize (g_string_free (buffer
, FALSE
),
628 mc_config_get_string (mc_main_config
, panelize_section
, *profile_keys
, ""));
633 str_close_conv (conv
);
636 /* --------------------------------------------------------------------------------------------- */
641 struct panelize
*current
= panelize
;
643 mc_config_del_group (mc_main_config
, panelize_section
);
644 for (; current
; current
= current
->next
)
646 if (strcmp (current
->label
, _("Other command")))
647 mc_config_set_string (mc_main_config
,
648 panelize_section
, current
->label
, current
->command
);
652 /* --------------------------------------------------------------------------------------------- */
657 struct panelize
*current
= panelize
;
658 struct panelize
*next
;
660 for (; current
; current
= next
)
662 next
= current
->next
;
663 g_free (current
->label
);
664 g_free (current
->command
);
669 /* --------------------------------------------------------------------------------------------- */