1 /* guestfish - the filesystem interactive shell
2 * Copyright (C) 2009 Red Hat Inc.
4 * This program is free software; you can redistribute it and/or modify
5 * it under the terms of the GNU General Public License as published by
6 * the Free Software Foundation; either version 2 of the License, or
7 * (at your option) any later version.
9 * This program is distributed in the hope that it will be useful,
10 * but WITHOUT ANY WARRANTY; without even the implied warranty of
11 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
12 * GNU General Public License for more details.
14 * You should have received a copy of the GNU General Public License
15 * along with this program; if not, write to the Free Software
16 * Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
29 #include <sys/types.h>
32 #ifdef HAVE_LIBREADLINE
33 #include <readline/readline.h>
34 #include <readline/history.h>
55 static void add_drives (struct drv *drv);
56 static void mount_mps (struct mp *mp);
57 static void interactive (void);
58 static void shell_script (void);
59 static void script (int prompt);
60 static void cmdline (char *argv[], int optind, int argc);
61 static void initialize_readline (void);
62 static void cleanup_readline (void);
63 static void add_history_line (const char *);
65 /* Currently open libguestfs handle. */
71 int echo_commands = 0;
72 int remote_control_listen = 0;
73 int remote_control = 0;
74 int exit_on_error = 1;
77 launch (guestfs_h *_g)
81 if (guestfs_is_config (g)) {
82 if (guestfs_launch (g) == -1)
88 static void __attribute__((noreturn))
91 if (status != EXIT_SUCCESS)
92 fprintf (stderr, _("Try `%s --help' for more information.\n"),
96 _("%s: guest filesystem shell\n"
97 "%s lets you edit virtual machine filesystems\n"
98 "Copyright (C) 2009 Red Hat Inc.\n"
100 " %s [--options] cmd [: cmd : cmd ...]\n"
101 " %s -i libvirt-domain\n"
102 " %s -i disk-image(s)\n"
103 "or for interactive use:\n"
105 "or from a shell script:\n"
111 " -h|--cmd-help List available commands\n"
112 " -h|--cmd-help cmd Display detailed help on 'cmd'\n"
113 " -a|--add image Add image\n"
114 " -D|--no-dest-paths Don't tab-complete paths from guest fs\n"
115 " -f|--file file Read commands from file\n"
116 " -i|--inspector Run virt-inspector to get disk mountpoints\n"
117 " --listen Listen for remote commands\n"
118 " -m|--mount dev[:mnt] Mount dev on mnt (if omitted, /)\n"
119 " -n|--no-sync Don't autosync\n"
120 " --remote[=pid] Send commands to remote %s\n"
121 " -r|--ro Mount read-only\n"
122 " --selinux Enable SELinux support\n"
123 " -v|--verbose Verbose messages\n"
124 " -x Echo each command before executing it\n"
125 " -V|--version Display version and exit\n"
126 "For more information, see the manpage %s(1).\n"),
127 program_name, program_name, program_name,
128 program_name, program_name, program_name,
129 program_name, program_name, program_name);
135 main (int argc, char *argv[])
137 /* Set global program name that is not polluted with libtool artifacts. */
138 set_program_name (argv[0]);
140 atexit (close_stdout);
142 setlocale (LC_ALL, "");
143 bindtextdomain (PACKAGE, LOCALEBASEDIR);
144 textdomain (PACKAGE);
146 enum { HELP_OPTION = CHAR_MAX + 1 };
148 static const char *options = "a:Df:h::im:nrv?Vx";
149 static const struct option long_options[] = {
150 { "add", 1, 0, 'a' },
151 { "cmd-help", 2, 0, 'h' },
152 { "file", 1, 0, 'f' },
153 { "help", 0, 0, HELP_OPTION },
154 { "inspector", 0, 0, 'i' },
155 { "listen", 0, 0, 0 },
156 { "mount", 1, 0, 'm' },
157 { "no-dest-paths", 0, 0, 'D' },
158 { "no-sync", 0, 0, 'n' },
159 { "remote", 2, 0, 0 },
161 { "selinux", 0, 0, 0 },
162 { "verbose", 0, 0, 'v' },
163 { "version", 0, 0, 'V' },
166 struct drv *drvs = NULL;
168 struct mp *mps = NULL;
170 char *p, *file = NULL;
176 initialize_readline ();
178 memset (&sa, 0, sizeof sa);
179 sa.sa_handler = SIG_IGN;
180 sa.sa_flags = SA_RESTART;
181 sigaction (SIGPIPE, &sa, NULL);
183 /* guestfs_create is meant to be a lightweight operation, so
184 * it's OK to do it early here.
186 g = guestfs_create ();
188 fprintf (stderr, _("guestfs_create: failed to create handle\n"));
192 guestfs_set_autosync (g, 1);
194 /* If developing, add ./appliance to the path. Note that libtools
195 * interferes with this because uninstalled guestfish is a shell
196 * script that runs the real program with an absolute path. Detect
199 * BUT if LIBGUESTFS_PATH environment variable is already set by
200 * the user, then don't override it.
202 if (getenv ("LIBGUESTFS_PATH") == NULL &&
204 (argv[0][0] != '/' || strstr (argv[0], "/.libs/lt-") != NULL))
205 guestfs_set_path (g, "appliance:" GUESTFS_DEFAULT_PATH);
207 /* CAUTION: we are careful to modify argv[0] here, only after
208 * using it just above.
210 * getopt_long uses argv[0], so give it the sanitized name. Save a copy
211 * of the original, in case it's needed in virt-inspector mode, below.
213 char *real_argv0 = argv[0];
214 argv[0] = bad_cast (program_name);
217 c = getopt_long (argc, argv, options, long_options, &option_index);
221 case 0: /* options which are long only */
222 if (STREQ (long_options[option_index].name, "listen"))
223 remote_control_listen = 1;
224 else if (STREQ (long_options[option_index].name, "remote")) {
226 if (sscanf (optarg, "%d", &remote_control) != 1) {
227 fprintf (stderr, _("%s: --listen=PID: PID was not a number: %s\n"),
228 program_name, optarg);
232 p = getenv ("GUESTFISH_PID");
233 if (!p || sscanf (p, "%d", &remote_control) != 1) {
234 fprintf (stderr, _("%s: remote: $GUESTFISH_PID must be set"
235 " to the PID of the remote process\n"),
240 } else if (STREQ (long_options[option_index].name, "selinux")) {
241 guestfs_set_selinux (g, 1);
243 fprintf (stderr, _("%s: unknown long option: %s (%d)\n"),
244 program_name, long_options[option_index].name, option_index);
250 if (access (optarg, R_OK) != 0) {
254 drv = malloc (sizeof (struct drv));
259 drv->filename = optarg;
265 complete_dest_paths = 0;
270 fprintf (stderr, _("%s: only one -f parameter can be given\n"),
279 display_command (optarg);
280 else if (argv[optind] && argv[optind][0] != '-')
281 display_command (argv[optind++]);
291 mp = malloc (sizeof (struct mp));
296 p = strchr (optarg, ':');
299 mp->mountpoint = p+1;
301 mp->mountpoint = bad_cast ("/");
308 guestfs_set_autosync (g, 0);
317 guestfs_set_verbose (g, verbose);
321 printf ("%s %s\n", program_name, PACKAGE_VERSION);
329 usage (EXIT_SUCCESS);
332 usage (EXIT_FAILURE);
336 /* Inspector mode invalidates most of the other arguments. */
341 if (drvs || mps || remote_control_listen || remote_control ||
342 guestfs_get_selinux (g)) {
343 fprintf (stderr, _("%s: cannot use -i option with -a, -m,"
344 " --listen, --remote or --selinux\n"),
348 if (optind >= argc) {
350 _("%s: -i requires a libvirt domain or path(s) to disk image(s)\n"),
355 strcpy (cmd, "a=`virt-inspector");
356 while (optind < argc) {
357 if (strlen (cmd) + strlen (argv[optind]) + strlen (real_argv0) + 60
360 _("%s: virt-inspector command too long for fixed-size buffer\n"),
365 strcat (cmd, argv[optind]);
371 strcat (cmd, " --ro-fish");
373 strcat (cmd, " --fish");
375 sprintf (&cmd[strlen(cmd)], "` && %s $a", real_argv0);
377 if (guestfs_get_verbose (g))
379 if (!guestfs_get_autosync (g))
384 "%s -i: running virt-inspector command:\n%s\n", program_name, cmd);
391 exit (WEXITSTATUS (r));
394 /* If we've got drives to add, add them now. */
397 /* If we've got mountpoints, we must launch the guest and mount them. */
399 if (launch (g) == -1) exit (EXIT_FAILURE);
403 /* Remote control? */
404 if (remote_control_listen && remote_control) {
406 _("%s: cannot use --listen and --remote options at the same time\n"),
411 if (remote_control_listen) {
414 _("%s: extra parameters on the command line with --listen flag\n"),
420 _("%s: cannot use --listen and --file options at the same time\n"),
427 /* -f (file) parameter? */
430 if (open (file, O_RDONLY) == -1) {
436 /* Interactive, shell script, or command(s) on the command line? */
437 if (optind >= argc) {
444 cmdline (argv, optind, argc);
452 pod2text (const char *name, const char *shortdesc, const char *str)
456 fp = popen ("pod2text", "w");
458 /* pod2text failed, maybe not found, so let's just print the
459 * source instead, since that's better than doing nothing.
461 printf ("%s - %s\n\n%s\n", name, shortdesc, str);
464 fprintf (fp, "=head1 NAME\n\n%s - %s\n\n", name, shortdesc);
469 /* List is built in reverse order, so mount them in reverse order. */
471 mount_mps (struct mp *mp)
476 mount_mps (mp->next);
478 /* Don't use guestfs_mount here because that will default to mount
479 * options -o sync,noatime. For more information, see guestfs(3)
480 * section "LIBGUESTFS GOTCHAS".
482 const char *options = read_only ? "ro" : "";
483 r = guestfs_mount_options (g, options, mp->device, mp->mountpoint);
490 add_drives (struct drv *drv)
495 add_drives (drv->next);
497 r = guestfs_add_drive (g, drv->filename);
499 r = guestfs_add_drive_ro (g, drv->filename);
517 #define FISH "><fs> "
519 static char *line_read = NULL;
524 #ifdef HAVE_LIBREADLINE
532 line_read = readline (prompt ? FISH : "");
534 if (line_read && *line_read)
535 add_history_line (line_read);
540 #endif /* HAVE_LIBREADLINE */
542 static char buf[8192];
545 if (prompt) printf (FISH);
546 line_read = fgets (buf, sizeof buf, stdin);
549 len = strlen (line_read);
550 if (len > 0 && buf[len-1] == '\n') buf[len-1] = '\0';
564 int global_exit_on_error = !prompt;
569 "Welcome to guestfish, the libguestfs filesystem interactive shell for\n"
570 "editing virtual machine filesystems.\n"
572 "Type: 'help' for help with commands\n"
573 " 'quit' to quit the shell\n"
579 exit_on_error = global_exit_on_error;
581 buf = rl_gets (prompt);
587 /* Skip any initial whitespace before the command. */
589 while (*buf && c_isspace (*buf))
594 /* If the next character is '#' then this is a comment. */
595 if (*buf == '#') continue;
597 /* If the next character is '!' then pass the whole lot to system(3). */
605 (WTERMSIG (r) == SIGINT || WTERMSIG (r) == SIGQUIT)) ||
606 WEXITSTATUS (r) != 0)
612 /* If the next character is '-' allow the command to fail without
613 * exiting on error (just for this one command though).
621 /* Get the command (cannot be quoted). */
622 len = strcspn (buf, " \t");
624 if (len == 0) continue;
628 if (buf[len] == '\0') {
635 p += strspn (p, " \t");
637 /* Get the parameters. */
638 while (*p && i < sizeof argv / sizeof argv[0]) {
641 /* Parameters which start with quotes or pipes are treated
642 * specially. Bare parameters are delimited by whitespace.
646 len = strcspn (p, "\"");
647 if (p[len] == '\0') {
648 fprintf (stderr, _("%s: unterminated double quote\n"), program_name);
649 if (exit_on_error) exit (EXIT_FAILURE);
652 if (p[len+1] && (p[len+1] != ' ' && p[len+1] != '\t')) {
654 _("%s: command arguments not separated by whitespace\n"),
656 if (exit_on_error) exit (EXIT_FAILURE);
660 pend = p[len+1] ? &p[len+2] : &p[len+1];
661 } else if (*p == '\'') {
663 len = strcspn (p, "'");
664 if (p[len] == '\0') {
665 fprintf (stderr, _("%s: unterminated single quote\n"), program_name);
666 if (exit_on_error) exit (EXIT_FAILURE);
669 if (p[len+1] && (p[len+1] != ' ' && p[len+1] != '\t')) {
671 _("%s: command arguments not separated by whitespace\n"),
673 if (exit_on_error) exit (EXIT_FAILURE);
677 pend = p[len+1] ? &p[len+2] : &p[len+1];
678 } else if (*p == '|') {
683 } else if (*p == '[') {
687 while (*pend && c != 0) {
688 if (*pend == '[') c++;
689 else if (*pend == ']') c--;
694 _("%s: unterminated \"[...]\" sequence\n"), program_name);
695 if (exit_on_error) exit (EXIT_FAILURE);
698 if (*pend && (*pend != ' ' && *pend != '\t')) {
700 _("%s: command arguments not separated by whitespace\n"),
702 if (exit_on_error) exit (EXIT_FAILURE);
707 } else if (*p != ' ' && *p != '\t') {
708 /* If the first character is a ~ then note that this parameter
709 * is a candidate for ~username expansion. NB this does not
710 * apply to quoted parameters.
712 tilde_candidate = *p == '~';
713 len = strcspn (p, " \t");
720 fprintf (stderr, _("%s: internal error parsing string at '%s'\n"),
725 if (!tilde_candidate)
728 argv[i] = try_tilde_expansion (p);
733 p += strspn (p, " \t");
736 if (i == sizeof argv / sizeof argv[0]) {
737 fprintf (stderr, _("%s: too many arguments\n"), program_name);
738 if (exit_on_error) exit (EXIT_FAILURE);
745 if (issue_command (cmd, argv, pipe) == -1) {
746 if (exit_on_error) exit (EXIT_FAILURE);
751 if (prompt) printf ("\n");
755 cmdline (char *argv[], int optind, int argc)
762 if (optind >= argc) return;
764 cmd = argv[optind++];
765 if (STREQ (cmd, ":")) {
766 fprintf (stderr, _("%s: empty command on command line\n"), program_name);
769 params = &argv[optind];
771 /* Search for end of command list or ":" ... */
772 while (optind < argc && STRNEQ (argv[optind], ":"))
775 if (optind == argc) {
776 if (issue_command (cmd, params, NULL) == -1) exit (EXIT_FAILURE);
779 if (issue_command (cmd, params, NULL) == -1) exit (EXIT_FAILURE);
780 cmdline (argv, optind+1, argc);
785 issue_command (const char *cmd, char *argv[], const char *pipecmd)
788 int stdout_saved_fd = -1;
794 for (i = 0; argv[i] != NULL; ++i)
795 printf (" %s", argv[i]);
799 /* For | ... commands. Annoyingly we can't use popen(3) here. */
803 if (fflush (stdout) == EOF) {
804 perror ("failed to flush standard output");
808 perror ("pipe failed");
817 if (pid == 0) { /* Child process. */
819 if (dup2 (fd[0], 0) < 0) {
820 perror ("dup2 of stdin failed");
824 r = system (pipecmd);
829 _exit (WEXITSTATUS (r));
832 if ((stdout_saved_fd = dup (1)) < 0) {
833 perror ("failed to dup stdout");
837 if (dup2 (fd[1], 1) < 0) {
838 perror ("failed to dup stdout");
839 close (stdout_saved_fd);
845 for (argc = 0; argv[argc] != NULL; ++argc)
848 /* If --remote was set, then send this command to a remote process. */
850 r = rc_remote (remote_control, cmd, argc, argv, exit_on_error);
852 /* Otherwise execute it locally. */
853 else if (STRCASEEQ (cmd, "help")) {
857 display_command (argv[0]);
860 else if (STRCASEEQ (cmd, "quit") ||
861 STRCASEEQ (cmd, "exit") ||
862 STRCASEEQ (cmd, "q")) {
866 else if (STRCASEEQ (cmd, "alloc") ||
867 STRCASEEQ (cmd, "allocate"))
868 r = do_alloc (cmd, argc, argv);
869 else if (STRCASEEQ (cmd, "echo"))
870 r = do_echo (cmd, argc, argv);
871 else if (STRCASEEQ (cmd, "edit") ||
872 STRCASEEQ (cmd, "vi") ||
873 STRCASEEQ (cmd, "emacs"))
874 r = do_edit (cmd, argc, argv);
875 else if (STRCASEEQ (cmd, "lcd"))
876 r = do_lcd (cmd, argc, argv);
877 else if (STRCASEEQ (cmd, "glob"))
878 r = do_glob (cmd, argc, argv);
879 else if (STRCASEEQ (cmd, "more") ||
880 STRCASEEQ (cmd, "less"))
881 r = do_more (cmd, argc, argv);
882 else if (STRCASEEQ (cmd, "reopen"))
883 r = do_reopen (cmd, argc, argv);
884 else if (STRCASEEQ (cmd, "sparse"))
885 r = do_sparse (cmd, argc, argv);
886 else if (STRCASEEQ (cmd, "time"))
887 r = do_time (cmd, argc, argv);
889 r = run_action (cmd, argc, argv);
891 /* Always flush stdout after every command, so that messages, results
892 * etc appear immediately.
894 if (fflush (stdout) == EOF) {
895 perror ("failed to flush standard output");
901 if (dup2 (stdout_saved_fd, 1) < 0) {
902 perror ("failed to dup2 standard output");
905 close (stdout_saved_fd);
906 if (waitpid (pid, NULL, 0) < 0) {
907 perror ("waiting for command to complete");
916 list_builtin_commands (void)
918 /* help and quit should appear at the top */
919 printf ("%-20s %s\n",
920 "help", _("display a list of commands or help on a command"));
921 printf ("%-20s %s\n",
922 "quit", _("quit guestfish"));
924 printf ("%-20s %s\n",
925 "alloc", _("allocate an image"));
926 printf ("%-20s %s\n",
927 "echo", _("display a line of text"));
928 printf ("%-20s %s\n",
929 "edit", _("edit a file in the image"));
930 printf ("%-20s %s\n",
931 "lcd", _("local change directory"));
932 printf ("%-20s %s\n",
933 "glob", _("expand wildcards in command"));
934 printf ("%-20s %s\n",
935 "more", _("view a file in the pager"));
936 printf ("%-20s %s\n",
937 "reopen", _("close and reopen libguestfs handle"));
938 printf ("%-20s %s\n",
939 "sparse", _("allocate a sparse image file"));
940 printf ("%-20s %s\n",
941 "time", _("measure time taken to run command"));
943 /* actions are printed after this (see list_commands) */
947 display_builtin_command (const char *cmd)
949 /* help for actions is auto-generated, see display_command */
951 if (STRCASEEQ (cmd, "alloc") ||
952 STRCASEEQ (cmd, "allocate"))
953 printf (_("alloc - allocate an image\n"
954 " alloc <filename> <size>\n"
956 " This creates an empty (zeroed) file of the given size,\n"
957 " and then adds so it can be further examined.\n"
959 " For more advanced image creation, see qemu-img utility.\n"
961 " Size can be specified (where <nn> means a number):\n"
962 " <nn> number of kilobytes\n"
963 " eg: 1440 standard 3.5\" floppy\n"
964 " <nn>K or <nn>KB number of kilobytes\n"
965 " <nn>M or <nn>MB number of megabytes\n"
966 " <nn>G or <nn>GB number of gigabytes\n"
967 " <nn>T or <nn>TB number of terabytes\n"
968 " <nn>P or <nn>PB number of petabytes\n"
969 " <nn>E or <nn>EB number of exabytes\n"
970 " <nn>sects number of 512 byte sectors\n"));
971 else if (STRCASEEQ (cmd, "echo"))
972 printf (_("echo - display a line of text\n"
973 " echo [<params> ...]\n"
975 " This echos the parameters to the terminal.\n"));
976 else if (STRCASEEQ (cmd, "edit") ||
977 STRCASEEQ (cmd, "vi") ||
978 STRCASEEQ (cmd, "emacs"))
979 printf (_("edit - edit a file in the image\n"
982 " This is used to edit a file.\n"
984 " It is the equivalent of (and is implemented by)\n"
985 " running \"cat\", editing locally, and then \"write-file\".\n"
987 " Normally it uses $EDITOR, but if you use the aliases\n"
988 " \"vi\" or \"emacs\" you will get those editors.\n"
990 " NOTE: This will not work reliably for large files\n"
991 " (> 2 MB) or binary files containing \\0 bytes.\n"));
992 else if (STRCASEEQ (cmd, "lcd"))
993 printf (_("lcd - local change directory\n"
996 " Change guestfish's current directory. This command is\n"
997 " useful if you want to download files to a particular\n"
999 else if (STRCASEEQ (cmd, "glob"))
1000 printf (_("glob - expand wildcards in command\n"
1001 " glob <command> [<args> ...]\n"
1003 " Glob runs <command> with wildcards expanded in any\n"
1004 " command args. Note that the command is run repeatedly\n"
1005 " once for each expanded argument.\n"));
1006 else if (STRCASEEQ (cmd, "help"))
1007 printf (_("help - display a list of commands or help on a command\n"
1010 else if (STRCASEEQ (cmd, "more") ||
1011 STRCASEEQ (cmd, "less"))
1012 printf (_("more - view a file in the pager\n"
1013 " more <filename>\n"
1015 " This is used to view a file in the pager.\n"
1017 " It is the equivalent of (and is implemented by)\n"
1018 " running \"cat\" and using the pager.\n"
1020 " Normally it uses $PAGER, but if you use the alias\n"
1021 " \"less\" then it always uses \"less\".\n"
1023 " NOTE: This will not work reliably for large files\n"
1024 " (> 2 MB) or binary files containing \\0 bytes.\n"));
1025 else if (STRCASEEQ (cmd, "quit") ||
1026 STRCASEEQ (cmd, "exit") ||
1027 STRCASEEQ (cmd, "q"))
1028 printf (_("quit - quit guestfish\n"
1030 else if (STRCASEEQ (cmd, "reopen"))
1031 printf (_("reopen - close and reopen the libguestfs handle\n"
1034 "Close and reopen the libguestfs handle. It is not necessary to use\n"
1035 "this normally, because the handle is closed properly when guestfish\n"
1036 "exits. However this is occasionally useful for testing.\n"));
1037 else if (STRCASEEQ (cmd, "sparse"))
1038 printf (_("sparse - allocate a sparse image file\n"
1039 " sparse <filename> <size>\n"
1041 " This creates an empty sparse file of the given size,\n"
1042 " and then adds so it can be further examined.\n"
1044 " In all respects it works the same as the 'alloc'\n"
1045 " command, except that the image file is allocated\n"
1046 " sparsely, which means that disk blocks are not assigned\n"
1047 " to the file until they are needed. Sparse disk files\n"
1048 " only use space when written to, but they are slower\n"
1049 " and there is a danger you could run out of real disk\n"
1050 " space during a write operation.\n"
1052 " For more advanced image creation, see qemu-img utility.\n"
1054 " Size can be specified (where <nn> means a number):\n"
1055 " <nn> number of kilobytes\n"
1056 " eg: 1440 standard 3.5\" floppy\n"
1057 " <nn>K or <nn>KB number of kilobytes\n"
1058 " <nn>M or <nn>MB number of megabytes\n"
1059 " <nn>G or <nn>GB number of gigabytes\n"
1060 " <nn>T or <nn>TB number of terabytes\n"
1061 " <nn>P or <nn>PB number of petabytes\n"
1062 " <nn>E or <nn>EB number of exabytes\n"
1063 " <nn>sects number of 512 byte sectors\n"));
1064 else if (STRCASEEQ (cmd, "time"))
1065 printf (_("time - measure time taken to run command\n"
1066 " time <command> [<args> ...]\n"
1068 " This runs <command> as usual, and prints the elapsed\n"
1069 " time afterwards.\n"));
1071 fprintf (stderr, _("%s: command not known, use -h to list all commands\n"),
1076 free_strings (char **argv)
1080 for (argc = 0; argv[argc] != NULL; ++argc)
1086 count_strings (char *const *argv)
1090 for (c = 0; argv[c]; ++c)
1096 print_strings (char *const *argv)
1100 for (argc = 0; argv[argc] != NULL; ++argc)
1101 printf ("%s\n", argv[argc]);
1105 print_table (char *const *argv)
1109 for (i = 0; argv[i] != NULL; i += 2)
1110 printf ("%s: %s\n", argv[i], argv[i+1]);
1114 is_true (const char *str)
1117 STRCASENEQ (str, "0") &&
1118 STRCASENEQ (str, "f") &&
1119 STRCASENEQ (str, "false") &&
1120 STRCASENEQ (str, "n") &&
1121 STRCASENEQ (str, "no");
1124 /* Free strings from a non-NULL terminated char** */
1126 free_n_strings (char **str, size_t len)
1130 for (i = 0; i < len; i++) {
1137 parse_string_list (const char *str)
1140 size_t argv_len = 0;
1142 /* Current position pointer */
1143 const char *p = str;
1145 /* Token might be simple:
1148 * 'This is a single token'
1149 * or contain embedded single-quoted sections:
1150 * This' is a sing'l'e to'ken
1152 * The latter may seem over-complicated, but it's what a normal shell does.
1153 * Not doing it risks surprising somebody.
1155 * This outer loop is over complete tokens.
1161 /* Skip leading whitespace */
1162 p += strspn (p, " \t");
1166 /* This loop is over token 'fragments'. A token can be in multiple bits if
1167 * it contains single quotes. We also treat both sides of an escaped quote
1168 * as separate fragments because we can't just copy it: we have to remove
1171 while (*p && (!c_isblank (*p) || in_quote)) {
1172 const char *end = p;
1174 /* Check if the fragment starts with a quote */
1176 /* Toggle in_quote */
1177 in_quote = !in_quote;
1179 /* Skip the quote */
1183 /* If we're in a quote, look for an end quote */
1185 end += strcspn (end, "'");
1188 /* Otherwise, look for whitespace or a quote */
1190 end += strcspn (end, " \t'");
1193 /* Grow the token to accommodate the fragment */
1194 size_t tok_end = tok_len;
1196 char *tok_new = realloc (tok, tok_len + 1);
1197 if (NULL == tok_new) {
1199 free_n_strings (argv, argv_len);
1201 exit (EXIT_FAILURE);
1205 /* Check if we stopped on an escaped quote */
1206 if ('\'' == *end && end != p && *(end-1) == '\\') {
1207 /* Add everything before \' to the token */
1208 memcpy (&tok[tok_end], p, end - p - 1);
1211 tok[tok_len-1] = '\'';
1213 /* Already processed the quote */
1218 /* Add the whole fragment */
1219 memcpy (&tok[tok_end], p, end - p);
1225 /* We've reached the end of a token. We shouldn't still be in quotes. */
1227 fprintf (stderr, _("Runaway quote in string \"%s\"\n"), str);
1229 free_n_strings (argv, argv_len);
1234 /* Add this token if there is one. There might not be if there was
1235 * whitespace at the end of the input string */
1237 /* Add the NULL terminator */
1238 tok[tok_len] = '\0';
1240 /* Add the argument to the argument list */
1242 char **argv_new = realloc (argv, sizeof (*argv) * argv_len);
1243 if (NULL == argv_new) {
1245 free_n_strings (argv, argv_len-1);
1247 exit (EXIT_FAILURE);
1251 argv[argv_len-1] = tok;
1255 /* NULL terminate the argument list */
1257 char **argv_new = realloc (argv, sizeof (*argv) * argv_len);
1258 if (NULL == argv_new) {
1260 free_n_strings (argv, argv_len-1);
1261 exit (EXIT_FAILURE);
1265 argv[argv_len-1] = NULL;
1270 #ifdef HAVE_LIBREADLINE
1271 static char histfile[1024];
1272 static int nr_history_lines = 0;
1276 initialize_readline (void)
1278 #ifdef HAVE_LIBREADLINE
1281 home = getenv ("HOME");
1283 snprintf (histfile, sizeof histfile, "%s/.guestfish", home);
1285 (void) read_history (histfile);
1288 rl_readline_name = "guestfish";
1289 rl_attempted_completion_function = do_completion;
1294 cleanup_readline (void)
1296 #ifdef HAVE_LIBREADLINE
1299 if (histfile[0] != '\0') {
1300 fd = open (histfile, O_WRONLY|O_CREAT, 0644);
1307 (void) append_history (nr_history_lines, histfile);
1313 add_history_line (const char *line)
1315 #ifdef HAVE_LIBREADLINE
1322 xwrite (int fd, const void *v_buf, size_t len)
1325 const char *buf = v_buf;
1328 r = write (fd, buf, len);
1340 /* Resolve the special "win:..." form for Windows-specific paths.
1341 * This always returns a newly allocated string which is freed by the
1342 * caller function in "cmds.c".
1345 resolve_win_path (const char *path)
1350 if (STRCASENEQLEN (path, "win:", 4)) {
1351 ret = strdup (path);
1359 /* Drop drive letter, if it's "C:". */
1360 if (STRCASEEQLEN (path, "c:", 2))
1370 ret = strdup (path);
1376 /* Blindly convert any backslashes into forward slashes. Is this good? */
1377 for (i = 0; i < strlen (ret); ++i)
1381 char *t = guestfs_case_sensitive_path (g, ret);