/**
* Test C<guestfs_int_join_strings>.
*/
static void
test_join (void)
{
char *ret;
const char *test1[] = { NULL };
const char *test2[] = { "", NULL };
const char *test3[] = { "a", NULL };
const char *test4[] = { "a", "", NULL };
const char *test5[] = { "a", "b", NULL };
ret = guestfs_int_join_strings (":!", (char **) test1);
assert (STREQ (ret, ""));
free (ret);
ret = guestfs_int_join_strings (":!", (char **) test2);
assert (STREQ (ret, ""));
free (ret);
ret = guestfs_int_join_strings (":!", (char **) test3);
assert (STREQ (ret, "a"));
free (ret);
ret = guestfs_int_join_strings (":!", (char **) test4);
assert (STREQ (ret, "a:!"));
free (ret);
ret = guestfs_int_join_strings (":!", (char **) test5);
assert (STREQ (ret, "a:!b"));
free (ret);
}
static void
write_row (const char *name, const char *type,
const char *vfs_type, const char *vfs_label, int mbr_id,
int64_t size, char **parents, const char *uuid)
{
const char *strings[NR_COLUMNS];
CLEANUP_FREE char *parents_str = NULL;
size_t len = 0;
char hum[LONGEST_HUMAN_READABLE];
char num[256];
char mbr_id_str[3];
if ((columns & COLUMN_NAME))
strings[len++] = name;
if ((columns & COLUMN_TYPE))
strings[len++] = type;
if ((columns & COLUMN_VFS_TYPE))
strings[len++] = vfs_type;
if ((columns & COLUMN_VFS_LABEL))
strings[len++] = vfs_label;
if ((columns & COLUMN_MBR)) {
if (mbr_id >= 0) {
snprintf (mbr_id_str, sizeof mbr_id_str, "%02x", (unsigned) mbr_id);
strings[len++] = mbr_id_str;
} else
strings[len++] = NULL;
}
if ((columns & COLUMN_SIZE)) {
if (size >= 0) {
if (human) {
strings[len++] =
human_readable ((uintmax_t) size, hum,
human_round_to_nearest|human_autoscale|
human_base_1024|human_SI,
1, 1);
}
else {
snprintf (num, sizeof num, "%" PRIi64, size);
strings[len++] = num;
}
}
else
strings[len++] = NULL;
}
if ((columns & COLUMN_PARENTS)) {
/* Internally comma-separated field. */
parents_str = guestfs_int_join_strings (",", parents);
strings[len++] = parents_str;
}
if ((columns & COLUMN_UUID))
strings[len++] = uuid;
assert (len <= NR_COLUMNS);
write_row_strings ((char **) strings, len);
}
/**
* Construct the Linux command line passed to the appliance. This is
* used by the C<direct> and C<libvirt> backends, and is simply
* located in this file because it's a convenient place for this
* common code.
*
* The C<appliance_dev> parameter must be the full device name of the
* appliance disk and must have already been adjusted to take into
* account virtio-blk or virtio-scsi; eg C</dev/sdb>.
*
* The C<flags> parameter can contain the following flags logically
* or'd together (or 0):
*
* =over 4
*
* =item C<APPLIANCE_COMMAND_LINE_IS_TCG>
*
* If we are launching a qemu TCG guest (ie. KVM is known to be
* disabled or unavailable). If you don't know, don't pass this flag.
*
* =back
*
* Note that this function returns a newly allocated buffer which must
* be freed by the caller.
*/
char *
guestfs_int_appliance_command_line (guestfs_h *g, const char *appliance_dev,
int flags)
{
CLEANUP_FREE_STRINGSBUF DECLARE_STRINGSBUF (argv);
char *term = getenv ("TERM");
bool tcg = flags & APPLIANCE_COMMAND_LINE_IS_TCG;
char *ret;
/* We assemble the kernel command line by simply joining the final
* list of strings with spaces. This means (a) the strings are not
* quoted (it's not clear if the kernel can handle quoting in any
* case), and (b) we can append multiple parameters in a single
* argument, as we must do for the g->append parameter.
*/
/* Force kernel to panic if daemon exits. */
guestfs_int_add_string (g, &argv, "panic=1");
#ifdef __arm__
guestfs_int_add_sprintf (g, &argv, "mem=%dM", g->memsize);
#endif
#ifdef __i386__
/* Workaround for RHBZ#857026. */
guestfs_int_add_string (g, &argv, "noapic");
#endif
/* Serial console. */
guestfs_int_add_string (g, &argv, SERIAL_CONSOLE);
#ifdef EARLYPRINTK
/* Get messages from early boot. */
guestfs_int_add_string (g, &argv, EARLYPRINTK);
#endif
#ifdef __aarch64__
guestfs_int_add_string (g, &argv, "ignore_loglevel");
/* This option turns off the EFI RTC device. QEMU VMs don't
* currently provide EFI, and if the device is compiled in it
* will try to call the EFI function GetTime unconditionally
* (causing a call to NULL). However this option requires a
* non-upstream patch.
*/
guestfs_int_add_string (g, &argv, "efi-rtc=noprobe");
#endif
/* RHBZ#1404287 */
guestfs_int_add_string (g, &argv, "edd=off");
/* For slow systems (RHBZ#480319, RHBZ#1096579). */
guestfs_int_add_string (g, &argv, "udevtimeout=6000");
/* Same as above, for newer udevd. */
guestfs_int_add_string (g, &argv, "udev.event-timeout=6000");
/* Fix for RHBZ#502058. */
guestfs_int_add_string (g, &argv, "no_timer_check");
if (tcg) {
const int lpj = guestfs_int_get_lpj (g);
if (lpj > 0)
guestfs_int_add_sprintf (g, &argv, "lpj=%d", lpj);
}
/* Display timestamp before kernel messages. */
guestfs_int_add_string (g, &argv, "printk.time=1");
/* Saves us about 5 MB of RAM. */
guestfs_int_add_string (g, &argv, "cgroup_disable=memory");
/* Disable USB, only saves about 1ms. */
guestfs_int_add_string (g, &argv, "usbcore.nousb");
/* Disable crypto tests, saves 28ms. */
guestfs_int_add_string (g, &argv, "cryptomgr.notests");
/* Don't synch TSCs when using SMP. Saves 21ms for each secondary vCPU. */
guestfs_int_add_string (g, &argv, "tsc=reliable");
/* Don't scan all 8250 UARTS. */
guestfs_int_add_string (g, &argv, "8250.nr_uarts=1");
/* Tell supermin about the appliance device. */
if (appliance_dev)
guestfs_int_add_sprintf (g, &argv, "root=%s", appliance_dev);
/* SELinux - deprecated setting, never worked and should not be enabled. */
if (g->selinux)
guestfs_int_add_string (g, &argv, "selinux=1 enforcing=0");
else
guestfs_int_add_string (g, &argv, "selinux=0");
/* Quiet/verbose. */
if (g->verbose)
guestfs_int_add_string (g, &argv, "guestfs_verbose=1");
else
guestfs_int_add_string (g, &argv, "quiet");
/* Network. */
if (g->enable_network)
guestfs_int_add_string (g, &argv, "guestfs_network=1");
/* TERM environment variable. */
if (term && valid_term (term))
guestfs_int_add_sprintf (g, &argv, "TERM=%s", term);
else
guestfs_int_add_string (g, &argv, "TERM=linux");
/* Handle identifier. */
if (STRNEQ (g->identifier, ""))
guestfs_int_add_sprintf (g, &argv, "guestfs_identifier=%s", g->identifier);
/* Append extra arguments. */
if (g->append)
guestfs_int_add_string (g, &argv, g->append);
guestfs_int_end_stringsbuf (g, &argv);
/* Caller frees. */
ret = guestfs_int_join_strings (" ", argv.argv);
if (ret == NULL)
g->abort_cb ();
return ret;
}
/* Note that near-identical functions exist in the daemon. */
char *
guestfs_int_concat_strings (char *const *argv)
{
return guestfs_int_join_strings ("", argv);
}
static int
disk_create_qcow2 (guestfs_h *g, const char *orig_filename, int64_t size,
const char *backingfile,
const struct guestfs_disk_create_argv *optargs)
{
CLEANUP_FREE char *filename = NULL;
const char *backingformat = NULL;
const char *preallocation = NULL;
const char *compat = NULL;
int clustersize = -1;
CLEANUP_FREE_STRINGSBUF DECLARE_STRINGSBUF (optionsv);
CLEANUP_CMD_CLOSE struct command *cmd = guestfs_int_new_command (g);
int r;
/* If the filename is something like "file:foo" then qemu-img will
* try to interpret that as "foo" in the file:/// protocol. To
* avoid that, if the path is relative prefix it with "./" since
* qemu-img won't try to interpret such a path.
*/
if (orig_filename[0] != '/')
filename = safe_asprintf (g, "./%s", orig_filename);
else
filename = safe_strdup (g, orig_filename);
if (optargs->bitmask & GUESTFS_DISK_CREATE_BACKINGFORMAT_BITMASK) {
backingformat = optargs->backingformat;
/* Conservative whitelist. This can be extended with other
* valid formats as required.
*/
if (STRNEQ (backingformat, "raw") &&
STRNEQ (backingformat, "qcow2") &&
STRNEQ (backingformat, "vmdk")) {
error (g, _("invalid value for backingformat parameter '%s'"),
backingformat);
return -1;
}
}
if (optargs->bitmask & GUESTFS_DISK_CREATE_PREALLOCATION_BITMASK) {
if (STREQ (optargs->preallocation, "off") ||
STREQ (optargs->preallocation, "sparse"))
preallocation = "off";
else if (STREQ (optargs->preallocation, "metadata"))
preallocation = "metadata";
else if (STREQ (optargs->preallocation, "full"))
/* Ugh: https://lists.gnu.org/archive/html/qemu-devel/2014-08/msg03863.html */
preallocation = "falloc";
else {
error (g, _("invalid value for preallocation parameter '%s'"),
preallocation);
return -1;
}
}
if (optargs->bitmask & GUESTFS_DISK_CREATE_COMPAT_BITMASK) {
compat = optargs->compat;
if (STRNEQ (compat, "0.10") && STRNEQ (compat, "1.1")) {
error (g, _("invalid value for compat parameter '%s'"), compat);
return -1;
}
}
if (optargs->bitmask & GUESTFS_DISK_CREATE_CLUSTERSIZE_BITMASK) {
clustersize = optargs->clustersize;
if (clustersize < 512 || clustersize > 2097152 ||
!is_power_of_2 ((unsigned) clustersize)) {
error (g, _("invalid value for clustersize parameter '%d'"),
clustersize);
return -1;
}
}
/* Assemble the qemu-img command line. */
guestfs_int_cmd_add_arg (cmd, "qemu-img");
guestfs_int_cmd_add_arg (cmd, "create");
guestfs_int_cmd_add_arg (cmd, "-f");
guestfs_int_cmd_add_arg (cmd, "qcow2");
/* -o parameter. */
if (backingfile) {
CLEANUP_FREE char *p = qemu_escape_param (g, backingfile);
guestfs_int_add_sprintf (g, &optionsv, "backing_file=%s", p);
}
if (backingformat)
guestfs_int_add_sprintf (g, &optionsv, "backing_fmt=%s", backingformat);
if (preallocation)
guestfs_int_add_sprintf (g, &optionsv, "preallocation=%s", preallocation);
if (compat)
guestfs_int_add_sprintf (g, &optionsv, "compat=%s", compat);
if (clustersize >= 0)
guestfs_int_add_sprintf (g, &optionsv, "cluster_size=%d", clustersize);
guestfs_int_end_stringsbuf (g, &optionsv);
if (optionsv.size > 1) {
CLEANUP_FREE char *options = guestfs_int_join_strings (",", optionsv.argv);
guestfs_int_cmd_add_arg (cmd, "-o");
guestfs_int_cmd_add_arg (cmd, options);
}
/* Complete the command line. */
guestfs_int_cmd_add_arg (cmd, filename);
if (size >= 0)
guestfs_int_cmd_add_arg_format (cmd, "%" PRIi64, size);
r = guestfs_int_cmd_run (cmd);
if (!WIFEXITED (r) || WEXITSTATUS (r) != 0) {
guestfs_int_external_command_failed (g, r, "qemu-img", orig_filename);
return -1;
}
return 0;
}
