3 This widget is derived from the WInput widget, it's used to cope
4 with all the magic of the command input line, we depend on some
5 help from the program's callback.
7 Copyright (C) 1995, 1998, 1999, 2000, 2001, 2002, 2003, 2004, 2005,
9 The Free Software Foundation, Inc.
11 This file is part of the Midnight Commander.
13 The Midnight Commander is free software: you can redistribute it
14 and/or modify it under the terms of the GNU General Public License as
15 published by the Free Software Foundation, either version 3 of the License,
16 or (at your option) any later version.
18 The Midnight Commander is distributed in the hope that it will be useful,
19 but WITHOUT ANY WARRANTY; without even the implied warranty of
20 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
21 GNU General Public License for more details.
23 You should have received a copy of the GNU General Public License
24 along with this program. If not, see <http://www.gnu.org/licenses/>.
28 * \brief Source: command line widget
37 #include "lib/global.h" /* home_dir */
38 #include "lib/tty/tty.h"
39 #include "lib/vfs/vfs.h"
40 #include "lib/strescape.h"
41 #include "lib/skin.h" /* DEFAULT_COLOR */
43 #include "lib/widget.h"
45 #include "src/setup.h" /* quit */
46 #ifdef ENABLE_SUBSHELL
47 #include "src/subshell.h"
49 #include "src/execute.h" /* shell_execute */
51 #include "midnight.h" /* current_panel */
52 #include "layout.h" /* for command_prompt variable */
53 #include "usermenu.h" /* expand_format */
54 #include "tree.h" /* for tree_chdir */
58 /*** global variables ****************************************************************************/
60 /* This holds the command line */
63 /*** file scope macro definitions ****************************************************************/
65 #define CD_OPERAND_OFFSET 3
67 /*** file scope type declarations ****************************************************************/
69 /*** file scope variables ************************************************************************/
71 /*** file scope functions ************************************************************************/
72 /* --------------------------------------------------------------------------------------------- */
75 * Expand the argument to "cd" and change directory. First try tilde
76 * expansion, then variable substitution. If the CDPATH variable is set
77 * (e.g. CDPATH=".:~:/usr"), try all the paths contained there.
78 * We do not support such rare substitutions as ${var:-value} etc.
79 * No quoting is implemented here, so ${VAR} and $VAR will be always
80 * substituted. Wildcards are not supported either.
81 * Advanced users should be encouraged to use "\cd" instead of "cd" if
82 * they want the behavior they are used to in the shell.
84 * @param _path string to examine
85 * @return newly allocated string
89 examine_cd (const char *_path
)
92 { copy_sym
, subst_var
} state_t
;
94 state_t state
= copy_sym
;
97 char *path_tilde
, *path
;
100 /* Tilde expansion */
101 path
= strutils_shell_unescape (_path
);
102 path_tilde
= tilde_expand (path
);
105 /* Leave space for further expansion */
106 qlen
= strlen (path_tilde
) + MC_MAXPATHLEN
;
109 /* Variable expansion */
110 for (p
= path_tilde
, r
= q
; *p
!= '\0' && r
< q
+ MC_MAXPATHLEN
;)
116 if (p
[0] == '\\' && p
[1] == '$')
123 else if (p
[0] != '$' || p
[1] == '[' || p
[1] == '(')
146 s
= strchr (p
, PATH_SEP
);
148 s
= strchr (p
, '\0');
165 if (r
+ tlen
< q
+ MC_MAXPATHLEN
)
167 strncpy (r
, t
, tlen
+ 1);
188 /* --------------------------------------------------------------------------------------------- */
190 /* CDPATH handling */
192 handle_cdpath (const char *path
)
194 gboolean result
= FALSE
;
196 /* CDPATH handling */
197 if (*path
!= PATH_SEP
)
202 cdpath
= g_strdup (getenv ("CDPATH"));
204 c
= (p
== NULL
) ? '\0' : ':';
206 while (!result
&& c
== ':')
212 s
= strchr (p
, '\0');
219 r_vpath
= vfs_path_build_filename (p
, path
, NULL
);
220 result
= do_cd (r_vpath
, cd_parse_command
);
221 vfs_path_free (r_vpath
);
232 /* --------------------------------------------------------------------------------------------- */
234 /** Handle Enter on the command line
236 * @param lc_cmdline string for handling
237 * @return MSG_HANDLED on sucsess else MSG_NOT_HANDLED
241 enter (WInput
* lc_cmdline
)
243 char *cmd
= lc_cmdline
->buffer
;
248 /* Any initial whitespace should be removed at this point */
249 while (*cmd
== ' ' || *cmd
== '\t' || *cmd
== '\n')
255 if (strncmp (cmd
, "cd ", 3) == 0 || strcmp (cmd
, "cd") == 0)
258 input_clean (lc_cmdline
);
261 else if (strcmp (cmd
, "exit") == 0)
263 input_assign_text (lc_cmdline
, "");
264 if (!quiet_quit_cmd ())
265 return MSG_NOT_HANDLED
;
272 if (!vfs_current_is_local ())
274 message (D_ERROR
, MSG_ERROR
, _("Cannot execute commands on non-local filesystems"));
275 return MSG_NOT_HANDLED
;
277 #ifdef ENABLE_SUBSHELL
278 /* Check this early before we clean command line
279 * (will be checked again by shell_execute) */
280 if (mc_global
.tty
.use_subshell
&& subshell_state
!= INACTIVE
)
282 message (D_ERROR
, MSG_ERROR
, _("The shell is already running a command"));
283 return MSG_NOT_HANDLED
;
286 command
= g_string_sized_new (32);
288 for (i
= 0; cmd
[i
] != '\0'; i
++)
291 g_string_append_c (command
, cmd
[i
]);
296 s
= expand_format (NULL
, cmd
[++i
], TRUE
);
297 g_string_append (command
, s
);
302 input_clean (lc_cmdline
);
303 shell_execute (command
->str
, 0);
304 g_string_free (command
, TRUE
);
306 #ifdef ENABLE_SUBSHELL
307 if ((quit
& SUBSHELL_EXIT
) != 0)
309 if (quiet_quit_cmd ())
313 /* restart subshell */
314 if (mc_global
.tty
.use_subshell
)
318 if (mc_global
.tty
.use_subshell
)
325 /* --------------------------------------------------------------------------------------------- */
328 * Default command line callback
330 * @param w Widget object
331 * @param msg message for handling
332 * @param parm extra parameter such as key code
334 * @return MSG_NOT_HANDLED on fail else MSG_HANDLED
338 command_callback (Widget
* w
, Widget
* sender
, widget_msg_t msg
, int parm
, void *data
)
343 /* Never accept focus, otherwise panels will be unselected */
344 return MSG_NOT_HANDLED
;
347 /* Special case: we handle the enter key */
349 return enter (INPUT (w
));
353 return input_callback (w
, sender
, msg
, parm
, data
);
357 /* --------------------------------------------------------------------------------------------- */
358 /*** public functions ****************************************************************************/
359 /* --------------------------------------------------------------------------------------------- */
361 /** Execute the cd command on the command line
363 * @param orig_cmd command for execution
367 do_cd_command (char *orig_cmd
)
370 int operand_pos
= CD_OPERAND_OFFSET
;
373 /* Any final whitespace should be removed here
374 (to see why, try "cd fred "). */
375 /* NOTE: I think we should not remove the extra space,
376 that way, we can cd into hidden directories */
377 /* FIXME: what about interpreting quoted strings like the shell.
378 so one could type "cd <tab> M-a <enter>" and it would work. */
379 len
= strlen (orig_cmd
) - 1;
380 while (len
>= 0 && (orig_cmd
[len
] == ' ' || orig_cmd
[len
] == '\t' || orig_cmd
[len
] == '\n'))
387 if (cmd
[CD_OPERAND_OFFSET
- 1] == 0)
388 cmd
= "cd "; /* 0..2 => given text, 3 => \0 */
390 /* allow any amount of white space in front of the path operand */
391 while (cmd
[operand_pos
] == ' ' || cmd
[operand_pos
] == '\t')
394 if (get_current_type () == view_tree
)
398 sync_tree (mc_config_get_home_dir ());
400 else if (strcmp (cmd
+ operand_pos
, "..") == 0)
404 if (vfs_path_elements_count (current_panel
->cwd_vpath
) != 1 ||
405 strlen (vfs_path_get_by_index (current_panel
->cwd_vpath
, 0)->path
) > 1)
407 vfs_path_t
*tmp_vpath
= current_panel
->cwd_vpath
;
409 current_panel
->cwd_vpath
=
410 vfs_path_vtokens_get (tmp_vpath
, 0, vfs_path_tokens_count (tmp_vpath
) - 1);
411 vfs_path_free (tmp_vpath
);
413 str_path
= vfs_path_to_str (current_panel
->cwd_vpath
);
414 sync_tree (str_path
);
417 else if (cmd
[operand_pos
] == PATH_SEP
)
419 sync_tree (cmd
+ operand_pos
);
424 vfs_path_t
*new_vpath
;
426 new_vpath
= vfs_path_append_new (current_panel
->cwd_vpath
, cmd
+ operand_pos
, NULL
);
427 str_path
= vfs_path_to_str (new_vpath
);
428 vfs_path_free (new_vpath
);
429 sync_tree (str_path
);
439 path
= examine_cd (&cmd
[operand_pos
]);
442 q_vpath
= vfs_path_from_str (mc_config_get_home_dir ());
444 q_vpath
= vfs_path_from_str_flags (path
, VPF_NO_CANON
);
446 ok
= do_cd (q_vpath
, cd_parse_command
);
448 ok
= handle_cdpath (path
);
454 d
= vfs_path_to_str_flags (q_vpath
, 0, VPF_STRIP_PASSWORD
);
455 message (D_ERROR
, MSG_ERROR
, _("Cannot chdir to \"%s\"\n%s"), d
,
456 unix_error_string (errno
));
460 vfs_path_free (q_vpath
);
465 /* --------------------------------------------------------------------------------------------- */
468 command_new (int y
, int x
, int cols
)
471 const input_colors_t command_colors
= {
475 COMMAND_HISTORY_COLOR
478 cmd
= input_new (y
, x
, (int *) command_colors
, cols
, "", "cmdline",
479 INPUT_COMPLETE_DEFAULT
| INPUT_COMPLETE_CD
| INPUT_COMPLETE_COMMANDS
|
480 INPUT_COMPLETE_SHELL_ESC
);
483 WIDGET (cmd
)->callback
= command_callback
;
488 /* --------------------------------------------------------------------------------------------- */
490 * Insert quoted text in input line. The function is meant for the
491 * command line, so the percent sign is quoted as well.
493 * @param in WInput object
494 * @param text string for insertion
495 * @param insert_extra_space add extra space
499 command_insert (WInput
* in
, const char *text
, gboolean insert_extra_space
)
503 quoted_text
= name_quote (text
, 1);
504 input_insert (in
, quoted_text
, insert_extra_space
);
505 g_free (quoted_text
);
508 /* --------------------------------------------------------------------------------------------- */