Diff for /qemu/block.c between versions 1.1 and 1.1.1.17

version 1.1, 2018/04/24 16:37:52 version 1.1.1.17, 2018/04/24 18:16:35
Line 1 Line 1
 /*  /*
  * QEMU System Emulator block driver   * QEMU System Emulator block driver
  *    *
  * Copyright (c) 2003 Fabrice Bellard   * Copyright (c) 2003 Fabrice Bellard
  *    *
  * Permission is hereby granted, free of charge, to any person obtaining a copy   * Permission is hereby granted, free of charge, to any person obtaining a copy
  * of this software and associated documentation files (the "Software"), to deal   * of this software and associated documentation files (the "Software"), to deal
  * in the Software without restriction, including without limitation the rights   * in the Software without restriction, including without limitation the rights
Line 21 Line 21
  * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN   * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN
  * THE SOFTWARE.   * THE SOFTWARE.
  */   */
 #include "vl.h"  #include "config-host.h"
   #include "qemu-common.h"
   #include "monitor.h"
 #include "block_int.h"  #include "block_int.h"
   #include "module.h"
   #include "qemu-objects.h"
   
 #ifdef _BSD  #ifdef CONFIG_BSD
 #include <sys/types.h>  #include <sys/types.h>
 #include <sys/stat.h>  #include <sys/stat.h>
 #include <sys/ioctl.h>  #include <sys/ioctl.h>
 #include <sys/queue.h>  #include <sys/queue.h>
   #ifndef __DragonFly__
 #include <sys/disk.h>  #include <sys/disk.h>
 #endif  #endif
   #endif
   
   #ifdef _WIN32
   #include <windows.h>
   #endif
   
   static BlockDriverAIOCB *bdrv_aio_readv_em(BlockDriverState *bs,
           int64_t sector_num, QEMUIOVector *qiov, int nb_sectors,
           BlockDriverCompletionFunc *cb, void *opaque);
   static BlockDriverAIOCB *bdrv_aio_writev_em(BlockDriverState *bs,
           int64_t sector_num, QEMUIOVector *qiov, int nb_sectors,
           BlockDriverCompletionFunc *cb, void *opaque);
   static BlockDriverAIOCB *bdrv_aio_flush_em(BlockDriverState *bs,
           BlockDriverCompletionFunc *cb, void *opaque);
   static int bdrv_read_em(BlockDriverState *bs, int64_t sector_num,
                           uint8_t *buf, int nb_sectors);
   static int bdrv_write_em(BlockDriverState *bs, int64_t sector_num,
                            const uint8_t *buf, int nb_sectors);
   
   BlockDriverState *bdrv_first;
   
 static BlockDriverState *bdrv_first;  
 static BlockDriver *first_drv;  static BlockDriver *first_drv;
   
   /* If non-zero, use only whitelisted block drivers */
   static int use_bdrv_whitelist;
   
   int path_is_absolute(const char *path)
   {
       const char *p;
   #ifdef _WIN32
       /* specific case for names like: "\\.\d:" */
       if (*path == '/' || *path == '\\')
           return 1;
   #endif
       p = strchr(path, ':');
       if (p)
           p++;
       else
           p = path;
   #ifdef _WIN32
       return (*p == '/' || *p == '\\');
   #else
       return (*p == '/');
   #endif
   }
   
   /* if filename is absolute, just copy it to dest. Otherwise, build a
      path to it by considering it is relative to base_path. URL are
      supported. */
   void path_combine(char *dest, int dest_size,
                     const char *base_path,
                     const char *filename)
   {
       const char *p, *p1;
       int len;
   
       if (dest_size <= 0)
           return;
       if (path_is_absolute(filename)) {
           pstrcpy(dest, dest_size, filename);
       } else {
           p = strchr(base_path, ':');
           if (p)
               p++;
           else
               p = base_path;
           p1 = strrchr(base_path, '/');
   #ifdef _WIN32
           {
               const char *p2;
               p2 = strrchr(base_path, '\\');
               if (!p1 || p2 > p1)
                   p1 = p2;
           }
   #endif
           if (p1)
               p1++;
           else
               p1 = base_path;
           if (p1 > p)
               p = p1;
           len = p - base_path;
           if (len > dest_size - 1)
               len = dest_size - 1;
           memcpy(dest, base_path, len);
           dest[len] = '\0';
           pstrcat(dest, dest_size, filename);
       }
   }
   
 void bdrv_register(BlockDriver *bdrv)  void bdrv_register(BlockDriver *bdrv)
 {  {
       if (!bdrv->bdrv_aio_readv) {
           /* add AIO emulation layer */
           bdrv->bdrv_aio_readv = bdrv_aio_readv_em;
           bdrv->bdrv_aio_writev = bdrv_aio_writev_em;
       } else if (!bdrv->bdrv_read) {
           /* add synchronous IO emulation layer */
           bdrv->bdrv_read = bdrv_read_em;
           bdrv->bdrv_write = bdrv_write_em;
       }
   
       if (!bdrv->bdrv_aio_flush)
           bdrv->bdrv_aio_flush = bdrv_aio_flush_em;
   
     bdrv->next = first_drv;      bdrv->next = first_drv;
     first_drv = bdrv;      first_drv = bdrv;
 }  }
Line 47  BlockDriverState *bdrv_new(const char *d Line 151  BlockDriverState *bdrv_new(const char *d
     BlockDriverState **pbs, *bs;      BlockDriverState **pbs, *bs;
   
     bs = qemu_mallocz(sizeof(BlockDriverState));      bs = qemu_mallocz(sizeof(BlockDriverState));
     if(!bs)  
         return NULL;  
     pstrcpy(bs->device_name, sizeof(bs->device_name), device_name);      pstrcpy(bs->device_name, sizeof(bs->device_name), device_name);
     if (device_name[0] != '\0') {      if (device_name[0] != '\0') {
         /* insert at the end */          /* insert at the end */
Line 70  BlockDriver *bdrv_find_format(const char Line 172  BlockDriver *bdrv_find_format(const char
     return NULL;      return NULL;
 }  }
   
 int bdrv_create(BlockDriver *drv,   static int bdrv_is_whitelisted(BlockDriver *drv)
                 const char *filename, int64_t size_in_sectors,  {
                 const char *backing_file, int flags)      static const char *whitelist[] = {
           CONFIG_BDRV_WHITELIST
       };
       const char **p;
   
       if (!whitelist[0])
           return 1;               /* no whitelist, anything goes */
   
       for (p = whitelist; *p; p++) {
           if (!strcmp(drv->format_name, *p)) {
               return 1;
           }
       }
       return 0;
   }
   
   BlockDriver *bdrv_find_whitelisted_format(const char *format_name)
   {
       BlockDriver *drv = bdrv_find_format(format_name);
       return drv && bdrv_is_whitelisted(drv) ? drv : NULL;
   }
   
   int bdrv_create(BlockDriver *drv, const char* filename,
       QEMUOptionParameter *options)
 {  {
     if (!drv->bdrv_create)      if (!drv->bdrv_create)
         return -ENOTSUP;          return -ENOTSUP;
     return drv->bdrv_create(filename, size_in_sectors, backing_file, flags);  
       return drv->bdrv_create(filename, options);
 }  }
   
 #ifdef _WIN32  #ifdef _WIN32
 static void get_tmp_filename(char *filename, int size)  void get_tmp_filename(char *filename, int size)
 {  {
     /* XXX: find a better function */      char temp_dir[MAX_PATH];
     tmpnam(filename);  
       GetTempPath(MAX_PATH, temp_dir);
       GetTempFileName(temp_dir, "qem", 0, filename);
 }  }
 #else  #else
 static void get_tmp_filename(char *filename, int size)  void get_tmp_filename(char *filename, int size)
 {  {
     int fd;      int fd;
       const char *tmpdir;
     /* XXX: race condition possible */      /* XXX: race condition possible */
     pstrcpy(filename, size, "/tmp/vl.XXXXXX");      tmpdir = getenv("TMPDIR");
       if (!tmpdir)
           tmpdir = "/tmp";
       snprintf(filename, size, "%s/vl.XXXXXX", tmpdir);
     fd = mkstemp(filename);      fd = mkstemp(filename);
     close(fd);      close(fd);
 }  }
 #endif  #endif
   
 /* XXX: force raw format if block or character device ? It would  #ifdef _WIN32
    simplify the BSD case */  static int is_windows_drive_prefix(const char *filename)
 static BlockDriver *find_image_format(const char *filename)  
 {  {
     int fd, ret, score, score_max;      return (((filename[0] >= 'a' && filename[0] <= 'z') ||
     BlockDriver *drv1, *drv;               (filename[0] >= 'A' && filename[0] <= 'Z')) &&
     uint8_t *buf;              filename[1] == ':');
     size_t bufsize = 1024;  }
   
     fd = open(filename, O_RDONLY | O_BINARY | O_LARGEFILE);  int is_windows_drive(const char *filename)
     if (fd < 0) {  {
         buf = NULL;      if (is_windows_drive_prefix(filename) &&
         ret = 0;          filename[2] == '\0')
     } else {          return 1;
 #ifdef DIOCGSECTORSIZE      if (strstart(filename, "\\\\.\\", NULL) ||
         {          strstart(filename, "//./", NULL))
             unsigned int sectorsize = 512;          return 1;
             if (!ioctl(fd, DIOCGSECTORSIZE, &sectorsize) &&      return 0;
                 sectorsize > bufsize)  }
                 bufsize = sectorsize;  
         }  
 #endif  #endif
         buf = qemu_malloc(bufsize);  
         if (!buf)  static BlockDriver *find_protocol(const char *filename)
             return NULL;  {
         ret = read(fd, buf, bufsize);      BlockDriver *drv1;
         if (ret < 0) {      char protocol[128];
             close(fd);      int len;
             qemu_free(buf);      const char *p;
             return NULL;  
   #ifdef _WIN32
       if (is_windows_drive(filename) ||
           is_windows_drive_prefix(filename))
           return bdrv_find_format("raw");
   #endif
       p = strchr(filename, ':');
       if (!p)
           return bdrv_find_format("raw");
       len = p - filename;
       if (len > sizeof(protocol) - 1)
           len = sizeof(protocol) - 1;
       memcpy(protocol, filename, len);
       protocol[len] = '\0';
       for(drv1 = first_drv; drv1 != NULL; drv1 = drv1->next) {
           if (drv1->protocol_name &&
               !strcmp(drv1->protocol_name, protocol))
               return drv1;
       }
       return NULL;
   }
   
   /*
    * Detect host devices. By convention, /dev/cdrom[N] is always
    * recognized as a host CDROM.
    */
   static BlockDriver *find_hdev_driver(const char *filename)
   {
       int score_max = 0, score;
       BlockDriver *drv = NULL, *d;
   
       for (d = first_drv; d; d = d->next) {
           if (d->bdrv_probe_device) {
               score = d->bdrv_probe_device(filename);
               if (score > score_max) {
                   score_max = score;
                   drv = d;
               }
         }          }
         close(fd);  
     }      }
       
     drv = NULL;      return drv;
   }
   
   static BlockDriver *find_image_format(const char *filename)
   {
       int ret, score, score_max;
       BlockDriver *drv1, *drv;
       uint8_t buf[2048];
       BlockDriverState *bs;
   
       drv = find_protocol(filename);
       /* no need to test disk image formats for vvfat */
       if (drv && strcmp(drv->format_name, "vvfat") == 0)
           return drv;
   
       ret = bdrv_file_open(&bs, filename, BDRV_O_RDONLY);
       if (ret < 0)
           return NULL;
       ret = bdrv_pread(bs, 0, buf, sizeof(buf));
       bdrv_delete(bs);
       if (ret < 0) {
           return NULL;
       }
   
     score_max = 0;      score_max = 0;
     for(drv1 = first_drv; drv1 != NULL; drv1 = drv1->next) {      for(drv1 = first_drv; drv1 != NULL; drv1 = drv1->next) {
         score = drv1->bdrv_probe(buf, ret, filename);          if (drv1->bdrv_probe) {
         if (score > score_max) {              score = drv1->bdrv_probe(buf, ret, filename);
             score_max = score;              if (score > score_max) {
             drv = drv1;                  score_max = score;
                   drv = drv1;
               }
         }          }
     }      }
     qemu_free(buf);  
     return drv;      return drv;
 }  }
   
 int bdrv_open(BlockDriverState *bs, const char *filename, int snapshot)  int bdrv_file_open(BlockDriverState **pbs, const char *filename, int flags)
   {
       BlockDriverState *bs;
       int ret;
   
       bs = bdrv_new("");
       ret = bdrv_open2(bs, filename, flags | BDRV_O_FILE, NULL);
       if (ret < 0) {
           bdrv_delete(bs);
           return ret;
       }
       bs->growable = 1;
       *pbs = bs;
       return 0;
   }
   
   int bdrv_open(BlockDriverState *bs, const char *filename, int flags)
 {  {
     return bdrv_open2(bs, filename, snapshot, NULL);      return bdrv_open2(bs, filename, flags, NULL);
 }  }
   
 int bdrv_open2(BlockDriverState *bs, const char *filename, int snapshot,  int bdrv_open2(BlockDriverState *bs, const char *filename, int flags,
                BlockDriver *drv)                 BlockDriver *drv)
 {  {
     int ret;      int ret, open_flags, try_rw;
     char tmp_filename[1024];      char tmp_filename[PATH_MAX];
           char backing_filename[PATH_MAX];
     bs->read_only = 0;  
     bs->is_temporary = 0;      bs->is_temporary = 0;
     bs->encrypted = 0;      bs->encrypted = 0;
       bs->valid_key = 0;
       /* buffer_alignment defaulted to 512, drivers can change this value */
       bs->buffer_alignment = 512;
   
     if (snapshot) {      if (flags & BDRV_O_SNAPSHOT) {
         BlockDriverState *bs1;          BlockDriverState *bs1;
         int64_t total_size;          int64_t total_size;
                   int is_protocol = 0;
           BlockDriver *bdrv_qcow2;
           QEMUOptionParameter *options;
   
         /* if snapshot, we create a temporary backing file and open it          /* if snapshot, we create a temporary backing file and open it
            instead of opening 'filename' directly */             instead of opening 'filename' directly */
   
         /* if there is a backing file, use it */          /* if there is a backing file, use it */
         bs1 = bdrv_new("");          bs1 = bdrv_new("");
         if (!bs1) {          ret = bdrv_open2(bs1, filename, 0, drv);
             return -1;          if (ret < 0) {
         }  
         if (bdrv_open(bs1, filename, 0) < 0) {  
             bdrv_delete(bs1);              bdrv_delete(bs1);
             return -1;              return ret;
         }          }
         total_size = bs1->total_sectors;          total_size = bdrv_getlength(bs1) >> BDRV_SECTOR_BITS;
   
           if (bs1->drv && bs1->drv->protocol_name)
               is_protocol = 1;
   
         bdrv_delete(bs1);          bdrv_delete(bs1);
           
         get_tmp_filename(tmp_filename, sizeof(tmp_filename));          get_tmp_filename(tmp_filename, sizeof(tmp_filename));
         /* XXX: use cow for linux as it is more efficient ? */  
         if (bdrv_create(&bdrv_qcow, tmp_filename,           /* Real path is meaningless for protocols */
                         total_size, filename, 0) < 0) {          if (is_protocol)
             return -1;              snprintf(backing_filename, sizeof(backing_filename),
                        "%s", filename);
           else
               realpath(filename, backing_filename);
   
           bdrv_qcow2 = bdrv_find_format("qcow2");
           options = parse_option_parameters("", bdrv_qcow2->create_options, NULL);
   
           set_option_parameter_int(options, BLOCK_OPT_SIZE, total_size * 512);
           set_option_parameter(options, BLOCK_OPT_BACKING_FILE, backing_filename);
           if (drv) {
               set_option_parameter(options, BLOCK_OPT_BACKING_FMT,
                   drv->format_name);
           }
   
           ret = bdrv_create(bdrv_qcow2, tmp_filename, options);
           if (ret < 0) {
               return ret;
         }          }
   
         filename = tmp_filename;          filename = tmp_filename;
           drv = bdrv_qcow2;
         bs->is_temporary = 1;          bs->is_temporary = 1;
     }      }
   
     pstrcpy(bs->filename, sizeof(bs->filename), filename);      pstrcpy(bs->filename, sizeof(bs->filename), filename);
       if (flags & BDRV_O_FILE) {
           drv = find_protocol(filename);
       } else if (!drv) {
           drv = find_hdev_driver(filename);
           if (!drv) {
               drv = find_image_format(filename);
           }
       }
     if (!drv) {      if (!drv) {
         drv = find_image_format(filename);          ret = -ENOENT;
         if (!drv)          goto unlink_and_fail;
             return -1;  
     }      }
     bs->drv = drv;      bs->drv = drv;
     bs->opaque = qemu_mallocz(drv->instance_size);      bs->opaque = qemu_mallocz(drv->instance_size);
     if (bs->opaque == NULL && drv->instance_size > 0)  
         return -1;      /*
            * Yes, BDRV_O_NOCACHE aka O_DIRECT means we have to present a
     ret = drv->bdrv_open(bs, filename);       * write cache to the guest.  We do need the fdatasync to flush
        * out transactions for block allocations, and we maybe have a
        * volatile write cache in our backing device to deal with.
        */
       if (flags & (BDRV_O_CACHE_WB|BDRV_O_NOCACHE))
           bs->enable_write_cache = 1;
   
       /* Note: for compatibility, we open disk image files as RDWR, and
          RDONLY as fallback */
       try_rw = !bs->read_only || bs->is_temporary;
       if (!(flags & BDRV_O_FILE))
           open_flags = (try_rw ? BDRV_O_RDWR : 0) |
               (flags & (BDRV_O_CACHE_MASK|BDRV_O_NATIVE_AIO));
       else
           open_flags = flags & ~(BDRV_O_FILE | BDRV_O_SNAPSHOT);
   
       bs->open_flags = open_flags;
       if (use_bdrv_whitelist && !bdrv_is_whitelisted(drv))
           ret = -ENOTSUP;
       else
           ret = drv->bdrv_open(bs, filename, open_flags);
       if ((ret == -EACCES || ret == -EPERM) && !(flags & BDRV_O_FILE)) {
           ret = drv->bdrv_open(bs, filename, open_flags & ~BDRV_O_RDWR);
           bs->read_only = 1;
       }
     if (ret < 0) {      if (ret < 0) {
         qemu_free(bs->opaque);          qemu_free(bs->opaque);
         return -1;          bs->opaque = NULL;
           bs->drv = NULL;
       unlink_and_fail:
           if (bs->is_temporary)
               unlink(filename);
           return ret;
       }
       if (drv->bdrv_getlength) {
           bs->total_sectors = bdrv_getlength(bs) >> BDRV_SECTOR_BITS;
     }      }
 #ifndef _WIN32  #ifndef _WIN32
     if (bs->is_temporary) {      if (bs->is_temporary) {
         unlink(filename);          unlink(filename);
     }      }
 #endif  #endif
     if (bs->backing_file[0] != '\0' && drv->bdrv_is_allocated) {      if (bs->backing_file[0] != '\0') {
         /* if there is a backing file, use it */          /* if there is a backing file, use it */
           BlockDriver *back_drv = NULL;
         bs->backing_hd = bdrv_new("");          bs->backing_hd = bdrv_new("");
         if (!bs->backing_hd) {          /* pass on read_only property to the backing_hd */
         fail:          bs->backing_hd->read_only = bs->read_only;
           path_combine(backing_filename, sizeof(backing_filename),
                        filename, bs->backing_file);
           if (bs->backing_format[0] != '\0')
               back_drv = bdrv_find_format(bs->backing_format);
           ret = bdrv_open2(bs->backing_hd, backing_filename, open_flags,
                            back_drv);
           if (ret < 0) {
             bdrv_close(bs);              bdrv_close(bs);
             return -1;              return ret;
         }          }
         if (bdrv_open(bs->backing_hd, bs->backing_file, 0) < 0)  
             goto fail;  
     }      }
   
     bs->inserted = 1;      if (!bdrv_key_required(bs)) {
           /* call the change callback */
     /* call the change callback */          bs->media_changed = 1;
     if (bs->change_cb)          if (bs->change_cb)
         bs->change_cb(bs->change_opaque);              bs->change_cb(bs->change_opaque);
       }
     return 0;      return 0;
 }  }
   
 void bdrv_close(BlockDriverState *bs)  void bdrv_close(BlockDriverState *bs)
 {  {
     if (bs->inserted) {      if (bs->drv) {
         if (bs->backing_hd)          if (bs->backing_hd)
             bdrv_delete(bs->backing_hd);              bdrv_delete(bs->backing_hd);
         bs->drv->bdrv_close(bs);          bs->drv->bdrv_close(bs);
Line 243  void bdrv_close(BlockDriverState *bs) Line 520  void bdrv_close(BlockDriverState *bs)
 #endif  #endif
         bs->opaque = NULL;          bs->opaque = NULL;
         bs->drv = NULL;          bs->drv = NULL;
         bs->inserted = 0;  
   
         /* call the change callback */          /* call the change callback */
           bs->media_changed = 1;
         if (bs->change_cb)          if (bs->change_cb)
             bs->change_cb(bs->change_opaque);              bs->change_cb(bs->change_opaque);
     }      }
Line 253  void bdrv_close(BlockDriverState *bs) Line 530  void bdrv_close(BlockDriverState *bs)
   
 void bdrv_delete(BlockDriverState *bs)  void bdrv_delete(BlockDriverState *bs)
 {  {
     /* XXX: remove the driver list */      BlockDriverState **pbs;
   
       pbs = &bdrv_first;
       while (*pbs != bs && *pbs != NULL)
           pbs = &(*pbs)->next;
       if (*pbs == bs)
           *pbs = bs->next;
   
     bdrv_close(bs);      bdrv_close(bs);
     qemu_free(bs);      qemu_free(bs);
 }  }
   
   /*
    * Run consistency checks on an image
    *
    * Returns the number of errors or -errno when an internal error occurs
    */
   int bdrv_check(BlockDriverState *bs)
   {
       if (bs->drv->bdrv_check == NULL) {
           return -ENOTSUP;
       }
   
       return bs->drv->bdrv_check(bs);
   }
   
 /* commit COW file into the raw image */  /* commit COW file into the raw image */
 int bdrv_commit(BlockDriverState *bs)  int bdrv_commit(BlockDriverState *bs)
 {  {
     int64_t i;      BlockDriver *drv = bs->drv;
       int64_t i, total_sectors;
     int n, j;      int n, j;
     unsigned char sector[512];      unsigned char sector[512];
   
     if (!bs->inserted)      if (!drv)
         return -ENOENT;          return -ENOMEDIUM;
   
     if (bs->read_only) {      if (bs->read_only) {
         return -EACCES;          return -EACCES;
Line 276  int bdrv_commit(BlockDriverState *bs) Line 575  int bdrv_commit(BlockDriverState *bs)
         return -ENOTSUP;          return -ENOTSUP;
     }      }
   
     for (i = 0; i < bs->total_sectors;) {      total_sectors = bdrv_getlength(bs) >> BDRV_SECTOR_BITS;
         if (bs->drv->bdrv_is_allocated(bs, i, 65536, &n)) {      for (i = 0; i < total_sectors;) {
           if (drv->bdrv_is_allocated(bs, i, 65536, &n)) {
             for(j = 0; j < n; j++) {              for(j = 0; j < n; j++) {
                 if (bdrv_read(bs, i, sector, 1) != 0) {                  if (bdrv_read(bs, i, sector, 1) != 0) {
                     return -EIO;                      return -EIO;
Line 292  int bdrv_commit(BlockDriverState *bs) Line 592  int bdrv_commit(BlockDriverState *bs)
             i += n;              i += n;
         }          }
     }      }
   
       if (drv->bdrv_make_empty)
           return drv->bdrv_make_empty(bs);
   
       return 0;
   }
   
   static int bdrv_check_byte_request(BlockDriverState *bs, int64_t offset,
                                      size_t size)
   {
       int64_t len;
   
       if (!bdrv_is_inserted(bs))
           return -ENOMEDIUM;
   
       if (bs->growable)
           return 0;
   
       len = bdrv_getlength(bs);
   
       if (offset < 0)
           return -EIO;
   
       if ((offset > len) || (len - offset < size))
           return -EIO;
   
     return 0;      return 0;
 }  }
   
 /* return -1 if error */  static int bdrv_check_request(BlockDriverState *bs, int64_t sector_num,
 int bdrv_read(BlockDriverState *bs, int64_t sector_num,                                 int nb_sectors)
   {
       return bdrv_check_byte_request(bs, sector_num * 512, nb_sectors * 512);
   }
   
   /* return < 0 if error. See bdrv_write() for the return codes */
   int bdrv_read(BlockDriverState *bs, int64_t sector_num,
               uint8_t *buf, int nb_sectors)                uint8_t *buf, int nb_sectors)
 {  {
     int ret, n;  
     BlockDriver *drv = bs->drv;      BlockDriver *drv = bs->drv;
   
     if (!bs->inserted)      if (!drv)
         return -1;          return -ENOMEDIUM;
       if (bdrv_check_request(bs, sector_num, nb_sectors))
           return -EIO;
   
     while (nb_sectors > 0) {      return drv->bdrv_read(bs, sector_num, buf, nb_sectors);
         if (sector_num == 0 && bs->boot_sector_enabled) {  }
             memcpy(buf, bs->boot_sector_data, 512);  
             n = 1;  static void set_dirty_bitmap(BlockDriverState *bs, int64_t sector_num,
         } else if (bs->backing_hd) {                               int nb_sectors, int dirty)
             if (drv->bdrv_is_allocated(bs, sector_num, nb_sectors, &n)) {  {
                 ret = drv->bdrv_read(bs, sector_num, buf, n);      int64_t start, end;
                 if (ret < 0)      unsigned long val, idx, bit;
                     return -1;  
             } else {      start = sector_num / BDRV_SECTORS_PER_DIRTY_CHUNK;
                 /* read from the base image */      end = (sector_num + nb_sectors - 1) / BDRV_SECTORS_PER_DIRTY_CHUNK;
                 ret = bdrv_read(bs->backing_hd, sector_num, buf, n);  
                 if (ret < 0)      for (; start <= end; start++) {
                     return -1;          idx = start / (sizeof(unsigned long) * 8);
             }          bit = start % (sizeof(unsigned long) * 8);
           val = bs->dirty_bitmap[idx];
           if (dirty) {
               val |= 1 << bit;
         } else {          } else {
             ret = drv->bdrv_read(bs, sector_num, buf, nb_sectors);              val &= ~(1 << bit);
             if (ret < 0)  
                 return -1;  
             /* no need to loop */  
             break;  
         }          }
         nb_sectors -= n;          bs->dirty_bitmap[idx] = val;
         sector_num += n;  
         buf += n * 512;  
     }      }
     return 0;  
 }  }
   
 /* return -1 if error */  /* Return < 0 if error. Important errors are:
 int bdrv_write(BlockDriverState *bs, int64_t sector_num,     -EIO         generic I/O error (may happen for all errors)
     -ENOMEDIUM   No media inserted.
     -EINVAL      Invalid sector number or nb_sectors
     -EACCES      Trying to write a read-only device
   */
   int bdrv_write(BlockDriverState *bs, int64_t sector_num,
                const uint8_t *buf, int nb_sectors)                 const uint8_t *buf, int nb_sectors)
 {  {
     if (!bs->inserted)      BlockDriver *drv = bs->drv;
         return -1;      if (!bs->drv)
           return -ENOMEDIUM;
     if (bs->read_only)      if (bs->read_only)
         return -1;          return -EACCES;
     return bs->drv->bdrv_write(bs, sector_num, buf, nb_sectors);      if (bdrv_check_request(bs, sector_num, nb_sectors))
           return -EIO;
   
       if (bs->dirty_bitmap) {
           set_dirty_bitmap(bs, sector_num, nb_sectors, 1);
       }
   
       return drv->bdrv_write(bs, sector_num, buf, nb_sectors);
   }
   
   int bdrv_pread(BlockDriverState *bs, int64_t offset,
                  void *buf, int count1)
   {
       uint8_t tmp_buf[BDRV_SECTOR_SIZE];
       int len, nb_sectors, count;
       int64_t sector_num;
       int ret;
   
       count = count1;
       /* first read to align to sector start */
       len = (BDRV_SECTOR_SIZE - offset) & (BDRV_SECTOR_SIZE - 1);
       if (len > count)
           len = count;
       sector_num = offset >> BDRV_SECTOR_BITS;
       if (len > 0) {
           if ((ret = bdrv_read(bs, sector_num, tmp_buf, 1)) < 0)
               return ret;
           memcpy(buf, tmp_buf + (offset & (BDRV_SECTOR_SIZE - 1)), len);
           count -= len;
           if (count == 0)
               return count1;
           sector_num++;
           buf += len;
       }
   
       /* read the sectors "in place" */
       nb_sectors = count >> BDRV_SECTOR_BITS;
       if (nb_sectors > 0) {
           if ((ret = bdrv_read(bs, sector_num, buf, nb_sectors)) < 0)
               return ret;
           sector_num += nb_sectors;
           len = nb_sectors << BDRV_SECTOR_BITS;
           buf += len;
           count -= len;
       }
   
       /* add data from the last sector */
       if (count > 0) {
           if ((ret = bdrv_read(bs, sector_num, tmp_buf, 1)) < 0)
               return ret;
           memcpy(buf, tmp_buf, count);
       }
       return count1;
 }  }
   
 void bdrv_get_geometry(BlockDriverState *bs, int64_t *nb_sectors_ptr)  int bdrv_pwrite(BlockDriverState *bs, int64_t offset,
                   const void *buf, int count1)
 {  {
     *nb_sectors_ptr = bs->total_sectors;      uint8_t tmp_buf[BDRV_SECTOR_SIZE];
       int len, nb_sectors, count;
       int64_t sector_num;
       int ret;
   
       count = count1;
       /* first write to align to sector start */
       len = (BDRV_SECTOR_SIZE - offset) & (BDRV_SECTOR_SIZE - 1);
       if (len > count)
           len = count;
       sector_num = offset >> BDRV_SECTOR_BITS;
       if (len > 0) {
           if ((ret = bdrv_read(bs, sector_num, tmp_buf, 1)) < 0)
               return ret;
           memcpy(tmp_buf + (offset & (BDRV_SECTOR_SIZE - 1)), buf, len);
           if ((ret = bdrv_write(bs, sector_num, tmp_buf, 1)) < 0)
               return ret;
           count -= len;
           if (count == 0)
               return count1;
           sector_num++;
           buf += len;
       }
   
       /* write the sectors "in place" */
       nb_sectors = count >> BDRV_SECTOR_BITS;
       if (nb_sectors > 0) {
           if ((ret = bdrv_write(bs, sector_num, buf, nb_sectors)) < 0)
               return ret;
           sector_num += nb_sectors;
           len = nb_sectors << BDRV_SECTOR_BITS;
           buf += len;
           count -= len;
       }
   
       /* add data from the last sector */
       if (count > 0) {
           if ((ret = bdrv_read(bs, sector_num, tmp_buf, 1)) < 0)
               return ret;
           memcpy(tmp_buf, buf, count);
           if ((ret = bdrv_write(bs, sector_num, tmp_buf, 1)) < 0)
               return ret;
       }
       return count1;
   }
   
   /*
    * Writes to the file and ensures that no writes are reordered across this
    * request (acts as a barrier)
    *
    * Returns 0 on success, -errno in error cases.
    */
   int bdrv_pwrite_sync(BlockDriverState *bs, int64_t offset,
       const void *buf, int count)
   {
       int ret;
   
       ret = bdrv_pwrite(bs, offset, buf, count);
       if (ret < 0) {
           return ret;
       }
   
       /* No flush needed for cache=writethrough, it uses O_DSYNC */
       if ((bs->open_flags & BDRV_O_CACHE_MASK) != 0) {
           bdrv_flush(bs);
       }
   
       return 0;
   }
   
   /*
    * Writes to the file and ensures that no writes are reordered across this
    * request (acts as a barrier)
    *
    * Returns 0 on success, -errno in error cases.
    */
   int bdrv_write_sync(BlockDriverState *bs, int64_t sector_num,
       const uint8_t *buf, int nb_sectors)
   {
       return bdrv_pwrite_sync(bs, BDRV_SECTOR_SIZE * sector_num,
           buf, BDRV_SECTOR_SIZE * nb_sectors);
 }  }
   
 /* force a given boot sector. */  /**
 void bdrv_set_boot_sector(BlockDriverState *bs, const uint8_t *data, int size)   * Truncate file to 'offset' bytes (needed only for file protocols)
    */
   int bdrv_truncate(BlockDriverState *bs, int64_t offset)
   {
       BlockDriver *drv = bs->drv;
       if (!drv)
           return -ENOMEDIUM;
       if (!drv->bdrv_truncate)
           return -ENOTSUP;
       if (bs->read_only)
           return -EACCES;
       return drv->bdrv_truncate(bs, offset);
   }
   
   /**
    * Length of a file in bytes. Return < 0 if error or unknown.
    */
   int64_t bdrv_getlength(BlockDriverState *bs)
   {
       BlockDriver *drv = bs->drv;
       if (!drv)
           return -ENOMEDIUM;
       if (!drv->bdrv_getlength) {
           /* legacy mode */
           return bs->total_sectors * BDRV_SECTOR_SIZE;
       }
       return drv->bdrv_getlength(bs);
   }
   
   /* return 0 as number of sectors if no device present or error */
   void bdrv_get_geometry(BlockDriverState *bs, uint64_t *nb_sectors_ptr)
   {
       int64_t length;
       length = bdrv_getlength(bs);
       if (length < 0)
           length = 0;
       else
           length = length >> BDRV_SECTOR_BITS;
       *nb_sectors_ptr = length;
   }
   
   struct partition {
           uint8_t boot_ind;           /* 0x80 - active */
           uint8_t head;               /* starting head */
           uint8_t sector;             /* starting sector */
           uint8_t cyl;                /* starting cylinder */
           uint8_t sys_ind;            /* What partition type */
           uint8_t end_head;           /* end head */
           uint8_t end_sector;         /* end sector */
           uint8_t end_cyl;            /* end cylinder */
           uint32_t start_sect;        /* starting sector counting from 0 */
           uint32_t nr_sects;          /* nr of sectors in partition */
   } __attribute__((packed));
   
   /* try to guess the disk logical geometry from the MSDOS partition table. Return 0 if OK, -1 if could not guess */
   static int guess_disk_lchs(BlockDriverState *bs,
                              int *pcylinders, int *pheads, int *psectors)
   {
       uint8_t buf[512];
       int ret, i, heads, sectors, cylinders;
       struct partition *p;
       uint32_t nr_sects;
       uint64_t nb_sectors;
   
       bdrv_get_geometry(bs, &nb_sectors);
   
       ret = bdrv_read(bs, 0, buf, 1);
       if (ret < 0)
           return -1;
       /* test msdos magic */
       if (buf[510] != 0x55 || buf[511] != 0xaa)
           return -1;
       for(i = 0; i < 4; i++) {
           p = ((struct partition *)(buf + 0x1be)) + i;
           nr_sects = le32_to_cpu(p->nr_sects);
           if (nr_sects && p->end_head) {
               /* We make the assumption that the partition terminates on
                  a cylinder boundary */
               heads = p->end_head + 1;
               sectors = p->end_sector & 63;
               if (sectors == 0)
                   continue;
               cylinders = nb_sectors / (heads * sectors);
               if (cylinders < 1 || cylinders > 16383)
                   continue;
               *pheads = heads;
               *psectors = sectors;
               *pcylinders = cylinders;
   #if 0
               printf("guessed geometry: LCHS=%d %d %d\n",
                      cylinders, heads, sectors);
   #endif
               return 0;
           }
       }
       return -1;
   }
   
   void bdrv_guess_geometry(BlockDriverState *bs, int *pcyls, int *pheads, int *psecs)
 {  {
     bs->boot_sector_enabled = 1;      int translation, lba_detected = 0;
     if (size > 512)      int cylinders, heads, secs;
         size = 512;      uint64_t nb_sectors;
     memcpy(bs->boot_sector_data, data, size);  
     memset(bs->boot_sector_data + size, 0, 512 - size);      /* if a geometry hint is available, use it */
       bdrv_get_geometry(bs, &nb_sectors);
       bdrv_get_geometry_hint(bs, &cylinders, &heads, &secs);
       translation = bdrv_get_translation_hint(bs);
       if (cylinders != 0) {
           *pcyls = cylinders;
           *pheads = heads;
           *psecs = secs;
       } else {
           if (guess_disk_lchs(bs, &cylinders, &heads, &secs) == 0) {
               if (heads > 16) {
                   /* if heads > 16, it means that a BIOS LBA
                      translation was active, so the default
                      hardware geometry is OK */
                   lba_detected = 1;
                   goto default_geometry;
               } else {
                   *pcyls = cylinders;
                   *pheads = heads;
                   *psecs = secs;
                   /* disable any translation to be in sync with
                      the logical geometry */
                   if (translation == BIOS_ATA_TRANSLATION_AUTO) {
                       bdrv_set_translation_hint(bs,
                                                 BIOS_ATA_TRANSLATION_NONE);
                   }
               }
           } else {
           default_geometry:
               /* if no geometry, use a standard physical disk geometry */
               cylinders = nb_sectors / (16 * 63);
   
               if (cylinders > 16383)
                   cylinders = 16383;
               else if (cylinders < 2)
                   cylinders = 2;
               *pcyls = cylinders;
               *pheads = 16;
               *psecs = 63;
               if ((lba_detected == 1) && (translation == BIOS_ATA_TRANSLATION_AUTO)) {
                   if ((*pcyls * *pheads) <= 131072) {
                       bdrv_set_translation_hint(bs,
                                                 BIOS_ATA_TRANSLATION_LARGE);
                   } else {
                       bdrv_set_translation_hint(bs,
                                                 BIOS_ATA_TRANSLATION_LBA);
                   }
               }
           }
           bdrv_set_geometry_hint(bs, *pcyls, *pheads, *psecs);
       }
 }  }
   
 void bdrv_set_geometry_hint(BlockDriverState *bs,   void bdrv_set_geometry_hint(BlockDriverState *bs,
                             int cyls, int heads, int secs)                              int cyls, int heads, int secs)
 {  {
     bs->cyls = cyls;      bs->cyls = cyls;
Line 380  void bdrv_set_translation_hint(BlockDriv Line 996  void bdrv_set_translation_hint(BlockDriv
     bs->translation = translation;      bs->translation = translation;
 }  }
   
 void bdrv_get_geometry_hint(BlockDriverState *bs,   void bdrv_get_geometry_hint(BlockDriverState *bs,
                             int *pcyls, int *pheads, int *psecs)                              int *pcyls, int *pheads, int *psecs)
 {  {
     *pcyls = bs->cyls;      *pcyls = bs->cyls;
Line 408  int bdrv_is_read_only(BlockDriverState * Line 1024  int bdrv_is_read_only(BlockDriverState *
     return bs->read_only;      return bs->read_only;
 }  }
   
 int bdrv_is_inserted(BlockDriverState *bs)  int bdrv_set_read_only(BlockDriverState *bs, int read_only)
 {  {
     return bs->inserted;      int ret = bs->read_only;
       bs->read_only = read_only;
       return ret;
 }  }
   
 int bdrv_is_locked(BlockDriverState *bs)  int bdrv_is_sg(BlockDriverState *bs)
 {  {
     return bs->locked;      return bs->sg;
 }  }
   
 void bdrv_set_locked(BlockDriverState *bs, int locked)  int bdrv_enable_write_cache(BlockDriverState *bs)
 {  {
     bs->locked = locked;      return bs->enable_write_cache;
 }  }
   
 void bdrv_set_change_cb(BlockDriverState *bs,   /* XXX: no longer used */
   void bdrv_set_change_cb(BlockDriverState *bs,
                         void (*change_cb)(void *opaque), void *opaque)                          void (*change_cb)(void *opaque), void *opaque)
 {  {
     bs->change_cb = change_cb;      bs->change_cb = change_cb;
Line 437  int bdrv_is_encrypted(BlockDriverState * Line 1056  int bdrv_is_encrypted(BlockDriverState *
     return bs->encrypted;      return bs->encrypted;
 }  }
   
   int bdrv_key_required(BlockDriverState *bs)
   {
       BlockDriverState *backing_hd = bs->backing_hd;
   
       if (backing_hd && backing_hd->encrypted && !backing_hd->valid_key)
           return 1;
       return (bs->encrypted && !bs->valid_key);
   }
   
 int bdrv_set_key(BlockDriverState *bs, const char *key)  int bdrv_set_key(BlockDriverState *bs, const char *key)
 {  {
     int ret;      int ret;
Line 449  int bdrv_set_key(BlockDriverState *bs, c Line 1077  int bdrv_set_key(BlockDriverState *bs, c
     }      }
     if (!bs->encrypted || !bs->drv || !bs->drv->bdrv_set_key)      if (!bs->encrypted || !bs->drv || !bs->drv->bdrv_set_key)
         return -1;          return -1;
     return bs->drv->bdrv_set_key(bs, key);      ret = bs->drv->bdrv_set_key(bs, key);
       if (ret < 0) {
           bs->valid_key = 0;
       } else if (!bs->valid_key) {
           bs->valid_key = 1;
           /* call the change callback now, we skipped it on open */
           bs->media_changed = 1;
           if (bs->change_cb)
               bs->change_cb(bs->change_opaque);
       }
       return ret;
 }  }
   
 void bdrv_get_format(BlockDriverState *bs, char *buf, int buf_size)  void bdrv_get_format(BlockDriverState *bs, char *buf, int buf_size)
 {  {
     if (!bs->inserted || !bs->drv) {      if (!bs->drv) {
         buf[0] = '\0';          buf[0] = '\0';
     } else {      } else {
         pstrcpy(buf, buf_size, bs->drv->format_name);          pstrcpy(buf, buf_size, bs->drv->format_name);
     }      }
 }  }
   
 void bdrv_iterate_format(void (*it)(void *opaque, const char *name),   void bdrv_iterate_format(void (*it)(void *opaque, const char *name),
                          void *opaque)                           void *opaque)
 {  {
     BlockDriver *drv;      BlockDriver *drv;
Line 482  BlockDriverState *bdrv_find(const char * Line 1120  BlockDriverState *bdrv_find(const char *
     return NULL;      return NULL;
 }  }
   
 void bdrv_iterate(void (*it)(void *opaque, const char *name), void *opaque)  void bdrv_iterate(void (*it)(void *opaque, BlockDriverState *bs), void *opaque)
 {  {
     BlockDriverState *bs;      BlockDriverState *bs;
   
     for (bs = bdrv_first; bs != NULL; bs = bs->next) {      for (bs = bdrv_first; bs != NULL; bs = bs->next) {
         it(opaque, bs->device_name);          it(opaque, bs);
     }      }
 }  }
   
Line 496  const char *bdrv_get_device_name(BlockDr Line 1134  const char *bdrv_get_device_name(BlockDr
     return bs->device_name;      return bs->device_name;
 }  }
   
 void bdrv_info(void)  void bdrv_flush(BlockDriverState *bs)
   {
       if (!bs->drv)
           return;
       if (bs->drv->bdrv_flush)
           bs->drv->bdrv_flush(bs);
       if (bs->backing_hd)
           bdrv_flush(bs->backing_hd);
   }
   
   void bdrv_flush_all(void)
 {  {
     BlockDriverState *bs;      BlockDriverState *bs;
   
       for (bs = bdrv_first; bs != NULL; bs = bs->next)
           if (bs->drv && !bdrv_is_read_only(bs) && 
               (!bdrv_is_removable(bs) || bdrv_is_inserted(bs)))
               bdrv_flush(bs);
   }
   
   /*
    * Returns true iff the specified sector is present in the disk image. Drivers
    * not implementing the functionality are assumed to not support backing files,
    * hence all their sectors are reported as allocated.
    *
    * 'pnum' is set to the number of sectors (including and immediately following
    * the specified sector) that are known to be in the same
    * allocated/unallocated state.
    *
    * 'nb_sectors' is the max value 'pnum' should be set to.
    */
   int bdrv_is_allocated(BlockDriverState *bs, int64_t sector_num, int nb_sectors,
           int *pnum)
   {
       int64_t n;
       if (!bs->drv->bdrv_is_allocated) {
           if (sector_num >= bs->total_sectors) {
               *pnum = 0;
               return 0;
           }
           n = bs->total_sectors - sector_num;
           *pnum = (n < nb_sectors) ? (n) : (nb_sectors);
           return 1;
       }
       return bs->drv->bdrv_is_allocated(bs, sector_num, nb_sectors, pnum);
   }
   
   static void bdrv_print_dict(QObject *obj, void *opaque)
   {
       QDict *bs_dict;
       Monitor *mon = opaque;
   
       bs_dict = qobject_to_qdict(obj);
   
       monitor_printf(mon, "%s: type=%s removable=%d",
                           qdict_get_str(bs_dict, "device"),
                           qdict_get_str(bs_dict, "type"),
                           qdict_get_bool(bs_dict, "removable"));
   
       if (qdict_get_bool(bs_dict, "removable")) {
           monitor_printf(mon, " locked=%d", qdict_get_bool(bs_dict, "locked"));
       }
   
       if (qdict_haskey(bs_dict, "inserted")) {
           QDict *qdict = qobject_to_qdict(qdict_get(bs_dict, "inserted"));
   
           monitor_printf(mon, " file=");
           monitor_print_filename(mon, qdict_get_str(qdict, "file"));
           if (qdict_haskey(qdict, "backing_file")) {
               monitor_printf(mon, " backing_file=");
               monitor_print_filename(mon, qdict_get_str(qdict, "backing_file"));
           }
           monitor_printf(mon, " ro=%d drv=%s encrypted=%d",
                               qdict_get_bool(qdict, "ro"),
                               qdict_get_str(qdict, "drv"),
                               qdict_get_bool(qdict, "encrypted"));
       } else {
           monitor_printf(mon, " [not inserted]");
       }
   
       monitor_printf(mon, "\n");
   }
   
   void bdrv_info_print(Monitor *mon, const QObject *data)
   {
       qlist_iter(qobject_to_qlist(data), bdrv_print_dict, mon);
   }
   
   /**
    * bdrv_info(): Block devices information
    *
    * Each block device information is stored in a QDict and the
    * returned QObject is a QList of all devices.
    *
    * The QDict contains the following:
    *
    * - "device": device name
    * - "type": device type
    * - "removable": true if the device is removable, false otherwise
    * - "locked": true if the device is locked, false otherwise
    * - "inserted": only present if the device is inserted, it is a QDict
    *    containing the following:
    *          - "file": device file name
    *          - "ro": true if read-only, false otherwise
    *          - "drv": driver format name
    *          - "backing_file": backing file name if one is used
    *          - "encrypted": true if encrypted, false otherwise
    *
    * Example:
    *
    * [ { "device": "ide0-hd0", "type": "hd", "removable": false, "locked": false,
    *     "inserted": { "file": "/tmp/foobar", "ro": false, "drv": "qcow2" } },
    *   { "device": "floppy0", "type": "floppy", "removable": true,
    *     "locked": false } ]
    */
   void bdrv_info(Monitor *mon, QObject **ret_data)
   {
       QList *bs_list;
       BlockDriverState *bs;
   
       bs_list = qlist_new();
   
     for (bs = bdrv_first; bs != NULL; bs = bs->next) {      for (bs = bdrv_first; bs != NULL; bs = bs->next) {
         term_printf("%s:", bs->device_name);          QObject *bs_obj;
         term_printf(" type=");          const char *type = "unknown";
   
         switch(bs->type) {          switch(bs->type) {
         case BDRV_TYPE_HD:          case BDRV_TYPE_HD:
             term_printf("hd");              type = "hd";
             break;              break;
         case BDRV_TYPE_CDROM:          case BDRV_TYPE_CDROM:
             term_printf("cdrom");              type = "cdrom";
             break;              break;
         case BDRV_TYPE_FLOPPY:          case BDRV_TYPE_FLOPPY:
             term_printf("floppy");              type = "floppy";
             break;              break;
         }          }
         term_printf(" removable=%d", bs->removable);  
         if (bs->removable) {          bs_obj = qobject_from_jsonf("{ 'device': %s, 'type': %s, "
             term_printf(" locked=%d", bs->locked);                                      "'removable': %i, 'locked': %i }",
         }                                      bs->device_name, type, bs->removable,
         if (bs->inserted) {                                      bs->locked);
             term_printf(" file=%s", bs->filename);          assert(bs_obj != NULL);
             if (bs->backing_file[0] != '\0')  
                 term_printf(" backing_file=%s", bs->backing_file);          if (bs->drv) {
             term_printf(" ro=%d", bs->read_only);              QObject *obj;
             term_printf(" drv=%s", bs->drv->format_name);              QDict *bs_dict = qobject_to_qdict(bs_obj);
             if (bs->encrypted)  
                 term_printf(" encrypted");              obj = qobject_from_jsonf("{ 'file': %s, 'ro': %i, 'drv': %s, "
         } else {                                       "'encrypted': %i }",
             term_printf(" [not inserted]");                                       bs->filename, bs->read_only,
                                        bs->drv->format_name,
                                        bdrv_is_encrypted(bs));
               assert(obj != NULL);
               if (bs->backing_file[0] != '\0') {
                   QDict *qdict = qobject_to_qdict(obj);
                   qdict_put(qdict, "backing_file",
                             qstring_from_str(bs->backing_file));
               }
   
               qdict_put_obj(bs_dict, "inserted", obj);
         }          }
         term_printf("\n");          qlist_append_obj(bs_list, bs_obj);
     }      }
   
       *ret_data = QOBJECT(bs_list);
 }  }
   
   static void bdrv_stats_iter(QObject *data, void *opaque)
   {
       QDict *qdict;
       Monitor *mon = opaque;
   
       qdict = qobject_to_qdict(data);
       monitor_printf(mon, "%s:", qdict_get_str(qdict, "device"));
   
       qdict = qobject_to_qdict(qdict_get(qdict, "stats"));
       monitor_printf(mon, " rd_bytes=%" PRId64
                           " wr_bytes=%" PRId64
                           " rd_operations=%" PRId64
                           " wr_operations=%" PRId64
                           "\n",
                           qdict_get_int(qdict, "rd_bytes"),
                           qdict_get_int(qdict, "wr_bytes"),
                           qdict_get_int(qdict, "rd_operations"),
                           qdict_get_int(qdict, "wr_operations"));
   }
   
   void bdrv_stats_print(Monitor *mon, const QObject *data)
   {
       qlist_iter(qobject_to_qlist(data), bdrv_stats_iter, mon);
   }
   
   /**
    * bdrv_info_stats(): show block device statistics
    *
    * Each device statistic information is stored in a QDict and
    * the returned QObject is a QList of all devices.
    *
    * The QDict contains the following:
    *
    * - "device": device name
    * - "stats": A QDict with the statistics information, it contains:
    *     - "rd_bytes": bytes read
    *     - "wr_bytes": bytes written
    *     - "rd_operations": read operations
    *     - "wr_operations": write operations
    * 
    * Example:
    *
    * [ { "device": "ide0-hd0",
    *               "stats": { "rd_bytes": 512,
    *                          "wr_bytes": 0,
    *                          "rd_operations": 1,
    *                          "wr_operations": 0 } },
    *   { "device": "ide1-cd0",
    *               "stats": { "rd_bytes": 0,
    *                          "wr_bytes": 0,
    *                          "rd_operations": 0,
    *                          "wr_operations": 0 } } ]
    */
   void bdrv_info_stats(Monitor *mon, QObject **ret_data)
   {
       QObject *obj;
       QList *devices;
       BlockDriverState *bs;
   
       devices = qlist_new();
   
       for (bs = bdrv_first; bs != NULL; bs = bs->next) {
           obj = qobject_from_jsonf("{ 'device': %s, 'stats': {"
                                    "'rd_bytes': %" PRId64 ","
                                    "'wr_bytes': %" PRId64 ","
                                    "'rd_operations': %" PRId64 ","
                                    "'wr_operations': %" PRId64
                                    "} }",
                                    bs->device_name,
                                    bs->rd_bytes, bs->wr_bytes,
                                    bs->rd_ops, bs->wr_ops);
           assert(obj != NULL);
           qlist_append_obj(devices, obj);
       }
   
       *ret_data = QOBJECT(devices);
   }
   
   const char *bdrv_get_encrypted_filename(BlockDriverState *bs)
   {
       if (bs->backing_hd && bs->backing_hd->encrypted)
           return bs->backing_file;
       else if (bs->encrypted)
           return bs->filename;
       else
           return NULL;
   }
   
   void bdrv_get_backing_filename(BlockDriverState *bs,
                                  char *filename, int filename_size)
   {
       if (!bs->backing_hd) {
           pstrcpy(filename, filename_size, "");
       } else {
           pstrcpy(filename, filename_size, bs->backing_file);
       }
   }
   
   int bdrv_write_compressed(BlockDriverState *bs, int64_t sector_num,
                             const uint8_t *buf, int nb_sectors)
   {
       BlockDriver *drv = bs->drv;
       if (!drv)
           return -ENOMEDIUM;
       if (!drv->bdrv_write_compressed)
           return -ENOTSUP;
       if (bdrv_check_request(bs, sector_num, nb_sectors))
           return -EIO;
   
       if (bs->dirty_bitmap) {
           set_dirty_bitmap(bs, sector_num, nb_sectors, 1);
       }
   
       return drv->bdrv_write_compressed(bs, sector_num, buf, nb_sectors);
   }
   
   int bdrv_get_info(BlockDriverState *bs, BlockDriverInfo *bdi)
   {
       BlockDriver *drv = bs->drv;
       if (!drv)
           return -ENOMEDIUM;
       if (!drv->bdrv_get_info)
           return -ENOTSUP;
       memset(bdi, 0, sizeof(*bdi));
       return drv->bdrv_get_info(bs, bdi);
   }
   
   int bdrv_save_vmstate(BlockDriverState *bs, const uint8_t *buf,
                         int64_t pos, int size)
   {
       BlockDriver *drv = bs->drv;
       if (!drv)
           return -ENOMEDIUM;
       if (!drv->bdrv_save_vmstate)
           return -ENOTSUP;
       return drv->bdrv_save_vmstate(bs, buf, pos, size);
   }
   
   int bdrv_load_vmstate(BlockDriverState *bs, uint8_t *buf,
                         int64_t pos, int size)
   {
       BlockDriver *drv = bs->drv;
       if (!drv)
           return -ENOMEDIUM;
       if (!drv->bdrv_load_vmstate)
           return -ENOTSUP;
       return drv->bdrv_load_vmstate(bs, buf, pos, size);
   }
   
 /**************************************************************/  /**************************************************************/
 /* RAW block driver */  /* handling of snapshots */
   
 typedef struct BDRVRawState {  int bdrv_snapshot_create(BlockDriverState *bs,
     int fd;                           QEMUSnapshotInfo *sn_info)
 } BDRVRawState;  {
       BlockDriver *drv = bs->drv;
       if (!drv)
           return -ENOMEDIUM;
       if (!drv->bdrv_snapshot_create)
           return -ENOTSUP;
       return drv->bdrv_snapshot_create(bs, sn_info);
   }
   
 static int raw_probe(const uint8_t *buf, int buf_size, const char *filename)  int bdrv_snapshot_goto(BlockDriverState *bs,
                          const char *snapshot_id)
 {  {
     return 1; /* maybe */      BlockDriver *drv = bs->drv;
       if (!drv)
           return -ENOMEDIUM;
       if (!drv->bdrv_snapshot_goto)
           return -ENOTSUP;
       return drv->bdrv_snapshot_goto(bs, snapshot_id);
 }  }
   
 static int raw_open(BlockDriverState *bs, const char *filename)  int bdrv_snapshot_delete(BlockDriverState *bs, const char *snapshot_id)
 {  {
     BDRVRawState *s = bs->opaque;      BlockDriver *drv = bs->drv;
     int fd;      if (!drv)
     int64_t size;          return -ENOMEDIUM;
 #ifdef _BSD      if (!drv->bdrv_snapshot_delete)
     struct stat sb;          return -ENOTSUP;
 #endif      return drv->bdrv_snapshot_delete(bs, snapshot_id);
   }
   
     fd = open(filename, O_RDWR | O_BINARY | O_LARGEFILE);  int bdrv_snapshot_list(BlockDriverState *bs,
     if (fd < 0) {                         QEMUSnapshotInfo **psn_info)
         fd = open(filename, O_RDONLY | O_BINARY | O_LARGEFILE);  {
         if (fd < 0)      BlockDriver *drv = bs->drv;
             return -1;      if (!drv)
         bs->read_only = 1;          return -ENOMEDIUM;
       if (!drv->bdrv_snapshot_list)
           return -ENOTSUP;
       return drv->bdrv_snapshot_list(bs, psn_info);
   }
   
   #define NB_SUFFIXES 4
   
   char *get_human_readable_size(char *buf, int buf_size, int64_t size)
   {
       static const char suffixes[NB_SUFFIXES] = "KMGT";
       int64_t base;
       int i;
   
       if (size <= 999) {
           snprintf(buf, buf_size, "%" PRId64, size);
       } else {
           base = 1024;
           for(i = 0; i < NB_SUFFIXES; i++) {
               if (size < (10 * base)) {
                   snprintf(buf, buf_size, "%0.1f%c",
                            (double)size / base,
                            suffixes[i]);
                   break;
               } else if (size < (1000 * base) || i == (NB_SUFFIXES - 1)) {
                   snprintf(buf, buf_size, "%" PRId64 "%c",
                            ((size + (base >> 1)) / base),
                            suffixes[i]);
                   break;
               }
               base = base * 1024;
           }
     }      }
 #ifdef _BSD      return buf;
     if (!fstat(fd, &sb) && (S_IFCHR & sb.st_mode)) {  }
 #ifdef DIOCGMEDIASIZE  
         if (ioctl(fd, DIOCGMEDIASIZE, (off_t *)&size))  char *bdrv_snapshot_dump(char *buf, int buf_size, QEMUSnapshotInfo *sn)
 #endif  {
             size = lseek(fd, 0LL, SEEK_END);      char buf1[128], date_buf[128], clock_buf[128];
     } else  #ifdef _WIN32
       struct tm *ptm;
   #else
       struct tm tm;
 #endif  #endif
     {      time_t ti;
         size = lseek(fd, 0, SEEK_END);      int64_t secs;
     }  
       if (!sn) {
           snprintf(buf, buf_size,
                    "%-10s%-20s%7s%20s%15s",
                    "ID", "TAG", "VM SIZE", "DATE", "VM CLOCK");
       } else {
           ti = sn->date_sec;
 #ifdef _WIN32  #ifdef _WIN32
     /* On Windows hosts it can happen that we're unable to get file size          ptm = localtime(&ti);
        for CD-ROM raw device (it's inherent limitation of the CDFS driver). */          strftime(date_buf, sizeof(date_buf),
     if (size == -1)                   "%Y-%m-%d %H:%M:%S", ptm);
         size = LONG_LONG_MAX;  #else
           localtime_r(&ti, &tm);
           strftime(date_buf, sizeof(date_buf),
                    "%Y-%m-%d %H:%M:%S", &tm);
 #endif  #endif
     bs->total_sectors = size / 512;          secs = sn->vm_clock_nsec / 1000000000;
     s->fd = fd;          snprintf(clock_buf, sizeof(clock_buf),
     return 0;                   "%02d:%02d:%02d.%03d",
                    (int)(secs / 3600),
                    (int)((secs / 60) % 60),
                    (int)(secs % 60),
                    (int)((sn->vm_clock_nsec / 1000000) % 1000));
           snprintf(buf, buf_size,
                    "%-10s%-20s%7s%20s%15s",
                    sn->id_str, sn->name,
                    get_human_readable_size(buf1, sizeof(buf1), sn->vm_state_size),
                    date_buf,
                    clock_buf);
       }
       return buf;
 }  }
   
 static int raw_read(BlockDriverState *bs, int64_t sector_num,   
                     uint8_t *buf, int nb_sectors)  /**************************************************************/
   /* async I/Os */
   
   BlockDriverAIOCB *bdrv_aio_readv(BlockDriverState *bs, int64_t sector_num,
                                    QEMUIOVector *qiov, int nb_sectors,
                                    BlockDriverCompletionFunc *cb, void *opaque)
 {  {
     BDRVRawState *s = bs->opaque;      BlockDriver *drv = bs->drv;
     int ret;      BlockDriverAIOCB *ret;
       
     lseek(s->fd, sector_num * 512, SEEK_SET);      if (!drv)
     ret = read(s->fd, buf, nb_sectors * 512);          return NULL;
     if (ret != nb_sectors * 512)       if (bdrv_check_request(bs, sector_num, nb_sectors))
         return -1;          return NULL;
     return 0;  
       ret = drv->bdrv_aio_readv(bs, sector_num, qiov, nb_sectors,
                                 cb, opaque);
   
       if (ret) {
           /* Update stats even though technically transfer has not happened. */
           bs->rd_bytes += (unsigned) nb_sectors * BDRV_SECTOR_SIZE;
           bs->rd_ops ++;
       }
   
       return ret;
 }  }
   
 static int raw_write(BlockDriverState *bs, int64_t sector_num,   BlockDriverAIOCB *bdrv_aio_writev(BlockDriverState *bs, int64_t sector_num,
                      const uint8_t *buf, int nb_sectors)                                    QEMUIOVector *qiov, int nb_sectors,
                                     BlockDriverCompletionFunc *cb, void *opaque)
 {  {
     BDRVRawState *s = bs->opaque;      BlockDriver *drv = bs->drv;
     int ret;      BlockDriverAIOCB *ret;
       
     lseek(s->fd, sector_num * 512, SEEK_SET);      if (!drv)
     ret = write(s->fd, buf, nb_sectors * 512);          return NULL;
     if (ret != nb_sectors * 512)       if (bs->read_only)
           return NULL;
       if (bdrv_check_request(bs, sector_num, nb_sectors))
           return NULL;
   
       if (bs->dirty_bitmap) {
           set_dirty_bitmap(bs, sector_num, nb_sectors, 1);
       }
   
       ret = drv->bdrv_aio_writev(bs, sector_num, qiov, nb_sectors,
                                  cb, opaque);
   
       if (ret) {
           /* Update stats even though technically transfer has not happened. */
           bs->wr_bytes += (unsigned) nb_sectors * BDRV_SECTOR_SIZE;
           bs->wr_ops ++;
       }
   
       return ret;
   }
   
   
   typedef struct MultiwriteCB {
       int error;
       int num_requests;
       int num_callbacks;
       struct {
           BlockDriverCompletionFunc *cb;
           void *opaque;
           QEMUIOVector *free_qiov;
           void *free_buf;
       } callbacks[];
   } MultiwriteCB;
   
   static void multiwrite_user_cb(MultiwriteCB *mcb)
   {
       int i;
   
       for (i = 0; i < mcb->num_callbacks; i++) {
           mcb->callbacks[i].cb(mcb->callbacks[i].opaque, mcb->error);
           if (mcb->callbacks[i].free_qiov) {
               qemu_iovec_destroy(mcb->callbacks[i].free_qiov);
           }
           qemu_free(mcb->callbacks[i].free_qiov);
           qemu_vfree(mcb->callbacks[i].free_buf);
       }
   }
   
   static void multiwrite_cb(void *opaque, int ret)
   {
       MultiwriteCB *mcb = opaque;
   
       if (ret < 0 && !mcb->error) {
           mcb->error = ret;
       }
   
       mcb->num_requests--;
       if (mcb->num_requests == 0) {
           multiwrite_user_cb(mcb);
           qemu_free(mcb);
       }
   }
   
   static int multiwrite_req_compare(const void *a, const void *b)
   {
       const BlockRequest *req1 = a, *req2 = b;
   
       /*
        * Note that we can't simply subtract req2->sector from req1->sector
        * here as that could overflow the return value.
        */
       if (req1->sector > req2->sector) {
           return 1;
       } else if (req1->sector < req2->sector) {
         return -1;          return -1;
     return 0;      } else {
           return 0;
       }
 }  }
   
 static void raw_close(BlockDriverState *bs)  /*
    * Takes a bunch of requests and tries to merge them. Returns the number of
    * requests that remain after merging.
    */
   static int multiwrite_merge(BlockDriverState *bs, BlockRequest *reqs,
       int num_reqs, MultiwriteCB *mcb)
 {  {
     BDRVRawState *s = bs->opaque;      int i, outidx;
     close(s->fd);  
       // Sort requests by start sector
       qsort(reqs, num_reqs, sizeof(*reqs), &multiwrite_req_compare);
   
       // Check if adjacent requests touch the same clusters. If so, combine them,
       // filling up gaps with zero sectors.
       outidx = 0;
       for (i = 1; i < num_reqs; i++) {
           int merge = 0;
           int64_t oldreq_last = reqs[outidx].sector + reqs[outidx].nb_sectors;
   
           // This handles the cases that are valid for all block drivers, namely
           // exactly sequential writes and overlapping writes.
           if (reqs[i].sector <= oldreq_last) {
               merge = 1;
           }
   
           // The block driver may decide that it makes sense to combine requests
           // even if there is a gap of some sectors between them. In this case,
           // the gap is filled with zeros (therefore only applicable for yet
           // unused space in format like qcow2).
           if (!merge && bs->drv->bdrv_merge_requests) {
               merge = bs->drv->bdrv_merge_requests(bs, &reqs[outidx], &reqs[i]);
           }
   
           if (reqs[outidx].qiov->niov + reqs[i].qiov->niov + 1 > IOV_MAX) {
               merge = 0;
           }
   
           if (merge) {
               size_t size;
               QEMUIOVector *qiov = qemu_mallocz(sizeof(*qiov));
               qemu_iovec_init(qiov,
                   reqs[outidx].qiov->niov + reqs[i].qiov->niov + 1);
   
               // Add the first request to the merged one. If the requests are
               // overlapping, drop the last sectors of the first request.
               size = (reqs[i].sector - reqs[outidx].sector) << 9;
               qemu_iovec_concat(qiov, reqs[outidx].qiov, size);
   
               // We might need to add some zeros between the two requests
               if (reqs[i].sector > oldreq_last) {
                   size_t zero_bytes = (reqs[i].sector - oldreq_last) << 9;
                   uint8_t *buf = qemu_blockalign(bs, zero_bytes);
                   memset(buf, 0, zero_bytes);
                   qemu_iovec_add(qiov, buf, zero_bytes);
                   mcb->callbacks[i].free_buf = buf;
               }
   
               // Add the second request
               qemu_iovec_concat(qiov, reqs[i].qiov, reqs[i].qiov->size);
   
               reqs[outidx].nb_sectors = qiov->size >> 9;
               reqs[outidx].qiov = qiov;
   
               mcb->callbacks[i].free_qiov = reqs[outidx].qiov;
           } else {
               outidx++;
               reqs[outidx].sector     = reqs[i].sector;
               reqs[outidx].nb_sectors = reqs[i].nb_sectors;
               reqs[outidx].qiov       = reqs[i].qiov;
           }
       }
   
       return outidx + 1;
 }  }
   
 static int raw_create(const char *filename, int64_t total_size,  /*
                       const char *backing_file, int flags)   * Submit multiple AIO write requests at once.
    *
    * On success, the function returns 0 and all requests in the reqs array have
    * been submitted. In error case this function returns -1, and any of the
    * requests may or may not be submitted yet. In particular, this means that the
    * callback will be called for some of the requests, for others it won't. The
    * caller must check the error field of the BlockRequest to wait for the right
    * callbacks (if error != 0, no callback will be called).
    *
    * The implementation may modify the contents of the reqs array, e.g. to merge
    * requests. However, the fields opaque and error are left unmodified as they
    * are used to signal failure for a single request to the caller.
    */
   int bdrv_aio_multiwrite(BlockDriverState *bs, BlockRequest *reqs, int num_reqs)
 {  {
     int fd;      BlockDriverAIOCB *acb;
       MultiwriteCB *mcb;
       int i;
   
       if (num_reqs == 0) {
           return 0;
       }
   
       // Create MultiwriteCB structure
       mcb = qemu_mallocz(sizeof(*mcb) + num_reqs * sizeof(*mcb->callbacks));
       mcb->num_requests = 0;
       mcb->num_callbacks = num_reqs;
   
       for (i = 0; i < num_reqs; i++) {
           mcb->callbacks[i].cb = reqs[i].cb;
           mcb->callbacks[i].opaque = reqs[i].opaque;
       }
   
       // Check for mergable requests
       num_reqs = multiwrite_merge(bs, reqs, num_reqs, mcb);
   
       /*
        * Run the aio requests. As soon as one request can't be submitted
        * successfully, fail all requests that are not yet submitted (we must
        * return failure for all requests anyway)
        *
        * num_requests cannot be set to the right value immediately: If
        * bdrv_aio_writev fails for some request, num_requests would be too high
        * and therefore multiwrite_cb() would never recognize the multiwrite
        * request as completed. We also cannot use the loop variable i to set it
        * when the first request fails because the callback may already have been
        * called for previously submitted requests. Thus, num_requests must be
        * incremented for each request that is submitted.
        *
        * The problem that callbacks may be called early also means that we need
        * to take care that num_requests doesn't become 0 before all requests are
        * submitted - multiwrite_cb() would consider the multiwrite request
        * completed. A dummy request that is "completed" by a manual call to
        * multiwrite_cb() takes care of this.
        */
       mcb->num_requests = 1;
   
       for (i = 0; i < num_reqs; i++) {
           mcb->num_requests++;
           acb = bdrv_aio_writev(bs, reqs[i].sector, reqs[i].qiov,
               reqs[i].nb_sectors, multiwrite_cb, mcb);
   
           if (acb == NULL) {
               // We can only fail the whole thing if no request has been
               // submitted yet. Otherwise we'll wait for the submitted AIOs to
               // complete and report the error in the callback.
               if (i == 0) {
                   goto fail;
               } else {
                   multiwrite_cb(mcb, -EIO);
                   break;
               }
           }
       }
   
     if (flags || backing_file)      /* Complete the dummy request */
         return -ENOTSUP;      multiwrite_cb(mcb, 0);
   
     fd = open(filename, O_WRONLY | O_CREAT | O_TRUNC | O_BINARY | O_LARGEFILE,   
               0644);  
     if (fd < 0)  
         return -EIO;  
     ftruncate(fd, total_size * 512);  
     close(fd);  
     return 0;      return 0;
   
   fail:
       for (i = 0; i < mcb->num_callbacks; i++) {
           reqs[i].error = -EIO;
       }
       qemu_free(mcb);
       return -1;
 }  }
   
 BlockDriver bdrv_raw = {  BlockDriverAIOCB *bdrv_aio_flush(BlockDriverState *bs,
     "raw",          BlockDriverCompletionFunc *cb, void *opaque)
     sizeof(BDRVRawState),  {
     raw_probe,      BlockDriver *drv = bs->drv;
     raw_open,  
     raw_read,      if (!drv)
     raw_write,          return NULL;
     raw_close,  
     raw_create,      /*
        * Note that unlike bdrv_flush the driver is reponsible for flushing a
        * backing image if it exists.
        */
       return drv->bdrv_aio_flush(bs, cb, opaque);
   }
   
   void bdrv_aio_cancel(BlockDriverAIOCB *acb)
   {
       acb->pool->cancel(acb);
   }
   
   
   /**************************************************************/
   /* async block device emulation */
   
   typedef struct BlockDriverAIOCBSync {
       BlockDriverAIOCB common;
       QEMUBH *bh;
       int ret;
       /* vector translation state */
       QEMUIOVector *qiov;
       uint8_t *bounce;
       int is_write;
   } BlockDriverAIOCBSync;
   
   static void bdrv_aio_cancel_em(BlockDriverAIOCB *blockacb)
   {
       BlockDriverAIOCBSync *acb = (BlockDriverAIOCBSync *)blockacb;
       qemu_bh_delete(acb->bh);
       acb->bh = NULL;
       qemu_aio_release(acb);
   }
   
   static AIOPool bdrv_em_aio_pool = {
       .aiocb_size         = sizeof(BlockDriverAIOCBSync),
       .cancel             = bdrv_aio_cancel_em,
 };  };
   
   static void bdrv_aio_bh_cb(void *opaque)
   {
       BlockDriverAIOCBSync *acb = opaque;
   
       if (!acb->is_write)
           qemu_iovec_from_buffer(acb->qiov, acb->bounce, acb->qiov->size);
       qemu_vfree(acb->bounce);
       acb->common.cb(acb->common.opaque, acb->ret);
       qemu_bh_delete(acb->bh);
       acb->bh = NULL;
       qemu_aio_release(acb);
   }
   
   static BlockDriverAIOCB *bdrv_aio_rw_vector(BlockDriverState *bs,
                                               int64_t sector_num,
                                               QEMUIOVector *qiov,
                                               int nb_sectors,
                                               BlockDriverCompletionFunc *cb,
                                               void *opaque,
                                               int is_write)
   
   {
       BlockDriverAIOCBSync *acb;
   
       acb = qemu_aio_get(&bdrv_em_aio_pool, bs, cb, opaque);
       acb->is_write = is_write;
       acb->qiov = qiov;
       acb->bounce = qemu_blockalign(bs, qiov->size);
   
       if (!acb->bh)
           acb->bh = qemu_bh_new(bdrv_aio_bh_cb, acb);
   
       if (is_write) {
           qemu_iovec_to_buffer(acb->qiov, acb->bounce);
           acb->ret = bdrv_write(bs, sector_num, acb->bounce, nb_sectors);
       } else {
           acb->ret = bdrv_read(bs, sector_num, acb->bounce, nb_sectors);
       }
   
       qemu_bh_schedule(acb->bh);
   
       return &acb->common;
   }
   
   static BlockDriverAIOCB *bdrv_aio_readv_em(BlockDriverState *bs,
           int64_t sector_num, QEMUIOVector *qiov, int nb_sectors,
           BlockDriverCompletionFunc *cb, void *opaque)
   {
       return bdrv_aio_rw_vector(bs, sector_num, qiov, nb_sectors, cb, opaque, 0);
   }
   
   static BlockDriverAIOCB *bdrv_aio_writev_em(BlockDriverState *bs,
           int64_t sector_num, QEMUIOVector *qiov, int nb_sectors,
           BlockDriverCompletionFunc *cb, void *opaque)
   {
       return bdrv_aio_rw_vector(bs, sector_num, qiov, nb_sectors, cb, opaque, 1);
   }
   
   static BlockDriverAIOCB *bdrv_aio_flush_em(BlockDriverState *bs,
           BlockDriverCompletionFunc *cb, void *opaque)
   {
       BlockDriverAIOCBSync *acb;
   
       acb = qemu_aio_get(&bdrv_em_aio_pool, bs, cb, opaque);
       acb->is_write = 1; /* don't bounce in the completion hadler */
       acb->qiov = NULL;
       acb->bounce = NULL;
       acb->ret = 0;
   
       if (!acb->bh)
           acb->bh = qemu_bh_new(bdrv_aio_bh_cb, acb);
   
       bdrv_flush(bs);
       qemu_bh_schedule(acb->bh);
       return &acb->common;
   }
   
   /**************************************************************/
   /* sync block device emulation */
   
   static void bdrv_rw_em_cb(void *opaque, int ret)
   {
       *(int *)opaque = ret;
   }
   
   #define NOT_DONE 0x7fffffff
   
   static int bdrv_read_em(BlockDriverState *bs, int64_t sector_num,
                           uint8_t *buf, int nb_sectors)
   {
       int async_ret;
       BlockDriverAIOCB *acb;
       struct iovec iov;
       QEMUIOVector qiov;
   
       async_context_push();
   
       async_ret = NOT_DONE;
       iov.iov_base = (void *)buf;
       iov.iov_len = nb_sectors * 512;
       qemu_iovec_init_external(&qiov, &iov, 1);
       acb = bdrv_aio_readv(bs, sector_num, &qiov, nb_sectors,
           bdrv_rw_em_cb, &async_ret);
       if (acb == NULL) {
           async_ret = -1;
           goto fail;
       }
   
       while (async_ret == NOT_DONE) {
           qemu_aio_wait();
       }
   
   
   fail:
       async_context_pop();
       return async_ret;
   }
   
   static int bdrv_write_em(BlockDriverState *bs, int64_t sector_num,
                            const uint8_t *buf, int nb_sectors)
   {
       int async_ret;
       BlockDriverAIOCB *acb;
       struct iovec iov;
       QEMUIOVector qiov;
   
       async_context_push();
   
       async_ret = NOT_DONE;
       iov.iov_base = (void *)buf;
       iov.iov_len = nb_sectors * 512;
       qemu_iovec_init_external(&qiov, &iov, 1);
       acb = bdrv_aio_writev(bs, sector_num, &qiov, nb_sectors,
           bdrv_rw_em_cb, &async_ret);
       if (acb == NULL) {
           async_ret = -1;
           goto fail;
       }
       while (async_ret == NOT_DONE) {
           qemu_aio_wait();
       }
   
   fail:
       async_context_pop();
       return async_ret;
   }
   
 void bdrv_init(void)  void bdrv_init(void)
 {  {
     bdrv_register(&bdrv_raw);      module_call_init(MODULE_INIT_BLOCK);
 #ifndef _WIN32  }
     bdrv_register(&bdrv_cow);  
 #endif  void bdrv_init_with_whitelist(void)
     bdrv_register(&bdrv_qcow);  {
     bdrv_register(&bdrv_vmdk);      use_bdrv_whitelist = 1;
     bdrv_register(&bdrv_cloop);      bdrv_init();
     bdrv_register(&bdrv_dmg);  }
     bdrv_register(&bdrv_bochs);  
     bdrv_register(&bdrv_vpc);  void *qemu_aio_get(AIOPool *pool, BlockDriverState *bs,
     bdrv_register(&bdrv_vvfat);                     BlockDriverCompletionFunc *cb, void *opaque)
   {
       BlockDriverAIOCB *acb;
   
       if (pool->free_aiocb) {
           acb = pool->free_aiocb;
           pool->free_aiocb = acb->next;
       } else {
           acb = qemu_mallocz(pool->aiocb_size);
           acb->pool = pool;
       }
       acb->bs = bs;
       acb->cb = cb;
       acb->opaque = opaque;
       return acb;
   }
   
   void qemu_aio_release(void *p)
   {
       BlockDriverAIOCB *acb = (BlockDriverAIOCB *)p;
       AIOPool *pool = acb->pool;
       acb->next = pool->free_aiocb;
       pool->free_aiocb = acb;
   }
   
   /**************************************************************/
   /* removable device support */
   
   /**
    * Return TRUE if the media is present
    */
   int bdrv_is_inserted(BlockDriverState *bs)
   {
       BlockDriver *drv = bs->drv;
       int ret;
       if (!drv)
           return 0;
       if (!drv->bdrv_is_inserted)
           return 1;
       ret = drv->bdrv_is_inserted(bs);
       return ret;
   }
   
   /**
    * Return TRUE if the media changed since the last call to this
    * function. It is currently only used for floppy disks
    */
   int bdrv_media_changed(BlockDriverState *bs)
   {
       BlockDriver *drv = bs->drv;
       int ret;
   
       if (!drv || !drv->bdrv_media_changed)
           ret = -ENOTSUP;
       else
           ret = drv->bdrv_media_changed(bs);
       if (ret == -ENOTSUP)
           ret = bs->media_changed;
       bs->media_changed = 0;
       return ret;
   }
   
   /**
    * If eject_flag is TRUE, eject the media. Otherwise, close the tray
    */
   int bdrv_eject(BlockDriverState *bs, int eject_flag)
   {
       BlockDriver *drv = bs->drv;
       int ret;
   
       if (bs->locked) {
           return -EBUSY;
       }
   
       if (!drv || !drv->bdrv_eject) {
           ret = -ENOTSUP;
       } else {
           ret = drv->bdrv_eject(bs, eject_flag);
       }
       if (ret == -ENOTSUP) {
           if (eject_flag)
               bdrv_close(bs);
           ret = 0;
       }
   
       return ret;
   }
   
   int bdrv_is_locked(BlockDriverState *bs)
   {
       return bs->locked;
   }
   
   /**
    * Lock or unlock the media (if it is locked, the user won't be able
    * to eject it manually).
    */
   void bdrv_set_locked(BlockDriverState *bs, int locked)
   {
       BlockDriver *drv = bs->drv;
   
       bs->locked = locked;
       if (drv && drv->bdrv_set_locked) {
           drv->bdrv_set_locked(bs, locked);
       }
   }
   
   /* needed for generic scsi interface */
   
   int bdrv_ioctl(BlockDriverState *bs, unsigned long int req, void *buf)
   {
       BlockDriver *drv = bs->drv;
   
       if (drv && drv->bdrv_ioctl)
           return drv->bdrv_ioctl(bs, req, buf);
       return -ENOTSUP;
   }
   
   BlockDriverAIOCB *bdrv_aio_ioctl(BlockDriverState *bs,
           unsigned long int req, void *buf,
           BlockDriverCompletionFunc *cb, void *opaque)
   {
       BlockDriver *drv = bs->drv;
   
       if (drv && drv->bdrv_aio_ioctl)
           return drv->bdrv_aio_ioctl(bs, req, buf, cb, opaque);
       return NULL;
   }
   
   
   
   void *qemu_blockalign(BlockDriverState *bs, size_t size)
   {
       return qemu_memalign((bs && bs->buffer_alignment) ? bs->buffer_alignment : 512, size);
   }
   
   void bdrv_set_dirty_tracking(BlockDriverState *bs, int enable)
   {
       int64_t bitmap_size;
   
       if (enable) {
           if (!bs->dirty_bitmap) {
               bitmap_size = (bdrv_getlength(bs) >> BDRV_SECTOR_BITS) +
                       BDRV_SECTORS_PER_DIRTY_CHUNK * 8 - 1;
               bitmap_size /= BDRV_SECTORS_PER_DIRTY_CHUNK * 8;
   
               bs->dirty_bitmap = qemu_mallocz(bitmap_size);
           }
       } else {
           if (bs->dirty_bitmap) {
               qemu_free(bs->dirty_bitmap);
               bs->dirty_bitmap = NULL;
           }
       }
   }
   
   int bdrv_get_dirty(BlockDriverState *bs, int64_t sector)
   {
       int64_t chunk = sector / (int64_t)BDRV_SECTORS_PER_DIRTY_CHUNK;
   
       if (bs->dirty_bitmap &&
           (sector << BDRV_SECTOR_BITS) < bdrv_getlength(bs)) {
           return bs->dirty_bitmap[chunk / (sizeof(unsigned long) * 8)] &
               (1 << (chunk % (sizeof(unsigned long) * 8)));
       } else {
           return 0;
       }
   }
   
   void bdrv_reset_dirty(BlockDriverState *bs, int64_t cur_sector,
                         int nr_sectors)
   {
       set_dirty_bitmap(bs, cur_sector, nr_sectors, 0);
 }  }

Removed from v.1.1  
changed lines
  Added in v.1.1.1.17


unix.superglobalmegacorp.com