1 /* libguestfs - the guestfsd daemon
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.
26 #include "../src/guestfs_protocol.h"
31 fwrite_cb (void *fp_ptr, const void *buf, int len)
33 FILE *fp = *(FILE **)fp_ptr;
34 return fwrite (buf, len, 1, fp) == 1 ? 0 : -1;
37 /* Has one FileIn parameter. */
39 do_tar_in (const char *dir)
45 if (!root_mounted || dir[0] != '/') {
47 reply_with_error ("root must be mounted and path must be absolute");
51 /* "tar -C /sysroot%s -xf -" but we have to quote the dir. */
52 if (asprintf_nowarn (&cmd, "tar -C %R -xf -", dir) == -1) {
56 reply_with_perror ("asprintf");
61 fprintf (stderr, "%s\n", cmd);
63 fp = popen (cmd, "w");
68 reply_with_perror ("%s", cmd);
74 r = receive_file (fwrite_cb, &fp);
75 if (r == -1) { /* write error */
79 reply_with_perror ("write: %s", dir);
83 if (r == -2) { /* cancellation from library */
85 /* Do NOT send any error. */
89 if (pclose (fp) != 0) {
91 if (r == -1) /* if r == 0, file transfer ended already */
94 reply_with_perror ("pclose: %s", dir);
101 /* Has one FileOut parameter. */
103 do_tar_out (const char *dir)
108 char buf[GUESTFS_MAX_CHUNK_SIZE];
110 /* "tar -C /sysroot%s -cf - ." but we have to quote the dir. */
111 if (asprintf_nowarn (&cmd, "tar -C %R -cf - .", dir) == -1) {
112 reply_with_perror ("asprintf");
117 fprintf (stderr, "%s\n", cmd);
119 fp = popen (cmd, "r");
121 reply_with_perror ("%s", cmd);
127 /* Now we must send the reply message, before the file contents. After
128 * this there is no opportunity in the protocol to send any error
129 * message back. Instead we can only cancel the transfer.
133 while ((r = fread (buf, 1, sizeof buf, fp)) > 0) {
134 if (send_file_write (buf, r) < 0) {
142 send_file_end (1); /* Cancel. */
147 if (pclose (fp) != 0) {
149 send_file_end (1); /* Cancel. */
153 if (send_file_end (0)) /* Normal end of file. */
159 /* Has one FileIn parameter. */
161 do_tgz_in (const char *dir)
167 if (!root_mounted || dir[0] != '/') {
169 reply_with_error ("root must be mounted and path must be absolute");
173 /* "tar -C /sysroot%s -zxf -" but we have to quote the dir. */
174 if (asprintf_nowarn (&cmd, "tar -C %R -zxf -", dir) == -1) {
178 reply_with_perror ("asprintf");
183 fprintf (stderr, "%s\n", cmd);
185 fp = popen (cmd, "w");
190 reply_with_perror ("%s", cmd);
196 r = receive_file (fwrite_cb, &fp);
197 if (r == -1) { /* write error */
201 reply_with_perror ("write: %s", dir);
205 if (r == -2) { /* cancellation from library */
207 /* Do NOT send any error. */
211 if (pclose (fp) != 0) {
213 if (r == -1) /* if r == 0, file transfer ended already */
216 reply_with_perror ("pclose: %s", dir);
223 /* Has one FileOut parameter. */
225 do_tgz_out (const char *dir)
230 char buf[GUESTFS_MAX_CHUNK_SIZE];
232 /* "tar -C /sysroot%s -zcf - ." but we have to quote the dir. */
233 if (asprintf_nowarn (&cmd, "tar -C %R -zcf - .", dir) == -1) {
234 reply_with_perror ("asprintf");
239 fprintf (stderr, "%s\n", cmd);
241 fp = popen (cmd, "r");
243 reply_with_perror ("%s", cmd);
249 /* Now we must send the reply message, before the file contents. After
250 * this there is no opportunity in the protocol to send any error
251 * message back. Instead we can only cancel the transfer.
255 while ((r = fread (buf, 1, sizeof buf, fp)) > 0) {
256 if (send_file_write (buf, r) < 0) {
264 send_file_end (1); /* Cancel. */
269 if (pclose (fp) != 0) {
271 send_file_end (1); /* Cancel. */
275 if (send_file_end (0)) /* Normal end of file. */