Archipelago » qemu

    drv = bdrv_find_format(fmt);

    if (!drv) {

        error_report("Unknown file format '%s'", fmt);

        goto out;

    }

    proto_drv = bdrv_find_protocol(filename);

    if (!proto_drv) {

        error_report("Unknown protocol '%s'", filename);

        goto out;

    }

        param = parse_option_parameters(options, create_options, param);

        if (param == NULL) {

            error_report("Invalid options for file format '%s'.", fmt);

            goto out;

        }

    }

                                 base_filename)) {

            error_report("Backing file not supported for file format '%s'",

                         fmt);

            goto out;

        }

    }

        if (set_option_parameter(param, BLOCK_OPT_BACKING_FMT, base_fmt)) {

            error_report("Backing file format not supported for file "

                         "format '%s'", fmt);

            goto out;

        }

    }

        if (!strcmp(filename, backing_file->value.s)) {

            error_report("Error: Trying to create an image with the "

                         "same filename as the backing file");

            goto out;

        }

    }

        if (!bdrv_find_format(backing_fmt->value.s)) {

            error_report("Unknown backing file format '%s'",

                         backing_fmt->value.s);

            goto out;

        }

    }

            ret = bdrv_open(bs, backing_file->value.s, flags, drv);

            if (ret < 0) {

                error_report("Could not open '%s'", filename);

                goto out;

            }

            bdrv_get_geometry(bs, &size);

            set_option_parameter(param, BLOCK_OPT_SIZE, buf);

        } else {

            error_report("Image creation needs a size parameter");

            goto out;

        }

    }

    if (bs) {

        bdrv_delete(bs);

    }

}